I have created vendor payment journal posting code and after running it show following message "Number of vouchers posted to the journal: 1" and i want to create vendor payment journal using x++ , i am posting may code below can anybody plz help as i am complete beginner to d365.
public static void main(Args _args)
{
VendTrans VendTrans,VendTransBank;
Ledgerjournalname ledgerjournalname;
LedgerjournalTable LedgerjournalTable;
LedgerjournalTrans LedgerjournalTrans;
LedgerjournalCheckPost LedgerjournalCheckPost;
NumberSeq numberSeq;
BanKACCOUNTTABLE BankAccountTable;
;
select firstOnly ledgerjournalname;
select firstOnly VendTrans where VendTrans.AccountNum == "1001";
select firstOnly VendTransBank where VendTrans.AccountNum == "1001";
select AccountID from BankAccountTable join VendTransBank where
BankAccountTable.AccountID == VendTransBank.CompanyBankAccountId
&& VendTransBank.AccountNum == "1001";
// create journal
ttsBegin;
LedgerjournalTable.JournalName = ledgerjournalname.JournalName;
LedgerjournalTable.initFromLedgerJournalName();
LedgerjournalTable.JournalNum = JournalTableData::newTable(LedgerjournalTable).nextJournalId();
LedgerjournalTable.insert();
ttsCommit;
ttsBegin;
// create journal Lines
numberSeq = NumberSeq::newGetVoucherFromId((ledgerjournalname.NumberSequenceTable));
LedgerjournalTrans.Voucher = numberSeq.voucher();
LedgerjournalTrans.JournalNum = LedgerjournalTable.JournalNum;
LedgerjournalTrans.CurrencyCode = "USD";
LedgerjournalTrans.ExchRate = Currency::checkExist(LedgerjournalTrans.CurrencyCode);
LedgerjournalTrans.AccountType = LedgerJournalACType::Vend;
LedgerjournalTrans.parmAccount(VendTrans.AccountNum,LedgerjournalTrans.AccountType);
LedgerjournalTrans.Txt = 'Vendor payment journal demo';
LedgerjournalTrans.AmountCurCredit = 1000;
LedgerjournalTrans.TransDate = systemDateGet();
LedgerjournalTrans.OffsetAccountType = LedgerJournalACType::Bank;
LedgerjournalTrans.offsetLedgerDimension= LedgerDynamicAccountHelper::getDynamicAccountFromAccountNumber(VendTransBank.CompanyBankAccountId, LedgerJournalACType::Bank);
LedgerjournalTrans.DefaultDimension = VendTrans::find(VendTrans.RecId).DefaultDimension;
LedgerjournalTrans.OffsetDefaultDimension = VendTrans::find(VendTrans.RecId).DefaultDimension;
LedgerjournalTrans.LedgerDimension = LedgerDynamicAccountHelper::getDynamicAccountFromAccountNumber(VendTrans.AccountNum, LedgerJournalACType::Vend);
LedgerjournalTrans.insert();
ttsCommit;
// posting
LedgerjournalCheckPost = LedgerjournalCheckPost::newLedgerJournalTable(LedgerjournalTable,NoYes::Yes);
LedgerjournalCheckPost.run();
}
}