Routine: LRKDIFF2

Package	Total	Call Graph
Lab Service	1	RW^LRDIED

Package	Total	Caller Graph
Lab Service	1	LRKDIFF

Entry Points

External References

Name	Field # of Occurrence
RW^LRDIED	COM+1

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: TYPE#1 Line Location: L+0
Function Call: WRITE	Prompt: !,?40,*13,"RBC: " Line Location: L+0
Function Call: READ	Prompt: " " Timeout: DTIME Variable: X Line Location: RESULT+0
Function Call: READ	Timeout: 2 Variable: X Line Location: HELP2+0
Function Call: WRITE	Prompt: !,"You can enter '",$P($P(LRSET,";",K),":",1),"' which stands for ",$P($P(LRSET,";",K),":",2) Line Location: HELP2+1
Function Call: READ	Prompt: "Press return to continue " Formatting: ! Timeout: DTIME Variable: X Line Location: HELP2+2
Function Call: READ	Timeout: 2 Variable: X Line Location: HELP+0
Function Call: WRITE	Prompt: 13,7," INVALID RBC CELL KEY" Line Location: HELP+0
Function Call: WRITE	Prompt: !!!!,?7 Line Location: HELP+1
Function Call: WRITE	Prompt: $J(K,8) Line Location: HELP+1
Function Call: WRITE	Prompt: " ",% Line Location: SET+0
Function Call: WRITE	Prompt: $E(LRSUBS,Y,255) Line Location: SET+1
Function Call: WRITE	Prompt: *7 Line Location: HUH+1
Function Call: WRITE	Prompt: !,"YOU CAN ENTER ",$P($P(CODE,";",K),":")," WHICH STANDS FOR ",$P($P(CODE,";",K),":",2) Line Location: HUH+1
Function Call: WRITE	Prompt: !,?3,^(.1),": ",@X Line Location: WBC+0
Function Call: READ	Timeout: DTIME Line Location: WBC+1
Function Call: READ	Prompt: "ARE YOU FINISHED WITH THIS PATIENT (Y/N) Y//" Formatting: ! Timeout: DTIME Variable: X Line Location: DONE+0
Function Call: WRITE	Prompt: *7," ??" Line Location: DONE+1
Function Call: WRITE	Prompt: !?2,^UTILITY("LA",$J,I,.1),": ",?12 Line Location: EVAL+1
Function Call: WRITE	Prompt: $J(V,3) Line Location: EVAL+1
Function Call: WRITE	Prompt: @IOF,!!,"Patient name: ",PNM,?45,"HRCN: ",HRCN Line Location: HD1+0
Function Call: WRITE	Prompt: !,?3,"RBC MORPHOLOGY ('?' = DISPLAY, '!' = COMMENTS, '\' = WBC, <RETURN> = EXIT)" Line Location: HD2+0
Function Call: WRITE	Prompt: !,"KEY",?7,T1(I),!,"TEST",?7,T2(I),!! Line Location: HD2+0
Function Call: WRITE	Prompt: !!,?34,"> CBC PROFILE <",! Line Location: HD4+0
Function Call: WRITE	Prompt: $P(^LAB(60,X,0),U,1),": ",$P(V,U,1)_" "_$P(V,U,2),?(I*25) Line Location: HD4+1
Function Call: WRITE	Prompt: ! Line Location: HD4+1
Function Call: READ	Timeout: DTIME Variable: RMK Line Location: COM+0
Function Call: WRITE	Prompt: !,"Comment: ",RMK,! Line Location: COM+0

Name	Line Occurrences (* Changed, ! Killed)
^DD(63.04	HELP2
^LAB(60 - [#60]	RESULT, HD4+1
^LR - [#63]	HD4+1
^UTILITY("LA"	A+1, RESULT, DELETE+1, WBC, EVAL+1, STORE
^UTILITY($J	A, HELP+1, WBC, EVAL+1, STORE

Name	Field # of Occurrence
^(	A, A+1, HELP+1, WBC, EVAL+1, STORE, HD4+1
^("DD"	DELETE+1
^(3	HELP2
^(4	A+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	SET*
A	L+2!
>> C	HD4+1*
CODE	L+2!, HUH+1
CONT	L+2!
>> DA	DELETE+1*, HELP2
DATYP	L+2!
DD	L+2!, DELETE+1*, HELP2, SET
DONE	A+2, L, L+1, L+2!, DONE+2
DTIME	L, RESULT, HELP2+2, WBC+1, DONE, COM
>> DX	L, HELP2, HELP+1*
>> DY	L, HELP2, HELP+1*
>> FLAG	A+2, L, CHECK, RESULT, DONE, DONE+2*
>> HRCN	HD1
>> I	A, A+1, HELP+1, SET+1, EVAL+1, STORE, HD2, HD4+1
>> I1	HELP+1*
IOF	HD1
J	L*, L+2!
K	L+2!, HELP2+1, HELP+1, HUH+1, WBC
KEY	A!*, CHECK+1
KEY(	A*, RESULT
>> LINE	CHECK+1*
>> LRDAT	HD4+1
>> LRDFN	HD4+1
>> LRDY	HELP+1, HD2*
>> LRSET	HELP2+1, SET*, SET+1
>> LRSUBS	SET+1*
NC	A!
>> PNM	HD1
>> RMK	COM, COM+1
T1	A!, A+1*, HD2
T1(	A+1*, HD2
T2	A!, A+1*, HELP+1
T2(	A+1*, HD2
TY	A!
TY(	RESULT, DELETE!, DELETE+1*, HELP+1, EVAL+1, STORE
TYPE	L, L+2!, CHECK, CHECK+1, RESULT, DELETE, DELETE+1, HELP, HD3
U	CHECK, RESULT, DELETE+1, HELP2, SET, DONE+2, HD4+1
>> V	EVAL+1, STORE, HD4+1*
X	A, A+1, L+2!, RESULT, RESULT+1, DELETE, DELETE+1, HELP2, HELP2+2, HELP , HELP+1, SET, SET+1, HUH!, HUH+1!, WBC, WBC+1, DONE, DONE+1, DONE+2 , EVAL+1, STORE, HD4+1*, COM+1
>> XY	L, HELP+1
>> Y	A+1, RESULT, DELETE+1, SET+1, EVAL+1, STORE, COM+1

Customize PDF page

Package: Lab Service

Routine: LRKDIFF2

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
A
SET
HD3
HELP
HD1
STOP
COM2
HUH
L
HD2
HELP2
RESULT
EVAL
HD4
WBC
DONE
COM
CHECK
STORE
DELETE

Name	Line Occurrences
@(	CHECK+1
CHECK	L
COM2	COM
DONE	DONE+1
EVAL	STOP
HD1	A+2, HELP2+2, WBC, WBC+1, DONE+2, EVAL, COM2
HD2	A+2, HELP2+2, WBC+1, DONE+2, COM2
HD4	COM2
HELP	HD3
HUH	SET+1
SET	DELETE+1
STORE	L+1