Routine: BLRLOINC

Package	Total	Call Graph
Kernel	5	^%ZIS ^%ZISC ^%ZTLOAD $$HTE^XLFDT ($$CJ,$$LJ,$$TRIM,$$UP)^XLFSTR
IHS VA Utilities	3	^XBCLS ^XBFMK $$LOC^XBFUNC
VA Fileman	2	EN^DDIOL ^DIR
Registration	1	KVA^VADPT

Package

Total

Call Graph

Kernel

^%ZIS ^%ZISC ^%ZTLOAD $$HTE^XLFDT ($$CJ,$$LJ,$$TRIM,$$UP)^XLFSTR

IHS VA Utilities

^XBCLS ^XBFMK $$LOC^XBFUNC

VA Fileman

EN^DDIOL ^DIR

Registration

KVA^VADPT

Entry Points

Name	Comments	DBIA/ICR reference
COMLOINC	; EP - Compile Listing of Tests with LOINC Codes
REPORTIT	; EP
PRESSIT	; EP
EEP	; Ersatz EP
ADDLINE(ADDSTR,LN)	; EP
BUILDARY	; EP
BLREND	; EP
REPORT	; EP - Results
ADDLNCJ(MIDSTR,LN,LEFTSTR,RGHTSTR)	; EP
EP	; EP -- Main Entry Point
DQ	; EP

External References

Name	Field # of Occurrence
^%ZIS	REPORTIT+2
^%ZISC	REPORTIT+10, DQ+10, BLREND+3
^%ZTLOAD	REPORTIT+10
EN^DDIOL	DQ+6
^DIR	PRESSIT+4
KVA^VADPT	BLREND+4
^XBCLS	DQ+3
^XBFMK	PRESSIT+1
$$LOC^XBFUNC	BUILDARY+7
$$HTE^XLFDT	ADDLNCJ+5, ADDLNCJ+8
$$CJ^XLFSTR	ADDLNCJ+2
$$LJ^XLFSTR	ADDLINE+2
$$TRIM^XLFSTR	ADDLNCJ+11
$$UP^XLFSTR	ADDLNCJ+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: EEP+1
Function Call: WRITE	Prompt: ">>>>>>>>>>>>" Line Location: EEP+2
Function Call: WRITE	Prompt: " USE LABEL " Line Location: EEP+3
Function Call: WRITE	Prompt: "<<<<<<<<<<<<" Line Location: EEP+4
Function Call: WRITE	Prompt: !! Line Location: EEP+5
Function Call: WRITE	Prompt: !!,?10,"DEVICE could not be selected. Output will be to the screen.",!! Line Location: REPORTIT+4
Function Call: WRITE	Prompt: !,"Request ",$S($G(ZTSK):"Queued - Task #"_ZTSK,1:"NOT Queued"),!! Line Location: REPORTIT+11
Function Call: WRITE	Prompt: @IOF Line Location: DQ+4
Function Call: WRITE	Prompt: @IOF Line Location: BLREND+1
Routine Call	DIR Line Location: PRESSIT+4
Routine Call	%ZIS Line Location: REPORTIT+2

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	COMLOINC+2, COMLOINC+6, COMLOINC+11, COMLOINC+12

Label References

Name	Line Occurrences
ADDLINE	BUILDARY+13, BUILDARY+14, BUILDARY+15, BUILDARY+18, BUILDARY+19, BUILDARY+22, BUILDARY+23, BUILDARY+25, BUILDARY+26, BUILDARY+28 , BUILDARY+29, BUILDARY+31, BUILDARY+32, BUILDARY+35, BUILDARY+36
ADDLNCJ	BUILDARY+7, BUILDARY+8, BUILDARY+9, BUILDARY+10, BUILDARY+11
BLREND	REPORTIT+12
BUILDARY	REPORT+3
COMLOINC	EP+4
PRESSIT	REPORTIT+13, DQ+11
REPORT	EP+6
REPORTIT	REPORT+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	REPORTIT+1*
ADDSTR	ADDLINE~, ADDLINE+2
CNTLOINC	EP+1~, COMLOINC+1, COMLOINC+14, BUILDARY+3, BUILDARY+17, BUILDARY+25, BUILDARY+31, BUILDARY+35
CNTLT	EP+1~, COMLOINC+1, COMLOINC+3, BUILDARY+3, BUILDARY+14, BUILDARY+31, BUILDARY+34, BUILDARY+35
CNTZZ	EP+1~, COMLOINC+1, COMLOINC+6, BUILDARY+21, BUILDARY+22, BUILDARY+34, BUILDARY+35
>> DIR("A"	PRESSIT+2*
>> DIR(0	PRESSIT+3*
>> FLAG	COMLOINC+1, COMLOINC+10, COMLOINC+11, COMLOINC+12*, COMLOINC+14
IO	DQ+2
IO("Q"	REPORTIT+6
IOF	BLREND+1
IOM	BUILDARY+11, ADDLNCJ+2, ADDLNCJ+8, ADDLINE+2
IOST	DQ+3, BLREND+1
LEFTSTR	ADDLNCJ~, ADDLNCJ+5, ADDLNCJ+11
LN	REPORT+1~, BUILDARY+6, BUILDARY+7, BUILDARY+8, BUILDARY+9, BUILDARY+10, BUILDARY+11, BUILDARY+13, BUILDARY+14, BUILDARY+15 , BUILDARY+18, BUILDARY+19, BUILDARY+22, BUILDARY+23, BUILDARY+25, BUILDARY+26, BUILDARY+28, BUILDARY+29, BUILDARY+31, BUILDARY+32 , BUILDARY+35, BUILDARY+36, ADDLNCJ~, ADDLNCJ+1, ADDLNCJ+2, ADDLNCJ+5, ADDLNCJ+8, ADDLNCJ+11, ADDLINE~, ADDLINE+1* , ADDLINE+2
LRLRPT	REPORT+1~, DQ+6
LRLRPT(	ADDLNCJ+2, ADDLNCJ+5, ADDLNCJ+8, ADDLNCJ+11, ADDLINE+2*
MIDSTR	ADDLNCJ~, ADDLNCJ+2
NOLOINC	BUILDARY+1~, BUILDARY+3*, BUILDARY+28
>> POP	REPORTIT+3
PTRLOINC	EP+1~
QFLG	EP+2~
RGHTSTR	ADDLNCJ~, ADDLNCJ+8, ADDLNCJ+11
SITESPEC	EP+2~, COMLOINC+10, COMLOINC+11, COMLOINC+12
STR	EP+2~
TAB	REPORT+1~, BUILDARY+5*, BUILDARY+18, BUILDARY+22, BUILDARY+25, BUILDARY+28, BUILDARY+31, BUILDARY+35
>> TEST	COMLOINC+1, COMLOINC+2, COMLOINC+6, COMLOINC+11, COMLOINC+12
TFLAG	REPORT+1~
>> ZTDESC	REPORTIT+7*
>> ZTQUEUED	DQ+8, BLREND+2
>> ZTREQ	BLREND+2*
>> ZTRTN	REPORTIT+7*
>> ZTSAVE("CNT*"	REPORTIT+9*
>> ZTSAVE("LR*"	REPORTIT+8*
>> ZTSK	REPORTIT+11

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRLOINC

Information

Source Information

Call Graph

Call Graph Total: 11

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: