Routine: LRPHLIS1

Package	Total	Call Graph
Lab Service	2	($$URGA,BARID,GO,LBLTYP,LRBAR,PSET,UID)^LRLABLD PT^LRX
Registration	1	KVA^VADPT

Package	Total	Caller Graph
Lab Service	1	LRPHLIST

Entry Points

Name	Comments	DBIA/ICR reference
HEAD
B5
REM
S7
B6
B7
L6
L7
L4
L5
L2
L3
L1	;
WARDHD	;
LRTOP

External References

Name	Field # of Occurrence
$$URGA^LRLABLD	WARDHD+13
BARID^LRLABLD	WARDHD+12
GO^LRLABLD	B7+2
LBLTYP^LRLABLD	B5+4, WARDHD+10
LRBAR^LRLABLD	B5+5, WARDHD+11
PSET^LRLABLD	L1+1
UID^LRLABLD	WARDHD+12
PT^LRX	L4+3
KVA^VADPT	L1+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?5,$S(LRRB=0:"",1:LRRB),?15,$E(PNM,1,28) Line Location: L6+1
Function Call: WRITE	Prompt: " INF WARN: ",LRINFW Condition for execution: $L(LRINFW) Line Location: L6+1
Function Call: WRITE	Prompt: ?45,SSN,?60,"Order #: ",LRORD Line Location: L6+1
Function Call: WRITE	Prompt: !!?5,$S(LRRB=0:"",1:LRRB),?15,$E(PNM,1,28) Line Location: L6+3
Function Call: WRITE	Prompt: " INF WARN: ",LRINFW Condition for execution: $L(LRINFW) Line Location: L6+3
Function Call: WRITE	Prompt: ?45,HRCN,?60,"Order #: ",LRORD Line Location: L6+3
Function Call: WRITE	Prompt: !!?5,$S(LRRB=0:"",1:LRRB),?15,$E(PNM,1,28) Line Location: L6+4
Function Call: WRITE	Prompt: " INF WARN: ",LRINFW Condition for execution: $L(LRINFW) Line Location: L6+4
Function Call: WRITE	Prompt: ?45,HRCN,?57,"Order #: ",LRORD Line Location: L6+4
Function Call: WRITE	Prompt: !,?21,$E($P(^LAB(60,+LRTV,0),U),1,20) Line Location: L7+0
Function Call: WRITE	Prompt: ?42,$J(LRVOL,6,1),"ML" Condition for execution: LRVOL>0 Line Location: L7+0
Function Call: WRITE	Prompt: ?52,LRTOP,?65,LRACC Line Location: L7+1
Function Call: WRITE	Prompt: !,?65,$J(LRTVOL,6,1),"ML T" Condition for execution: LRTVOL>0 Line Location: L7+1
Function Call: WRITE	Prompt: @IOF,!!,?34,"COLLECTION LIST ",LRDT0,!,?34,N,$S(N=1:"ST",N=2:"ND",N=3:"RD",1:"TH")," PRINTING" Line Location: HEAD+0
Function Call: WRITE	Prompt: !,"Ward",!,?5,"Bed",?15,"Name",?45,"HRCN",?65,"Accession",!,LRLLOC Line Location: HEAD+3
Function Call: WRITE	Prompt: !!?5,$S(LRRB=0:"",1:LRRB),?15,$E(PNM,1,28) Line Location: REM+1
Function Call: WRITE	Prompt: " PT INFO : ",LRINFW Condition for execution: $L(LRINFW) Line Location: REM+1
Function Call: WRITE	Prompt: ?45,SSN,?60,"Order #: ",LRORD,! Line Location: REM+1
Function Call: WRITE	Prompt: !!?5,$S(LRRB=0:"",1:LRRB),?15,$E(PNM,1,28) Line Location: REM+3
Function Call: WRITE	Prompt: " PT INFO : ",LRINFW Condition for execution: $L(LRINFW) Line Location: REM+3
Function Call: WRITE	Prompt: ?45,HRCN,?60,"Order #: ",LRORD,! Line Location: REM+3
Function Call: WRITE	Prompt: !!?5,$S(LRRB=0:"",1:LRRB),?15,$E(PNM,1,28) Line Location: REM+4
Function Call: WRITE	Prompt: " PT INFO : ",LRINFW Condition for execution: $L(LRINFW) Line Location: REM+4
Function Call: WRITE	Prompt: ?45,HRCN,?57,"Order #: ",LRORD,! Line Location: REM+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	L7, S7+1
^LAB(61 - [#61]	LRTOP
^LAB(62 - [#62]	L5
^LAB(62.05 - [#62.05]	L5
^LAB(69.9 - [#69.9]	HEAD
^LR - [#63]	L4, L4+4
^LRO(68 - [#68]	L6, L6+6, B6, B7+1, LRTOP
^LRO(69 - [#69]	L6, B5+1
^LRO(69.1 - [#69.1]	L1+3, L2+2, L3+1, L4+6, L5+2, L6+6, L7, B5+3, B6+2, REM
^SC - [#44]	L4+4

Label References

Name	Line Occurrences
@(	WARDHD+15
B5	L4+6
B6	B5+6
B7	B6+2
HEAD	L2, REM+4
L2	L1+3
L3	L2+2
L4	L3+1
L5	L4+6
L6	L5+2
L7	L6+6
REM	L6+6
S7	L7
WARDHD	L2

Naked Globals

Name	Field # of Occurrence
^(	L4, L4+4, L4+6, L6, L6+6, L7, S7+1, B7+1
^(0	L4, L5, S7+1, B6, LRTOP

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DFN	L4*
DT	L1+2, L6, B6
HRCN	L6+4, REM+4, WARDHD+4~, WARDHD+6*
I	L4+2~, WARDHD+4~, WARDHD+14*
IOF	HEAD
IOSL	REM+4
LRAA	L5+1, L5+2, L6, L6+6, L7, B5+2, B5+3, B6, B6+2, B7+1 , LRTOP, REM, WARDHD+1~, WARDHD+7*
LRACC	L6+6, L7+1, B7+1, WARDHD+1~, WARDHD+6*
LRAD	L6, L6+6, B6, B7+1, WARDHD+1~, WARDHD+7*
LRAN	L6+6, L7, B6+1, B6+2, B7+1, LRTOP, REM, WARDHD+1~, WARDHD+7
LRBAR	L5+3!, B5+7!, WARDHD+1~
LRBAR0	L1+4!
LRBAR1	L1+4!
LRBARID	WARDHD+1~
LRCE	B7+1, WARDHD+1~, WARDHD+7
LRDAT	WARDHD+1~, WARDHD+6*
>> LRDFN	L3, L3+1, L4, L4+4, L4+6, L5+2, L6+6, L7, B5+3, B6+2 , REM
>> LRDIV	L4+4
>> LRDIVLOC	L4+4*
>> LRDPF	L4*
>> LRDT0	HEAD
>> LREM	REM*, REM+4
>> LRFIN	L1+3
LRINFW	L4, L6+4, REM+4, WARDHD+1~, WARDHD+14
>> LRLABEL	WARDHD+15
>> LRLBLD	LRTOP
>> LRLL	L2, L4+6
LRLLOC	L1+2, L1+3, L2+2, L3+1, L4+2~, L4+6, L5+2, L6+6, L7, B5+3 , B6+2, HEAD+3, REM, WARDHD+5, WARDHD+6
>> LRMULTI	L4+4
>> LRODT	L1+2, L5, L6, B5*, B5+1
>> LRORD	L6*, L6+4, REM+4
>> LRPORD	L3+1, L6+4
LRPREF	WARDHD+1~, WARDHD+8*
LRRB	L2+1, L2+2, L3+1, L4+2~, L4+6, L5+2, L6+4, L6+6, L7, B5+3 , B6+2, B7, B7+3, REM, REM+4, WARDHD+1~, WARDHD+8
LRRBX	B7*, B7+3!
>> LRSN	L4+5, L4+6, L5+2, L6, L6+6, L7, B5+1, B5+3, B6+2, REM
>> LRSSP	S7, S7+1
>> LRSTA	L1+2
>> LRTJ	L4+6*, L5, S7+1, B5
LRTOP	L5, L7+1, LRTOP, WARDHD+1~, WARDHD+8*
LRTS	WARDHD+1~
LRTS(1	WARDHD+8*
LRTS(2	WARDHD+8*
>> LRTV	L7*, S7+1
>> LRTVOL	L5, L6+6, L7+1, S7+1*
LRUID	WARDHD+1~
>> LRURG	L5*
LRURG0	WARDHD+1~, WARDHD+9*, WARDHD+13
LRURGA	WARDHD+1~, WARDHD+13*
>> LRVOL	L7, S7, S7+1
>> LRWLEC	L6+6*
LRXL	WARDHD+1~, WARDHD+14*
N	HEAD, WARDHD+4~, WARDHD+14
>> PNM	L6+4, REM+4, WARDHD+6*
SSN	WARDHD+4~, WARDHD+6*
>> T	L7, REM
U	L4, L4+4, L5, L6, L7, S7+1, B5, B6, LRTOP

Customize PDF page

Package: Lab Service

Routine: LRPHLIS1

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: