Routine: AMHLEFP2

Information

AMHLEFP2 ; IHS/CMI/LAB - MENTAL HLTH ROUTINE 22 Aug 2007 6:11 PM ;

Call Graph

Call Graph Total: 14

Package	Total	Call Graph
Mental Health Social Services	6	DEMO^AMHLEFP1 (SAN,TIUDSP)^AMHLEFP3 CDST^AMHLEFP4 ($$PPNAME,$$SSN)^AMHUTIL $$DSMCS^AMHUTIL1 PTSEC^AMHUTIL2
VA Fileman	3	DD^%DT $$GET1^DIQ ^DIR
IHS VA Utilities	2	($$VAL,$$VALI)^XBDIQ1 $$EXTSET^XBFUNC
DRG Grouper	1	$$CPT^ICPTCOD
Kernel	1	($$FMTE,$$NOW)^XLFDT
Registration	1	NOTICE^DGSEC4

Caller Graph

Caller Graph Total: 4

Package	Total	Caller Graph
Mental Health Social Services	3	AMHLEFP AMHLEGPP AMHLEP2
Patient Chart	1	BPCBHDSP

Entry Points

Name	Comments	DBIA/ICR reference
TMP	;treated med problems
TIUDSP	;
FU	;
SRSCR	;
DEMO	;EP demographics
S1	;
ALCSCR	;
FF	;EP
PRINT1(AMHR)	;EP - CALLED FROM LAST VISIT DISPLAY
HF	;
SUB	;
MEAS	;
EDUC	;
SUB1	;
POV	;
DGSECE	;
PRTTXT	; GENERALIZED TEXT PRINTER
PA	;
A4	;AXIS IV/V
DEMOPRT	;
PRTTXT2
AIII	;axis iii patch 1
S(Y,F,C,T)	;set up array
GETFRAG
COMM	;
W	;
INPT	;
EP2(AMHR,FLAG)	;EP ; up array in ^TMP
DEPSCR	;
MEDS	;
IPV	;EXAM
TIME
TIUN	;
PROC	;

External References

Name	Field # of Occurrence
DD^%DT	TIME
DEMO^AMHLEFP1	DEMO+1
SAN^AMHLEFP3	SUB+2
TIUDSP^AMHLEFP3	TIUDSP+1
CDST^AMHLEFP4	AIII+7
$$PPNAME^AMHUTIL	EP2+13, SUB+5, SUB1+6, FU+9
$$SSN^AMHUTIL	FF+4
$$DSMCS^AMHUTIL1	AIII+3, A4+1
PTSEC^AMHUTIL2	DGSECE+4
NOTICE^DGSEC4	DGSECE+7
$$GET1^DIQ	POV+6
^DIR	FF+1
$$CPT^ICPTCOD	PROC+3
$$VAL^XBDIQ1	EP2+11, TIME+2, COMM+2, COMM+6, COMM+7, SUB+7, SUB+8, SUB+9, SUB+10, SUB1+9 , POV+5, A4+4, IPV+4, IPV+5, ALCSCR+2, ALCSCR+3, DEPSCR+2, DEPSCR+3, SRSCR+2, SRSCR+3 , MEAS+5, EDUC+5, EDUC+6, EDUC+7, EDUC+8, PA+5, INPT+2, MEDS+6, PROC+6, PROC+7
$$VALI^XBDIQ1	MEDS+6
$$EXTSET^XBFUNC	TIME+1
$$FMTE^XLFDT	EP2+8, EP2+13, SUB1+10, FF+4, FF+7
$$NOW^XLFDT	EP2+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: W+2
Function Call: WRITE	Prompt: ! Line Location: W+8
Function Call: WRITE	Prompt: ! Line Location: FF+1
Function Call: WRITE	Prompt: !!,$TR($J(" ",79)," ","*"),!,$E($P(^DPT($P(AMHR0,U,8),0),U),1,25),?27,"HRN: " Line Location: FF+2
Function Call: WRITE	Prompt: ! Line Location: FF+7
Function Call: WRITE	Prompt: ?48,$$FMTE^XLFDT($P(AMHR0,U)),?72,"Page "_AMHPAGE,! Line Location: FF+7
Routine Call	DIR Line Location: FF+1

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHPROB - [#9002012.2]	POV+4, POV+5, POV+7
^AMHREC - [#9002011]	DGSECE+1, EP2+3, EP2+6, EP2+11, COMM+4, COMM+7, COMM+9, TIUN+1, TIUN+5, SUB+2 , SUB+3, SUB+7, SUB+8, SUB+9, SUB+10, SUB1+1, SUB1+3, SUB1+4, SUB1+7, SUB1+8 , SUB1+9, SUB1+10, AIII+2, AIII+5, AIII+6, FU+6, FU+7, FU+10, FU+12, FU+13 , A4+2, A4+3, A4+4, IPV+3, ALCSCR+1, DEPSCR+1, SRSCR+1, MEDS+2, MEDS+3, MEDS+6 , PROC+3
^AMHREDU - [#9002011.05]	EDUC+5, EDUC+6, EDUC+7, EDUC+8, EDUC+9
^AMHREDU("AD"	EDUC+2, EDUC+4
^AMHRHF - [#9002011.08]	HF+4
^AMHRHF("AD"	HF+1, HF+3
^AMHRMSR - [#9002011.12]	MEAS+5
^AMHRMSR("AD"	MEAS+2, MEAS+4
^AMHRPA - [#9002011.09]	PA+4
^AMHRPA("AD"	PA+1, PA+3
^AMHRPRO - [#9002011.01]	POV+4, POV+5, POV+7
^AMHRPRO("AD"	POV+3
^AMHRPROC - [#9002011.04]	PROC+3, PROC+4
^AMHRPROC("AD"	PROC+2
^AMHRPROV - [#9002011.02]	EP2+14
^AMHRPROV("AD"	EP2+14
^AMHRTMDP - [#9002011.03]	TMP+4
^AMHRTMDP("AD"	TMP+1, TMP+3
^AMHSITE - [#9002013]	FU+2, FU+4
^AMHTACT - [#9002012]	COMM+5
^AMHTAXIV - [#9002012.9]	A4+3
^AMHTPA - [#9002014.8]	PA+4
^AUPNPAT - [#9000001]	FF+3
^AUTNPOV - [#9999999.27]	TMP+4
^AUTTEDT - [#9999999.09]	EDUC+5
^AUTTHF - [#9999999.64]	HF+4
^AUTTMSR - [#9999999.07]	MEAS+5
^DIC(81.3 - [#81.3]	PROC+6, PROC+7
^DPT - [#2]	FF+2, FF+4
^TMP("AMHEONPS"	TIUN+9!
^TMP("AMHOENPS"	TIUN+7!
^TMP("AMHS"	S1+1, S1+2, W+3, W+4, W+6, W+9!, DEMOPRT+2, DEMOPRT+3, EP2+4!, EP2+5*
^VA(200 - [#200]	EP2+14, FU+13

Label References

Name	Line Occurrences
AIII	SUB1+1
ALCSCR	IPV+3
DEMOPRT	W+4
DEPSCR	ALCSCR+1
EP2	PRINT1+4
FF	W+5, DEMOPRT+1
GETFRAG	PRTTXT2
IPV	A4+1
MEAS	IPV+2, SRSCR+1
PRINT1	DGSECE+9, DGSECE+10, DGSECE+11, DGSECE+12, DGSECE+13, DGSECE+14
PRTTXT	COMM+9, POV+4, POV+5, POV+8
PRTTXT2	PRTTXT+2
S	EP2+7, EP2+8, EP2+9, EP2+10, EP2+11, EP2+12, EP2+13, EP2+14, TIME, TIME+1 , TIME+2, TIME+3, COMM+1, COMM+3, COMM+4, COMM+5, COMM+6, COMM+7, COMM+8, COMM+10 , TIUN+2, TIUN+4, SUB+5, SUB+6, SUB+7, SUB+8, SUB+9, SUB+10, SUB1+2, SUB1+4 , SUB1+6, SUB1+8, SUB1+9, SUB1+10, SUB1+11, AIII+4, AIII+6, FU+5, FU+7, FU+9 , FU+13, FU+14, POV+1, POV+2, POV+11, POV+12, TMP+2, TMP+4, TMP+6, A4+3 , A4+4, A4+5, IPV+4, IPV+5, ALCSCR+2, ALCSCR+3, DEPSCR+2, DEPSCR+3, SRSCR+2, SRSCR+3 , MEAS+1, MEAS+3, MEAS+5, MEAS+6, EDUC+1, EDUC+3, EDUC+5, EDUC+6, EDUC+7, EDUC+8 , EDUC+9, EDUC+10, HF+2, HF+4, HF+5, PA+2, PA+4, PA+5, PA+6, INPT+2 , INPT+3, MEDS+1, MEDS+3, MEDS+5, MEDS+6, PROC+1, PROC+3, PROC+6, PROC+7, PROC+9 , PRTTXT2
S1	S+5, S+7, S+10
SRSCR	DEPSCR+1
SUB	TIUN+1, TIUN+2
SUB1	SUB+1
TIUDSP	TIUN+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	S+1~, S+8, S+9, S1+1, S1+2, FU+1, FU+2, FU+3, FU+4*, FU+6 , FU+9
>> AMH0	PROC+4*, PROC+5, PROC+6, PROC+7
AMHAR	TIUN+3!
>> AMHDOC	TIUN+5*
>> AMHDOLOG	DGSECE+2
AMHEFT	DGSECE+9!, DGSECE+10!, DGSECE+11!, DGSECE+12, DGSECE+13, DGSECE+14!, EP2+10, EP2+11, COMM+9, COMM+10 , TIUN+2, SUB+5, SUB1+3, SUB1+6, AIII+1, FU+2, FU+3, FU+4, POV+4, POV+5 , POV+6, POV+7, IPV+2, MEAS+2, EDUC+2, HF+1
AMHERR	TIUN+3!, TIUN+6!
>> AMHGRPN	EP2+10
>> AMHGUI	DGSECE+8, DGSECE+9, DGSECE+10, DGSECE+11, PRINT1+3, FF+1, FF+6
>> AMHIOSL	DGSECE+8, PRINT1+3, W+5, DEMOPRT+1
>> AMHNOINT	DGSECE+14*, SUB+4
AMHPAGE	PRINT1+1~, PRINT1+2, FF+7
>> AMHQUIT	DGSECE+9, DGSECE+10, DGSECE+11, PRINT1+5, W+3, W+5, DEMOPRT+1, DEMOPRT+2, FF+1
AMHR	DGSECE+1, DGSECE+9, DGSECE+10, DGSECE+11, DGSECE+12, DGSECE+13, DGSECE+14, PRINT1~, PRINT1+4, EP2~ , EP2+2, EP2+3, EP2+6, EP2+11, EP2+13, EP2+14, TIME+2, COMM+2, COMM+4, COMM+6 , COMM+7, COMM+9, TIUN+1, TIUN+5, SUB+2, SUB+3, SUB+5, SUB+7, SUB+8, SUB+9 , SUB+10, SUB1+1, SUB1+3, SUB1+4, SUB1+6, SUB1+7, SUB1+8, SUB1+9, SUB1+10, AIII+2 , AIII+5, AIII+6, FU+6, FU+7, FU+9, FU+10, FU+12, FU+13, POV+3, TMP+1 , TMP+3, A4+2, A4+3, A4+4, IPV+3, IPV+4, IPV+5, ALCSCR+1, ALCSCR+2, ALCSCR+3 , DEPSCR+1, DEPSCR+2, DEPSCR+3, SRSCR+1, SRSCR+2, SRSCR+3, MEAS+2, MEAS+4, EDUC+2, EDUC+4 , HF+1, HF+3, PA+1, PA+3, PA+5, INPT+2, MEDS+2, MEDS+3, MEDS+6, PROC+2 , PROC+3
AMHR0	PRINT1+1~, EP2+6*, EP2+9, EP2+13, TIME, TIME+1, COMM+3, COMM+5, AIII+3, A4+1 , A4+2, A4+4, INPT+1, INPT+2, FF+2, FF+3, FF+4, FF+7
AMHRESU	DGSECE+3~, DGSECE+4, DGSECE+6!, DGSECE+7
AMHRESU(1	DGSECE+5
AMHSTOP	PRINT1+1~, PRINT1+5, W+3, W+4, DEMOPRT+2
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~, COMM+9, POV+4, POV+5, POV+6, PRTTXT+1, PRTTXT2*
AMHTILN	PRINT1+1~, PRTTXT+1, PRTTXT+3!, PRTTXT2, GETFRAG, GETFRAG+1
AMHTIU	TIUN+3!, TIUN+6!, TIUN+10!
AMHTNRQ	PRINT1+1~, COMM+9, POV+4, POV+5, POV+6, POV+7, PRTTXT+2*
AMHTQ	PRINT1+1~, PRTTXT+2*
AMHTTXT	PRINT1+1~, COMM+9, POV+4, POV+5, POV+6, PRTTXT+2, PRTTXT+3!, GETFRAG, GETFRAG+1, GETFRAG+2*
AMHX	PRINT1+1~, W+1~, W+3, W+4, W+6, DEMOPRT+2, DEMOPRT+3, EP2+14, SUB1+3, SUB1+4 , AIII+5, AIII+6, FU+6, FU+7, POV+3, POV+4, POV+5, POV+6, POV+7, TMP+3 , TMP+4, MEAS+4, MEAS+5, EDUC+4, EDUC+5, EDUC+6, EDUC+7, EDUC+8, EDUC+9, HF+3* , HF+4, PA+3, PA+4, MEDS+2, MEDS+3, PROC+2*, PROC+3, PROC+4, PROC+6, PROC+7
AMHZZZ	IPV+1!, IPV+6, ALCSCR+4, DEPSCR+4, SRSCR+4, MEAS+1, EDUC+1
C	S~, S+7, PRINT1+1~, FU+11, FU+13, POV+3, POV+9, POV+11, TMP+3, MEAS+4 , EDUC+4, HF+3, PA+3, PROC+2
DIR	FF+1!
DIR(0	FF+1*
>> DTOUT	FF+1
DUZ(2	AIII+3, FU+2, FU+4, A4+1, FF+3
F	S~, S+2, S+5, PRINT1+1~
FLAG	EP2~
H	PRINT1+1~, FF+3*, FF+4
>> I	POV+11, A4+3
IO	FF+1
IO(0	FF+1
IOF	DGSECE+9, DGSECE+10, DGSECE+11, FF+5
IOSL	DGSECE+8, PRINT1+3
IOST	FF+1, FF+2
>> L	S+7*
T	S~, S+3, S+7, S+8, S+9
U	DGSECE+1, S1+1, EP2+9, EP2+11, EP2+13, EP2+14, TIME, TIME+1, COMM+3, COMM+4 , COMM+5, COMM+7, SUB+2, SUB+3, SUB+7, SUB+8, SUB+9, SUB+10, SUB1+1, SUB1+7 , SUB1+8, SUB1+9, SUB1+10, AIII+3, FU+2, FU+4, FU+13, POV+4, POV+5, POV+7 , TMP+4, A4+1, A4+2, A4+3, A4+4, IPV+3, ALCSCR+1, DEPSCR+1, SRSCR+1, MEAS+5 , EDUC+5, EDUC+6, EDUC+7, EDUC+8, EDUC+9, HF+4, PA+4, INPT+1, INPT+2, MEDS+6 , PROC+3, PROC+5, PROC+6, PROC+7, FF+2, FF+3, FF+4, FF+7
X	DGSECE+1~, DGSECE+2, DGSECE+4, DGSECE+7, S+5, S+6, S+8, S+9, S1+2, EP2+7 , EP2+8, EP2+9, EP2+10, EP2+11, EP2+12, EP2+13, EP2+14, TIME, TIME+1, TIME+2 , TIME+3, COMM+1, COMM+2, COMM+3, COMM+4, COMM+5, COMM+6, COMM+7, COMM+8, COMM+10 , TIUN+2, TIUN+4, SUB+5, SUB+6, SUB+7, SUB+8, SUB+9, SUB+10, SUB1+2, SUB1+4 , SUB1+6, SUB1+8, SUB1+9, SUB1+10, SUB1+11, AIII+4, AIII+6, FU+5, FU+7, FU+9 , FU+11, FU+13, FU+14, POV+1, POV+2, POV+11, POV+12, TMP+2, TMP+4, TMP+6 , A4+3, A4+4, A4+5, IPV+4, IPV+5, ALCSCR+2, ALCSCR+3, DEPSCR+2, DEPSCR+3, SRSCR+2 , SRSCR+3, MEAS+1, MEAS+3, MEAS+5, MEAS+6, EDUC+1, EDUC+3, EDUC+5, EDUC+6, EDUC+7 , EDUC+8, EDUC+9, EDUC+10, HF+2, HF+4, HF+5, PA+2, PA+4, PA+5, PA+6 , INPT+2, INPT+3, MEDS+1, MEDS+3, MEDS+5, MEDS+6, PROC+1, PROC+3, PROC+5, PROC+6 , PROC+7, PROC+9, PRTTXT2*
Y	S~, S+6, S+7, S+9, TIME, FU+11, FU+12, FU+13, A4+3, MEDS+6* , FF+1

Customize PDF page

Package: Mental Health Social Services

Routine: AMHLEFP2

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: