Parameters
| iiDocID | input | integer | |
| olIsProcessed | output | logical | |
| oiReturnStatus | output | integer | |
Internal usage
QadFinancials
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.