method ValidateComponentPaySelPayCode

Description

Validate the Payment Format Header Attributes

Parameters

oiReturnStatus

output

integer

Return status of the method.

Internal usage

QadFinancials

method BDPaymentSelection.ValidateComponent

program code (program3/bdpaymentselection.p)

for each t_sDPaySelPayCode where
         t_sDPaySelPayCode.tc_status = "N":U or 
         t_sDPaySelPayCode.tc_status = "C":U:
    assign vhFcComponent = ?.
    <M-30 run ValidatePayCode
       (input  t_sDPaySelPayCode.PayFormatGroup_ID (iiPayFormatGroupId), 
        input  t_sDPaySelPayCode.PayFormatCode_ID (iiPayFormatCodeId), 
        input  t_sDPaySelPayCode.DPaySelPayCodeValue (icPayCodeValue), 
        input  true (ilCheckMandatory), 
        input  0 (iiYear), 
        input  ? (icDaybook), 
        input  ? (iiVoucherNumber), 
        output viFcReturnSuper (oiReturnStatus)) in BPaymentFormat>

    if viFcReturnSuper < 0 or oiReturnStatus  = 0
    then assign oiReturnStatus = viFcReturnSuper.
end.