Routine: ACHSRPFU

Package	Total	Call Graph
Contract Health Management Information System	3	$$PARM^ACHS SB1^ACHSRPF $$SSV^ACHSTX3
Kernel	1	$$FMTE^XLFDT
VA Fileman	1	^%DT

Package	Total	Caller Graph
Contract Health Management Information System	1	ACHSRPF1

Name	Comments	DBIA/ICR reference
INSPRM	;Primary INS INFO
PAT	;Pat Ident-Box 2
FORMAT	;
RATE	;PRICING INFORMATION SEGMENT
KILL	;
ORDFAC	;
DOS	;
REF	;
PATO	; OTHER INFO
PVT	;
RRE	;
INSOTH1	; other ins Box 3.h
END	;
DINACK(ACHSINSZ)	;
PVT1	;
DINAPI	;-- Check for PI eligibility at Date Of Service. Else, no print.
FIN	;
DIAG	;
MCD	;
PONUM	; -- Field 1 : DCR #, Document type, PDO number.
INS	;
SET(ACHSGL)	;
RATE2	;
PROVIDER	;BOX 26
SIG	;
PROC	;
MCR	;

Name	Field # of Occurrence
^%DT	DINACK+7, DINAPI+4
$$PARM^ACHS	PONUM+6, PONUM+9
SB1^ACHSRPF	INS+3
$$SSV^ACHSTX3	PAT+5
$$FMTE^XLFDT	INSPRM+15, PVT1+15, PVT1+16, SET+8, SET+9

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ACHS(4 - [#9002064]	PROVIDER+11, PROVIDER+12
^ACHSCTYP - [#9002068.1]	PONUM+4
^ACHSF - [#9002080]	PONUM+2, PONUM+3, PONUM+5, PONUM+7, RATE+6
^AUPN3PPH - [#9000003.1]	PVT1+7, PVT1+8, PVT1+9
^AUPNMCD - [#9000004]	MCD+6
^AUPNMCD("B"	MCD+1, MCD+3
^AUPNMCR - [#9000003]	MCR+3, MCR+10
^AUPNMCR("B"	MCR+2, MCR+3
^AUPNPRVT - [#9000006]	PVT+3, PVT1+1, PVT1+2
^AUPNRRE - [#9000005]	RRE+8
^AUPNRRE("B"	RRE+1, RRE+2
^AUTNINS - [#9999999.18]	PVT1+11, SET+1
^AUTTMCS - [#9999999.32]	MCR+9
^AUTTPIC - [#9999999.65]	PVT1+13
^DIC(5 - [#5]	PROVIDER+12, PVT1+12
^DPT - [#2]	MCR+10
^TMP(	RATE+6*
^TMP("ACHSPO"	PONUM+10, ORDFAC+5, PAT+5, PAT+6, PAT+7, PATO+4, INSPRM+5, INSPRM+14, INSPRM+15, INSOTH1+3 , INSOTH1+4, FIN+4, DOS+3, DIAG+2, PROC+2, REF+3, RATE+2, RATE+4, RATE+10, RATE2+4 , SIG+4, SIG+5, SIG+10, PROVIDER+9, PROVIDER+12, PROVIDER+13

Name	Line Occurrences
DINACK	MCR+5, MCD+4, RRE+5
DINAPI	PVT1+3
END	RRE+1, RRE+3, RRE+6
FORMAT	INS+2
MCD	MCR+2, MCR+4, MCR+6
MCR	PVT+3
RATE2	RATE+2
RRE	MCD+1
SET	MCR+11, MCD+7, RRE+9

Name	Field # of Occurrence
^(0	PVT1+12, SET+4
^(21	MCR+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	DINACK+6, DINAPI+3
A	KILL+2!
A(1	PATO+4
A(11	PAT+6
A(2	PAT+6
A(3	PAT+6
A(4	PATO+4
A(5	PATO+4
A(7	PATO+4
>> ACHS3TY	PONUM+6*, PONUM+10
>> ACHSADTE	SIG+10
>> ACHSARCO	RATE+7
>> ACHSASIG	SIG+10
>> ACHSBLKF	PONUM+10, PAT+7
ACHSBZD	END+1!
ACHSBZD("B"	DINACK+11, DINACK+12, DINACK+13, DINAPI+6, DINAPI+7, DINAPI+8
ACHSBZD("DT"	SET+5, SET+6, DINACK+8, DINACK+12, DINACK+13, DINAPI+5, DINAPI+7, DINAPI+8
ACHSBZD("E"	DINACK+11, DINACK+12, DINACK+13, DINAPI+6, DINAPI+7, DINAPI+8
ACHSBZD("I"	DINACK+8, DINACK+9, DINACK+10
ACHSBZD("OK"	PVT1+4, MCR+6, MCD+3, MCD+5, RRE+6, DINACK+4, DINACK+9, DINACK+12, DINACK+13, DINAPI+1 , DINAPI+7, DINAPI+8
ACHSBZD("REC"	DINACK+10*, DINACK+11
>> ACHSCTYP	PONUM+3, PONUM+4, PONUM+5
>> ACHSDCR	PONUM+9*, PONUM+10
>> ACHSDEST	PROVIDER+12, PROVIDER+13
>> ACHSDHHS	PONUM+5*, PONUM+10
>> ACHSDIEN	PONUM+2, PONUM+3, PONUM+7, PONUM+10, ORDFAC+5, PAT+5, PAT+6, PAT+7, PATO+4, INSPRM+5 , INSPRM+14, INSPRM+15, INSOTH1+3, INSOTH1+4, FIN+4, DOS+3, DIAG+2, PROC+2, REF+3, RATE+2 , RATE+4, RATE+10, RATE2+4, SIG+4, SIG+5, SIG+10, PROVIDER+9, PROVIDER+12, PROVIDER+13
>> ACHSDOFY	PONUM+2*, PONUM+5
>> ACHSEDTE	SIG+4
>> ACHSESIG	SIG+4
>> ACHSFDT	PVT1+14
ACHSGL	END+1!, SET~, SET+3, SET+4
ACHSINS	PVT1+2, PVT1+6, PVT1+7, PVT1+8, PVT1+9, PVT1+10, MCR+3, MCR+4, MCR+8, MCR+9 , MCD+6, RRE+8, END+1!, SET+1, DINAPI+6
ACHSINS1	PVT1+11*, PVT1+12, END+1!
ACHSINSZ	DINACK~, DINACK+9, DINACK+10
>> ACHSIPRM	INS+1, INSPRM+2, INSPRM+4, PVT1+14, SET+7
>> ACHSLTH	RATE+9*
ACHSMDFN	MCR+3, MCR+10, MCD+2, MCD+3, MCD+6, RRE+2, RRE+3, RRE+8, END+1!, SET+3 , SET+4, DINACK+9, DINACK+10
>> ACHSMPP	RATE+2, RATE2+4
ACHSMR	MCR+3, MCD+2, RRE+2*, END+1!, SET+10, SET+11
>> ACHSORDN	PONUM+5, PONUM+7
>> ACHSPO	PONUM+7*, PONUM+10
>> ACHSSF	PONUM+10
>> ACHSSIG	SIG+4, SIG+5
>> ACHSSNS	PAT+5*, PAT+6
>> ACHSSSNS	PAT+5*
>> ACHSTIEN	PONUM+10, ORDFAC+5, PAT+5, PAT+6, PAT+7, PATO+4, INSPRM+5, INSPRM+14, INSPRM+15, INSOTH1+3 , INSOTH1+4, FIN+4, DOS+3, DIAG+2, PROC+2, REF+3, RATE+2, RATE+4, RATE+10, RATE2+4 , SIG+4, SIG+5, SIG+10, PROVIDER+9, PROVIDER+12, PROVIDER+13
>> ACHSTYPE	PONUM+10
>> ACHSTYPV	PONUM+6, PONUM+10
B	KILL+2!
B(1	ORDFAC+5, PROVIDER+13
B(2	ORDFAC+5, PROVIDER+13
B(3	ORDFAC+5, PROVIDER+13
B(4	ORDFAC+5
C	KILL+2!
C(5	DOS+3, DINACK+5, DINACK+6, DINAPI+2, DINAPI+3
C(6	DOS+3
D	KILL+2!
D(1	PROVIDER+9
D(10	RATE+4
D(11	RATE2+4
D(13	RATE2+4
D(14	PROVIDER+9
D(15	RATE2+4
D(2	PROVIDER+9
D(3	PROVIDER+9
D(4	PROVIDER+9
D(6	PROVIDER+9
D(8	PROVIDER+9
D(9	RATE+5, RATE+6, RATE+7, RATE+8, RATE+9*, RATE+10
DA	PVT+2, PVT1+1, PVT1+2, END+1!, SET+2, SET+3, SET+4
>> DFN	PAT+5, PVT+1, PVT+3, PVT1+1, PVT1+2, MCR+2, MCR+3, MCR+10, MCD+1, MCD+3 , RRE+1, RRE+2
DUZ(2	PONUM+2, PONUM+3, PONUM+5, PONUM+7, RATE+6
E	KILL+2!
E(11	PONUM+10
E(7	SIG+5
E(9	FIN+4, SIG+10
F	KILL+2!
F(6	RATE+2
F(7	FIN+4
F(8	PROC+2
F(9	FIN+4
I	INSOTH1+1, INSOTH1+2, INSOTH1+3, INSOTH1+4, PROVIDER+11, PROVIDER+12, KILL+2!, PVT1+5
I(	INSPRM+5, INSPRM+14, INSPRM+15, PVT1+5, PVT1+6, PVT1+8, PVT1+9, PVT1+10, PVT1+11, PVT1+12* , PVT1+13, PVT1+14, PVT1+15, PVT1+16, PVT1+17, PVT1+18!, MCR+8, MCR+9, MCR+10, MCD+6* , RRE+8, SET+1, SET+4, SET+5, SET+6, SET+8, SET+9*, SET+10, SET+11!
I("B"	INSOTH1+2, INSOTH1+3, INSOTH1+4, PVT1+17, SET+10
I("P"	INSPRM+3, PVT1+14, SET+7
N	INS+4, INSPRM+3, INSPRM+4, INSPRM+5, INSPRM+6, INSPRM+14, INSPRM+15, INSOTH1+1, INSOTH1+2, INSOTH1+3 , INSOTH1+4, KILL+2!, PVT+2, PVT1+2, PVT1+4, PVT1+5, PVT1+6, PVT1+8, PVT1+9, PVT1+10 , PVT1+11, PVT1+12, PVT1+13, PVT1+14, PVT1+15, PVT1+16, PVT1+17, PVT1+18, MCR+1, MCR+3 , MCR+8, MCR+9, MCR+10, MCD+2, MCD+6, RRE+2, RRE+8, SET+1, SET+4, SET+5 , SET+6, SET+7, SET+8, SET+9, SET+10, SET+11, SET+12*
R	KILL+2!
R("D"	DIAG+2
R("P"	PROC+2
R(1	REF+3
R(2	REF+3
U	PONUM+2, PONUM+3, PONUM+4, PONUM+5, PONUM+7, PONUM+10, ORDFAC+5, PAT+5, PAT+6, PAT+7 , PATO+4, INSPRM+5, INSPRM+14, INSPRM+15, INSOTH1+3, INSOTH1+4, FIN+4, DOS+3, DIAG+2, PROC+2 , REF+3, RATE+4, RATE+6, RATE+10, RATE2+4, SIG+4, SIG+5, SIG+10, PROVIDER+9, PROVIDER+12 , PROVIDER+13, PVT1+6, PVT1+7, PVT1+8, PVT1+9, PVT1+10, PVT1+11, PVT1+12, PVT1+13, MCR+4 , MCR+8, MCR+9, MCR+10, MCD+6, RRE+8, SET+1, SET+4, DINACK+11, DINAPI+6
X	KILL+2!, PVT1+12, DINACK+6, DINAPI+3*
>> Y	DINACK+8, DINAPI+5

Customize PDF page

Package: Contract Health Management Information System

Routine: ACHSRPFU

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: