Routine: ACMRL0

Package	Total	Call Graph
VA Fileman	4	^%DT C^%DTC ^DIC ^DIR
Case Management System	1	(F,J,N,Y)^ACMRL01
Kernel	1	$$FMTE^XLFDT
PCC Medical Query	1	^AMQQGTX0

Package

Total

Call Graph

VA Fileman

^%DT C^%DTC ^DIC ^DIR

Case Management System

(F,J,N,Y)^ACMRL01

Kernel

$$FMTE^XLFDT

PCC Medical Query

^AMQQGTX0

Package	Total	Caller Graph
Case Management System	2	ACMRL01 ACMRL3

Package

Total

Caller Graph

Case Management System

ACMRL01 ACMRL3

Name	Comments	DBIA/ICR reference
BD	;get beginning date
SET
D	;EP;DATE RANGE
F	;FREE TEXT RANGE
I	;DIC CALL WITH SCREEN
ED	;get ending date IHS/CMI/TMJ PATCH #6 date display
J	;
PSELECT	;EP
Q	;EP
R	;EP
W	;EP - contains
Y	;
N	;
SELECT	;EP

Name	Field # of Occurrence
^%DT	BD+3, ED+6
C^%DTC	ED+11
F^ACMRL01	F+1
J^ACMRL01	J+1
N^ACMRL01	N+1
Y^ACMRL01	Y+1
^AMQQGTX0	Q+4
^DIC	I+6, Q+2
^DIR	PSELECT+3, R+1, W+3
$$FMTE^XLFDT	ED+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?15,"Total Report width (including column margins - 2 spaces): ",ACMTCW Line Location: SET+4
Function Call: WRITE	Prompt: !!,"ERROR IN CONTROL TABLE." Line Location: I+2
Function Call: WRITE	Prompt: "OOPS - QMAN NOT CURRENT - QUITTING" Line Location: Q+2
Function Call: WRITE	Prompt: !!,$C(7),"** No ",$P(^ACM(58.1,ACMCRIT,0),U)," selected, all will be included." Line Location: Q+5
Function Call: WRITE	Prompt: ! Line Location: BD+3
Function Call: WRITE	Prompt: ! Line Location: ED+6
Function Call: WRITE	Prompt: !!,?5,"What phrase do you want to search for in the ",$P(^ACM(58.1,ACMCRIT,0),U),"?",! Line Location: W+2
Routine Call	DIC Line Location: I+6 Q+2
Routine Call	DIR Line Location: PSELECT+3 R+1 W+3

FileNo	Call Tags
^AMQQ(5 - [#9009075]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACM(58.1 - [#9002258.1]	SELECT+2, SELECT+3, SELECT+5, PSELECT+3, PSELECT+4, I+2, I+3, Q+2, Q+5, R+1 , W+2, W+3
^ACM(58.8 - [#9002258.8]	SELECT+3!, SELECT+5, SET, SET+1, SET+3, I+8, I+9, Q+7, Q+8, R+4* , R+5, ED+13, ED+14, W+6, W+7*
^UTILITY("AMQQ TAX"	Q+1!
^XTMP("ACMRL"	Q+1!, Q+5, Q+6!, Q+8, Q+10!

Name	Line Occurrences
@(	SELECT+5
BD	ED+8
I	I+10
R	R+6
SET	PSELECT+2
W	W+8

Name	Field # of Occurrence
^(0	PSELECT+3, R+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	BD+3!, ED+6!
%DT("A"	BD+3, ED+6
%DT("B"	ED+6*
%DT(0	ED+6*
>> ACMANS	SELECT+1, PSELECT+1
>> ACMBD	BD+6*, ED+6, ED+11, ED+14
>> ACMC	SELECT+1, SELECT+4, PSELECT+1
>> ACMCNT	SELECT+5, I+9, R+5, ED+14, W+7*
>> ACMCRIT	SELECT+1, SELECT+2, SELECT+3, SELECT+5, PSELECT+1, PSELECT+3, PSELECT+4, SET+1, SET+3, I+2 , I+3, I+8, I+9, Q+2, Q+5, Q+7, Q+8, R+1, R+4, R+5 , ED+13, ED+14, W+2, W+3, W+6, W+7
>> ACMCTYP	PSELECT+2, SET+4
>> ACMDIC2	I+4*
>> ACMED	ED+10*, ED+14
>> ACMI	SELECT+1, PSELECT+1
>> ACMPCNT	PSELECT+1*, SET+3
ACMQMAN	Q+3*, Q+4, Q+9!
>> ACMRPT	SELECT+3, SELECT+5, SET, SET+1, SET+3, I+8, I+9, Q+7, Q+8, R+4 , R+5, ED+13, ED+14, W+6, W+7
>> ACMSD	ED+11*
>> ACMSEL(	SELECT+1, PSELECT+1
>> ACMTCW	SET+1, SET+3, SET+4
>> ACMTEXT	SELECT+2*, SELECT+4, BD+3, ED+6
>> ACMVAR	SELECT+3*
DA	I+1!, I+6!, Q+2!
DD	Q+2!
DIC	I+1!, I+2, I+4, I+6!, Q+2!
DIC("A"	I+3*
DIC("S"	I+5, Q+2
DIC(0	I+3, Q+2
DICR	Q+2!
DINUM	Q+2!
DIR	PSELECT+3!, R+1!, W+1!, W+3!
DIR("A"	PSELECT+3, R+1, W+3*
DIR("B"	PSELECT+3*
DIR(0	PSELECT+3, R+1, W+3*
DIRUT	PSELECT+3, PSELECT+4, R+1, R+2, W+1!, W+3*, W+4
DR	I+1!, I+6!
DTOUT	W+1!
DUOUT	PSELECT+3, R+1, W+1!, W+3
U	SELECT+2, SELECT+3, SELECT+5, PSELECT+3, PSELECT+4, SET+1, SET+3, I+2, I+3, I+9 , Q+2, Q+5, R+1, R+5, ED+14, W+2, W+3, W+7
V	Q+9!
X	SET+1, Q+2!, Q+8*, Q+9!, ED+11
>> X1	ED+11*
>> X2	ED+11*
Y	SELECT+1, PSELECT+1, PSELECT+2, PSELECT+4, SET+1, SET+3, I+7, I+9, Q+2!, Q+3 , Q+8*, Q+9!, R+3, R+5, BD+5, BD+6, ED+8, ED+10, W+5, W+7
Z	Q+9!

Customize PDF page

Package: Case Management System

Routine: ACMRL0

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: