project QadFinancials > class BCPay > method ValCInvoiceId
validation procedure
Parameters
icTargetField | input | character | Value of the business field to validate. |
icTargetFieldName | input | character | Name of the business field to validate. |
icRowid | input | character | Contents of field tc_Rowid, if the target field is a field of a component temp-table. |
ilCInvoiceIsInitialStatus | input | logical | |
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program4/bcpay.p)
if ilCInvoiceIsInitialStatus = true
then do:
<M-1 run SetMessage
(input #T-2'The invoice you selected has a status of Initial.':60(68832)t-2# (icMessage),
input ' ':U (icArguments),
input icTargetFieldName (icFieldName),
input icTargetField (icFieldValue),
input 'E':U (icType),
input 3 (iiSeverity),
input icRowid (icRowid),
input 'QadFin-7853':U (icFcMsgNumber),
input ' ':U (icFcExplanation),
input ' ':U (icFcIdentification),
input ' ':U (icFcContext),
output viFcReturnSuper (oiReturnStatus)) in BCPay>
assign oiReturnStatus = -1.
end.