Routine: LRAP

Package	Total	Caller Graph
Lab Service	52	LRAPA LRAPAUA LRAPAUL LRAPAUPT LRAPBK LRAPBS LRAPC LRAPD LRAPDEL LRAPDES LRAPDPT LRAPED LRAPEDC LRAPFICH LRAPH LRAPJNC LRAPKOE LRAPL LRAPLG LRAPLG1 LRAPMOD LRAPMRL LRAPMV LRAPP LRAPPA LRAPPF LRAPQ LRAPQAC LRAPQACD LRAPQACN LRAPQAFS LRAPQAM LRAPQAR LRAPQOR LRAPR LRAPRES LRAPSA LRAPSE LRAPSL LRAPST LRAPT LRAPTT LRAPV LRAPWE LRAPWR LRAPX LRAUDA LRAUMLK LRAURV LRAUSTA LRCYPCT LRUDEL

Entry Points

Name	Comments	DBIA/ICR reference
B	;
AU	; log-in autopsy
CY	; log-in cytopath
EM	; log-in electron microscopy
SP	; log-in surg path
M	; edit path report parameters
D	; Edit path descriptions
V	; input transform DD(63.08,.11,0)
CK	;
LRDICS	;
C	;
CC	;
END	;
GETDEF	; Get defaults for specimen login

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: M+1
Function Call: WRITE	Prompt: ! Line Location: D+1
Function Call: WRITE	Prompt: !,"Year received must be same as log-in year (",LRH(2)+1700,") " Line Location: V+1
Function Call: WRITE	Prompt: !,$C(7)," Something is wrong..." Line Location: CK+3
Function Call: WRITE	Prompt: !!,"I can't tell if you're really here..." Line Location: CK+4
Function Call: WRITE	Prompt: !!,"Ask your IRM why you don't have a DUZ(2) variable defined!",! Line Location: CK+5
Function Call: WRITE	Prompt: $C(7),!!,"I can't tell what DIVISION you are from. Contact your IRM " Line Location: CK+10
Routine Call	DIC Line Location: LRAP+11 M+4 D+3
Routine Call	DIE Line Location: M+10 D+10

FileNo	Call Tags
^LAB(62.5 - [#62.5]	Classic Fileman Calls
^LRO(69.2 - [#69.2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	CK+8
^LAB(62.5 - [#62.5]	D+5, D+11
^LAB(69.9 - [#69.9]	SP+2
^LRO(68 - [#68]	C+3, C+4, C+5, CC+2, CC+3
^LRO(69.2 - [#69.2]	M+5, M+11

Name	Field # of Occurrence
^(3	C+3

Name	Field # of Occurrence
A	C+2, C+3, C+4!, C+5!, CC+1, CC+2, CC+3!
B	C+2, C+3, C+4!, C+5!, CC+1, CC+2, CC+3!
B(	C+3, CC+2
B(1	C+4, C+5, CC+3
DA	M+4, M+5, M+7!, M+11, M+12!, D+3, D+5, D+7!, D+11, D+12!
DIC	LRAP+5, LRAP+12!, M+2, M+4!, D+1*, D+3!
DIC("A"	LRAP+6*
DIC("S"	LRAP+9, M+3, D+2*
DIC(0	LRAP+5, M+2, D+1*
DIE	M+7!, M+9, M+12!, D+4, D+7!, D+12!
DIE("NO^"	D+4*
DLAYGO	D+2*, D+3!
DR	CY+5, CY+6, CY+7, EM+5, EM+6, EM+7, SP+6, SP+7, SP+8, M+7! , M+9, M+12!, D+7!, D+9*, D+12!
DR(2	CY+8, CY+9, EM+8, EM+9, SP+9, SP+10
DUZ(2	CK+2, CK+8, C+3
>> LR("FS"	SP+2, SP+12
>> LRAA	GETDEF+7, GETDEF+11, GETDEF+15
>> LRAA(4	CK+8*, CK+9
>> LRABV	SP+12
LRDICS	LRAP+12!, LRDICS+1, LRDICS+2!, LRDICS+3*, C+3, CC+2
LRDICS(1	C+5
LRDICS(2	C+1
>> LRH(2	V+1
>> LRLLOC	CY+5, EM+5, SP+6
>> LRMD	CY+1, EM+1, SP+1*
>> LRSAMP	GETDEF+8*
>> LRSAMP(0	GETDEF+8*
>> LRSIT	CY+1, EM+1, SP+1*
>> LRSPTOP	GETDEF+12*
>> LRSPTOP(0	GETDEF+12*
>> LRTST	GETDEF+16*
>> LRTST(0	GETDEF+16*
MSG	M+6, M+7!, D+6, D+7!
U	B+1, D+3, CK+8, C+4, C+5, CC+3
X	B+1, D+3, V+1!, LRDICS+1, LRDICS+2, GETDEF+4~, GETDEF+7, GETDEF+8, GETDEF+11, GETDEF+12 , GETDEF+15*, GETDEF+16
>> Y	LRAP+4, LRAP+13, B+1, M+4, D+3, CK+1, CK+6, CK+11, LRDICS+1, LRDICS+2 , C+4, C+5, CC+3*