Routine: HLDIEDB3

Information

HLDIEDB3 ;CIOFO-O/LJA - Debug Data Display Code ;12/29/03 10:39

Name	Comments	DBIA/ICR reference
JOB	; Display information by job#...
J1
J2
SHOWJOB	;
JOBSHOW(JOBNO)	;
LOADIT(NO)	; ; GBL -- req
EOR	;HLDIEDB3 - Direct 772 & 773 Sets DEBUG CODE ; 11/18/2003 11:17

Name	Line Occurrences
Function Call: READ	Formatting: !! Prompt: "Enter job#: " Variable: JOBNO Timeout: 99 Line Location: J2+0
Function Call: WRITE	Prompt: " invalid job#..." Line Location: J2+2
Function Call: WRITE	Prompt: !!,"Job",?C2,"Calls" Line Location: SHOWJOB+17
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("=",IOM) Line Location: SHOWJOB+18
Function Call: WRITE	Prompt: !,JOB,?C2 Line Location: SHOWJOB+24
Function Call: WRITE	Prompt: CALL Line Location: SHOWJOB+29
Function Call: READ	Variable: X Timeout: 60 Line Location: JOBSHOW+12
Function Call: READ	Formatting: ! Prompt: "Enter #: " Variable: NO Timeout: 99 Line Location: JOBSHOW+15