DG53742 ;ALB/TMK - DG*5.3*764 (formerly 742) Cleanup OEF/OIF site info; 01/10/2007
Source file <DG53742.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
POST | ; This routine was previously part of patch DG*5.3*742, now in *764
|
|
EP | ; Queue the conversion
|
|
EVC1 | ; Update the USE FOR Z07 CHECK field #6
; in the INCONSISTENT DATA ELEMENTS file #38.6 for CC 718 |
|
END | ; Post-install done
|
|
RUN | ; 'Live' entry point from taskman
|
|
TEST | ;entry point for test mode
|
|
QUE(NAMSPC,TESTING) | ;
|
|
SETUPX(NAMSPC,EXPDAYS) | ;
; requires EXPDAYS - # days to keep XTMP around |
|
LOOP(NAMSPC,TESTING) | ;
|
|
OEIF(NAMSPC,TESTING,LASTREC) | ;
|
|
CHKR(NAMSPC,TESTING,GBL,TOTPAT,TOTREC) | ;
|
|
UPDATEX(NAMSPC,TOTREC,LASTREC,TOTPAT) | ;
|
|
STATUS | ;display status of current run
|
|
STOP(NAMSPC) | ; returns stop flag
|
|
NAMSPC() | ;
|
|
MAIL(NAMSPC,TESTING) | ; mail stats
|
|
HDNG(NAMSPC,HTEXT,LIN,STAT,STIME,ETIME,TESTING) | ; build heading lines
|
|
SUMRY(LIN,TOTREC,TOTPAT) | ; build summary lines
|
|
BLDLINE(NAMSPC,TEXT,LIN) | ;build a single line in TMP msg global
|
|
MAILIT(HTEXT,NAMSPC) | ; send the msg
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|