Routine: QAMAUTO4

Information

QAMAUTO4 ;HISC/DAD-AUTO ENROLL RERUN FOR A DATE RANGE ;5/26/93 09:25

Name	Comments	DBIA/ICR reference
EN
OK	;
MON
SRV
DATE	; *** CALLED HERE BY QAOAUTO - OS/3 'RERUN' AUTO ENROLL
ZTDTH
RPT
QUEUE	;
ENTSK	;
EXIT	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!?3,"**********************************************************************",7,!?3,"* Auto enroll has found important site parameters to be missing *" Line Location: EN+1
Function Call: WRITE	Prompt: !?3,"* Use the 'Site Parameters Edit' option to enter the necessary data ",!?3,"*********************************************************************",7 Line Location: EN+2
Function Call: WRITE	Prompt: !!?5,"Please answer Y(es) or N(o)" Line Location: MON+0
Function Call: WRITE	Prompt: !!,"* No monitors selected ",7 Line Location: MON+1
Function Call: WRITE	Prompt: !!?5,"Please answer Y(es) or N(o)" Line Location: SRV+0
Function Call: WRITE	Prompt: !!,"* No services selected ",7 Line Location: SRV+1
Function Call: WRITE	Prompt: !!,"Enter the date range you want auto enroll to scan" Line Location: DATE+1
Function Call: WRITE	Prompt: !!?5,"* Start and end dates must be T-1 or earlier ",!,7 Line Location: DATE+2
Function Call: WRITE	Prompt: " ??",*7,!!?5,"Queueing time must be between ",$E(QAMQBEG,1,4)," and ",$E(QAMQEND,1,4),! Line Location: ZTDTH+2
Function Call: WRITE	Prompt: !!,"Queueing auto enroll, please wait" Line Location: ZTDTH+3
Function Call: WRITE	Prompt: !!?5,"Please answer Y(es) or N(o)" Line Location: RPT+0
Function Call: WRITE	Prompt: "." Line Location: QUEUE+1