Routine: BLRAGUT1

Package	Total	Call Graph
Kernel	2	($$FMADD,$$FMTE,$$HTE,$$NOW)^XLFDT $$UP^XLFSTR
Lab Service	1	DFN^LRDAGE

Package	Total	Caller Graph
IHS Changes To Lab	1	BLRAG05D

Entry Points

Name	Comments	DBIA/ICR reference
PCCVFILE(LRAA,LRAS,LRCDT,LRSS,PCCVISIT)	; EP - Try to determine if Accession already in PCC File
SETUP()
SETVARS()	; EP - Set the necessary variables for BLREVTQ to work
WHYNOT(LRAS,MESSAGE)	; EP - Store Reason why ^BLREVTQ not called
WHYNCNTM(MESSAGE)	; EP - Just count messages
CNTERRS(ERRMSG)	; EP

External References

Name	Field # of Occurrence
DFN^LRDAGE	SETVARS+33
$$FMADD^XLFDT	SETUP+3
$$FMTE^XLFDT	SETVARS+44
$$HTE^XLFDT	SETVARS+48
$$NOW^XLFDT	SETUP+3
$$UP^XLFSTR	WHYNCNTM+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	SETVARS+34
^AUPNVLAB - [#9000010.09]	PCCVFILE+11
^BLRTXLOG("D"	SETVARS+4
^DPT - [#2]	SETVARS+35
^LR - [#63]	SETVARS+30
^LRO(68 - [#68]	SETVARS+1, SETVARS+6, SETVARS+9, SETVARS+12, SETVARS+24, SETVARS+27, SETVARS+29, SETVARS+53, SETVARS+58, SETVARS+60
^LRO(69 - [#69]	SETVARS+15, SETVARS+18, SETVARS+56
^TMP("BLRPCCRR"	WHYNOT+1, CNTERRS+1
^VA(200 - [#200]	SETVARS+62

Label References

Name	Line Occurrences
$$PCCVFILE	SETVARS+26
$$SETVARS	SETUP+4
$$WHYNOT	SETVARS+2, SETVARS+4, SETVARS+7, SETVARS+10, SETVARS+13, SETVARS+16, SETVARS+19, SETVARS+26, SETVARS+31
CNTERRS	WHYNCNTM+3, WHYNCNTM+4, WHYNCNTM+5, WHYNCNTM+6, WHYNCNTM+7, WHYNCNTM+8, WHYNCNTM+9, WHYNCNTM+10, WHYNCNTM+12
WHYNCNTM	WHYNOT+4

Naked Globals

Name	Field # of Occurrence
^(0	SETVARS+35, SETVARS+53

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AUTOLOAD	SETUP+2*, WHYNOT+6
>> BID	SETVARS+34*
>> BLRCMF	SETVARS+38*
>> BLRDH	SETVARS+38*
>> BLRIDS	SETVARS+42*
>> BLRLOG	SETVARS+38*
>> BLRPARAM	SETVARS+66*
>> BLRPCC	SETVARS+38*
>> BLRQSITE	SETVARS+41*
>> BLRQUIET	SETVARS+41*
>> BLRSTOP	SETVARS+41*
BLRVERN	PCCVFILE+1~, PCCVFILE+3*
CDTPCC	PCCVFILE+1~, PCCVFILE+11*, PCCVFILE+12
>> D0	SETVARS+27*
>> DA	SETVARS+27*
>> DFN	SETVARS+30*, SETVARS+31, SETVARS+33, SETVARS+34, SETVARS+35
DUZ	SETVARS+62
DUZ(2	SETVARS+34, SETVARS+41
ERRMSG	CNTERRS~, CNTERRS+1
FOUNDIT	PCCVFILE+1~, PCCVFILE+9, PCCVFILE+10, PCCVFILE+12, PCCVFILE+14
>> HRCN	SETVARS+34*
LRAA	SETVARS+1, SETVARS+6, SETVARS+9, SETVARS+12, SETVARS+24, SETVARS+26, SETVARS+27, SETVARS+29, SETVARS+53, SETVARS+58 , SETVARS+60, PCCVFILE~
>> LRACC	SETVARS+42*
>> LRACD	SETVARS+47*
>> LRAD	SETVARS+1, SETVARS+9, SETVARS+12, SETVARS+16, SETVARS+24, SETVARS+27, SETVARS+29, SETVARS+47, SETVARS+53, SETVARS+58 , SETVARS+60
>> LRAN	SETVARS+1, SETVARS+9, SETVARS+12, SETVARS+24, SETVARS+27, SETVARS+29, SETVARS+53, SETVARS+58, SETVARS+60
>> LRAOD	SETVARS+47*
LRAS	SETVARS+1*, SETVARS+2, SETVARS+4, SETVARS+7, SETVARS+10, SETVARS+13, SETVARS+16, SETVARS+19, SETVARS+26, SETVARS+31 , SETVARS+42, PCCVFILE~, PCCVFILE+5, PCCVFILE+6, WHYNOT~, WHYNOT+1
LRCDT	SETVARS+24, SETVARS+26, SETVARS+33, SETVARS+44, PCCVFILE~, PCCVFILE+8, PCCVFILE+12
>> LRDAT	SETVARS+45*
>> LRDFN	SETVARS+29*, SETVARS+30, SETVARS+31, SETVARS+50
>> LRDT0	SETVARS+48*
>> LRIDT	SETVARS+27*, SETVARS+50
>> LRLABKY	SETVARS+49*
>> LRLLOC	SETVARS+53*
>> LRLOCKER	SETVARS+50*
>> LRODT	SETVARS+15*, SETVARS+16, SETVARS+18, SETVARS+56
>> LROUTINE	SETVARS+51*
>> LRPANEL	SETVARS+51*
>> LRPCEVSO	SETVARS+51*
>> LRPRAC	SETVARS+55, SETVARS+56
>> LRSN	SETVARS+18*, SETVARS+19, SETVARS+56
LRSS	SETVARS+6*, SETVARS+7, SETVARS+26, SETVARS+50, PCCVFILE~, PCCVFILE+5, PCCVFILE+6
>> LRUID	SETVARS+60*
>> LRUSI	SETVARS+63*
>> LRUSNM	SETVARS+64*
MESSAGE	WHYNOT~, WHYNOT+1, WHYNOT+4, WHYNCNTM~, WHYNCNTM+1*, WHYNCNTM+3, WHYNCNTM+4, WHYNCNTM+5, WHYNCNTM+6, WHYNCNTM+7 , WHYNCNTM+8, WHYNCNTM+9, WHYNCNTM+10, WHYNCNTM+12
>> NOTSENT	SETUP+1, WHYNOT+2
>> ORDNUM	SETVARS+12*, SETVARS+13, SETVARS+15, SETVARS+16, SETVARS+18
>> ORIGACCD	SETVARS+9*, SETVARS+10
>> PCCFILE	PCCVFILE+5, PCCVFILE+6, PCCVFILE+10
PCCIEN	PCCVFILE+1~, PCCVFILE+9, PCCVFILE+10, PCCVFILE+11, PCCVFILE+12
PCCVISIT	SETVARS+26, PCCVFILE~, PCCVFILE+14*
>> PID	SETVARS+34*
>> PNM	SETVARS+35*
>> PTR	SETVARS+53, SETVARS+58
>> SSN	SETVARS+36*
>> STR	SETVARS+35, SETVARS+36, SETVARS+44, SETVARS+45, SETVARS+62*, SETVARS+63, SETVARS+64
U	SETVARS+56
>> YEARAGO	SETUP+3*, SETVARS+10

Marked Items

Name	Field # of Occurrence
$T(	PCCVFILE+3

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRAGUT1

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items