Routine: HLCSORAT

Package	Total	Caller Graph
Health Level Seven	1	HL CUSTOM REPORT (NEW)

Entry Points

Name	Comments	DBIA/ICR reference
STAT
PROMPT	; Find out how user wants report done
ERR
NEXT	; PRINT THE DATA
START	; Main Entry point
REPORT	; Output data after gathering
END	; ; Clean up. Kill the ^TMP and other assorted variables.
OPEN	; Open a device
QUEUED	; If queued, set up and kick in TASKMAN

Name	Field # of Occurrence
^%ZIS	OPEN+1
HOME^%ZIS	START+6
^%ZISC	END+5
^%ZTLOAD	QUEUED+1
^DIC	PROMPT+9
$$GET1^DID	PROMPT+18, ERR+11
^DIR	REPORT+7, PROMPT+5, PROMPT+14, ERR+6, STAT+6
^HLCSORA1	REPORT+3
^HLCSORA2	NEXT+1

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: REPORT+6
Function Call: WRITE	Prompt: !,"No data found for this request" Line Location: NEXT+2
Function Call: WRITE	Prompt: !!,$S($D(ZTSK):"Request Queued",1:"Request Cancelled") Line Location: QUEUED+2
Routine Call	%ZIS Line Location: START+6
Routine Call	DIC Line Location: PROMPT+9
Routine Call	DIR Line Location: REPORT+7 PROMPT+5 PROMPT+14 ERR+6 STAT+6
Routine Call	%ZIS Line Location: OPEN+1

FileNo	Call Tags
^HLCS(870 - [#870]	Classic Fileman Calls
870.019	GET1^DID

Name	Line Occurrences (* Changed, ! Killed)
^TMP("HLCSORAT"	END+2!

Name	Field # of Occurrence
%ZIS	START+2~, OPEN+1*
CODES	START+2~, PROMPT+18, PROMPT+19, ERR, ERR+11, ERR+12, STAT
DIC	START+1~, PROMPT+9*!
DIC(0	PROMPT+9*
DIR	START+1~, REPORT+7!, PROMPT+14!, ERR+6!, STAT+6!
DIR("?"	ERR+3, ERR+4, ERR+5, STAT+3, STAT+4, STAT+5
DIR("A"	PROMPT+3, PROMPT+14, ERR+1, STAT+1
DIR("B"	PROMPT+4, PROMPT+14, ERR+2, STAT+2
DIR(0	REPORT+7, PROMPT+2, PROMPT+13, ERR, STAT*
DIRUT	REPORT+7, END+4!
DTOUT	START+2~, START+4, PROMPT+6, PROMPT+10, ERR+9, STAT+9
DUOUT	START+2~, START+4, PROMPT+6, PROMPT+10, ERR+9, STAT+9
FOO	START+2~, PROMPT+19, PROMPT+20, ERR+12, ERR+13
HLAAA	START+1~, REPORT+6*
HLDONE	START+2~, REPORT+5
HLERR	START+1~, START+3, ERR+1, ERR+2, ERR+7, ERR+8*, ERR+9, STAT+11
HLLL	START+1~, PROMPT+1, PROMPT+11
HLQUEUE	START+1~, PROMPT+15, PROMPT+17
HLSORT	START+1~, STAT+11*
HLSTAT	START+1~, START+3, STAT+1, STAT+2, STAT+7, STAT+8*, STAT+9, STAT+11
HLTMP	START+2~, PROMPT+19, ERR+12
HLZ	START+1~, REPORT+1*, REPORT+4, NEXT+2, END+4!
IO	START+7
IO("Q"	START+6
IOSL	REPORT+6
IOST	REPORT+7
LINE	START+1~, START+3*
POP	START+1~, START+5
SET	START+2~, PROMPT+18, PROMPT+20, ERR+8, ERR+11, ERR+13, STAT+8
X	START+1~, PROMPT+9*
Y	START+1~, START+4, REPORT+7, PROMPT+7, PROMPT+8, PROMPT+9, PROMPT+11, PROMPT+12, PROMPT+15, PROMPT+16 , ERR+7, ERR+8, ERR+9, ERR+10, STAT+7, STAT+8, STAT+9*, STAT+10
>> ZTDESC	QUEUED+1*
>> ZTQUEUED	END+3
>> ZTREQ	END+3*
>> ZTRTN	QUEUED+1*
>> ZTSAVE("HLLL"	QUEUED+1*
>> ZTSAVE("HLQUEUE"	QUEUED+1*
>> ZTSAVE("HLSORT"	QUEUED+1*
ZTSK	QUEUED+2, QUEUED+3!