Routine: LRAUSM

Information

LRAUSM ;AVAMC/REG - AUTOPSY SNOMED SEARCH ;8/14/95 09:53 [ 04/11/2003 12:11 PM ]

Package	Total	Call Graph
Lab Service	4	POS^LRAPSM ^LRAPSM1 (B,L,S,SSN,XR)^LRU (BEG,END)^LRUTL
Kernel	1	^%ZIS
VA Fileman	1	^%DTC

Package	Total	Caller Graph
Lab Service	6	LRAPC LRAPQAC LRAPQACN LRAPQAMR LRAPSEM LRAPSM

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,?20,LRAA(1)," search by ",S(7)," code" Line Location: LRAUSM+3
Function Call: READ	Prompt: "For all sites type 'ALL' : " Timeout: DTIME Variable: X Line Location: TP+0
Function Call: WRITE	Prompt: !!,"TOPOGRAPHY (Organ/Tissue)",!?5,"Select 1 or more characters of the code:",!?5 Line Location: TP+0
Function Call: WRITE	Prompt: !?5,"For all diagnoses type 'ALL'" Line Location: TP+3
Function Call: WRITE	Prompt: ! Line Location: TP+4
Function Call: WRITE	Prompt: $C(7),!!,"Enter up to 7 characters.",!,"Entry can only contain digits, letters ABCDEFXY or '*' (for wild cards).",!,"One character entered -> most general All 7 characters -> most specific",! Line Location: SHW+0
Function Call: READ	Timeout: DTIME Variable: X Line Location: ASK+0
Function Call: WRITE	Prompt: !,"Choice #",$J(B,2),": Select 1 or more characters of the code: " Line Location: ASK+0
Routine Call	%ZIS Line Location: LRAUSM+3

Name	Line Occurrences (* Changed, ! Killed)
^DIC - [#1]	PRT
^LAB(	MX
^LAB(61 - [#61]	TG
^LR - [#63]	QUE+1, LRDFN, T+1, M, E, PRT
^LRO(69.2 - [#69.2]	LRAUSM+3, LRDFN
^TMP($J	QUE!, MX+1, MX+2, MX+3, PRT+8

Name	Field # of Occurrence
>> A("B"	TP!, TP+1, CK+1, CK+2, SHW, ASK!, ASK+1
>> AGE	PRT+4, PRT+5, PRT+8
>> B	TP+3*, TP+4, ASK
>> DFN	PRT*, PRT+1
>> DOB	PRT+2*, PRT+4
DTIME	TP, ASK
>> E	E*
>> HRCN	PRT+8
>> I	Y, Y1, TG, MX+2, CK+2*
>> I(1	Y1, CK+2
>> I(2	Y1*
IO	QUE
IOF	LRAUSM+3
>> IOP	LRAUSM+3*
>> LR	LRAUSM+4, T+2
>> LR("S"	LRAUSM+3, LRDFN
>> LR(1	LRAUSM+4, TG+1
>> LR(11	TG*
>> LR(2	LRAUSM+4, LRDFN
>> LR(20	T+1*, T+2
>> LR(3	LRAUSM+4*
>> LR(4	LRDFN*, T, PRT+2, PRT+4, PRT+8
>> LR(5	TG*, MX+1, MX+2
>> LR(7	T+1*, TG, MX+1, MX+2
>> LR(8	M, E, MX
>> LRAA	LRAUSM+3, LRDFN
>> LRAA(1	LRAUSM+3
>> LRABV	LRDFN
>> LRAC	T, PRT+4, PRT+8
>> LRAN	T, MX+1, MX+2, MX+3, PRT+4, PRT+8
>> LRDFN	LRDFN*, T+1, M, E, PRT
>> LRDPF	PRT*
>> LRFLN	PRT*, PRT+8
>> LRLDT	TP+4*, QUE+1
LRM	TP+2!, M*, MX
LRM(	MX+2, ASK+1*
LRN	TP+2!, TP+3, TP+4, QUE, MX+1, ASK*
LRN(	MX+2, ASK+1*
LRN(0	TP+4
>> LRO	TP+2*, MX
>> LRP	PRT+1*, PRT+8
>> LRPF	PRT*, PRT+1
>> LRPPT	PRT+1*, PRT+2
>> LRSDT	TP+4, QUE+1, LRDFN
>> LRSN	TP+2, M, MX
>> LRXR	QUE+1, LRDFN
>> LRYR	T, MX+1, MX+2, MX+3, PRT+2, PRT+8
>> M	M*, E
>> POP	TP+5
>> S(1	TP+1*, TG
>> S(2	TP, TP+1, QUE, TG
>> S(7	LRAUSM+3, TP+2, QUE
>> SEX	PRT+2*, PRT+8
>> SSN	PRT+1*
>> T	T+1*, M, E
U	LRAUSM+3, TP, TP+3, QUE, LRDFN, PRT, ASK
>> V	M, E
>> W	MX*, MX+1, MX+2
>> W(2	MX+1*
>> X	TP, TP+1, TP+3, QUE+1, Y, Y1, TG, M, MX+2, PRT+4 , CK+1, CK+2, ASK, ASK+1
>> X1	PRT+4*
>> X2	PRT+4*
>> Y	TP+4, MX+2*
>> Y(1	Y, Y1, TG, MX+2
>> Y(2	Y, Y1, TG, MX+2
>> Z	MX+2*
>> ZTRTN	TP+5*
>> ZTSK	TP+5