AX2012 Import Ledger Journal Trans from CSV

Smaple code to import Ledger Journal Trans from CSV file.

Before doing this code, I have created parm Method of LedgerJournaTable which have LedgerJournalTable record with journal Num.

Please change the Container positions according to your file in createJournalTrans method.



class NavisionPayrollImportDialog extends RunBaseBatch
{
    DialogRunbase                               dialog;
    DialogField                                 dialogFilename;
    DialogField                                 dialogPostingdate;

    Filename                                    filename;
    TransDate                                   postingdate;
    LedgerJournalId                             journalId;
    LedgerJournalTable                          ledgerJournalTable;

    LedgerJournalEngine                         journalEngine;

    #define.CurrentVersion(2)
    #localmacro.CurrentList
        filename,
        postingdate
    #endmacro
}

//Parm method that stores Ledger Journal Table

public LedgerJournalTable  parmParmLedgerJournalTable(LedgerJournalTable  _parmLedgerJournalTable = ledgerJournalTable)
{
    ledgerJournalTable    = _parmLedgerJournalTable;
    return ledgerJournalTable;
}

// Main Method

public static void main(Args args)
{
    NavisionPayrollImportDialog  navisionPayrollImportDialog;
    ledgerJournalTrans             localJournalTrans;
    ;
    navisionPayrollImportDialog =NavisionPayrollImportDialog::construct();

    if(args.dataset() ==tableNum(LedgerJournalTrans))
    {
       localJournalTrans=args.record();
       navisionPayrollImportDialog.parmParmLedgerJournalTable(localJournalTrans.ledgerJournalTable());
    }

    if (navisionPayrollImportDialog.prompt())
    {
        navisionPayrollImportDialog.run();
    }
}



// Run Method where it initiates Import functionality
public void run()
{
    if(this.validate())
    {
        journalEngine = new LedgerJournalEngine();
        journalEngine.ledgerJournalTable(ledgerJournalTable);
        this.importPayrollFromNavision();
    }
}


private void importPayrollFromNavision()
{
    AsciiIo                    csvFile;
    container                  readCon;
    AxLedgerJournalTrans        journalTrans;
    LedgerJournalACType         accountType;
    #File
    ;
    try
    {
        new FileIOPermission(filename, #io_read).assert();
        csvFile = new AsciiIo(filename,#io_read);
        CodeAccessPermission::revertAssert();
        csvFile.inFieldDelimiter(',');
        csvFile.inRecordDelimiter(#delimiterCRLF);
        if (csvFile)
        {
            while (csvFile.status() == IO_Status::OK)
            {
                readCon = csvFile.read();
                if (readCon)
                {
                    this.createJournalTrans(readCon);
                }
            }//while close

        }// if csv file close

    }
    catch (Exception::Deadlock)
    {
        retry;
    }
    catch(Exception::Error)
    {
       throw error(strFmt("File Read Error,fileName:%1",filename));
    }
    csvFile.finalize();

}// method close

// create the journal Trans.

private void createJournalTrans(container   _c)
{
    LedgerJournalTrans      ledgerJournalTrans;

    LedgerAccountContract   ledgerAccountContract;
    DimensionStorage        dimensionStorage;
    AxLedgerJournalTrans    axJournalTrans;
    DimensionAttributeValueContract attributeValueContract;

    str                     acType;
    MainAccountNum          mainAccount;
    Amount                  amount;
    str                     department;

    mainaccount                     = strLRTrim(conPeek(_c,5));
    if(mainAccount::findByMainAccountId(mainaccount).RecId>0)
    {
        journalEngine.initValue(ledgerJournalTrans);
        ledgerJournalTrans.Company        = curext();
        if(strLRTrim(conPeek(_c,12))=="")
        {
            ledgerJournalTrans.CurrencyCode   = CompanyInfo::standardCurrency();
        }
        else
        {
            ledgerJournalTrans.CurrencyCode =strLRTrim(conPeek(_c,11));
        }
        ledgerJournalTrans.initForCurrency(ledgerJournalTable);

        ledgerAccountContract = new LedgerAccountContract();
        ledgerAccountContract.parmValues(new List(Types::Class));

        axJournalTrans = new AxLedgerJournalTrans();
        axJournalTrans.ledgerJournalTrans(ledgerJournalTrans);
        axJournalTrans.parmJournalNum(ledgerJournalTable.JournalNum);
        axJournalTrans.parmTransDate(postingdate);
        axJournalTrans.parmDocumentDate(str2Date(conPeek(_c,7),321));
        axJournalTrans.parmAccountType(LedgerJournalACType::Ledger);
        axJournalTrans.parmOffsetAccountType(LedgerJournalACType::Ledger);
        axJournalTrans.parmTxt(strLRTrim(conPeek(_c,10)));
        amount = str2num(conPeek(_c,13));

        if (amount > 0)
            axJournalTrans.parmAmountCurDebit(amount / 100);
        else
            axJournalTrans.parmAmountCurCredit(amount / 100);

        department = strLRTrim(conPeek(_c,14));

        ledgerAccountContract.parmMainAccount(mainAccount);
        if (department)
        {
            attributeValueContract = new DimensionAttributeValueContract();
            attributeValueContract.parmName("@SYS850");
           attributeValueContract.parmValue(department);

            ledgerAccountContract.parmValues().addEnd(attributeValueContract);
        }

        dimensionStorage = DimensionServiceProvider::buildDimensionStorageForLedgerAccount(ledgerAccountContract);

        axJournalTrans.parmLedgerDimension(dimensionStorage.save());

        axJournalTrans.currentRecord().insert();
    }
    else
    {
        info(strFmt("Main Account Id is Not available %1",mainaccount));
    }

}