Routine: AMHCDBL2

Package	Total	Call Graph
VA Fileman	2	FILE^DICN ^DIE
IHS VA Utilities	1	^XBFMK

Entry Points

Name	Comments	DBIA/ICR reference
CHKFIN	; EP - CHECK FOR INITIAL CONTACT TYPE
ACONV(P)	;
GETVSITS	; EP - GET CDMIS VISITS FOR THIS CLIENT
CS	;EP
PCONV(P)	;
CS1	;
PROBCONV	;

External References

Name	Field # of Occurrence
FILE^DICN	CS1+9, CS1+29, CS1+36, CS1+39
^DIE	CS1+11, CS1+13
^XBFMK	CS1+26, CS1+31, CS1+41

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Client service, no activity code. ",AMHIEN," ",$P(^ACDCS(AMHCDST,0),U,2)," is ien of activity" Line Location: CS1+2
Function Call: WRITE	Prompt: !,"Client service, no activity code to map. ",AMHIEN," ",$P(^ACDCS(AMHCDST,0),U,2)," is ien of activity" Line Location: CS1+3
Function Call: WRITE	Prompt: !,"No conversion of activity code on client service. ",AMHIEN," code is ",A Line Location: CS1+5
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"Error creating Behavioral Health Record!! Deleting Record.",! Line Location: CS1+10
Function Call: WRITE	Prompt: !!,"error editing MHSS Record entry ",AMHIEN," ",AMHMIEN Line Location: CS1+14
Function Call: WRITE	Prompt: !,"could not find problem code for this client service...SKIPPING ",AMHCDST,! Line Location: CS1+19
Function Call: WRITE	Prompt: !!,AMHIEN," ",AMHCDST," no initial to get problems." Line Location: CS1+21
Function Call: WRITE	Prompt: !!,"Creating Primary Provider entry failed!!!",$C(7),$C(7) Line Location: CS1+30
Function Call: WRITE	Prompt: !!,"Creating Secondary Prov entry for Client Service entry failed!!!"," ",$P(^VA(200,AMHPRV1,0),U)," ",AMHCDST Line Location: CS1+37
Function Call: WRITE	Prompt: !!,"Creating POV entry failed!!!",$C(7),$C(7) Line Location: CS1+40
Routine Call	DIE Line Location: CS1+11 CS1+13

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^AMHREC - [#9002011]	Classic Fileman Calls
^AMHRPRO - [#9002011.01]	Classic Fileman Calls
^AMHRPROV - [#9002011.02]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACDCS - [#9002172]	CS1+2, CS1+3, CS1+6, CS1+12, CS1+16, CS1+32, CS1+33
^ACDCS("C"	CS+2
^ACDIIF - [#9002170]	CS1+23
^ACDIIF("C"	CS1+22
^ACDPROB - [#9002170.3]	CS1+24
^ACDSERV(	CS1+3
^ACDVIS - [#9002172.1]	GETVSITS+3
^ACDVIS("D"	GETVSITS+3
^AMHPROB("B"	PROBCONV+1
^TMP("AMHCONV"	GETVSITS+1!, GETVSITS+4*, CHKFIN+2
^VA(200 - [#200]	CS1+37

Label References

Name	Line Occurrences
$$ACONV	CS1+4
$$PCONV	PROBCONV+1
CHKFIN	CS1+20
CS1	CS+2
GETVSITS	CS1+20
PROBCONV	CS1+25

Naked Globals

Name	Field # of Occurrence
^(	CHKFIN+2
^("BWP"	GETVSITS+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	PROBCONV+1*
>> A	CS1+2, CS1+3, CS1+4, CS1+5
>> AMHACT	CS1+4*, CS1+5, CS1+13
>> AMHCDST	CS+2*, CS1+2, CS1+3, CS1+6, CS1+12, CS1+16, CS1+21, CS1+32, CS1+33, CS1+37
>> AMHCOMP	CS1+13
>> AMHCOMPI	CHKFIN+2
>> AMHCOMT	CS1+13
>> AMHCOMTI	CHKFIN+2
>> AMHDATE	CS1+7*, CS1+8
>> AMHDAY	CS1+6*, CS1+7
>> AMHDCOM	CS1+13
>> AMHIEN	CS+2, CS1+2, CS1+3, CS1+5, CS1+14, CS1+21
>> AMHINI	CS1+22*, CS1+23
>> AMHLOC	CS1+13, GETVSITS+3
>> AMHMIEN	CS1+14
>> AMHPAT	CS1+13, CS1+28, CS1+35, CS1+39, GETVSITS+3
AMHPROB	CS1+17!
AMHPROB(	CS1+38, CS1+39, PROBCONV+1*
AMHPROB(1	CS1+24*
>> AMHPROV	CS1+28
>> AMHPRV1	CS1+33*, CS1+34, CS1+35, CS1+37
>> AMHR	CS1+11*, CS1+13, CS1+28, CS1+35, CS1+39
>> AMHSTR0	CS1+16, CS1+23, CS1+24
>> AMHTC	CS1+13
>> AMHTIME	CS1+12*, CS1+13
>> AMHVCNT	GETVSITS+2, GETVSITS+4
>> AMHX	CS1+32, CS1+33, CS1+38, CS1+39, CHKFIN+1, CHKFIN+2
>> AMHY	CS1+21, CS1+22, CHKFIN+1, CHKFIN+2
D0	CS1+9!, CS1+29!, CS1+36!, CS1+39!
DA	CS1+11!, CS1+13, CS1+29!, CS1+36!, CS1+39!
DD	CS1+9!, CS1+29!, CS1+36!, CS1+39!
DG	CS1+29!, CS1+36!, CS1+39!
DH	CS1+29!, CS1+36!, CS1+39!
DI	CS1+29!, CS1+36!, CS1+39!
DIADD	CS1+8, CS1+9!, CS1+28, CS1+29!, CS1+35, CS1+36!, CS1+39!
DIC	CS1+8!, CS1+9!, CS1+28, CS1+29!, CS1+35, CS1+36!, CS1+39!
DIC("DR"	CS1+8, CS1+28, CS1+35, CS1+39
DIC(0	CS1+8, CS1+28, CS1+35, CS1+39
DIE	CS1+9!, CS1+11!, CS1+13, CS1+29!, CS1+36!, CS1+39!
DIU	CS1+29!, CS1+36!, CS1+39!
DIW	CS1+29!, CS1+36!, CS1+39!
DLAYGO	CS1+8, CS1+9!, CS1+28, CS1+29!, CS1+35, CS1+36!, CS1+39!
DO	CS1+9!, CS1+29!, CS1+36!, CS1+39!
DQ	CS1+29!, CS1+36!, CS1+39!
DR	CS1+9!, CS1+11!, CS1+13
DR(2	CS1+11*
DUZ	CS1+8
P	ACONV~, ACONV+1, ACONV+2, ACONV+3, ACONV+4, ACONV+5, ACONV+6, ACONV+7, ACONV+8, ACONV+9 , ACONV+10, ACONV+11, ACONV+12, ACONV+13, ACONV+14, ACONV+15, ACONV+16, ACONV+17, ACONV+18, ACONV+19 , ACONV+20, ACONV+21, ACONV+22, ACONV+23, ACONV+24, ACONV+25, ACONV+26, ACONV+27, ACONV+28, ACONV+29 , ACONV+30, ACONV+31, ACONV+32, ACONV+33, ACONV+34, ACONV+35, ACONV+36, ACONV+37, PCONV~, PCONV+1 , PCONV+2, PCONV+3, PCONV+4, PCONV+5, PCONV+6, PCONV+7, PCONV+8, PCONV+9, PCONV+10, PCONV+11 , PCONV+12, PCONV+13, PCONV+14, PCONV+15, PCONV+16, PCONV+17, PCONV+18, PCONV+19, PCONV+20, PCONV+21 , PCONV+22, PCONV+23, PCONV+24, PCONV+25, PCONV+26, PCONV+27, PCONV+28, PCONV+29, PCONV+30, PCONV+31 , PCONV+32, PCONV+33, PCONV+34, PCONV+35, PCONV+36, PCONV+37, PCONV+38, PCONV+39, PCONV+40, PCONV+41 , PCONV+42
U	CS1+2, CS1+3, CS1+6, CS1+12, CS1+24, CS1+33, CS1+37, CS1+39, PROBCONV+1, GETVSITS+3 , GETVSITS+4, CHKFIN+2
X	CS1+8, CS1+9!, CS1+28, CS1+35, CS1+39, PROBCONV+1, GETVSITS+3, GETVSITS+4, CHKFIN+2*
>> Y	CS1+10, CS1+11, CS1+14, CS1+30, CS1+37, CS1+40, GETVSITS+2, GETVSITS+3, GETVSITS+4, CHKFIN+1* , CHKFIN+2*

Customize PDF page

Package: Mental Health Social Services

Routine: AMHCDBL2

Information

Source Information

Call Graph

Call Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: