Routine: BLRAG09F

Call Graph Total: 15

Package	Total	Call Graph
Automated Lab Instruments	6	(BUILDRI,CHKREQI)^LA7SM2 GETSITE^LA7SMP (CMT,END,HED,OCMT,PTID,SH,WARN)^LA7SMP0 ($$CHKTST,$$SMED)^LA7SMU $$RETFACID^LA7VHLU2 (AO,PRT)^LA7VQINS
VA Fileman	4	$$EXTERNAL^DILFD $$GET1^DIQ ^DIR ^DIWP
IHS Changes To Lab	2	$$DEV^BLRAG02 $$TESTNAME^BLRAGUT
Kernel	2	$$HTE^XLFDT ($$CJ,$$REPEAT)^XLFSTR
Lab Service	1	$$PRAC^LRX

Package

Total

Call Graph

(BUILDRI,CHKREQI)^LA7SM2 GETSITE^LA7SMP (CMT,END,HED,OCMT,PTID,SH,WARN)^LA7SMP0 ($$CHKTST,$$SMED)^LA7SMU $$RETFACID^LA7VHLU2 (AO,PRT)^LA7VQINS

VA Fileman

$$EXTERNAL^DILFD $$GET1^DIQ ^DIR ^DIWP

IHS Changes To Lab

$$DEV^BLRAG02 $$TESTNAME^BLRAGUT

Kernel

$$HTE^XLFDT ($$CJ,$$REPEAT)^XLFSTR

Lab Service

$$PRAC^LRX

Package	Total	Caller Graph
IHS Changes To Lab	2	BLRAG09B BLRAG09C

Package

Total

Caller Graph

IHS Changes To Lab

BLRAG09B BLRAG09C

Entry Points

Name	Comments	DBIA/ICR reference
DEV(BLRDEV)	; Print Shipping Manifest ; requires: ; LA7SCFG = Shipping Configuration pointer to file 62.9 ; LA7SM = Shipping Manifest pointer to file 62.8
ASK(LA7SM)	; Ask it user wants to print manifest. ; Call with array LA7SM = ien of 62.8^.01 field of #62.8
GETSITE(LA7X,LA7Y,LA7FS,LA7TS)	; Setup variables for ordering and host sites
DQ	;

External References

Name	Field # of Occurrence
$$DEV^BLRAG02	DEV+10
$$TESTNAME^BLRAGUT	DQ+163
$$EXTERNAL^DILFD	DQ+29
$$GET1^DIQ	DEV+6, DQ+31, DQ+103, GETSITE+8, GETSITE+14
^DIR	ASK+6
^DIWP	DQ+108
BUILDRI^LA7SM2	DQ+42
CHKREQI^LA7SM2	DQ+38
GETSITE^LA7SMP	DQ+10
CMT^LA7SMP0	DQ+110
END^LA7SMP0	DQ+166, ASK+7
HED^LA7SMP0	DQ+47, DQ+60, DQ+89, DQ+95, DQ+144, DQ+152, DQ+155, DQ+161
OCMT^LA7SMP0	DQ+111
PTID^LA7SMP0	DQ+66
SH^LA7SMP0	DQ+90, DQ+96
WARN^LA7SMP0	DQ+58, DQ+88, DQ+94, DQ+138
$$CHKTST^LA7SMU	DQ+36, DQ+73
$$SMED^LA7SMU	DQ+22
$$RETFACID^LA7VHLU2	GETSITE+10, GETSITE+16
AO^LA7VQINS	DQ+125, DQ+128
PRT^LA7VQINS	DQ+98
$$PRAC^LRX	DQ+77
$$HTE^XLFDT	DQ+17
$$CJ^XLFSTR	DQ+48
$$REPEAT^XLFSTR	DQ+146, DQ+147

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("No entries to print",IOM) Line Location: DQ+48
Function Call: WRITE	Prompt: !,LA7LINE Line Location: DQ+55
Function Call: WRITE	Prompt: !,LA7LINE Line Location: DQ+57
Function Call: WRITE	Prompt: ! Line Location: DQ+58
Function Call: WRITE	Prompt: ! Line Location: DQ+94
Function Call: WRITE	Prompt: ?(IOM-15)," Cost: $",$FN(LA7TCOST,",",2) Line Location: DQ+104
Function Call: WRITE	Prompt: ! Line Location: DQ+110
Function Call: WRITE	Prompt: ! Line Location: DQ+111
Function Call: WRITE	Prompt: !,?32 Condition for execution: ($X+$L(LA7NLTN)+3)>IOM Line Location: DQ+117
Function Call: WRITE	Prompt: " [",LA7NLTN,"]" Line Location: DQ+117
Function Call: WRITE	Prompt: $E(LA7Y,1,LA7X) Line Location: DQ+126
Function Call: WRITE	Prompt: !,?11,LA7X Line Location: DQ+130
Function Call: WRITE	Prompt: !,LA7LINE,!!,"End of Shipping Manifest" Line Location: DQ+134
Function Call: WRITE	Prompt: ! Line Location: DQ+137
Function Call: WRITE	Prompt: !!,"Number of specimens: ",LA7ITEM Line Location: DQ+145
Function Call: WRITE	Prompt: !!,"Receipted by: ",$$REPEAT^XLFSTR("_",40) Line Location: DQ+146
Function Call: WRITE	Prompt: !!," Date/time: ",$$REPEAT^XLFSTR("_",20) Line Location: DQ+147
Function Call: WRITE	Prompt: LA7ERR(LA7I)," (Cont'd)" Line Location: DQ+161
Routine Call	DIR Line Location: ASK+6

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	DQ+120
^LAB(60 - [#60]	DQ+100
^LAB(61 - [#61]	DQ+80
^LAB(62 - [#62]	DQ+83
^LAHM(62.8 - [#62.8]	DEV+8, DQ+4, DQ+33, DQ+34, DQ+62
^LAHM(62.9 - [#62.9]	DQ+5
^LRO(68 - [#68]	DQ+68, DQ+69, DQ+70, DQ+75, DQ+76, DQ+78, DQ+79
^TMP("BLRSM"	DQ+40*, DQ+46, DQ+50, DQ+51, DQ+52, DQ+53
^TMP("LA7ERR"	DQ+159, DQ+160
^UTILITY($J	DQ+106!, DQ+109

Name	Line Occurrences
DEV	ASK+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BLRC3	DQ+67*, DQ+68, DQ+69, DQ+70, DQ+71
>> BLRC4	DQ+68*, DQ+69, DQ+70, DQ+72
>> BLRC5	DQ+69*, DQ+70, DQ+72
>> BLRC6	DQ+70*, DQ+72
BLRDEV	DEV~, DEV+10*, DEV+14, DQ+2
>> BLREF	DEV+12, DEV+13, DEV+14*
>> BLRS3	DQ+50, DQ+51, DQ+52, DQ+53, DQ+56, DQ+59, DQ+157, DQ+159, DQ+160
>> BLRS4	DQ+51, DQ+52, DQ+53, DQ+56, DQ+59, DQ+158, DQ+159, DQ+160
>> BLRS5	DQ+52, DQ+53, DQ+55, DQ+57, DQ+64, DQ+65, DQ+159, DQ+160*, DQ+163
>> BLRS6	DQ+53, DQ+61, DQ+160, DQ+163
DIR	ASK+3~
DIR("A"	ASK+5*
DIR("B"	ASK+5*
DIR(0	ASK+5*
DIRUT	ASK+3~, ASK+6
>> DIWF	DQ+107*
>> DIWL	DQ+107*, DQ+109
>> DIWR	DQ+107*
DTOUT	ASK+3~
DUOUT	ASK+3~
>> I	DQ+34, DQ+62
IOM	DQ+30, DQ+48, DQ+104, DQ+107, DQ+123, DQ+126, DQ+129, DQ+137
IOSL	DQ+86, DQ+92, DQ+155, DQ+161
IOST	DQ+24, DQ+27
>> LA760	DQ+6, DQ+63, DQ+100, DQ+103
>> LA762	DQ+82*, DQ+83
>> LA762(0	DQ+83, DQ+84
>> LA762801	DQ+6, DQ+33, DQ+34, DQ+36, DQ+38, DQ+40, DQ+61*, DQ+62, DQ+73
>> LA762801(	DQ+34, DQ+62, DQ+105, DQ+108
>> LA762801(0	DQ+35, DQ+40, DQ+63, DQ+66
>> LA762801(5	DQ+121, DQ+122
>> LA7AA	DQ+72*, DQ+75, DQ+76, DQ+78, DQ+79
>> LA7ACC	DQ+75*
>> LA7AD	DQ+72*, DQ+75, DQ+76, DQ+78, DQ+79
>> LA7AN	DQ+72*, DQ+75, DQ+76, DQ+78, DQ+79
>> LA7CDT	DQ+78*
>> LA7CHK	DQ+15*, DQ+38
LA7CMT	DQ+106!, DQ+109*
>> LA7DC	DQ+6, DQ+96
>> LA7END	DQ+6*
>> LA7ERR(	DQ+154, DQ+156, DQ+161
>> LA7ERR(""	DQ+150
>> LA7EXIT	DQ+6*, DQ+50, DQ+51, DQ+52, DQ+53, DQ+54, DQ+56, DQ+64, DQ+86, DQ+92 , DQ+95, DQ+132, DQ+154, DQ+155, DQ+159, DQ+160, DQ+161
LA7FS	GETSITE~, GETSITE+8, GETSITE+9
LA7FS(99	GETSITE+10, GETSITE+11
>> LA7FSITE	DQ+7*, DQ+10
>> LA7I	DQ+153, DQ+154, DQ+156, DQ+157, DQ+161
>> LA7ITEM	DQ+6, DQ+85, DQ+145
>> LA7LINE	DQ+30*, DQ+55, DQ+57, DQ+93, DQ+99, DQ+134
>> LA7NOW	DQ+17*
>> LA7PAGE	DQ+6*, DQ+58
>> LA7PROV	DQ+77*
>> LA7SBC	DEV+6, DEV+8, DQ+27*
>> LA7SCFG	DEV+6, DQ+5*
>> LA7SCFG(0	DQ+5*, DQ+10, DQ+24, DQ+120
>> LA7SCOND	DQ+44, DQ+56, DQ+59
>> LA7SCONT	DQ+44, DQ+56, DQ+59
>> LA7SDT	DQ+22*
>> LA7SKIP	DQ+13, DQ+36, DQ+37, DQ+71, DQ+73, DQ+74, DQ+91
LA7SM	DEV+8, DQ+4, DQ+22, DQ+33, DQ+34, DQ+36, DQ+38, DQ+62, DQ+73, DQ+158 , ASK~
LA7SM(0	DQ+4*, DQ+5, DQ+19, DQ+31, DQ+118
>> LA7SMR	DQ+6, DQ+24, DQ+141, DQ+143, DQ+151
>> LA7SMST	DQ+19, DQ+20, DQ+29, DQ+58, DQ+88, DQ+94, DQ+101, DQ+136
>> LA7SPEC	DQ+79*, DQ+80, DQ+82
>> LA7SPEC(0	DQ+80, DQ+81, DQ+100
>> LA7SVIA	DQ+31*
LA7TCOST	DQ+102~, DQ+103*, DQ+104
LA7TS	GETSITE~, GETSITE+14, GETSITE+15
LA7TS(99	GETSITE+16, GETSITE+17
>> LA7TSITE	DQ+7*, DQ+10
>> LA7UID	DQ+44, DQ+55, DQ+57, DQ+60, DQ+64, DQ+65*, DQ+67, DQ+71, DQ+98, DQ+111 , DQ+125, DQ+128
LA7X	DQ+119~, DQ+120, DQ+121, DQ+126, DQ+129, DQ+130*, GETSITE~, GETSITE+8, GETSITE+9, GETSITE+10 , GETSITE+11, GETSITE+16
LA7Y	DQ+119~, DQ+122, DQ+123, DQ+124, DQ+126, DQ+129, DQ+130*, GETSITE~, GETSITE+14, GETSITE+15 , GETSITE+17
LA7Z	DQ+119~, DQ+129*, DQ+130
>> LRDFN	DQ+66*
>> POP	DEV+12, DEV+13, DEV+15
U	DQ+76, DQ+78
X	DQ+76, DQ+77, DQ+108, ASK+3~
Y	ASK+3~, ASK+7
>> ZTQUEUED	DQ+166

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRAG09F

Information

Source Information