Routine: LA7SMP

Call Graph Total: 18

Package	Total	Call Graph
Automated Lab Instruments	6	(BUILDRI,CHKREQI)^LA7SM2 GETSITE^LA7SMP (CMT,END,HED,INIT,KILL,OCMT,PTID,SH,WARN)^LA7SMP0 ($$CHKTST,$$SELSM,$$SMED)^LA7SMU $$RETFACID^LA7VHLU2 (AO,PRT)^LA7VQINS
Kernel	5	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD $$HTE^XLFDT ($$CJ,$$REPEAT)^XLFSTR
VA Fileman	5	EN^DDIOL $$EXTERNAL^DILFD $$GET1^DIQ ^DIR ^DIWP
IHS Changes To Lab	1	($$ASKCOP,$$GETCOP)^BLRRLEVN
Lab Service	1	$$PRAC^LRX

Package	Total	Caller Graph
Automated Lab Instruments	6	LA7S MANIFEST PRINT LA7SM LA7SM2 LA7SMB LA7SMP LA7SMPXL
IHS Changes To Lab	1	BLRAG09F

Package

Total

Caller Graph

Automated Lab Instruments

LA7S MANIFEST PRINT LA7SM LA7SM2 LA7SMB LA7SMP LA7SMPXL

IHS Changes To Lab

BLRAG09F

Entry Points

Name	Comments	DBIA/ICR reference
ASK(LA7SM)	; Ask it user wants to print manifest. ; Call with array LA7SM = ien of 62.8^.01 field of #62.8
EN	;
GETSITE(LA7X,LA7Y,LA7FS,LA7TS)	; Setup variables for ordering and host sites
DEV	; Alternate entry point when user has already selected a manifest.
DQ	;

External References

Name	Field # of Occurrence
^%ZIS	DEV+17
HOME^%ZIS	DEV+19
^%ZISC	DEV+24
^%ZTLOAD	DEV+24
$$ASKCOP^BLRRLEVN	DEV+16
$$GETCOP^BLRRLEVN	DEV+15
EN^DDIOL	EN+1, EN+7, DEV+25
$$EXTERNAL^DILFD	DQ+28
$$GET1^DIQ	DEV+3, DQ+30, DQ+97, DQ+154, GETSITE+8, GETSITE+14
^DIR	DEV+9, ASK+6
^DIWP	DQ+102
BUILDRI^LA7SM2	DQ+41
CHKREQI^LA7SM2	DQ+37
GETSITE^LA7SMP	DQ+9
CMT^LA7SMP0	DQ+104
END^LA7SMP0	EN+17, DQ+157, ASK+7
HED^LA7SMP0	DQ+46, DQ+57, DQ+83, DQ+89, DQ+138, DQ+146, DQ+149, DQ+153
INIT^LA7SMP0	EN+3
KILL^LA7SMP0	EN+2, EN+4, EN+8
OCMT^LA7SMP0	DQ+105
PTID^LA7SMP0	DQ+63
SH^LA7SMP0	DQ+84, DQ+90
WARN^LA7SMP0	DQ+55, DQ+82, DQ+88, DQ+132
$$CHKTST^LA7SMU	DQ+35, DQ+67
$$SELSM^LA7SMU	EN+5
$$SMED^LA7SMU	DQ+21
$$RETFACID^LA7VHLU2	GETSITE+10, GETSITE+16
AO^LA7VQINS	DQ+119, DQ+122
PRT^LA7VQINS	DQ+92
$$PRAC^LRX	DQ+71
$$HTE^XLFDT	DQ+16
$$CJ^XLFSTR	DQ+47
$$REPEAT^XLFSTR	DQ+140, DQ+141

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EN+10
Function Call: WRITE	Prompt: @IOF Line Location: EN+16
Function Call: WRITE	Prompt: !!,$$CJ^XLFSTR("No entries to print",IOM) Line Location: DQ+47
Function Call: WRITE	Prompt: !,LA7LINE Line Location: DQ+52
Function Call: WRITE	Prompt: !,LA7LINE Line Location: DQ+54
Function Call: WRITE	Prompt: ! Line Location: DQ+55
Function Call: WRITE	Prompt: ! Line Location: DQ+81
Function Call: WRITE	Prompt: !,LA7LINE Line Location: DQ+87
Function Call: WRITE	Prompt: ! Line Location: DQ+88
Function Call: WRITE	Prompt: !,?11,$E(LA7LINE,1,41) Line Location: DQ+93
Function Call: WRITE	Prompt: !,?11,$P(^LAB(60,LA760,0),"^",1),?43,$P(LA7SPEC(0),"^") Line Location: DQ+94
Function Call: WRITE	Prompt: ! Condition for execution: $X>(IOM-15) Line Location: DQ+98
Function Call: WRITE	Prompt: ?(IOM-15)," Cost: $",$FN(LA7TCOST,",",2) Line Location: DQ+98
Function Call: WRITE	Prompt: ! Line Location: DQ+104
Function Call: WRITE	Prompt: ! Line Location: DQ+104
Function Call: WRITE	Prompt: ! Line Location: DQ+105
Function Call: WRITE	Prompt: ! Line Location: DQ+105
Function Call: WRITE	Prompt: !,?32 Condition for execution: ($X+$L(LA7NLTN)+3)>IOM Line Location: DQ+111
Function Call: WRITE	Prompt: " [",LA7NLTN,"]" Line Location: DQ+111
Function Call: WRITE	Prompt: !,?11,LA7X,$S($L($P(LA762801(5),"^")):$P(LA762801(5),"^"),1:"* None specified *")," " Line Location: DQ+115
Function Call: WRITE	Prompt: $E(LA7Y,1,LA7X) Line Location: DQ+120
Function Call: WRITE	Prompt: !,?11,LA7X Line Location: DQ+124
Function Call: WRITE	Prompt: !,LA7LINE,!!,"End of Shipping Manifest" Line Location: DQ+128
Function Call: WRITE	Prompt: ! Line Location: DQ+131
Function Call: WRITE	Prompt: !!,"Number of specimens: ",LA7ITEM Line Location: DQ+139
Function Call: WRITE	Prompt: !!,"Receipted by: ",$$REPEAT^XLFSTR("_",40) Line Location: DQ+140
Function Call: WRITE	Prompt: !!," Date/time: ",$$REPEAT^XLFSTR("_",20) Line Location: DQ+141
Function Call: WRITE	Prompt: LA7ERR(LA7I) Line Location: DQ+150
Function Call: WRITE	Prompt: LA7ERR(LA7I)," (Cont'd)" Line Location: DQ+153
Function Call: WRITE	Prompt: !,?10,"UID: ",$QS(LA7ROOT,5)," Test: ",$$GET1^DIQ(60,$QS(LA7ROOT,6)_",",.01) Line Location: DQ+154
Function Call: WRITE	Prompt: !! Line Location: DQ+155
Routine Call	%ZIS Line Location: DEV+19
Routine Call	DIR Line Location: DEV+9 ASK+6
Routine Call	%ZIS Line Location: DEV+17

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+114
^LAB(60 - [#60]	DQ+94
^LAB(61 - [#61]	DQ+74
^LAB(62 - [#62]	DQ+77
^LAHM(62.8 - [#62.8]	DEV+5, DEV+6, DQ+4, DQ+32, DQ+33, DQ+59
^LAHM(62.9 - [#62.9]	DQ+5
^LRO(68 - [#68]	DQ+64, DQ+69, DQ+70, DQ+72, DQ+73
^TMP("LA7SM"	DQ+39*, DQ+45
^UTILITY($J	DQ+100!, DQ+103

Name	Line Occurrences
DEV	EN+11, ASK+7
DQ	EN+15, ASK+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	DEV+17*
>> COP	EN+14, DEV+16*
>> COPI	DEV+15*, DEV+16
DIR	DEV+7~, ASK+3~
DIR("A"	DEV+8, ASK+5
DIR("B"	DEV+8, ASK+5
DIR(0	DEV+8, ASK+5
DIRUT	DEV+7~, DEV+10, ASK+3~, ASK+6
>> DIWF	DQ+101*
>> DIWL	DQ+101*, DQ+103
>> DIWR	DQ+101*
DTOUT	DEV+7~, ASK+3~
DUOUT	DEV+7~, ASK+3~
DUZ(2	DEV+15
>> I	DQ+33, DQ+59
IO	DQ+2
IO("Q"	DEV+21
IOM	DQ+29, DQ+47, DQ+98, DQ+101, DQ+117, DQ+120, DQ+123, DQ+131
IOSL	DQ+80, DQ+86, DQ+149, DQ+153
IOST	DQ+23, DQ+26
L	EN+13~, EN+14*
>> LA760	DQ+6, DQ+60, DQ+94, DQ+97
>> LA762	DQ+76*, DQ+77
>> LA762(0	DQ+77, DQ+78
>> LA762801	DQ+6, DQ+32, DQ+33, DQ+35, DQ+37, DQ+39, DQ+58*, DQ+59, DQ+67
>> LA762801(	DQ+33, DQ+59, DQ+99, DQ+102
>> LA762801(0	DQ+34, DQ+39, DQ+60, DQ+63
>> LA762801(5	DQ+115, DQ+116
>> LA7AA	DQ+66*, DQ+69, DQ+70, DQ+72, DQ+73
>> LA7ACC	DQ+69*
>> LA7AD	DQ+66*, DQ+69, DQ+70, DQ+72, DQ+73
>> LA7AN	DQ+66*, DQ+69, DQ+70, DQ+72, DQ+73
>> LA7CDT	DQ+72*
>> LA7CHK	EN+9, DQ+14, DQ+37
LA7CMT	DQ+100!, DQ+103*
>> LA7DC	DQ+6, DQ+90
>> LA7END	DQ+6*
>> LA7ERR(	DQ+148, DQ+150, DQ+153
>> LA7ERR(""	DQ+144
>> LA7EXIT	DEV+10, DEV+12, DEV+20, DEV+26, DQ+6, DQ+50, DQ+51, DQ+53, DQ+61, DQ+80 , DQ+86, DQ+89, DQ+126, DQ+148, DQ+149, DQ+152, DQ+153
LA7FS	GETSITE~, GETSITE+8, GETSITE+9
LA7FS(99	GETSITE+10, GETSITE+11
>> LA7FSITE	DQ+9
>> LA7I	DQ+147, DQ+148, DQ+150, DQ+152, DQ+153
>> LA7ITEM	DQ+6, DQ+79, DQ+139
>> LA7LINE	DQ+29*, DQ+52, DQ+54, DQ+87, DQ+93, DQ+128
>> LA7NOW	DQ+16*
>> LA7PAGE	DQ+6*, DQ+55
>> LA7PROV	DQ+71*
>> LA7QUIT	EN+4
>> LA7ROOT	DQ+49, DQ+50, DQ+52, DQ+53, DQ+54, DQ+56, DQ+58, DQ+61, DQ+62, DQ+151* , DQ+152*, DQ+154
>> LA7SBC	DEV+3, DEV+5, DEV+6, DEV+11, DQ+26
>> LA7SCFG	EN+5, DEV+3, DQ+5*
>> LA7SCFG(0	DQ+5*, DQ+9, DQ+23, DQ+114
>> LA7SCOND	DQ+43, DQ+53, DQ+56
>> LA7SCONT	DQ+43, DQ+53, DQ+56
>> LA7SDT	DQ+21*
>> LA7SKIP	DQ+12, DQ+35, DQ+36, DQ+65, DQ+67, DQ+68, DQ+85
LA7SM	EN+5*, EN+6, EN+7, DEV+5, DEV+6, DQ+4, DQ+21, DQ+32, DQ+33, DQ+35 , DQ+37, DQ+59, DQ+67, DQ+152, ASK~
LA7SM(0	DQ+4*, DQ+5, DQ+18, DQ+30, DQ+112
>> LA7SMR	DQ+6, DQ+23, DQ+135, DQ+137, DQ+145
>> LA7SMST	DQ+18, DQ+19, DQ+28, DQ+55, DQ+82, DQ+88, DQ+95, DQ+130
>> LA7SPEC	DQ+73*, DQ+74, DQ+76
>> LA7SPEC(0	DQ+74, DQ+75, DQ+94
>> LA7SVIA	DQ+30*
LA7TCOST	DQ+96~, DQ+97*, DQ+98
LA7TS	GETSITE~, GETSITE+14, GETSITE+15
LA7TS(99	GETSITE+16, GETSITE+17
>> LA7TSITE	DQ+9
>> LA7UID	DQ+43, DQ+52, DQ+54, DQ+57, DQ+61, DQ+62*, DQ+64, DQ+65, DQ+92, DQ+105 , DQ+119, DQ+122
LA7X	DQ+113~, DQ+114, DQ+115, DQ+120, DQ+123, DQ+124*, GETSITE~, GETSITE+8, GETSITE+9, GETSITE+10 , GETSITE+11, GETSITE+16
LA7Y	DQ+113~, DQ+116, DQ+117, DQ+118, DQ+120, DQ+123, DQ+124*, GETSITE~, GETSITE+14, GETSITE+15 , GETSITE+17
LA7Z	DQ+113~, DQ+123*, DQ+124
>> LRDFN	DQ+63*
>> POP	DEV+18
U	DQ+70, DQ+72
X	DEV+7~, DQ+64, DQ+65, DQ+66, DQ+70, DQ+71, DQ+102*, ASK+3~
Y	DEV+7~, DEV+11, ASK+3~, ASK+7
>> ZTDESC	DEV+23*
ZTDTH	DEV+22~
ZTIO	DEV+22~
>> ZTQUEUED	DQ+157
ZTRTN	DEV+22~, DEV+23*
ZTSAVE	DEV+22~
ZTSAVE("LA7*"	DEV+23*
ZTSK	DEV+22~, DEV+25

Customize PDF page

Package: Automated Lab Instruments

Routine: LA7SMP

Information

Source Information

Call Graph

Call Graph Total: 18

Caller Graph

Caller Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: