PSUCP ;BIR/TJH,PDW - PBM CONTROL POINT ; 06/08/07
Source file <PSUCP.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
MANUAL | ; entry point for manual option
|
|
MANUALQ | ||
AUTO | ; set variables for Auto-report option and task to background
|
|
AUTOQ | ||
RUN | ; run each selected module
|
|
; print hard copy if requested
|
||
PRINTQ | ||
EXIT | ; exit point
|
|
PUT | ; put variables in ^XTMP so modules can retrieve them
|
|
PUTQ | ||
PULL | ; pull variables from ^XTMP
; PSUJOB must exist and must be the job number used to store the data desired for this session. |
|
PULLQ | ||
OPTS | ; set option array
|
|
OPTSQ | ||
CONFIRM | ;Send confirmation by Division(s)
|
|
CONFIRMQ | ||
XMD | ;Email
|
|
XMDQ | ||
TIMING | ; Timing report
|
|
TIMINGQ | ||
LEAPYR(FMYR) | ; Check to see if year is a leap year: 1=leap year, 0=not leap year
|