Wednesday, January 18, 2023

CSVFileImport

/// <summary> 

/// HSMCSVFileClass 

/// </summary> 

internal final class HSMCSVFileClass 

{ 

    /// <summary> 

    /// csvfile reading. 

    /// </summary> 

    /// <param name = "_args">main</param> 

    static void main(Args _args) 

    { 

        #File 

        int           i; 

        IO           io; 

        FilenameOpen filename = @"C:\Users\Adminef18e7a1b0\Desktop\BCITrans.csv"; 

        Container    record; 

        HSMInboundBCITrans      hsminboundbcitrans; 

        ; 

  

        io = new CommaTextIo(filename, #IO_Read); 

  

        if (!io || io.status() != IO_Status::Ok) 

        { 

            throw error("no file"); 

        } 

  

  

        while (io.status() == IO_Status::Ok) 

        { 

            record = io.read(); 

  

            if (!i) 

            { 

                i++; 

  

                continue; 

            } 

  

            if (conLen(record)) 

            { 

              

                hsminboundbcitrans.Status = conpeek (record, 1); 

                hsminboundbcitrans.DocumentDate =any2Date(conpeek (record, 2)); 

                hsminboundbcitrans.DocumentNumber = conpeek(record, 3); 

                hsminboundbcitrans.LineItemNumber = conpeek (record, 4); 

                hsminboundbcitrans.ChargedTax = any2real(conpeek (record, 5)); 

                hsminboundbcitrans.TaxAreaId = conpeek (record, 6); 

                hsminboundbcitrans.TaxAreaId2 = conpeek (record, 7); 

                hsminboundbcitrans.TotalLineItemTax = any2Real(conpeek (record, 8)); 

                hsminboundbcitrans.CombinedRate = any2Real(conpeek (record, 9)); 

                hsminboundbcitrans.ErrorText = conpeek (record, 10); 

                hsminboundbcitrans.TotalCountryTax= any2Real(conpeek (record, 11)); 

                hsminboundbcitrans.TotalMainDivisionTax = any2Real(conpeek (record, 12)); 

                hsminboundbcitrans.TotalSubDivisionTax = any2Real(conpeek (record, 13)); 

                hsminboundbcitrans.TotalCityTax= any2Real(conpeek (record, 14)); 

                hsminboundbcitrans.TotalDistrictTax = any2Real(conpeek (record, 15)); 

                hsminboundbcitrans.TeleCommIncludedTax = any2Real(conpeek (record, 16)); 

                hsminboundbcitrans.RootException = conpeek (record, 17); 

                hsminboundbcitrans.ProjectId = conpeek (record, 19); 

                hsminboundbcitrans.State = conpeek (record, 19); 

                hsminboundbcitrans.insert(); 

            } 

            i++; 

        } 

    } 

No comments:

Post a Comment

My Requirement is Delete option in Vendor Master for all roles except System Administrator

   [FormControlEventHandler(formControlStr(VendParameters, VendParameters_YNV_VendorMasterDeletionOption), FormControlEventType::Modified)] ...