Routine: ACMSRT

Package	Total	Call Graph
Case Management System	7	^ACMCTRL1 ^ACMLTR2 HEAD^ACMMENU SELTYP^ACMPPDTX (EXIT,PS)^ACMSRT1 ^ACMSRT2 ^ACMSTMP
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$FMTE^XLFDT
VA Fileman	4	WAIT^DICD YN^DICN EN1^DIP ^DIR

Package

Total

Call Graph

Case Management System

^ACMCTRL1 ^ACMLTR2 HEAD^ACMMENU SELTYP^ACMPPDTX (EXIT,PS)^ACMSRT1 ^ACMSRT2 ^ACMSTMP

Kernel

^%ZIS ^%ZISC ^%ZTLOAD $$FMTE^XLFDT

VA Fileman

WAIT^DICD YN^DICN EN1^DIP ^DIR

Package	Total	Caller Graph
Case Management System	2	ACMLTR1 ACMQK
Diabetes Registry	1	BDMVRL6

Package

Total

Caller Graph

Case Management System

ACMLTR1 ACMQK

Diabetes Registry

BDMVRL6

Entry Points

External References

Name	Field # of Occurrence
^%ZIS	ZIS+8
^%ZISC	DIP+2, DONE
^%ZTLOAD	TSK+3
^ACMCTRL1	ENTRY+1
^ACMLTR2	ZIS+1
HEAD^ACMMENU	HEAD
SELTYP^ACMPPDTX	ZIS
EXIT^ACMSRT1	EXIT
PS^ACMSRT1	PS+1
^ACMSRT2	EN+2
^ACMSTMP	PRT1
WAIT^DICD	PRT1+4
YN^DICN	OK1+15
EN1^DIP	DIP+1
^DIR	C1+3, ZIS, ZIS+1
$$FMTE^XLFDT	AMPM+2, AMPM+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?80-$L(ACMX)\2,ACMX,!!?10,"The ",@ACMRVON,ACMRPT,@ACMRVOFF," report can be sorted by one or more",!?10,"of the following attributes. '<==' indicates a mandatory selection.",! Line Location: HEAD+2
Function Call: WRITE	Prompt: !!?10,"Sorting by: ",ACMXZ Line Location: C1+0
Function Call: WRITE	Prompt: ! Line Location: C1+2
Function Call: WRITE	Prompt: !!,"Already selected as a sort criterion." Line Location: C1+5
Function Call: WRITE	Prompt: " ",ACMSNA Line Location: OK+4
Function Call: WRITE	Prompt: !!,"Within ",ACMSNA,", want to sort by another attribute" Line Location: OK1+14
Function Call: WRITE	Prompt: !!! Line Location: OK1+18
Function Call: WRITE	Prompt: " <==" Line Location: M2+6
Function Call: WRITE	Prompt: !?8,$J(ACMJ,3),") " Line Location: M2+7
Function Call: WRITE	Prompt: " <==" Line Location: M2+11
Function Call: WRITE	Prompt: ! Line Location: PRT1+4
Function Call: WRITE	Prompt: ! Line Location: PRT1+4
Function Call: WRITE	Prompt: ! Line Location: ZIS+0
Function Call: WRITE	Prompt: ! Line Location: ZIS+1
Function Call: WRITE	Prompt: ! Line Location: ZIS+1
Function Call: WRITE	Prompt: ! Line Location: ZIS+6
Function Call: WRITE	Prompt: !,"Cannot Queue to Screen or Slave Printer!",! Line Location: ZIS+11
Function Call: WRITE	Prompt: !,"I will QUEUE this report to run for you now." Line Location: ZIS+12
Function Call: WRITE	Prompt: !,"REQUEST QUEUED!" Line Location: TSK+4
Function Call: WRITE	Prompt: !!,*7,"You must also sort by" Line Location: CHECK+2
Routine Call	DIR Line Location: C1+3 ZIS ZIS+1
Routine Call	%ZIS Line Location: ZIS+8

Name	Line Occurrences (* Changed, ! Killed)
^ACM(48.5 - [#9002248.5]	OK1+1, OK1+2, OK1+6

Label References

Name	Line Occurrences
@(	OK1+8
ACMLTREX	ZIS+1
C1	C1+5
CHECK	OK1+17
CHOICE	EN1, C1+7
DONE	ZIS+9, ACMLTREX+1, BACKEXIT+1
EN	ENTRY+1
EN1	OK1+20
HEAD	EN1
M2	CHOICE
OK	OK1+17
PRINT	OK1+11, OK1+12, OK1+13, OK1+17
PRT1	OK1+7, PRNT+2
PS	PRINT
TSK	ZIS+13
ZIS	PRT1+1, ZIS+11

Name	Field # of Occurrence
^(0	OK1+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	OK1+15*
>> %Y	OK1+16, OK1+17
>> %ZIS	ZIS+5*
>> %ZIS("IOPAR"	ZIS+10*
ACMBACK	BACKEXIT+1!
ACMBY	ZIS+1*, ZIS+2!
>> ACMCSTG	OK+1*, CHECK
>> ACMDIC	OK1+7, PRNT, PRT1, DIP, ZIS+2, TSK
>> ACMDM	OK1+2, PRINT, PRNT+1, PRNT+2, PRNT+3, PRNT+4
>> ACMENTRY	PRT1, ZIS, ZIS+1, ENTRY+1*
>> ACMFILE	OK1+2, OK1+3, PRINT, PRNT+3, PRNT+4
ACMFLDS	ZIS+1*, ZIS+2!
ACMFORC	HEAD+3!, OK1+11!, OK1+17, CHECK+1*
ACMFR	ZIS+1*, ZIS+2!
ACMJ	OK1+2, OK1+5!, M2+2, M2+3, M2+4, M2+5, M2+6, M2+7, M2+8, M2+9 , PRNT+3, PRNT+4*, PRNT+5!
>> ACMJ1	M2+9*, M2+10, M2+11, M2+12
ACMLTREX	ZIS+1, ACMLTREX+1!
>> ACMMAN	M2+6, M2+11
>> ACMMAND	M2+6, M2+11, CHECK, CHECK+1
>> ACMMANN	M2+6, M2+11
>> ACMMHS	ZIS*
>> ACMN	OK1+19, CHECK+1
ACMNAV	OK1+1*, OK1+8, OK1+9!
>> ACMPP	PRINT
ACMQUIT	EN+1!, EN+3, C1+4, OK1+7, OK1+10, OK1+16, PRINT, PRT1+2!, ZIS+13, DONE+1*
>> ACMRGNA	PRNT+2, PRNT+4
>> ACMRPT	HEAD+2, PS
>> ACMRVOFF	HEAD+2
>> ACMRVON	HEAD+2
>> ACMSDIC	PRT1*
>> ACMSNA	OK+1*, OK+4, OK1+2, OK1+3, OK1+4, OK1+14
>> ACMSNO	OK+1*
ACMSRT	M2+5, M2+10, M2+13!
ACMTO	ZIS+1*, ZIS+2!
ACMU	M2!
ACMU(	OK+1, M2+5, M2+10
>> ACMUB(	C1+5, OK+3*, M2+4, M2+5, M2+8, M2+10, M2+12
ACMX	HEAD+1, HEAD+2, HEAD+3!, PS
>> ACMXZ	C1, OK, OK+1
>> ACMYI	C1+1, OK1+13, M2+1
>> ACMYII	M2+1*, M2+3, M2+8, M2+9
ACMYZ	OK+1, OK+2!, M2+5, M2+6, M2+10*, M2+11, M2+13!
ACMZ	M2+2*, M2+13!
>> ACMZZ	C1+6, C1+7, OK+1, OK+3, CHECK+1
>> BY	OK1, OK1+2, OK1+3, OK1+4, OK1+6, OK1+7, OK1+12, PRNT+1, PRNT+2, PRNT+3 , PRNT+4, ZIS+1, ZIS+2
>> DC	DIP*
>> DIC	OK1+7, PRNT, PRNT+1, PRNT+2, PRNT+3, PRNT+4, DIP, ZIS+2, TSK*
>> DIOEND	PRT1+3*
DIR	C1+3!, ZIS!, ZIS+1!
DIR("?"	C1+1*
DIR("A"	C1+1, ZIS, ZIS+1*
DIR("B"	ZIS, ZIS+1
DIR(0	C1+1, ZIS, ZIS+1*
>> FLDS	ZIS+1, ZIS+2*
FMDT	AMPM~, AMPM+2, AMPM+3, AMPM+4
>> FMTE	AMPM+4*, AMPM+5, AMPM+6
>> FMTED	AMPM+5*, AMPM+9, AMPM+10, AMPM+11, AMPM+12
>> FMTEH	AMPM+7*, AMPM+9, AMPM+10, AMPM+11, AMPM+12
>> FMTEM	AMPM+8*, AMPM+9, AMPM+10, AMPM+11, AMPM+12
>> FMTEMC	AMPM+6*, AMPM+7, AMPM+8
FR	OK1+7!, PRNT+1, PRNT+2, PRNT+3, PRNT+4, ZIS+1, ZIS+2*
IO	ZIS+11, TSK+2
IO("Q"	ZIS+11!, ZIS+13, TSK+5!
IO(0	ZIS+11
ION	PRT1+5, ZIS+10, TSK
IOP	PRT1+5, ZIS+4!, ZIS+7!, TSK
>> IOPAR	ZIS+10
>> L	ZIS+2*
>> POP	ZIS+9
TO	OK1+7!, PRNT+1, PRNT+2, PRNT+3, PRNT+4, ZIS+1, ZIS+2*
U	C1+4, OK+1, OK1+2, OK1+8, OK1+16, M2+5, M2+6, M2+10, M2+11, CHECK
>> X	C1+4, OK+1, OK1+1, OK1+2, OK1+6, M2+5, M2+6, M2+10*, M2+11
>> Y	C1+5, C1+6, M2+5, M2+6, M2+10, M2+11, ZIS, ZIS+1
>> ZTDESC	TSK+2*
>> ZTIO	TSK+2*
>> ZTQUEUED	DONE
>> ZTRTN	TSK*
>> ZTSAVE("*"	TSK+1*
ZTSK	TSK+5!

Customize PDF page

Package: Case Management System

Routine: ACMSRT

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items

Name	Comments	DBIA/ICR reference
OK1
TSK
DONE
M2
PRINT
DIP
PS
PRT1
PRNT
EN1
C1
CHECK
HEAD
EN	;PEP - ENTRY POINT FOR SORT VARIABLES
ZIS
CHOICE
AMPM(FMDT)
ACMLTREX	;Exit if User doesn't want to print letter
ENTRY	;EP;VARIABLE TO CONTROL SORT
OK
BACKEXIT	;Tmp qued in bckgrnd
EXIT