project QadFinancials > class BDInvoice > method CreateDIPostingSetMessage

Description

SetMessage for CreateCIPosting -> Used to save some space in original method. (Progress-limitation)


Parameters


icMessageinputcharacterMessage
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


QadFinancials
method BDInvoice.CreateDIPosting
method BDInvoice.CreateDIPostingSales


program code (program6/bdinvoice.p)

<M-1 run SetMessage (input  icMessage (icMessage),
                     input  '':U (icArguments),
                     input  '':U (icFieldName),
                     input  '':U (icFieldValue),
                     input  'E':U (icType),
                     input  3 (iiSeverity),
                     input  '':U (icRowid),
                     input  'QADFIN-1256':U (icFcMsgNumber),
                     input  '' (icFcExplanation),
                     input  '' (icFcIdentification),
                     input  '' (icFcContext),
                     output oiReturnStatus (oiReturnStatus)) in BDInvoice>
<I-2 {bFcCloseInstance
            &CLASS           = "BJournalEntry"}>