project QadFinancials > class BPaymentCondition > method ApiLoadPaymentConditionCalcPayConCode
function returns character
Description
return code by ID
Parameters
iiPaymentConditionId | input | integer | |
Internal usage
QadFinancials
program code (program9/bpaymentcondition.p)
define variable oiReturnStatus as integer no-undo.
if iiPaymentConditionId = ? or
iiPaymentConditionId = 0
then return "":U.
<Q-1 run PaymentConditionByIdCode (all) (Read) (NoCache)
(input iiPaymentConditionId, (PaymentConditionId)
input '':U, (PaymentConditionCode)
output dataset tqPaymentConditionByIdCode) in BPaymentCondition >
find first tqPaymentConditionByIdCode where
tqPaymentConditionByIdCode.tiPaymentCondition_ID = iiPaymentConditionId
no-error.
return if available tqPaymentConditionByIdCode
then tqPaymentConditionByIdCode.tcPaymentConditionCode
else "":U.