Generate new voucher by code
NumberSeq _numberSeq;
LedgerJournalTrans_LedgerJournalTrans;
;
_NumberSeq=NumberSeq::newGetVoucherFromCode(LedgerJournalName::find( _LedgerJournalTable.JournalName).VoucherSeries);
_LedgerJournalTrans.Voucher=_NumberSeq.voucher();