Routine: LA7SMB

Package	Total	Call Graph
Automated Lab Instruments	6	($$CHKOLOC,SCBLD,SCHK)^LA7SM1 ADD^LA7SMB1 ASK^LA7SMP ($$CHKSM,$$CSM,SMSUP)^LA7SMU ($$ASKPREV,$$PREV,$$SHIPCK,ADATE)^LA7SMU1 ($$AD,$$SSCFG)^LA7SUTL
VA FileMan	4	EN^DDIOL LOCK^DILF $$GET1^DIQ ^DIR
Lab Service	1	$$LRUID^LRX
Toolkit	1	$$GET^XPAR

Package	Total	Caller Graph
Automated Lab Instruments	3	LA7S MANIFEST BUILD LA7S MANIFEST START LA7SM

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
DQ	; Taskman entry point ; Build list of tests and criteria for manifest.
SMONLY	; Start a shipping manifest only, no building
SCAN	; Scan accession for tests to build
CKTEST(LA7AA,LA7AD,LA7AN,LA760)	; Check other tests on accession if test is part of another panel that ; has been flagged for shipping. ; Call with LA7AA = ien of accession area. ; LA7AD = accession date ; LA7AN = accession number ; LA760 = ien of lab test ; Returns LA7FLAG = 0 (part of another panel) ; = 1 (not part of another panel)
UNWIND(LA760)	; Unwind profile - set tests into global ^TMP("LA7TREE",$J). ; Initialize variable LA7PCNT=0 before calling. ; Kill ^TMP("LA7TREE",$J) before calling.
LOCK68	; Lock entry in file 68 ; Called from above, LA7SM
UNLOCK68	; Unlock entry in file 68 ; Called from above, LA7SM
CLEANUP	; Cleanup variables

External References

Name	Field # of Occurrence
EN^DDIOL	EN+15, EN+30, DQ+3, DQ+8, DQ+21, DQ+38, SMONLY+5, SCAN+36
LOCK^DILF	DQ+6, LOCK68+3
$$GET1^DIQ	SCAN+36
^DIR	EN+27
$$CHKOLOC^LA7SM1	SCAN+13
SCBLD^LA7SM1	DQ+16
SCHK^LA7SM1	SCAN+50
ADD^LA7SMB1	SCAN+53
ASK^LA7SMP	DQ+39
$$CHKSM^LA7SMU	EN+13
$$CSM^LA7SMU	EN+29
SMSUP^LA7SMU	DQ+12, DQ+31
$$ASKPREV^LA7SMU1	EN+41
$$PREV^LA7SMU1	SCAN+45
$$SHIPCK^LA7SMU1	SCAN+43
ADATE^LA7SMU1	EN+37
$$AD^LA7SUTL	DQ+24
$$SSCFG^LA7SUTL	EN+9
$$LRUID^LRX	SCAN+27
$$GET^XPAR	EN+20

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$C(7),"No configurations for your current division." Line Location: EN+7
Routine Call	DIR Line Location: EN+27

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^LAB(60 - [#60]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	UNWIND+9, UNWIND+11, UNWIND+13, UNWIND+15, UNWIND+20, UNWIND+22
^LAHM(62.8 - [#62.8]	DQ+34
^LAHM(62.9 - [#62.9]	EN+6, DQ+2
^LRO(68 - [#68]	DQ+21, DQ+25, DQ+28, SCAN+7, SCAN+10, SCAN+17, SCAN+19, SCAN+24, SCAN+26, SCAN+29 , SCAN+39, CKTEST+15, CKTEST+21, CKTEST+25, CKTEST+28, UNLOCK68+3
^TMP(	CLEANUP+4!
^TMP("LA7SMB"	DQ+19, SCAN+31
^TMP("LA7TREE"	CKTEST+11!, CKTEST+32, CKTEST+34!, UNWIND+13, UNWIND+25

Label References

Name	Line Occurrences
$$CKTEST	SCAN+51
CLEANUP	EN+2, EN+10, EN+16, EN+35, EN+38, EN+44, DQ+9, DQ+40, SMONLY+6
EN	SMONLY+4
LOCK68	SCAN+33
SCAN	DQ+28
UNLOCK68	SCAN+41, SCAN+43, SCAN+45, SCAN+55
UNWIND	CKTEST+29, UNWIND+25

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIR	EN+19~, DQ+37~
DIR("?"	EN+24, EN+25, EN+26*
DIR("A"	EN+22, EN+23
DIR("B"	EN+21*
DIR(0	EN+22*
DIROUT	DQ+37~
DIRUT	EN+19~, DQ+37~
DTOUT	EN+19~, DQ+37~
DUZ(2	EN+6
I	UNWIND+4~, UNWIND+18, UNWIND+20, UNWIND+22
II	UNWIND+4~, UNWIND+22*, UNWIND+24, UNWIND+25
LA760	SCAN+28, SCAN+29, SCAN+31, SCAN+36, SCAN+39, SCAN+43, SCAN+51, CKTEST~, CKTEST+26, CKTEST+32 , UNWIND~, UNWIND+9, UNWIND+11, UNWIND+13, UNWIND+15, UNWIND+20, UNWIND+22, UNWIND+24, UNWIND+25, UNLOCK68+3 , CLEANUP+6!
LA760(0	SCAN+39*, SCAN+41, SCAN+43, SCAN+45, SCAN+47
LA762	SCAN+2~, SCAN+16, SCAN+20
LA76205	SCAN+47, SCAN+48, CLEANUP+6!
LA76805	SCAN+2~, SCAN+16, SCAN+20, SCAN+21, CLEANUP+6!
LA7AA	DQ+18, DQ+19, DQ+21, DQ+23, DQ+24, DQ+25, DQ+26, DQ+28, SCAN+7, SCAN+10 , SCAN+13, SCAN+17, SCAN+19, SCAN+24, SCAN+26, SCAN+27, SCAN+29, SCAN+31, SCAN+39, SCAN+43 , SCAN+51, CKTEST~, CKTEST+15, CKTEST+21, CKTEST+25, CKTEST+28, UNLOCK68+3, CLEANUP+6!
LA7AA(	DQ+23, DQ+26
LA7AD	DQ+23, DQ+24, DQ+28, SCAN+7, SCAN+10, SCAN+13, SCAN+17, SCAN+19, SCAN+24, SCAN+26 , SCAN+27, SCAN+29, SCAN+39, SCAN+51, CKTEST~, CKTEST+14, CKTEST+15, CKTEST+22, CKTEST+23, CKTEST+25 , CKTEST+28, UNLOCK68+3, CLEANUP+6!
LA7AD(	CKTEST+14, CKTEST+19, CKTEST+21*, CKTEST+23
LA7AN	DQ+26, DQ+27, DQ+28*, SCAN+4, SCAN+7, SCAN+10, SCAN+13, SCAN+17, SCAN+19, SCAN+24 , SCAN+26, SCAN+27, SCAN+29, SCAN+39, SCAN+51, CKTEST~, CKTEST+15, CKTEST+21, CKTEST+25, CKTEST+28 , UNLOCK68+3, CLEANUP+6!
LA7DATA	CLEANUP+6!
LA7DIV	SCAN+2~, SCAN+24*
LA7END	DQ+20~, DQ+26, DQ+28, SCAN+2~, SCAN+4
LA7EXPRV	EN+41*, EN+42, SCAN+45, CLEANUP+6!
LA7FLAG	SCAN+51, SCAN+53, CKTEST+9~, CKTEST+13, CKTEST+32*, CKTEST+36, CLEANUP+6!
LA7I	CLEANUP+4*, CLEANUP+6!
LA7J	CKTEST+9~, CKTEST+24, CKTEST+25, CKTEST+26, CKTEST+28, CKTEST+29
LA7K	CKTEST+9~, CKTEST+15*, CKTEST+17, CKTEST+19, CKTEST+21
LA7LAN	DQ+26*, SCAN+4, CLEANUP+6!
LA7PCNT	CKTEST+9~, CKTEST+29, UNWIND+7, UNWIND+17, CLEANUP+6!
LA7QUIT	EN+3, EN+28, EN+30, EN+35, EN+38, EN+42, EN+44, CLEANUP+6!
LA7SCFG	EN+9*, EN+10, EN+13, EN+20, EN+22, EN+29, EN+41, DQ+2, DQ+8, DQ+16 , SMONLY+5, SCAN+13, CLEANUP+6!
LA7SCFG(0	DQ+2*, SCAN+10
LA7SM	EN+13, EN+14, EN+15, EN+18, EN+29, EN+30, DQ+3, DQ+12, DQ+31, DQ+34 , DQ+39, SMONLY+5, CLEANUP+6!
LA7SMCNT	DQ+13*, DQ+38, CLEANUP+6!
LA7SMON	EN+33, SMONLY+2~, SMONLY+3*
LA7UID	SCAN+26, SCAN+27, SCAN+36, SCAN+43, SCAN+45, CLEANUP+6!
LA7X	CLEANUP+6!
LRDFN	CLEANUP+7!
LRSS	DQ+20~, DQ+25*, SCAN+41
X	EN+19~, DQ+37~, SCAN+2~, SCAN+17, SCAN+18, SCAN+19, SCAN+20, CKTEST+9~
XD	EN+19~, EN+20*, EN+21
Y	EN+19~, EN+28, DQ+37~
>> ZTQUEUED	DQ+3, DQ+8, DQ+21, DQ+36, SCAN+35, CLEANUP+2
>> ZTREQ	CLEANUP+2*

Customize PDF page

Package: Automated Lab Instruments

Routine: LA7SMB

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: