Routine: AMHRP2P

Package	Total	Call Graph
VA Fileman	3	DD^%DT NOW^%DTC ^DIR
Mental Health Social Services	2	^AMHEKL DONE^AMHLEIN
IHS VA Utilities	1	$$EXTSET^XBFUNC

Entry Points

Name	Comments	DBIA/ICR reference
LOC	;
HEAD
HEAD1	;
AREA	;
PROV	;
SU	;
START	;
DONE	;
ACT	;

External References

Name	Field # of Occurrence
DD^%DT	START+1, START+2
NOW^%DTC	START+1
^AMHEKL	DONE+1
DONE^AMHLEIN	DONE+1
^DIR	HEAD+1
$$EXTSET^XBFUNC	HEAD1+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: HEAD+1
Function Call: WRITE	Prompt: !?13,"******** CONFIDENTIAL PATIENT INFORMATION ********" Line Location: HEAD1+2
Function Call: WRITE	Prompt: !,$P(^VA(200,DUZ,0),U,2),?58,AMHDT,?62,"Page ",AMHPG,! Line Location: HEAD1+3
Function Call: WRITE	Prompt: ?((80-AMHLENG)\2),"ACTIVITY REPORT FOR ",$S(AMHPROG="S":"SOCIAL SERVICES",AMHPROG="M":"MENTAL HEALTH",AMHPROG="C":"CHEMICAL DEPENDENCY or A/SA",1:"ALL PROGRAMS (MH,SS,CD,OTHER)")," PROGRAM",! Line Location: HEAD1+6
Function Call: WRITE	Prompt: ?17,"RECORD DATES: ",AMHBDD," TO ",AMHEDD,! Line Location: HEAD1+7
Function Call: WRITE	Prompt: "# PATS is the total number of unique, identifiable patients when",!,"a patient name was entered on the record. # served is a tally of the ",!,"number served data value.",! Line Location: HEAD1+8
Function Call: WRITE	Prompt: !?43,"# RECS",?53,"ACT TIME",?63,"# PATS",?72,"# SERVED",!?53,"(hrs)" Line Location: HEAD1+9
Function Call: WRITE	Prompt: !,$TR($J(" ",80)," ","-") Line Location: HEAD1+10
Routine Call	DIR Line Location: HEAD+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTAREA - [#9999999.21]	AREA+4
^AUTTSU - [#9999999.22]	SU+4
^DIC(4 - [#4]	LOC+4
^VA(200 - [#200]	HEAD1+3
^XTMP("AMHRP2"	AREA+1, DONE+2!, SU+1, LOC+1, PROV+1, ACT+1, ACT+3

Label References

Name	Line Occurrences
ACT	PROV+5
HEAD	START+3, AREA+3, AREA+7, SU+3, SU+7, LOC+3, LOC+7, PROV+3, PROV+7, ACT+2
HEAD1	HEAD
LOC	SU+5
PROV	LOC+5
SU	AREA+5

Naked Globals

Name	Field # of Occurrence
^(	ACT+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AMHACT	ACT+1*, ACT+3, ACT+4
>> AMHAREA	AREA+1*, AREA+4, SU+1, LOC+1, PROV+1, ACT+1, ACT+3
>> AMHAT	ACT+3*, ACT+4, ACT+6
>> AMHATOT	START+3*
>> AMHATOT("AT"	AREA+2, AREA+9, ACT+6
>> AMHATOT("NS"	AREA+2, AREA+9, ACT+8
>> AMHATOT("P"	AREA+2, AREA+9, ACT+7
>> AMHATOT("R"	AREA+2, AREA+9, ACT+5
>> AMHBD	START+2
>> AMHBDD	START+2*, HEAD1+7
>> AMHBT	ACT+3
AMHBTH	AREA+1, DONE+2!, SU+1, LOC+1, PROV+1, ACT+1
>> AMHDT	START+1*, HEAD1+3
>> AMHED	START+2
>> AMHEDD	START+2*, HEAD1+7
>> AMHFTOT	START+3*
AMHJOB	AREA+1, DONE+2!, SU+1, LOC+1, PROV+1, ACT+1, ACT+3
>> AMHLENG	HEAD1+4, HEAD1+5, HEAD1+6
>> AMHLOC	LOC+1*, LOC+4, PROV+1, ACT+1, ACT+3
>> AMHLTOT("AT"	LOC+2, LOC+9, ACT+6
>> AMHLTOT("NS"	LOC+2, LOC+9, ACT+8
>> AMHLTOT("P"	LOC+2, LOC+9, ACT+7
>> AMHLTOT("R"	LOC+2, LOC+9, ACT+5
>> AMHNS	ACT+3*, ACT+4, ACT+8
>> AMHPAT	ACT+3*, ACT+4, ACT+7
>> AMHPG	START+3, HEAD, HEAD1+1, HEAD1+3
>> AMHPROG	HEAD1+4, HEAD1+6
>> AMHPROV	PROV+1*, PROV+4, ACT+1, ACT+3
>> AMHPTOT	START+3*
>> AMHPTOT("AT"	PROV+2, PROV+9, ACT+6
>> AMHPTOT("NS"	PROV+2, PROV+9, ACT+8
>> AMHPTOT("P"	PROV+2, PROV+9, ACT+7
>> AMHPTOT("R"	PROV+2, PROV+9, ACT+5
AMHQUIT	START+4!, AREA+1, AREA+3, AREA+6, AREA+7, SU+1, SU+3, SU+6, SU+7, LOC+1 , LOC+3, LOC+6, LOC+7, PROV+1, PROV+3, PROV+6, PROV+7, ACT+1, ACT+2, HEAD+1*
>> AMHREC	ACT+3*, ACT+4, ACT+5
>> AMHSTOT	START+3*
>> AMHSTOT("AT"	SU+2, SU+9, ACT+6
>> AMHSTOT("NS"	SU+2, SU+9, ACT+8
>> AMHSTOT("P"	SU+2, SU+9, ACT+7
>> AMHSTOT("R"	SU+2, SU+9, ACT+5
>> AMHSU	SU+1*, SU+4, LOC+1, PROV+1, ACT+1, ACT+3
DIR	HEAD+1!
DIR(0	HEAD+1*
>> DTOUT	HEAD+1
DUZ	HEAD1+3
IO	HEAD+1
IO(0	HEAD+1
IOF	HEAD1+1
IOSL	AREA+3, AREA+7, SU+3, SU+7, LOC+3, LOC+7, PROV+3, PROV+7, ACT+2
IOST	HEAD+1
U	AREA+4, SU+4, LOC+4, ACT+3, HEAD1+3
>> X	START+1
>> Y	START+1, START+2, HEAD+1

Customize PDF page

Package: Mental Health Social Services

Routine: AMHRP2P

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: