Routine: LRAUDA

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

LRAUDA ;AVAMC/REG/WTY/KLL - AUTOPSY PATH DATA ENTRY ;08/20/01

Source Information

Source file <LRAUDA.m>

Call Graph

Call Graph Total: 4

Package	Total	Call Graph
Lab Service	3	^LRAP ^LRAPDA V^LRU
VA FileMan	1	EN^DDIOL

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 8

Package	Total	Caller Graph
Lab Service	8	LRAPAUDAA LRAPAUDAB LRAPAUDAP LRAPAUDAS LRAPAUFAD LRAPAUPAD LRAPAUSR LRAPDA

Entry Points

Name	Comments	DBIA/ICR reference
L	;Define AU Section
P	;Autopsy Protocol
PDR	;Entry for resetting DR string
PAD	;Provisional Anatomic Diagnoses
S	;Special Studies
B	;Autopsy Report/SNOMED Coding
BDR	;Entry for resetting DR string
A	;Autopsy Report/ICDCM Coding
ADR	;Entry for resetting DR string
R	;Autopsy Supplementary Report
I	;ICDCM coding
F	;Final Anatomic DX Date
VMSG	;Verified message
EDIT	;
END	;

External References

Name	Field # of Occurrence
EN^DDIOL	VMSG+3
^LRAP	L+2
^LRAPDA	EDIT+1
V^LRU	END+2

Label References

Name	Line Occurrences
ADR	A+3
BDR	B+4
EDIT	P+5, PAD+8, S+7, B+5, A+5, R+4, I+5, F+5
END	P+2, PAD+2, S+2, B+2, A+2, R+2, I+2, I+3, F+2
L	P+1, PAD+1, S+1, B+1, A+1, R+1, I+1, F+1
PDR	P+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DR	PDR+1!, PDR+3, PDR+4, PAD+3!, S+3!, S+4, S+5, BDR+1!, ADR+1!, I+4 , F+3!*
DR(2	S+6, BDR+2
DR(3	BDR+3, BDR+4
DR(4	BDR+5*
>> LR(2	B+3*
>> LR(6	P+4, PAD+7
>> LRCDSYS	ADR+1, I+4
>> LRDICS	L+1*
LRMSG	VMSG+1~, VMSG+2*, VMSG+3
LRQUIT	L+1, L+4, P+2, PAD+2, S+2, B+2, A+2, R+2, I+2, F+2 , END+1!
LRSFLG	R+3*, R+5!
>> LRSOP	P+4, PAD+7, BDR+5, A+4, R+3, I+4, F+4*
>> XPAD	L+1, PDR+3, PDR+4, PAD+5
>> Y	L+3, I+3