static void THK_importLedgerJournalTrans(Args _args)

{

    Filename                          fileName = "C:\\Users\\ksiu3880\\Desktop\\GL Journal test.xlsx";

    LedgerJournalId                   ledgerJournalId = "000425_010";

    Name                              nameDimensionAttribute1 = "Department";

    Name                              nameDimensionAttribute2 = "CostCenter";

    Name                              nameDimensionAttribute3 = "ExpensePurpose";

    LedgerJournalTrans_Asset          ledgerJournalTrans_Asset;

    AxLedgerJournalTable              axLedgerJournalTable;

    AxLedgerJournalTrans              axLedgerJournalTrans;

    DimensionAttributeValueSetStorage dimensionAttributeValueSetStorage;

    SysExcelApplication               application = SysExcelApplication::construct();

    SysExcelWorkbooks                 workbooks = application.workbooks();

    SysExcelWorkbook                  workbook;

    SysExcelWorksheets                worksheets;

    SysExcelWorksheet                 worksheet;

    SysExcelCells                     cells;

    COMVariantType                    type;

    TransDate                         transDate;

    LedgerJournalACType               ledgerJournalACType, ledgerJournalACTypeOffset;

    MainAccountNum                    mainAccountNum, mainAccountNumOffset;

    DimensionValue                    dimensionValue1, dimensionValue2, dimensionValue3;

    LedgerJournalTransTxt             ledgerJournalTransTxt;

    CurrencyCode                      currencyCode;

    AmountCur                         amountCur;

    ExchRate                          exchRate, exchRateSecond;

    InvoiceId                         invoiceId;

    DocumentDate                      documentDate;

    DueDate                           dueDate;

    PaymTermId                        paymTermId;

    AssetTransTypeJournal             assetTransTypeJournal;

    AssetBookIdPurchSalesInvent       assetBookIdPurchSalesInvent;

    container                         con, conOffset;

    int                               numOfDimension;

    int                               row = ;

    setPrefix("THK_importLedgerJournalTrans");

    try

    {

        if (!LedgerJournalTable::checkExist(ledgerJournalId))

            throw Exception::Error;

        workbooks.open(fileName);

        workbook   = workbooks.item();

        worksheets = workbook.worksheets();

        worksheet  = worksheets.itemFromNum();

        cells      = worksheet.cells();

        ttsBegin;

        do

        {

            row++;

            print row;

            setPrefix(strFmt("Row %1", row));

            transDate                   = cells.item(row, ).value().date();

            mainAccountNum              = strLRTrim(cells.item(row, ).value().bStr());

            dimensionValue1             = strLRTrim(cells.item(row, ).value().bStr());

            dimensionValue2             = strLRTrim(cells.item(row, ).value().bStr());

            dimensionValue3             = strLRTrim(cells.item(row, ).value().bStr());

            ledgerJournalTransTxt       = strLRTrim(cells.item(row, ).value().bStr());

            currencyCode                = strLRTrim(cells.item(row, ).value().bStr());

            amountCur                   = cells.item(row, ).value().double();

            exchRate                    = cells.item(row, ).value().double();

            exchRateSecond              = cells.item(row, ).value().double();

            invoiceId                   = strLRTrim(cells.item(row, ).value().bStr());

            documentDate                = cells.item(row, ).value().date();

            dueDate                     = cells.item(row, ).value().date();

            paymTermId                  = strLRTrim(cells.item(row, ).value().bStr());

            assetBookIdPurchSalesInvent = strLRTrim(cells.item(row, ).value().bStr());

            mainAccountNumOffset        = strLRTrim(cells.item(row, ).value().bStr());

            switch (strLRTrim(cells.item(row, ).value().bStr()))

            {

                case "Bank":         ledgerJournalACType = ledgerJournalACType::Bank;        break;

                case "Customer":     ledgerJournalACType = ledgerJournalACType::Cust;        break;

                case "Fixed Assets": ledgerJournalACType = ledgerJournalACType::FixedAssets; break;

                case "Ledger":       ledgerJournalACType = ledgerJournalACType::Ledger;      break;

                case "Project":      ledgerJournalACType = ledgerJournalACType::Project;     break;

                case "Vendor":       ledgerJournalACType = ledgerJournalACType::Vend;        break;

                default:             ledgerJournalACType = ledgerJournalACType::Ledger;      break;

            }

            switch (strLRTrim(cells.item(row, ).value().bStr()))

            {

                case "Acquisition":            assetTransTypeJournal = AssetTransTypeJournal::Acquisition;    break;

                case "Acquisition Adjustment": assetTransTypeJournal = AssetTransTypeJournal::AcquisitionAdj; break;

                default:                       assetTransTypeJournal = AssetTransTypeJournal::Acquisition;    break;

            }

            switch (strLRTrim(cells.item(row, ).value().bStr()))

            {

                case "Bank":         ledgerJournalACTypeOffset = ledgerJournalACType::Bank;        break;

                case "Customer":     ledgerJournalACTypeOffset = ledgerJournalACType::Cust;        break;

                case "Fixed Assets": ledgerJournalACTypeOffset = ledgerJournalACType::FixedAssets; break;

                case "Ledger":       ledgerJournalACTypeOffset = ledgerJournalACType::Ledger;      break;

                case "Project":      ledgerJournalACTypeOffset = ledgerJournalACType::Project;     break;

                case "Vendor":       ledgerJournalACTypeOffset = ledgerJournalACType::Vend;        break;

                default:             ledgerJournalACTypeOffset = ledgerJournalACType::Ledger;      break;

            }

            axLedgerJournalTrans              = new AxLedgerJournalTrans();

            con                               = [mainAccountNum, mainAccountNum];

            conOffset                         = [mainAccountNumOffset, mainAccountNumOffset];

            dimensionAttributeValueSetStorage = new DimensionAttributeValueSetStorage();

            numOfDimension                    = ;

            if (dimensionValue1)

            {

                con            += [nameDimensionAttribute1, dimensionValue1];

                conOffset      += [nameDimensionAttribute1, dimensionValue1];

                numOfDimension ++;

                dimensionAttributeValueSetStorage.addItem(DimensionAttributeValue::findByDimensionAttributeAndValue(DimensionAttribute::findByName(nameDimensionAttribute1), dimensionValue1));

            }

            if (dimensionValue2)

            {

                con            += [nameDimensionAttribute2, dimensionValue2];

                conOffset      += [nameDimensionAttribute2, dimensionValue2];

                numOfDimension ++;

                dimensionAttributeValueSetStorage.addItem(DimensionAttributeValue::findByDimensionAttributeAndValue(DimensionAttribute::findByName(nameDimensionAttribute2), dimensionValue2));

            }

            if (dimensionValue3)

            {

                con            += [nameDimensionAttribute3, dimensionValue3];

                conOffset      += [nameDimensionAttribute3, dimensionValue3];

                numOfDimension ++;

                dimensionAttributeValueSetStorage.addItem(DimensionAttributeValue::findByDimensionAttributeAndValue(DimensionAttribute::findByName(nameDimensionAttribute3), dimensionValue3));

            }

            con       = conIns(con, , numOfDimension);

            conOffset = conIns(conOffset, , numOfDimension);

            axLedgerJournalTrans.parmJournalNum(ledgerJournalId);

            axLedgerJournalTrans.parmTransDate(transDate);

            axLedgerJournalTrans.parmAccountType(ledgerJournalACType);

            axLedgerJournalTrans.parmLedgerDimension(AxdDimensionUtil::getMultiTypeAccountId(enumNum(LedgerJournalACType), ledgerJournalACType, con));

            axLedgerJournalTrans.parmTxt(ledgerJournalTransTxt);

            axLedgerJournalTrans.parmCurrencyCode(currencyCode);

            axLedgerJournalTrans.parmExchRate(exchRate * );

            axLedgerJournalTrans.parmPaymId(num2str(exchRateSecond, , , , ));

            axLedgerJournalTrans.parmInvoice(invoiceId);

            axLedgerJournalTrans.parmDocumentDate(documentDate);

            axLedgerJournalTrans.parmDue(dueDate);

            axLedgerJournalTrans.parmPayment(paymTermId);

            if (ledgerJournalACType != LedgerJournalACType::Ledger)

                axLedgerJournalTrans.parmDefaultDimension(dimensionAttributeValueSetStorage.save());

            if (amountCur >= )

                axLedgerJournalTrans.parmAmountCurDebit(amountCur);

            else

                axLedgerJournalTrans.parmAmountCurCredit(-amountCur);

            if (mainAccountNumOffset)

            {

                axLedgerJournalTrans.parmOffsetAccountType(ledgerJournalACTypeOffset);

                axLedgerJournalTrans.parmOffsetLedgerDimension(AxdDimensionUtil::getMultiTypeAccountId(enumNum(LedgerJournalACType), ledgerJournalACTypeOffset, conOffset));

                if (ledgerJournalACTypeOffset != LedgerJournalACType::Ledger)

                    axLedgerJournalTrans.parmOffsetDefaultDimension(dimensionAttributeValueSetStorage.save());

            }

            axLedgerJournalTrans.save();

            if (axLedgerJournalTrans.ledgerJournalTrans().isFixedAssetsTransaction())

            {

                ledgerJournalTrans_Asset.clear();

                ledgerJournalTrans_Asset.initValue();

                ledgerJournalTrans_Asset.RefRecId  = axLedgerJournalTrans.ledgerJournalTrans().RecId;

                ledgerJournalTrans_Asset.AssetId   = axLedgerJournalTrans.ledgerJournalTrans().getAssetId();

                ledgerJournalTrans_Asset.Company   = axLedgerJournalTrans.ledgerJournalTrans().getAssetCompany();

                ledgerJournalTrans_Asset.TransType = assetTransTypeJournal;

                ledgerJournalTrans_Asset.BookId    = assetBookIdPurchSalesInvent;

                if (!ledgerJournalTrans_Asset.validateWrite())

                    throw Exception::Error;

                ledgerJournalTrans_Asset.insert();

            }

            type = cells.item(row + , ).value().variantType();

        }

        while (type != COMVariantType::VT_EMPTY);

        ttsCommit;

    }

    catch (Exception::Error)

    {

    }

    application.quit();

}