Routine: HLDIEDB3

Information

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

Package	Total	Call Graph
Health Level Seven	1	(EADTHD,INDIV,SHOWDTHD)^HLDIEDB0
Kernel	1	$$REPEAT^XLFSTR

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

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	JOB+3!, J2+1, SHOWJOB+12, SHOWJOB+13, SHOWJOB+21, SHOWJOB+26
^XTMP(	SHOWJOB+4, SHOWJOB+6, SHOWJOB+8, SHOWJOB+10, SHOWJOB+11

Name	Field # of Occurrence
ABORT	JOBSHOW+1~, JOBSHOW+7, JOBSHOW+8, JOBSHOW+12
C2	SHOWJOB+1~, SHOWJOB+15*, SHOWJOB+17, SHOWJOB+24, SHOWJOB+27, SHOWJOB+28
CALL	SHOWJOB+1~, SHOWJOB+7, SHOWJOB+8, SHOWJOB+10, SHOWJOB+11, SHOWJOB+12, SHOWJOB+13, SHOWJOB+25, SHOWJOB+26, SHOWJOB+27 , SHOWJOB+29
CONT	JOBSHOW+1~, JOBSHOW+7, JOBSHOW+12
CT	SHOWJOB+1~, SHOWJOB+3, SHOWJOB+12, SHOWJOB+20, SHOWJOB+22, SHOWJOB+23, JOBSHOW+1~, JOBSHOW+7, JOBSHOW+11, JOBSHOW+12
DATA	SHOWJOB+1~, SHOWJOB+11, SHOWJOB+12, SHOWJOB+13, LOADIT+2, LOADIT+3, LOADIT+4
DATE	SHOWJOB+1~, SHOWJOB+5*
>> FILE	JOBSHOW+10, LOADIT+3*
GBL	JOBSHOW+1~, JOBSHOW+3*, JOBSHOW+8, LOADIT+2
HLDIE	SHOWJOB+1~, SHOWJOB+3*, SHOWJOB+4
>> IEN	JOBSHOW+10, LOADIT+3*
IOM	SHOWJOB+18, SHOWJOB+27
JOB	SHOWJOB+1~, SHOWJOB+5, SHOWJOB+6, SHOWJOB+8, SHOWJOB+10, SHOWJOB+11, SHOWJOB+12, SHOWJOB+13, SHOWJOB+20, SHOWJOB+21 , SHOWJOB+24, SHOWJOB+26
JOBNO	JOB+1~, J2*, J2+1, J2+4, JOBSHOW~, JOBSHOW+3, JOBSHOW+10, JOBSHOW+17
>> LDT	JOBSHOW+10, JOBSHOW+17, LOADIT+3*
LOC	SHOWJOB+11, JOBSHOW+1~, JOBSHOW+10, JOBSHOW+17, LOADIT+4
LOOP	SHOWJOB+1~, SHOWJOB+3, SHOWJOB+4, SHOWJOB+5, SHOWJOB+6, SHOWJOB+8, SHOWJOB+10, SHOWJOB+11
NO	SHOWJOB+1~, SHOWJOB+9, SHOWJOB+10, SHOWJOB+11, SHOWJOB+13, JOBSHOW+1~, JOBSHOW+7, JOBSHOW+8, JOBSHOW+9, JOBSHOW+10 , JOBSHOW+14, JOBSHOW+15*, JOBSHOW+16, LOADIT~, LOADIT+2
>> RTN	JOBSHOW+10, JOBSHOW+17, LOADIT+2*
U	J2, JOBSHOW+12, JOBSHOW+15, LOADIT+3, LOADIT+4
>> X	JOBSHOW+12*