Routine: LABCX7L

Package	Total	Call Graph
Kernel	2	^%ZIS ^%ZISC

Entry Points

Name	Comments	DBIA/ICR reference
A
DOC	;Displays the CX7 download list for the CX7.
LIST	;List all entries of ^LAZ(A)
EXIT
ONE	;automatically list the 1 entry
INIT
LOOKUP	;Look up one particular Sample Id
KILL	;Kills ^LAZ(ID)
DELETE	;Allow the user to delete the ^LAZ(ID) entry

External References

Name	Field # of Occurrence
^%ZIS	LIST+1
^%ZISC	A

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"There are NO entries in the CX7 download list." Line Location: INIT+1
Function Call: WRITE	Prompt: !!,"There is 1 entry in the CX7 download list." Line Location: INIT+2
Function Call: WRITE	Prompt: !!,"There are ",CT," entries in the CX7 download list." Line Location: INIT+3
Function Call: READ	Prompt: "Do you want a list? Y// " Formatting: !! Timeout: DTIME Variable: ANS Line Location: INIT+4
Function Call: WRITE	Prompt: ! Line Location: INIT+4
Function Call: WRITE	Prompt: @IOF Line Location: LIST+1
Function Call: WRITE	Prompt: !!,?21,"CX7 DOWNLOAD LIST, PRINTED: ",Y,!! Line Location: LIST+1
Function Call: READ	Prompt: "Press any key to continue " Formatting: !! Timeout: DTIME Variable: *AN Line Location: A+1
Function Call: WRITE	Prompt: !,?7,$S($P(DATA,",",7)="ST":"STAT",1:""),?14,A," ",$E($P(DATA,",",16),4,12)," ",$P(DATA,",",13,14) Line Location: A+3
Function Call: READ	Prompt: "Enter the 11 digit Sample Id: " Formatting: !! Timeout: DTIME Variable: ID Line Location: LOOKUP+1
Function Call: WRITE	Prompt: ! Line Location: LOOKUP+2
Function Call: WRITE	Prompt: !,"Enter Sample ID (eg. CX704230162) or LOOP",! Line Location: LOOKUP+3
Function Call: WRITE	Prompt: !!,A," will be deleted" Line Location: LOOKUP+4
Function Call: WRITE	Prompt: !,?14,ID," is NOT in the download list." Line Location: LOOKUP+6
Function Call: WRITE	Prompt: !,?7,$S($P(DATA,",",7)="ST":"STAT",1:""),?14,ID," ",$E($P(DATA,",",16),4,12)," ",$P(DATA,",",13,14) Line Location: LOOKUP+8
Function Call: READ	Timeout: DTIME Line Location: DELETE+1
Function Call: WRITE	Prompt: " NO CHANGE." Line Location: DELETE+3
Function Call: READ	Timeout: DTIME Variable: ANS Line Location: KILL+1
Function Call: WRITE	Prompt: " ",ID," HAS BEEN DELETED!!!" Line Location: KILL+2
Function Call: WRITE	Prompt: " NO CHANGE." Line Location: KILL+3
Function Call: WRITE	Prompt: !!,?7,$S($P(DATA,",",7)="ST":"STAT",1:""),?14,A," ",$E($P(DATA,",",16),4,12)," ",$P(DATA,",",13,14) Line Location: ONE+1
Routine Call	%ZIS Line Location: LIST+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	INIT, INIT+2, LIST+1, A, A+1, A+2, A+3, LOOKUP+4, ONE+1, EXIT!
AN	A+1*, EXIT!
ANS	INIT+4, INIT+5, LOOKUP+4, DELETE+1, DELETE+2, KILL+1*, KILL+2, EXIT!
CT	INIT*, INIT+1, INIT+2, INIT+3, EXIT!
DATA	A+2, A+3, LOOKUP+7, LOOKUP+8, ONE+1*, EXIT!
DT	LIST+1
DTIME	INIT+4, A+1, LOOKUP+1, DELETE+1, KILL+1
I	INIT, LOOKUP+4, EXIT!
ID	INIT+2, LOOKUP+1, LOOKUP+3, LOOKUP+4*, LOOKUP+6, LOOKUP+7, LOOKUP+8, KILL+2, EXIT!
IO	LIST+1, A+1
IO(0	LIST+1, A+1
IOF	LIST+1
IOP	LIST+1!
LC	LIST+1, A+1, EXIT!
>> POP	LIST+1
Y	LIST+1*, EXIT!

Customize PDF page

Package: Automated Lab Instruments

Routine: LABCX7L

Information

Source Information

Call Graph

Call Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	LIST+1
^LAZ(	INIT, A, A+2, LOOKUP+4, LOOKUP+6, LOOKUP+7, KILL+2!, ONE+1

Name	Line Occurrences
A	A+4
DELETE	INIT+2, LOOKUP+9
EXIT	INIT+1, INIT+2, INIT+4, INIT+5, A+1, LOOKUP+1
INIT	LOOKUP+3, LOOKUP+4
KILL	LOOKUP+4, DELETE+2
LOOKUP	INIT+5, A, A+1, LOOKUP+6, LOOKUP+9
ONE	INIT+2