project QadFinancials > class BPaymentSelection > method ValidateCDocumentDueDate


Parameters


itCDocumentDueDateinputdate
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


QadFinancials
method BPaymentSelection.AdditionalUpdatesRegister


program code (program5/bpaymentselection.p)

if itCDocumentDueDate = ?
then do:
   assign vcMessage = trim(#T-1'The system cannot set the due date for the supplier payment.':100(16120)t-1#)
          oiReturnStatus = -1.

     <M-2 run SetMessage
        (input  vcMessage (icMessage), 
         input  '':U (icArguments), 
         input  '':U (icFieldName), 
         input  '':U (icFieldValue), 
         input  'E':U (icType), 
         input  3 (iiSeverity), 
         input  '':U (icRowid), 
         input  'QadFin-6516':U (icFcMsgNumber), 
         input  '':U (icFcExplanation), 
         input  '':U (icFcIdentification), 
         input  '':U (icFcContext), 
         output viFcReturnSuper (oiReturnStatus)) in BPaymentSelection>
end.