Description
Updates records in BankNumber table.
Parameters
Internal usage
QadFinancials
program code (program1/bbanknumber.p)
/*load or create tBankNumber records based on Ref table*/
<M-11 run SetBankNumber
(input t_sBankNumberRef (t_sBankNumberRef),
input t_sBankNumberSectionRef (t_sBankNumberSectionRef),
output viFcReturnSuper (oiReturnStatus)) in BBankNumber>
if viFcReturnSuper <> 0
then do:
assign oiReturnStatus = -1.
return.
end.
/*validations*/
<M-7 run ValidateBC (output viFcReturnSuper (oiReturnStatus)) in BBankNumber>
assign oiReturnStatus = if (oiReturnStatus > 0 and
viFcReturnSuper = 0) or
oiReturnStatus < 0
then oiReturnStatus
else viFcReturnSuper.
<M-8 run AdditionalUpdates (output viFcReturnSuper (oiReturnStatus)) in BBankNumber>
assign oiReturnStatus = if (oiReturnStatus > 0 and
viFcReturnSuper = 0) or
oiReturnStatus < 0
then oiReturnStatus
else viFcReturnSuper.