Routine: AMHHS1

Package	Total	Call Graph
IHS VA Utilities	1	$$PROVINI^XBFUNC1
Kernel	1	$$FMTE^XLFDT
Mental Health Social Services	1	($$LASTNAP,$$LASTPLR,$$LASTPLU)^AMHAPI6
Patient Care Component	1	PRTTXT^APCHSUTL
VA Fileman	1	$$GET1^DIQ

Package

Total

Call Graph

IHS VA Utilities

$$PROVINI^XBFUNC1

Kernel

$$FMTE^XLFDT

Mental Health Social Services

($$LASTNAP,$$LASTPLR,$$LASTPLU)^AMHAPI6

Patient Care Component

PRTTXT^APCHSUTL

VA Fileman

$$GET1^DIQ

Package	Total	Caller Graph
Mental Health Social Services	1	AMHHS

Package

Total

Caller Graph

Mental Health Social Services

AMHHS

Name	Comments	DBIA/ICR reference
NOTEDSP	; DISPLAY NOTES UNDER PROBLEM
PROBDSP	;
PROBSCH	;
DSPN	; DISPLAY SINGLE NOTE
COMMON	;
PROBX
PRTICD	;
PROB	;EP

Name	Field # of Occurrence
$$LASTNAP^AMHAPI6	PROB+13
$$LASTPLR^AMHAPI6	PROB+7
$$LASTPLU^AMHAPI6	PROB+10
PRTTXT^APCHSUTL	DSPN+7, PRTICD+7, PRTICD+8
$$GET1^DIQ	PROBDSP+3
$$PROVINI^XBFUNC1	DSPN+5
$$FMTE^XLFDT	PROB+9, PROB+12, PROB+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,AMHS,X,AMHS,! Line Location: PROB+2
Function Call: WRITE	Prompt: !,AMHS,X,AMHS,! Line Location: PROB+5
Function Call: WRITE	Prompt: !,"BH Problem List Reviewed: ",?36,$$FMTE^XLFDT($P(AMHSX,U,1)) Line Location: PROB+9
Function Call: WRITE	Prompt: ?51,"By: ",?54,$E($S($P(AMHSX,U,3):$P($G(^VA(200,$P(AMHSX,U,3),0)),U),1:""),1,25),! Line Location: PROB+9
Function Call: WRITE	Prompt: "BH Problem List Updated: ",?36,$$FMTE^XLFDT($P(AMHSX,U,1)) Line Location: PROB+12
Function Call: WRITE	Prompt: ?51,"By: ",?54,$E($S($P(AMHSX,U,3):$P($G(^VA(200,$P(AMHSX,U,3),0)),U),1:""),1,25),! Line Location: PROB+12
Function Call: WRITE	Prompt: !,"No Active Problems: ",?24,$$FMTE^XLFDT($P(AMHSX,U,1)) Line Location: PROB+15
Function Call: WRITE	Prompt: ?39,"Documented By: ",?54,$E($P($G(^VA(200,$P(AMHSX,U,3),0)),U),1,25),! Line Location: PROB+15
Function Call: WRITE	Prompt: "No Active BH Problems Documented: ",?36,$$FMTE^XLFDT($P(AMHSX,U,1)) Line Location: PROB+16
Function Call: WRITE	Prompt: ?51,"By: ",$E($S($P(AMHSX,U,3):$P($G(^VA(200,$P(AMHSX,U,3),0)),U),1:""),1,25),! Line Location: PROB+16
Function Call: WRITE	Prompt: AMHS,X,AMHS,! Line Location: COMMON+3
Function Call: WRITE	Prompt: !!,"*** ",$S(AMHTTAT="A":" ACTIVE ",1:" INACTIVE "),"PROBLEMS AND TREATMENT NOTES/NOTES *** ",!! Line Location: COMMON+4
Function Call: WRITE	Prompt: !,AMHTPNM,?4,AMHTDTM Line Location: PROBDSP+9
Function Call: WRITE	Prompt: ?1,AMHTPNM_"-"_$P(AMHTN,U),?7,AMHTTPT,?11,AMHTDOI,?20,AMHHS("AUTHOR") Line Location: DSPN+6

FileNo	Call Tags
^AMHPPROB - [#9002011.51]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^AMHPPROB - [#9002011.51]	COMMON+2, PROBDSP+1
^AMHPPROB("AA"	COMMON+2
^AMHPROB - [#9002012.2]	PRTICD+4, PRTICD+6
^AMHPTP - [#9002011.53]	DSPN+2
^AMHPTP("AE"	NOTEDSP+1, NOTEDSP+2, DSPN+1
^VA(200 - [#200]	PROB+9, PROB+12, PROB+16

Name	Line Occurrences
COMMON	PROB+4, PROB+6
DSPN	NOTEDSP+2
NOTEDSP	PROBDSP+10
PROBDSP	COMMON+5
PROBX	PROB+18
PRTICD	PROBDSP+9

Name	Field # of Occurrence
^(	COMMON+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AMHHS	PROB+17!
AMHHS("AUTHOR"	DSPN+5*, DSPN+6
AMHPTP	PROB+17!
>> AMHS	PROB+2, PROB+5, COMMON+3*
AMHSNRQ1	PROBX!, PRTICD+3*, PRTICD+8
>> AMHSX	PROB+7, PROB+9, PROB+10, PROB+12, PROB+13*, PROB+16
AMHTCVD	PROB+3*, PROB+17!, PROBDSP+4, PROBDSP+6, PROBDSP+7, DSPN+3
AMHTDFN	COMMON+2, COMMON+5, PROBX!, PROBDSP+1, PROBDSP+3, NOTEDSP+1, NOTEDSP+2, DSPN+1
AMHTDFT	COMMON+1!, PROBX!
AMHTDFT(	COMMON+2*, COMMON+5
AMHTDOI	DSPN+3*, DSPN+6, DSPN+8!
AMHTDOO	PROBX!, PROBDSP+4*, PRTICD+2
AMHTDTM	PROBX!, PROBDSP+6*, PROBDSP+9
AMHTDTN	PROBX!, PROBDSP+7*
AMHTFCN	PROBX!
AMHTFPP	COMMON+5*, PROBX!
AMHTICD	PROBX!, PRTICD+1*
AMHTILN	PROBX!, PROBDSP+9*
AMHTITE	PROBX+1!
AMHTN	PROBX!, PROBDSP+1, PROBDSP+2, PROBDSP+4, PROBDSP+5, PROBDSP+6, PROBDSP+7, DSPN+2, DSPN+3, DSPN+4 , DSPN+5, DSPN+6, DSPN+7, PRTICD+4, PRTICD+6
AMHTNAB	PROBX+1!
AMHTNDF	COMMON+1, COMMON+2, COMMON+3, PROBX!, NOTEDSP+2*, DSPN+1
AMHTNFL	PROBX+1!
AMHTNFP	PROBX!
AMHTNSH	PROBX+1!
AMHTPBN	PROBX!
AMHTPLN	PROBX!
AMHTPNM	PROBX!, PROBDSP+5*, PROBDSP+9, DSPN+6
AMHTPRB	COMMON+2*, PROBX!
AMHTQ	PROB+17!, COMMON+2, COMMON+5, NOTEDSP+2*
AMHTTAT	PROB+4, PROB+6, COMMON+2, PROBX!
AMHTTPT	PROB+17!, DSPN+4*, DSPN+6
AMHTVSC	PROBX+1!
>> APCHSCKP	PROB+2, PROB+5, PROB+8, PROB+11, PROB+14, COMMON+3, PROBDSP+9, DSPN+6
APCHSICL	PROBX!, PROBDSP+9, DSPN+7, PRTICD+8*
APCHSNRQ	PROBX!, PROBDSP+2, PROBDSP+3, DSPN+7, PRTICD+1, PRTICD+2, PRTICD+3, PRTICD+4, PRTICD+5, PRTICD+6 , PRTICD+8*
>> APCHSPAT	PROB+7, PROB+10, PROB+13, COMMON+2
>> APCHSQIT	PROB+2, PROB+5, PROB+8, PROB+11, PROB+14, COMMON+3, PROBDSP+9, DSPN+6
>> APCHSTXT	DSPN+7, PRTICD+6, PRTICD+8*
DT	PROB+7, PROB+10, PROB+13
U	PROB+9, PROB+12, PROB+16, COMMON+2, PROBDSP+2, PROBDSP+4, PROBDSP+5, PROBDSP+6, PROBDSP+7, DSPN+3 , DSPN+4, DSPN+5, DSPN+6, DSPN+7, PRTICD+4, PRTICD+6
>> X	PROB+2, PROB+5, COMMON+3, DSPN+1, DSPN+2, PRTICD+5*
Y	PROB+17!, PROBDSP+4, PROBDSP+6, PROBDSP+7, DSPN+3, PRTICD+5*

Customize PDF page

Package: Mental Health Social Services

Routine: AMHHS1

Information

Source Information

Call Graph

Call Graph Total: 5

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

Naked Globals

Local Variables

Legend: