Routine: LROW3

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$C(7),"...process aborted" Line Location: L+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: L1+0
Function Call: WRITE	Prompt: !,"Delete test entry no.: " Line Location: L1+0
Function Call: WRITE	Prompt: !,"Select entry number to be deleted." Condition for execution: X["?" Line Location: L1+0
Function Call: WRITE	Prompt: !!?5,$C(7),"( "_X_" ) Is not a valid entry number " Line Location: L1+1
Function Call: WRITE	Prompt: !!,"Add more tests" Line Location: L1A+0
Function Call: WRITE	Prompt: !!,"You have just selected the following tests for ",PNM," ",SSN Line Location: L3+2
Function Call: WRITE	Prompt: !!,"You have just selected the following tests for ",PNM," ",HRCN Line Location: L3+3
Function Call: WRITE	Prompt: !,?5,"entry no.",?15,"Test",?45,"Sample" Line Location: L3+5
Function Call: WRITE	Prompt: !!,$C(7),"...process aborted" Line Location: ENSTIK+4
Function Call: READ	Timeout: DTIME Variable: X Line Location: LL1+0
Function Call: WRITE	Prompt: !,"Delete test entry no.: " Line Location: LL1+0
Function Call: WRITE	Prompt: !,"Select entry number to be deleted." Condition for execution: X["?" Line Location: LL1+0
Function Call: WRITE	Prompt: !,?5,J,?15,$P(^LAB(60,+LROT(I,L,K),0),U)," ",?45,LRSAMP Line Location: LL2+6
Function Call: WRITE	Prompt: !!,"You have just selected the following tests for ",PNM," ",SSN Line Location: LL3+2
Function Call: WRITE	Prompt: !!,"You have just selected the following tests for ",PNM," ",HRCN Line Location: LL3+3
Function Call: WRITE	Prompt: !," for Collection on: ",$$FMTE^XLFDT(LRODT_"."_LRORDTIM,"M") Line Location: LL3+4
Function Call: WRITE	Prompt: !,?5,"entry no.",?15,"Test",?45,"Sample" Line Location: LL3+5
Function Call: WRITE	Prompt: !!,"Answer 'Yes' or 'No' ('^' to cancel)" Line Location: HELP+0

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	L2+2, LL2+6
^LAB(61 - [#61]	L4, LL2+2
^LAB(62 - [#62]	L2, LL2+1

Name	Line Occurrences
ENSTIK	LL1A
HELP	L+6, L1A, LL, LL1A
L	L+6
L1	L1, L1+2
L1A	L1A
L2	L3+6
L3	L+5, L1
L4	L2+2
LL	LL
LL1	LL1, LL1+1
LL1A	LL1A
LL2	LL3+7
LL3	ENSTIK+6, LL1
LROW3	L1+1, L1A+1
NATURE	L+3, ENSTIK+3
X3	L1+2

Name	Field # of Occurrence
^(0	L2, L4

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	L+4, L+6, L1A, ENSTIK+4, LL, LL1A!
DTIME	L1, LL1
>> HRCN	L3+3, LL3+3
>> I	L2, L2+2, L3+1, L3+6, L4, LL2+1, LL2+4, LL2+5, LL2+6, LL3+6* , LL3+7
J	L2+2, L3+1!, LL1+1, LL2+5, LL2+6, LL3+1!, LL3+3
J(	L1+1, L1+2, L2+2, LL1+1, LL2+5, X3+1!
>> K	L2+1, L2+2, L4, LL2+3, LL2+4, LL2+5, LL2+6
>> L	LL2+2, LL2+4, LL2+5, LL2+6, LL3+7*
>> LRDPF	L+2, ENSTIK+2
>> LRLWC	L3+4
LRNATURE	L+2, L+4!, ENSTIK+2, ENSTIK+4!
>> LRODT	L3+4, LL3+4
>> LRORDR	LL3+4
>> LRORDTIM	L3+4, LL3+4
>> LROT(	LL1+1!, LL2+4, LL2+6, LL3+6, LL3+7
>> LRPHSET	NATURE+1
>> LRSAMP	L1+2, L2, L2+2, LL1+1, LL2+1, LL2+6, LL2+7, X3, X3+1
>> LRSAMP(	X3+1!
>> LRSPEC	L2+2, L4, LL1+1, LL2+2*, LL2+7
>> LRTEST	L1+2, LL1+1
>> LRTEST(	L2+2, X3, X3+1!
>> LRXST(	L2+2, L3+6, L4, X3, X3+1!
>> LRXST(0	L4
>> PNM	L3+3, LL3+3
U	L1+2, L2, L2+2, L4, LL1+1, LL2+1, LL2+2, LL2+5, LL2+6
>> X	L1, L1+1, L1+2, LL1*, LL1+1, X3, X3+1
>> X3(	X3!

Customize PDF page

Package: Lab Service

Routine: LROW3

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
ENSTIK	;from LRMIBL, LRORD1 ; Only ask nature of order for CPRS - file #2 patients.
HELP
NATURE	;Get Nature of order
LL1
LL2	;
LL
L	; ; Only ask nature of order for CPRS - file #2 patients.
LL3	;
L4
L2
L3	;
L1
X3
L1A
LL1A