Ì € 2
abs.drg.rate.eff.dates (eff.dates)
[fin.class, eff.date]
&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 &DEB[ggk]F[debD]LD|0
rate 10 DEC R &DEB[ggk]F[debD]|0
signout.level 1 YN L &DEB[ggk]F[debD]LD|2
spec.cmg.data.exists 1 YN L VAL=IF{@spec.cmg.cost.val.exp[fin.class,eff.date,1]!(+
VAL=@spec.cmg.cost.curve[fin.class,eff.date,""]) "Y";"
VAL=N"}
spec.cmg.data.yn 1 YN L &DEB[ggk]F[debD]|1
transfer.level 1 YN L &DEB[ggk]F[debD]LD|1
Ì € 2
abs.cmg.rate.death.cost.curve (death.cost.curve)
[fin.class,eff.date, death.los]
&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 &DEB[ggk]F[debD]DC[debDC]|2
death.mult 5 DEC R &DEB[ggk]F[debD]DC[debDC]|0
death.surg 7 DEC R &DEB[ggk]F[debD]DC[debDC]|1
Ì € 2
abs.cmg.rate.death.cost.val (death.cost.val)
[fin.class,eff.date, death.cost.val.seq]
&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 &DEB[ggk]F[debD]D[debDV]|0
Ì € 2
abs.cmg.rate.levels (levels)
[fin.class,eff.date, level]
&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 &DEB[ggk]F[debD]L[deaV]|0
Ì € 2
abs.cmg.rate.death.cst.cv.lev (death.cost.curve.lev)
[fin.class,eff.date,level, death.level.los]
&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 &DEB[ggk]F[debD]L[deaV]DCL[debDC]|2
death.level.mult 5 DEC R &DEB[ggk]F[debD]L[deaV]DCL[debDC]|0
death.level.surg 7 DEC R &DEB[ggk]F[debD]L[deaV]DCL[debDC]|1
Ì € 2
abs.cmg.rate.xfer.cst.cv.lev (transfer.cost.curve.lev)
[fin.class,eff.date,level, transfer.level.los]
&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 &DEB[ggk]F[debD]L[deaV]TCL[debTC]|4
transfer.level.mio 7 DEC R &DEB[ggk]F[debD]L[deaV]TCL[debTC]|6
transfer.level.mout 7 DEC R &DEB[ggk]F[debD]L[deaV]TCL[debTC]|5
transfer.level.mult 5 DEC R &DEB[ggk]F[debD]L[deaV]TCL[debTC]|0
transfer.level.sin 7 DEC R &DEB[ggk]F[debD]L[deaV]TCL[debTC]|1
transfer.level.sio 7 DEC R &DEB[ggk]F[debD]L[deaV]TCL[debTC]|3
transfer.level.sout 7 DEC R &DEB[ggk]F[debD]L[deaV]TCL[debTC]|2
Ì € 2
abs.cmg.rate.long.sta.cost.val (long.stay.cost.val)
[fin.class,eff.date, long.stay.cost.val.seq]
&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 &DEB[ggk]F[debD]O[debOL]|0
Ì € 2
abs.cmg.rate.signout.cost.curv (signout.cost.curve)
[fin.class,eff.date, signout.los]
&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 &DEB[ggk]F[debD]SC[debSC]|0
Ì € 2
abs.cmg.rate.signout.cost.val (signout.cost.val)
[fin.class,eff.date, signout.cost.val.seq]
&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 &DEB[ggk]F[debD]S[debSO]|0
Ì € 2
abs.drg.rate.spec.cost.curve (spec.cmg.cost.curve)
[fin.class,eff.date, special.cmg]
&DEB[ggk]F[debD]CC[dra]
Field Name Len Dat Typ J DPM Offset/Local/VAL
special.cmg 3 INT R dra
spec.cmg.alos 5 DEC1 R &DEB[ggk]F[debD]CC[dra]|0
spec.cmg.low.sev.rapdw 10 DEC5 R &DEB[ggk]F[debD]CC[dra]|1
Ì € 2
abs.drg.rate.spec.cmg.cost.val (spec.cmg.cost.val)
[fin.class,eff.date, spec.cmg.cost.val.seq]
&DEB[ggk]F[debD]C[debCC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
spec.cmg.cost.val.seq 2 PINT R debCC
spec.cmg.cost.val.exp 75 FREE L &DEB[ggk]F[debD]C[debCC]|0
Ì € 2
abs.cmg.rate.xfer.cost.curve (transfer.cost.curve)
[fin.class,eff.date, transfer.los]
&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 &DEB[ggk]F[debD]TC[debTC]|4
transfer.mio 7 DEC R &DEB[ggk]F[debD]TC[debTC]|6
transfer.mout 7 DEC R &DEB[ggk]F[debD]TC[debTC]|5
transfer.mult 5 DEC R &DEB[ggk]F[debD]TC[debTC]|0
transfer.sin 7 DEC R &DEB[ggk]F[debD]TC[debTC]|1
transfer.sio 7 DEC R &DEB[ggk]F[debD]TC[debTC]|3
transfer.sout 7 DEC R &DEB[ggk]F[debD]TC[debTC]|2
Ì € 2
abs.cmg.rate.transfer.cost.val (transfer.cost.val)
[fin.class,eff.date, transfer.cost.val.seq]
&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 &DEB[ggk]F[debD]T[debTO]|0
|
|
| | | | | | | | | | |