BYEV7.MAC/-AU=BYE.MAC -2,2 .IDENT -V7.02- ; [SMT842] -72 ; SMT814 12-APR-82 ADDED ACCOUNTING SYSTEM VERSION 7 SUPPORT ; ; SMT842 13-APR-83 ADDED BATCH SYSTEM VERSION 3 SUPPORT -83 .IF DF AA$BV3 ; [SMT842] BATDV$ ; [SMT842] .ENDC ; [SMT842] -101,101 MSG1B: .ASCIZ /XXXXXX/ ; [SMT814] -105,105 MSG5: .ASCIZ <15>/Go to bed, you deserve a rest/ ; [SMT814] -185 .IF DF,AA$BV3 ; [SMT842] $BATCH::.WORD 0 ; [SMT842] .ENDC ; [SMT842] -224 .IF DF,AA$BV3 ; [SMT842] MOV U.DCB(R0),R0 ; POINT TO DCB ; [SMT842] CMP D.NAM(R0),BATDEV ; BATCH JOB? ; [SMT842] BNE 2011$ ; IF NE NO ; [SMT842] INC $BATCH ; YES, SET FLAG ; [SMT842] 2011$: MOV UCB,R0 ; RESTORE UCB ADDRESS ; [SMT842] .ENDC ; DF,AA$BV3 ; [SMT842] ; [SMT842] -331,331 BYE1: ; [SMT814] .IF DF AA$ACC ; ; [SMT814] CALL $GBLOG ; GET LOG...'S TCB ADDRESS ; [SMT 814] .ENDC ; DF AA$ACC ; ; [SMT814] CALL LGOLOG ; LOG LOGOUT ON CO: ; [SMT814] -340 .IF DF AA$ACC ; ; [SMT814] CALL $RQBYE ; DO ACCOUNTING PROCESSING ; [SMT814] .ENDC ; DF AA$ACC ; ; [SMT814] -344 .IF DF,AA$BV3 ; [SMT842] TST $BATCH ; VERSION 3 BATCH JOB? ; [SMT842] BNE 195$ ; IF NE YES, SKIP MESSAGES ; [SMT842] .ENDC ; DF,AA$BV3 ; [SMT842] -381,381 195$: ; [SMT814] .IF DF AA$ACC ; ; [SMT814] CALL $FINBY ; FINISH ACCOUNTING.PROCESSING ; [SMT814] .ENDC ; DF AA$ACC ; ; [SMT814] -585 .IF DF,AA$BV3 ; [SMT842] TST $BATCH ; VERSION 3 BATCH JOB? ; [SMT842] BNE 10$ ; IF NE YES, DON'T PRINT COMMAND LINE .ENDC ; DF,AA$BV3 ; [SMT842] /