Routine: LRAPR

Information

LRAPR ;DALOI/REG/WTY/KLL/CKA - ANAT RELEASE REPORTS ;10/30/01

Source Information

Source file <LRAPR.m>

Call Graph

Call Graph Total: 19

Package	Total	Call Graph
Lab Service	10	OERR^LR7OB63D ^LRAP (,PNAME)^LRAPDA GETDATA^LRAPESON (CHKSUP,CKSIGNR,RELCHK,UNRLSE)^LRAPR1 (,RELEASE,SECTION,STORE,TIUPREP)^LRAPRES (CLSSCHK,MAIN)^LRAPRES1 (V,YN)^LRU ^LRUP X^LRUWK
VA Fileman	8	(,DD)^%DT NOW^%DTC EN^DDIOL ^DIC $$GET1^DID FILE^DIE $$GET1^DIQ ^DIR
Kernel	1	SIG^XUSESIG

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Lab Service	3	LRAPDA LRAPR LRAPRS

Entry Points

Name	Comments	DBIA/ICR reference
A
C	;
B	;Autopsy
END	;
DIE	;Define default supplementary report
DIE1	;
SWITCH	;Check to see if electronic signature is enabled
REST
UPDATE	;
S	;from LRAPDA
EN	;Supplementary Report Entry Point
ESIG	;Prompt for electronic signature
W
RINFO	;Display release information
RELEASE	;Prompt for release/unrelease
NMPATH	;Check for missing pathologist name
CAP
RELMN	;Allow release of main report as long as all supp reports are ; released, and signer is same person for main and supp report(s)
SUPCHK	;Check for unreleased supplementary reports

External References

Name	Field # of Occurrence
^%DT	EN+17
DD^%DT	SUPCHK+9, SUPCHK+16, RINFO+5
NOW^%DTC	RELMN+22
EN^DDIOL	DIE+28, DIE+32, UPDATE+5
^DIC	DIE1+8
$$GET1^DID	DIE+5
FILE^DIE	UPDATE+10, RELMN+25, RELMN+28
$$GET1^DIQ	DIE+10, DIE+12, DIE+14, DIE+20, DIE+22, DIE+24, DIE1+12, DIE1+15, UPDATE+15, UPDATE+19 , RELMN+10, RELMN+11, RELMN+12, RELMN+13, RELMN+14, RELMN+16, RELMN+17, RELMN+18, RELMN+19, RELMN+20
^DIR	DIE1+25, RELEASE+4
OERR^LR7OB63D	RELMN+29
^LRAP	A, C+1
^LRAPDA	LRAPR+31, B+20
PNAME^LRAPDA	W+3
GETDATA^LRAPESON	SWITCH+1
CHKSUP^LRAPR1	DIE1+30
CKSIGNR^LRAPR1	UPDATE+9
RELCHK^LRAPR1	RELMN+4
UNRLSE^LRAPR1	RELMN+26
^LRAPRES	LRAPR+8
RELEASE^LRAPRES	RELMN+27
SECTION^LRAPRES	EN+7
STORE^LRAPRES	RELMN+24
TIUPREP^LRAPRES	RELMN+23
CLSSCHK^LRAPRES1	EN+11
MAIN^LRAPRES1	UPDATE+20
V^LRU	END+1
YN^LRU	EN+15
^LRUP	REST+5
X^LRUWK	LRAPR+15
SIG^XUSESIG	ESIG+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?27,"Release Pathology Reports",!! Line Location: LRAPR+10
Function Call: WRITE	Prompt: !!?20,"Release Supplementary Pathology Reports",! Line Location: EN+3
Function Call: WRITE	Prompt: !!,"Data entry for ",LRH(0)," " Line Location: EN+14
Function Call: WRITE	Prompt: " for ",LRH(0) Line Location: REST+0
Function Call: WRITE	Prompt: !,LRP," ID: ",SSN Line Location: REST+6
Function Call: WRITE	Prompt: !,LRP," ID: ",HRCN Line Location: REST+7
Function Call: WRITE	Prompt: !,^(0) Line Location: REST+12
Function Call: WRITE	Prompt: !!,"This supplementary rept has already been released.",! Line Location: DIE1+19
Function Call: WRITE	Prompt: "...Released" Line Location: UPDATE+11
Function Call: WRITE	Prompt: $C(7),!,"Report " Line Location: RINFO+1
Function Call: WRITE	Prompt: "released " Line Location: RINFO+3
Function Call: WRITE	Prompt: ! Line Location: RELEASE+1
Function Call: WRITE	Prompt: !!,?25,"* Main Report Release *",! Line Location: RELMN+21
Routine Call	DIC Line Location: DIE1+8
Routine Call	DIE Line Location: UPDATE+10 RELMN+25 RELMN+28
Routine Call	DIR Line Location: DIE1+25 RELEASE+4

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LR - [#63]	REST+5, REST+11, REST+12, DIE+7, DIE+8, DIE+17, DIE+18, S+1, UPDATE+14, UPDATE+18 , UPDATE+24, UPDATE+25, SUPCHK+4, SUPCHK+5, SUPCHK+6, SUPCHK+8, SUPCHK+11, SUPCHK+12, SUPCHK+13, SUPCHK+15
^LRO(68 - [#68]	EN+19, REST+1, REST+4, REST+9, S+1, S+2, S+3, S+5, CAP, CAP+1
^VA(200 - [#200]	RINFO+7

Name	Line Occurrences
A	LRAPR+11
B	LRAPR+16
CAP	S+4
DIE	W+5
END	LRAPR+9, LRAPR+12, LRAPR+13, LRAPR+32, B+21, EN+8, EN+15, EN+16, W+1, W+2 , A, C+2
ESIG	DIE1+22
RELMN	UPDATE+26
REST	W+6
SWITCH	LRAPR+6, EN+2
UPDATE	DIE1+23, DIE1+27
W	W+2, W+7

Name	Field # of Occurrence
^(0	REST+5, REST+12, S+1, S+2, S+3, CAP+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	EN+15*, EN+16, RELMN+22
%DT	EN+17*!
%DT("A"	EN+17*
%DT(0	EN+17*
>> C	S+4*, CAP, CAP+1
DIC	DIE1+4, DIE1+5, DIE1+8!
DIC("A"	DIE1+6*
DIC("B"	DIE+3, DIE+14, DIE+24*, DIE+29
DIC(0	DIE1+7*
DIR	DIE1+25!
DIR("A"	DIE1+24, RELEASE+2, RELEASE+3*
DIR("B"	DIE1+24, RELEASE+1
DIR(0	DIE1+24, RELEASE+1
>> DR	LRAPR+18, LRAPR+19, LRAPR+20, LRAPR+21, LRAPR+22, LRAPR+23, LRAPR+26, LRAPR+27, LRAPR+28, LRAPR+29 , LRAPR+30, B+2, B+3, B+5, B+7, B+8, B+9, B+10, B+13, B+14 , B+15, B+16, B+17, B+18, B+19*
DTIME	W
DUZ	EN+11, S+2, CAP
DUZ(2	CAP
>> HRCN	REST+7
>> LR("CK"	W!
>> LRA	UPDATE+14, UPDATE+16, UPDATE+18
>> LRAA	EN+19, REST+1, REST+4, REST+9, S+1, S+2, S+3, S+5, CAP, CAP+1
>> LRAA(1	EN+20
>> LRAC	UPDATE+15, UPDATE+19, UPDATE+20
>> LRAD	EN+18*, EN+19, REST+1, REST+4, REST+9, S+1, S+2, S+3, S+5, CAP , CAP+1
>> LRAN	W*, W+1, W+2, W+4, REST+1, REST+2, REST+4, REST+9, S+1, S+2 , S+3, S+5, CAP, CAP+1
>> LRAU	RELMN+8*, RELMN+9, RELMN+15
>> LRCAPA	LRAPR+13
>> LRCKREL	DIE1+30, UPDATE+23, UPDATE+24, UPDATE+25*, UPDATE+26
LRDA	DIE+1~, DIE1+10*, DIE1+11, UPDATE+1
>> LRDFN	REST+4*, REST+5, REST+11, REST+12, DIE+6, DIE+7, DIE+8, DIE+16, DIE+17, DIE+18 , S+1, UPDATE+14, UPDATE+15, UPDATE+18, UPDATE+20, UPDATE+24, UPDATE+25, SUPCHK+4, SUPCHK+5, SUPCHK+6 , SUPCHK+8, SUPCHK+11, SUPCHK+12, SUPCHK+13, SUPCHK+15, RELMN+16, RELMN+17, RELMN+18, RELMN+19, RELMN+20
>> LRDICS	C+1*
>> LREND	EN+10*, EN+11, EN+12
LRESSW	LRAPR+5~, LRAPR+7, EN+1~, EN+11, DIE1+16, DIE1+18, DIE1+21, DIE1+30, SWITCH+1, UPDATE+26
LRFDA	DIE+1~
LRFDA(	UPDATE+6*
LRFDA2	DIE+2~
LRFDA2(	UPDATE+7*
LRFILE	DIE+1~, DIE+5, DIE+10, DIE+12, DIE+14, DIE+16, DIE+20, DIE+22, DIE+24, DIE1+12 , DIE1+15, UPDATE+6, UPDATE+7
>> LRH(0	EN+14, EN+18*, EN+20, REST, REST+2
>> LRI	REST+9, REST+11, REST+12, DIE+6, DIE+7, DIE+8, S+1, UPDATE+16, UPDATE+18, UPDATE+20 , UPDATE+24, SUPCHK+4, SUPCHK+5, SUPCHK+6, SUPCHK+8
LRIENS	DIE+1~, DIE+9, DIE+10, DIE+12, DIE+14, DIE+19, DIE+20, DIE+22, DIE+24, DIE1+11* , DIE1+12, DIE1+15, UPDATE+6, UPDATE+7, UPDATE+19
LRIENS1	DIE+1~, DIE+6, DIE+9, DIE+16, DIE+19, DIE1+11, RELMN+10, RELMN+11, RELMN+12, RELMN+13 , RELMN+14
>> LRK	S+1*, S+2, CAP
LRLKFL	DIE+1~, DIE1+4, DIE1+5, UPDATE+1*, UPDATE+2, UPDATE+12
>> LRLLOC	REST+4*
LRMSG	DIE+2~, DIE+26!, DIE+27, DIE+28, DIE+30!, DIE+31, DIE+32, UPDATE+3, UPDATE+4, UPDATE+5
LRNOSP	DIE+1~, DIE+3, DIE+7, DIE+17*, DIE+25
>> LRNTIME	RELMN+22*
>> LRP	REST+7, UPDATE+20
>> LRPAT	RELMN+10, RELMN+16
>> LRQT	RELMN+3*, RELMN+5
LRQUIT	EN+6, DIE+1~, DIE1+1, DIE1+2, DIE1+9, DIE1+22, ESIG+1, ESIG+5, RELMN+25, RELMN+28 , RELMN+30
LRRLM	DIE+2~, DIE1+1, DIE1+15, DIE1+18, DIE1+19
LRRLS	DIE+1~, DIE1+12*, DIE1+16, DIE1+18
>> LRSF	DIE+5, UPDATE+19, UPDATE+20, RELMN+10, RELMN+11, RELMN+12, RELMN+13, RELMN+14
>> LRSOP	LRAPR+17, B+1
LRSR	SUPCHK+1~, SUPCHK+2, SUPCHK+5, SUPCHK+6, SUPCHK+8, SUPCHK+12*, SUPCHK+13, SUPCHK+15
LRSR1	SUPCHK+1~, SUPCHK+2, SUPCHK+5, SUPCHK+6, SUPCHK+7, SUPCHK+12, SUPCHK+13*, SUPCHK+14, SUPCHK+17
LRSR2	SUPCHK+1~, SUPCHK+9, SUPCHK+16, SUPCHK+18
LRSRFL	DIE+2~, DIE+10, DIE+13, DIE+20, DIE+23
LRSRMD	DIE+2~, DIE+12, DIE+13, DIE+22, DIE+23
>> LRSS	LRAPR+12, LRAPR+14, LRAPR+16, EN+8, REST+8, REST+11, REST+12, DIE+4, DIE+7, DIE+8 , DIE+15, DIE1+4, DIE1+5, S+1, UPDATE+13, UPDATE+17, UPDATE+18, UPDATE+20, UPDATE+24, UPDATE+25 , SUPCHK+3, SUPCHK+4, SUPCHK+5, SUPCHK+6, SUPCHK+8, SUPCHK+10, RELMN+8
>> LRT	S+2, S+3, S+5, CAP, CAP+1
>> LRT(	S+4
LRX	DIE+1~, DIE+8, DIE+9, DIE+18, DIE+19
>> LRZ	RELMN+11, RELMN+17
>> LRZ(	RELMN+13, RELMN+19
>> LRZ(1	RINFO+7, RELMN+12, RELMN+18
>> LRZ(2	RINFO+2, RINFO+4, RINFO+6, RELEASE+2, RELEASE+3, RELMN+14, RELMN+20
>> LRZ(3	NMPATH+1
U	W+1, UPDATE+16, SUPCHK+4, SUPCHK+6, SUPCHK+8, SUPCHK+11, SUPCHK+13, SUPCHK+15, RINFO+7
X	LRAPR+13, LRAPR+14, LRAPR+15, W!, REST+4, REST+5, REST+11, REST+12, S+2, CAP+1
>> X1	ESIG+3
Y	EN+16, EN+18, W!, DIE1+9, DIE1+10, DIE1+26, A, C+2, SUPCHK+8, SUPCHK+9 , SUPCHK+15, SUPCHK+16, SUPCHK+20, RINFO+4, RINFO+6, RINFO+8!, NMPATH+3, RELEASE+5!, RELEASE+6

Customize PDF page

Package: Lab Service

Routine: LRAPR

Information

Source Information

Call Graph

Call Graph Total: 19

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: