Ì i 2
abs.xfer.file
[abs.date]
*(B1)BZAB[bzABS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.date 8 DATE L bzABS
abs.ca.status 10 CHOICE L *(B1)BZAB[bzABS]|1
abs.cm.status 10 CHOICE L *(B1)BZAB[bzABS]|0
abs.cost.per.day 1 YN L *(B1)BZAB[bzABS]|2
Ì € i 2
abs.xfer.accts
[abs.date, abs.acct.no]
*(B1)BZAB[bzABS,bzR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.acct.no 12 FREE L bzR
abs.chg.total 9 SMONEY R *(B1)BZAB[bzABS,bzR]|0
abs.ins.bal 9 SMONEY R *(B1)BZAB[bzABS,bzR]|3
abs.ins.rec 9 SMONEY R *(B1)BZAB[bzABS,bzR]|1
abs.last.txn 4 INT R *(B1)BZAB[bzABS,bzR]|9
abs.next.bill.date 8 DATE L *(B1)BZAB[bzABS,bzR]|7
abs.next.type.of.bill 3 FREE L *(B1)BZAB[bzABS,bzR]|6
abs.pri.ins.deductible 13 SMONEY R *(B1)BZAB[bzABS,bzR]|8
abs.pt.bal 9 SMONEY R *(B1)BZAB[bzABS,bzR]|4
abs.pt.rec 9 SMONEY R *(B1)BZAB[bzABS,bzR]|2
abs.reimb.changed 1 CHOICE L *(B1)BZAB[bzABS,bzR]|5
abs.xfer.claim 10 FREE L BAR.CLAIM *(B1)BZAB[bzABS,bzR]|10
Ì € i 2
abs.xfer.chg.cats
[abs.date,abs.acct.no, abs.chg.cat]
*(B1)BZAB[bzABS,bzR]C[br]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.chg.cat 8 FREE L BAR.CH.CAT br
abs.chg.cat.amount 9 SMONEY R *(B1)BZAB[bzABS,bzR]C[br]|0
abs.chg.cat.qty 3 PINT R *(B1)BZAB[bzABS,bzR]C[br]|1
Ì € i 2
abs.xfer.procs
[abs.date,abs.acct.no, abs.proc]
*(B1)BZAB[bzABS,bzR]P[bd]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.proc 10 FREE L BAR.PROC bd
Ì € i 2
abs.xfer.alt.code
[abs.date,abs.acct.no,abs.proc, abs.alt.pc.date,abs.alt.code.type]
*(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.alt.pc.date 8 DATE L gpSD
abs.alt.code.type 12 FREE L bdAC
old.abs.alt.code 12 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC]|0
old.abs.alt.description 30 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC]|1
Ì € i 2
abs.xfer.alt.code.line
[abs.date,abs.acct.no,abs.proc,abs.alt.pc.date,abs.alt.code.type, abs.alt.line]
*(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.alt.line 12 FREE L altn
abs.alt.amount 9 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|9
abs.alt.code 12 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|0
abs.alt.description 30 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|1
abs.alt.grp.code 9 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|11
abs.alt.mod1 2 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|3
abs.alt.mod2 2 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|4
abs.alt.mod3 2 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|5
abs.alt.mod4 2 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|6
abs.alt.mod5 2 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|7
abs.alt.no.group 2 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|10
abs.alt.qty 5 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|2
abs.alt.rev.code 5 FREE L *(B1)BZAB[bzABS,bzR]P[bd]ALT[gpSD,bdAC,altn]|8
Ì € i 2
abs.xfer.corps
[abs.date,abs.acct.no,abs.proc, abs.corp]
*(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.corp 4 FREE L MIS.GL.CORP gvCN
Ì € i 2
abs.xfer.periods
[abs.date,abs.acct.no,abs.proc,abs.corp, abs.pp.date]
*(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.pp.date 8 DATE L gpD
abs.pp.amount 9 SMONEY R *(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]|1
abs.pp.count 6 PINT R *(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]|0
Ì € i 2
abs.xfer.dates
[abs.date,abs.acct.no,abs.proc,abs.corp,abs.pp.date, abs.pc.date]
*(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]D[gpSD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.pc.date 8 DATE L gpSD
abs.pc.amount 9 SMONEY R *(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]D[gpSD]|1
abs.pc.count 6 PINT R *(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]D[gpSD]|0
Ì € i 2
abs.xfer.date.site
[abs.date,abs.acct.no,abs.proc,abs.corp,abs.pp.date,abs.pc.date, abs.date.rev.site]
*(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]D[gpSD]R[gyr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.date.rev.site 10 FREE L MIS.REV.SITE gyr
abs.date.rs.amount 9 SMONEY R *(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]D[gpSD]R[gyr]|1
abs.date.rs.count 6 PINT R *(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]D[gpSD]R[gyr]|0
Ì € i 2
abs.xfer.site
[abs.date,abs.acct.no,abs.proc,abs.corp,abs.pp.date, abs.rev.site]
*(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]R[gyr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.rev.site 10 FREE L MIS.REV.SITE gyr
abs.rs.amount 9 SMONEY R *(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]R[gyr]|1
abs.rs.count 6 PINT R *(B1)BZAB[bzABS,bzR]P[bd]CR[gvCN]G[gpD]R[gyr]|0
Ì € i 2
abs.xfer.remit.codes
[abs.date,abs.acct.no, abs.rc.date,abs.rc.ins,abs.rc.code]
*(B1)BZAB[bzABS,bzR]RC[bzRCD,ggm,bnr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.rc.date 8 DATE L bzRCD
abs.rc.ins 10 FREE L MIS.INS ggm
abs.rc.code 5 FREE L BAR.REMIT bnr
abs.rc.amt 10 SMONEY R *(B1)BZAB[bzABS,bzR]RC[bzRCD,ggm,bnr]|0
Ì € i 2
abs.xfer.rev.codes
[abs.date,abs.acct.no, abs.rev.code,abs.rev.date]
*(B1)BZAB[bzABS,bzR]RV[bes,rvdt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.rev.code 5 FREE L bes
abs.rev.date 8 FREE L rvdt
abs.rev.amount 9 MONEY R *(B1)BZAB[bzABS,bzR]RV[bes,rvdt]|1
abs.rev.qty 4 FREE L *(B1)BZAB[bzABS,bzR]RV[bes,rvdt]|0
abs.rev.surg.flag 1 FREE L *(B1)BZAB[bzABS,bzR]RV[bes,rvdt]|2
Ì € i 2
abs.xfer.dbs
[abs.date, abs.xfer.db]
*(B1)BZAB[bzABS]DBS[gn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
abs.xfer.db 12 FREE L MIS.APPL.DB gn
abs.xfer.db.read 1 YN L *(B1)BZAB[bzABS]DBS[gn]|0
Ì i 2
adm.xfer.repeat.queue
[xfer.seconds,xfer.type,xfer.urn]
*(B1)BZAXRQ[xsec,xch,aa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
xfer.seconds 10 FREE L xsec
xfer.type 8 FREE L xch
xfer.urn 10 FREE L aa
Ì i 2
ansi.835.remit.main
[ansi.835.account,ansi.835.bill.no,ansi.835.ins,ansi.835.clm.type,ansi.835.bch.urn]
*(B3)BZANSI[bz,bzbn,ggm,bzCLT,by]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ansi.835.account 44 INT R bz
ansi.835.bill.no 3 INT R bzbn
ansi.835.ins 10 FREE L MIS.INS ggm
ansi.835.clm.type 4 FREE L bzCLT
ansi.835.bch.urn 10 INT R by
ansi.835.value 150 FREE L *(B3)BZANSI[bz,bzbn,ggm,bzCLT,by]
Ì € i 2
ansi.835.remit.clm
[ansi.835.account,ansi.835.bill.no,ansi.835.ins,ansi.835.clm.type,ansi.835.bch.urn, ansi.835.c
*(B3)BZANSI[bz,bzbn,ggm,bzCLT,by]CLM[bzSGT,bzCLN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ansi.835.clm.seg.type 8 FREE L bzSGT
ansi.835.clm.seq.no 4 INT R bzCLN
ansi.835.clm.value 150 FREE L *(B3)BZANSI[bz,bzbn,ggm,bzCLT,by]CLM[bzSGT,bzCLN]
Ì € i 2
ansi.835.remit.svc
[ansi.835.account,ansi.835.bill.no,ansi.835.ins,ansi.835.clm.type,ansi.835.bch.urn, ansi.835.s
*(B3)BZANSI[bz,bzbn,ggm,bzCLT,by]SVC[bzSUN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ansi.835.svc.seq.no 4 INT R bzSUN
ansi.835.svc.value 150 FREE L *(B3)BZANSI[bz,bzbn,ggm,bzCLT,by]SVC[bzSUN]
Ì € i 2
ansi.835.remit.svc.ln
[ansi.835.account,ansi.835.bill.no,ansi.835.ins,ansi.835.clm.type,ansi.835.bch.urn,ansi.835.svc
*(B3)BZANSI[bz,bzbn,ggm,bzCLT,by]SVC[bzSUN,bzSGT,bzSLN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ansi.835.svc.ln.seg 8 FREE L bzSGT
ansi.835.svc.ln.seq 4 INT R bzSLN
ansi.835.svc.ln.value 150 FREE L *(B3)BZANSI[bz,bzbn,ggm,bzCLT,by]SVC[bzSUN,bzSGT,bzSLN]
Ì i 2
ansi.835.remit.tmp.main
[ansi.835.tmp.account,ansi.835.tmp.bill.no,ansi.835.tmp.ins,ansi.835.tmp.clm.type,ansi.835.tmp.
*(B3)BZANSITMP[bz,bzBN,ggm,bzCLT,by]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ansi.835.tmp.account 44 INT R bz
ansi.835.tmp.bill.no 3 INT R bzBN
ansi.835.tmp.ins 10 FREE L MIS.INS ggm
ansi.835.tmp.clm.type 4 FREE L bzCLT
ansi.835.tmp.bch.urn 10 INT R by
ansi.835.tmp.value 150 FREE L *(B3)BZANSITMP[bz,bzBN,ggm,bzCLT,by]
Ì € i 2
ansi.835.remit.tmp.clm
[ansi.835.tmp.account,ansi.835.tmp.bill.no,ansi.835.tmp.ins,ansi.835.tmp.clm.type,ansi.835.tmp.
*(B3)BZANSITMP[bz,bzBN,ggm,bzCLT,by]CLM[bzSGT,bzCLN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ansi.835.tmp.clm.seg.type 8 FREE L bzSGT
ansi.835.tmp.clm.seq.no 4 INT R bzCLN
ansi.835.tmp.clm.value 150 FREE L *(B3)BZANSITMP[bz,bzBN,ggm,bzCLT,by]CLM[bzSGT,bzCLN]
Ì € i 2
ansi.835.remit.tmp.svc
[ansi.835.tmp.account,ansi.835.tmp.bill.no,ansi.835.tmp.ins,ansi.835.tmp.clm.type,ansi.835.tmp.
*(B3)BZANSITMP[bz,bzBN,ggm,bzCLT,by]SVC[bzSUN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ansi.835.tmp.svc.seq.no 4 INT R bzSUN
ansi.835.tmp.svc.value 150 FREE L *(B3)BZANSITMP[bz,bzBN,ggm,bzCLT,by]SVC[bzSUN]
Ì € i 2
ansi.835.remit.tmp.svc.ln
[ansi.835.tmp.account,ansi.835.tmp.bill.no,ansi.835.tmp.ins,ansi.835.tmp.clm.type,ansi.835.tmp.
*(B3)BZANSITMP[bz,bzBN,ggm,bzCLT,by]SVC[bzSUN,bzSGT,bzSLN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ansi.835.tmp.svc.ln.seg 8 FREE L bzSGT
ansi.835.tmp.svc.ln.seq 4 INT R bzSLN
ansi.835.tmp.svc.ln.value 150 FREE L *(B3)BZANSITMP[bz,bzBN,ggm,bzCLT,by]SVC[bzSUN,bzSGT,bzSLN]
Ì i 2
audit.trail
[audit.account,audit.date,audit.time,audit.user,audit.field]
*(B1)BZAUD[bz,bzAUD,bzAUT,gu,bzAUF]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.account 44 URN L BAR.PAT bz
audit.date 8 DATE L bzAUD
audit.time 8 HHMM L bzAUT
audit.user 10 FREE L MIS.USER gu
audit.field 15 FREE L bzAUF
audit.new 30 FREE L *(B1)BZAUD[bz,bzAUD,bzAUT,gu,bzAUF]|1
audit.old 30 FREE L *(B1)BZAUD[bz,bzAUD,bzAUT,gu,bzAUF]|0
Ì i 2
cl.bills
[cl.bill.client,cl.bill.seq.number]
*(B)BZCLB[bzCL,bzCB]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cl.bill.client 8 FREE L bzCL
cl.bill.seq.number 4 URN L bzCB
cl.bill.date 8 DATE L *(B)BZCLB[bzCL,bzCB]|3
cl.bill.discount 11 SMONEY R *(B)BZCLB[bzCL,bzCB]|2
cl.bill.exempt.chg 11 SMONEY R *(B)BZCLB[bzCL,bzCB]|1
cl.bill.purged 1 YN L *(B)BZCLB[bzCL,bzCB]|4
cl.bill.total.chg 11 SMONEY R *(B)BZCLB[bzCL,bzCB]|0
Ì € i 2
cl.bill.drs
[cl.bill.client,cl.bill.seq.number, cl.bill.dr]
*(B)BZCLB[bzCL,bzCB,ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cl.bill.dr 10 FREE L MIS.DOC ggg
cl.bill.dr.discount 11 SMONEY R *(B)BZCLB[bzCL,bzCB,ggg]|2
cl.bill.dr.exempt.chg 11 SMONEY R *(B)BZCLB[bzCL,bzCB,ggg]|1
cl.bill.dr.total.chg 11 SMONEY R *(B)BZCLB[bzCL,bzCB,ggg]|0
Ì € i 2
cl.bill.dr.pts
[cl.bill.client,cl.bill.seq.number,cl.bill.dr, cl.bill.pt.sort.name,cl.bill.pt.number,cl.bill.
*(B)BZCLB[bzCL,bzCB,ggg,bzCLN,bzCLR,bzCP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cl.bill.pt.sort.name 30 FREE L bzCLN
cl.bill.pt.number 12 FREE L bzCLR
cl.bill.pt.urn 8 FREE L bzCP
Ì i 2
conv.comment
[conv.com.urn]
*(B9)BZCOM[comm]
Field Name Len Dat Typ J DPM Offset/Local/VAL
conv.com.urn 10 URN L comm
conv.com.date 8 DATE L *(B9)BZCOM[comm]|1
conv.com.number 12 INT L *(B9)BZCOM[comm]|0
conv.com.text 78 FREE L *(B9)BZCOM[comm]|2
conv.comm.text 78 FREE L *(B1)BZCOM[comm]|2
Ì € i 2
conv.comment.reason
[conv.com.urn, conv.com.reason]
*(B9)BZCOM[comm]R[reas]
Field Name Len Dat Typ J DPM Offset/Local/VAL
conv.com.reason 15 FREE L reas
Ì i 2
conv.control
*(B9)BZF
Field Name Len Dat Typ J DPM Offset/Local/VAL
Ì i 2
conv.ov.balances
[conv.number]
*(B9)BZOVBAL[bzR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
conv.number 12 FREE L bzR
conv.acct.bal 9 MONEY R *(B9)BZOVBAL[bzR]|0
conv.sp.bal 9 MONEY R *(B9)BZOVBAL[bzR]|1
Ì € i 2
conv.ov.balances.ins
[conv.number, conv.ins.order]
*(B9)BZOVBAL[bzR]I[bzIO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
conv.ins.order 1 PINT R bzIO
conv.ins 10 FREE L MIS.INS *(B9)BZOVBAL[bzR]I[bzIO]|0
conv.ins.bal 9 MONEY R *(B9)BZOVBAL[bzR]I[bzIO]|1
conv.ins.exp.rcpts 3 PINT R *(B9)BZOVBAL[bzR]I[bzIO]|2
Ì i 2
conv.status
[data.volume]
*(B1)BZCONVST[cnvst]
Field Name Len Dat Typ J DPM Offset/Local/VAL
data.volume 4 PINT R cnvst
cf.num.accepted 8 PINT R *(B1)BZCONVST[cnvst]|13
cf.num.rejected 8 PINT R *(B1)BZCONVST[cnvst]|14
file.create.date 8 FREE L *(B1)BZCONVST[cnvst]|9
file.create.time 8 FREE L *(B1)BZCONVST[cnvst]|10
file.name 30 FREE L *(B1)BZCONVST[cnvst]|8
finish.time 10 FREE L *(B1)BZCONVST[cnvst]|1
finish.urn 8 PINT R *(B1)BZCONVST[cnvst]|4
job.num 20 FREE L *(B1)BZCONVST[cnvst]|7
job.server 30 FREE L *(B1)BZCONVST[cnvst]|6
path 30 FREE L *(B1)BZCONVST[cnvst]|11
rec.last.filed.time 10 FREE L *(B1)BZCONVST[cnvst]|5
records.read 8 PINT R *(B1)BZCONVST[cnvst]|2
start.time 10 FREE L *(B1)BZCONVST[cnvst]|0
start.urn 8 PINT R *(B1)BZCONVST[cnvst]|3
status 60 FREE L *(B1)BZCONVST[cnvst]|12
type.conv 8 FREE L *(B1)BZCONVST[cnvst]|15
Ì i 2
conv.tape.load.results
[tape.volume]
*(B)BZTAPE[bzv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
tape.volume 4 PINT R bzv
tape.errors 1 PINT R *(B)BZTAPE[bzv]|4
tape.finish.time 9 FREE L *(B)BZTAPE[bzv]|1
tape.finish.urn 12 PINT R *(B)BZTAPE[bzv]|6
tape.load.status 15 FREE L *(B)BZTAPE[bzv]|2
tape.master.job.num 4 FREE L *(B)BZTAPE[bzv]|7
tape.recs.read 8 PINT R *(B)BZTAPE[bzv]|3
tape.start.time 9 FREE L *(B)BZTAPE[bzv]|0
tape.start.urn 12 PINT R *(B)BZTAPE[bzv]|5
Ì i 2
cs.activity.file
[cs.for.user,cs.on.date,cs.by.user,cs.for.date,cs.account,cs.txn.urn]
*(B1)BZRR[gu,bzTS,gu1,bzRd,bz,bzT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cs.for.user 10 FREE L MIS.USER gu
cs.on.date 8 DATE L bzTS
cs.by.user 10 FREE L MIS.USER gu1
cs.for.date 8 DATE L bzRd
cs.account 44 URN L BAR.PAT bz
cs.txn.urn 5 PINT R bzT
cs.canned.text.mnemonic 10 FREE L BAR.COMMENT *(B1)BZRR[gu,bzTS,gu1,bzRd,bz,bzT]|0
cs.xfered.in 1 PINT R *(B1)BZRR[gu,bzTS,gu1,bzRd,bz,bzT]|1
Ì i 2
cs.cl.activity.file
[cs.cl.for.user,cs.cl.on.date,cs.cl.by.user,cs.cl.for.date,cs.cl.account,cs.cl.txn.urn]
*(B1)BZCRR[gu,bzTS,gu1,bzRd,bz,bzT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cs.cl.for.user 10 FREE L MIS.USER gu
cs.cl.on.date 8 DATE L bzTS
cs.cl.by.user 10 FREE L MIS.USER gu1
cs.cl.for.date 8 DATE L bzRd
cs.cl.account 44 URN L BAR.PAT bz
cs.cl.txn.urn 5 PINT R bzT
cs.cl.canned.txt.mnemonic 10 FREE L BAR.COMMENT *(B1)BZCRR[gu,bzTS,gu1,bzRd,bz,bzT]|0
cs.cl.xfered.in 1 PINT R *(B1)BZCRR[gu,bzTS,gu1,bzRd,bz,bzT]|1
Ì i 2
cs.cl.rem.xfer.out
[cs.cl.xfer.user,cs.cl.xfer.date,cs.cl.acct,cs.cl.txn]
*(B1)BZCRX[gu,bzD,bz,bzT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cs.cl.xfer.user 10 FREE L MIS.USER gu
cs.cl.xfer.date 8 DATE L bzD
cs.cl.acct 44 URN L BAR.PAT bz
cs.cl.txn 5 PINT R bzT
cs.cl.xfered.out 10 FREE L MIS.USER *(B1)BZCRX[gu,bzD,bz,bzT]|0
Ì i 2
cs.rem.xfer.out
[cs.xfer.user,cs.xfer.date,cs.acct,cs.txn]
*(B1)BZRX[gu,bzD,bz,bzT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cs.xfer.user 10 FREE L MIS.USER gu
cs.xfer.date 8 DATE L bzD
cs.acct 44 URN L BAR.PAT bz
cs.txn 5 PINT R bzT
cs.xfered.out 10 FREE L MIS.USER *(B1)BZRX[gu,bzD,bz,bzT]|0
Ì i 2
ins.authm.ee
[ins.auth.ins, ins.auth.ee.seq.n]
/INS.AUTH[ggm,bzASN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ins.auth.ee.seq.n 2 PINT R bzASN
ins.auth.ee.eff.dt 8 DATE L /INS.AUTH[ggm,bzASN]|2
ins.auth.ee.exp.dt 8 DATE L /INS.AUTH[ggm,bzASN]|3
ins.auth.ee.number 18 FREE L /INS.AUTH[ggm,bzASN]|0
ins.auth.ee.proc.status 8 CHOICE L /INS.AUTH[ggm,bzASN]|5
ins.auth.ee.status 9 CHOICE L /INS.AUTH[ggm,bzASN]|4
ins.auth.ee.status.date 8 DATE L /INS.AUTH[ggm,bzASN]|6
ins.auth.ee.units 4 PINT R /INS.AUTH[ggm,bzASN]|7
ins.auth.ee.urn 25 FREE L /INS.AUTH[ggm,bzASN]|1
Ì i 2
pe.status.vector
[period,pe.account]
*(B2)BZPE[bzP,bz]
Field Name Len Dat Typ J DPM Offset/Local/VAL
period 8 DATE L bzP
pe.account 44 URN L BAR.PAT bz
pe.agency 8 FREE L BAR.COL.AG *(B2)BZPE[bzP,bz]|15
pe.any.cl.dis.exemptions 1 YN L *(B2)BZPE[bzP,bz]|25
pe.ar.age.date 8 DATE L *(B2)BZPE[bzP,bz]|12
pe.ar.chg.total 9 SMONEY R *(B2)BZPE[bzP,bz]|6
pe.balance 9 SMONEY R *(B2)BZPE[bzP,bz]|2
pe.bar.status 2 CHOICE L *(B2)BZPE[bzP,bz]|1
pe.bd.age.date 8 DATE L *(B2)BZPE[bzP,bz]|13
pe.billing.rule 8 FREE L BAR.BRULE *(B2)BZPE[bzP,bz]|18
pe.chg.total 9 SMONEY R VAL=(@BAR.PAT.pe.ur.chg.total+@BAR.PAT.pe.ar.chg.total
VAL=)
pe.cl.pending.charges 11 SMONEY R *(B2)BZPE[bzP,bz]|23
pe.cl.unapplied.credits 9 SMONEY R *(B2)BZPE[bzP,bz]|24
pe.client.urn 10 FREE L *(B2)BZPE[bzP,bz]|17
pe.contract.amount 8 MONEY R *(B2)BZPE[bzP,bz]|21
pe.contract.date 8 DATE L *(B2)BZPE[bzP,bz]|20
pe.contract.paid 8 MONEY R *(B2)BZPE[bzP,bz]|22
pe.corp 4 FREE L MIS.GL.CORP *(B2)BZPE[bzP,bz]|30
pe.fee.schedule 12 FREE L BAR.FEE.SCH *(B2)BZPE[bzP,bz]|11
pe.inhouse.status 10 CHOICE L VAL=%BAR.PAT.inhouse.status(account,period)
pe.insurance.balance 9 SMONEY R *(B2)BZPE[bzP,bz]|4
pe.last.bill.txn 5 PINT R *(B2)BZPE[bzP,bz]|9
pe.last.billed.date 8 DATE L *(B2)BZPE[bzP,bz]|32
pe.last.pay.date 8 DATE L *(B2)BZPE[bzP,bz]|14
pe.last.post.txn 5 PINT R *(B2)BZPE[bzP,bz]|26
pe.last.st.txn 5 PINT R *(B2)BZPE[bzP,bz]|8
pe.last.txn 5 PINT R *(B2)BZPE[bzP,bz]|0
pe.pt.balance 9 SMONEY R *(B2)BZPE[bzP,bz]|3
pe.pt.type 1 CHOICE L *(B2)BZPE[bzP,bz]|19
pe.stmt.grp 8 FREE L BAR.STMT.GRP *(B2)BZPE[bzP,bz]|27
pe.type 8 FREE L BAR.ACCT.TYPE *(B2)BZPE[bzP,bz]|10
pe.ur.chg.total 9 SMONEY R *(B2)BZPE[bzP,bz]|5
pe.vector.final 8 DATE L *(B2)BZPE[bzP,bz]|33
pe.zero.date 8 DATE L *(B2)BZPE[bzP,bz]|16
Ì € i 2
pe.cl.aged.ar
[period,pe.account, pe.cl.age.date]
*(B2)BZPE[bzP,bz]1[bzCD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pe.cl.age.date 8 DATE L bzCD
pe.cl.age.amount 11 SMONEY R *(B2)BZPE[bzP,bz]1[bzCD]
Ì € i 2
pe.ins.order
[period,pe.account, pe.insurance.order]
*(B2)BZPE[bzP,bz]O[bzIO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pe.insurance.order 2 PINT R bzIO
pe.ins.mnemonic 10 FREE L MIS.INS *(B2)BZPE[bzP,bz]O[bzIO]|0
Ì € i 2
pe.insurance.ledger
[period,pe.account, pe.ins]
*(B2)BZPE[bzP,bz]0[ggm]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pe.ins 10 FREE L MIS.INS ggm
pe.ins.adj 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]|4
pe.ins.auto.transfer 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]|7
pe.ins.balance 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]|0
pe.ins.biller 8 FREE L BAR.BILLER *(B2)BZPE[bzP,bz]0[ggm]|17
pe.ins.collector 8 FREE L BAR.COLLECTOR *(B2)BZPE[bzP,bz]0[ggm]|9
pe.ins.exp.reimb 10 MONEY R *(B2)BZPE[bzP,bz]0[ggm]|15
pe.ins.last.pay.txn 4 INT R *(B2)BZPE[bzP,bz]0[ggm]|16
pe.ins.manual.edit 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]|6
pe.ins.num.adjs 3 PINT R *(B2)BZPE[bzP,bz]0[ggm]|12
pe.ins.num.exp.rcpts 3 PINT R *(B2)BZPE[bzP,bz]0[ggm]|10
pe.ins.num.rcpts 3 PINT R *(B2)BZPE[bzP,bz]0[ggm]|11
pe.ins.num.refs 3 PINT R *(B2)BZPE[bzP,bz]0[ggm]|13
pe.ins.nxt.reminder.dt 8 DATE L *(B2)BZPE[bzP,bz]0[ggm]|19
pe.ins.orig.post.date 8 DATE L *(B2)BZPE[bzP,bz]0[ggm]|18
pe.ins.prorate.adj 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]|2
pe.ins.prorate.amount 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]|1
pe.ins.rcpt 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]|3
pe.ins.ref 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]|5
pe.ins.transfer.date 8 DATE L *(B2)BZPE[bzP,bz]0[ggm]|14
Ì € i 2
pe.insurance.bill.ledger
[period,pe.account,pe.ins, pe.ins.bill.no]
*(B2)BZPE[bzP,bz]0[ggm]B[bzBN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pe.ins.bill.no 3 PINT R bzBN
pe.ins.bill.adj 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|4
pe.ins.bill.age.date 8 DATE L *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|16
pe.ins.bill.auto.transfer 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|7
pe.ins.bill.balance 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|0
pe.ins.bill.cl.age.date 8 DATE L *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|20
pe.ins.bill.date.sent 8 DATE L *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|17
pe.ins.bill.exp.reimb 10 MONEY R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|15
pe.ins.bill.manual.edit 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|6
pe.ins.bill.num.adjs 3 PINT R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|12
pe.ins.bill.num.exp.rcpts 3 PINT R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|10
pe.ins.bill.num.rcpts 3 PINT R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|11
pe.ins.bill.num.refs 3 PINT R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|13
pe.ins.bill.prorate.adj 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|2
pe.ins.bill.prorate.amt 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|1
pe.ins.bill.rcpt 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|3
pe.ins.bill.ref 9 MONEY R *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|5
pe.ins.bill.resolved.date 8 DATE L *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|18
pe.ins.bill.transfer.date 8 DATE L *(B2)BZPE[bzP,bz]0[ggm]B[bzBN]|14
Ì i 2
temp.cm.rpt.options
[temp.cm.ins, temp.cm.opt]
/CM.INS[ggm]O[cmopt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
temp.cm.opt 20 FREE L cmopt
temp.cm.opt.eff.date 20 FREE L /CM.INS[ggm]O[cmopt]|1
temp.cm.opt.np.pro.amt 10 SMONEY R /CM.INS[ggm]O[cmopt]|6
temp.cm.opt.np.pro.exp.r 10 SMONEY R /CM.INS[ggm]O[cmopt]|8
temp.cm.opt.np.pro.wo 9 SMONEY R /CM.INS[ggm]O[cmopt]|7
temp.cm.opt.pri.pro.amt 10 SMONEY R /CM.INS[ggm]O[cmopt]|2
temp.cm.opt.pri.pro.exp.r 10 SMONEY R /CM.INS[ggm]O[cmopt]|5
temp.cm.opt.pri.pro.wo 9 SMONEY R /CM.INS[ggm]O[cmopt]|3
temp.cm.opt.pri.pro.wo2 9 SMONEY R /CM.INS[ggm]O[cmopt]|4
temp.cm.opt.rule 20 FREE L /CM.INS[ggm]O[cmopt]|0
Ì i 2
top
[account]
$(B1)BZ[bz]
Field Name Len Dat Typ J DPM Offset/Local/VAL
account 44 URN L bz
abs.status 10 CHOICE L $(B1)BZ[bz]M["D"]D7|15
acct.type 8 FREE L BAR.ACCT.TYPE $(B1)BZ[bz]M["D"]D1|10
acct.urn 44 URN L
activity.date 8 DATE L
activity.type 1 CHOICE L
addr1 30 FREE L $(B1)BZ[bz]M["D"]D1|3
addr2 30 FREE L $(B1)BZ[bz]M["D"]D1|4
adj.total 11 MONEY R VAL=%BAR.PAT.get.credit.total("A",account)
adm.date 8 DATE L $(B1)BZ[bz]M["D"]D3|12
adm.diagnosis 30 FREE L $(B1)BZ[bz]M["D"]D3|11
adm.er.phys 10 FREE L MIS.DOC VAL=IF{@BAR.PAT.admit.phys;@BAR.PAT.er.phys}
adm.er.phys.name 30 FREE L VAL=%Z.name.inversion(@MIS.DOC.name[IF{@BAR.PAT.admit.
VAL=phys;@BAR.PAT.er.phys}],1)
adm.priority 10 FREE L MIS.ADM.PRIORT $(B1)BZ[bz]M["D"]D4|0
adm.purge.date 8 DATE L $(B1)BZ[bz]M["D"]|4
adm.src 10 FREE L MIS.ADM.SOURCE $(B1)BZ[bz]M["D"]D4|1
adm.status 8 FREE L $(B1)BZ[bz]M["D"]D3|16
adm.time 4 TIME L $(B1)BZ[bz]M["D"]D3|13
admit.diag 6 FREE L $(B1)BZ[bz]M["D"]D7|5
admit.diag.desc 50 FREE L $(B1)BZ[bz]M["D"]D7|7
admit.phys 10 FREE L MIS.DOC $(B1)BZ[bz]M["D"]D3|1
admit.phys.name 30 FREE L VAL=%Z.name.inversion(@MIS.DOC.name[@BAR.PAT.admit.phy
VAL=s],1)
age 3 INT R $(B1)BZ[bz]M["D"]D1|15
agency 8 FREE L BAR.COL.AG $(B1)BZ[bz]M|15
agency.addr1 30 FREE L VAL=IF{@BAR.PAT.agency^BAR.COL.AG.mnemonic @BAR.COL.AG
VAL=.address1}
agency.addr2 30 FREE L VAL=IF{@BAR.PAT.agency^BAR.COL.AG.mnemonic @BAR.COL.AG
VAL=.address2}
agency.addr3 30 FREE L VAL=IF{@BAR.PAT.agency^BAR.COL.AG.mnemonic @BAR.COL.AG
VAL=.address3}
agency.name 30 FREE L VAL=IF{@BAR.PAT.agency^BAR.COL.AG.mnemonic @BAR.COL.AG
VAL=.name}
agency.phone 18 FREE L VAL=IF{@BAR.PAT.agency^BAR.COL.AG.mnemonic @BAR.COL.AG
VAL=.phone}
alt.address 1 YN L $(B1)BZ[bz]M["D"]D1|27
any.cl.dis.exemptions 1 YN L $(B1)BZ[bz]M|25
apc.charges 4 INT R $(B1)BZ[bz]M["D"]D7|16
apg.summary 6 FREE L MIS.APG.NAME $(B1)BZ[bz]M["D"]D7["A"]|0
apg.tot.cost.wt 10 DEC R $(B1)BZ[bz]M["D"]D7["A"]|1
apg.tot.exp.reimb 10 DEC2 R $(B1)BZ[bz]M["D"]D7["A"]|2
apg.tot.rate 10 DEC R $(B1)BZ[bz]M["D"]D7["A"]|3
ar.age.date 8 DATE L $(B1)BZ[bz]M|12
ar.chg.total 9 SMONEY R $(B1)BZ[bz]M|6
attend.phys 10 FREE L MIS.DOC $(B1)BZ[bz]M["D"]D3|2
attend.phys.name 30 FREE L VAL=%Z.name.inversion(@MIS.DOC.name[@BAR.PAT.attend.ph
VAL=ys],1)
balance 9 SMONEY R $(B1)BZ[bz]M|2
balance.billed 9 SMONEY R VAL=(@balance-@ur.chg.total)
bar.adm.ser 8 DATE L VAL=IF{@BAR.PAT.adm.date;@BAR.PAT.ser.date}
bar.created 8 DATE L $(B1)BZ[bz]M["D"]|5
bar.dis.ser 8 DATE L VAL=IF{@BAR.PAT.dis.date;@BAR.PAT.ser.dis.date;@BAR.PA
VAL=T.ser.date}
bar.status 2 CHOICE L $(B1)BZ[bz]M|1
bd.age.date 8 DATE L $(B1)BZ[bz]M|13
bed 3 FREE L $(B1)BZ[bz]M["D"]D3|9
bill.date 8 DATE L VAL=@BAR.PAT.txn.ser.date["O",@BAR.PAT.last.bill.txn]
billing.rule 8 FREE L BAR.BRULE $(B1)BZ[bz]M|18
birthdate 10 BDATE L $(B1)BZ[bz]M["D"]D1|14
blood.ded 2 INT R $(B1)BZ[bz]M["D"]U|14
blood.furn 2 INT R $(B1)BZ[bz]M["D"]U|11
blood.not.repl 2 INT R $(B1)BZ[bz]M["D"]U|13
blood.repl 2 INT R $(B1)BZ[bz]M["D"]U|12
bus.phone 18 PHONE L $(B1)BZ[bz]M["D"]D1|9
calc.drg 6 FREE L MIS.DRG.NAME $(B1)BZ[bz]M["D"]D7|1
calc.next.stmt.msg.no 3 PINT R VAL=%BAR.PAT.next.stmt.msg(BAR.PAT.account,stmt.grp)
cancelled 1 YN L $(B1)BZ[bz]M["D"]|13
cci.acct.status.at.cci 15 FREE L $(B1)BZ[bz]M["D"]CCI|9
cci.comment 59 FREE L $(B1)BZ[bz]M["D"]CCI|8
cci.delete.reason 1 FREE L $(B1)BZ[bz]M["D"]CCI|5
cci.last.edit.date 8 DATE L $(B1)BZ[bz]M["D"]CCI|7
cci.last.rej.date 8 DATE L $(B1)BZ[bz]M["D"]CCI|6
cci.last.txn 4 INT R $(B1)BZ[bz]M["D"]CCI|2
cci.retd.from.cci.date 8 DATE L $(B1)BZ[bz]M["D"]CCI|4
cci.sent.to.cci.date 8 DATE L $(B1)BZ[bz]M["D"]CCI|3
cci.status 3 FREE L $(B1)BZ[bz]M["D"]CCI|0
cci.status.edit.type 3 FREE L $(B1)BZ[bz]M["D"]CCI|1
cd.screen 15 FREE L MIS.SCREEN VAL=@BAR.PSTATS.cd.screen[@BAR.PAT.pt.status]
cds.diag.disp 6 FREE L
chg.total 9 SMONEY R VAL=(@BAR.PAT.ur.chg.total+@BAR.PAT.ar.chg.total)
city 20 FREE L $(B1)BZ[bz]M["D"]D1|5
cl.acct.type 8 FREE L BAR.ACCT.TYPE $(B1)BZ[bz]M["D"]D1|10
cl.active 1 YN L $(B1)BZ[bz]M["D"]C2|4
cl.addr1 30 FREE L $(B1)BZ[bz]M["D"]D1|3
cl.addr2 30 FREE L $(B1)BZ[bz]M["D"]D1|4
cl.billing.rule 10 FREE L BAR.CLBRULE $(B1)BZ[bz]M["D"]C2|11
cl.city 20 FREE L $(B1)BZ[bz]M["D"]D1|5
cl.current.bill.number 6 INT R $(B1)BZ[bz]M["D"]C2|2
cl.discount.direct 1 YN L $(B1)BZ[bz]M["D"]C2|5
cl.discount.procedure 10 FREE L BAR.PROC $(B1)BZ[bz]M["D"]C2|1
cl.fee.schedule 12 FREE L BAR.FEE.SCH $(B1)BZ[bz]M["D"]C2|3
cl.inquiry.ar 9 SMONEY R VAL=(@balance-@ur.chg.total)
cl.inquiry.balance 9 SMONEY R VAL=(@balance+@cl.pending.charges)
cl.last.chg.sum 8 DATE L $(B1)BZ[bz]M["D"]C2|7
cl.last.pat.purge 8 DATE L $(B1)BZ[bz]M["D"]C2|6
cl.name 30 FREE L $(B1)BZ[bz]M["D"]|1
cl.number 12 FREE L $(B1)BZ[bz]M["D"]|0
cl.pat.purge.count 6 INT R $(B1)BZ[bz]M["D"]C2|8
cl.pending.charges 9 SMONEY R $(B1)BZ[bz]M|23
cl.phone 18 PHONE L $(B1)BZ[bz]M["D"]D1|8
cl.print.ssno 1 YN L $(B1)BZ[bz]M["D"]C2|10
cl.remark 60 FREE L $(B1)BZ[bz]M["D"]|3
cl.sort.name 30 FREE L $(B1)BZ[bz]M["D"]|2
cl.state 2 FREE L $(B1)BZ[bz]M["D"]D1|6
cl.unapplied.credits 9 SMONEY R $(B1)BZ[bz]M|24
cl.zip 10 ZIP.POST L $(B1)BZ[bz]M["D"]D1|7
client 12 FREE L $(B1)BZ[bz]M["D"]D1|11
client.addr1 30 FREE L VAL=%BAR.PAT.get.field.client(A,B,C)
client.addr2 30 FREE L VAL=%BAR.PAT.get.field.client(A,B,C)
client.city 20 FREE L VAL=%BAR.PAT.get.field.client(A,B,C)
client.name 30 FREE L VAL=%BAR.PAT.get.field.client(A,B,C)
client.phone 18 PHONE L VAL=%BAR.PAT.get.field.client(A,B,C)
client.state 2 FREE L VAL=%BAR.PAT.get.field.client(A,B,C)
client.urn 10 FREE L $(B1)BZ[bz]M|17
client.zip 10 ZIP.POST L VAL=%BAR.PAT.get.field.client(A,B,C)
coinsurance.days 3 INT R $(B1)BZ[bz]M["D"]U|4
coinsurance.rate 9 SMONEY R $(B1)BZ[bz]M["D"]U|3
collection.event 10 FREE L BAR.COL.EV $(B1)BZ[bz]M["S"]|14
confidential 1 YN L $(B1)BZ[bz]M["D"]|11
contract.1st.pmt.dt 8 DATE L $(B1)BZ[bz]M|29
contract.amount 8 MONEY R $(B1)BZ[bz]M|21
contract.date 8 DATE L $(B1)BZ[bz]M|20
contract.odue 4 PINT R VAL=IF{@pt.balance.billed+0:2D>0.00 (%Z.date.sub(@.
VAL=today,@BAR.PAT.contract.1st.pmt.dt)-(@BAR.PAT.cont
VAL=ract.paid/@BAR.PAT.contract.amount*@BAR.PAT.next.s
VAL=tmt.period)>0)}
contract.paid 8 MONEY R $(B1)BZ[bz]M|22
corp 4 FREE L MIS.GL.CORP $(B1)BZ[bz]M|30
cpt.surgeon 10 FREE L MIS.DOC $(B1)BZ[bz]M["D"]D7["CPD"]|0
cpt.surgeon.name VAL=@MIS.DOC.name[@cpt.surgeon]
current.age 7 FREE L VAL=%Z.age(@dob,IF{"Y"=@MIS.DIS.expired[@pt.dis.disp]!
VAL=("Y"=@MIS.DIS.expired[@dis.disp]) @dis.date})
current.coll.group 8 FREE L BAR.STMT.GRP $(B1)BZ[bz]M["S"]|16
current.coll.ins 10 FREE L MIS.INS $(B1)BZ[bz]M["S"]|17
cycle.day 2 PINT R $(B1)BZ[bz]M["S"]|3
dis.date 8 DATE L $(B1)BZ[bz]M["D"]D4|8
dis.diagnosis 30 FREE L $(B1)BZ[bz]M["D"]D4|13
dis.disp 10 FREE L MIS.DIS $(B1)BZ[bz]M["D"]D4|10
dis.time 4 TIME L $(B1)BZ[bz]M["D"]D4|9
dob 10 BDATE L $(B1)BZ[bz]M["D"]D1|17
dont.use 8 DATE L $(B1)BZ[bz]M|33
drg.arith.los 5 DEC R $(B1)BZ[bz]M["D"]D7|13
drg.dol 9 SMONEY R $(B1)BZ[bz]M["D"]D7|6
drg.geom.los 5 DEC R $(B1)BZ[bz]M["D"]D7|14
drg.max.stay 6 DEC R $(B1)BZ[bz]M["D"]D7|3
drg.min.stay 6 DEC R $(B1)BZ[bz]M["D"]D7|2
drg.status 1 CHOICE L $(B1)BZ[bz]M["D"]D7|0
drg.std.stay 6 DEC R $(B1)BZ[bz]M["D"]D7|4
edit.date 8 DATE L $(B1)BZ[bz]M["D"]|7
edit.or.switch.guar.num 1 CHOICE L $(B1)BZ[bz]M["D"]D1|24
email.guar 40 FREE L $(B1)BZ[bz]M["D"]DE|3
email.guar.yn 1 YN L $(B1)BZ[bz]M["D"]DE|2
email.pat 40 FREE L $(B1)BZ[bz]M["D"]DE|1
email.pat.bus 40 FREE L $(B1)BZ[bz]M["D"]DE|4
email.pat.yn 1 YN L $(B1)BZ[bz]M["D"]DE|0
emp.addr 30 FREE L VAL=IF{@employer.addr;@MIS.EMPLR.address[@employer]}
emp.city 30 FREE L VAL=IF{@employer.city;@MIS.EMPLR.city[@employer]}
emp.name 30 FREE L VAL=IF{@employer.name;@MIS.EMPLR.name[@employer]}
emp.phone 18 PHONE L VAL=IF{@employer.phone;@MIS.EMPLR.phone[@employer]}
emp.state 2 FREE L VAL=IF{@employer.state;@MIS.EMPLR.state[@employer]}
emp.status 10 FREE L MIS.EMP.STATUS $(B1)BZ[bz]M["D"]D2|2
emp.zip 10 ZIP.POST L VAL=IF{@employer.zip;@MIS.EMPLR.zip[@employer]}
employee.id 10 FREE L $(B1)BZ[bz]M["D"]D2|3
employer 10 FREE L MIS.EMPLR $(B1)BZ[bz]M["D"]D2|4
employer.addr 30 FREE L $(B1)BZ[bz]M["D"]D2|6
employer.addr.disp 30 FREE L VAL=IF{@employer's.address;@employer.addr}
employer.addr2 30 FREE L $(B1)BZ[bz]M["D"]D2|12
employer.city 30 FREE L $(B1)BZ[bz]M["D"]D2|8
employer.city.disp 30 FREE L VAL=IF{@employer's.city;@employer.city}
employer.name 30 FREE L $(B1)BZ[bz]M["D"]D2|5
employer.name.disp 30 FREE L VAL=IF{@employer's.name;@employer.name}
employer.phone 18 PHONE L $(B1)BZ[bz]M["D"]D2|11
employer.phone.disp 18 PHONE L VAL=IF{@employer's.phone;@employer.phone}
employer.state 2 FREE L $(B1)BZ[bz]M["D"]D2|9
employer.state.disp 2 FREE L VAL=IF{@employer's.state;@employer.state}
employer.zip 10 ZIP.POST L $(B1)BZ[bz]M["D"]D2|10
employer.zip.disp 10 ZIP.POST L VAL=IF{@employer's.zip;@employer.zip}
er.phys 10 FREE L MIS.DOC $(B1)BZ[bz]M["D"]D3|14
er.phys.name 30 FREE L VAL=%Z.name.inversion(@MIS.DOC.name[@BAR.PAT.er.phys],
VAL=1)
event.dnq 8 FREE L BAR.STMT.GRP $(B1)BZ[bz]M["S"]|26
event.dnq.no.ccg 1 YN L $(B1)BZ[bz]M["S"]|27
event.started 1 YN L $(B1)BZ[bz]M["S"]|15
exp.cost.ol 9 SMONEY R $(B1)BZ[bz]M["D"]D7|10
exp.day.ol 9 SMONEY R $(B1)BZ[bz]M["D"]D7|11
facility 10 FREE L MIS.FACILITY $(B1)BZ[bz]M["D"]D4|23
family.phys 10 FREE L MIS.DOC $(B1)BZ[bz]M["D"]D3|4
family.phys.name 30 FREE L VAL=%Z.name.inversion(@MIS.DOC.name[@BAR.PAT.family.ph
VAL=ys],1)
fee.schedule 12 FREE L BAR.FEE.SCH $(B1)BZ[bz]M|11
filer.time.stamp 10 FREE L $(B1)BZ[bz]M["D"]|10
fin.class 10 FREE L MIS.FIN.CLASS $(B1)BZ[bz]M["D"]D1|18
freeze.charges 1 YN L $(B1)BZ[bz]M|36
frm.loc.2 30 FREE L $(B1)BZ[bz]M["D"]U|6
frm.loc.27 8 FREE L $(B1)BZ[bz]M["D"]U|9
frm.loc.45 16 FREE L $(B1)BZ[bz]M["D"]U|8
frm.loc.9 7 FREE L $(B1)BZ[bz]M["D"]U|7
from.adm.date 8 DATE L $(B1)BZ[bz]M["D"]|6
grouper.version 3 FREE L $(B1)BZ[bz]M["D"]D7|12
guar.adr1 30 FREE L $(B1)BZ[bz]M["D"]D5|3
guar.adr1.disp 30 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.adr1;@gua
VAL=r.id's.guar.adr1}
guar.adr1.ul 30 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guar.adr2 30 FREE L $(B1)BZ[bz]M["D"]D5|4
guar.adr2.disp 30 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.adr2;@gua
VAL=r.id's.guar.adr2}
guar.adr2.ul 30 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guar.bus.phone 18 PHONE L $(B1)BZ[bz]M["D"]D5|9
guar.bus.phone.disp 18 PHONE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.bus.phone
VAL=;@guar.id's.guar.bus.phone}
guar.city 20 FREE L $(B1)BZ[bz]M["D"]D5|5
guar.city.disp 30 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.city;@gua
VAL=r.id's.guar.city}
guar.city.ul 20 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guar.comment.disp 79 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" "";""^BAR.GUAR.
VAL=guar.urn,@guar.num^BAR.GUAR.guar.num,@Next(BAR.GUA
VAL=R.guar.urn,BAR.GUAR.number.x),@BAR.GUAR.comment.te
VAL=xt}
guar.emp.addr 30 FREE L $(B1)BZ[bz]M["D"]D6|5
guar.emp.addr.disp 30 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" IF{@guar.emplr.
VAL=id's.address;@guar.emp.addr};@guar.id's.guar.emplr
VAL=.id's.address;@guar.id's.guar.emp.addr}
guar.emp.addr2 30 FREE L $(B1)BZ[bz]M["D"]D6|11
guar.emp.city 30 FREE L $(B1)BZ[bz]M["D"]D6|7
guar.emp.city.disp 30 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" IF{@guar.emplr.
VAL=id's.city;@guar.emp.city};@guar.id's.guar.emplr.id
VAL='s.city;@guar.id's.guar.emp.city}
guar.emp.name 30 FREE L $(B1)BZ[bz]M["D"]D6|4
guar.emp.name.disp 30 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" IF{@guar.emplr.
VAL=id's.name;@guar.emp.name};@guar.id's.guar.emplr.id
VAL='s.name;@guar.id's.guar.emp.name}
guar.emp.phone 18 PHONE L $(B1)BZ[bz]M["D"]D6|10
guar.emp.phone.disp 18 PHONE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" IF{@guar.emplr.
VAL=id's.phone;@guar.emp.phone};@guar.id's.guar.emplr.
VAL=id's.phone;@guar.id's.guar.emp.phone}
guar.emp.state 2 FREE L $(B1)BZ[bz]M["D"]D6|8
guar.emp.state.disp 2 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" IF{@guar.emplr.
VAL=id's.state;@guar.emp.state};@guar.id's.guar.emplr.
VAL=id's.state;@guar.id's.guar.emp.state}
guar.emp.status 10 FREE L MIS.EMP.STATUS $(B1)BZ[bz]M["D"]D6|1
guar.emp.status.disp 10 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.emp.statu
VAL=s;@guar.id's.guar.emp.status}
guar.emp.zip 10 ZIP.POST L $(B1)BZ[bz]M["D"]D6|9
guar.emp.zip.disp 10 ZIP.POST L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" IF{@guar.emplr.
VAL=id's.zip;@guar.emp.zip};@guar.id's.guar.emplr.id's
VAL=.zip;@guar.id's.guar.emp.zip}
guar.emplr.id 10 FREE L MIS.EMPLR $(B1)BZ[bz]M["D"]D6|3
guar.emplye.id 10 FREE L $(B1)BZ[bz]M["D"]D6|2
guar.emplye.id.disp 10 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.emplye.id
VAL=;@guar.id's.guar.emplye.id}
guar.first.name 15 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @p.guar.name;""
VAL=^BAR.GUAR.guar.urn,@guar.num^BAR.GUAR.guar.num,@Ne
VAL=xt(BAR.GUAR.guar.urn,BAR.GUAR.number.x),@BAR.GUAR.
VAL=guar.name}#"1,"
guar.home.phone 18 PHONE L $(B1)BZ[bz]M["D"]D5|8
guar.home.phone.disp 18 PHONE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.home.phon
VAL=e;@guar.id's.guar.home.phone}
guar.id 47 URN L BAR.GUAR $(B1)BZ[bz]M["D"]D5|11
guar.last.name 15 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @p.guar.name;""
VAL=^BAR.GUAR.guar.urn,@guar.num^BAR.GUAR.guar.num,@Ne
VAL=xt(BAR.GUAR.guar.urn,BAR.GUAR.number.x),@BAR.GUAR.
VAL=guar.name}#"0,"
guar.name 30 FREE L $(B1)BZ[bz]M["D"]D5|1
guar.name.disp 30 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @p.guar.name;""
VAL=^BAR.GUAR.guar.urn,@guar.num^BAR.GUAR.guar.num,@Ne
VAL=xt(BAR.GUAR.guar.urn,BAR.GUAR.number.x),@BAR.GUAR.
VAL=guar.name}
guar.name.fl 30 FREE L VAL=%Z.name.inversion(IF{@BAR.PARAM.pt.or.guar.stmts="
VAL=P" @p.guar.name;""^BAR.GUAR.guar.urn,@guar.num^BAR
VAL=.GUAR.guar.num,@Next(BAR.GUAR.guar.urn,BAR.GUAR.nu
VAL=mber.x),@BAR.GUAR.guar.name})
guar.name.fl.ul 30 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guar.num 15 FREE L $(B1)BZ[bz]M["D"]D5|0
guar.num.disp 15 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.num;@guar
VAL=.id's.guar.num}
guar.occup 20 FREE L $(B1)BZ[bz]M["D"]D6|0
guar.occup.disp 20 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.occup;@gu
VAL=ar.id's.guar.occup}
guar.pt.relat 30 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guar.soc.sec 15 FREE L $(B1)BZ[bz]M["D"]D5|10
guar.soc.sec.disp 15 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.soc.sec;@
VAL=guar.id's.guar.soc.sec}
guar.sort.name 30 FREE L
guar.state 2 FREE L $(B1)BZ[bz]M["D"]D5|6
guar.state.disp 2 FREE L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.state;@gu
VAL=ar.id's.guar.state}
guar.zip 10 ZIP.POST L $(B1)BZ[bz]M["D"]D5|7
guar.zip.disp 10 ZIP.POST L VAL=IF{@BAR.PARAM.pt.or.guar.stmts="P" @guar.zip;@guar
VAL=.id's.guar.zip}
guarantor.adr1 30 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.adr2 30 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.bus.phone 18 PHONE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.city 20 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.emp 10 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.emp.addr 30 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.emp.city 30 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.emp.name 30 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.emp.phone 18 PHONE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.emp.state 2 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.emp.zip 10 ZIP.POST L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.home.phone 18 PHONE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.occupation 20 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.state 2 FREE L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
guarantor.zip 10 ZIP.POST L VAL=%BAR.PAT.get.field.guarantor(A,B,C)
hc.subscriber.inits 3 FREE L $(B1)BZ[bz]M["D"]DCAN|1
hc.subscriber.relation 10 FREE L MIS.RELAT $(B1)BZ[bz]M["D"]DCAN|2
health.care.number 14 FREE L $(B1)BZ[bz]M["D"]DCAN|0
hold.bd.xfer 1 YN L $(B1)BZ[bz]M["S"]|23
hold.bd.xfer.by 10 FREE L MIS.USER $(B1)BZ[bz]M["S"]|24
hold.bd.xfer.date 8 DATE L $(B1)BZ[bz]M["S"]|25
hold.letter 1 YN L $(B1)BZ[bz]M["S"]|20
hold.letter.by 10 FREE L MIS.USER $(B1)BZ[bz]M["S"]|21
hold.letter.date 8 DATE L $(B1)BZ[bz]M["S"]|22
hold.stmt 1 YN L $(B1)BZ[bz]M["S"]|1
home.phone 18 PHONE L $(B1)BZ[bz]M["D"]D1|8
inhouse.status 10 CHOICE L VAL=%BAR.PAT.inhouse.status(account,"NONE")
inpt.service 10 FREE L MIS.SVC $(B1)BZ[bz]M["D"]D3|7
ins.elig.trace.num.disp 30 FREE L VAL=@BAR.PAT.ins.elig.trace.num[/insurance]
ins1.addr.disp 30 FREE L VAL=IF{@ins1.mnemonic.disp^XXX,@MIS.INS.address[XXX];@
VAL=insurance.addr[XXX]}
ins1.balance.disp 9 MONEY R VAL=IF{@ins1.mnemonic.disp^XXX @ins.balance[XXX]}
ins1.city.disp 30 FREE L VAL=IF{@ins1.mnemonic.disp^XXX,@MIS.INS.city[XXX];@ins
VAL=urance.city[XXX]}
ins1.mnemonic.disp 10 FREE L VAL=IF{@ins.mnemonic[1];@MIS.PARAM.self.pay.ins;"SP"}
ins1.name.disp 30 FREE L VAL=IF{@MIS.INS.name[@ins.mnemonic[1]^XXX];@insurance.
VAL=name[XXX]}
ins1.phone.disp 30 PHONE L VAL=IF{@ins1.mnemonic.disp^XXX,@MIS.INS.phone[XXX];@in
VAL=surance.phone[XXX]}
ins1.state.disp 2 FREE L VAL=IF{@ins1.mnemonic.disp^XXX,@MIS.INS.state[XXX];@in
VAL=surance.state[XXX]}
ins1.zip.disp 10 FREE L VAL=IF{@ins1.mnemonic.disp^XXX,@MIS.INS.zip[XXX];@insu
VAL=rance.zip[XXX]}
ins2.addr.disp 30 FREE L VAL=IF{@ins2.mnemonic.disp^XXX,@MIS.INS.address[XXX];@
VAL=insurance.addr[XXX]}
ins2.balance.disp 9 MONEY R VAL=IF{@ins2.mnemonic.disp^XXX @ins.balance[XXX]}
ins2.city.disp 30 FREE L VAL=IF{@ins2.mnemonic.disp^XXX,@MIS.INS.city[XXX];@ins
VAL=urance.city[XXX]}
ins2.mnemonic.disp 10 FREE L VAL=IF{@ins.mnemonic[2];@MIS.PARAM.self.pay.ins;"SP"}
ins2.name.disp 30 FREE L VAL=IF{@MIS.INS.name[@ins.mnemonic[2]^XXX];@insurance.
VAL=name[XXX]}
ins2.phone.disp 30 PHONE L VAL=IF{@ins2.mnemonic.disp^XXX,@MIS.INS.phone[XXX];@in
VAL=surance.phone[XXX]}
ins2.state.disp 2 FREE L VAL=IF{@ins2.mnemonic.disp^XXX,@MIS.INS.state[XXX];@in
VAL=surance.state[XXX]}
ins2.zip.disp 10 FREE L VAL=IF{@ins2.mnemonic.disp^XXX,@MIS.INS.zip[XXX];@insu
VAL=rance.zip[XXX]}
ins3.addr.disp 30 FREE L VAL=IF{@ins3.mnemonic.disp^XXX,@MIS.INS.address[XXX];@
VAL=insurance.addr[XXX]}
ins3.balance.disp 9 MONEY R VAL=IF{@ins3.mnemonic.disp^XXX @ins.balance[XXX]}
ins3.city.disp 30 FREE L VAL=IF{@ins3.mnemonic.disp^XXX,@MIS.INS.city[XXX];@ins
VAL=urance.city[XXX]}
ins3.mnemonic.disp 10 FREE L VAL=IF{@ins.mnemonic[3];@MIS.PARAM.self.pay.ins;"SP"}
ins3.name.disp 30 FREE L VAL=IF{@MIS.INS.name[@ins.mnemonic[3]^XXX];@insurance.
VAL=name[XXX]}
ins3.phone.disp 30 PHONE L VAL=IF{@ins3.mnemonic.disp^XXX,@MIS.INS.phone[XXX];@in
VAL=surance.phone[XXX]}
ins3.state.disp 2 FREE L VAL=IF{@ins3.mnemonic.disp^XXX,@MIS.INS.state[XXX];@in
VAL=surance.state[XXX]}
ins3.zip.disp 10 FREE L VAL=IF{@ins3.mnemonic.disp^XXX,@MIS.INS.zip[XXX];@insu
VAL=rance.zip[XXX]}
ins4.addr.disp 30 FREE L VAL=IF{@ins4.mnemonic.disp^XXX,@MIS.INS.address[XXX];@
VAL=insurance.addr[XXX]}
ins4.balance.disp 9 MONEY R VAL=IF{@ins4.mnemonic.disp^XXX @ins.balance[XXX]}
ins4.city.disp 30 FREE L VAL=IF{@ins4.mnemonic.disp^XXX,@MIS.INS.city[XXX];@ins
VAL=urance.city[XXX]}
ins4.mnemonic.disp 10 FREE L VAL=IF{@ins.mnemonic[4];@MIS.PARAM.self.pay.ins;"SP"}
ins4.name.disp 30 FREE L VAL=IF{@MIS.INS.name[@ins.mnemonic[4]^XXX];@insurance.
VAL=name[XXX]}
ins4.phone.disp 30 PHONE L VAL=IF{@ins4.mnemonic.disp^XXX,@MIS.INS.phone[XXX];@in
VAL=surance.phone[XXX]}
ins4.state.disp 2 FREE L VAL=IF{@ins4.mnemonic.disp^XXX,@MIS.INS.state[XXX];@in
VAL=surance.state[XXX]}
ins4.zip.disp 10 FREE L VAL=IF{@ins4.mnemonic.disp^XXX,@MIS.INS.zip[XXX];@insu
VAL=rance.zip[XXX]}
insurance.balance 9 SMONEY R $(B1)BZ[bz]M|4
int.number 12 FREE L $(B1)BZ[bz]M["D"]|8
interest.held 1 YN L $(B1)BZ[bz]M["S"]|8
interest.last.posted 8 DATE L $(B1)BZ[bz]M["S"]|10
interest.reinstated 8 DATE L $(B1)BZ[bz]M["S"]|9
interest.total 12 MONEY R $(B1)BZ[bz]M["S"]|11
irf.adm.calc.hipps.cmg.cd 5 FREE L VAL=IF{@irf.adm.cmg&@irf.adm.com @irf.adm.com_@irf.adm
VAL=.cmg}
irf.adm.cmg 10 FREE L $(B1)BZ[bz]M["D"]IRF|0
irf.adm.com 1 CHOICE L $(B1)BZ[bz]M["D"]IRF|1
irf.calc.hipps.cmg.cd.xxx 5 FREE L $(B1)BZ[bz]M["D"]IRF|4
irf.dis.calc.cmg.reimb.rt 10 MONEY R VAL=%BAR.PAT.get.irf.cmg.reimbursement(account)
irf.dis.calc.hipps.cmg.cd 5 FREE L VAL=IF{@irf.dis.cmg&@irf.dis.com @irf.dis.com_@irf.dis
VAL=.cmg}
irf.dis.cmg 10 FREE L $(B1)BZ[bz]M["D"]IRF|2
irf.dis.com 1 CHOICE L $(B1)BZ[bz]M["D"]IRF|3
irf.dis.final.assess.dt 8 DATE L $(B1)BZ[bz]M["D"]IRF|5
last.bill.txn 5 PINT R $(B1)BZ[bz]M|9
last.billed.date 8 DATE L $(B1)BZ[bz]M|32
last.event.date 8 DATE L VAL=@BAR.PAT.txn.ser.date["O",@BAR.PAT.last.st.txn]
last.hosp 30 FREE L $(B1)BZ[bz]M["D"]D4|4
last.hosp.frm.date 8 DATE L $(B1)BZ[bz]M["D"]D4|5
last.hosp.thr.date 8 DATE L $(B1)BZ[bz]M["D"]D4|6
last.letter 8 FREE L BAR.LETTER $(B1)BZ[bz]M["S"]|18
last.letter.date 8 DATE L $(B1)BZ[bz]M["S"]|19
last.pay.amount 15 SMONEY R VAL=%BAR.PAT.get.field(A,B,C)
last.pay.date 8 DATE L $(B1)BZ[bz]M|14
last.post.txn 5 PINT R $(B1)BZ[bz]M|26
last.st.txn 5 PINT R $(B1)BZ[bz]M|8
last.stmt.txn 5 PINT R $(B1)BZ[bz]M|35
last.txn 5 PINT R $(B1)BZ[bz]M|0
lifetime.rsrv.days 3 INT R $(B1)BZ[bz]M["D"]U|2
lifetime.rsrv.rate 9 SMONEY R $(B1)BZ[bz]M["D"]U|1
los 4 PINT R VAL=IF{@adm.date %Z.date.sub(IF{@dis.date;@.today},@ad
VAL=m.date)!1;0}
marital.status 10 FREE L MIS.MAR.STATUS $(B1)BZ[bz]M["D"]D1|16
master.pt.urn 20 FREE L $(B1)BZ[bz]M["D"]D1|1
mcal.2.month 1 FREE L $(B1)BZ[bz]M["D"]ML|3
mcal.attachments 1 FREE L $(B1)BZ[bz]M["D"]ML|2
mcal.date.ra.eomb 8 DATE L $(B1)BZ[bz]M["D"]ML|5
mcal.emer.cert 1 FREE L $(B1)BZ[bz]M["D"]ML|1
mcal.lab.addr1 38 FREE L $(B1)BZ[bz]M["D"]ML|8
mcal.lab.addr2 38 FREE L $(B1)BZ[bz]M["D"]ML|9
mcal.lab.name 38 FREE L $(B1)BZ[bz]M["D"]ML|7
mcal.medicare 1 FREE L $(B1)BZ[bz]M["D"]ML|4
mcal.medicare.disallowed 8 MONEY R $(B1)BZ[bz]M["D"]ML|6
mcal.other.cov 1 FREE L $(B1)BZ[bz]M["D"]ML|0
mcal.remark.sys.keep 1 YN L $(B1)BZ[bz]M["D"]ML|10
mother 12 FREE L $(B1)BZ[bz]M["D"]D4|22
msa.code 10 FREE L MIS.MSA.DICT $(B1)BZ[bz]M["D"]D1|25
multiplier.1 3 INT R $(B1)BZ[bz]M["D"]U|15
multiplier.2 3 INT R $(B1)BZ[bz]M["D"]U|16
name 30 NAME L $(B1)BZ[bz]M["D"]|1
newborn.adm.src 10 FREE L MIS.NEWBORN $(B1)BZ[bz]M["D"]D4|2
newborn.weight.gr 6 PINT R $(B1)BZ[bz]M["D"]N|2
newborn.weight.lbs 3 PINT R $(B1)BZ[bz]M["D"]N|0
newborn.weight.ozs 2 PINT R $(B1)BZ[bz]M["D"]N|1
next.stmt.ctrc.offset 2 PINT R $(B1)BZ[bz]M["NSD"]|4
next.stmt.date 8 DATE L $(B1)BZ[bz]M["NSD"]|0
next.stmt.date.disp 8 DATE L VAL=IF{"P"=@BAR.PARAM.pt.or.guar.stmts @BAR.PAT.next.s
VAL=tmt.date;@BAR.GUAR.next.stmt.date[@BAR.PAT.guar.id
VAL=]}
next.stmt.dunning.msg 8 FREE L BAR.DUN.MSG $(B1)BZ[bz]M["NSD"]|3
next.stmt.msg.number 2 PINT R $(B1)BZ[bz]M["NSD"]|1
next.stmt.no 3 PINT R $(B1)BZ[bz]M["S"]|0
next.stmt.period 3 PINT R $(B1)BZ[bz]M["NSD"]|2
next.stmt.seq.no 3 PINT R $(B1)BZ[bz]M["S"]|2
next.stmt.temp.msg.cnt 2 INT R $(B1)BZ[bz]M["NSD"]|6
next.stmt.temp.msg.max 2 PINT R $(B1)BZ[bz]M["NSD"]|5
number 12 FREE L $(B1)BZ[bz]M["D"]|0
occupation 20 FREE L $(B1)BZ[bz]M["D"]D2|1
old.version 3 PINT R $(B1)BZ[bz]M|31
on.hold.by 10 FREE L MIS.USER $(B1)BZ[bz]M["S"]|6
on.hold.date 8 DATE L $(B1)BZ[bz]M["S"]|7
os.agency.xfer.date 8 DATE L $(B1)BZ[bz]M|37
other.phone 18 PHONE L $(B1)BZ[bz]M["D"]D1["M"]|0
other.phys 10 FREE L MIS.DOC $(B1)BZ[bz]M["D"]D3|3
other.phys.name 30 FREE L VAL=%Z.name.inversion(@MIS.DOC.name[@BAR.PAT.other.phy
VAL=s],1)
outpt.locn 10 FREE L MIS.LOCN $(B1)BZ[bz]M["D"]D3|6
outpt.service 10 FREE L MIS.SVC $(B1)BZ[bz]M["D"]D3|17
outreach.pt.number 15 FREE L $(B1)BZ[bz]M["D"]|14
outsourced.agency 1 FREE L VAL=(@BAR.PAT.bar.status="FB"&("Y"=@BAR.COL.AG.outsour
VAL=ced[@BAR.PAT.agency]))
outsourced.agency.pfx 1 FREE L VAL=IF{"Y"=@BAR.COL.AG.outsourced[@BAR.PAT.agency] "o"
VAL=}
override.acct.type 8 FREE L BAR.ACCT.TYPE $(B1)BZ[bz]M["D"]D1|19
override.msa 10 FREE L MIS.MSA.DICT $(B1)BZ[bz]M["D"]D1|26
override.sp.biller 8 FREE L BAR.BILLER $(B1)BZ[bz]M["D"]D1|21
override.sp.coll 8 FREE L BAR.COLLECTOR $(B1)BZ[bz]M["D"]D1|20
prim.care.phys 10 FREE L MIS.DOC $(B1)BZ[bz]M["D"]D3|15
prim.care.phys.name 30 FREE L VAL=%Z.name.inversion(@MIS.DOC.name[@BAR.PAT.prim.care
VAL=.phys],1)
primary.ins 10 FREE L MIS.INS VAL=IF{@BAR.PAT.ins.mnemonic[1];@MIS.PARAM.self.pay.in
VAL=s;"SP"}
primary.insurance 30 FREE L VAL=IF{@p.primary.ins^XXX,@MIS.INS.other.type[XXX]="Y"
VAL= @BAR.PAT.insurance.name[XXX];@MIS.INS.name[XXX]}
print.cd.screen 0 FREE L VAL=IF{@cd.screen account^/account,%MIS.SCREEN.print(@
VAL=cd.screen,^@customer.def.fields,"",0),""}
print.cd.screen.verbatim 0 FREE L VAL=IF{@cd.screen account^/account,%MIS.SCREEN.print(@
VAL=cd.screen,^@customer.def.fields,1,0),""}
pt.addr1.ul 30 FREE L VAL=%BAR.PAT.get.field(A,B,C)
pt.addr2.ul 30 FREE L VAL=%BAR.PAT.get.field(A,B,C)
pt.balance 9 SMONEY R $(B1)BZ[bz]M|3
pt.balance.billed 9 SMONEY R VAL=(@pt.balance-@ur.chg.total)
pt.city.ul 20 FREE L VAL=%BAR.PAT.get.field(A,B,C)
pt.depart.date 8 DATE L $(B1)BZ[bz]M["D"]D4|25
pt.dis.disp 10 FREE L MIS.DIS $(B1)BZ[bz]M["D"]D4|24
pt.first.name 15 FREE L VAL=@name#"1,"
pt.last.name 15 FREE L VAL=@name#"0,"
pt.name 30 FREE L VAL=%Z.name.inversion(@name)
pt.name.ul 30 FREE L VAL=%BAR.PAT.get.field(A,B,C)
pt.rcvbl.balance 9 SMONEY R VAL=(@BAR.PAT.ar.chg.total-@BAR.PAT.insurance.balance)
pt.relat 10 FREE L MIS.RELAT $(B1)BZ[bz]M["D"]D5|2
pt.status 8 FREE L BAR.PSTATS $(B1)BZ[bz]M["D"]D3|5
pt.type 1 CHOICE L $(B1)BZ[bz]M|19
purge.type 8 FREE L BAR.PURGE.TYPE $(B1)BZ[bz]M["BPU"]|1
race 10 FREE L MIS.RACE $(B1)BZ[bz]M["D"]D1|13
rcpt.total 11 MONEY R VAL=%BAR.PAT.get.credit.total("R",account)
ref.total 11 MONEY R VAL=%BAR.PAT.get.credit.total("P",account)
reimb.drg 6 FREE L MIS.DRG.NAME $(B1)BZ[bz]M["D"]D7|9
remark 50 FREE L $(B1)BZ[bz]M["D"]|3
remark1 39 FREE L $(B1)BZ[bz]M["D"]U["R"]|0
remark2 39 FREE L $(B1)BZ[bz]M["D"]U["R"]|1
remark3 39 FREE L $(B1)BZ[bz]M["D"]U["R"]|2
remark4 39 FREE L $(B1)BZ[bz]M["D"]U["R"]|3
remark5 39 FREE L $(B1)BZ[bz]M["D"]U["R"]|4
retire.date 8 DATE L $(B1)BZ[bz]M["BPU"]|0
room 10 FREE L MIS.ROOM $(B1)BZ[bz]M["D"]D3|8
ser.date 8 DATE L $(B1)BZ[bz]M["D"]D4|11
ser.date.rec 8 DATE L $(B1)BZ[bz]M["D"]D4|15
ser.dis.date 8 DATE L $(B1)BZ[bz]M["D"]D4|12
ser.time 4 TIME L $(B1)BZ[bz]M["D"]D4|14
service.location 10 FREE L VAL=IF{@inpt.service;@outpt.locn}
sex 1 CHOICE L $(B1)BZ[bz]M["D"]D1|12
soc.sec 15 FREE L $(B1)BZ[bz]M["D"]D1|2
sort.name 30 NAME L $(B1)BZ[bz]M["D"]|2
sp.prog 10 FREE L $(B1)BZ[bz]M["D"]D4|3
state 2 FREE L $(B1)BZ[bz]M["D"]D1|6
status.date 8 DATE L VAL=%BAR.PAT.get.status.date(BAR.PAT.account)
stmt.age.date 8 DATE L $(B1)BZ[bz]M["S"]|13
stmt.date 8 DATE L VAL=@BAR.PAT.txn.ser.date["O",@BAR.PAT.last.stmt.txn]
stmt.date.and.hold 10 FREE L VAL=%BAR.PAT.stmt.date.and.hold(account)
stmt.grp 8 FREE L BAR.STMT.GRP $(B1)BZ[bz]M|27
stmt.reset 1 YN L $(B1)BZ[bz]M["S"]|5
stmt.start 8 DATE L $(B1)BZ[bz]M["S"]|4
stripped.num 12 FREE L $(B1)BZ[bz]M["D"]|9
suppress.stmt 1 YN L $(B1)BZ[bz]M["S"]|12
treat.auth.no 10 FREE L $(B1)BZ[bz]M["D"]D4|7
type 8 FREE L BAR.ACCT.TYPE $(B1)BZ[bz]M|10
type.of.bill 3 FREE L $(B1)BZ[bz]M["D"]U|0
unit.number 26 FREE L $(B1)BZ[bz]M["D"]D1|0
ur.app.from 8 DATE L $(B1)BZ[bz]M["D"]D4|19
ur.app.thru 8 DATE L $(B1)BZ[bz]M["D"]D4|20
ur.chg.total 9 SMONEY R $(B1)BZ[bz]M|5
ur.code 1 INT R $(B1)BZ[bz]M["D"]D4|18
ur.grace 2 INT R $(B1)BZ[bz]M["D"]D4|21
ur.last.txn.eval 6 PINT R $(B1)BZ[bz]T["CC"]|0
usual.visit.guarantor 1 YN L $(B1)BZ[bz]M["D"]D1|23
usual.visit.insurances 1 YN L $(B1)BZ[bz]M["D"]D1|22
vip 1 YN L $(B1)BZ[bz]M["D"]|12
vip.confidential.disp 19 FREE R VAL=IF{"Y"=@vip "<VIP>"}_IF{"Y"=@confidential "&
VAL=lt;CONFIDENTIAL>"}
visit.reason 50 FREE L $(B1)BZ[bz]M["D"]D3|0
web.access 1 YN L $(B1)BZ[bz]M|34
zero.date 8 DATE L $(B1)BZ[bz]M|16
zip 10 ZIP.POST L $(B1)BZ[bz]M["D"]D1|7
Ì € i 2
can.acct.numbers
[account, old.can.number.seq.no]
$(B1)BZ[bz]M["D"]CNN[bzCQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
old.can.number.seq.no 2 PINT R bzCQ
old.can.acct.number 12 FREE L $(B1)BZ[bz]M["D"]CNN[bzCQ]|0
Ì € i 2
conditions
[account, seq.no]
$(B1)BZ[bz]M["D"]C[bzCN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
seq.no 1 PINT R bzCN
cond 10 FREE L MIS.COND $(B1)BZ[bz]M["D"]C[bzCN]|0
Ì € i 2
customer.def.queries
[account, cd.query]
$(B1)BZ[bz]M["D"]CD[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.query 10 FREE L MIS.QUERY ggv
cd.response 75 FREE L $(B1)BZ[bz]M["D"]CD[ggv]|0
cd.response.for.letter 75 QRY.RESP L VAL=%BAR.PAT.get.field(A,B,C)
cd.yn.comment 75 FREE L $(B1)BZ[bz]M["D"]CD[ggv]|5
Ì € i 2
cust.def.query.mult
[account,cd.query, cd.query.mult.q]
$(B1)BZ[bz]M["D"]CD[ggv]M[bzMQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.query.mult.q 2 PINT R bzMQ
cd.query.mult.response 30 QRY.RESP L $(B1)BZ[bz]M["D"]CD[ggv]M[bzMQ]|0
Ì € i 2
apc.data
[account, apc.date]
$(B1)BZ[bz]M["D"]D7["APC",bzapD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
apc.date 8 DATE L bzapD
apc.grouped.thru.date 8 DATE L $(B1)BZ[bz]M["D"]D7["APC",bzapD]|6
apc.outlier 10 DEC2 R $(B1)BZ[bz]M["D"]D7["APC",bzapD]|7
apc.status 1 CHOICE L $(B1)BZ[bz]M["D"]D7["APC",bzapD]|4
apc.total.copay 10 DEC2 R $(B1)BZ[bz]M["D"]D7["APC",bzapD]|2
apc.total.cost.wt 10 DEC R $(B1)BZ[bz]M["D"]D7["APC",bzapD]|0
apc.total.oth.pat.resp 10 DEC2 R $(B1)BZ[bz]M["D"]D7["APC",bzapD]|8
apc.total.pay 10 DEC2 R $(B1)BZ[bz]M["D"]D7["APC",bzapD]|1
apc.total.reimb 10 DEC2 R $(B1)BZ[bz]M["D"]D7["APC",bzapD]|3
apc.version 10 FREE L $(B1)BZ[bz]M["D"]D7["APC",bzapD]|5
Ì € i 2
apcs
[account,apc.date, apc.seq.no]
$(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
apc.seq.no 3 PINT R bzapS
apc 5 FREE L MIS.APC.NAME $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]|0
apc.copay 10 DEC2 R $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]|4
apc.cs.wt 10 DEC R $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]|1
apc.line.outlier 10 DEC2 R $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]|8
apc.medical 1 YN L $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]|7
apc.pay 10 DEC2 R $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]|3
apc.pct 6 DEC2 R $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]|2
apc.reimb 10 DEC2 R VAL=(@apc.pay-@apc.copay)
apc.st 2 FREE L $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]|6
apc.type 1 FREE L $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]|5
Ì € i 2
apc.cpts
[account,apc.date,apc.seq.no, apc.cpt.seq]
$(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]C[bzapC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
apc.cpt.seq 4 PINT R bzapC
apc.cpt 10 FREE L MIS.CPT $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]C[bzapC]|0
apc.cpt.mod1 2 FREE L MIS.CPT.MOD $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]C[bzapC]|1
apc.cpt.mod2 2 FREE L MIS.CPT.MOD $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]C[bzapC]|2
apc.cpt.mod3 2 FREE L MIS.CPT.MOD $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]C[bzapC]|3
apc.cpt.mod4 2 FREE L MIS.CPT.MOD $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]C[bzapC]|4
apc.cpt.mod5 2 FREE L MIS.CPT.MOD $(B1)BZ[bz]M["D"]D7["APC",bzapD,bzapS]C[bzapC]|5
Ì € i 2
apc.reimb.date
[account, apcr.date]
$(B1)BZ[bz]M["D"]D7["APCR",bzapR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
apcr.date 8 DATE L bzapR
Ì € i 2
apc.reimb.data
[account,apcr.date, apcr.seq.no]
$(B1)BZ[bz]M["D"]D7["APCR",bzapR,bzapQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
apcr.seq.no 3 PINT R bzapQ
apcr 5 FREE L MIS.APC.NAME $(B1)BZ[bz]M["D"]D7["APCR",bzapR,bzapQ]|0
Ì € i 2
apgs
[account, apg.seq.no]
$(B1)BZ[bz]M["D"]D7["A",bzapS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
apg.seq.no 2 PINT R bzapS
apg 6 FREE L MIS.APG.NAME $(B1)BZ[bz]M["D"]D7["A",bzapS]|0
apg.cs.wt 10 DEC R $(B1)BZ[bz]M["D"]D7["A",bzapS]|1
apg.pct 6 DEC2 R $(B1)BZ[bz]M["D"]D7["A",bzapS]|2
Ì € i 2
apg.cpts
[account,apg.seq.no, apg.cpt.seq]
$(B1)BZ[bz]M["D"]D7["A",bzapS]C[bzapC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
apg.cpt.seq 4 PINT R bzapC
apg.cpt 8 FREE L ABS.CPT $(B1)BZ[bz]M["D"]D7["A",bzapS]C[bzapC]|0
apg.cpt.mod 2 CHOICE L $(B1)BZ[bz]M["D"]D7["A",bzapS]C[bzapC]|1
Ì € i 2
cpt.codes
[account, cpt.seq.no]
$(B1)BZ[bz]M["D"]D7["CP",bzCPT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cpt.seq.no 1 PINT R bzCPT
cpt.code 8 FREE L $(B1)BZ[bz]M["D"]D7["CP",bzCPT]|0
cpt.code.date 8 DATE L $(B1)BZ[bz]M["D"]D7["CP",bzCPT]|2
cpt.code.desc 30 FREE L $(B1)BZ[bz]M["D"]D7["CP",bzCPT]|1
cpt.code.loc 3 FREE L MIS.CPT.LOC $(B1)BZ[bz]M["D"]D7["CP",bzCPT]|3
Ì € i 2
cpt.codes.modifiers
[account,cpt.seq.no, cpt.code.mod.seq.no]
$(B1)BZ[bz]M["D"]D7["CP",bzCPT]M[bzCPM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cpt.code.mod.seq.no 2 PINT R bzCPM
cpt.code.modifier 2 FREE L MIS.CPT.MOD $(B1)BZ[bz]M["D"]D7["CP",bzCPT]M[bzCPM]|0
cpt.code.modifier.desc 40 FREE L $(B1)BZ[bz]M["D"]D7["CP",bzCPT]M[bzCPM]|1
Ì € i 2
diag
[account, diag.seq.no]
$(B1)BZ[bz]M["D"]D7["DX",bzDN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
diag.seq.no 1 PINT R bzDN
diag.code 6 FREE L $(B1)BZ[bz]M["D"]D7["DX",bzDN]|0
diag.desc 45 FREE L $(B1)BZ[bz]M["D"]D7["DX",bzDN]|1
pri.diag.desc.for.letter 45 FREE L VAL=IF{1^BAR.PAT.diag.seq.no @BAR.PAT.diag.desc}
pri.diag.for.letter 6 FREE L VAL=IF{1^BAR.PAT.diag.seq.no @BAR.PAT.diag.code}
Ì € i 2
diag.eff.dates
[account, diag.eff.date]
$(B1)BZ[bz]M["D"]D7["DXED",bzDD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
diag.eff.date 8 DATE L bzDD
Ì € i 2
diag.eff.date.codes
[account,diag.eff.date, diag.eff.seq.no]
$(B1)BZ[bz]M["D"]D7["DXED",bzDD]DX[bzDN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
diag.eff.seq.no 1 PINT R bzDN
diag.eff.code 6 FREE L $(B1)BZ[bz]M["D"]D7["DXED",bzDD]DX[bzDN]|0
diag.eff.desc 45 FREE L $(B1)BZ[bz]M["D"]D7["DXED",bzDD]DX[bzDN]|1
Ì € i 2
surg.proc
[account, proc.seq.no]
$(B1)BZ[bz]M["D"]D7["P",bzPN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.seq.no 1 PINT R bzPN
proc.code 6 FREE L $(B1)BZ[bz]M["D"]D7["P",bzPN]|0
proc.date 8 DATE L $(B1)BZ[bz]M["D"]D7["P",bzPN]|1
proc.desc 45 FREE L $(B1)BZ[bz]M["D"]D7["P",bzPN]|3
proc.dr 10 FREE L MIS.DOC $(B1)BZ[bz]M["D"]D7["P",bzPN]|2
Ì € i 2
emp.info
[account, eid.seq]
$(B1)BZ[bz]M["D"]E[bzEN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
eid.seq 1 PINT R bzEN
eid 10 FREE L $(B1)BZ[bz]M["D"]E[bzEN]|0
emplr.id 10 FREE L MIS.EMPLR $(B1)BZ[bz]M["D"]E[bzEN]|2
emplr.locn 30 FREE L $(B1)BZ[bz]M["D"]E[bzEN]|4
emplr.name 30 FREE L $(B1)BZ[bz]M["D"]E[bzEN]|3
emplye.id 11 FREE L $(B1)BZ[bz]M["D"]E[bzEN]|6
esc 10 FREE L MIS.EMP.STATUS $(B1)BZ[bz]M["D"]E[bzEN]|1
Ì € i 2
hhrg
[account, cert.start.date]
$(B1)BZ[bz]M["D"]D9[bzCSD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cert.start.date 8 DATE L bzCSD
cert.claim.no 12 FREE L $(B1)BZ[bz]M["D"]D9[bzCSD]|1
cert.end.date 8 DATE L $(B1)BZ[bz]M["D"]D9[bzCSD]|0
hhrg.amount 15 MONEY R VAL=%BAR.PAT.hhrg.amount(account,hhrg.code,cert.start.
VAL=date,MIS.MSA.DICT.code)
Ì € i 2
hhrg.visits
[account,cert.start.date, hhrg.visit.queue]
$(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hhrg.visit.queue 2 PINT R hhQ
hhrg.assessment.code 2 FREE L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]|5
hhrg.assessment.date 8 DATE L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]|4
hhrg.care.start.date 8 DATE L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]|8
hhrg.code 10 FREE L MIS.HHRG.DICT $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]|2
hhrg.end.date 8 DATE L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]|3
hhrg.hipps 5 FREE L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]|6
hhrg.oasis.key 18 FREE L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]|7
hhrg.start.date 8 DATE L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]|0
hhrg.start.time 4 TIME L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]|1
Ì € i 2
hhrg.diags
[account,cert.start.date,hhrg.visit.queue, hhrg.dx.seq.no]
$(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]D[bDXS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hhrg.dx.seq.no 2 PINT R bDXS
hhrg.dx.alt.name 60 FREE L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]D[bDXS]|1
hhrg.dx.class 1 CHOICE L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]D[bDXS]|4
hhrg.dx.code 7 FREE L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]D[bDXS]|0
hhrg.dx.date 8 DATE L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]D[bDXS]|2
hhrg.dx.time 4 TIME L $(B1)BZ[bz]M["D"]D9[bzCSD]V[hhQ]D[bDXS]|3
Ì € i 2
medi.cal.remarks
[account, mcal.remark.queue]
$(B1)BZ[bz]M["D"]ML["R",bzMLQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mcal.remark.queue 3 PINT R bzMLQ
mcal.remark 60 FREE L $(B1)BZ[bz]M["D"]ML["R",bzMLQ]|0
Ì € i 2
medi.cal.remarks.sys
[account, mcal.remark.sys.queue]
$(B1)BZ[bz]M["D"]ML["S",bzMRS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mcal.remark.sys.queue 3 PINT R bzMRS
mcal.remark.sys 65 FREE L $(B1)BZ[bz]M["D"]ML["S",bzMRS]|0
Ì € i 2
non.cov
[account, non.cov.frm]
$(B1)BZ[bz]M["D"]U1[bzND]
Field Name Len Dat Typ J DPM Offset/Local/VAL
non.cov.frm 8 DATE L bzND
non.cov.thru 8 DATE L $(B1)BZ[bz]M["D"]U1[bzND]|0
Ì € i 2
occurances
[account, occur.seq.no]
$(B1)BZ[bz]M["D"]O[bzON]
Field Name Len Dat Typ J DPM Offset/Local/VAL
occur.seq.no 1 PINT R bzON
occur.date 8 DATE L $(B1)BZ[bz]M["D"]O[bzON]|1
occur.time 4 TIME L $(B1)BZ[bz]M["D"]O[bzON]|2
occur.type 10 FREE L MIS.ACCID.TYPE $(B1)BZ[bz]M["D"]O[bzON]|0
Ì € i 2
ptadm.comments
[account, adm.comment.number]
$(B1)BZ[bz]M["D"]ADMCOM[bzCOM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
adm.comment.number 3 PINT R bzCOM
bar.txn.urn 5 URN L $(B1)BZ[bz]M["D"]ADMCOM[bzCOM]|0
Ì € i 2
rugs
[account, rug.from.date]
$(B1)BZ[bz]M["D"]D8[rugFR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rug.from.date 8 DATE L rugFR
rug.code.medicaid 3 FREE L MIS.RUG.CODE $(B1)BZ[bz]M["D"]D8[rugFR]|1
rug.code.medicare 3 FREE L MIS.RUG.CODE $(B1)BZ[bz]M["D"]D8[rugFR]|0
rug.code.medicare.w.mod 5 FREE L VAL=@rug.code.medicare_@rug.modifier
rug.mds.ref.date 8 DATE L $(B1)BZ[bz]M["D"]D8[rugFR]|4
rug.mds.urn 8 FREE L $(B1)BZ[bz]M["D"]D8[rugFR]|3
rug.modifier 2 FREE L $(B1)BZ[bz]M["D"]D8[rugFR]|5
rug.thru.date 8 DATE L $(B1)BZ[bz]M["D"]D8[rugFR]|2
Ì € i 2
value.codes
[account, val.seq.no]
$(B1)BZ[bz]M["D"]V[bzVN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
val.seq.no 2 PINT R bzVN
value.amt 9 SMONEY R $(B1)BZ[bz]M["D"]V[bzVN]|1
value.code 8 FREE L BAR.UB82.VALCDS$(B1)BZ[bz]M["D"]V[bzVN]|0
Ì € i 2
bills
[account, bill.no]
$(B1)BZ[bz]M["B",bzBN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bill.no 3 INT R bzBN
additional.bill 5 PINT R $(B1)BZ[bz]M["B",bzBN]|39
bill.charges 10 SMONEY R $(B1)BZ[bz]M["B",bzBN]|5
bill.eff.date 8 DATE L $(B1)BZ[bz]M["B",bzBN]|37
bill.prof.comp 10 SMONEY R $(B1)BZ[bz]M["B",bzBN]|22
bill.rule 8 FREE L BAR.BRULE $(B1)BZ[bz]M["B",bzBN]|1
bill.status 11 CHOICE L $(B1)BZ[bz]M["B",bzBN]|7
bill.type 10 CHOICE L $(B1)BZ[bz]M["B",bzBN]|4
bill.user 10 FREE L MIS.USER $(B1)BZ[bz]M["B",bzBN]O|1
bill.writeoff 10 SMONEY R $(B1)BZ[bz]M["B",bzBN]|20
bills.last.billed.date 8 DATE L $(B1)BZ[bz]M["B",bzBN]T|0
cl.bill.billing.rule 10 FREE L BAR.CLBRULE $(B1)BZ[bz]M["B",bzBN]O|3
cl.bill.converted 1 FREE L $(B1)BZ[bz]M["B",bzBN]O|4
cl.bill.discount.pointer 5 PINT R $(B1)BZ[bz]M["B",bzBN]O|7
cl.bill.pt.chg.pointer 5 PINT R $(B1)BZ[bz]M["B",bzBN]O|6
cl.bill.rev.bill.printed 1 YN L $(B1)BZ[bz]M["B",bzBN]O|10
cl.bill.rev.pointer 5 PINT R $(B1)BZ[bz]M["B",bzBN]O|8
cl.bill.summarized 1 YN L $(B1)BZ[bz]M["B",bzBN]O|9
cl.bill.was.purged 1 YN L $(B1)BZ[bz]M["B",bzBN]O|5
cutoff.date 8 DATE L $(B1)BZ[bz]M["B",bzBN]|0
deductible 8 SMONEY R $(B1)BZ[bz]M["B",bzBN]|27
first.trans.date 8 DATE L $(B1)BZ[bz]M["B",bzBN]|6
hold.bill 1 YN L $(B1)BZ[bz]M["B",bzBN]|9
initial.bill 1 YN L $(B1)BZ[bz]M["B",bzBN]|40
last.mark 5 PINT R $(B1)BZ[bz]M["B",bzBN]|3
last.post 5 PINT R $(B1)BZ[bz]M["B",bzBN]|29
last.trans.date 8 DATE L $(B1)BZ[bz]M["B",bzBN]|8
late.bill.for.bill.no 3 PINT R $(B1)BZ[bz]M["B",bzBN]LB|0
mark.ptr 5 PINT R $(B1)BZ[bz]M["B",bzBN]|2
ncovd.priv.rm 8 SMONEY R $(B1)BZ[bz]M["B",bzBN]|25
other.holds 7 FREE L $(B1)BZ[bz]M["B",bzBN]O|0
override.bill.user 10 FREE L MIS.USER $(B1)BZ[bz]M["B",bzBN]O|2
post.date 8 DATE L $(B1)BZ[bz]M["B",bzBN]|15
post.ptr 5 PINT R $(B1)BZ[bz]M["B",bzBN]|31
pro.rule 10 FREE L BAR.PRORATE $(B1)BZ[bz]M["B",bzBN]|18
prorate.date 8 DATE L $(B1)BZ[bz]M["B",bzBN]|17
pt.exp.reimb 10 MONEY R $(B1)BZ[bz]M["B",bzBN]|36
pt.no.rcpts 3 INT R $(B1)BZ[bz]M["B",bzBN]|13
pt.num.rcpts 3 INT R $(B1)BZ[bz]M["B",bzBN]|35
pt.pro.amt 10 SMONEY R $(B1)BZ[bz]M["B",bzBN]|10
pt.real.bal 10 SMONEY R $(B1)BZ[bz]M["B",bzBN]|34
pt.writeoff 10 SMONEY R $(B1)BZ[bz]M["B",bzBN]|11
pt.writeoff.proc 10 FREE L BAR.PROC $(B1)BZ[bz]M["B",bzBN]|14
rev.last.bill 5 PINT R $(B1)BZ[bz]M["B",bzBN]|38
Ì € i 2
bills.cl.accounts
[account,bill.no, cl.bill.account.urn]
$(B1)BZ[bz]M["B",bzBN]CLA[bzCR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cl.bill.account.urn 44 FREE L bzCR
cl.bill.account.no 12 FREE L $(B1)BZ[bz]M["B",bzBN]CLA[bzCR]|0
cl.bill.transfer.amount 10 SMONEY R $(B1)BZ[bz]M["B",bzBN]CLA[bzCR]|1
cl.bill.xfer.out 1 FREE L $(B1)BZ[bz]M["B",bzBN]CLA[bzCR]|2
Ì € i 2
bills.cl.account.txns
[account,bill.no,cl.bill.account.urn, cl.bill.txn.start]
$(B1)BZ[bz]M["B",bzBN]CLA[bzCR]T[bzclS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cl.bill.txn.start 5 PINT R bzclS
cl.bill.txn.end 5 PINT R $(B1)BZ[bz]M["B",bzBN]CLA[bzCR]T[bzclS]|0
Ì € i 2
bills.claims.ins
[account,bill.no, bills.claim,bills.claim.ins]
$(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bills.claim 10 FREE L BAR.CLAIM bec
bills.claim.ins 10 FREE L MIS.INS ggm
claim.amount 10 SMONEY R $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|8
claim.first.fail.date 8 DATE L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|9
claim.from 8 DATE L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|3
claim.ins.1 10 FREE L MIS.INS $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|5
claim.ins.2 10 FREE L MIS.INS $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|6
claim.ins.3 10 FREE L MIS.INS $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|7
claim.ins.date 8 DATE L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|1
claim.ins.dcn 23 FREE L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|11
claim.ins.init.date 8 DATE L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|13
claim.ins.status 1 FREE L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|0
claim.ins.tob3 1 FREE L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|12
claim.ins.ucr 8 FREE L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|10
claim.ins.user 10 FREE L MIS.USER $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|2
claim.thru 8 DATE L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]|4
Ì € i 2
bills.claims.ins.bills
[account,bill.no,bills.claim,bills.claim.ins, claim.bill]
$(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]B[bzBL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
claim.bill 3 INT R bzBL
Ì € i 2
bills.claims.ins.checks
[account,bill.no,bills.claim,bills.claim.ins, claim.ins.check]
$(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]K[bek]
Field Name Len Dat Typ J DPM Offset/Local/VAL
claim.ins.check 15 FREE L BAR.CLAIM.CHK bek
failed.cc.msg 30 FREE L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]K[bek]|0
failed.chk.override 1 YN L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]K[bek]|1
Ì € i 2
bills.claims.ins.chk.rsn
[account,bill.no,bills.claim,bills.claim.ins,claim.ins.check, ochk.reason.seq]
$(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]K[bek]R[ochkR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ochk.reason.seq 3 PINT R ochkR
ochk.reason.text 80 TEXT L $(B1)BZ[bz]M["B",bzBN]F1[bec,ggm]K[bek]R[ochkR]
Ì € i 2
bills.date.ranges
[account,bill.no, bills.ser.date.seq.no]
$(B1)BZ[bz]M["B",bzBN]DR[bzSDN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bills.ser.date.seq.no 2 PINT R bzSDN
bills.ser.date.from 8 DATE L $(B1)BZ[bz]M["B",bzBN]DR[bzSDN]|0
bills.ser.date.thru 8 DATE L $(B1)BZ[bz]M["B",bzBN]DR[bzSDN]|1
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | |