idTargetField | input | decimal | Value of the field to validate. |
icTargetFieldName | input | character | Name of the field to validate. Use the database field name or public data item name. Example : 'Order.Order-Num'. |
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. |
if (idTargetField < 0 or idTargetField > 100) then do: assign oiReturnStatus = -1 vcMessage = trim(substitute(#T-3'The value of &1 must be between 0 and 100. The current value of &3 is &2.':250(59799)t-3#, trim(icTargetFieldName), trim(string(idTargetField)),trim(icTargetFieldName))). <M-1 run SetMessage (input vcMessage (icMessage), input '':U (icArguments), input icTargetFieldName (icFieldName), input string(idTargetField) (icFieldValue), input 'E':U (icType), input 3 (iiSeverity), input icRowid (icRowid), input 'QADFIN-131':U (icFcMsgNumber), input '' (icFcExplanation), input '' (icFcIdentification), input '' (icFcContext), output viFcReturnSuper (oiReturnStatus)) in BPaymentCondition> end.