method GetDeductionStatusTranslation

function returns character

Parameters

icStatus	input	character
oiReturnStatus	output	integer	Return status of the method.

Internal usage

QadFinancials

method BDInvoice.UpdateDeductionForBouncedDDoc

program code (program6/bdinvoice.p)

assign vcDeductionStatus = "":U.
assign vcInvoiceDeductionStatus ={&INVOICEDEDUCTSTATUSS}.
do viA = num-entries(vcInvoiceDeductionStatus, chr(2)) to 1 by -2:
    if entry(viA, vcInvoiceDeductionStatus, chr(2)) = icStatus
    then do:
        assign vcDeductionStatus = entry(viA - 1, vcInvoiceDeductionStatus, chr(2)).
        leave.
    end.
end.

return vcDeductionStatus.