project QadFinancials > class BBillSchedule > method ValidateCompnentDayRange

validation procedure


Parameters


iiTargetFieldinputintegerValue of the business field to validate.
icTargetFieldNameinputcharacterName of the business field to validate.
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


QadFinancials
method BBillSchedule.ValidateComponentPost


program code (program3/bbillschedule.p)

if iiTargetField < 0 or
   iiTargetField > 31
then do:
    <M-83 run SetMessage
       (input  trim(substitute(#T-14'Specify a value from 0 to 31 for the day (&1). 0 indicates that the day is blank.':255(557519022)T-14#, iiTargetField)) (icMessage), 
        input  '':U (icArguments), 
        input  icTargetFieldName (icFieldName), 
        input  string(iiTargetField) (icFieldValue), 
        input  'E':U (icType), 
        input  3 (iiSeverity), 
        input  ? (icRowid), 
        input  'qadfin-425253':U (icFcMsgNumber), 
        input  '':U (icFcExplanation), 
        input  '':U (icFcIdentification), 
        input  '':U (icFcContext), 
        output viFcReturnSuper (oiReturnStatus)) in BBillSchedule>
    assign oiReturnStatus = -1.
end.