Routine: AMHNAVRP

Package	Total	Call Graph
IHS VA Utilities	2	$$VAL^XBDIQ1 $$EXTSET^XBFUNC
VA Fileman	2	$$GET1^DIQ ^DIR
DRG Grouper	1	$$CPT^ICPTCOD
IHS Patient	1	($$AGE,$$DOB,$$HRN)^AUPNPAT
Kernel	1	$$FMTE^XLFDT
Mental Health Social Services	1	$$PPNAME^AMHUTIL

Package	Total	Caller Graph
Mental Health Social Services	1	AMHNAVR

Entry Points

Name	Comments	DBIA/ICR reference
PRINT1(AMHREF)	;EP - CALLED FROM LAST VISIT DISPLAY
MA
FF	;EP
CM	;
GETFRAG
POV	;
CTR(X,Y)	;EP - Center X in a field Y wide.
S1	;
S(Y,F,C,T)	;set up array
DS	;
PRTTXT	; GENERALIZED TEXT PRINTER
T	;
W	;write out array
MSE	;mental status exam
PRTTXT2
EP2(AMHREF)	;EP ; up array in ^TMP
A4	;AXIS IV/V

External References

Name	Field # of Occurrence
$$PPNAME^AMHUTIL	EP2+22
$$AGE^AUPNPAT	EP2+16
$$DOB^AUPNPAT	EP2+16
$$HRN^AUPNPAT	EP2+15
$$GET1^DIQ	POV+4
^DIR	FF+1
$$CPT^ICPTCOD	EP2+24
$$VAL^XBDIQ1	EP2+16, EP2+17, EP2+20, POV+11, CM+9, MSE+2, MSE+6, MSE+7, MSE+8, MSE+9 , MSE+10, MSE+11, MA+6, MA+10, MA+17, MA+18, MA+19, MA+20, MA+21, MA+22 , MA+23
$$EXTSET^XBFUNC	MSE+4, MA+1, MA+4, MA+8
$$FMTE^XLFDT	FF+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: W+2
Function Call: WRITE	Prompt: ! Line Location: W+7
Function Call: WRITE	Prompt: ! Line Location: FF+1
Function Call: WRITE	Prompt: !!,$TR($J(" ",79)," ","*"),!,$E($P(^DPT(DFN,0),U),1,25),?27,"HRN: " Line Location: FF+2
Function Call: WRITE	Prompt: @IOF Condition for execution: $D(IOF) Line Location: FF+5
Function Call: WRITE	Prompt: !! Line Location: FF+5
Function Call: WRITE	Prompt: ?48,$$FMTE^XLFDT($P(AMHR0,U)),?72,"Page "_AMHPAGE,! Line Location: FF+5
Function Call: WRITE	Prompt: $$CTR("PSYCHIATRIC HOSPITALIZATION REFERRAL FORM",80),! Line Location: FF+6
Function Call: WRITE	Prompt: $$CTR("BEHAVIORAL HEALTH COUNSELING SERVICES",80),! Line Location: FF+7
Function Call: WRITE	Prompt: $$CTR("Phone: (505) 722-1571",80),! Line Location: FF+8
Routine Call	DIR Line Location: FF+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AMHRPRO - [#9002011.01]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHPROB - [#9002012.2]	POV+3, POV+5
^AMHREC - [#9002011]	EP2+24, A4+1, A4+2, A4+3
^AMHRNRF - [#9002011.11]	EP2+10, EP2+11, EP2+12, EP2+13, EP2+14, EP2+18, EP2+19, EP2+21, T+2, T+3 , CM+2, CM+3, CM+6, CM+7, CM+11, CM+12, MSE+4, MA+1, MA+4, MA+8 , MA+12, MA+14, MA+15, DS+3, DS+4, DS+6, DS+7, DS+9, DS+10, A4+6 , A4+7
^AMHRPRO - [#9002011.01]	POV+3, POV+5
^AMHRPRO("AD"	POV+2
^AMHRPROC - [#9002011.04]	EP2+24
^AMHRPROC("AD"	EP2+24
^AMHTAXIV - [#9002012.9]	A4+2
^AMHTREFC - [#9002013.1]	MA+12, MA+15
^DD(9002011.11	MA+23
^DPT - [#2]	EP2+15
^TMP("AMHREF"	S1+1, S1+2, W+3, W+5, W+8!, EP2+2!, EP2+3*

Label References

Name	Line Occurrences
$$CTR	FF+6, FF+7, FF+8
EP2	PRINT1+3
FF	W+4
GETFRAG	PRTTXT2
PRINT1	AMHNAVRP+4
PRTTXT	POV+3, POV+6
PRTTXT2	PRTTXT+2
S	EP2+4, EP2+5, EP2+6, EP2+7, EP2+8, EP2+15, EP2+16, EP2+17, EP2+18, EP2+19 , EP2+20, EP2+21, EP2+22, EP2+23, EP2+24, POV+1, POV+10, POV+11, T+1, T+3 , CM+1, CM+3, CM+5, CM+7, CM+9, CM+10, CM+12, MSE+1, MSE+2, MSE+5 , MSE+6, MSE+7, MSE+8, MSE+9, MSE+10, MSE+11, MA+2, MA+5, MA+6, MA+9 , MA+10, MA+13, MA+16, MA+17, MA+18, MA+19, MA+20, MA+21, MA+22, MA+23 , DS+1, DS+2, DS+4, DS+5, DS+7, DS+8, DS+10, A4+2, A4+3, A4+5 , A4+7, A4+8, A4+9, PRTTXT2
S1	S+5, S+7, S+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	S+1~, S+8, S+9, S1+1*, S1+2
>> AMHC	MA+11, MA+12
>> AMHF	MA+23*
AMHPAGE	PRINT1+1~, PRINT1+2, FF+5
>> AMHQUIT	PRINT1+4, W+3, W+4, FF+1
AMHR0	PRINT1+1~, EP2+13*, FF+5
>> AMHR22	EP2+12*
>> AMHRDATE	EP2+14*, EP2+16
AMHREF	AMHNAVRP+4, PRINT1~, PRINT1+3, EP2~, EP2+10, EP2+11, EP2+12, EP2+13, EP2+14, EP2+18 , EP2+19, EP2+20, EP2+21, POV+11, T+2, T+3, CM+2, CM+3, CM+6, CM+7 , CM+9, CM+11, CM+12, MSE+2, MSE+4, MSE+6, MSE+7, MSE+8, MSE+9, MSE+10 , MSE+11, MA+1, MA+4, MA+6, MA+8, MA+10, MA+12, MA+14, MA+15, MA+17 , MA+18, MA+19, MA+20, MA+21, MA+22, MA+23, DS+3, DS+4, DS+6, DS+7 , DS+9, DS+10, A4+6, A4+7
>> AMHRIEN	EP2+11*, EP2+22, EP2+24, POV+2, A4+1, A4+2, A4+3
AMHSTOP	PRINT1+1~, PRINT1+4*, W+3
AMHTC	PRINT1+1~, PRTTXT+3!, GETFRAG+1*, GETFRAG+2
AMHTDLT	PRINT1+1~, PRTTXT+1, PRTTXT+3!, PRTTXT2
AMHTDOO	PRINT1+1~, PRTTXT+3!
AMHTF	PRINT1+1~, PRTTXT+3!, PRTTXT2, GETFRAG, GETFRAG+2
AMHTICL	PRINT1+1~, POV+3, POV+4, PRTTXT+1, PRTTXT2*
AMHTILN	PRINT1+1~, PRTTXT+1, PRTTXT+3!, PRTTXT2, GETFRAG, GETFRAG+1
AMHTNRQ	PRINT1+1~, POV+3, POV+4, POV+5, PRTTXT+2*
AMHTQ	PRINT1+1~, PRTTXT+2*
AMHTTXT	PRINT1+1~, POV+3, POV+4, PRTTXT+2, PRTTXT+3!, GETFRAG, GETFRAG+1, GETFRAG+2*
AMHX	PRINT1+1~, W+1~, W+3, W+5, POV+2, POV+3, POV+4, POV+5, T+2, T+3 , CM+2, CM+3, CM+6, CM+7, CM+11, CM+12, MSE+4, MA+1, MA+4, MA+8 , MA+12, MA+14, MA+15, DS+3, DS+4, DS+6, DS+7, DS+9, DS+10, A4+6 , A4+7
C	S~, S+7, PRINT1+1~, POV+2, POV+7
>> DFN	EP2+10*, EP2+15, EP2+16, EP2+17
DIR	FF+1!
DIR(0	FF+1*
>> DTOUT	FF+1
DUZ(2	EP2+15
F	S~, S+2, S+5, PRINT1+1~
H	PRINT1+1~
>> I	A4+2*
IO	FF+1
IO(0	FF+1
IOF	FF+5
IOM	CTR+1
IOSL	W+4
IOST	FF+1
>> L	S+7*
>> P	EP2+24*
T	S~, S+3, S+7, S+8, S+9
U	S1+1, EP2+10, EP2+11, EP2+14, EP2+15, EP2+18, EP2+19, EP2+21, EP2+24, POV+3 , POV+5, MSE+4, MA+1, MA+4, MA+8, MA+12, MA+15, MA+23, A4+1, A4+2 , A4+3, FF+5
X	S+5, S+6, S+8, S+9, S1+2, EP2+4, EP2+5, EP2+6, EP2+7, EP2+8* , EP2+15, EP2+16, EP2+17, EP2+18, EP2+19, EP2+20, EP2+21, EP2+22, EP2+23, EP2+24 , POV+1, POV+10, POV+11, T+1, T+3, CM+1, CM+3, CM+5, CM+7, CM+9 , CM+10, CM+12, MSE+1, MSE+2, MSE+3, MSE+4, MSE+5, MSE+6, MSE+7, MSE+8* , MSE+9, MSE+10, MSE+11, MA, MA+1, MA+2, MA+3, MA+4, MA+5, MA+6 , MA+7, MA+8, MA+9, MA+10, MA+11, MA+12, MA+13, MA+14, MA+15, MA+16 , MA+17, MA+18, MA+19, MA+20, MA+21, MA+22, MA+23, DS+1, DS+2, DS+4 , DS+5, DS+7, DS+8, DS+10, A4+2, A4+3, A4+5, A4+7, A4+8, A4+9 , PRTTXT2*, CTR~, CTR+1
Y	S~, S+6, S+7, S+9, EP2+24, MSE+4, MA+1, MA+4, MA+8, A4+2 , CTR~, CTR+1, FF+1

Customize PDF page

Package: Mental Health Social Services

Routine: AMHNAVRP

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: