| iiTargetField | input | integer | 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. |
| oiReturnStatus | output | integer | Return status of the method. |
QadFinancials
/* ValIntNotNULL: Validation-method that raises an error in case the integer-field has the NULL value */
if iiTargetField = ?
then do :
<M-3 run SetMessage
(input #T-28'This field cannot have the unknown-value.':255(133401422)T-28# (icMessage),
input '' (icArguments),
input icTargetFieldName (icFieldName),
input '' (icFieldValue),
input 'E':U (icType),
input 3 (iiSeverity),
input icRowid (icRowid),
input 'qadfin-852205':U (icFcMsgNumber),
input '' (icFcExplanation),
input '' (icFcIdentification),
input '' (icFcContext),
output oiReturnStatus (oiReturnStatus)) in database>
assign oiReturnStatus = -1.
end. /* if iiTargetField = ? */