Routine: LRAPLG

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Log-In for ",LRH(0)," " Line Location: LRAPLG+8
Function Call: WRITE	Prompt: ! Line Location: GETP+0
Function Call: WRITE	Prompt: $C(7),!!,"NO DATE DIED ENTERED IN ",LRFNAM," FILE",! Line Location: ADD+0
Function Call: WRITE	Prompt: !,"Yr:",1700+$E(Y,1,3)," Acc#:",X," IN LAB FILE FOR ",$P(@(LRPF_DFN_",0)"),U)," SSN:",$P(^(0),U,9) Line Location: ADD+1
Function Call: WRITE	Prompt: !,"Yr:",1700+$E(Y,1,3) Line Location: ADD+4
Function Call: WRITE	Prompt: " Acc#:",X," IN LAB FILE FOR " Line Location: ADD+5
Function Call: WRITE	Prompt: $P(@(LRPF_DFN_",0)"),U) Line Location: ADD+6
Function Call: WRITE	Prompt: " HRCN:",HRCN Line Location: ADD+7
Function Call: WRITE	Prompt: $C(7),!!?20,"Also in accession file" Line Location: CK+0
Function Call: WRITE	Prompt: !,"Enter in Accession File " Line Location: CK+1
Routine Call	DIE Line Location: ADD

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	GETP+8
^LR - [#63]	GETP+4, GETP+5, ADD+3
^LRO(68 - [#68]	LRAPLG+11, LRAPLG+12*, LRAPLG+13, CK
^LRO(69.2 - [#69.2]	SET

Name	Field # of Occurrence
^("AU"	ADD+3
^(0	LRAPLG+11, LRAPLG+12, LRAPLG+13*

Name	Field # of Occurrence
>> %	LRAPLG+8, LRAPLG+9, CK+1
%DT	LRAPLG+9!, LRAPLG+14
%DT("A"	LRAPLG+9*
%DT(0	LRAPLG+9*
>> DA	ADD*
>> DFN	ADD, ADD+6
DIC	GETP!, ADD+12!
DIE	ADD*, ADD+12!
DR	ADD*, ADD+12!
>> HRCN	ADD+7
>> LR("L"	LRAPLG+5*
>> LRAA	LRAPLG+11, LRAPLG+12, LRAPLG+13, CK, SET
>> LRAA(3	LRAPLG+8*
>> LRAD	LRAPLG+9*, LRAPLG+10, LRAPLG+12, LRAPLG+13
>> LRCAPA	LRAPLG+5, LRAPLG+6, LRAPLG+7
>> LRDFN	GETP+1, GETP+4, GETP+5, ADD+3, CK
>> LRDPAF	GETP*
>> LRDPF	ADD
>> LRDTI	LRAPLG+14*, GETP+4
>> LREXP	ADD*
>> LRFNAM	ADD
>> LRH(0	LRAPLG+8, LRAPLG+9*
>> LRH(2	LRAPLG+10*
LRMD	ADD+12!
>> LRPF	ADD+6, ADD+11
>> LRPRAC	GETP+2, GETP+3
>> LRPRAC(1	GETP+2, GETP+3
>> LRSIT	GETP*
>> LRSS	LRAPLG+5, LRAPLG+6, LRAPLG+7, LRAPLG+8, GETP+4, GETP+5, GETP+8, ADD, ADD+3
LRT	LRAPLG+5!, LRAPLG+6!
>> LRW("G"	LRAPLG+6*
>> LRW("H&E"	LRAPLG+5*
>> LRW("SS"	LRAPLG+6*
>> LRWHN	LRAPLG+10*
U	LRAPLG+6, ADD+3, ADD+6
>> X	LRAPLG+5, LRAPLG+6, LRAPLG+7, LRAPLG+14, GETP+3, GETP+4, GETP+5, GETP+8, ADD, ADD+3* , ADD+5, CK, SET*
>> Y	LRAPLG+5, LRAPLG+9, LRAPLG+14, GETP+5, GETP+6, GETP+7, ADD, ADD+3*, ADD+4
>> Y(1	ADD+3*, CK

Information