Ì i 2
billing.batch.xfer
[xfer.bch.date,xfer.bch.no]
*(HF)HFBBX[hxfBD,hxfBN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
xfer.bch.date 8 DATE L hxfBD
xfer.bch.no 4 PINT R hxfBN
xfer.bch.compile.done 10 TIME L *(HF)HFBBX[hxfBD,hxfBN]|1
xfer.bch.compile.started 10 TIME L *(HF)HFBBX[hxfBD,hxfBN]|0
xfer.bch.last.for.date 1 YN L *(HF)HFBBX[hxfBD,hxfBN]|2
Ì i 2
billing.batch.xref
[xref.bch.date,xref.bch.database,xref.bch.practice,xref.bch.txn]
*(HF)HFBK[gyD,gn1,ggh,gyC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
xref.bch.date 8 DATE L gyD
xref.bch.database 12 FREE L MIS.APPL.DB gn1
xref.bch.practice 10 FREE L PRV.PRACTICE ggh
xref.bch.txn 5 PINT R gyC
xref.bch.txn.urn 5 PINT R VAL=IF{@xref.source="B" @xref.queue}
xref.enc.proc.chg 9 MONEY R VAL=IF{@xref.source="B" "";@enc.status="TRANS"!(@enc.b
VAL=atch.date>@xref.bch.date) @proc.chg;0-@proc.chg
VAL=}
xref.enc.proc.qty 4 PINT R VAL=IF{@xref.source="B" "";@enc.status="TRANS"!(@enc.b
VAL=atch.date>@xref.bch.date) @proc.qty;0-@proc.qty
VAL=}
xref.enc.proc.queue 5 PINT R VAL=IF{@xref.source="E" @xref.queue}
xref.queue 5 PINT R *(HF)HFBK[gyD,gn1,ggh,gyC]|2
xref.source 1 CHOICE L *(HF)HFBK[gyD,gn1,ggh,gyC]|0
xref.urn 10 PINT R *(HF)HFBK[gyD,gn1,ggh,gyC]|1
Ì i 2
hub.queue
[hub.q.number]
*(HF2)HBXQ[hfHQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hub.q.number 20 PINT R hfHQ
hub.q.function 50 FREE L *(HF2)HBXQ[hfHQ]|0
hub.q.mri.urn 25 URN L MRI.PAT *(HF2)HBXQ[hfHQ]PT|1
hub.q.visit.urn 30 URN L ADM.PAT *(HF2)HBXQ[hfHQ]PT|0
Ì € i 2
hub.queue.data
[hub.q.number, hub.q.item]
*(HF2)HBXQ[hfHQ]D[hfHQI]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hub.q.item 4 PINT R hfHQI
hub.q.item.cancel 10 FREE L *(HF2)HBXQ[hfHQ]D[hfHQI]5|0
hub.q.item.confidential 1 YN L *(HF2)HBXQ[hfHQ]D[hfHQI]4|0
hub.q.item.name 30 FREE L *(HF2)HBXQ[hfHQ]D[hfHQI]1|0
hub.q.item.time 20 FREE L *(HF2)HBXQ[hfHQ]D[hfHQI]0|0
hub.q.item.urn 20 FREE L *(HF2)HBXQ[hfHQ]D[hfHQI]2|0
hub.q.item.user 10 FREE L MIS.USER *(HF2)HBXQ[hfHQ]D[hfHQI]6|1
hub.q.item.user.name 30 FREE L *(HF2)HBXQ[hfHQ]D[hfHQI]6|0
hub.q.item.value 20 FREE L *(HF2)HBXQ[hfHQ]D[hfHQI]3
Ì i 2
main
[urn]
$(HF)HFB[hfb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 10 PINT R hfb
abs.grouper.version 10 FREE L ABS.VERSION $(HF)HFB[hfb]DX|0
archive.date 8 DATE L $(HF)HFB[hfb]AI|4
cd.screen 15 FREE L MIS.SCREEN VAL=@PRV.ENC.TYPE.cd.screen[@PRV.ENC.enc.type]
cds.status 5 CHOICE L $(HF)HFB[hfb]|10
cds.status.time 10 PINT R $(HF)HFB[hfb]|12
cds.status.user 10 FREE L MIS.USER $(HF)HFB[hfb]|11
copied.from 10 PINT R PRV.ENC $(HF)HFB[hfb]|20
diagnosis.provider 10 FREE L MIS.DOC $(HF)HFB[hfb]AI|6
diagnosis.provider.name 30 FREE L VAL=@MIS.DOC.name[@diagnosis.provider]
enc.balance 9 MONEY R VAL=@total.pt.amt.due-@pt.amt.pd
enc.batch.date 8 DATE L $(HF)HFB[hfb]|7
enc.batch.no 4 PINT R $(HF)HFB[hfb]|23
enc.ben.pt.limit.flag 3 CHOICE L $(HF)HFB[hfb]|19
enc.benefit 10 FREE L MIS.INS.BENE $(HF)HFB[hfb]|18
enc.date 8 DATE L $(HF)HFB[hfb]|2
enc.status 10 CHOICE L $(HF)HFB[hfb]|4
enc.type 10 FREE L PRV.ENC.TYPE $(HF)HFB[hfb]|3
enc.user 10 FREE L MIS.USER $(HF)HFB[hfb]|22
es.signed 1 YN L $(HF)HFB[hfb]AI|3
last.date.editted 8 DATE L $(HF)HFB[hfb]RE|3
last.time.editted 4 TIME L $(HF)HFB[hfb]RE|4
last.user.editted 10 FREE L MIS.USER $(HF)HFB[hfb]RE|2
mri.urn 8 URN L MRI.DRC $(HF)HFB[hfb]|1
note.rtf.addenda.has.text 1 FREE L VAL=IF{+@notes.addendum.text[urn,addendum.no,""] @Z.ch
VAL=eck.mark.data;" "}
note.rtf.edit 1 YN L
note.rtf.has.text 1 FREE L VAL=IF{+@notes[urn,""] @Z.check.mark.data;" "}
note.rtf.view 1 YN L
notes.entered.by 10 FREE L MIS.USER $(HF)HFB[hfb]AI|0
notes.entered.time 10 PINT R $(HF)HFB[hfb]AI|2
notes.status 5 CHOICE L $(HF)HFB[hfb]|13
notes.status.time 10 PINT R $(HF)HFB[hfb]|15
notes.status.user 10 FREE L MIS.USER $(HF)HFB[hfb]|14
patient 30 URN L PRV.PAT $(HF)HFB[hfb]|0
practice 10 FREE L PRV.PRACTICE $(HF)HFB[hfb]|6
print.cd.screen 0 FREE L VAL=IF{@cd.screen urn^/urn,%MIS.SCREEN.print(@cd.scree
VAL=n,^@cust.def.screen,"",0),""}
print.cd.screen.verbatim 0 FREE L VAL=IF{@cd.screen urn^/urn,%MIS.SCREEN.print(@cd.scree
VAL=n,^@cust.def.screen,1,0),""}
provider 10 FREE L MIS.DOC $(HF)HFB[hfb]|5
pt.amt.pd 9 MONEY R $(HF)HFB[hfb]|21
purge.hold.date 8 DATE L $(HF)HFB[hfb]AI|5
status.time 10 PINT R $(HF)HFB[hfb]|9
status.user 10 FREE L MIS.USER $(HF)HFB[hfb]|8
total.pt.amt.due 9 MONEY R $(HF)HFB[hfb]|17
view.all 1 YN L $(HF)HFB[hfb]RE|0
view.all.date 8 DATE L $(HF)HFB[hfb]RE|1
visit.copay 9 MONEY R $(HF)HFB[hfb]|16
Ì € i 2
cust.def.queries
[urn, cd.query]
$(HF)HFB[hfb]CD[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.query 10 FREE L MIS.QUERY ggv
cd.response 75 QRY.RESP L $(HF)HFB[hfb]CD[ggv]|0
Ì € i 2
cust.def.query.mult
[urn,cd.query, cd.query.mult.q]
$(HF)HFB[hfb]CD[ggv]M[ggvMQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.query.mult.q 2 PINT R ggvMQ
cd.query.mult.resp 75 QRY.RESP L $(HF)HFB[hfb]CD[ggv]M[ggvMQ]|0
Ì € i 2
dxs
[urn, dx.seq.no]
$(HF)HFB[hfb]DX[hfbDX]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dx.seq.no 2 PINT R hfbDX
dx.alt.name 60 FREE L $(HF)HFB[hfb]DX[hfbDX]|1
dx.code 7 FREE L $(HF)HFB[hfb]DX[hfbDX]|0
Ì € i 2
notes
[urn, note.urn]
$(HF)HFB[hfb]N[hfbNO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
note.urn 3 URN L hfbNO
note.text 79 TEXT L $(HF)HFB[hfb]N[hfbNO]
Ì € i 2
notes.addendum
[urn, addendum.no]
$(HF)HFB[hfb]A[hfbA]
Field Name Len Dat Typ J DPM Offset/Local/VAL
addendum.no 3 PINT R hfbA
addendum.entered.by 10 FREE L MIS.USER $(HF)HFB[hfb]A[hfbA]|0
addendum.entered.time 10 PINT R $(HF)HFB[hfb]A[hfbA]|1
addendum.es.signed 1 YN L $(HF)HFB[hfb]A[hfbA]|5
addendum.status 5 FREE L $(HF)HFB[hfb]A[hfbA]|2
addendum.status.time 10 PINT R $(HF)HFB[hfb]A[hfbA]|4
addendum.status.user 10 FREE L MIS.USER $(HF)HFB[hfb]A[hfbA]|3
Ì € i 2
notes.addendum.text
[urn,addendum.no, addendum.urn]
$(HF)HFB[hfb]A[hfbA]N[hfbAN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
addendum.urn 3 URN L hfbAN
addendum.text 79 TEXT L $(HF)HFB[hfb]A[hfbA]N[hfbAN]
Ì € i 2
notes.addendum.text.rtf
[urn,addendum.no, addendum.rtf.urn]
$(HF)HFB[hfb]A[hfbA]NR[hfbAR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
addendum.rtf.urn 3 URN L hfbAR
addendum.rtf.text 250 FREE L $(HF)HFB[hfb]A[hfbA]NR[hfbAR]
Ì € i 2
notes.rtf.text
[urn, note.rtf.q]
$(HF)HFB[hfb]NR[hfbNR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
note.rtf.q 3 PINT R hfbNR
note.rtf.text 250 FREE L $(HF)HFB[hfb]NR[hfbNR]
Ì € i 2
procedures
[urn, proc.queue]
$(HF)HFB[hfb]P[hfbPQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.queue 3 PINT R hfbPQ
proc 10 FREE L PRV.PROC $(HF)HFB[hfb]P[hfbPQ]|0
proc.already.sent 1 YN L VAL=IF{@proc.sent.to.bar<@.today "Y";"N"}
proc.balance 9 MONEY R VAL=@proc.pt.amt.due-@proc.pt.amt.pd
proc.bch.txn.urn 4 PINT R $(HF)HFB[hfb]P[hfbPQ]|13
proc.bch.urn 5 PINT R PRV.BATCH $(HF)HFB[hfb]P[hfbPQ]|12
proc.cd.screen 15 FREE L MIS.SCREEN VAL=@PRV.PROC.cd.screen[@PRV.ENC.proc]
proc.chg 9 SMONEY R $(HF)HFB[hfb]P[hfbPQ]|2
proc.comment 35 FREE L $(HF)HFB[hfb]P[hfbPQ]|3
proc.cpt.code 8 FREE L $(HF)HFB[hfb]P[hfbPQ]|8
proc.fixed 35 FREE L $(HF)HFB[hfb]P[hfbPQ]|10
proc.print.cd.screen 0 FREE L VAL=IF{@proc.cd.screen urn^/urn,%MIS.SCREEN.print(@pro
VAL=c.cd.screen,^@proc.cust.def.screen,"",0),""}
proc.print.cd.screen.ver 0 FREE L VAL=IF{@proc.cd.screen urn^/urn,%MIS.SCREEN.print(@pro
VAL=c.cd.screen,^@proc.cust.def.screen,1,0),""}
proc.pt.amt.due 9 MONEY R $(HF)HFB[hfb]P[hfbPQ]|7
proc.pt.amt.pd 9 SMONEY R $(HF)HFB[hfb]P[hfbPQ]|9
proc.pt.fee 9 FREE L $(HF)HFB[hfb]P[hfbPQ]|6
proc.ptr 3 PINT R $(HF)HFB[hfb]P[hfbPQ]|11
proc.qty 4 PINT R $(HF)HFB[hfb]P[hfbPQ]|1
proc.sent.to.bar 8 DATE L $(HF)HFB[hfb]P[hfbPQ]|4
proc.unit.chg 9 SMONEY R $(HF)HFB[hfb]P[hfbPQ]|5
Ì € i 2
proc.cust.def.queries
[urn,proc.queue, proc.cd.query]
$(HF)HFB[hfb]P[hfbPQ]CD[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.cd.query 10 FREE L MIS.QUERY ggv
proc.cd.display 90 FREE L VAL=%MIS.SCREEN.print(@proc.cd.screen,^@proc.cust.def.
VAL=screen,"",51^CDS[@proc.queue])
proc.cd.response 75 QRY.RESP L $(HF)HFB[hfb]P[hfbPQ]CD[ggv]|0
Ì € i 2
proc.cust.def.query.mult
[urn,proc.queue,proc.cd.query, proc.cd.query.mult.q]
$(HF)HFB[hfb]P[hfbPQ]CD[ggv]M[ggvMQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.cd.query.mult.q 2 PINT R ggvMQ
proc.cd.query.mult.resp 75 QRY.RESP L $(HF)HFB[hfb]P[hfbPQ]CD[ggv]M[ggvMQ]|0
Ì € i 2
receipt.txns
[urn, txn.seq.no]
$(HF)HFB[hfb]RT[hfbRT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
txn.seq.no 3 FREE L hfbRT
bch.date 8 DATE L $(HF)HFB[hfb]RT[hfbRT]|0
bch.txn.urn 4 PINT R $(HF)HFB[hfb]RT[hfbRT]|2
bch.urn 5 PINT R PRV.BATCH $(HF)HFB[hfb]RT[hfbRT]|1
txn.bch.proc 10 FREE L PRV.CR.PROC $(HF)HFB[hfb]RT[hfbRT]|9
txn.disb.amount 9 SMONEY R $(HF)HFB[hfb]RT[hfbRT]|4
txn.fixed 35 FREE L $(HF)HFB[hfb]RT[hfbRT]|10
txn.mpi 25 URN L MRI.PAT $(HF)HFB[hfb]RT[hfbRT]|7
txn.mpi.ptr 5 PINT R $(HF)HFB[hfb]RT[hfbRT]|8
txn.proc.pd 10 FREE L PRV.PROC $(HF)HFB[hfb]RT[hfbRT]|6
txn.receipt.no 12 FREE L $(HF)HFB[hfb]RT[hfbRT]|5
txn.reverse.ptr 3 PINT R $(HF)HFB[hfb]RT[hfbRT]|11
txn.svc.date 8 DATE L $(HF)HFB[hfb]RT[hfbRT]|3
Ì € i 2
receipt.txns.procs
[urn,txn.seq.no, txn.proc.seq]
$(HF)HFB[hfb]RT[hfbRT]P[hfbRP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
txn.proc.seq 5 PINT R hfbRP
txn.proc 10 FREE L PRV.PROC $(HF)HFB[hfb]RT[hfbRT]P[hfbRP]|1
txn.proc.amt.pd 9 SMONEY R $(HF)HFB[hfb]RT[hfbRT]P[hfbRP]|2
txn.proc.queue 3 PINT R $(HF)HFB[hfb]RT[hfbRT]P[hfbRP]|0
Ì € i 2
referrals
[urn, ref.urn]
$(HF)HFB[hfb]R[hfbr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ref.urn 3 URN L hfbr
ref.adm.ins.auth.req 2 PINT R $(HF)HFB[hfb]R[hfbr]|14
ref.auth.number 18 FREE L $(HF)HFB[hfb]R[hfbr]|8
ref.auth.status 10 CHOICE L $(HF)HFB[hfb]R[hfbr]A|0
ref.auth.status.date 8 DATE L $(HF)HFB[hfb]R[hfbr]A|1
ref.by.practice 10 FREE L MIS.DOC.GRP $(HF)HFB[hfb]R[hfbr]|1
ref.by.provider 10 FREE L MIS.DOC $(HF)HFB[hfb]R[hfbr]|2
ref.code.method 10 FREE L MIS.CODE.METH $(HF)HFB[hfb]R[hfbr]|17
ref.copay 9 MONEY R $(HF)HFB[hfb]R[hfbr]|12
ref.date 8 DATE L $(HF)HFB[hfb]R[hfbr]|13
ref.date.reverse 8 FREE L VAL=99999999-@ref.date
ref.diag.code 7 FREE L $(HF)HFB[hfb]R[hfbr]|5
ref.diag.desc 60 FREE L $(HF)HFB[hfb]R[hfbr]|6
ref.expire.date 8 DATE L $(HF)HFB[hfb]R[hfbr]|15
ref.ins 10 FREE L MIS.INS $(HF)HFB[hfb]R[hfbr]|0
ref.specialty 10 FREE L MIS.ABS.SVC $(HF)HFB[hfb]R[hfbr]|19
ref.status 10 CHOICE L $(HF)HFB[hfb]R[hfbr]|9
ref.status.date 8 DATE L $(HF)HFB[hfb]R[hfbr]|10
ref.status.user 10 FREE L MIS.USER $(HF)HFB[hfb]R[hfbr]|11
ref.to.location 10 FREE L MIS.LOCN $(HF)HFB[hfb]R[hfbr]|3
ref.to.practice 10 FREE L MIS.DOC.GRP :HFB[hfb]R[hfbr]|3
ref.to.prov.code 10 FREE L MIS.DOC $(HF)HFB[hfb]R[hfbr]|4
ref.to.prov.free.text 30 FREE L $(HF)HFB[hfb]R[hfbr]|16
ref.to.provider 30 FREE L VAL=IF{@ref.to.prov.code @ref.to.prov.code's.name;@ref
VAL=.to.prov.free.text}
ref.type 10 FREE L MIS.REF.TYPE $(HF)HFB[hfb]R[hfbr]|18
ref.units.of.service 4 PINT R $(HF)HFB[hfb]R[hfbr]|7
Ì € i 2
ref.notes
[urn,ref.urn, ref.note.urn]
$(HF)HFB[hfb]R[hfbr]N[hfbrN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ref.note.urn 3 URN L hfbrN
ref.note.text 79 TEXT L $(HF)HFB[hfb]R[hfbr]N[hfbrN]
Ì € i 2
ref.procedures
[urn,ref.urn, ref.proc.queue]
$(HF)HFB[hfb]R[hfbr]P[hfbrP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ref.proc.queue 2 PINT R hfbrP
ref.proc 10 FREE L $(HF)HFB[hfb]R[hfbr]P[hfbrP]|0
ref.proc.copay 9 PDEC2 R $(HF)HFB[hfb]R[hfbr]P[hfbrP]|3
ref.proc.copay.as.dol.per 1 CHOICE L $(HF)HFB[hfb]R[hfbr]P[hfbrP]|5
ref.proc.description 30 FREE L $(HF)HFB[hfb]R[hfbr]P[hfbrP]|1
ref.proc.fin.resp 10 CHOICE L $(HF)HFB[hfb]R[hfbr]P[hfbrP]|4
ref.proc.qty 4 PINT R $(HF)HFB[hfb]R[hfbr]P[hfbrP]|2
Ì € i 2
release.encounter.prac
[urn, view.practice]
$(HF)HFB[hfb]RE["G",ggh]
Field Name Len Dat Typ J DPM Offset/Local/VAL
view.practice 10 FREE L MIS.DOC.GRP ggh
view.practice.date 8 DATE L $(HF)HFB[hfb]RE["G",ggh]|0
Ì € i 2
release.encounter.prov
[urn, view.provider]
$(HF)HFB[hfb]RE["P",ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
view.provider 10 FREE L MIS.DOC ggg
view.provider.date 8 DATE L $(HF)HFB[hfb]RE["P",ggg]|0
Ì € i 2
rx
[urn, rx.seq]
$(HF)HFB[hfb]RX[hrx]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rx.seq 5 PINT R hrx
rx.number 10 PINT R $(HF)HFB[hfb]RX[hrx]|0
rx.urn 5 PINT R $(HF)HFB[hfb]RX[hrx]|1
Ì € i 2
sch.appt.info
[urn, appt.urn]
$(HF)HFB[hfb]WZ[wz]
Field Name Len Dat Typ J DPM Offset/Local/VAL
appt.urn 10 FREE L SCH.APPT wz
appt.date 8 DATE L $(HF)HFB[hfb]WZ[wz]|0
appt.locn 10 FREE L MIS.LOCN $(HF)HFB[hfb]WZ[wz]|2
appt.time 4 TIME L $(HF)HFB[hfb]WZ[wz]|1
appt.type 10 FREE L SCH.APPT.TYPE $(HF)HFB[hfb]WZ[wz]|3
Ì € i 2
svc.grp.copayments
[urn, service.group]
$(HF)HFB[hfb]SG[gsh]
Field Name Len Dat Typ J DPM Offset/Local/VAL
service.group 10 FREE L MIS.SVC.GRP gsh
service.group.amt 9 MONEY R $(HF)HFB[hfb]SG[gsh]|0
Ì i 2
rx.inp
[rx.inp.q]
/HFBRX[hrx]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rx.inp.q 3 PINT R hrx
rx.entered.by 10 FREE L MIS.USER /HFBRX[hrx]AI|2
rx.entered.by.user.out 20 FREE L VAL=@MIS.USER.name[@rx.entered.by]
rx.entered.date 8 DATE L VAL=%Z.date.in.magic(@rx.entered.time)
rx.entered.date.out 12 FREE L VAL=%Z.date.text(%Z.date.in.magic(@rx.entered.time),"m
VAL= d, Y")
rx.entered.time 10 PINT R /HFBRX[hrx]AI|3
rx.entered.time.out 8 FREE L VAL=%Z.time.text(%Z.date.in.magic(@rx.entered.time),"h
VAL=:M A")
rx.es.signed 1 YN L /HFBRX[hrx]AI|6
rx.inp.allow.subst 1 YN L /HFBRX[hrx]|12
rx.inp.dose 8 FREE L /HFBRX[hrx]|3
rx.inp.dose.unit 6 FREE L /HFBRX[hrx]|11
rx.inp.expires 8 DATE L /HFBRX[hrx]|8
rx.inp.history 1 FREE L /HFBRX[hrx]|18
rx.inp.med 10 FREE L PRV.DRUG /HFBRX[hrx]|2
rx.inp.med.disp 60 FREE L /HFBRX[hrx]MD
rx.inp.med.disp.str 60 FREE L VAL=(@rx.inp.dose_(@rx.inp.dose.unit@Tr.u2l),@rx.inp.r
VAL=oute,@rx.inp.sig,"("_@rx.inp.qty_")")^MDX,(%Z.conv
VAL=ert.to.mixed.case(@PRV.DRUG.name[@rx.inp.med],"",1
VAL=):(59-L(MDX)_"T"),MDX)
rx.inp.mri.urn 25 URN L MRI.PAT /HFBRX[hrx]|17
rx.inp.number 10 FREE L /HFBRX[hrx]|1
rx.inp.override.by 10 FREE L MIS.USER /HFBRX[hrx]AI|7
rx.inp.override.comment 10 FREE L PRV.CMT /HFBRX[hrx]|13
rx.inp.override.time 10 PINT R /HFBRX[hrx]AI|8
rx.inp.pha.med 10 FREE L PHA.DRUG /HFBRX[hrx]|15
rx.inp.pharmacy 10 FREE L MIS.OUT.LOCN /HFBRX[hrx]|14
rx.inp.practice 10 FREE L PRV.PRACTICE /HFBRX[hrx]|9
rx.inp.provider 10 FREE L MIS.DOC /HFBRX[hrx]|10
rx.inp.qty 5 PINT R /HFBRX[hrx]|4
rx.inp.refills 2 INT R /HFBRX[hrx]|5
rx.inp.route 10 FREE L /HFBRX[hrx]|7
rx.inp.sig 20 FREE L MIS.DIR /HFBRX[hrx]|6
rx.inp.status 3 CHOICE L /HFBRX[hrx]|0
rx.inp.urn 10 URN L PRV.RX /HFBRX[hrx]|16
rx.issued.by 10 FREE L MIS.USER /HFBRX[hrx]AI|5
rx.issued.by.user.out 20 FREE L VAL=@MIS.USER.name[@rx.issured.by]
rx.issued.date 8 DATE L VAL=%Z.date.in.magic(@rx.issued.time)
rx.issued.date.out 12 FREE L VAL=%Z.date.text(%Z.date.in.magic(@rx.issued.time),"m
VAL=d, Y")
rx.issued.time 10 PINT R /HFBRX[hrx]AI|4
rx.issued.time.out 8 FREE L VAL=%Z.time.text(@rx.issued.time,"h:M A")
rx.override.by.user.out 20 FREE L VAL=@MIS.USER.name[@rx.override.by]
rx.override.date 8 FREE L VAL=%Z.date.in.magic(@rx.override.time)
rx.override.date.out 12 FREE L VAL=%Z.date.text(@rx.override.date,"m d, Y")
rx.override.time.out 8 FREE L VAL=%Z.time.text(@rx.override.time,"h:M A")
rx.status.date 8 DATE L VAL=%Z.date.in.magic(@rx.issued.time)
rx.status.date.out 12 FREE L VAL=%Z.date.text(%Z.date.in.magic(@rx.issued.time),"m
VAL=d, Y")
rx.status.text 12 FREE L VAL=IF{@rx.inp.status^XX="AC" "ACTIVE";XX="DC" "DISCON
VAL=TINUED";XX="UNV" "UNVERIFIED";XX="CAN" "CANCELLED"
VAL=}
rx.status.time 10 PINT R /HFBRX[hrx]AI|1
rx.status.time.out 8 FREE L VAL=%Z.time.text(@rx.status.time,"h:M A")
rx.status.user 10 FREE L MIS.USER /HFBRX[hrx]AI|0
rx.status.user.out 20 FREE L VAL=@MIS.USER.name[@rx.status.user]
Ì € i 2
rx.inp.instructions
[rx.inp.q, rx.inp.instr.q]
/HFBRX[hrx]I[hrxI]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rx.inp.instr.q 3 PINT R hrxI
rx.inp.any.instr 1 FREE L VAL=IF{@rx.inp.instructions[,1] @Z.check.mark.data}
rx.inp.instr 79 TEXT L /HFBRX[hrx]I[hrxI]
Ì i 2
temp.rpt.bar.queued
[temp.bar.ql.date,temp.bar.ql.prac,temp.bar.ql.prov,temp.bar.ql.urn,temp.bar.ql.bch.no]
/HFBQLST[hfbBD,ggh,ggg,hfb,hfbBN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
temp.bar.ql.date 8 DATE L hfbBD
temp.bar.ql.prac 10 FREE L PRV.PRACTICE ggh
temp.bar.ql.prov 10 FREE L MIS.DOC ggg
temp.bar.ql.urn 10 PINT R PRV.ENC hfb
temp.bar.ql.bch.no 2 FREE L hfbBN
temp.bar.ql.bill.status 10 FREE L /HFBQLST[hfbBD,ggh,ggg,hfb,hfbBN]|0
Index Files Subscripts/Physical Base
archive.x [archive.date,urn]
?(HF)HFBARC[hfbAD,hfb]
billing.queue [enc.batch.date,urn]
?(HF)HFBG[hfbBD,hfb]
billing.queue.pend [enc.batch.date,urn]
?(HF)HFBQP[hfbBD,hfb]
billing.queue.xfer [enc.batch.date,enc.batch.no,urn] = enc.status
?(HF)HFBQX[hfbBD,hfbBN,hfb]
date.x [enc.date,urn]
?(HF)HFBF[hfbED,hfb]
mpi.date.x [mri.urn,enc.date,urn]
?(HF)HFBC[ea,hfbED,hfb]
patient.date.x [patient,enc.date,urn]
?(HF)HFBA[aa,hfbED,hfb]
practice.prov.date.x [practice,provider,enc.date,urn]
?(HF)HFBE[ggh,ggg,hfbED,hfb]
practice.x [practice,urn]
?(HF)HFBI[ggh,hfb]
provider.date.x [provider,enc.date,urn]
?(HF)HFBB[ggg,hfbED,hfb]
provider.mpi.x [provider,mri.urn,enc.date,urn]
?(HF)HFBD[ggg,ea,hfbED,hfb]
provider.x [provider,urn]
?(HF)HFBH[ggg,hfb]
sch.appt.x [appt.urn] = urn
?(HF)HFBWZ[wz]
status.x [enc.status,urn]
?(HF)HFBX[hfbST,hfb]
temp.enc.list.x [mri.urn,enc.date,urn]
?(HF)HFTEL[ea,hfbED,hfb]
type.x [enc.type,urn]
?(HF)HFBJ[hfa,hfb]
urn.x [urn]
?(HF)HFBURN[hfb]
|
|
| | | | | | | | | | | | | | | | | | | | | | | | | | | |