Create and Post GL Journal - mulit line voucher

Hi,
The below job is used to create General journal (multiline voucher -> debit and credit in different line) and post it. 


static void CreateGLJournalPost_multiLine(Args _args)
{
  AxLedgerJournalTable journalTable; // class

AxLedgerJournalTrans journalTrans; // class

container acctPattern;

container offSetAcctPattern;

LedgerJournalTable ledgerJournalTable; // table

ledgerJournalCheckPost ledgerJournalCheckPost;// table
 
 
;
  journalTable = new AxLedgerJournalTable();

journalTrans = new AxLedgerJournalTrans();

//Journal Name

journalTable.parmJournalName("GenJrn");
 

journalTable.save();
  //Debit line
 
 
journalTrans.parmJournalNum(journalTable.ledgerJournalTable().JournalNum);  journalTrans.parmTransDate(systemDateGet());

journalTrans.parmCurrencyCode("AED");

journalTrans.parmAmountCurDebit(1200); 
 

journalTrans.parmAccountType(LedgerJournalACType::Ledger);  
acctPattern = ["1101001-Disp","1101001", 1, "Worker","000005"]; 
journalTrans.parmLedgerDimension(AxdDimensionUtil::getLedgerAccountId(acctPattern));

//if LeadgerJournalACType::Vend - use below code
/*
journalTrans.parmAccountType(LedgerJournalACType::Vend);
journalTrans.parmLedgerDimension(DimensionStorage::getDynamicAccount(_vendAccount,LedgerJournalACType::Vend));*/
journalTrans.save();
  //credit line 1

journalTrans = new AxLedgerJournalTrans();
 

journalTrans.parmJournalNum(journalTable.ledgerJournalTable().JournalNum);  journalTrans.parmTransDate(systemDateGet());

journalTrans.parmCurrencyCode("AED");

journalTrans.parmAmountCurCredit(700);
 

journalTrans.parmAccountType(LedgerJournalACType:: Ledger );  acctPattern = ["1121002-Disp","1121002", 1, "Worker","000038"];
 

journalTrans.parmLedgerDimension(AxdDimensionUtil::getLedgerAccountId(acctPattern));

journalTrans.save();
  //credit line 2

journalTrans = new AxLedgerJournalTrans();
 

journalTrans.parmJournalNum(journalTable.ledgerJournalTable().JournalNum);  journalTrans.parmTransDate(systemDateGet());

journalTrans.parmCurrencyCode("AED");

journalTrans.parmAmountCurCredit(500);
 

journalTrans.parmAccountType(LedgerJournalACType:: Ledger );  acctPattern = ["1121002-Disp","1121002", 1, "Worker","11234"];
 

journalTrans.parmLedgerDimension(AxdDimensionUtil::getLedgerAccountId(acctPattern));

journalTrans.save();


ledgerJournalCheckPost = ledgerJournalCheckPost::newLedgerJournalTable(journalTable.ledgerJournalTable(),NoYes::Yes);

ledgerJournalCheckPost.run();
  info(strFmt("Journal No. %1.", journalTable.ledgerJournalTable().JournalNum));
 

}
 

Comments

Post a Comment

Popular posts from this blog

x++ code to Generate cheque for vendor payment journal

Hi, X++ code to generate check (cheque) from Vendor payment journal (generate payments). Note: In the Method of payment field, select a method of payment that uses the Check export file format. //*********************************** /*To print check     1) PaymMode - must be filled in LedgerJournalTrans (in paymMode = export format to be check)     2) OffsetAccountType = Bank in LedgerJournalTrans     3) Generate Payment dialog, bank account = Offset Bank account in LedgerJournalTrans*/ //************************************* static void GenerateCheque_VendorPayment(Args _args) {     LedgerJournalTrans      LedgerJournalTrans = LedgerJournalTrans::findRecId(5637186584, true);     VendSumForPaym          vendSumForPaym;     boolean              ...
Read more

Copy favorites From one user to another user - Ax 2012

Hi, The below job is used to copy the favorites from one user to another user. static void CopyFavoritesJob(Args _args) { SysPersonalization FromSysPersonalization; SysPersonalization ToSysPersonalization; UserId FromUserId= 'user01' ; UserId ToUserId= 'user03' ; ; ttsbegin ; // step 1 - delete current favorites menu from user while select forupdate ToSysPersonalization where ToSysPersonalization.ElementType==UtilElementType::UserMenu && ToSysPersonalization.UserId==ToUserId { ToSysPersonalization.doDelete(); } // step 2 - duplicate from user01 while select FromSysPersonalization where FromSysPersonalization.UserId==FromUserId && FromSysPersonalization.ElementType==UtilElementType::UserMenu { ToSysPersonalization.data(FromSysPersonalization); ToSysPersonalization.UserId=ToUserId; ToSysPersonalization.doInsert(); } ttscommit...
Read more

Import Procurement Hierarchy / Categories with out code in ax 2012

Hi, To build the procurement category in ax 2012, we are going to use the " EcoResCategoryImportService ". This service is available in the standard ax box. In this article, interest thing is how to build the XML file from EXCEL. I love that. (It is easy to build the xml file, if we know this way) Please refer the link below for the detailed document, http://www.junctionsolutions.com/dynamicsax/loading-a-merchandising-hierarchy-with-no-programming/ Create XML from Excel. https://www.youtube.com/watch?v=9h7TW--M8BU Note: Before import, you must enable the " Execute business operations in CIL" in this path, File > Tools > Options > Development > General > Execute business operations in CIL Thanks, Vijaykarthik
Read more