Routine: AMHGBPL

Package	Total	Call Graph
Mental Health Social Services	4	($$LASTNAP,$$LASTPLR,$$LASTPLU)^AMHAPI6 $$HASPROB^AMHBPL2 ADO^AMHGU $$DATE^AMHVRL
IHS VA Utilities	2	$$VAL^XBDIQ1 GUIR^XBLM
Kernel	1	$$FMTE^XLFDT
Patient Care Component Reports	1	($$LASTNAP,$$LASTPLR,$$LASTPLU)^APCLAPI6
VA Fileman	1	$$GET1^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
PLIST(RETVAL,AMHSTR)	;-- get a list of pcc problems for the listview
NN(RETVAL,AMHSTR)	;-- return next problem number
PDD(RETVAL,AMHSTR)	;-- display detail problem
PLISTG	;-- column sorter
LISTH(RETVAL,AMHSTR)	;-- return the list header
DSPN	; DISPLAY SINGLE NOTE
VALIDBH(RETVAL,AMHSTR)	;-- can this be passed to PCC
LIST(RETVAL,AMHSTR)	;-- get a list of problems for the listview
DXCHK(RETVAL,AMHSTR)	;-- check to see if dx exists on pcc problem lsit
DD(RETVAL,AMHSTR)	;-- display detail problem
LISTG	;--get list
PLISTH(RETVAL,AMHSTR)	;-- return the list header
DDN	;EP

External References

Name	Field # of Occurrence
$$LASTNAP^AMHAPI6	LISTH+15
$$LASTPLR^AMHAPI6	LISTH+9
$$LASTPLU^AMHAPI6	LISTH+12
$$HASPROB^AMHBPL2	DXCHK+13
ADO^AMHGU	LIST+1, LISTH+1, PLIST+1, PLISTH+1
$$DATE^AMHVRL	LISTG+10, LISTG+13, PLISTG+13, PLISTG+16, DSPN+4
$$LASTNAP^APCLAPI6	PLISTH+15
$$LASTPLR^APCLAPI6	PLISTH+9
$$LASTPLU^APCLAPI6	PLISTH+12
$$GET1^DIQ	LISTG+7, LISTG+8, LISTG+9, LISTG+11, LISTG+12, LISTG+14, LISTG+15, LISTG+16, LISTG+24, LISTG+30 , PLISTG+8, PLISTG+9, PLISTG+10, PLISTG+11, PLISTG+12, PLISTG+15, PLISTG+17, PLISTG+20, PLISTG+21, PLISTG+23 , PLISTG+25, PLISTG+27, PLISTG+41
$$VAL^XBDIQ1	DSPN+5, DSPN+6, DSPN+8
GUIR^XBLM	DD+13, DD+23, PDD+13
$$FMTE^XLFDT	LISTH+10, LISTH+13, LISTH+16, LISTG+28, PLISTH+10, PLISTH+13, PLISTH+16, PLISTG+39

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Notes: " Line Location: DDN+4
Function Call: WRITE	Prompt: !!?3,AMHC,")",?7,"Date Added: ",AMHTDOI,?30,"Author: "_AMHAUTH Line Location: DSPN+7
Function Call: WRITE	Prompt: !?3,"Note Narrative: "_$$VAL^XBDIQ1(9002011.53,X,.04) Line Location: DSPN+8
Function Call: WRITE	Prompt: !?3,AMHTTPT_" TERM TREATMENT" Line Location: DSPN+9

Used in RPC

RPC Name	Call Tags
AMHG GET BH PROBLEM LIST	LIST
AMHG GET PCC PROBLEM LIST	PLIST
AMHG GET BH PROB DD	DD
AMHG GET PCC PROB DD	PDD
AMHG CHECK PL DX CODE	DXCHK
AMHG BH PL HEADER	LISTH
AMHG PCC PL HEADER	PLISTH
AMHG GET PCC PL NN	NN
AMHG CHECK BH ICD	VALIDBH

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ
^AUPNPROB - [#9000011]	Classic Fileman Calls, GET1^DIQ
^AMHPPROB - [#9002011.51]	Classic Fileman Calls, GET1^DIQ
^AMHPTP - [#9002011.53]	GET1^DIQ
^AMHPROB - [#9002012.2]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TRAP"	DD+1, PDD+1, DXCHK+1, NN+1, VALIDBH+1
^AMHPPROB - [#9002011.51]	LISTG+4, LISTG+5, LISTG+6, DXCHK+11
^AMHPPROB("AA"	LISTG+1, LISTG+2
^AMHPROB - [#9002012.2]	DXCHK+12, VALIDBH+10
^AMHPTP - [#9002011.53]	LISTG+28, LISTG+29, DSPN+3
^AMHPTP("AE"	LISTG+20, LISTG+22, LISTG+23, DDN+3, DDN+5, DSPN+1
^AMHTMP($J	LIST+10, LIST+11, LIST+12, LIST+18, LISTH+7, LISTH+10, LISTH+13, LISTH+16, LISTH+17, LISTG+18 , LISTG+32, PLIST+11, PLIST+12, PLIST+13, PLIST+15, PLIST+21, PLISTH+7, PLISTH+10, PLISTH+13, PLISTH+16 , PLISTH+17, PLISTH+18, PLISTG+29, PLISTG+44, DD+6!, DD+16, DD+17, PDD+6!, PDD+16, PDD+17 , DXCHK+8!, NN+8!, VALIDBH+7!
^AUPNPROB - [#9000011]	PLISTG+5, PLISTG+6, PLISTG+7, PLISTG+31, PLISTG+33, PLISTG+34, PLISTG+37
^AUPNPROB("AA"	PLISTG+1, PLISTG+2, PLISTG+3, NN+12
^AUPNPROB("AC"	PLIST+14
^AUTTLOC - [#9999999.06]	PLISTG+19
^DIC(4 - [#4]	NN+6
^VA(200 - [#200]	LISTH+10, LISTH+13, LISTH+16, PLISTH+10, PLISTH+13, PLISTH+16
^XTMP("AMHLV"	DD+14, DD+18, DD+21, DD+30!, PDD+14, PDD+18, PDD+21, PDD+24!
^XTMP("AMHLVN"	DD+24, DD+27, DD+30!

Label References

Name	Line Occurrences
DSPN	DDN+5
LISTG	LIST+13, LIST+14, LIST+15, LIST+16, LIST+17
PLISTG	PLIST+16, PLIST+17, PLIST+18, PLIST+19, PLIST+20

Naked Globals

Name	Field # of Occurrence
^(0	LISTG+28

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AMHAF	LIST+4~, PLIST+4~
AMHAI	LIST+4~, LIST+8, LIST+13, LIST+14, LIST+15, LIST+16, LIST+17, LISTG+5, PLIST+4~, PLIST+9* , PLIST+16, PLIST+17, PLIST+18, PLIST+19, PLIST+20*, PLISTG+6
>> AMHAUTH	DSPN+6*, DSPN+7
AMHBPLPT	LIST+4~, LIST+7, LISTH+4~, LISTH+5, LISTH+9, LISTH+12, LISTH+15, LISTG+1, LISTG+2, PLIST+4~ , PLIST+8, PLIST+14, PLISTH+4~, PLISTH+5, PLISTH+9, PLISTH+12, PLISTH+15, PLISTG+1, PLISTG+2, PLISTG+3
AMHC	LIST+6~, LISTG+21, LISTG+26, LISTG+27, PLIST+6~, PLISTG+32, DDN+2, DSPN+2*, DSPN+7, DSPN+10
AMHCALL	DD+2~, PDD+2~
AMHCD	VALIDBH+2~, VALIDBH+4*, VALIDBH+10
AMHCLS	PLIST+7~, PLISTG+12*, PLISTG+29
AMHDA	DD+2~, DD+18, DD+21, DD+24, DD+27, PDD+2~, PDD+18*, PDD+21
AMHDATA	DD+19~, DD+21, DD+22, DD+25~, DD+27, DD+28, PDD+19~, PDD+21*, PDD+22
AMHDO	LIST+5~, LISTG+13, LISTG+18, PLIST+5~, PLISTG+16, PLISTG+29
AMHDSM	LIST+5~, LISTG+11, LISTG+18, PLIST+5~, PLISTG+14, PLISTG+29
AMHDSM9	DXCHK+2~, DXCHK+12*, DXCHK+13
AMHDSMI	DXCHK+2~, DXCHK+11*, DXCHK+12
AMHDTL	NN+2~
>> AMHDTY	NN+12*, NN+13
>> AMHDX	LISTG+8, LISTG+18, PLISTG+9, PLISTG+29
AMHDXI	LIST+5~, LISTG+7, LISTG+18, PLIST+5~, PLISTG+8, PLISTG+29
AMHEC	PLIST+7~
>> AMHEC1	PLISTG+23*, PLISTG+29
AMHEC1I	PLIST+7~, PLISTG+22*, PLISTG+29
AMHEC2	PLIST+7~, PLISTG+25*, PLISTG+29
AMHEC2I	PLIST+7~, PLISTG+24*, PLISTG+29
AMHEC3	PLIST+7~, PLISTG+27*, PLISTG+29
AMHEC3I	PLIST+7~, PLISTG+26*, PLISTG+29
AMHF	LIST+4~, LISTG+1, LISTG+2, PLIST+4~, PLISTG+1, PLISTG+2, PLISTG+3
AMHFAC	LIST+5~, LISTG+14, LISTG+18, PLIST+5~, PLISTG+17, PLISTG+29
>> AMHFACI	PLISTG+18*, PLISTG+19
AMHGUI	DD+9~, DD+10, PDD+9~, PDD+10
AMHHC	DXCHK+2~, DXCHK+7, DXCHK+13, DXCHK+15
AMHI	LIST+4~, LIST+9, LIST+10, LIST+11, LIST+12, LIST+18, LISTH+4~, LISTH+6, LISTH+7, LISTH+8* , LISTH+10, LISTH+11, LISTH+13, LISTH+14, LISTH+16, LISTH+17, LISTG+17, LISTG+18, LISTG+31, LISTG+32 , PLIST+4~, PLIST+10, PLIST+11, PLIST+12, PLIST+13, PLIST+15, PLIST+21, PLISTH+4~, PLISTH+6, PLISTH+7 , PLISTH+8, PLISTH+10, PLISTH+11, PLISTH+13, PLISTH+14, PLISTH+16, PLISTH+17, PLISTH+18, PLISTG+28, PLISTG+29 , PLISTG+43, PLISTG+44, DD+2~, DD+5, DD+8, DD+15, DD+16, DD+17, DD+20, DD+22 , DD+26, DD+28, DD+29, PDD+2~, PDD+5, PDD+8, PDD+15, PDD+16, PDD+17, PDD+20 , PDD+22, PDD+23, DXCHK+2~, DXCHK+6, DXCHK+10, DXCHK+14, DXCHK+15, DXCHK+16, NN+2~, NN+7* , NN+10, NN+15, NN+16, NN+17, VALIDBH+2~, VALIDBH+6, VALIDBH+9, VALIDBH+11*, VALIDBH+12, VALIDBH+13
AMHID	PLIST+7~, PLISTG+19*, PLISTG+29
AMHLM	LIST+5~, LISTG+10, LISTG+18, PLIST+5~, PLISTG+13, PLISTG+29
AMHLOC	NN+2~, NN+5, NN+6, NN+12
AMHLR	LIST+6~, LISTG+24, LISTG+25, LISTG+27, LISTG+32, PLIST+6~, PLISTG+36*, PLISTG+44
AMHN0	PLISTG+35~, PLISTG+37*, PLISTG+38, PLISTG+39, PLISTG+40, PLISTG+41, PLISTG+42
AMHNAD	LIST+6~, LISTG+28, LISTG+32, PLIST+6~, PLISTG+39, PLISTG+44
AMHNAT	LIST+6~, LISTG+30, LISTG+32, PLIST+6~, PLISTG+41, PLISTG+44
AMHNIEN	LIST+6~, LISTG+23, LISTG+24, LISTG+28, LISTG+29, LISTG+30, LISTG+32, PLIST+6~, PLISTG+34, PLISTG+37 , PLISTG+44
>> AMHNN	LISTG+27, LISTG+32, PLISTG+38, PLISTG+44
AMHNOTES	DDN+1!
AMHNOTES(	DSPN+10*
AMHNPN	LIST+6~, LISTG+29, LISTG+32, PLIST+6~, PLISTG+40, PLISTG+44
AMHNST	LIST+6~, PLIST+6~, PLISTG+35~, PLISTG+42*, PLISTG+44
AMHNT	LIST+6~, PLIST+6~
AMHP0	LIST+4~, LISTG+4, LISTG+10, LISTG+11, LISTG+13, PLIST+4~, PLISTG+5, PLISTG+13, PLISTG+16, PLISTG+18 , PLISTG+22, PLISTG+24, PLISTG+26
AMHPAT	DD+2~, PDD+2~, DXCHK+2~, DXCHK+4, DXCHK+13, NN+2~, NN+4, NN+12
AMHPBN	PLIST+7~, PLISTG+11*, PLISTG+19, PLISTG+29
AMHPIEN	LIST+4~, LISTG+3, LISTG+4, LISTG+5, LISTG+6, LISTG+7, LISTG+8, LISTG+9, LISTG+12, LISTG+14 , LISTG+15, LISTG+16, LISTG+18, LISTG+20, LISTG+22, LISTG+23, LISTG+32, PLIST+4~, PLISTG+4, PLISTG+5 , PLISTG+6, PLISTG+7, PLISTG+8, PLISTG+9, PLISTG+10, PLISTG+11, PLISTG+12, PLISTG+15, PLISTG+17, PLISTG+20 , PLISTG+21, PLISTG+23, PLISTG+25, PLISTG+27, PLISTG+29, PLISTG+31, PLISTG+33, PLISTG+34, PLISTG+37, PLISTG+44 , DD+4, DD+12, DD+30!, DDN+3, DDN+5, DSPN+1, PDD+2~, PDD+4, PDD+12, DXCHK+2~ , DXCHK+5*, DXCHK+11
AMHPN	LIST+5~, LISTG+12, LISTG+18, PLIST+5~, PLIST+7~, PLISTG+15, PLISTG+29
AMHPRB	LIST+4~, LISTG+2, LISTG+3, PLIST+4~, PLISTG+3, PLISTG+4
AMHPRBN	PLIST+7~, PLISTG+2*, PLISTG+3
AMHST	LIST+5~, LISTG+9, LISTG+18, PLIST+5~, PLIST+7~, PLISTG+10, PLISTG+29
AMHSTR	LIST~, LIST+7, LIST+8, LISTH~, LISTH+5, PLIST~, PLIST+8, PLIST+9, PLISTH~, PLISTH+5 , DD~, DD+4, PDD~, PDD+4, DXCHK~, DXCHK+4, DXCHK+5, NN~, NN+4, NN+5 , VALIDBH~, VALIDBH+4
AMHSX	LISTH+4~, LISTH+9, LISTH+10, PLISTH+4~, PLISTH+9, PLISTH+10, PLISTH+12, PLISTH+13, PLISTH+15, PLISTH+16
AMHSX1	LISTH+4~, LISTH+12*, LISTH+13
AMHSX2	LISTH+4~, LISTH+15*, LISTH+16
>> AMHTDOI	DSPN+4*, DSPN+7
>> AMHTN	DSPN+3*, DSPN+4
AMHTNDF	LIST+6~, LISTG+22, LISTG+23, PLIST+6~, PLISTG+33, PLISTG+34, PLISTG+37, DDN+5*, DSPN+1
>> AMHTQ	DDN+5*
>> AMHTTPT	DSPN+5*, DSPN+9
AMHTYPE	DD+2~, PDD+2~
AMHUS	LIST+5~, LISTG+16, LISTG+18, PLIST+5~, PLISTG+21, PLISTG+29
AMHUSI	LIST+5~, LISTG+15, LISTG+18, PLIST+5~, PLISTG+20, PLISTG+29
AMHVL	VALIDBH+2~, VALIDBH+5, VALIDBH+10, VALIDBH+12
AMHZ	DD+30!, PDD+24!
>> DA	DD+12, PDD+12
DFN	DD+11!, DD+30!, PDD+11!, PDD+24!
>> DIC	DD+12, PDD+12
DT	LISTH+9, LISTH+12, LISTH+15, PLISTH+9, PLISTH+12, PLISTH+15
P	LIST+2~, LIST+3, LIST+7, LIST+8, LISTH+2~, LISTH+3, LISTH+5, PLIST+2~, PLIST+3, PLIST+8 , PLIST+9, PLISTH+2~, PLISTH+3, PLISTH+5, DD+2~, DD+3, DD+4, PDD+2~, PDD+3, PDD+4 , DXCHK+2~, DXCHK+3, DXCHK+4, DXCHK+5, NN+2~, NN+3, NN+4, NN+5, VALIDBH+2~, VALIDBH+3* , VALIDBH+4
RETVAL	LIST~, LISTH~, PLIST~, PLISTH~, DD~, DD+7, DD+8, DD+22, DD+28, DD+29 , PDD~, PDD+7, PDD+8, PDD+22, PDD+23, DXCHK~, DXCHK+9, DXCHK+10, DXCHK+15, DXCHK+16 , NN~, NN+9, NN+10, NN+16, NN+17, VALIDBH~, VALIDBH+8*, VALIDBH+9, VALIDBH+12, VALIDBH+13
U	LISTH+10, LISTH+13, LISTH+16, LISTG+5, LISTG+6, LISTG+10, LISTG+11, LISTG+13, LISTG+18, LISTG+28 , LISTG+29, LISTG+32, PLISTH+10, PLISTH+13, PLISTH+16, PLISTG+6, PLISTG+7, PLISTG+13, PLISTG+16, PLISTG+18 , PLISTG+19, PLISTG+22, PLISTG+24, PLISTG+26, PLISTG+29, PLISTG+38, PLISTG+39, PLISTG+40, PLISTG+41, PLISTG+42 , PLISTG+44, DSPN+4, DXCHK+11, DXCHK+12, VALIDBH+10
>> X	DD+1, DSPN+1, DSPN+3, DSPN+5, DSPN+6, DSPN+8, DSPN+10, PDD+1, DXCHK+1, NN+1* , NN+11, NN+13, NN+14, NN+16, VALIDBH+1
ZTIO	DD+30!, PDD+24!
ZTQUEUED	DD+30!, PDD+24!

Customize PDF page

Package: Mental Health Social Services

Routine: AMHGBPL

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Interaction Calls

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: