Tuesday, 22 March 2016

Import Excel

void clicked()
{
     SysExcelApplication application;
     SysExcelWorkbooks workbooks;
     SysExcelWorkbook workbook;
     SysExcelWorksheets worksheets;
     SysExcelWorksheet worksheet;
     SysExcelCells cells;
     COMVariantType type;
     Name name;
     FileName filename;
     LogisticsPostalAddress  postalAddress;
    DirPartyLocation partyLocation;


    int row =1;
     int i=0;

     MTCustAddress  custAddress;
     LogisticsPostalAddress LogisticsPostalAddress;

     InventTable        inventTableLoc;
     CustAccount        custAcc;
     LogisticsAddressing    address;
     LogisticsAddressCountyId   county;
     CustTable          custTable;
     ItemId                     itemid;
     real            circumference;
     real            mTWidth;
     real            thick;
     real            noOfEngrave;



     real                    qty;
        TransDate           transdate;

           Dialog dialog;
    DialogField dialogField;
     ;

     application = SysExcelApplication::construct();
     workbooks = application.workbooks();




     //specify the file path that you want to read
     //filename = “C:\\Users\\46509010\\Desktop\\book2.xlsx”;
     //filename = "C:\\Users\\Administrator\\Desktop\\LabelFields.xlsx";
    dialog = new Dialog("FileOpen");
    dialogfield = dialog.addField(extendedTypeStr(Filenameopen), "File Name");
    dialog.run();

    if (dialog.run())
    {
        filename = (dialogfield.value());

    }
    //delete_from overtime
     //where overtime.MZK_MonthYear == MZK_MonthYear::APR2013
     //&& overtime.dataAreaId == “yme”;
    try
     {
    workbooks.open(filename);
     }
     catch (Exception::Error)
     {
     throw error("File cannot be opened.");
     }

     workbook = workbooks.item(1);
     worksheets = workbook.worksheets();
     worksheet = worksheets.itemFromNum(1);
     cells = worksheet.cells();
     do
     {
         ttsBegin;
     row++;
     itemid = cells.item(row, 1).value().bStr();
     circumference= cells.item(row, 2).value().double();
     mTWidth = cells.item(row,3).value().double();
     thick=cells.item(row,4).value().double();
     noOfEngrave=cells.item(row,5).value().double();

         inventTableLoc = InventTable::find(itemid,true);


    inventTableLoc.Circumference = circumference;
    inventTableLoc.MTWidth = mTWidth;
    inventTableLoc.Thick = thick;
    inventTableLoc.NoOfEngrave = noOfEngrave;


     inventTableLoc.update();
         ttsCommit;
    i++;
     type = cells.item(row+1, 1).value().variantType();

    }
     while (type != COMVariantType::VT_EMPTY);
    application.quit();
     info("Done");
    info(strFmt("%1", i));

}

*************************************************************

void clicked()
{
     SysExcelApplication application;
     SysExcelWorkbooks workbooks;
     SysExcelWorkbook workbook;
     SysExcelWorksheets worksheets;
     SysExcelWorksheet worksheet;
     SysExcelCells cells;
     COMVariantType type;
     Name name;
     FileName filename;
     LogisticsPostalAddress  postalAddress;
    DirPartyLocation partyLocation;


    int row =1;
     int i=0;

     MTCustAddress  custAddress;
     LogisticsPostalAddress LogisticsPostalAddress;

     InventTable        inventTableLoc;
     CustAccount        custAcc;
     LogisticsAddressing    address;
     LogisticsAddressCountyId   county;
     CustTable          custTable;
     ItemId                     itemid;
     str                   NameAlias;

     real                    qty;
        TransDate           transdate;

           Dialog dialog;
    DialogField dialogField;
     ;

     application = SysExcelApplication::construct();
     workbooks = application.workbooks();




     //specify the file path that you want to read
     //filename = “C:\\Users\\46509010\\Desktop\\book2.xlsx”;
     //filename = "C:\\Users\\Administrator\\Desktop\\LabelFields.xlsx";
    dialog = new Dialog("FileOpen");
    dialogfield = dialog.addField(extendedTypeStr(Filenameopen), "File Name");
    dialog.run();

    if (dialog.run())
    {
        filename = (dialogfield.value());

    }
    //delete_from overtime
     //where overtime.MZK_MonthYear == MZK_MonthYear::APR2013
     //&& overtime.dataAreaId == “yme”;
    try
     {
    workbooks.open(filename);
     }
     catch (Exception::Error)
     {
     throw error("File cannot be opened.");
     }

     workbook = workbooks.item(1);
     worksheets = workbook.worksheets();
     worksheet = worksheets.itemFromNum(1);
     cells = worksheet.cells();
     do
     {
         ttsBegin;
     row++;
     itemid = cells.item(row, 1).value().bStr();
     NameAlias = cells.item(row, 2).value().bStr();

    inventTableLoc = InventTable::find(itemid,true);
         if(inventTableLoc)
         {

            inventTableLoc.NameAlias = NameAlias;


             inventTableLoc.update();
         }
         else
         {
            info(ItemId);
         }
         ttsCommit;
    i++;
     type = cells.item(row+1, 1).value().variantType();

    }
     while (type != COMVariantType::VT_EMPTY);
    application.quit();
     info("Done");
    info(strFmt("%1", i));

}

*******************************************************************


void clicked()
{
     SysExcelApplication application;
     SysExcelWorkbooks  workbooks;
     SysExcelWorkbook   workbook;
     SysExcelWorksheets worksheets;
     SysExcelWorksheet  worksheet;
     SysExcelCells      cells;
     COMVariantType     type;
     Name               name;
     FileName                       filename;
     LogisticsPostalAddress         postalAddress;
     DirPartyLocation               partyLocation;
     EcoResDistinctProductVariant   ecoResDistinctProductVariant;
     int row =1;
     int i=0;
     MTItemBom                      mTItemBomUpdate, mtItemBOMavailable;
     EcoResProductTranslation       productTrans;
     InventDimCombination           invComb;

     ItemId         itemid;
     real            JarCarton, JarInk1, JarInk2, JarInk3,
                     JarInk4, JarInk5, JarInk6, JarInk7,
                     JarMB, CapMB ,CapCarton, JarStretchFilmQty,
                     JarPolyCoversQty, CapStretchFilmQty,
                     CapPolyCoversQty,

                     JarWSacksQty, CapWSacksQty,JarCarton1;



     str             JarCartonItem,JarInk1Item, JarInk2Item,
                     JarInk3Item, JarInk4Item, JarInk5Item,
                     JarInk6Item, JarInk7Item, JarMBItem,
                     CapMBItem, Handle1Item,CapCartonItem,
                     CapStickerItem, JarStretchFilmERPItemCode, JarPolyCoversERPItemCode,
                     CapStretchFilmERPItemCode,CapPolyCoversERPItemCode ,
                     JarMBuOM, CapMBUOM,JarInk1UOM,JarInk2UOM,JarInk3UOM,JarInk4UOM ,
                     JarInk5UOM,JarInk6UOM,JarInk7UOM,JarStretchUOM,JarPolyCoversUOM,
                     CapStretchUOM,CapPolyCoversUOM,Handle1UOM,JarCartonUOM,CapCartonUOM,
                     CapStickerUOM,

                     JarWSacksCode, CapWSacksCode, JarCartonItem1,
                     PackedJar, PackedCap, PrintedJar, PrintedCap,
                     ProductionJar, ProductionCap,

                     JarWSacksUOM,CapWSacksUOM,JarCartonUOM1,PackedJarUOM,PackedCapUOM,
                     PrintedJarUOM,PrintedCapUOM,ProductionJarUOM,ProductionCapUOM;



     RetailVariantId    RetailVariantId;

     int             CapSticker, Handle1,

                     PackedJarQty,PackedCapQty,PrintedJarQty,
                     PrintedCapQty,ProductionJarQty,ProductionCapQty;


     Dialog dialog;
     DialogField dialogField;
     ;

     application = SysExcelApplication::construct();
     workbooks = application.workbooks();

    dialog = new Dialog("FileOpen");
    dialogfield = dialog.addField(extendedTypeStr(Filenameopen), "File Name");
    dialog.run();

    if (dialog.run())
    {
        filename = (dialogfield.value());

    }
    //**************************************************//
    /*select * from mTItemBomUpdate
        where mTItemBomUpdate.Product == ecoResProductTranslationLoc.RecId;*/


    // itemBom.Product == ecoResDistinctProductVariant.RecId;

    //**********************************************************************



    try
     {
    workbooks.open(filename);
     }
     catch (Exception::Error)
     {
     throw error("File cannot be opened.");
     }

     workbook = workbooks.item(1);
     worksheets = workbook.worksheets();
     worksheet = worksheets.itemFromNum(1);
     cells = worksheet.cells();
     do
     {
         ttsBegin;
     row++;
        RetailVariantId = cells.item(row, 1).value().bStr();
        JarMBItem = cells.item(row,2).value().bStr();
        JarMB= cells.item(row, 3).value().double();
        JarMBuOM = cells.item(row,4).value().bStr();
        CapMBItem=cells.item(row,5).value().bStr();
        CapMB=cells.item(row,6).value().double();
        CapMBUOM = cells.item(row,7).value().bStr();
        JarInk1Item = cells.item(row,8).value().bStr();
        JarInk1= cells.item(row, 9).value().double();
        JarInk1UOM = cells.item(row,10).value().bStr();
        JarInk2Item=cells.item(row,11).value().bStr();
        JarInk2=cells.item(row,12).value().double();
        JarInk2UOM = cells.item(row,13).value().bStr();
        JarInk3Item = cells.item(row,14).value().bStr();
        JarInk3= cells.item(row, 15).value().double();
        JarInk3UOM = cells.item(row,16).value().bStr();
        JarInk4Item=cells.item(row,17).value().bStr();
        JarInk4=cells.item(row,18).value().double();
        JarInk4UOM = cells.item(row,19).value().bStr();
        JarInk5Item = cells.item(row,20).value().bStr();
        JarInk5= cells.item(row, 21).value().double();
        JarInk5UOM = cells.item(row,22).value().bStr();
        JarInk6Item=cells.item(row,23).value().bStr();
        JarInk6=cells.item(row,24).value().double();
        JarInk6UOM = cells.item(row,25).value().bStr();
        JarInk7Item = cells.item(row,26).value().bStr();
        JarInk7= cells.item(row, 27).value().double();
        JarInk7UOM = cells.item(row,28).value().bStr();
        Handle1Item = cells.item(row,29).value().bStr();
        Handle1 = cells.item(row, 30).value().double();
        Handle1UOM = cells.item(row,31).value().bStr();
        JarCartonItem=cells.item(row,32).value().bstr();
        JarCarton=cells.item(row,33).value().double();
        JarCartonUOM = cells.item(row,34).value().bstr();
        CapCartonItem = cells.item(row,35).value().bStr();
        CapCarton = cells.item(row, 36).value().double();
        CapCartonUOM = cells.item(row,37).value().bstr();
        CapStickerItem=cells.item(row,38).value().bStr();
        CapSticker=cells.item(row,39).value().double();
        CapStickerUOM =cells.item(row,40).value().bstr();
        JarStretchFilmERPItemCode = cells.item(row,41).value().bStr();
        JarStretchFilmQty=cells.item(row,42).value().double();
        JarStretchUOM=cells.item(row,43).value().bStr();
        JarPolyCoversERPItemCode = cells.item(row, 44).value().bStr();
        JarPolyCoversQty=cells.item(row,45).value().double();
        JarPolyCoversUOM=cells.item(row,46).value().bStr();
        CapStretchFilmERPItemCode = cells.item(row, 47).value().bStr();
        CapStretchFilmQty=cells.item(row,48).value().double();
        CapStretchUOM=cells.item(row,49).value().bStr();
        CapPolyCoversERPItemCode = cells.item(row, 50).value().bStr();
        CapPolyCoversQty=cells.item(row,51).value().double();
        CapPolyCoversUOM=cells.item(row,52).value().bStr();

        JarWSacksCode=cells.item(row,53).value().bStr();
        JarWSacksQty=cells.item(row,54).value().double();
        JarWSacksUOM=cells.item(row,55).value().bStr();
        CapWSacksCode=cells.item(row,56).value().bStr();
        CapWSacksQty=cells.item(row,57).value().double();
        CapWSacksUOM=cells.item(row,58).value().bStr();
        JarCartonItem1=cells.item(row,59).value().bStr();
        JarCarton1=cells.item(row,60).value().double();
        JarInk1UOM=cells.item(row,61).value().bStr();
        PackedJar=cells.item(row,62).value().bStr();
        PackedJarQty=cells.item(row,63).value().double();
        PackedJarUOM=cells.item(row,64).value().bStr();
        PackedCap=cells.item(row,65).value().bStr();
        PackedCapQty=cells.item(row,66).value().double();
        PackedCapUOM=cells.item(row,67).value().bStr();
        PrintedJar=cells.item(row,68).value().bStr();
        PrintedJarQty=cells.item(row,69).value().double();
        PrintedJarUOM=cells.item(row,70).value().bStr();
        PrintedCap=cells.item(row,71).value().bStr();
        PrintedCapQty=cells.item(row,72).value().double();
        PrintedCapUOM=cells.item(row,73).value().bStr();
        ProductionJar=cells.item(row,74).value().bStr();
        ProductionJarQty=cells.item(row,75).value().double();
        ProductionJarUOM=cells.item(row,76).value().bStr();
        ProductionCap=cells.item(row,77).value().bStr();
        ProductionCapQty=cells.item(row,78).value().double();
        ProductionCapUOM=cells.item(row,79).value().bStr();




     select * from invComb
        where invComb.RetailVariantId == RetailVariantId; //sl.RetailVariantId;//"MTPL-09512";//

    select * from ecoResDistinctProductVariant
        where ecoResDistinctProductVariant.RecId == invComb.DistinctProductVariant;

    select * from productTrans
        where productTrans.Product == ecoResDistinctProductVariant.RecId;

     select forUpdate   mTItemBomUpdate
        where  mTItemBomUpdate.Product == ecoResDistinctProductVariant.RecId;
        if(!mTItemBomUpdate)
        {
            mTItemBomUpdate.Product = ecoResDistinctProductVariant.RecId;
                mTItemBomUpdate.JarMBItem      = JarMBItem;
                mTItemBomUpdate.JarMB          = JarMB;
                mTItemBomUpdate.JarMBuOM       = JarMBuOM;
                mTItemBomUpdate.CapMB          = CapMB;
                mTItemBomUpdate.CapMBItem      = CapMBItem;
                mTItemBomUpdate.CapMBUOM       = CapMBUOM;
                mTItemBomUpdate.JarInk1        = JarInk1;
                mTItemBomUpdate.JarInk1Item    = JarInk1Item;
                mTItemBomUpdate.JarInk1UOM     = JarInk1UOM;
                mTItemBomUpdate.JarInk2        = JarInk2;
                mTItemBomUpdate.JarInk2Item    = JarInk2Item;
                mTItemBomUpdate.JarInk2UOM     = JarInk2UOM;
                mTItemBomUpdate.JarInk3        = JarInk3;
                mTItemBomUpdate.JarInk3Item    = JarInk3Item;
                mTItemBomUpdate.JarInk3UOM     = JarInk3UOM;
                mTItemBomUpdate.JarInk4        = JarInk4;
                mTItemBomUpdate.JarInk4Item    = JarInk4Item;
                mTItemBomUpdate.JarInk4UOM     = JarInk4UOM;
                mTItemBomUpdate.JarInk5        = JarInk5;
                mTItemBomUpdate.JarInk5Item    = JarInk5Item;
                mTItemBomUpdate.JarInk5UOM     = JarInk5UOM;
                mTItemBomUpdate.JarInk6        = JarInk6;
                mTItemBomUpdate.JarInk6Item    = JarInk6Item;
                mTItemBomUpdate.JarInk6UOM     = JarInk6UOM;
                mTItemBomUpdate.JarInk7        = JarInk7;
                mTItemBomUpdate.JarInk7Item    = JarInk7Item;
                mTItemBomUpdate.JarInk7UOM     = JarInk7UOM;
                mTItemBomUpdate.Handle1        = Handle1;
                mTItemBomUpdate.Handle1Item    = Handle1Item;
                mTItemBomUpdate.Handle1UOM     = Handle1UOM;
                mTItemBomUpdate.JarCarton      = JarCarton;
                mTItemBomUpdate.JarCartonItem  = JarCartonItem;
                mTItemBomUpdate.JarCartonUOM   = JarCartonUOM;
                mTItemBomUpdate.CapCarton      = CapCarton;
                mTItemBomUpdate.CapCartonItem  = CapCartonItem;
                mTItemBomUpdate.CapCartonUOM   = CapCartonUOM;
                mTItemBomUpdate.CapSticker     = CapSticker;
                mTItemBomUpdate.CapStickerItem = CapStickerItem;
                mTItemBomUpdate.CapStickerUOM   = CapStickerUOM;
                mTItemBomUpdate.JarStretchFilmERPItemCode  = JarStretchFilmERPItemCode;
                mTItemBomUpdate.JarStretchFilmQty   =  JarStretchFilmQty;
                mTItemBomUpdate.JarStretchUOM     =  JarStretchUOM;
                mTItemBomUpdate.JarPolyCoversERPItemCode  = JarPolyCoversERPItemCode;
                mTItemBomUpdate.JarPolyCoversQty   =  JarPolyCoversQty;
                mTItemBomUpdate.JarPolyCoversUOM     =  JarPolyCoversUOM;
                mTItemBomUpdate.CapStretchFilmERPItemCode  = CapStretchFilmERPItemCode;
                mTItemBomUpdate.CapStretchFilmQty   =  CapStretchFilmQty;
                mTItemBomUpdate.CapStretchUOM     =  CapStretchUOM;
                mTItemBomUpdate.CapPolyCoversERPItemCode  = CapPolyCoversERPItemCode;
                mTItemBomUpdate.CapPolyCoversQty   =  CapPolyCoversQty;
                mTItemBomUpdate.CapPolyCoversUOM     =  CapPolyCoversUOM;

                mTItemBomUpdate.JarWSacksCode     =  JarWSacksCode;
                mTItemBomUpdate.JarWSacksQty      =  JarWSacksQty;
                mTItemBomUpdate.JarWSacksUOM      =  JarWSacksUOM;
                mTItemBomUpdate.CapWSacksCode     =  CapWSacksCode;
                mTItemBomUpdate.CapWSacksQty      =  CapWSacksQty;
                mTItemBomUpdate.CapWSacksUOM      =  CapWSacksUOM;
                mTItemBomUpdate.JarCartonItem1     =  JarCartonItem1;
                mTItemBomUpdate.JarCarton1         =  JarCarton1;
                mTItemBomUpdate.JarCartonUOM1      =  JarCartonUOM1;
                mTItemBomUpdate.PackedJar          =  PackedJar;
                mTItemBomUpdate.PackedJarQty       =  PackedJarQty;
                mTItemBomUpdate.PackedJarUOM       =  PackedJarUOM;
                mTItemBomUpdate.PackedCap          =  PackedCap;
                mTItemBomUpdate.PackedCapQty       =  PackedCapQty;
                mTItemBomUpdate.PackedCapUOM       =  PackedCapUOM;
                mTItemBomUpdate.PrintedJar          =  PrintedJar;
                mTItemBomUpdate.PrintedJarQty       =  PrintedJarQty;
                mTItemBomUpdate.PrintedJarUOM       =  PrintedJarUOM;
                mTItemBomUpdate.PrintedCap          =  PrintedCap;
                mTItemBomUpdate.PrintedCapQty       =  PrintedCapQty;
                mTItemBomUpdate.PrintedCapUOM       =  PrintedCapUOM;
                mTItemBomUpdate.ProductionJar          =  ProductionJar;
                mTItemBomUpdate.ProductionJarQty       =  ProductionJarQty;
                mTItemBomUpdate.ProductionJarUOM       =  ProductionJarUOM;
                mTItemBomUpdate.ProductionCap          =  ProductionCap;
                mTItemBomUpdate.ProductionCapQty       =  ProductionCapQty;
                mTItemBomUpdate.ProductionCapUOM       =  ProductionCapUOM;


                mTItemBomUpdate.insert();
         }
         else
         {
                if(JarMBItem)
                mTItemBomUpdate.JarMBItem      = JarMBItem;
                if(JarMB)
                mTItemBomUpdate.JarMB          = JarMB;
                if(JarMBuOM)
                mTItemBomUpdate.JarMBuOM       = JarMBuOM;
                 if(CapMB)
                mTItemBomUpdate.CapMB          = CapMB;
              if(CapMBItem)
                mTItemBomUpdate.CapMBItem      = CapMBItem;
             if(CapMBUOM)
                mTItemBomUpdate.CapMBUOM       = CapMBUOM;
              if(JarInk1)
                mTItemBomUpdate.JarInk1        = JarInk1;
             if(JarInk1Item)
                mTItemBomUpdate.JarInk1Item    = JarInk1Item;
             if(JarInk1UOM)
                mTItemBomUpdate.JarInk1UOM     = JarInk1UOM;
             if(JarInk2)
                mTItemBomUpdate.JarInk2        = JarInk2;
             if(JarInk2Item)
                mTItemBomUpdate.JarInk2Item    = JarInk2Item;
             if(JarInk2UOM)
                mTItemBomUpdate.JarInk2UOM     = JarInk2UOM;
             if(JarInk3)
                mTItemBomUpdate.JarInk3        = JarInk3;
             if(JarInk3Item)
                mTItemBomUpdate.JarInk3Item    = JarInk3Item;
             if(JarInk3UOM)
                mTItemBomUpdate.JarInk3UOM     = JarInk3UOM;
             if(JarInk4)
                mTItemBomUpdate.JarInk4        = JarInk4;
             if(JarInk4Item)
                mTItemBomUpdate.JarInk4Item    = JarInk4Item;
             if(JarInk4UOM)
                mTItemBomUpdate.JarInk4UOM     = JarInk4UOM;
             if(JarInk5)
                mTItemBomUpdate.JarInk5        = JarInk5;
             if(JarInk5Item)
                mTItemBomUpdate.JarInk5Item    = JarInk5Item;
             if(JarInk5UOM)
                mTItemBomUpdate.JarInk5UOM     = JarInk5UOM;
             if(JarInk6)
                mTItemBomUpdate.JarInk6        = JarInk6;
             if(JarInk6Item)
                mTItemBomUpdate.JarInk6Item    = JarInk6Item;
             if(JarInk6UOM)
                mTItemBomUpdate.JarInk6UOM     = JarInk6UOM;
             if(JarInk7)
                mTItemBomUpdate.JarInk7        = JarInk7;
             if(JarInk7Item)
                mTItemBomUpdate.JarInk7Item    = JarInk7Item;
             if(JarInk7UOM)
                mTItemBomUpdate.JarInk7UOM     = JarInk7UOM;
             if(Handle1)
                mTItemBomUpdate.Handle1        = Handle1;
             if(Handle1Item)
                mTItemBomUpdate.Handle1Item    = Handle1Item;
             if(Handle1UOM)
                mTItemBomUpdate.Handle1UOM     = Handle1UOM;
             if(JarCarton)
                mTItemBomUpdate.JarCarton      = JarCarton;
             if(JarCartonItem)
                mTItemBomUpdate.JarCartonItem  = JarCartonItem;
             if(JarCartonUOM)
                mTItemBomUpdate.JarCartonUOM   = JarCartonUOM;
             if(CapCarton)
                mTItemBomUpdate.CapCarton      = CapCarton;
             if(CapCartonItem)
                mTItemBomUpdate.CapCartonItem  = CapCartonItem;
             if(CapCartonUOM)
                mTItemBomUpdate.CapCartonUOM   = CapCartonUOM;
             if(CapSticker)
                mTItemBomUpdate.CapSticker     = CapSticker;
             if(CapStickerItem)
                mTItemBomUpdate.CapStickerItem = CapStickerItem;
             if(CapStickerUOM)
                mTItemBomUpdate.CapStickerUOM   = CapStickerUOM;
             if(JarStretchFilmERPItemCode)
                mTItemBomUpdate.JarStretchFilmERPItemCode  = JarStretchFilmERPItemCode;
             if(JarStretchFilmQty)
                mTItemBomUpdate.JarStretchFilmQty   =  JarStretchFilmQty;
             if(JarStretchUOM)
                mTItemBomUpdate.JarStretchUOM     =  JarStretchUOM;
             if(JarPolyCoversERPItemCode)
                mTItemBomUpdate.JarPolyCoversERPItemCode  = JarPolyCoversERPItemCode;
             if(JarPolyCoversQty)
                mTItemBomUpdate.JarPolyCoversQty   =  JarPolyCoversQty;
             if(JarPolyCoversUOM)
                mTItemBomUpdate.JarPolyCoversUOM     =  JarPolyCoversUOM;
             if(CapStretchFilmERPItemCode)
                mTItemBomUpdate.CapStretchFilmERPItemCode  = CapStretchFilmERPItemCode;
             if(CapStretchFilmQty)
                mTItemBomUpdate.CapStretchFilmQty   =  CapStretchFilmQty;
             if(CapStretchUOM)
                mTItemBomUpdate.CapStretchUOM     =  CapStretchUOM;
             if(CapPolyCoversERPItemCode)
                mTItemBomUpdate.CapPolyCoversERPItemCode  = CapPolyCoversERPItemCode;
             if(CapPolyCoversQty)
                mTItemBomUpdate.CapPolyCoversQty   =  CapPolyCoversQty;
             if(CapPolyCoversUOM)
                mTItemBomUpdate.CapPolyCoversUOM     =  CapPolyCoversUOM;

             if(JarWSacksCode)
                mTItemBomUpdate.JarWSacksCode     =  JarWSacksCode;
             if(JarWSacksQty)
                mTItemBomUpdate.JarWSacksQty      =  JarWSacksQty;
             if(JarWSacksUOM)
                mTItemBomUpdate.JarWSacksUOM      =  JarWSacksUOM;
             if(CapWSacksCode)
                mTItemBomUpdate.CapWSacksCode     =  CapWSacksCode;
             if(CapWSacksQty)
                mTItemBomUpdate.CapWSacksQty      =  CapWSacksQty;
             if(CapWSacksUOM)
                mTItemBomUpdate.CapWSacksUOM      =  CapWSacksUOM;
             if(JarCartonItem1)
                mTItemBomUpdate.JarCartonItem1     =  JarCartonItem1;
             if(JarCarton1)
                mTItemBomUpdate.JarCarton1         =  JarCarton1;
             if(JarCartonUOM1)
                mTItemBomUpdate.JarCartonUOM1      =  JarCartonUOM1;
             if(PackedJar)
                mTItemBomUpdate.PackedJar          =  PackedJar;
             if(PackedJarQty)
                mTItemBomUpdate.PackedJarQty       =  PackedJarQty;
             if(PackedJarUOM)
                mTItemBomUpdate.PackedJarUOM       =  PackedJarUOM;
             if(PackedCap)
                mTItemBomUpdate.PackedCap          =  PackedCap;
             if(PackedCapQty)
                mTItemBomUpdate.PackedCapQty       =  PackedCapQty;
             if(PackedCapUOM)
                mTItemBomUpdate.PackedCapUOM       =  PackedCapUOM;
             if(PrintedJar)
                mTItemBomUpdate.PrintedJar          =  PrintedJar;
             if(PrintedJarQty)
                mTItemBomUpdate.PrintedJarQty       =  PrintedJarQty;
             if(PrintedJarUOM)
                mTItemBomUpdate.PrintedJarUOM       =  PrintedJarUOM;
             if(PrintedCap)
                mTItemBomUpdate.PrintedCap          =  PrintedCap;
             if(PrintedCapQty)
                mTItemBomUpdate.PrintedCapQty       =  PrintedCapQty;
             if(PrintedCapUOM)
                mTItemBomUpdate.PrintedCapUOM       =  PrintedCapUOM;
             if(ProductionJar)
                mTItemBomUpdate.ProductionJar          =  ProductionJar;
             if(ProductionJarQty)
                mTItemBomUpdate.ProductionJarQty       =  ProductionJarQty;
             if(ProductionJarUOM)
                mTItemBomUpdate.ProductionJarUOM       =  ProductionJarUOM;
             if(ProductionCap)
                mTItemBomUpdate.ProductionCap          =  ProductionCap;
             if(ProductionCapQty)
                mTItemBomUpdate.ProductionCapQty       =  ProductionCapQty;
             if(ProductionCapUOM)
                mTItemBomUpdate.ProductionCapUOM       =  ProductionCapUOM;



                mTItemBomUpdate.update();
         }
    ttsCommit;
    i++;
     type = cells.item(row+1, 1).value().variantType();

    }
     while (type != COMVariantType::VT_EMPTY);
    application.quit();
     info("Done");
    info(strFmt("%1", i));

}

*****************************************************************


at

No comments:

Post a Comment

Subscribe to: Post Comments (Atom)

Repeat the heading to the next page in SSRS Reports: To repeat the table header in the next page, follow these steps: ⦁    Open the repo...