Routine: AMHRP9P

Package	Total	Call Graph
Mental Health Social Services	3	^AMHEKL DONE^AMHLEIN $$ALLOWVI^AMHUTIL
VA Fileman	2	DD^%DT ^DIR

Entry Points

Name	Comments	DBIA/ICR reference
PIH
VSTS	; process visits
HEAD1	;
HEAD
START	;
DFN	;
DONE
PRINT	;
LINE	;

External References

Name	Field # of Occurrence
DD^%DT	START+2
^AMHEKL	DONE
DONE^AMHLEIN	DONE
$$ALLOWVI^AMHUTIL	VSTS+5
^DIR	HEAD+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"NO PATIENTS TO REPORT" Line Location: START+4
Function Call: WRITE	Prompt: !,$E($P(^DPT(DFN,0),U),1,15),?18,AMHHRCN Line Location: DFN+3
Function Call: WRITE	Prompt: ?27,$P(^DPT(DFN,0),U,2) Line Location: DFN+4
Function Call: WRITE	Prompt: ?31,$E(Y,4,5),"/",$E(Y,6,7),"/",$E(Y,2,3) Line Location: DFN+4
Function Call: WRITE	Prompt: ?41,AMHLINE(X),! Line Location: VSTS+23
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),?72,"Page ",AMHPG,! Line Location: HEAD1+3
Function Call: WRITE	Prompt: ?(80-$L($P(^DIC(4,DUZ(2),0),U))/2),$P(^DIC(4,DUZ(2),0),U),! Line Location: HEAD1+4
Function Call: WRITE	Prompt: ?22,"PATIENTS SEEN AT LEAST ",AMHNUM," TIMES",! Line Location: HEAD1+5
Function Call: WRITE	Prompt: ?17,"RECORD DATES: ",AMHBDD," TO ",AMHEDD,! Line Location: HEAD1+6
Function Call: WRITE	Prompt: !!,"PATIENT NAME",?18,"CHART #",?27,"SEX",?31,"DOB",?41,"LOCATION",?53,"PROVIDER",?65,"PROBLEM",?74,"#",! Line Location: PIH+0
Function Call: WRITE	Prompt: ?41,"SEEN",?53,"SEEN",?65,"CODES",?74,"VISITS",!,AMH80D Line Location: PIH+1
Routine Call	DIR Line Location: HEAD+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHPROB - [#9002012.2]	VSTS+12
^AMHREC - [#9002011]	VSTS+8
^AMHREC("AE"	VSTS+3, VSTS+4
^AMHRPRO - [#9002011.01]	VSTS+12
^AMHRPRO("AD"	VSTS+12
^AMHRPROV - [#9002011.02]	VSTS+10
^AMHRPROV("AD"	VSTS+10
^AUPNPAT - [#9000001]	DFN+2
^DIC(4 - [#4]	VSTS+8, HEAD1+4
^DPT - [#2]	DFN+3, DFN+4
^VA(200 - [#200]	VSTS+10, HEAD1+3
^XTMP("AMHRP9"	START+4, START+6, START+7, DONE+1!

Label References

Name	Line Occurrences
DFN	START+7
DONE	START+4, START+8
HEAD	START+3, DFN+1
HEAD1	HEAD
LINE	VSTS+18, VSTS+20, VSTS+22

Naked Globals

Name	Field # of Occurrence
^(0	DFN+2, VSTS+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AMH80D	START+1*, PIH+1
>> AMHBD	START+2, VSTS+2
>> AMHBDD	START+2*, HEAD1+6
>> AMHBDO	VSTS+2*, VSTS+3
AMHBTH	START+4, START+6, START+7, DONE+1!
>> AMHED	START+2, VSTS+2
>> AMHEDD	START+2*, HEAD1+6
>> AMHEDO	VSTS+2*
>> AMHHRCN	DFN+2*, DFN+3
AMHJOB	START+4, START+6, START+7, DONE+1!
AMHLINE	VSTS+15!
AMHLINE(	VSTS+23, LINE+9, LINE+10, LINE+11*
AMHLINE(1	VSTS+16, VSTS+23, LINE+3, LINE+7, LINE+9, LINE+11
>> AMHNAME	START+6*, START+7
>> AMHNUM	HEAD1+5
>> AMHP	VSTS+10, VSTS+12
AMHPCNT	VSTS+15!
>> AMHPG	START+3, HEAD, HEAD1+1, HEAD1+3
AMHPRNM	VSTS+15!, VSTS+19!, VSTS+21!, LINE+1
AMHPRNM(	VSTS+17, VSTS+19, VSTS+21*, LINE+4, LINE+8
AMHPRNM(1	LINE+6
AMHPRNT	VSTS+15!, LINE+1, LINE+2, LINE+3, LINE+6, LINE+7, LINE+8, LINE+10
AMHPROB	VSTS+1!
AMHPROB(	VSTS+12*, VSTS+21
AMHPRV	VSTS+1!
AMHPRV(	VSTS+10*, VSTS+19
AMHQ	START+5!, START+6, START+7, START+8, DFN+1, HEAD+1*
>> AMHR	VSTS+2, VSTS+4, VSTS+5, VSTS+8, VSTS+10, VSTS+12
>> AMHRCNT	VSTS+2, VSTS+6, VSTS+23*
AMHRLOC	VSTS+1!
AMHRLOC(	VSTS+8*, VSTS+17
>> AMHSD	VSTS+2, VSTS+3, VSTS+4
>> C	VSTS+17, VSTS+19, VSTS+21*
>> DFN	START+5, START+7, DFN+2, DFN+3, DFN+4, VSTS+3, VSTS+4
DIR	HEAD+1!
DIR(0	HEAD+1*
>> DTOUT	HEAD+1
DUZ	VSTS+5, HEAD1+3
DUZ(2	DFN+2, HEAD1+4
>> I	LINE+3, LINE+7, LINE+10, LINE+11
IO	HEAD+1
IO(0	HEAD+1
IOF	HEAD1+1
IOSL	DFN+1
IOST	HEAD+1
>> J	LINE+3, LINE+7, LINE+10, LINE+11
>> K	VSTS+17, VSTS+19, VSTS+21, LINE+3, LINE+7, LINE+9, LINE+10, LINE+11
>> P	VSTS+10, VSTS+12
U	DFN+2, DFN+3, DFN+4, VSTS+8, VSTS+10, VSTS+12, HEAD1+3, HEAD1+4
>> X	VSTS+17, VSTS+19, VSTS+21, VSTS+23, LINE+4, LINE+5, LINE+8, LINE+9, LINE+10, LINE+11
>> Y	START+2, DFN+4, HEAD+1

Customize PDF page

Package: Mental Health Social Services

Routine: AMHRP9P

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: