Ì 2
eff.dates
[fin.class, eff.date]
&(D)DEB[ggk]F[debD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
eff.date 8 DATE L debD
death.level 1 YN L &(D)DEB[ggk]F[debD]LD|0
rate 10 DEC R &(D)DEB[ggk]F[debD]|0
signout.level 1 YN L &(D)DEB[ggk]F[debD]LD|2
transfer.level 1 YN L &(D)DEB[ggk]F[debD]LD|1
Ì 2
by.facility
[fin.class,eff.date, facility]
&(D)DEB[ggk]F[debD]BF[gqb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
facility 10 FREE L MIS.FACILITY gqb
facility.rate 10 DEC R &(D)DEB[ggk]F[debD]BF[gqb]|0
Ì 2
death.cost.curve
[fin.class,eff.date, death.los]
&(D)DEB[ggk]F[debD]DC[debDC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
death.los 3 INT R debDC
death.med 7 DEC R &(D)DEB[ggk]F[debD]DC[debDC]|2
death.mult 5 DEC R &(D)DEB[ggk]F[debD]DC[debDC]|0
death.surg 7 DEC R &(D)DEB[ggk]F[debD]DC[debDC]|1
Ì 2
death.cost.val
[fin.class,eff.date, death.cost.val.seq]
&(D)DEB[ggk]F[debD]D[debDV]
Field Name Len Dat Typ J DPM Offset/Local/VAL
death.cost.val.seq 2 PINT R debDV
death.cost.val.exp 75 FREE L &(D)DEB[ggk]F[debD]D[debDV]|0
Ì 2
levels
[fin.class,eff.date, level]
&(D)DEB[ggk]F[debD]L[deaV]
Field Name Len Dat Typ J DPM Offset/Local/VAL
level 1 INT R deaV
level.exists 1 YN L VAL=IF{+@transfer.cost.curve.lev[fin.class,eff.date,le
VAL=vel,""]!(+@death.cost.curve.lev[fin.class,eff.date
VAL=,level,""]) "Y";"N"}
level.yn 1 YN L &(D)DEB[ggk]F[debD]L[deaV]|0
Ì 2
death.cost.curve.lev
[fin.class,eff.date,level, death.level.los]
&(D)DEB[ggk]F[debD]L[deaV]DCL[debDC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
death.level.los 3 INT R debDC
death.level.med 7 DEC R &(D)DEB[ggk]F[debD]L[deaV]DCL[debDC]|2
death.level.mult 5 DEC R &(D)DEB[ggk]F[debD]L[deaV]DCL[debDC]|0
death.level.surg 7 DEC R &(D)DEB[ggk]F[debD]L[deaV]DCL[debDC]|1
Ì 2
transfer.cost.curve.lev
[fin.class,eff.date,level, transfer.level.los]
&(D)DEB[ggk]F[debD]L[deaV]TCL[debTC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
transfer.level.los 3 INT R debTC
transfer.level.min 7 DEC R &(D)DEB[ggk]F[debD]L[deaV]TCL[debTC]|4
transfer.level.mio 7 DEC R &(D)DEB[ggk]F[debD]L[deaV]TCL[debTC]|6
transfer.level.mout 7 DEC R &(D)DEB[ggk]F[debD]L[deaV]TCL[debTC]|5
transfer.level.mult 5 DEC R &(D)DEB[ggk]F[debD]L[deaV]TCL[debTC]|0
transfer.level.sin 7 DEC R &(D)DEB[ggk]F[debD]L[deaV]TCL[debTC]|1
transfer.level.sio 7 DEC R &(D)DEB[ggk]F[debD]L[deaV]TCL[debTC]|3
transfer.level.sout 7 DEC R &(D)DEB[ggk]F[debD]L[deaV]TCL[debTC]|2
Ì 2
long.stay.cost.val
[fin.class,eff.date, long.stay.cost.val.seq]
&(D)DEB[ggk]F[debD]O[debOL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
long.stay.cost.val.seq 2 PINT R debOL
long.stay.cost.val.exp 75 FREE L &(D)DEB[ggk]F[debD]O[debOL]|0
Ì 2
signout.cost.curve
[fin.class,eff.date, signout.los]
&(D)DEB[ggk]F[debD]SC[debSC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
signout.los 3 INT R debSC
signout.mult 5 DEC R &(D)DEB[ggk]F[debD]SC[debSC]|0
Ì 2
signout.cost.val
[fin.class,eff.date, signout.cost.val.seq]
&(D)DEB[ggk]F[debD]S[debSO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
signout.cost.val.seq 2 PINT R debSO
signout.cost.val.exp 75 FREE L &(D)DEB[ggk]F[debD]S[debSO]|0
Ì 2
transfer.cost.curve
[fin.class,eff.date, transfer.los]
&(D)DEB[ggk]F[debD]TC[debTC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
transfer.los 3 INT R debTC
transfer.min 7 DEC R &(D)DEB[ggk]F[debD]TC[debTC]|4
transfer.mio 7 DEC R &(D)DEB[ggk]F[debD]TC[debTC]|6
transfer.mout 7 DEC R &(D)DEB[ggk]F[debD]TC[debTC]|5
transfer.mult 5 DEC R &(D)DEB[ggk]F[debD]TC[debTC]|0
transfer.sin 7 DEC R &(D)DEB[ggk]F[debD]TC[debTC]|1
transfer.sio 7 DEC R &(D)DEB[ggk]F[debD]TC[debTC]|3
transfer.sout 7 DEC R &(D)DEB[ggk]F[debD]TC[debTC]|2
Ì 2
transfer.cost.val
[fin.class,eff.date, transfer.cost.val.seq]
&(D)DEB[ggk]F[debD]T[debTO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
transfer.cost.val.seq 2 PINT R debTO
transfer.cost.val.exp 75 FREE L &(D)DEB[ggk]F[debD]T[debTO]|0
|
|
| | | | | | | | | |