project QadFinancials > class BBankImportLine > method CheckIfDocumentIsProcessed


Parameters


iiDocIDinputinteger
olIsProcessedoutputlogical
oiReturnStatusoutputinteger


Internal usage


QadFinancials
method BBankImportLine.GetCDocumentByBankImpLine


program code (program1/bbankimportline.p)

/**********************************************************************/
/*  This method will check whether the document was processed earlier */
/**********************************************************************/

assign oiReturnStatus = -98.

assign olIsProcessed = false.

If iiDocID <> ? and
   iiDocID <> 0 
then do:
    find first tProcessedDocumentId where tProcessedDocumentId.tiProcessedDocID = iiDocID
    no-error.
    
    if available tProcessedDocumentId
    then assign olIsProcessed = true.
    else assign olIsProcessed = false.

end. /*If iiDocID <> ? and */ 

/* =================================================================================================== */
/* Return                                                                                              */
/* =================================================================================================== */
if oiReturnStatus = -98 then assign oiReturnStatus = 0.