Routine: AMHBPL3

Information

AMHBPL3 ; IHS/CMI/LAB - problem list update from list manager ;

Source Information

Source file <AMHBPL3.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
Mental Health Social Services	3	$$ANYACTP^AMHAPRB (EXIT,PAUSE)^AMHBPL1 $$PRIMPROV^AMHUTIL
VA Fileman	2	FILE^DICN ^DIR
Kernel	1	$$FMTE^XLFDT
Registration	1	FULL^VALM1

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Mental Health Social Services	1	AMHGSBPL

Entry Points

Name	Comments	DBIA/ICR reference
PLRV	;have a visit so create a v updated/reviewed for provider AMHPRV if one does
NAPV	;have a visit so create a MHSS RECORD updated/reviewed for provider AMHPRV if one does
PLRDE1	;EP - called from xbnew
PLRDE1P	;GET PROVIDER
NAPDE1P	;GET PROVIDER
PLR	;EP - called from protocol to add a problem to problem list
NAP	;EP - called from protocol to add a problem to problem list
NAPDE1	;EP - called from xbnew
PLRADD(AMHV,AMHP,AMHD,AMHPRV,RETVAL)	;PEP - called to update Problem list update fields
NAPADD(AMHV,AMHP,AMHD,AMHPRV,RETVAL)	;PEP - called to update BH Problem list update fields

External References

Name	Field # of Occurrence
$$ANYACTP^AMHAPRB	NAP+3
EXIT^AMHBPL1	NAP+6, NAPDE1+2, NAPDE1+3, NAPDE1P+7, PLRDE1+2, PLRDE1+3, PLRDE1P+7
PAUSE^AMHBPL1	NAP+6, NAPDE1+2, NAPDE1+3, NAPDE1P+7, PLRDE1+2, PLRDE1+3, PLRDE1P+7
$$PRIMPROV^AMHUTIL	NAPDE1P+2, PLRDE1P+2
FILE^DICN	NAPV+15, PLRV+15
^DIR	NAPDE1+1, NAPDE1+6, NAPDE1P+2, PLRDE1+1, PLRDE1+6, PLRDE1P+2
FULL^VALM1	NAP+2, PLR+2
$$FMTE^XLFDT	NAPDE1+5, PLRDE1+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No action taken." Line Location: NAPDE1+2
Function Call: WRITE	Prompt: !,"No action taken." Line Location: NAPDE1+3
Function Call: WRITE	Prompt: !!,"This is required." Line Location: NAPDE1+7
Function Call: WRITE	Prompt: !!,"Future Dates not allowed.",! Line Location: NAPDE1+8
Function Call: WRITE	Prompt: !!,"This is required." Line Location: NAPDE1P+3
Function Call: WRITE	Prompt: !!,"error: ",$P(AMHRET,U,2) Line Location: NAPDE1P+6
Function Call: WRITE	Prompt: !,"No action taken." Line Location: PLRDE1+2
Function Call: WRITE	Prompt: !,"No action taken." Line Location: PLRDE1+3
Function Call: WRITE	Prompt: !!,"This is required." Line Location: PLRDE1+7
Function Call: WRITE	Prompt: !!,"Future Dates not allowed.",! Line Location: PLRDE1+8
Function Call: WRITE	Prompt: !!,"This is required." Line Location: PLRDE1P+3
Function Call: WRITE	Prompt: !!,"error: ",$P(AMHRET,U,2) Line Location: PLRDE1P+6
Routine Call	DIR Line Location: NAPDE1+1 NAPDE1+6 NAPDE1P+2 PLRDE1+1 PLRDE1+6 PLRDE1P+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AMHRRUP - [#9002011.14]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHRRUP - [#9002011.14]	NAPV+8, NAPV+9, NAPV+10, PLRV+8, PLRV+9, PLRV+10
^AMHRRUP("AD"	NAPV+6, PLRV+6
^AUPNPAT - [#9000001]	NAPADD+9, PLRADD+10
^AUTTCRA("C"	NAPV+3, PLRV+3

Label References

Name	Line Occurrences
NAPADD	NAPDE1P+5
NAPDE1	NAPDE1+7, NAPDE1+8
NAPDE1P	NAPDE1P+3
NAPV	NAPADD+16
PLRADD	PLRDE1P+5
PLRDE1	PLRDE1+7, PLRDE1+8
PLRDE1P	PLRDE1P+3
PLRV	NAPV+13, NAPV+17, PLRADD+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AMHD	NAP+1~, NAPDE1+9, NAPDE1P+5, NAPADD~, NAPADD+10, NAPADD+11, NAPV+14, PLRDE1+9, PLRDE1P+5, PLRADD~ , PLRADD+11, PLRADD+12, PLRV+14
AMHNDT	PLR+1~
AMHP	NAPADD~, NAPADD+7, NAPADD+8, NAPADD+9, NAPV+14, PLRADD~, PLRADD+8, PLRADD+9, PLRADD+10, PLRV+14
>> AMHPAT	NAP+3, NAPDE1P+5, PLRDE1P+5
AMHPIEN	PLR+1~, PLRADD+6*
AMHPRV	NAP+1~, NAPDE1P+4, NAPDE1P+5, NAPADD~, NAPADD+12, NAPADD+13, NAPV+10, NAPV+14, PLRDE1P+4, PLRDE1P+5 , PLRADD~, PLRADD+13, PLRADD+14, PLRV+10, PLRV+14
>> AMHR	NAPDE1P+2, NAPDE1P+5, PLRDE1P+2, PLRDE1P+5
>> AMHRET	NAPDE1P+5, NAPDE1P+6, PLRDE1P+5, PLRDE1P+6
AMHV	NAPADD~, NAPADD+6, NAPADD+16, NAPV+6, NAPV+14, PLRADD~, PLRADD+7, PLRADD+17, PLRV+6, PLRV+14
AMHVAL	NAPV+2~, NAPV+3, NAPV+4, NAPV+8, NAPV+14, PLRV+2~, PLRV+3, PLRV+4, PLRV+8, PLRV+14
AMHVD	NAPV+2~, PLRV+2~
AMHVRI	NAPV+2~, NAPV+5, NAPV+6, NAPV+11, NAPV+13, PLRV+2~, PLRV+5, PLRV+6, PLRV+11, PLRV+13
AMHX	NAPV+2~, NAPV+6, NAPV+8, NAPV+9, NAPV+10, NAPV+11, PLRV+2~, PLRV+6, PLRV+8, PLRV+9 , PLRV+10, PLRV+11
DA	NAPDE1+1!, NAPDE1+6!, NAPDE1P+2!, NAPV+16!, PLRDE1+1!, PLRDE1+6!, PLRDE1P+2!, PLRV+16!
DIADD	NAPV+14, NAPV+16!, PLRV+14, PLRV+16!
DIC	NAPV+14, NAPV+16!, PLRV+14, PLRV+16!
DIC("DR"	NAPV+14, PLRV+14
DIC(0	NAPV+14, PLRV+14
DIR	NAPDE1+1!, NAPDE1+6!, NAPDE1P+2!, PLRDE1+1!, PLRDE1+6!, PLRDE1P+2!
DIR("?"	NAPDE1+5, PLRDE1+5
DIR("A"	NAPDE1+1, NAPDE1+4, NAPDE1P+1, PLRDE1+1, PLRDE1+4, PLRDE1P+1
DIR("B"	NAPDE1+1, NAPDE1+5, NAPDE1P+2, PLRDE1+1, PLRDE1+5, PLRDE1P+2
DIR(0	NAPDE1+1, NAPDE1+4, NAPDE1P+1, PLRDE1+1, PLRDE1+4, PLRDE1P+1
>> DIRUT	NAPDE1+2, NAPDE1+7, NAPDE1P+3, PLRDE1+2, PLRDE1+7, PLRDE1P+3
DLAYGO	NAPV+14, NAPV+16!, PLRV+14, PLRV+16!
DT	NAPDE1+5, NAPDE1+8, PLRDE1+5, PLRDE1+8
RETVAL	NAPADD~, NAPADD+8, NAPADD+9, NAPADD+11, NAPADD+13, NAPADD+14, NAPV+4, NAPV+13, PLRADD~, PLRADD+9 , PLRADD+10, PLRADD+12, PLRADD+14, PLRADD+15, PLRV+4, PLRV+13
U	NAPDE1P+6, NAPV+8, NAPV+9, NAPV+10, PLRDE1P+6, PLRV+8, PLRV+9, PLRV+10
>> X	NAPV+14, PLRV+14
>> Y	NAPDE1+3, NAPDE1+8, NAPDE1+9, NAPDE1P+4, PLRDE1+3, PLRDE1+8, PLRDE1+9, PLRDE1P+4

Customize PDF page

Package: Mental Health Social Services

Routine: AMHBPL3

Call Graph Total: 7

Caller Graph Total: 1