Routine: LRHY4X

Package	Total	Call Graph
VA Fileman	3	^%DT ^DIC ^DIR
Kernel	2	^%ZISC $$CJ^XLFSTR
Lab Service	2	IO^LRWU ($$Y2K,PT)^LRX
Registration	1	(,INP)^VADPT

Package	Total	Caller Graph
Lab Service	1	LRHY PATIENT WAIT TIME

Entry Points

Name	Comments	DBIA/ICR reference
DISP	;
HEAD	;
PAT	;
G	;
STUCK
CHK	;
MEDIAN	;
LRO69	;
Q	;
START	;
DONE	;
IN	;
DEVICE	;
BAK
TIC

External References

Name	Field # of Occurrence
^%DT	G+10, G+15
^%ZISC	DISP+64
^DIC	PAT+6
^DIR	DISP+63, CHK+8
IO^LRWU	DEVICE+3
$$Y2K^LRX	HEAD+3
PT^LRX	IN+22
^VADPT	PAT+9
INP^VADPT	PAT+9
$$CJ^XLFSTR	HEAD+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,+$E(LRD,1,2),?4,$E(PNM,1,14)," ",LRSSN,?25,"BLD",?30,LRARIVE,?37,LRDRAW,?44,LRTAT Line Location: DISP+30
Function Call: WRITE	Prompt: ?49,LRTECH Line Location: DISP+31
Function Call: WRITE	Prompt: "*" Line Location: DISP+32
Function Call: WRITE	Prompt: ! Line Location: DISP+33
Function Call: WRITE	Prompt: ?56,LRAC1 Line Location: DISP+34
Function Call: WRITE	Prompt: ?73,$E($P(LRN,U,8),1,7) Line Location: DISP+35
Function Call: WRITE	Prompt: !!,?10,"Mean TAT: " Line Location: DISP+39
Function Call: WRITE	Prompt: ?35,$P(LRTOTAL/LRHYCT,".")_"."_$E($P(LRTOTAL/LRHYCT,".",2),1,1),?41 Line Location: DISP+40
Function Call: WRITE	Prompt: ?41," Minutes" Line Location: DISP+41
Function Call: WRITE	Prompt: !,?10,"Total Time: ",?35,LRTOTAL,?41," Minutes" Line Location: DISP+42
Function Call: WRITE	Prompt: !,?10,"Total Patients Drawn: ",?35,LRHYCT,! Line Location: DISP+43
Function Call: WRITE	Prompt: !,?15,"TAT > 7 minutes: ",LR7MORE Line Location: DISP+44
Function Call: WRITE	Prompt: !,?15,"TAT < 7 minutes: ",LR7LESS Line Location: DISP+45
Function Call: WRITE	Prompt: !,?15,"TAT = 7 minutes: ",LR700 Line Location: DISP+46
Function Call: WRITE	Prompt: !,?5,"Collectors: " Line Location: DISP+50
Function Call: WRITE	Prompt: !,?10,$P(^VA(200,LRHYTECH,0),U) Line Location: DISP+61
Function Call: WRITE	Prompt: ?40,LRHYCTC,?45," Drawn" Line Location: DISP+62
Function Call: WRITE	Prompt: !,?10,"Median TAT:",?35,LRX3 Line Location: TIC+20
Function Call: WRITE	Prompt: @IOF Line Location: HEAD+2
Function Call: WRITE	Prompt: "Date:",$$Y2K^LRX(DT)," ",$$CJ^XLFSTR("PATIENT WAIT TIME",IOM) Line Location: HEAD+3
Function Call: WRITE	Prompt: !,"Time",?5,"Patient Name",?25,"Type",?30,"Arrive" Line Location: HEAD+4
Function Call: WRITE	Prompt: ?37,"Drawn",?44,"TAT",?49,"TECH",?57,"ACCN" Line Location: HEAD+5
Function Call: WRITE	Prompt: ?73,"Clinic" Line Location: HEAD+6
Function Call: WRITE	Prompt: !,?10,"Median TAT:",?35,LRX3 Line Location: DONE+11
Routine Call	DIC Line Location: PAT+6
Routine Call	DIR Line Location: DISP+63 CHK+8

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	PAT+8
^LRHY(69.87 - [#69.87]	Q+8, Q+10, Q+12, IN+1, IN+6, IN+7, IN+8, IN+32
^LRO(68 - [#68]	Q+13, Q+14, Q+15, Q+16, IN+5, IN+21, IN+24, IN+25, IN+26, IN+28 , IN+29
^TMP("LRHYCOLLECTOR"	G+3!, G+21!, IN+30, IN+36, DISP+26, DISP+52, DISP+54
^TMP("LRHYMEDFINAL"	G+20!, MEDIAN+4!, BAK+1, BAK+2, TIC+3, TIC+4, TIC+11, TIC+13, DONE+3, DONE+5
^TMP("LRHYMEDTAT"	G+1!, G+20!, DISP+37, MEDIAN+2, STUCK!, STUCK+1, STUCK+3, STUCK+4, TIC, TIC+5! , TIC+7!, TIC+8
^TMP("LRHYTATDALLAS"	G+5!, G+21!, IN+40*, DISP+12, DISP+14
^VA(200 - [#200]	DISP+61

Label References

Name	Line Occurrences
BAK	TIC+8
CHK	DISP+28
DEVICE	G+19
DISP	Q+18
DONE	STUCK+1
HEAD	Q+4, CHK+4, CHK+10
IN	Q+17
MEDIAN	DISP+41
TIC	TIC+6

Naked Globals

Name	Field # of Occurrence
^(	DISP+14, TIC

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	G+7!, G+8*
%DT("A"	G+9, G+14
>> DFN	PAT+7*, PAT+8
>> DIC	PAT+4*
>> DIC(0	PAT+5*
DIR	DISP+63!, CHK+8!
DIR(0	DISP+63, CHK+8
>> DIRUT	CHK+9
DT	HEAD+3
>> DUOUT	CHK+9
IO	Q+1, DISP+5
IOF	HEAD+2
IOM	HEAD+3
IOSL	CHK+2
IOST	DISP+63, CHK+3, CHK+7
LR334	MEDIAN+1~, MEDIAN+2
>> LR3D	IN+10, IN+11, IN+12*, IN+16
>> LR3T	IN+13, IN+14, IN+15*, IN+16
>> LR6987	IN+1*, IN+6, IN+7, IN+8, IN+32
>> LR700	DISP+9, DISP+24, DISP+46
>> LR7LESS	DISP+8, DISP+23, DISP+45
>> LR7MORE	DISP+7, DISP+22, DISP+44
>> LRAA	Q+14*, Q+15, Q+16, IN+5, IN+21, IN+24, IN+25, IN+26, IN+28, IN+29
>> LRAANAME	IN+26*
>> LRAC1	IN+24, IN+25, IN+40, DISP+25*, DISP+34
>> LRACCTM	IN+6*, IN+13, IN+18
>> LRAD	Q+15*, Q+16, IN+5, IN+21, IN+24, IN+25, IN+28, IN+29
>> LRAN	Q+16*, IN+5, IN+21, IN+24, IN+25, IN+28, IN+29
LRARIVE	IN+4!, IN+8, IN+18, IN+40, DISP+20*, DISP+30
>> LRD	DISP+6, DISP+12, DISP+14, DISP+30
LRDFN	PAT+8, IN+20!, IN+21
LRDPF	IN+22!
>> LRDRAW	IN+17, IN+40, DISP+16, DISP+17*, DISP+30
>> LRDRAW1	Q+7, Q+8, Q+10, IN+10, IN+17
>> LRDUP	STUCK, STUCK+3*, TIC+5
LRE	DISP+10~, DISP+13, DISP+14, DISP+15, DISP+26, DISP+37
>> LREDT	G+17*, Q+8
>> LREND	PAT+3, Q+2, IN+3*
LREXLINE	DISP+10~, DISP+27*, DISP+29!, CHK+4, CHK+6
>> LRHYCT	DISP+4, DISP+36, DISP+38, DISP+40, DISP+43, DISP+47*
>> LRHYCT3	MEDIAN+6, BAK+2, STUCK+2, TIC+3, TIC+9, TIC+12, TIC+14, TIC+15, DONE+1, DONE+4 , DONE+6, DONE+7
>> LRHYCTC	DISP+58, DISP+60, DISP+62
LRHYTECH	IN+31!, IN+32, IN+35, IN+36, DISP+53, DISP+54, DISP+55, DISP+56, DISP+57, DISP+59 , DISP+61
LRHYTECH1	G+6!
LRHYTECH1(	DISP+55*, DISP+57, DISP+59
>> LRKIL	BAK, TIC+1, TIC+2, TIC+5, TIC+7
>> LRLINE	CHK+2*, CHK+4, CHK+6
>> LRLLOC	IN+28*, IN+40
>> LRM1	STUCK+3, STUCK+4, TIC+2, TIC+4
>> LRM2	TIC*, TIC+2
>> LRM3	BAK*
>> LRN	DISP+14*, DISP+16, DISP+17, DISP+18, DISP+19, DISP+20, DISP+21, DISP+25, DISP+35
>> LRN5	DISP+51, DISP+52, DISP+54, DISP+55
LRNCOL	IN+9!, IN+30
>> LRNONONO	BAK*
>> LRNOT	TIC+2, TIC+4, TIC+6*
>> LRODT	G+13*, Q+7
>> LRORDT	IN+5*, IN+30, IN+36, IN+40
>> LRSC0	IN+29*
>> LRSDT	G+12*, G+13
>> LRSN	Q+5, IN+5, IN+30, IN+36, IN+40, DISP+15*
>> LRSSN	IN+23, IN+40, DISP+19, DISP+30
>> LRSTAR	Q+3, IN+38, IN+40
>> LRSTOP	Q+6, Q+8, DISP+28, HEAD+1, CHK+1, CHK+9*
>> LRSTUCK	MEDIAN+3, BAK+2, STUCK*
>> LRT0	DISP+58, DISP+59
>> LRTAT	IN+16, IN+40, DISP+21, DISP+22, DISP+23, DISP+24, DISP+30, DISP+36, DISP+37
LRTATN	MEDIAN+5!
LRTATN(	TIC+14, TIC+18, TIC+19, DONE+6, DONE+9, DONE+10
LRTECH	DISP+10~, DISP+26*, DISP+27, DISP+31, DISP+33
>> LRTKX	IN+7*, IN+35
>> LRTOTAL	DISP+3, DISP+36, DISP+40, DISP+42
>> LRUID	Q+9, Q+10, Q+12*, Q+13, Q+14, Q+15, Q+16, IN+1, IN+30, IN+36 , IN+40
>> LRX	BAK, STUCK+3, TIC, TIC+1, TIC+2, TIC+5, TIC+6, TIC+10, TIC+11, TIC+13 , TIC+15, TIC+16, TIC+17, TIC+19, DONE+2, DONE+3, DONE+5, DONE+7, DONE+8, DONE+10
>> LRX1	TIC+17, TIC+18, DONE+8, DONE+9
>> LRX2	TIC+17, TIC+18, DONE+8, DONE+9
>> LRX3	TIC+18, TIC+19, TIC+20, DONE+9, DONE+10, DONE+11
>> LRY	TIC+3*, TIC+4
>> LRYTAT	TIC+13, TIC+14, DONE+5, DONE+6
>> PNM	IN+40, DISP+18*, DISP+30
>> SSN	IN+23
U	IN+5, IN+25, IN+26, IN+28, IN+29, IN+30, IN+36, IN+40, DISP+15, DISP+17 , DISP+18, DISP+19, DISP+20, DISP+21, DISP+25, DISP+35, DISP+61
>> Y	G+11, G+12, G+16, G+17, PAT+7
>> ZTRTN	DEVICE+1*

Customize PDF page

Package: Lab Service

Routine: LRHY4X

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: