Routine: LRRP

Information

LRRP ;DALOI/STAFF - PROCESS DATA FOR INTERIM REPORTS; Oct 28, 2024@13:58

Source Information

Source file <LRRP.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Lab Service	5	(,FOOT)^LRRP1 (CH,INIT,MI,PLSPG,QUIT)^LRRP2 IO^LRWU ^LRWU4 PT^LRX
VA FileMan	1	^DIR

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: 5

Package	Total	Caller Graph
Lab Service	5	LROR1 LRRP1 LRRP2 LRRP3 LRRSP

Entry Points

Name	Comments	DBIA/ICR reference
SET	;from LRRSP, LRRS, LRRD - call with LRORDER=ORDERS, LRODT=DATE, LRDFN
TEST	;
DATA	;
XPND	;
SETUP
CMNT	;
CH	;from LRRP2
GO	;from LRRP3
LOOKUP	; Lookup results by accession
ADQ	; Tasked entry point to print interim report for an accession

External References

Name	Field # of Occurrence
^DIR	LOOKUP+8
^LRRP1	TEST+9, CH+3, GO+3
FOOT^LRRP1	SET+5, ADQ+9
CH^LRRP2	ADQ+7
INIT^LRRP2	ADQ+5
MI^LRRP2	ADQ+8
PLSPG^LRRP2	ADQ+10
QUIT^LRRP2	ADQ+11
IO^LRWU	LOOKUP+23
^LRWU4	LOOKUP+14
PT^LRX	TEST+7, ADQ+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?2,$C(7),$P(^LRO(68,LRAA,0),"^")_" accession area is missing a print order!" Line Location: DATA+4
Function Call: WRITE	Prompt: !?2,$P(^LAB(60,LRTSTS,0),"^")_" results will not be displayed until this is corrected." Line Location: DATA+5
Function Call: WRITE	Prompt: !?2,"Please contact IRM or the Lab ADPAC." Line Location: DATA+6
Function Call: WRITE	Prompt: !,"Doesn't exist." Line Location: LOOKUP+16
Function Call: WRITE	Prompt: !,"Incomplete accession - unable to identify results." Line Location: LOOKUP+19
Function Call: WRITE	Prompt: !,"This option only supports CH and MI subscripted accessions." Line Location: LOOKUP+20
Function Call: WRITE	Prompt: !! Line Location: LOOKUP+24
Routine Call	DIR Line Location: LOOKUP+8

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	TEST+8
^LAB(60 - [#60]	DATA+5, XPND+1, XPND+2, SETUP+1, SETUP+2, SETUP+7, SETUP+9, SETUP+11, CH+2
^LR - [#63]	TEST+7, TEST+8, DATA+18, SETUP+3, SETUP+7, CMNT+4, CH+2
^LRO(68 - [#68]	DATA+2, DATA+4, DATA+7, DATA+8, DATA+10, DATA+11, DATA+17, LOOKUP+16, LOOKUP+18
^LRO(69 - [#69]	TEST+2, TEST+5
^TMP("LR"	SET+1!, SET+6!, TEST+1!, DATA+9, DATA+13, DATA+14, SETUP+5, SETUP+6, SETUP+7, SETUP+11* , CMNT+1, CMNT+2, CMNT+4, CMNT+5, GO+2

Label References

Name	Line Occurrences
CMNT	DATA+20, CH+3, GO+3
DATA	TEST+5
SETUP	XPND+3, CH+2, GO+2
TEST	SET+4
XPND	DATA+19

Naked Globals

Name	Field # of Occurrence
^(	TEST+5, TEST+8, DATA+13, DATA+17, XPND+2, SETUP+3, SETUP+5, SETUP+7, SETUP+11, CMNT+1* , CMNT+4, GO+2
^(0	TEST+2, TEST+7, DATA+2, DATA+17, DATA+18, XPND+1, SETUP+7
^(3	DATA+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	LOOKUP+2~, LOOKUP+22*
>> DFN	TEST+7*, TEST+8
DIR	LOOKUP+2~, LOOKUP+8!
DIR("A"	LOOKUP+7*
DIR("B"	LOOKUP+7*
DIR(0	LOOKUP+7*
DIROUT	LOOKUP+2~
DIRUT	LOOKUP+2~, LOOKUP+9
>> I	CMNT+4*
IO	ADQ+3
>> J	DATA+16, DATA+17
>> LR0	DATA+18*, CMNT+1
LRAA	DATA+1*, DATA+2, DATA+3, DATA+4, DATA+7, DATA+8, DATA+9, DATA+10, DATA+11, DATA+17 , CMNT+1, LOOKUP+2~, LOOKUP+16, LOOKUP+18
LRAAO	TEST+3!, TEST+6, DATA+2*, DATA+3, DATA+9, DATA+13, DATA+14, SETUP+5, SETUP+6, SETUP+7 , SETUP+11, CMNT+1, CMNT+2, CMNT+4, CMNT+5
LRACC	LOOKUP+2~, LOOKUP+14*
LRAD	DATA+1*, DATA+8, DATA+10, DATA+11, DATA+17, LOOKUP+2~, LOOKUP+16, LOOKUP+18
LRADDRESS	LOOKUP+2~, LOOKUP+7, LOOKUP+10, LOOKUP+21
LRAN	DATA+1*, DATA+8, DATA+10, DATA+11, DATA+17, LOOKUP+2~, LOOKUP+15, LOOKUP+16, LOOKUP+18
>> LRCDT	DATA+10*, DATA+12, DATA+13, DATA+14, SETUP+5, SETUP+6, SETUP+7, SETUP+11, CMNT+1, CMNT+2 , CMNT+4, CMNT+5
>> LRCMNT	CMNT+4*
>> LRCW	SET+3*
LRDFN	TEST+2, TEST+7, TEST+8, DATA+18, SETUP+3, SETUP+7, CMNT+4, CH+2, LOOKUP+2~, LOOKUP+17! , LOOKUP+18*, LOOKUP+19
>> LRDN	XPND+1, XPND+2, XPND+3, SETUP+3, SETUP+4, SETUP+7, CH+1, CH+2, GO+1, GO+2*
LRDPF	TEST+7*, TEST+8, LOOKUP+2~, LOOKUP+17!
LREND	SET+4, SET+5, LOOKUP+2~, LOOKUP+12, LOOKUP+13, LOOKUP+15, ADQ+4~
>> LRFOOT	SET+3*, SET+5
>> LRFOUND	TEST+2*
>> LRHF	SET+3*
LRIDT	DATA+11, DATA+12, DATA+14, DATA+18, SETUP+3, SETUP+7, CMNT+2, CMNT+4, CH+2, LOOKUP+2~ , LOOKUP+17!, LOOKUP+18*, LOOKUP+19
>> LRINTP	SETUP+10, SETUP+11
>> LRJJ	XPND+2*
LRLAB	SET+3, SETUP+2, GO+1, LOOKUP+2~, ADQ+4~, ADQ+6*
>> LRLABKY	SET+3, GO+1, ADQ+6
>> LRLLT	DATA+18, DATA+19
>> LROC	TEST+8*
>> LRODT	SET+3, TEST+2, TEST+5
>> LROP	SET+4*
LRORD	SET+1!, SET+6!, TEST+2*
LRORD(1	SET+4*, TEST+1, TEST+2, TEST+5
>> LRORDER	SET+4
>> LRPLS	ADQ+10
>> LRPO	SETUP+4, SETUP+5, SETUP+6, SETUP+7, SETUP+11
LRPRTPG	LOOKUP+2~, LOOKUP+21*, ADQ+10
>> LRSPEC	DATA+18*, SETUP+9, SETUP+11
LRSS	DATA+7, DATA+9, DATA+15, DATA+18, SETUP+3, SETUP+7, CMNT+1, CMNT+4, LOOKUP+2~, LOOKUP+17! , LOOKUP+18, LOOKUP+19, LOOKUP+20, ADQ+7, ADQ+8
LRSTOP	SET+4, SET+5, LOOKUP+2~, LOOKUP+12, LOOKUP+13*, ADQ+4~
>> LRTC	DATA+18, SETUP+7, SETUP+11, CMNT+4, CMNT+5
>> LRTEST	TEST+4, TEST+5
>> LRTSCRN	SET+2*, TEST+5
>> LRTSTS	DATA+1, DATA+5, DATA+13, DATA+19, XPND+1, XPND+2, SETUP, SETUP+1, SETUP+2, SETUP+5 , SETUP+7, SETUP+9, SETUP+11, CH+2, GO+2
LRVBY	LOOKUP+2~, LOOKUP+13*
S	TEST+3!, TEST+5!, TEST+6!, DATA+16, DATA+17, XPND+2*
S(	DATA+17, DATA+19, XPND+2
U	SET+4, TEST+7, DATA+1, DATA+2, DATA+7, DATA+9, DATA+10, DATA+11, DATA+13, DATA+18 , XPND+1, SETUP+2, SETUP+3, SETUP+4, SETUP+7, CMNT+1, CMNT+5
X	TEST+5, DATA+1, SETUP+1, SETUP+4, SETUP+7, LOOKUP+2~
Y	LOOKUP+2~, LOOKUP+10
ZTDESC	LOOKUP+2~, LOOKUP+22*
ZTRTN	LOOKUP+2~, LOOKUP+22*
ZTSAVE	LOOKUP+2~
ZTSAVE("DFN"	LOOKUP+22*
ZTSAVE("LR*"	LOOKUP+22*

Customize PDF page

Package: Lab Service