method GetOpeningBalanceVoucher

Description

Return Opening Balance Vouchers (only need to be called when consecutive numbering is active)

Parameters

tDIOpenBalance	input-output	temp-table
oiReturnStatus	output	integer	Return status of the method.

Internal usage

QadFinancials

method BDInvoice.ApiCreateDebtorInvoicesV01

program code (program6/bdinvoice.p)

assign oiReturnStatus    = -98
       viLocalReturnStatus = 0.
       
for each tDInvoice:
    find tDIOpenBalance where
         tDIOpenBalance.tiInvoiceId = tDInvoice.DInvoice_ID
         no-error.
    if available tDIOpenBalance
    then assign tDIOpenBalance.tiInvoiceVoucher = tDInvoice.DInvoiceVoucher.
end. /* for each tDInvoice */    
       
assign oiReturnStatus = viLocalReturnStatus.