Routine: LRHYT1

Package	Total	Call Graph
Lab Service	3	BUILD^LRHYT2 NINE^LRHYU ^LRHYU4
VA Fileman	3	NOW^%DTC ^DIC ^DIR
Kernel	1	$$CJ^XLFSTR
Registration	1	(,INP)^VADPT

Package	Total	Caller Graph
Lab Service	1	LRHYF1

Entry Points

Name	Comments	DBIA/ICR reference
CONTROL	;
END	;
EDIT	;
SINGLE	; ; This block calls up the testing demographics.
TECH	;
TIME	;
LEFTOVER	;
CHECK	;
FINDER	;

External References

Name	Field # of Occurrence
NOW^%DTC	SINGLE+9
^DIC	FINDER+4, TECH+11, TIME+7
^DIR	SINGLE+27
BUILD^LRHYT2	SINGLE+16, SINGLE+17
NINE^LRHYU	TECH+1
^LRHYU4	SINGLE+7
^VADPT	TIME+10
INP^VADPT	TIME+10
$$CJ^XLFSTR	CONTROL+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF Line Location: CONTROL+4
Function Call: WRITE	Prompt: !,$$CJ^XLFSTR("Barcode Specimen Processor",IOM) Line Location: CONTROL+5
Function Call: WRITE	Prompt: !!,"Please swipe your ID badge: " Line Location: TECH+1
Function Call: WRITE	Prompt: Y Line Location: TECH+12
Function Call: WRITE	Prompt: !! Line Location: SINGLE+3
Function Call: WRITE	Prompt: !,"Doesn't exist." Line Location: SINGLE+20
Function Call: WRITE	Prompt: @IOF Line Location: SINGLE+31
Function Call: WRITE	Prompt: !,$S($D(^LAB(62.05,+LRURG,0)):$P(^(0),U),1:"")," " Line Location: SINGLE+38
Function Call: WRITE	Prompt: !,"Please start over..." Line Location: SINGLE+43
Routine Call	DIC Line Location: FINDER+4 TECH+11 TIME+7
Routine Call	DIR Line Location: SINGLE+27

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	TIME+9
^LAB(62.05 - [#62.05]	SINGLE+38
^LRO(68 - [#68]	SINGLE+10, SINGLE+11, SINGLE+12, SINGLE+17, SINGLE+20, SINGLE+23, SINGLE+24, SINGLE+30, SINGLE+34, SINGLE+35 , EDIT+1, EDIT+2
^TMP("LRHYHOW1"	SINGLE+13, SINGLE+14
^VA(200 - [#200]	TECH+17

Label References

Name	Line Occurrences
CONTROL	CONTROL+13, TECH+15
EDIT	SINGLE+40
END	CONTROL+11, SINGLE+44
SINGLE	CONTROL+12, SINGLE+20
TECH	CONTROL+10, TECH+3

Naked Globals

Name	Field # of Occurrence
^(0	SINGLE+30, SINGLE+38

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	SINGLE+13
>> DFN	TIME+8*, TIME+9
DIC	CONTROL+8!, FINDER+1, TECH+7!, TECH+9, TIME+5*
DIC("A"	FINDER+3*
DIC(0	FINDER+2, TECH+10, TIME+6*
DIE	CONTROL+8!
DIR	CONTROL+8!, SINGLE+27!
DIR(0	SINGLE+27*
IOF	CONTROL+4, SINGLE+31
IOM	CONTROL+5
>> LR3ODT	SINGLE+23*
>> LR3SN	SINGLE+24*
LRAA	CONTROL+1!, SINGLE+10, SINGLE+11, SINGLE+12, SINGLE+17, SINGLE+20, SINGLE+23, SINGLE+24, SINGLE+30, SINGLE+34 , SINGLE+35, END+1!, EDIT+1, EDIT+2
>> LRACC	SINGLE+4*
LRAD	CONTROL+1!, SINGLE+10, SINGLE+11, SINGLE+12, SINGLE+17, SINGLE+20, SINGLE+23, SINGLE+24, SINGLE+30, SINGLE+34 , SINGLE+35, END+1!, EDIT+1, EDIT+2
LRAN	CONTROL+1!, SINGLE+8, SINGLE+10, SINGLE+11, SINGLE+12, SINGLE+15, SINGLE+17, SINGLE+20, SINGLE+23, SINGLE+24 , SINGLE+30, SINGLE+34, SINGLE+35, END+1!, EDIT+1, EDIT+2
LRARIVE	CONTROL+1!, CONTROL+8!, END+1!
LRBLOOD	CONTROL+1!, END+1!
LRCE	CONTROL+1!, SINGLE+11, SINGLE+16, SINGLE+17, SINGLE+18!, END+1!
LRCENO	SINGLE+17!*, SINGLE+18
LRDAT	CONTROL+1!, SINGLE+30*, END+1!
LRDFN	CONTROL+1!, TIME+9, END+1!, EDIT+1
LRDLA	CONTROL+2!, END+2!
LRDLC	CONTROL+2!, END+2!
LRDPF	CONTROL+2!, END+2!
LRDRAW	CONTROL+2!, CONTROL+8!, END+2!
LRDT0	CONTROL+2!, END+2!
LRDTO	CONTROL+2!, END+2!
LREND	CONTROL+9, TIME+4, SINGLE+43!
LRHYDUZ	CONTROL+2!, TECH+16, TECH+17, END+2!
LRHYNISH	CONTROL+2!, END+2!
LRHYTECH	TECH+7!, TECH+16*, SINGLE+13
LRIDT	CONTROL+1!, END+1!, EDIT+2*
LRIDTNEW	SINGLE+43!
LRKUNKE	SINGLE+22!
>> LRORDT1	SINGLE+12*, SINGLE+13, SINGLE+14
LRPRAC	CONTROL+2!, END+2!
LRSN	CONTROL+3!, SINGLE+30*, END+3!
LRTEST	CONTROL+3!, SINGLE+26, SINGLE+34, SINGLE+35, END+3!
>> LRUID	SINGLE+10*, SINGLE+13, SINGLE+14
>> LRUNC	SINGLE+29*
LRURG	CONTROL+3!, SINGLE+35*, SINGLE+38, END+3!
PNM	CONTROL+3!, END+3!
SSN	CONTROL+3!, END+3!
U	CONTROL+11, TECH+2, TECH+14, TECH+17, SINGLE+10, SINGLE+12, SINGLE+13, SINGLE+14, SINGLE+23, SINGLE+24 , SINGLE+30, SINGLE+35, SINGLE+38, EDIT+1, EDIT+2
VADM	CONTROL+3!, END+3!
VAIN	CONTROL+3!, END+3!
>> X	CONTROL+11, CONTROL+12, TECH+2, TECH+3, TECH+14
Y	TECH+8!, TECH+12, TECH+15, TECH+16, TIME+8

Customize PDF page

Package: Lab Service

Routine: LRHYT1

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: