BatchBannerEndScript = AOR_POSTB

BEGINSUB AOR_POSTB
*	------------------------------------------------------
*	End Batch
*	Any necessary clean-up. 
*	------------------------------------------------------
    IF #AOR_Debug 
       RPLogMsg(NL() & "  ** AOR_POSTB:" & NL() )
    END 
    
    #AOR_Debug = GETINIBOOL(,PRINTERID(),"AORDebug")
    #AOR_Processed = #AOR_Processed
    #AOR_Count = #AOR_Count
    #AOR_PerBatch = #AOR_PerBatch     AOR_BatchDir = AOR_BatchDir
    AOR_TableName = AOR_TableName
    
    IF (#AOR_DoEOB = 1 AND #AOR_Count > 0) 
        DBCLOSE(AOR_TableName)
        CALL("AOR_EOB")
        #AOR_Count = 0
    END
ENDSUB