Routine: ACMPPDT

Package	Total	Call Graph
Case Management System	19	(,ACMPT)^ACMLCMS (PCCHS,SELTYP)^ACMPPDTX ^ACMPROB ^ACMRAGE ^ACMRAP ^ACMRAPP ^ACMRCH ^ACMRCMP ^ACMRCMT ^ACMRCP ^ACMRDC ^ACMRDX ^ACMRET ^ACMRFM ^ACMRMD ^ACMRMS ^ACMRNT ^ACMROF ^ACMRSV
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
IHS VA Utilities	1	VIEWR^XBLM
VA Fileman	1	^DIR

Package

Total

Call Graph

VIEWR^XBLM

^DIR

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: BRPR+6
Function Call: WRITE	Prompt: !,"Cannot Queue to Screen or Slave Printer!",! Line Location: BRPR+9
Function Call: WRITE	Prompt: !,"REQUEST QUEUED!" Line Location: BRPR+10
Function Call: WRITE	Prompt: @IOF Line Location: DONE+5
Function Call: WRITE	Prompt: !!!?5,"* Browser Utility not available!! *" Line Location: BROWSE+2
Function Call: WRITE	Prompt: !!,"End of report for ",ACMPTNA2 Line Location: PAUSE+0
Routine Call	DIR Line Location: EN+3 BRPR+1 BRPR+12 PAUSE+2
Routine Call	%ZIS Line Location: BRPR+7 DONE+4

Name	Line Occurrences (* Changed, ! Killed)
^ACM(41 - [#9002241]	CR, CT
^ACM(41.1 - [#9002241.1]	EN
^ACM(42 - [#9002242]	CMP
^ACM(43 - [#9002243]	AP
^ACM(44 - [#9002244]	DX
^ACM(45 - [#9002245]	RF
^ACM(46 - [#9002246]	FM
^ACM(47 - [#9002247]	SV
^ACM(48 - [#9002248]	CP
^ACM(49 - [#9002249]	APPT
^ACM(51 - [#9002251]	DC
^ACM(53 - [#9002253]	ET
^ACM(54 - [#9002254]	MD
^ACM(57 - [#9002257]	MEAS
^UTILITY("DIQ1"	EXIT+1!
^UTILITY($J	DONE+1!

Name	Field # of Occurrence
^("DT"	CR

Name	Field # of Occurrence
%ZIS	BRPR+5*, DONE+1!
ACM2	EXIT+1!
ACMA	EXIT+1!
ACMB	EXIT+1!
ACMCNT	DQ+6*, DQ+7, DQ+8!
>> ACMCTRL	DQ+3, DQ+4, DQ+5*, DQ+6, DQ+7
>> ACMCTRLP	DQ+3
ACMDIC	EXIT+1!
ACMJ	DQ+7*, DQ+8!
>> ACMLINER	DQ+7*
ACMMHS	EXIT+1!, EN+4*, DQ+11
>> ACMPTNA2	PAUSE
>> ACMPTNO	DC, DX, ET, CMP, CP, AP, RF, FM, MEAS, MD , SV, APPT
ACMRAGE	EXIT+1!
>> ACMRG	EN, DC, DX, ET, CMP, CP, AP, RF, FM, MEAS , MD, SV, APPT
>> ACMRGDFN	DQ+2, DQ+3, CR, CT
ACMS	EXIT+1!
ACMX	EXIT+1!
>> D0	DQ+3*
DA	EXIT+1!, BRPR+1!
DC	EXIT+1!, DQ+7*
DIC	EXIT+1!
DIR	EN+3!, BRPR+1!, BRPR+12!, PAUSE+2!
DIR("A"	EN+1, BRPR+1, BRPR+12, PAUSE+1
DIR("B"	EN+1, BRPR+1
DIR(0	EN+1, BRPR+1, BRPR+12, PAUSE+1
>> DIRUT	BRPR+2
DR	EXIT+1!
DXS	DQ+7!, DONE+1!
IO	BRPR+9, DQ+1, DQ+9
IO("Q"	BRPR+9!, BRPR+10!, DQ+9
IO(0	BRPR+9, DQ+9
IOF	BRPR+12, DQ+10, DONE+5
ION	DONE+3
IOP	BRPR+4!, DONE+3*
IOST	DQ+9, DQ+10
>> POP	BRPR+8
U	EN, CR
>> Y	EN+4, BRPR+3
>> ZTDESC	BRPR+10*
>> ZTREQ	DONE+2*
>> ZTRTN	BRPR+10*
>> ZTSAVE("ACM*"	BRPR+10*
ZTSK	BRPR+10!

Information