PSGPL0 ;BIR/CML3 - GETS UNITS COUNT FOR PSGPL & PSGPEN ;29 OCT 96 / 8:31 PM
Source file <PSGPL0.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;
|
|
DONE | ||
RUN | ; quit if fill on request prn or stop date not found
|
|
ENIV | ;*** Entry to be called from ^PSGMIV (24 HOUR MAR IV).
|
|
MN | ; if only minutes (MN) are found
|
|
TSFMN | ;if admin times exist and minutes#1440=0
|
|
TS | ; admin times
|
|
TS1 | ||
MWF | ; schedule in form of WD-WD-WD@TS
|
|
ADD | ; ST=start date/time AM=minutes (+ or -) X=new date/time
|
|
SETMN | ; Set MN for PRN orders
|
|
QUIT | ||
DW | ;
|
|
DWC | ||
ENCHK | ;
|