Routine: LRAPLG1

Package	Total	Call Graph
Lab Service	9	OERR^LR7OB63D (,CK)^LRAPCWK ^LRAPLG2 ^LRAPSWK ^LRAUAW ^LRSPGD YN^LRU ^LRUTELL ^LRUWLF
VA Fileman	3	^%DT EN^DDIOL ^DIE
Surgery	1	DISP^SROSPLG

Package	Total	Caller Graph
Lab Service	3	LRAPLG LRAPLG2 LRAUAW

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Assign ",LRO(68)," (",LRABV,") accession #: ",LRAN," " Line Location: LRAPLG1+19
Function Call: WRITE	Prompt: !,"Date/time Specimen taken: " Line Location: DT+0
Function Call: WRITE	Prompt: $S($E(LRAD,1,3)=$E(DT,1,3):"NOW// ",1:"") Line Location: DT+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: DT+2
Function Call: READ	Prompt: "Enter Accession # : " Formatting: !! Timeout: DTIME Variable: X Line Location: OS+0
Function Call: WRITE	Prompt: $C(7),!!,"ENTER A WHOLE NUMBER FROM 1 TO 99999",! Line Location: OS+1
Routine Call	DIE Line Location: F+7

FileNo	Call Tags
^LR - [#63]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	F+15
^LR - [#63]	LRAPLG1+18, AU+1, DT+10, F, F+1, F+2, F+3, F+10!, F+11, F+12 , X+1!, X+4!, OS+3
^LR("AAU"	X+3!
^LR("AAUA"	X+3!
^LRO(68 - [#68]	LRAPLG1+12, LRAPLG1+16, LRAPLG1+17, LRAPLG1+20, LRAPLG1+21, LRAPLG1+22, LRAPLG1+23, LRAPLG1+24, LRAPLG1+25, END+1 , END+5!, END+6, END+7, END+8, OS+2, OS+3
^VA(200 - [#200]	F+5

Name	Field # of Occurrence
^(0	AU+1, F+2, F+11, END+6, OS+2

Name	Field # of Occurrence
>> %	LRAPLG1+19*, LRAPLG1+20, LRAPLG1+21
%DT	DT+7*!
%DT(0	DT+7*
>> DA	F+6*, F+10
>> DA(1	AU+1*
>> DIC(0	F+6*
>> DIE	F+6*
DLAYGO	F+6*, F+7!
DT	DT+1, DT+7
DTIME	DT+2, OS
>> DTOUT	F+8
DUZ(2	END+5
>> LR(	F+4, F+5
>> LR("L"	F+7
>> LRAA	LRAPLG1+12, LRAPLG1+16, LRAPLG1+17, LRAPLG1+20, LRAPLG1+21, LRAPLG1+22, LRAPLG1+23, LRAPLG1+24, LRAPLG1+25, END+1 , END+5, END+6, END+7, END+8, OS+2, OS+3
>> LRABV	LRAPLG1+18, LRAPLG1+19, AU, X+1, X+3, OS+3
>> LRAC	AU*
>> LRAD	LRAPLG1+12, LRAPLG1+16, LRAPLG1+17, LRAPLG1+20, LRAPLG1+21, LRAPLG1+22, LRAPLG1+23, LRAPLG1+24, LRAPLG1+25, AU , DT+1, DT+7, END+1, END+5, END+6, END+7, END+8, OS+2, OS+3
>> LRAN	LRAPLG1+16, LRAPLG1+17, LRAPLG1+18, LRAPLG1+19, LRAPLG1+23, LRAPLG1+24, AU, X+1, X+3, END+5
>> LRCAPA	F+14, F+16
>> LRDFN	LRAPLG1+24, AU+1, DT+10, F, F+1, F+2, F+3, F+10, F+11, F+12 , X+3, X+4, OS+3
LRFND	LRAPLG1+21!, OS, OS+3
>> LRH(2	LRAPLG1+18, X+1, OS+3
>> LRI	DT+9, F, F+1, F+2, F+6, X+4
>> LRO(68	LRAPLG1+19
LRRC	X+2, X+3, X+4, X+5!
>> LRSD	DT+9*, F+1
>> LRSF	AU+1
>> LRSS	AU, AU+1, DT+10, F, F+1, F+2, F+3, F+10, F+11, F+12 , F+14, F+15, F+16, X+1, X+2, X+4
>> LRXR	X+4
>> LRXREF	LRAPLG1+18, X+1, OS+3
MSG	LRAPLG1+13, LRAPLG1+14, LRAPLG1+15!, DT+11, DT+12, DT+13!, END+2, END+3, END+4!
SRDOC	F+4!
U	DT+2, OS, OS+2
>> X	LRAPLG1+17, LRAPLG1+18, LRAPLG1+22, LRAPLG1+23, LRAPLG1+24, AU, DT+2, DT+7, F+2, F+11 , F+12, F+15, END+6, END+7, OS*, OS+1, OS+2, OS+3
>> X(1	F+11, F+12, END+6, END+7
>> X(2	LRAPLG1+22, LRAPLG1+23, END+6, END+7
>> Y	DT+7, DT+9, F+8