Routine: LAMIAUT4

Package	Total	Call Graph
Lab Service	13	(ANN,EN)^LRCAPV LOOK^LRCAPV1 ^LRMIBUG UNDO^LRMIEDZ ASKXQA^LRMIEDZ2 TIME^LRMIEDZ3 STF^LRMIUT VT^LRMIUT1 UPDATE^LRPXRM EDIT^LRRPLU ZAPALL^LRVR3 RANGE^LRWU2 INF^LRX
Automated Lab Instruments	2	^LAMIAUT3 DEL^LAMIAUT5
VA FileMan	2	YN^DICN ^DIE

Package	Total	Caller Graph
Automated Lab Instruments	2	LAMIAUT1 LAMIVTL4

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
EXP	;Get the list of tests for this ACC.
V9
L10
EDIT
EDIT1
EDIT2
VER	;
VER1	;
HLP

External References

Name	Field # of Occurrence
YN^DICN	VER+4
^DIE	EN+6, VER1+4
^LAMIAUT3	EN+2, EN+4, EN+5, EN+6, EN+7
DEL^LAMIAUT5	EN+3, EN+8
ANN^LRCAPV	VER1+1
EN^LRCAPV	EN+7
LOOK^LRCAPV1	VER1+4
^LRMIBUG	EN+5
UNDO^LRMIEDZ	VER1+4
ASKXQA^LRMIEDZ2	VER1+17
TIME^LRMIEDZ3	VER1+4
STF^LRMIUT	VER1+7
VT^LRMIUT1	VER1+7
UPDATE^LRPXRM	VER1+13
EDIT^LRRPLU	VER1+10
ZAPALL^LRVR3	VER1+20
RANGE^LRWU2	V9+2, EDIT+3
INF^LRX	EXP+1

Interaction Calls

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Line Location: EN+1
Function Call: READ	Formatting: ! Prompt: "Approve for release by entering your initials: " Variable: X Timeout: DTIME Line Location: EN+8
Function Call: WRITE	Prompt: !!,$C(7)," NOT APPROVED " Line Location: EN+9
Function Call: WRITE	Prompt: !!,PNM," ",SSN,!,LRACCN Line Location: EXP+1
Function Call: WRITE	Prompt: !!?5,$P(^LAB(61,LRSPEC,0),U)," ",$P(^LAB(62,LRSAMP,0),U),! Line Location: EXP+1
Function Call: WRITE	Prompt: !,I," ",LRNAME(I) Line Location: EXP+4
Function Call: WRITE	Prompt: ?25," verified" Line Location: EXP+4
Function Call: READ	Formatting: !! Prompt: "TEST #(s) (or ""ALL""): " Variable: X Timeout: DTIME Line Location: V9+0
Function Call: WRITE	Prompt: !,"Enter for example 1,2,5-9." Line Location: V9+1
Function Call: WRITE	Prompt: !!?7,"Incorrect test number ",$C(7) Line Location: V9+2
Function Call: WRITE	Prompt: !?7,"Edit ? ",! Line Location: EDIT+0
Function Call: WRITE	Prompt: !?3,"(",I,") ",LRNAME(I) Line Location: EDIT+0
Function Call: WRITE	Prompt: !?3,"(",I,") ",LRNAME(I) Line Location: EDIT+0
Function Call: READ	Formatting: !! Prompt: "TEST #(s) (or ""ALL""): " Variable: X Timeout: DTIME Line Location: EDIT+1
Function Call: WRITE	Prompt: !?7,"Enter for example 1,2,5-9 ",! Line Location: EDIT+2
Function Call: WRITE	Prompt: !!?7,"Incorrect number ",$C(7),! Line Location: EDIT+3
Function Call: WRITE	Prompt: $C(7),!?7,"NO EDIT CODE FOR ",LRNAME(T1) Line Location: EDIT2+0
Function Call: WRITE	Prompt: $C(7),!?7,"EDIT CODE IS MISSING FOR ",LRNAME(T1) Line Location: EDIT2+1
Function Call: WRITE	Prompt: !!?7,"Editing ",LRNAME(T1),!! Line Location: EDIT2+3
Function Call: WRITE	Prompt: !,"NO TEST DEFINED ",!!,$C(7) Line Location: EDIT2+4
Function Call: WRITE	Prompt: !,"Final report has been verified by micro supervisor,",$C(7),!,"If you proceed in editing, the report will be reprinted" Line Location: VER+3
Function Call: WRITE	Prompt: !?10,"OK" Line Location: VER+4
Function Call: WRITE	Prompt: !," Enter 'Y' or 'N' : " Line Location: VER+4
Function Call: WRITE	Prompt: ! Line Location: VER1+3
Function Call: WRITE	Prompt: !!?10,"ENTER",?20,"'E' TO EDIT ENTIRE ACCESSION. ",!?20,"'C' TO EDIT COMMENT",!?20,"'O' TO EDIT ORGANISM " Line Location: HLP+0
Function Call: WRITE	Prompt: !?20,"'^' OR '@' WILL DELETE TRANSFERRED DATA ",! Line Location: HLP+1
Routine Call	DIE Line Location: EN+6 VER1+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	EXP+3, EDIT1
^LAB(61 - [#61]	EXP+1
^LAB(62 - [#62]	EXP+1
^LAB(62.07 - [#62.07]	EDIT2+1, EDIT2+3
^LAB(69.9 - [#69.9]	VER1+1
^LR - [#63]	EN+4, VER+2, VER+3, VER1+3
^LRO(68 - [#68]	EXP+2, EXP+4, EDIT, VER1+16, VER1+18*
^TMP("LR"	EXP+2!

Label References

Name	Line Occurrences
EDIT	EN+4, EDIT+2, EDIT+3
EDIT2	EDIT1
EN	EN+2, EN+4, EN+5, EN+6, EN+7
EXP	V9+2
HLP	EN+2
V9	V9+1
VER	EN+10
VER1	VER+2

Naked Globals

Name	Field # of Occurrence
^(	EXP+2
^(0	EXP+2, EXP+3, EXP+4, EDIT

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	VER+4*, VER+5
DA	EN+4!*
DA(1	EN+4*
DIC	EN+4!*
DIE	EN+4!*
DR	EN+4!, EN+6!, EDIT2+3!, VER1+4!
DTIME	EN+1, EN+8, V9, EDIT+1
>> I	EXP+2, EXP+3, EXP+4, EDIT, VER+4*
>> LRAA	EXP+2, EXP+4, EDIT, VER1+16, VER1+18
>> LRACCN	EXP+1
>> LRAD	EXP+2, EXP+4, EDIT, VER1+16, VER1+18
>> LRALL	EXP+4, V9, EDIT, EDIT+1
>> LRAN	EXP+2, EXP+4, EDIT, VER1+16, VER1+18
LRBDUP	EN+3!
LRBG0	EDIT2+2~, EDIT2+3, VER+1~, VER+2
>> LRCAPOK	VER+2, VER1+3, VER1+4
>> LRCODE	EDIT1*, EDIT2, EDIT2+1, EDIT2+3
>> LRDFN	EN+4, VER+2, VER+3, VER1+3, VER1+10, VER1+13, VER1+18
>> LREDIT	EN+1*, EN+2, EN+3, EN+4, EN+5, EN+6, EN+7
>> LREND	EN+1, V9*
>> LRIDT	EN+4, VER+2, VER+3, VER1+3, VER1+10, VER1+13, VER1+18
>> LRIFN	VER1+20
>> LRINI	EN+9
>> LRLL	VER1+20
LRMOVE	EN+3!
LRNAME	EXP+2!
LRNAME(	EXP+3*, EXP+4, EDIT, EDIT1, EDIT2, EDIT2+1, EDIT2+3
>> LRNTN	EXP+3*, EXP+4
>> LRNX	L10*
>> LRPARAM	VER1+4
>> LRPTP	VER1+4
>> LRSAME	VER1+4*
>> LRSAMP	EXP+1
>> LRSB	EDIT1, VER1+3
>> LRSPEC	EXP+1
>> LRSS	VER1+10
LRTEST	EXP+2!
LRTEST(	EXP+2, EXP+3
LRTS	EXP+2!, EDIT2+3, EDIT2+4, VER1+4
LRTS(	EXP+3*, EDIT2+3
LRUID	VER1+5~, VER1+16*
>> LRUNDO	VER+2*, VER1+4
>> LRVT	VER1+7
LRWRDVEW	VER1+5~, VER1+6*
>> LRY(0	EN+4*, EDIT2+3
>> N	EXP+2*, EXP+3
>> PNM	EXP+1
>> SSN	EXP+1
>> T1	EDIT1, EDIT2, EDIT2+1, EDIT2+3
U	EXP+1, EXP+2, EXP+3, EXP+4, V9, EDIT, EDIT1, VER+2, VER+3, VER1+1 , VER1+4, VER1+18
>> X	EN+8, EN+9, V9, V9+1, V9+2, EDIT+1*, EDIT+2, EDIT+3
>> X9	EN+4, EN+5, V9+2, L10, EDIT+3, EDIT+4, VER+2, VER1+3
>> Y(0	EDIT2+3, VER+2, VER1+3*
ZX9	EN+4!, EN+5!

Customize PDF page

Package: Automated Lab Instruments

Routine: LAMIAUT4

Information

Source Information

Call Graph

Call Graph Total: 17

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: