Parameters
icPaySelCode | input | character | |
oiPaySelLineCount | output | integer | |
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program1/bpaymentselection.p)
/* ====================================================================================== *
* Method : Get PaySel Line Count *
* Description : *
* -------------------------------------------------------------------------------------- *
* Parameters : icPaySelCode *
* oiPaySelLineCount *
* ====================================================================================== */
MAIN_BLOCK:
do on error undo, throw:
/* Default output parameters */
oiPaySelLineCount = 0.
/* Pre-validation block */
if icPaySelCode = ? or icPaySelCode= '':U then
return.
/* Execution block */
<Q-44 run GetPaySelLineByCode (all) (Read) (NoCache)
(input viCompanyId, (CompanyId)
input icPaySelCode, (PaySelCode)
output dataset tqGetPaySelLineByCode) in BPaymentSelection>
for each tqGetPaySelLineByCode:
assign oiPaySelLineCount = oiPaySelLineCount + 1.
end.
end. /* MAIN_BLOCK */