Routine: ACHSBMC

Package	Total	Call Graph
IHS VA Utilities	3	$$DIR^XBDIR $$EXTSET^XBFUNC EN^XBVK
VA Fileman	3	^DIC $$GET1^DIQ ^DIR
Contract Health Management Information System	2	($$DIE,$$DOC,$$FC,$$HRN,$$TRAN,RTRN)^ACHS ^ACHSUD
Kernel	2	$$FMDIFF^XLFDT ($$PATCH,$$VERSION)^XPDUTL
Referred Care Information System	2	(AUTH,DXA,DXD,PXA,SET,STAT)^BMCCHS APPEAL^BMCCHS1

Package	Total	Caller Graph
Contract Health Management Information System	11	ACHS ADD REFERRAL ACHSA ACHSA7 ACHSAC ACHSAS ACHSDADP ACHSDN ACHSEOB3 ACHSEOB9 ACHSPA ACHSPAM

Entry Points

Name	Comments	DBIA/ICR reference
GETREF4	;ACHS3.110 4.19.04 IHS/ITSC/FCJ ADD LN LABEL NXT SEC
GETREF2	; TEST FOR ADDING NEW PO'S
ADD2	;
ADD1	;
GETREF1	;
PX	;EP - Transfer PX info to RCIS. ; ACHSDIEN = P.O. IEN at the "D" level
LINK()	;EP - Is link to RCIS on?
VCHK()	;EP - VER OF RCIS
AUTH	;EP - Update the P.O. status in REF ; ACHSREF = Ref IEN Req ; ACHSDIEN = P.O. IEN, "D" level Req
GETREF(ACHS)	;EP - select ref, retrieve info
GETREF0
ADD	;EP - link P.O. to referral
DX1	;EP;UPDATE FOR ICD9 FIX ;ACHS3.122 ADDED CALL TO DELETE DX IN RCIS ; ACHSDIEN = P.O. IEN, "D" level req
DX	;EP - Trans DX info to RCIS. ; ACHSDIEN = P.O. IEN, "D" level req
P(I,S,P)	;EP - Return Internal format of Referral with IEN of I,S, Piece P. ; FOR USE DURING DEVELOPMENT. RCIS WILL PROVIDE REQUIRED DATA ITEMS
STAT(S)	;EP - Update Referral status ; ACHSREF must contain the Referral IEN.
APPEAL	;EP -Update Referral appeal info
GETREF3	;ACHS3.110 4.19.04 IHS/ITSC/FCJ TST CALL FR DEN PKG ADDED NXT 3 LINES

External References

Name	Field # of Occurrence
$$DIE^ACHS	ADD2+8, AUTH+8, AUTH+28
$$DOC^ACHS	ADD1+3, ADD1+5, ADD2+3, ADD2+5, AUTH+5, AUTH+10, AUTH+11, AUTH+12, AUTH+23, AUTH+24 , DX+5, DX+6, DX1+4, DX1+5, PX+5, PX+6
$$FC^ACHS	AUTH+23
$$HRN^ACHS	GETREF4+29
$$TRAN^ACHS	AUTH+14
RTRN^ACHS	ADD2+8
^ACHSUD	ADD1+1
AUTH^BMCCHS	AUTH+6, AUTH+26
DXA^BMCCHS	DX+13, DX1+11
DXD^BMCCHS	DX1+14
PXA^BMCCHS	PX+18
SET^BMCCHS	GETREF0+4, GETREF4+2
STAT^BMCCHS	STAT+28
APPEAL^BMCCHS1	APPEAL+13
^DIC	GETREF1+1
$$GET1^DIQ	ADD1+5, GETREF1+6, GETREF2+6, GETREF2+9, LINK+2
^DIR	GETREF4+27
$$DIR^XBDIR	GETREF2+7, GETREF2+10, GETREF2+13
$$EXTSET^XBFUNC	GETREF4+21
EN^XBVK	GETREF1+11
$$FMDIFF^XLFDT	GETREF2+7
$$PATCH^XPDUTL	APPEAL+13
$$VERSION^XPDUTL	VCHK+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"The link to the Referral system is not on." Line Location: ADD+1
Function Call: WRITE	Prompt: *7,!,"This document has been canceled." Line Location: ADD1+3
Function Call: WRITE	Prompt: *7,!,"This document is already linked to Referral ",$P($G(^BMCREF($$DOC^ACHS(2,7),0)),U,2),"." Line Location: ADD1+4
Function Call: WRITE	Prompt: *7,!,"This document is already linked to Referral ",$$GET1^DIQ(90001,$$DOC^ACHS(2,7),.02),"." Line Location: ADD1+5
Function Call: WRITE	Prompt: *7,!,"Addition of Referral failed in routine ACHSBMC." Line Location: ADD2+8
Function Call: WRITE	Prompt: ! Line Location: GETREF0+0
Function Call: WRITE	Prompt: *7,!!,"You must have a CHS referral to enter a P.O.",!! Line Location: GETREF2+12
Function Call: WRITE	Prompt: *7,!!,"A Referral has not been entered.",!! Line Location: GETREF3+3
Routine Call	DIC Line Location: GETREF1+1
Routine Call	DIR Line Location: GETREF4+27

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^BMCREF - [#90001]	Classic Fileman Calls, GET1^DIQ
^BMCPARM - [#90001.31]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHSDEN - [#9002071]	APPEAL+11, STAT+8, STAT+9, STAT+19, STAT+22, STAT+23
^ACHSDENA - [#9002074]	APPEAL+6
^ACHSF - [#9002080]	AUTH+14, AUTH+16, AUTH+17, AUTH+18, DX+9, DX+10, PX+10, PX+11, PX+17
^BMCREF - [#90001]	GETREF0+4, P+2
^DPT - [#2]	ADD2+4, ADD2+5, GETREF0+4

Label References

Name	Line Occurrences
$$LINK	ADD+1, AUTH+4, DX+3, GETREF+1, PX+3, APPEAL+1, STAT+2
ADD1	ADD1+3, ADD1+5
ADD2	ADD2+3
AUTH	ADD2+10
DX	ADD2+10
GETREF	ADD2+1
GETREF0	GETREF1+5, GETREF4+19
GETREF1	GETREF4+9, GETREF4+25
GETREF2	GETREF1+4
GETREF3	GETREF1+3
GETREF4	GETREF1+10
PX	ADD2+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	GETREF4+31*, GETREF4+32
A	GETREF2+4~
>> ACHD("FAC"	GETREF1+3, GETREF4+9, GETREF4+15, GETREF4+19, GETREF4+25
>> ACHDDOS	STAT+11
>> ACHDNUM	STAT+16
ACHS	ADD1+6~, ADD1+7, ADD2+1, ADD2+2, ADD2+8, ADD2+9, AUTH+9~, AUTH+26, DX+4~, DX+13 , DX1+3~, DX1+11, DX1+14, GETREF~, GETREF0+4, GETREF2+7!, GETREF2+10!, GETREF4+1, GETREF4+2, GETREF4+12* , GETREF4+22, GETREF4+27, GETREF4+28, PX+4~, PX+18, APPEAL+13, STAT+3~, STAT+28
ACHS(	AUTH+10, AUTH+11, AUTH+12, AUTH+13, AUTH+14, AUTH+15, AUTH+17, AUTH+18, AUTH+19!, AUTH+20! , AUTH+23, AUTH+24, DX+5, DX+6, DX+7, DX+10, DX+12, DX+13, DX1+4, DX1+5* , DX1+6, DX1+8, DX1+10, DX1+11, DX1+13, DX1+14, GETREF0+4, GETREF4+9, GETREF4+19, GETREF4+21 , GETREF4+25, GETREF4+29, GETREF4+30, GETREF4+31, GETREF4+37, PX+5, PX+6, PX+7, PX+8, PX+11* , PX+12, PX+13, PX+15, PX+16, PX+17, PX+18, STAT+8, STAT+9, STAT+10, STAT+23
ACHS("ADD"	ADD1+7*, GETREF2+3
ACHS(1101	GETREF4+38
ACHS(1105	GETREF4+35
ACHS(1106	GETREF4+35, STAT+11*
ACHS(1112	APPEAL+7, STAT+4
ACHS(1113	APPEAL+8, STAT+5, STAT+12*
ACHS(1114	STAT+13*
ACHS(1121	APPEAL+9, STAT+14
ACHS(1122	APPEAL+10, STAT+15
ACHS(1128	GETREF4+16, APPEAL+11, STAT+16
ACHS(6116	APPEAL+2*
ACHS(6117	APPEAL+3*
ACHS(6118	APPEAL+4*, APPEAL+6
ACHS(6119	APPEAL+5*
>> ACHSA	APPEAL+11, STAT+8, STAT+9, STAT+19, STAT+22, STAT+23
>> ACHSDES	GETREF4+36*
>> ACHSDIEN	ADD1+2, AUTH+6, AUTH+14, AUTH+16, AUTH+17, AUTH+18, AUTH+26, DX+9, DX+10, PX+10 , PX+11, PX+17
ACHSDX	DX+4~, DX+8, DX+9, DX+10, DX+12, DX1+10
>> ACHSEDOS	GETREF4+35*
>> ACHSESDO	GETREF4+38*
>> ACHSHRN	GETREF4+29*
>> ACHSICDN	DX1+8
>> ACHSICDO	DX1+13
>> ACHSPROV	GETREF4+30*
ACHSPX	PX+4~, PX+9, PX+10, PX+11, PX+17
ACHSPX1	PX+4~, PX+15, PX+16*
>> ACHSREC	APPEAL+2, APPEAL+3, APPEAL+4, APPEAL+5
ACHSREF	ADD2+9*, AUTH+6, AUTH+26, AUTH+28, GETREF2+7!, GETREF2+10!, STAT+28
ACHSREF(1114	STAT+13
ACHSREF(1128	GETREF4+15
ACHSREF(1201	GETREF4+36
>> ACHSRMPC	GETREF4+37*
ACHSTIEN	AUTH+9~, AUTH+13, AUTH+14, AUTH+15, AUTH+16
>> ACHSTYP	GETREF4+32*
CT	STAT+20, STAT+21, STAT+23, STAT+24*, STAT+25!
D	GETREF0+1~
DA	GETREF4+12!, GETREF4+28!
>> DFN	ADD2+3, ADD2+4, GETREF4+29*
DIADD	AUTH+7!, AUTH+27!
DIC	AUTH+7!, AUTH+27!, DX+14!, DX1+15!, GETREF0+1~, GETREF0+3*
DIC("A"	GETREF0+3*
DIC("B"	GETREF0+4*
DIC(0	GETREF0+3*
DIR	GETREF4+27!
DIR("A"	GETREF4+27*
DIR("B"	GETREF4+27*
DIR(0	GETREF4+27*
DLAYGO	DX+14!, DX1+15!
DT	GETREF2+7, APPEAL+8, APPEAL+10, STAT+5, STAT+12, STAT+15
>> DTOUT	ADD2+2, GETREF2+3, GETREF3+2
>> DUOUT	ADD2+2, GETREF1+2, GETREF1+5, GETREF2+3, GETREF2+11, GETREF2+13*, GETREF3+2
DUZ	APPEAL+9, STAT+14
DUZ(2	AUTH+14, AUTH+16, AUTH+17, AUTH+18, AUTH+23, DX+9, DX+10, GETREF1+6, GETREF2+6, GETREF2+9 , GETREF4+29, LINK+2, PX+10, PX+11, PX+17, APPEAL+11, STAT+8, STAT+9, STAT+19, STAT+22 , STAT+23
I	GETREF2+4~, P~, P+2, APPEAL+6*, APPEAL+7
LAYGO	AUTH+7!, AUTH+27!
P	P~, P+2
S	P~, P+2, APPEAL+12!, STAT~, STAT+4, STAT+7, STAT+27!
U	ADD2+4, ADD2+5, AUTH+17, AUTH+18, DX+10, GETREF0+4, P+2, PX+11, PX+17, APPEAL+2 , APPEAL+3, APPEAL+4, APPEAL+5, APPEAL+6, APPEAL+11, STAT+8, STAT+9, STAT+23
V	GETREF2+4~
X	STAT+19*, STAT+21, STAT+22, STAT+23, STAT+25!
X1	STAT+20, STAT+22, STAT+23, STAT+25!
>> Y	GETREF1+6, GETREF1+8, GETREF2+2, GETREF2+6, GETREF2+7, GETREF2+9, GETREF2+10, GETREF3+1, GETREF4+1, GETREF4+12* , GETREF4+25, GETREF4+27, GETREF4+28

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSBMC

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller 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: