Routine: BLRAG09D

Package	Total	Call Graph
Automated Lab Instruments	5	(BUILDRI,CHKREQI)^LA7SM2 (KILL,PTID)^LA7SMP0 ($$CHKTST,$$SMED)^LA7SMU $$RETFACID^LA7VHLU2 (GAR,MCD,MCR,PI)^LA7VQINS
IHS Changes To Lab	3	$$DIAGICD^BLRAG07 (CMT,HED,INIT,OCMT,SH,WARN)^BLRAG09E ($$FILL,$$TESTNAME)^BLRAGUT
VA Fileman	3	$$EXTERNAL^DILFD $$GET1^DIQ ^DIWP
Kernel	2	$$HTE^XLFDT ($$CJ,$$REPEAT)^XLFSTR
Lab Service	1	$$PRAC^LRX

Package	Total	Caller Graph
IHS Changes To Lab	2	BLRAG09B BLRAG09G

Entry Points

Name	Comments	DBIA/ICR reference
GETSITE(LA7X,LA7Y,LA7FS,LA7TS)	; Setup variables for ordering and host sites
AO(UID)	;-- print ask at order questions/responses
DGP(ORI)	;
DEVT(BLRTXT,LA7SCFG,LA7SM,BLRIOM,BLRIOSL)	; collect manifest text for terminal display
PRT(UID)	;EP -- print out insurance information on manifest
WR(CAP,VAL,TAB,NL)	;-- write out the line

External References

Name	Field # of Occurrence
$$DIAGICD^BLRAG07	DGP+8
CMT^BLRAG09E	DEVT+134
HED^BLRAG09E	DEVT+66, DEVT+80, DEVT+110, DEVT+116, DEVT+165, DEVT+176, DEVT+179, DEVT+185
INIT^BLRAG09E	DEVT+20
OCMT^BLRAG09E	DEVT+136
SH^BLRAG09E	DEVT+111, DEVT+117
WARN^BLRAG09E	DEVT+78, DEVT+109, DEVT+115, DEVT+159
$$FILL^BLRAGUT	DEVT+120, DEVT+121, DEVT+122, DEVT+127, DEVT+140, DEVT+149, DEVT+187, PRT+11, PRT+49, WR+2
$$TESTNAME^BLRAGUT	DEVT+187
$$EXTERNAL^DILFD	DEVT+48
$$GET1^DIQ	DEVT+24, DEVT+50, DEVT+125, PRT+6, PRT+9, PRT+12, GETSITE+8, GETSITE+14
^DIWP	DEVT+131
BUILDRI^LA7SM2	DEVT+61
CHKREQI^LA7SM2	DEVT+57
KILL^LA7SMP0	DEVT+191
PTID^LA7SMP0	DEVT+87
$$CHKTST^LA7SMU	DEVT+55, DEVT+94
$$SMED^LA7SMU	DEVT+41
$$RETFACID^LA7VHLU2	GETSITE+10, GETSITE+16
GAR^LA7VQINS	PRT+10
MCD^LA7VQINS	PRT+25
MCR^LA7VQINS	PRT+28, PRT+31
PI^LA7VQINS	PRT+35
$$PRAC^LRX	DEVT+98
$$HTE^XLFDT	DEVT+36
$$CJ^XLFSTR	DEVT+68
$$REPEAT^XLFSTR	DEVT+169, DEVT+171

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ
^LAB(60 - [#60]	GET1^DIQ
^LAHM(62.8 - [#62.8]	EXTERNAL^DILFD
^LAHM(62.9 - [#62.9]	GET1^DIQ
^LAHM(62.92 - [#62.92]	GET1^DIQ
^BLRRLO - [#9009026.3]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BLRRLO - [#9009026.3]	PRT+14, PRT+19, PRT+21, AO+5, AO+6, DGP+3, DGP+5
^BLRRLO("ACC"	PRT+4, AO+2
^BLRSITE - [#9009029]	PRT+2
^DIC(4 - [#4]	DEVT+139
^ICD9 - [#80]	DGP+6
^LAB(60 - [#60]	DEVT+121
^LAB(61 - [#61]	DEVT+101
^LAB(62 - [#62]	DEVT+104
^LAHM(62.8 - [#62.8]	DEVT+12, DEVT+26, DEVT+52, DEVT+53, DEVT+82
^LAHM(62.9 - [#62.9]	DEVT+17
^LRO(68 - [#68]	DEVT+89, DEVT+90, DEVT+91, DEVT+96, DEVT+97, DEVT+99, DEVT+100
^TMP("BLRSM"	DEVT+15!, DEVT+59*, DEVT+65, DEVT+70, DEVT+71, DEVT+72, DEVT+73, DEVT+192!
^TMP("LA7ERR"	DEVT+183, DEVT+184
^TMP($J	PRT+7, PRT+8*
^UTILITY($J	DEVT+129!, DEVT+132

Label References

Name	Line Occurrences
AO	DEVT+144, DEVT+147
DGP	PRT+50
GETSITE	DEVT+29
PRT	DEVT+119
WR	PRT+12, PRT+13, PRT+15, PRT+16, PRT+17, PRT+36, PRT+38, PRT+39, PRT+40, PRT+41 , PRT+42, PRT+43, PRT+44, PRT+45, PRT+46, PRT+47, PRT+48, AO+16, AO+18, DGP+9 , DGP+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACC	AO+4~, AO+7*, AO+8
ANS	AO+4~, AO+14*, AO+18
BDA	PRT+19, PRT+21, DGP+1~, DGP+3, DGP+5
>> BLRC3	DEVT+88*, DEVT+89, DEVT+90, DEVT+91, DEVT+92
>> BLRC4	DEVT+89*, DEVT+90, DEVT+91, DEVT+93
>> BLRC5	DEVT+90*, DEVT+91, DEVT+93
>> BLRC6	DEVT+91*, DEVT+93
BLRI	DEVT+9~, DEVT+10, DEVT+67, DEVT+68, DEVT+75, DEVT+77, DEVT+78, DEVT+108, DEVT+114, DEVT+115* , DEVT+120, DEVT+122, DEVT+126, DEVT+127, DEVT+133, DEVT+134, DEVT+135, DEVT+136, DEVT+143, DEVT+145 , DEVT+149, DEVT+153, DEVT+154, DEVT+155, DEVT+158, DEVT+166, DEVT+167, DEVT+168, DEVT+169, DEVT+170 , DEVT+171, DEVT+180, DEVT+185, DEVT+187, DEVT+188, DEVT+189, PRT+11, PRT+49, AO+11, AO+12 , WR+1, WR+2
BLRIOM	DEVT~, DEVT+21*, DEVT+68, DEVT+127, DEVT+130, DEVT+142, DEVT+145, DEVT+148, DEVT+158
BLRIOSL	DEVT~, DEVT+22*, DEVT+107, DEVT+113, DEVT+179, DEVT+185
>> BLRS3	DEVT+70, DEVT+71, DEVT+72, DEVT+73, DEVT+76, DEVT+79, DEVT+181, DEVT+183, DEVT+184
>> BLRS4	DEVT+71, DEVT+72, DEVT+73, DEVT+76, DEVT+79, DEVT+182, DEVT+183, DEVT+184
>> BLRS5	DEVT+72, DEVT+73, DEVT+75, DEVT+77, DEVT+84, DEVT+85, DEVT+183, DEVT+184, DEVT+187
>> BLRS6	DEVT+73, DEVT+81, DEVT+184, DEVT+187
BLRTXT	DEVT~, DEVT+121, DEVT+122, DEVT+140, DEVT+142, DEVT+143, DEVT+145
BLRTXT(	DEVT+67, DEVT+68, DEVT+75, DEVT+77, DEVT+78, DEVT+108, DEVT+114, DEVT+115, DEVT+120, DEVT+122 , DEVT+126, DEVT+127, DEVT+133, DEVT+134, DEVT+135, DEVT+136, DEVT+143, DEVT+145, DEVT+149, DEVT+153 , DEVT+154, DEVT+155, DEVT+158, DEVT+166, DEVT+167, DEVT+168, DEVT+169, DEVT+170, DEVT+171, DEVT+180 , DEVT+185, DEVT+187, DEVT+188, DEVT+189, PRT+11, PRT+49, AO+11, AO+12, WR+1, WR+2
BLRY	DEVT+9~, DEVT+11, DEVT+67, DEVT+68, DEVT+75, DEVT+77, DEVT+78, DEVT+107, DEVT+108, DEVT+113 , DEVT+114, DEVT+115, DEVT+120, DEVT+122, DEVT+126, DEVT+127, DEVT+133, DEVT+134, DEVT+135, DEVT+136* , DEVT+143, DEVT+145, DEVT+149, DEVT+153, DEVT+154, DEVT+155, DEVT+158, DEVT+166, DEVT+167, DEVT+168 , DEVT+169, DEVT+170, DEVT+171, DEVT+179, DEVT+180, DEVT+185, DEVT+187, DEVT+188, DEVT+189, PRT+11* , PRT+49, AO+11, AO+12, WR+1, WR+2*
BTP	PRT+1~, PRT+9*, PRT+13
CAP	WR~, WR+2
CNT	PRT+1~, PRT+18, PRT+20, PRT+51, DGP+1~, DGP+2, DGP+4
DATA	AO+4~, AO+6*, AO+7, AO+13, AO+14, AO+15
>> DFN	PRT+10
>> DIWF	DEVT+130*
>> DIWL	DEVT+130*, DEVT+132
>> DIWR	DEVT+130*
DUZ(2	PRT+2
DX	DGP+1~, DGP+5*, DGP+6, DGP+8
DXE	DGP+1~, DGP+6*, DGP+9
DXEE	DGP+1~, DGP+8*, DGP+10
>> GT1(4	PRT+15, PRT+45
>> GT1(6	PRT+17, PRT+47
>> GT1(7	PRT+16, PRT+46
HEAD	AO+1~, AO+9, AO+10*, AO+19!
>> I	DEVT+53, DEVT+82
IEIEN	PRT+1~, PRT+24, PRT+27, PRT+28, PRT+30, PRT+31, PRT+34, PRT+35
IIEN	PRT+1~, PRT+22*, PRT+25, PRT+28, PRT+31
>> IN1("18E"	PRT+43
>> IN1(17	PRT+42
>> IN1(20	PRT+44
>> IN1(37	PRT+48
>> IN1(4	PRT+36
>> IN1(5	PRT+39
>> IN1(6	PRT+41
>> IN1(7	PRT+40
>> IN1(9	PRT+38
IPIEN	PRT+1~, PRT+33*, PRT+35
>> LA760	DEVT+18, DEVT+83, DEVT+121, DEVT+125
>> LA762	DEVT+103*, DEVT+104
>> LA762(0	DEVT+104, DEVT+105
>> LA762801	DEVT+18, DEVT+52, DEVT+53, DEVT+55, DEVT+57, DEVT+59, DEVT+81*, DEVT+82, DEVT+94
>> LA762801(	DEVT+53, DEVT+82, DEVT+128, DEVT+131
>> LA762801(0	DEVT+54, DEVT+59, DEVT+83, DEVT+86, DEVT+87
>> LA762801(5	DEVT+140, DEVT+141
>> LA7AA	DEVT+93*, DEVT+96, DEVT+97, DEVT+99, DEVT+100
>> LA7ACC	DEVT+96*
>> LA7AD	DEVT+93*, DEVT+96, DEVT+97, DEVT+99, DEVT+100
>> LA7AN	DEVT+93*, DEVT+96, DEVT+97, DEVT+99, DEVT+100
>> LA7CDT	DEVT+99*
>> LA7CHK	DEVT+34*, DEVT+57
LA7CMT	DEVT+129!, DEVT+132*
>> LA7DC	DEVT+18, DEVT+117
>> LA7ECH	PRT+3*
>> LA7END	DEVT+18*
>> LA7ERR(	DEVT+178, DEVT+180, DEVT+185
>> LA7ERR(""	DEVT+174
>> LA7EXIT	DEVT+18*, DEVT+70, DEVT+71, DEVT+72, DEVT+73, DEVT+74, DEVT+76, DEVT+84, DEVT+107, DEVT+113 , DEVT+116, DEVT+151, DEVT+178, DEVT+179, DEVT+183, DEVT+184, DEVT+185
LA7FS	GETSITE~, GETSITE+8, GETSITE+9
LA7FS(99	GETSITE+10, GETSITE+11
>> LA7FSITE	DEVT+19*, DEVT+29
>> LA7I	DEVT+177, DEVT+178, DEVT+180, DEVT+181, DEVT+185
>> LA7ITEM	DEVT+18, DEVT+106, DEVT+167
>> LA7LINE	DEVT+49*, DEVT+75, DEVT+77, DEVT+114, DEVT+120, DEVT+153, PRT+11, PRT+49
>> LA7NOW	DEVT+36*
LA7OBX	AO+4~
>> LA7PAGE	DEVT+18*, DEVT+78
>> LA7PROV	DEVT+63, DEVT+98
>> LA7SBC	DEVT+24, DEVT+26
LA7SCFG	DEVT~, DEVT+17*, DEVT+24
LA7SCFG(0	DEVT+17*, DEVT+29, DEVT+139
>> LA7SCOND	DEVT+63, DEVT+76, DEVT+79
>> LA7SCONT	DEVT+63, DEVT+76, DEVT+79
>> LA7SDT	DEVT+41*
>> LA7SKIP	DEVT+32, DEVT+55, DEVT+56, DEVT+92, DEVT+94, DEVT+95, DEVT+112
LA7SM	DEVT~, DEVT+12, DEVT+13, DEVT+16, DEVT+26, DEVT+41, DEVT+52, DEVT+53, DEVT+55, DEVT+57 , DEVT+82, DEVT+94, DEVT+182
LA7SM(0	DEVT+12*, DEVT+13, DEVT+14, DEVT+16, DEVT+17, DEVT+38, DEVT+50, DEVT+137
>> LA7SMR	DEVT+18, DEVT+162, DEVT+164, DEVT+175*
>> LA7SMST	DEVT+38, DEVT+39, DEVT+48, DEVT+78, DEVT+109, DEVT+115, DEVT+123, DEVT+157
>> LA7SPEC	DEVT+100*, DEVT+101, DEVT+103
>> LA7SPEC(0	DEVT+101, DEVT+102, DEVT+122
>> LA7SVIA	DEVT+50*
LA7TCOST	DEVT+124~, DEVT+125*, DEVT+127
LA7TS	GETSITE~, GETSITE+14, GETSITE+15
LA7TS(99	GETSITE+16, GETSITE+17
>> LA7TSITE	DEVT+19*, DEVT+29
>> LA7UID	DEVT+63, DEVT+75, DEVT+77, DEVT+80, DEVT+84, DEVT+85*, DEVT+88, DEVT+92, DEVT+119, DEVT+136 , DEVT+144, DEVT+147
LA7X	DEVT+138~, DEVT+139, DEVT+140, DEVT+145, DEVT+148, DEVT+149*, GETSITE~, GETSITE+8, GETSITE+9, GETSITE+10 , GETSITE+11, GETSITE+16
LA7Y	DEVT+138~, DEVT+141, DEVT+142, DEVT+143, DEVT+145, DEVT+148, DEVT+149*, GETSITE~, GETSITE+14, GETSITE+15 , GETSITE+17
LA7Z	DEVT+138~, DEVT+148*, DEVT+149
>> LRDFN	DEVT+87*
NINS	PRT+1~, PRT+2*, PRT+20
NL	WR~, WR+1
ODA	AO+4~, AO+5*, AO+6
ORD	PRT+1~, PRT+6*, PRT+7, PRT+8
ORI	PRT+1~, PRT+4, PRT+5, PRT+6, PRT+9, PRT+12, PRT+14, PRT+19, PRT+21, PRT+50 , AO+1~, AO+2, AO+3, AO+5, AO+6, DGP~, DGP+3, DGP+5
QUES	AO+4~, AO+13*, AO+16, AO+17
RSC	AO+4~, AO+15*
STR	PRT+1~, PRT+21*, PRT+22, PRT+23, PRT+24, PRT+26, PRT+27, PRT+29, PRT+30, PRT+32 , PRT+33, PRT+34, PRT+37
TAB	WR~, WR+2
TB	AO+1~, AO+17*, AO+18
U	DEVT+13, DEVT+16, DEVT+97, DEVT+99, PRT+2, PRT+14, AO+7, AO+13, AO+14, AO+15 , DGP+5, DGP+6
UID	PRT~, PRT+4, PRT+8, AO~, AO+2, AO+8
VAL	WR~, WR+2
>> X	DEVT+97, DEVT+98, DEVT+131

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRAG09D

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 2

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: