Routine: AMH30P8

Package	Total	Call Graph
VA Fileman	6	(,IX)^DIC FILE^DICN DT^DICRW ^DIE ^DIK EN^DIU2
Kernel	3	HOME^%ZIS $$CJ^XLFSTR MES^XPDUTL
IHS VA Utilities	1	^XBFMK
MailMan	1	^XMD

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;EP
WRITEMSG	;
IMES	;
SENDER
INSTALLD(AMHSTAL)	;EP - Determine if patch AMHSTAL was installed, where ; AMHSTAL is the name of the INSTALL. E.g "AG6.011".
GETRECIP	;
SU	;map suicide code 40 to 300.9
ADDPC	;
SORRY(X)	;
ENV	;EP
POST	;
BULLETIN	;
SUBJECT

External References

Name	Field # of Occurrence
HOME^%ZIS	BULLETIN+2
^DIC	INSTALLD+9, INSTALLD+12
IX^DIC	INSTALLD+6
FILE^DICN	ADDPC+2
DT^DICRW	BULLETIN+2
^DIE	ADDPC+11, ADDPC+16, ADDPC+21, ADDPC+26, ADDPC+31, ADDPC+36, ADDPC+41, ADDPC+46, ADDPC+51, ADDPC+56 , ADDPC+61, ADDPC+66, SU+2
^DIK	PRE+1, PRE+2, PRE+3, PRE+4
EN^DIU2	PRE+5
^XBFMK	PRE+6, ADDPC+11, ADDPC+16, ADDPC+21, ADDPC+26, ADDPC+31, ADDPC+36, ADDPC+41, ADDPC+46, ADDPC+51 , ADDPC+56, ADDPC+61, ADDPC+66
$$CJ^XLFSTR	IMES+1, SORRY+4
^XMD	SENDER+3
MES^XPDUTL	IMES+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: " adding 99.9 failed." Line Location: ADDPC+3
Function Call: WRITE	Prompt: !!,"code 292.0 was not mapped to EHR" Line Location: ADDPC+8
Function Call: WRITE	Prompt: !!,"code 292.89 was not mapped to EHR" Line Location: ADDPC+13
Function Call: WRITE	Prompt: !!,"code 292.81 was not mapped to EHR" Line Location: ADDPC+18
Function Call: WRITE	Prompt: !!,"code 292.82 was not mapped to EHR" Line Location: ADDPC+23
Function Call: WRITE	Prompt: !!,"code 292.83 was not mapped to EHR" Line Location: ADDPC+28
Function Call: WRITE	Prompt: !!,"code 292.84 was not mapped to EHR" Line Location: ADDPC+33
Function Call: WRITE	Prompt: !!,"code 292.11 was not mapped to EHR" Line Location: ADDPC+38
Function Call: WRITE	Prompt: !!,"code 292.12 was not mapped to EHR" Line Location: ADDPC+43
Function Call: WRITE	Prompt: !!,"code 292.9 was not mapped to EHR" Line Location: ADDPC+48
Function Call: WRITE	Prompt: !!,"code 305.90 was not mapped to EHR" Line Location: ADDPC+53
Function Call: WRITE	Prompt: !!,"code 305.91 was not mapped to EHR" Line Location: ADDPC+58
Function Call: WRITE	Prompt: !!,"code 305.92 was not mapped to EHR" Line Location: ADDPC+63
Function Call: WRITE	Prompt: !!,"code 305.93 was not mapped to EHR" Line Location: ADDPC+68
Function Call: WRITE	Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM) Line Location: SORRY+4
Function Call: WRITE	Prompt: !,"DUZ UNDEFINED OR ZERO.",! Line Location: BULLETIN+1
Function Call: WRITE	Prompt: !,"Sending Mailman message to holders of the"_" "_AMHKEY_" "_"security key." Line Location: SENDER+2
Routine Call	%ZIS Line Location: BULLETIN+2
Routine Call	DIE Line Location: ADDPC+11 ADDPC+16 ADDPC+21 ADDPC+26 ADDPC+31 ADDPC+36 ADDPC+41 ADDPC+46 ADDPC+51 ADDPC+56 ADDPC+61 ADDPC+66 SU+2
Routine Call	DIC Line Location: INSTALLD+9 INSTALLD+12
Routine Call	DIC Line Location: INSTALLD+6

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(9.4 - [#9.4]	Classic Fileman Calls
^AMHPROB - [#9002012.2]	Classic Fileman Calls
^AMHPROBC - [#9002012.4]	Classic Fileman Calls
^AMHSORT - [#9002013.3]	Classic Fileman Calls
^AMHRECD - [#9002014.1]	Classic Fileman Calls
^AMHDTER - [#9002014.5]	Classic Fileman Calls
^AMHBHPC - [#9002014.59]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHPATCH - [#9002013.2]	WRITEMSG+3
^AMHPATCH("AA"	WRITEMSG+1
^AMHPROB - [#9002012.2]	ADDPC+6*, ADDPC+11, ADDPC+16, ADDPC+21, ADDPC+26, ADDPC+31, ADDPC+36, ADDPC+41, ADDPC+46, ADDPC+51 , ADDPC+56, ADDPC+61, ADDPC+66
^AMHPROB("B"	ADDPC+5, ADDPC+10, ADDPC+15, ADDPC+20, ADDPC+25, ADDPC+30, ADDPC+35, ADDPC+40, ADDPC+45, ADDPC+50 , ADDPC+55, ADDPC+60, ADDPC+65, SU+1
^AMHPROBC("B"	ADDPC+1
^AMHREC - [#9002011]	POST+1, POST+2, POST+4*
^TMP($J	BULLETIN+5!, SENDER+4!, WRITEMSG+3*
^XUSEC(	GETRECIP+4

Label References

Name	Line Occurrences
$$INSTALLD	ENV+3, ENV+4, ENV+5
BULLETIN	SU+4
GETRECIP	BULLETIN+6
IMES	INSTALLD+7, INSTALLD+10, INSTALLD+14
SORRY	ENV+3, ENV+4, ENV+5
WRITEMSG	BULLETIN+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AMHC	WRITEMSG+3*
>> AMHIEN	WRITEMSG+1*, WRITEMSG+2, WRITEMSG+3
AMHKEY	SENDER+2, SENDER+4!, GETRECIP+3*, GETRECIP+4
AMHSTAL	INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> AMHX	POST+1, POST+2, POST+4, ADDPC+5, ADDPC+6, ADDPC+10, ADDPC+11, ADDPC+15, ADDPC+16, ADDPC+20* , ADDPC+21, ADDPC+25, ADDPC+26, ADDPC+30, ADDPC+31, ADDPC+35, ADDPC+36, ADDPC+40, ADDPC+41, ADDPC+45* , ADDPC+46, ADDPC+50, ADDPC+51, ADDPC+55, ADDPC+56, ADDPC+60, ADDPC+61, ADDPC+65, ADDPC+66, WRITEMSG+3*
AMHY	INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> CTR	GETRECIP+3, GETRECIP+4
>> D	INSTALLD+5*
D0	ADDPC+2!
DA	PRE+1, PRE+2, PRE+3, PRE+4, ADDPC+11, ADDPC+16, ADDPC+21, ADDPC+26, ADDPC+31, ADDPC+36 , ADDPC+41, ADDPC+46, ADDPC+51, ADDPC+56, ADDPC+61, ADDPC+66, SU+1*, SU+2!
DD	ADDPC+2!
DIADD	ADDPC+2*!
DIC	ADDPC+2!, INSTALLD+3~, INSTALLD+5, INSTALLD+8, INSTALLD+11
DIC("DR"	ADDPC+2*
DIC(0	ADDPC+2, INSTALLD+5
DIE	ADDPC+11, ADDPC+16, ADDPC+21, ADDPC+26, ADDPC+31, ADDPC+36, ADDPC+41, ADDPC+46, ADDPC+51, ADDPC+56 , ADDPC+61, ADDPC+66, SU+2*!
DIFQ	SORRY+1!
DIFROM	BULLETIN+4~
>> DIK	PRE+1, PRE+2, PRE+3, PRE+4
>> DIU	PRE+5*
>> DIU(0	PRE+5*
DLAYGO	ADDPC+2*!
DO	ADDPC+2!
DR	ADDPC+11, ADDPC+16, ADDPC+21, ADDPC+26, ADDPC+31, ADDPC+36, ADDPC+41, ADDPC+46, ADDPC+51, ADDPC+56 , ADDPC+61, ADDPC+66, SU+2*!
DUZ	BULLETIN+1, SENDER+1
>> G	ADDPC+5, ADDPC+6, ADDPC+8, ADDPC+10, ADDPC+11, ADDPC+13, ADDPC+15, ADDPC+16, ADDPC+18, ADDPC+20* , ADDPC+21, ADDPC+23, ADDPC+25, ADDPC+26, ADDPC+28, ADDPC+30, ADDPC+31, ADDPC+33, ADDPC+35, ADDPC+36* , ADDPC+38, ADDPC+40, ADDPC+41, ADDPC+43, ADDPC+45, ADDPC+46, ADDPC+48, ADDPC+50, ADDPC+51, ADDPC+53 , ADDPC+55, ADDPC+56, ADDPC+58, ADDPC+60, ADDPC+61, ADDPC+63, ADDPC+65, ADDPC+66, ADDPC+68
IOM	IMES+1, SORRY+4
IOST	SENDER+2
U	POST+2, POST+4, ADDPC+6, ADDPC+11, ADDPC+16, ADDPC+21, ADDPC+26, ADDPC+31, ADDPC+36, ADDPC+41 , ADDPC+46, ADDPC+51, ADDPC+56, ADDPC+61, ADDPC+66
X	ENV+2, ADDPC+2, INSTALLD+3~, INSTALLD+4, INSTALLD+8, INSTALLD+11*, SORRY~, SORRY+2, SORRY+3
XMDUZ	BULLETIN+4~, SENDER*
XMSUB	BULLETIN+4~, SUBJECT*
XMTEXT	BULLETIN+4~, SENDER+1*
XMY	BULLETIN+4~
XMY(	SENDER+1, GETRECIP+4
XMY(1	SENDER+1*
>> XPDDIQ(	ENV+2*
>> XPDDIQ("XPZ1"	ENV+1*
>> XPDDIQ("XPZ2"	ENV+1*
>> XPDENV	ENV+1
>> XPDQUIT	SORRY+2, SORRY+3
Y	ADDPC+3, INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1, GETRECIP+4*

Customize PDF page

Package: Mental Health Social Services

Routine: AMH30P8

Information

Source Information

Call Graph

Call Graph Total: 11

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: