Routine: BLRMIAUT

Package	Total	Call Graph
VA Fileman	4	^DIC YN^DICN UPDATE^DIE ^DIR
IHS Changes To Lab	3	(ACCFILEL,GETUID,ONGO)^BLRLAHGU LABIHSMS^BLRRLMUM $$ISPIMS^BLRUTIL
Lab Service	2	AUTO^LRCAPV ^LRPARAM
Automated Lab Instruments	1	^LAMIAUT1
IHS VA Utilities	1	^XBFMK

Package	Total	Caller Graph
Automated Lab Instruments	1	LAMIAUT0

Entry Points

Name	Comments	DBIA/ICR reference
ACC	; EP
OK
SHOW	;
LRANX	;
PUTCOMPD	; EP
ACCESS	; EP
LST	;
CLEAN	;
DATE	;
EP	; EP
WAIT	; EP

External References

Name	Field # of Occurrence
ACCFILEL^BLRLAHGU	ACCESS+4
GETUID^BLRLAHGU	ACCESS+13
ONGO^BLRLAHGU	ACCESS+20
LABIHSMS^BLRRLMUM	OK+3
$$ISPIMS^BLRUTIL	CLEAN+3
^DIC	ACC+1
YN^DICN	OK, LST+1
UPDATE^DIE	PUTCOMPD+13
^DIR	WAIT+4
^LAMIAUT1	OK+1
AUTO^LRCAPV	ACCESS+17
^LRPARAM	EP+1
^XBFMK	WAIT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?7,"NO DATA FOR THIS NUMBER",! Line Location: LRANX+1
Function Call: WRITE	Prompt: !!,$C(7)," THERE ARE NO ACCESSIONS FOR THIS DATE " Line Location: DATE+3
Function Call: WRITE	Prompt: !?7,"Not accessioned -- Would you like a list " Line Location: OK+0
Function Call: WRITE	Prompt: " NOT ACCESSIONED " Line Location: SHOW+1
Function Call: WRITE	Prompt: @IOF Line Location: WAIT+6
Routine Call	DIE Line Location: PUTCOMPD+13
Routine Call	DIC Line Location: ACC+1
Routine Call	DIR Line Location: WAIT+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(63.31	EP+1
^LAB(69.9 - [#69.9]	EP+1, ACCESS+7
^LAH(	LRANX+1!, LRANX+2, DATE+2, OK+1, SHOW+1
^LR - [#63]	PUTCOMPD+4, PUTCOMPD+5
^LRO(68 - [#68]	LRANX+2, DATE+1, DATE+2, DATE+3, OK, SHOW+1, PUTCOMPD+2
^TMP("BLRMIAUT"	EP+4, CLEAN+10!, PUTCOMPD+10
^VA(200 - [#200]	EP+1

Label References

Name	Line Occurrences
@(	CLEAN+3
ACC	LRANX+2
CLEAN	EP+1, ACCESS+5
LRANX	ACCESS+19
OK	DATE+2
PUTCOMPD	ACCESS+20
SHOW	OK
WAIT	SHOW+1

Naked Globals

Name	Field # of Occurrence
^(0	EP+1, LRANX+2, DATE+1, DATE+2, OK+1
^(1	EP+1
^(3	PUTCOMPD+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	CLEAN+5!, OK, LST+1
%DT	CLEAN+5!
%X	CLEAN+5!
%Y	CLEAN+5!
A	CLEAN+4!, CLEAN+5!, SHOW+1*
AA	CLEAN+6!
AGE	CLEAN+5!
B	CLEAN+5!
B1	CLEAN+5!
B2	CLEAN+5!
B3	CLEAN+5!
DA	CLEAN+5!
DD	CLEAN+4!
DFN	CLEAN+5!
DIC	CLEAN+5!, ACC+1!*
DIC("B"	ACC+1*
DIC("S"	ACC+1*
DIC(0	ACC+1*
DIE	CLEAN+5!
>> DIR("A"	WAIT+3*
>> DIR(0	WAIT+2*
>> DIRUT	WAIT+5
DOB	CLEAN+5!
DR	CLEAN+5!
DUZ	EP+1
ERRS	PUTCOMPD+1~
FDA	PUTCOMPD+1~
FDA(	PUTCOMPD+12*
GLB	CLEAN+4!
HEADER	ACCESS+3~
HRCN	CLEAN+9!
I	CLEAN+5!
II	CLEAN+5!
IOF	WAIT+6
IOSL	SHOW+1
IR	CLEAN+6!
IX	CLEAN+6!
IXI	CLEAN+6!
J	CLEAN+5!
K	CLEAN+5!
LACAPMS	CLEAN+4!
LAMIAUTO	EP+3*, CLEAN+2!
LAYGO	CLEAN+4!
LR1PASS	CLEAN+5!
LR2ORMOR	CLEAN+5!
LRAA	ACCESS+16, CLEAN+5!, LRANX+2, DATE+1, DATE+2, DATE+3, OK, OK+3, ACC+1, PUTCOMPD+2 , PUTCOMPD+10, PUTCOMPD+12
LRAAD	ACCESS+16*, CLEAN+5!, LRANX+2, SHOW+1
LRAADF	CLEAN+5!, ACC+1*
LRABCNT	CLEAN+6!
LRABVNT	CLEAN+5!
LRACC	CLEAN+5!
LRACCN	CLEAN+5!
LRACNT	CLEAN+5!
LRAD	ACCESS+18, CLEAN+5!, DATE+2*, OK, OK+3, PUTCOMPD+2, PUTCOMPD+10, PUTCOMPD+12
LRADDF	ACCESS+18, CLEAN+5!, DATE+1, DATE+2, SHOW+1
LRALL	CLEAN+6!
LRAN	CLEAN+5!, LRANX+1, DATE+2, DATE+3*, OK, OK+3, PUTCOMPD+2, PUTCOMPD+10, PUTCOMPD+12
LRAO	CLEAN+5!
LRBDUP	CLEAN+8!
LRBN	CLEAN+5!
LRBUG	CLEAN+5!
LRCAPMS	ACCESS+16*, CLEAN+6!
LRCAPOK	CLEAN+8!
LRCAPWA	ACCESS+16*, CLEAN+2!
LRCARD	CLEAN+6!
LRCDEF	CLEAN+4!
LRCDEF0	CLEAN+4!
LRCDT	CLEAN+7!
LRCNODE	CLEAN+6!
LRCNT	CLEAN+4!
LRCODE	CLEAN+4!, CLEAN+7!
LRCODEN	CLEAN+4!
LRCOMTAB	CLEAN+7!
LRCSQ	CLEAN+4!
LRCY	CLEAN+4!
LRD	CLEAN+6!
LRDCOM	CLEAN+7!
LRDFN	CLEAN+7!, PUTCOMPD+1~, PUTCOMPD+2*, PUTCOMPD+4, PUTCOMPD+5
LRDPF	CLEAN+7!
LRDR	CLEAN+6!
LRDRD	CLEAN+6!
LRDRDX	CLEAN+6!
LRDRNAME	CLEAN+6!
LRDTR	CLEAN+7!
LREAL	CLEAN+7!
LREDIT	CLEAN+7!
LREND	ACCESS+1, ACCESS+11, ACCESS+12, ACCESS+14, ACCESS+17, ACCESS+20, CLEAN+7!, LST+1, SHOW+1, WAIT+5*
LRFIFO	ACCESS+1*, CLEAN+8!
LRFLAG	CLEAN+7!
LRFMT	ACCESS+7*, CLEAN+7!
LRI	CLEAN+7!
LRIDT	CLEAN+7!, PUTCOMPD+1~, PUTCOMPD+2*, PUTCOMPD+4, PUTCOMPD+5
LRIFN	CLEAN+7!, LRANX+1, LRANX+2, DATE+2, OK+1
LRINI	EP+1*, EP+3, CLEAN+7!
LRINST	CLEAN+6!
>> LRLDT	ACCESS+13
LRLL	ACCESS+5, CLEAN+6!, CLEAN+7!, LRANX+1, LRANX+2, DATE+2, OK+1, SHOW+1
LRLLOC	CLEAN+7!
LRMICOM	EP+1*, CLEAN+7!
LRMICOMS	EP+1*, CLEAN+7!
LRMIDEF	EP+1*, CLEAN+7!
LRMIOTH	EP+1*, CLEAN+7!
LRMOVE	CLEAN+7!
LRNAME	CLEAN+6!
LRNB	CLEAN+8!
LRNTN	CLEAN+6!
LRNX	CLEAN+6!
LRODT	CLEAN+6!, CLEAN+7!
LRORG	CLEAN+9!
LRORGCOM	CLEAN+9!
LRORGD	CLEAN+6!
LRORGN	CLEAN+9!
LRP	CLEAN+4!
LRPHY	CLEAN+9!
LRPHYN	CLEAN+6!
LRPN	CLEAN+4!
LRPTP	CLEAN+8!
LRQC	CLEAN+4!
LRRB	CLEAN+2!
LRRES	CLEAN+9!
LRSAME	CLEAN+8!
LRSAMP	CLEAN+9!
LRSB	CLEAN+2!
LRSCOM	CLEAN+8!
>> LRSDT	ACCESS+13
LRSN	CLEAN+9!
LRSPEC	CLEAN+9!
LRSS	ACCESS+9*, CLEAN+9!
LRSSC	CLEAN+4!
LRSSCX	CLEAN+4!
LRSTD	CLEAN+4!
LRSTR	CLEAN+4!
LRSUB	CLEAN+6!
LRT	CLEAN+4!
LRTCUP	CLEAN+9!, OK+1*
LRTEC	EP+3*, CLEAN+5!
LRTEST	CLEAN+6!
LRTIME	CLEAN+4!
LRTPT	CLEAN+8!
LRTRAN	CLEAN+9!
LRTREA	CLEAN+2!
LRTS	CLEAN+4!, CLEAN+8!
LRUNDO	CLEAN+9!
LRVT	ACCESS+8*, CLEAN+8!
LRWRD	CLEAN+9!
LRWRDVEW	CLEAN+9!
LRY	CLEAN+8!
N	CLEAN+6!
NODE	CLEAN+4!
NODE0	CLEAN+4!
>> NOGO	ACCESS+11*, ACCESS+12, ACCESS+20
ORG	PUTCOMPD+1~, PUTCOMPD+3, PUTCOMPD+4, PUTCOMPD+5
ORGDATE	PUTCOMPD+1~, PUTCOMPD+5*, PUTCOMPD+6
PNM	CLEAN+9!
Q9	CLEAN+9!
RELDATE	PUTCOMPD+1~, PUTCOMPD+3, PUTCOMPD+6, PUTCOMPD+8, PUTCOMPD+10, PUTCOMPD+12
SEX	CLEAN+9!
SSN	CLEAN+9!
T1	CLEAN+6!
TAB1	ACCESS+1*, CLEAN+9!
TAB2	ACCESS+1*, CLEAN+9!
TAB3	ACCESS+1*, CLEAN+9!
U	EP+1, ACCESS+7, LRANX+2, DATE+1, DATE+2, OK+1, ACC+1
VA	CLEAN+2!
X	CLEAN+9!, LST+1, SHOW+1
X1	CLEAN+9!
X2	CLEAN+9!
X9	CLEAN+6!
XX	CLEAN+2!
Y	CLEAN+9!, LRANX+2, DATE+3, ACC+1!
Y(0	DATE+1*
ZTSK	CLEAN+4!

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRMIAUT

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: