Routine: AZAMED15

Information

AZAMED15 ; IHS/PHXAO/TMJ - -- Billing ; [ 06/12/03 2:37 PM ]

Source file <AZAMED15.m>

Package	Total	Call Graph
VA Fileman	5	^%DT ^%DTC FILE^DICN ^DIE ^DIR

Name	Comments	DBIA/ICR reference
BD	; -- beginning date
URC()	; -- urc billing file
INP()	; -- inpatient
INPV()	; -- inpatient visit date
DT(Y)	;
MCRM()	; -- medicare eligible multiple ien
MCRE()	; -- medicare eligible end date
PRVM()	; -- private insurance eligible multiple ien
INPI()	; -- inpatient ien
AV(X,Y)	; -- visit same day
ES()	; -- eligibility status
1	; -- create entry
P()	; -- provider
MCDC()	; -- medicaid eligibility code
PRVE()	; -- private insurance eligible end date
PRV()	;
MCRB()	; -- medicare eligible eligibility
TN	; -- transmittal number
MCDE()	; -- medicaid eligible end date
LV	; -- loop visits
MCDM(X,Y)	; -- medicaid eligible multiple ien
ID(X)	; -- inverse date
MCRI()	; -- medicare eligible ien
A	; -- driver
CB()	; -- classification/beneficiary
PRVI()	; -- private insurance
ICD()	;
ED	; -- end date
MCD(X,Y)	; -- medicaid eligible
Q	; -- cleanup
U21()	; -- under 21 years of age
MCR()	; -- medicare eligible
MCDI()	; -- medicaid eligible ien
MCDN()	; -- medicaid eligibility number
DS()	; -- day surgery
INPD()	; -- inpatient discharge date
PRVX()	; -- private insurance eligible

Name	Line Occurrences (* Changed, ! Killed)
^AUPNMCD - [#9000004]	MCDC+1, MCDN+1, MCDM+1, MCDM+2, MCDE+1, MCD+1, MCD+2
^AUPNMCD("B"	MCDI+1
^AUPNMCR - [#9000003]	MCRM+1, MCRE+1, MCRB+1
^AUPNMCR("B"	MCRI+1
^AUPNPAT - [#9000001]	ES+1, CB+1
^AUPNPRVT - [#9000006]	PRVM+1, PRVE+1, PRV+1, PRV+2
^AUPNPRVT("B"	PRVI+1
^AUPNVINP - [#9000010.02]	INPD+1, INPV+1
^AUPNVINP("AA"	INPI+1
^AUPNVPOV - [#9000010.07]	ICD+3
^AUPNVPOV("AD"	ICD+2
^AUPNVPRV - [#9000010.06]	P+1
^AUPNVPRV("AD"	P+1
^AUPNVSIT - [#9000010]	LV+3, INPV+1, DS+1
^AUPNVSIT("B"	LV+1, LV+2
^DD("DD"	DT+1
^DIZ(1115233 - [#1115233]	ICD+14
^DIZ(1115238	URC+1, AV+1, AV+2
^DPT - [#2]	U21+1
^ICD9 - [#80]	ICD+3

Name	Line Occurrences
$$AV	LV+7
$$DS	LV+7
$$ICD	LV+7
$$ID	INPI+1
$$INP	LV+7
$$INPD	INP+1
$$INPI	INP+1, INPD+1, INPV+1
$$INPV	INP+1
$$MCD	LV+7
$$MCDI	MCDC+1, MCDN+1, MCDM+1, MCDM+2, MCDE+1, MCD+1, MCD+2
$$MCDM	MCDC+1, MCDE+1
$$MCR	LV+7
$$MCRB	MCR+1
$$MCRE	MCR+1
$$MCRI	MCRM+1, MCRE+1, MCRB+1
$$MCRM	MCRE+1, MCRB+1, MCR+1
$$PRV	LV+7
$$PRVE	PRVX+1
$$PRVI	PRVM+1, PRVE+1
$$PRVM	PRVE+1, PRVX+1
$$U21	ICD+12, ICD+19, ICD+20, ICD+21, ICD+22
$$URC	LV+7
1	LV+7
BD	A+2
ED	A+3
LV	A+5
Q	A+2, A+3, A+4
TN	A+4

Name	Field # of Occurrence
>> %DT	BD+1, ED+1
>> %DT("A"	BD+1, ED+1
BD	A+2, BD+1*, LV+1, Q+1!
DA	1+1~, 1+5*
DD	1+1!
DFN	LV+4*, MCDI+1, MCRI+1, INPI+1, U21+1, ES+1, CB+1, PRVI+1, AV+1, Q+1! , PRV+1, PRV+2
DIC	1+1~, 1+2*, 1+5
DIC("DR"	1+3*
DIC(0	1+2*
DIE	1+1~, 1+5*
DINUM	1+1~, 1+2*
DIR	TN+1~
DIR("A"	TN+1*
DIR(0	TN+1*
DIRUT	A+4, Q+1!
DO	1+1!
DR	1+1~, 1+6, 1+7, 1+10, 1+11, 1+13*
DT	U21+1
DUZ(2	LV+3
ED	A+3, ED+1*, LV+1, Q+1!
FLG	ICD+1~, ICD+2, ICD+6, ICD+14, ICD+15, ICD+16, ICD+17, ICD+18, ICD+19, ICD+20* , ICD+21, ICD+22
ICD	1+1~, ICD+1~, ICD+3, ICD+4, ICD+5, ICD+6, ICD+7, ICD+8, ICD+9, ICD+10 , ICD+11, ICD+12, ICD+13, ICD+14, ICD+15, ICD+16, ICD+17, ICD+18, ICD+19, ICD+20 , ICD+21, ICD+22, ICD+23*, ICD+24
IEN	LV+2*, LV+3, 1+2, 1+5, URC+1, ICD+2, DS+1, Q+1!
IFN	ICD+1~, ICD+2, ICD+3
N	LV+3, LV+4, LV+5, P+1, Q+1!, PRV+1~, PRV+2, PRV+3
T	TN+2*, Q+1!
U	LV+3, LV+4, LV+5, MCDC+1, MCDN+1, MCDM+3, MCDE+1, MCD+3, MCRE+1, MCRB+1 , INPV+1, ICD+3, U21+1, DS+1, ES+1, CB+1, PRVE+1, AV+2, PRV+2, PRV+3
VDT	LV+1*, LV+2, MCDM+3, MCD+3, MCRM+1, MCR+1, INP+1, INPI+1, PRVM+1, PRVX+1 , AV+1, Q+1!, PRV+2, PRV+3
X	BD+1, ED+1, TN+1~, 1+1~, 1+2, MCDM~, MCDM+1, MCDM+2, MCDM+4, MCD~ , MCD+1, MCD+2, ID~, ID+1, U21+1~, U21+2, AV~, AV+1, AV+2, PRV+1~* , PRV+2
X1	U21+1~*
X2	U21+1~*
Y	BD+1, ED+1, TN+1~, TN+2, MCDM~, MCDM+1, MCDM+2, MCDM+3, MCD~, MCD+1 , MCD+2, MCD+3, MCD+4, DT~, DT+1, AV~, AV+1, AV+2, AV+3, PRV+1~* , PRV+4*, PRV+5