Here is the adapted example for posting a ledger journal line. Simply replace values between #s (#value#):
static void ExampleLedgerJournal(Args _args) { LedgerJournalTable ledgerJournalTable; LedgerJournalTrans ledgerJournalTrans; LedgerJournalCheckPost ledgerJournalCheckPost; NumberSeq numberSeq; ; ttsbegin; // Journal name ledgerJournalTable.JournalName = "#JOURNALNAME#"; // ex. Daily, daytrans, etc. ledgerJournalTable.initFromLedgerJournalName(); ledgerJournalTable.Name = "#DESCRIPTION#"; // description for this journal ledgerJournalTable.insert(); // Voucher numberSeq = NumberSeq::newGetVoucherFromCode(LedgerJournalName::find(ledgerJournalTable.JournalName).VoucherSeries); ledgerJournalTrans.Voucher = numberSeq.voucher(); // Lines ledgerJournalTrans.JournalNum = ledgerJournalTable.JournalNum; ledgerJournalTrans.CurrencyCode = CompanyInfo::standardCurrency(); ledgerJournalTrans.ExchRate = Currency::exchRate(ledgerJournalTrans.CurrencyCode); ledgerJournalTrans.AccountNum = "#ACCOUNT#"; ledgerJournalTrans.AccountType = LedgerJournalACType::Ledger; ledgerJournalTrans.AmountCurDebit = #VALUE#; ledgerJournalTrans.TransDate = systemDateGet(); //Avoid the Today function ledgerJournalTrans.OffsetAccount = "#OFFSET ACCOUNT#"; ledgerJournalTrans.Txt = "#TXT#"; ledgerJournalTrans.insert(); //Posting the Journal ledgerJournalCheckPost = LedgerJournalCheckPost::newLedgerJournalTable(ledgerJournalTable, NoYes::Yes); ledgerJournalCheckPost.run(); ttscommit; }
没有评论:
发表评论