Ì i 2
activity.x
[activity.seconds,activity.q]
?(R)ROA[roaS,roaQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
activity.seconds 9 PINT R roaS
activity.q 3 PINT R roaQ
activity.report.status 9 CHOICE L ?(R)ROA[roaS,roaQ]|3
activity.report.urn 10 URN L RAD.RES ?(R)ROA[roaS,roaQ]|2
activity.status 10 CHOICE L ?(R)ROA[roaS,roaQ]|1
activity.urn 15 URN L RAD.ORD ?(R)ROA[roaS,roaQ]|0
activity.user 10 FREE L MIS.USER ?(R)ROA[roaS,roaQ]|4
Ì i 2
history.head
[hx.mri.urn]
*(R2)ROHX[ea]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hx.mri.urn 25 URN L MRI.PAT ea
Ì i 2
history
[hx.mri.urn, hx.dept,hx.service.date,hx.pt,hx.urn]
*(R2)ROHX[ea,rd,roSD,aa,ro]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hx.dept 10 FREE L RAD.DEPT rd
hx.service.date 8 DATE L roSD
hx.pt 30 URN L ADM.PAT aa
hx.urn 0 URN L ro
hx.cat 10 FREE L RAD.CAT *(R2)ROHX[ea,rd,roSD,aa,ro]|0
hx.codes 60 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]|8
hx.conversion 1 YN L *(R2)ROHX[ea,rd,roSD,aa,ro]|9
hx.doctor 10 FREE L MIS.DOC *(R2)ROHX[ea,rd,roSD,aa,ro]|5
hx.ft.doc.addr 30 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]DA|1
hx.ft.doc.addr2 30 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]DA|2
hx.ft.doc.city 30 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]DA|3
hx.ft.doc.email 40 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]DA|7
hx.ft.doc.fax 24 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]DA|8
hx.ft.doc.name 30 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]DA|0
hx.ft.doc.phone 18 PHONE L *(R2)ROHX[ea,rd,roSD,aa,ro]DA|6
hx.ft.doc.state 2 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]DA|4
hx.ft.doc.zip 10 ZIP.POST L *(R2)ROHX[ea,rd,roSD,aa,ro]DA|5
hx.imp.by 40 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]I|0
hx.last.status 16 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]|10
hx.order.num 10 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]|7
hx.other.num 10 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]|4
hx.proc 10 FREE L RAD.PROC *(R2)ROHX[ea,rd,roSD,aa,ro]|1
hx.quantity 3 PINT R *(R2)ROHX[ea,rd,roSD,aa,ro]|2
hx.report 10 FREE L RAD.REPORT *(R2)ROHX[ea,rd,roSD,aa,ro]|3
hx.report.num 10 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]|17
hx.report.site 10 FREE L RAD.SITE *(R2)ROHX[ea,rd,roSD,aa,ro]|18
hx.report.urn 10 URN L RAD.RES *(R2)ROHX[ea,rd,roSD,aa,ro]|16
hx.req.num 10 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]|6
hx.rpt.last.status 9 CHOICE L *(R2)ROHX[ea,rd,roSD,aa,ro]|11
hx.site 10 FREE L RAD.SITE *(R2)ROHX[ea,rd,roSD,aa,ro]|15
Ì i 2
historical.acr.codes
[hx.mri.urn,hx.dept,hx.service.date,hx.pt,hx.urn, hx.acr.code.q]
*(R2)ROHX[ea,rd,roSD,aa,ro]A[rohAQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hx.acr.code.q 2 PINT R rohAQ
hx.acr.code 14 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]A[rohAQ]
Ì i 2
historical.acr.comments
[hx.mri.urn,hx.dept,hx.service.date,hx.pt,hx.urn, hx.acr.comment.q]
*(R2)ROHX[ea,rd,roSD,aa,ro]AC[rohAC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hx.acr.comment.q 2 PINT R rohAC
hx.acr.comment 60 TEXT L *(R2)ROHX[ea,rd,roSD,aa,ro]AC[rohAC]
Ì i 2
historical.pacs
[hx.mri.urn,hx.dept,hx.service.date,hx.pt,hx.urn, hx.pacs.q]
*(R2)ROHX[ea,rd,roSD,aa,ro]HXPACS[rohHP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hx.pacs.q 2 PINT R rohHP
hx.pacs.id 39 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]HXPACS[rohHP]|0
hx.pacs.image.ct 3 INT R *(R2)ROHX[ea,rd,roSD,aa,ro]HXPACS[rohHP]|1
hx.pacs.source 10 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]HXPACS[rohHP]|2
hx.pacs.status 10 CHOICE L *(R2)ROHX[ea,rd,roSD,aa,ro]HXPACS[rohHP]|3
Ì i 2
historical.pacs.numbers
[hx.mri.urn,hx.dept,hx.service.date,hx.pt,hx.urn, hx.pacs.num.q]
*(R2)ROHX[ea,rd,roSD,aa,ro]PACS[rohPX]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hx.pacs.num.q 2 PINT R rohPX
hx.pacs.number 16 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]PACS[rohPX]|0
Ì i 2
history.impressions
[hx.mri.urn,hx.dept,hx.service.date,hx.pt,hx.urn, hx.imp.q]
*(R2)ROHX[ea,rd,roSD,aa,ro]I[rohxI]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hx.imp.q 3 PINT R rohxI
hx.imp 80 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]I[rohxI]
Ì i 2
history.pictures
[hx.mri.urn,hx.dept,hx.service.date,hx.pt,hx.urn, hx.picture]
*(R2)ROHX[ea,rd,roSD,aa,ro]P[geg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hx.picture 15 FREE L MIS.PICTURE geg
hx.picture.added 10 PINT R *(R2)ROHX[ea,rd,roSD,aa,ro]P[geg]|0
Ì i 2
history.pic.annotations
[hx.mri.urn,hx.dept,hx.service.date,hx.pt,hx.urn,hx.picture, hx.pic.ann.q]
*(R2)ROHX[ea,rd,roSD,aa,ro]P[geg]A[gegAQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hx.pic.ann.q 2 PINT R gegAQ
hx.pic.annotation 200 FREE L *(R2)ROHX[ea,rd,roSD,aa,ro]P[geg]A[gegAQ]
Ì i 2
inv.item.deducts
[inv.ded.inventory,inv.ded.date,inv.ded.item]
?(R)ROID[mi,miDD,mt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
inv.ded.inventory 10 FREE L MM.INVENT mi
inv.ded.date 8 DATE L miDD
inv.ded.item 43 URN L MM.ITEM mt
inv.ded.qty 6 PINT R ?(R)ROID[mi,miDD,mt]|0
Ì i 2
inv.item.rejects
[inv.rej.inventory,inv.rej.date,inv.rej.q]
?(R)ROIR[mi,miRD,miRQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
inv.rej.inventory 10 FREE L MM.INVENT mi
inv.rej.date 8 DATE L miRD
inv.rej.q 3 PINT R miRQ
inv.rej.item 43 URN L MM.ITEM ?(R)ROIR[mi,miRD,miRQ]|0
inv.rej.msg 50 FREE L ?(R)ROIR[mi,miRD,miRQ]|3
inv.rej.qty 4 PINT R ?(R)ROIR[mi,miRD,miRQ]|2
inv.rej.stock 18 URN L MM.STOCK ?(R)ROIR[mi,miRD,miRQ]|1
Ì i 2
letter.x
[letter.date,letter.order,letter.type,letter.code]
?(R)ROL[roLD,ro,roLT,roLC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
letter.date 8 DATE L roLD
letter.order 15 URN L RAD.ORD ro
letter.type 1 CHOICE L roLT
letter.code 10 FREE L roLC
letter.index 8 DATE L ?(R)ROL[roLD,ro,roLT,roLC]|0
letter.index.user 10 FREE L MIS.USER ?(R)ROL[roLD,ro,roLT,roLC]|1
letter.patient 8 DATE L ?(R)ROL[roLD,ro,roLT,roLC]|2
letter.patient.user 10 FREE L MIS.USER ?(R)ROL[roLD,ro,roLT,roLC]|3
letter.provider 8 DATE L ?(R)ROL[roLD,ro,roLT,roLC]|4
letter.provider.user 10 FREE L MIS.USER ?(R)ROL[roLD,ro,roLT,roLC]|5
Ì i 2
main
[urn]
$(R)RO[ro]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 15 URN L ro
archive.date 8 DATE L $(R)RO[ro]A|5
arrive.time 4 HHMM L $(R)RO[ro]EX|11
bill.on.status 1 FREE L $(R)RO[ro]|8
cancel.comment 60 FREE L $(R)RO[ro]XC|9
cancel.date 8 DATE L $(R)RO[ro]XC|6
cancel.device 15 FREE L $(R)RO[ro]XC|8
cancel.rank 1 INT R VAL=(L("RQTRDNCNDLRJ",@cancel.status)/2)
cancel.req.comment 60 FREE L $(R)RO[ro]XC|4
cancel.req.date 8 DATE L $(R)RO[ro]XC|1
cancel.req.device 15 FREE L $(R)RO[ro]XC|3
cancel.req.time 4 HHMM L $(R)RO[ro]XC|2
cancel.req.user 10 FREE L MIS.USER $(R)RO[ro]XC|0
cancel.status 2 CHOICE L $(R)RO[ro]XC|10
cancel.time 4 HHMM L $(R)RO[ro]XC|7
cancel.user 10 FREE L MIS.USER $(R)RO[ro]XC|5
cat.screen 15 FREE L MIS.SCREEN $(R)RO[ro]R|0
category 10 FREE L RAD.CAT $(R)RO[ro]|5
category.name 30 FREE L VAL=@RAD.CAT.name[@category]
category.type 1 FREE L VAL=@RAD.CAT.type[@category]#0
class 10 FREE L VAL=@RAD.PROC.class[@category,@procedure]
comp.date 8 DATE L $(R)RO[ro]S|3
comp.order.num 13 FREE L VAL=(@service.date_(@order.num%3))
comp.time 4 HHMM L $(R)RO[ro]S|4
comp.user 10 FREE L MIS.USER $(R)RO[ro]S|5
copied.to.order 15 URN L RAD.ORD $(R)RO[ro]AA|0
day.of.stay 3 INT R VAL=(%Z.date.sub(@service.date,@ADM.PAT.admit.date[@pa
VAL=tient])+1<10000)
days.old 3 INT R VAL=(%Z.date.sub(@.today,@service.date)+1)
depart.date 8 DATE L $(R)RO[ro]EX|12
depart.seconds 9 PINT R VAL=%Z.date.clinical(@depart.date)*86400+%Z.time.in(@d
VAL=epart.time)
depart.time 4 HHMM L $(R)RO[ro]EX|13
dept 10 FREE L RAD.DEPT VAL=@RAD.CAT.dept[@category]
dept.name 30 FREE L VAL=@RAD.DEPT.name[@dept]
dept.num 10 FREE L VAL=%RAD.MRI.dept.number(@patient,@dept,"","",@site)
dept.or.unit.num 10 FREE L VAL=%RAD.MRI.dept.or.unit.number(@patient,@dept,"","",
VAL=@site)
device 15 FREE L $(R)RO[ro]|17
dictated.by 10 FREE L MIS.DOC VAL=@RAD.RES.dictated.by[@report.urn]
dictated.by.name 30 FREE L VAL=IF{@RAD.RES.dictated.by[@report.urn]^XX$2="U " @MI
VAL=S.USER.name[XX];@MIS.DOC.name[XX]}
doctor 10 FREE L MIS.DOC $(R)RO[ro]|4
doctor.address 30 FREE L VAL=IF{@ft.doc.addr;@doctor^doc,@MIS.DOC.address}
doctor.address2 30 FREE L VAL=IF{@ft.doc.addr2;@doctor^doc,@MIS.DOC.address2}
doctor.city 30 FREE L VAL=IF{@ft.doc.city;@doctor^doc,@MIS.DOC.city}
doctor.email 40 FREE L VAL=IF{@ft.doc.email;@doctor^doc,@MIS.DOC.email}
doctor.name 30 FREE L VAL=IF{@ft.doc.name;@MIS.DOC.name[@doctor]}
doctor.name.first 30 FREE L VAL=@doctor.name#"1,"
doctor.name.invert 30 FREE L VAL=%Z.name.inversion(@doctor.name)
doctor.name.last 30 FREE L VAL=@doctor.name#"0,"
doctor.phone 18 PHONE L VAL=IF{@ft.doc.phone;@doctor^doc,@MIS.DOC.phone}
doctor.state 2 FREE L VAL=IF{@ft.doc.state;@doctor^doc,@MIS.DOC.state}
doctor.zip 10 ZIP.POST L VAL=IF{@ft.doc.zip;@doctor^doc,@MIS.DOC.zip}
dup.date.and.time 8 FREE L $(R)RO[ro]|18
dup.reason 60 FREE L $(R)RO[ro]XD
edit.reprint.msg 1 FREE L VAL=IF{/FILE.VAL|1="Y" "(REPRINT)";/FILE.VAL|1="E" "(E
VAL=DITED)"}
end.date 8 DATE L $(R)RO[ro]EX|6
end.seconds 9 PINT R VAL=%Z.date.clinical(@end.date)*86400+%Z.time.in(@end.
VAL=time)
end.time 4 HHMM L $(R)RO[ro]EX|7
exam.result 10 FREE L RAD.RESULT $(R)RO[ro]EX|14
exam.result.date 8 DATE L $(R)RO[ro]EX|15
exam.room 10 FREE L RAD.ROOM $(R)RO[ro]EX|3
film.type 2 CHOICE L
follow.up 10 FREE L RAD.FOLLOW $(R)RO[ro]EX|16
follow.up.date 8 DATE L $(R)RO[ro]EX|17
from.oe 10 URN L OE.ORD $(R)RO[ro]A|13
ft.doc.addr 30 FREE L $(R)RO[ro]DA|1
ft.doc.addr2 30 FREE L $(R)RO[ro]DA|2
ft.doc.city 30 FREE L $(R)RO[ro]DA|3
ft.doc.email 40 FREE L $(R)RO[ro]DA|7
ft.doc.fax 24 FREE L $(R)RO[ro]DA|8
ft.doc.name 30 FREE L $(R)RO[ro]DA|0
ft.doc.phone 18 PHONE L $(R)RO[ro]DA|6
ft.doc.postal 10 ZIP.POST L $(R)RO[ro]DA|5
ft.doc.province 2 FREE L $(R)RO[ro]DA|4
ft.doc.state 2 FREE L $(R)RO[ro]DA|4
ft.doc.zip 10 ZIP.POST L $(R)RO[ro]DA|5
gl.amount 9 SMONEY R $(R)RO[ro]GL|0
group.by.3 0 FREE L VAL=ord.q-1/3+1
group.by.3.order.1 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*3+1]
group.by.3.order.2 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*3+2]
group.by.3.order.3 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*3+3]
group.by.4 0 FREE L VAL=ord.q-1/4+1
group.by.4.order.1 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*4+1]
group.by.4.order.2 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*4+2]
group.by.4.order.3 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*4+3]
group.by.4.order.4 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*4+4]
group.by.5 0 FREE L VAL=ord.q-1/5+1
group.by.5.order.1 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*5+1]
group.by.5.order.2 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*5+2]
group.by.5.order.3 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*5+3]
group.by.5.order.4 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*5+4]
group.by.5.order.5 15 URN L RAD.ORD VAL=@temp.order.x[group.q-1*5+5]
icd.bill.proc 10 FREE L BAR.PROC $(R)RO[ro]ICD|12
icd.code 7 FREE L $(R)RO[ro]ICD|0
icd.comment 60 FREE L $(R)RO[ro]ICD|3
icd.cpt 10 FREE L MIS.CPT $(R)RO[ro]ICD|9
icd.oe.cmt.asked 1 YN L $(R)RO[ro]ICD|11
icd.printed 1 YN L $(R)RO[ro]ICD|8
icd.prof.bill.proc 10 FREE L BAR.PROC $(R)RO[ro]ICD|13
icd.prof.code 7 FREE L $(R)RO[ro]ICD|4
icd.prof.comment 60 FREE L $(R)RO[ro]ICD|7
icd.prof.cpt 10 FREE L MIS.CPT $(R)RO[ro]ICD|10
icd.prof.reject 1 CHOICE L $(R)RO[ro]ICD|5
icd.prof.sign 1 YN L $(R)RO[ro]ICD|6
icd.reject 1 CHOICE L $(R)RO[ro]ICD|1
icd.sign 1 YN L $(R)RO[ro]ICD|2
impression.by 40 FREE L $(R)RO[ro]I|0
in.pro.date 8 DATE L $(R)RO[ro]S|0
in.pro.time 4 HHMM L $(R)RO[ro]S|1
in.pro.user 10 FREE L MIS.USER $(R)RO[ro]S|2
inp.service.time 4 FREE L $(R)RO[ro]|11
jacket.urn 10 FREE L $(R)RO[ro]A|3
lab.spec.urn 30 URN L LAB.L.SPEC $(R)RO[ro]A|16
label.priority 4 FREE L VAL=(IF{@priority ("STAT,URG,ROUT"#(L("SUR",@priority)
VAL=_","))})
label.status.10 10 FREE L VAL=%RAD.ORD.status(urn,10,1)
label.status.10.cr 10 FREE L VAL=%RAD.ORD.status(urn,10)
label.status.10.cr.buf 10 FREE L VAL=%RAD.ORD.status(urn,10,"",rank.status)
label.status.6 6 FREE L VAL=%RAD.ORD.status(urn,6,1)
label.status.6.cr 6 FREE L VAL=%RAD.ORD.status(urn,6)
label.status.6.cr.buf 6 FREE L VAL=%RAD.ORD.status(urn,6,"",rank.status)
last.sent.to.hub 9 PINT R $(R)RO[ro]S|9
library.path 10 FREE L RAD.LIBPATH $(R)RO[ro]A|10
loc.sign.in.status 10 CHOICE L VAL=".Logged.In Process.Taken.Complete.Resulted"#(@loc
VAL=.sign.in.status.rank_.)
loc.sign.in.status.rank 1 CHOICE L $(R)RO[ro]A|9
locator.code 10 FREE L RAD.LC $(R)RO[ro]A|8
man.ent.perf.phys 10 FREE L MIS.DOC $(R)RO[ro]A|15
master.jacket 3 PINT R $(R)RO[ro]A|0
material.type 9 CHOICE L
meal.time.rank 1 INT R
med.rec.form 15 FREE L MIS.MR.FORM $(R)RO[ro]AA|6
mic.spec.urn 30 URN L LAB.M.SPEC $(R)RO[ro]A|17
mj.number 30 FREE L VAL=""
mm.count 3 INT R $(R)RO[ro]A|11
mri.urn 10 FREE L VAL=@ADM.PAT.mri.urn[@patient]
oe.can.request.rejected 1 YN L $(R)RO[ro]A|7
oe.cancel.request.rsn 60 FREE L $(R)RO[ro]A|4
oe.comp.request.rejected 1 YN L $(R)RO[ro]AA|3
oe.complete.request.rsn 60 FREE L $(R)RO[ro]AA|2
oe.order.urn 10 URN L OE.ORD $(R)RO[ro]|30
om.order.block 20 FREE L $(R)RO[ro]AA|4
om.order.urn 10 URN L $(R)RO[ro]|33
om.stop.flag 1 YN L $(R)RO[ro]|34
order.date 8 DATE L $(R)RO[ro]|0
order.num 9 FREE L $(R)RO[ro]|12
order.num.bar 13 BAR.CODE L VAL=@comp.order.num
order.source 10 FREE L MIS.SOURCE $(R)RO[ro]AA|5
order.time 4 HHMM L $(R)RO[ro]|1
origin 2 CHOICE L $(R)RO[ro]|21
outcome 10 FREE L RAD.OUTCOME $(R)RO[ro]EX|18
outcome.date 8 DATE L $(R)RO[ro]EX|19
ov.id 10 FREE L $(R)RO[ro]|31
ov.sender 12 FREE L $(R)RO[ro]|32
page.hdr.w.pt 0 FREE L VAL=%RAD.PRT.prt.patient("")
page.hdr.w.pt.nur 0 FREE L VAL=%RAD.PRT.prt.patient({1})
page.hdr.w.pt.nur.cat 0 FREE L VAL=%RAD.PRT.prt.patient({1,1})
parent.order 15 URN L RAD.ORD $(R)RO[ro]A|14
patient 43 FREE L RAD.PAT $(R)RO[ro]|3
patient.location 10 FREE L VAL=@RAD.PAT.location[@patient]
patient.type 3 FREE L VAL=IF{@RAD.PAT.status^ST="ADM IN"!(ST="DIS IN") "IN";
VAL=ST#2A="ER";ST "OUT"}
pc.bill.on.status 6 FREE L $(R)RO[ro]|25
pc.proc.number 10 FREE L $(R)RO[ro]|24
pc.unit.price 9 MONEY R $(R)RO[ro]|26
performing.dr 10 FREE L MIS.DOC
pre.report.status 1 CHOICE L $(R)RO[ro]A|6
prev.cat.ord.number 9 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,6)
prev.cat.ord.proc.mne 10 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,2)
prev.cat.ord.proc.name 30 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,1)
prev.cat.ord.req.num 9 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,9)
prev.cat.ord.site.mne 10 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,8)
prev.cat.ord.site.name 30 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,7)
prev.cat.ord.status 10 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,3)
prev.cat.ord.svc.date 8 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,4)
prev.cat.ord.svc.time 4 HHMM L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,5)
prev.dept.ord.number 9 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,6,1)
prev.dept.ord.proc.mne 10 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,2,1)
prev.dept.ord.proc.name 30 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,1,1)
prev.dept.ord.req.num 9 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,9,1)
prev.dept.ord.site.mne 10 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,8,1)
prev.dept.ord.site.name 30 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,7,1)
prev.dept.ord.status 10 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,3,1)
prev.dept.ord.svc.date 8 FREE L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,4,1)
prev.dept.ord.svc.time 4 HHMM L VAL=%RAD.ORD.prev.order(RAD.ORD.urn,5,1)
print.destination 15 FREE L
print.format 10 FREE L
print.format.text 0 FREE L VAL=%RAD.PRT.prt.proc.dest.text(RAD.ORD.urn)
print.message 0 FREE L VAL=%RAD.ORD.prt.macros.M.message(RAD.ORD.urn)
print.proc.queries 0 FREE L VAL=IF{@RAD.ORD.proc.order.screen %MIS.SCREEN.print(@R
VAL=AD.ORD.proc.order.screen,^@Root(@RAD.ORD.responses
VAL=),1,0)}
print.trailer 0 FREE L VAL=%RAD.PRT.prt.trailer(RAD.ORD.urn)
priority 1 CHOICE L $(R)RO[ro]|13
priority.7 7 FREE L VAL=.Stat.Urgent.Routine#(L(.SUR,@RAD.ORD.priority)_.)
proc.number 10 FREE L $(R)RO[ro]|7
proc.order.screen 15 FREE L MIS.SCREEN $(R)RO[ro]R|1
proc.screen.size 2 INT R VAL=IF{@RAD.ORD.proc.order.screen^MIS.SCREEN.mnemonic_
VAL=.=. 0;@Last(MIS.SCREEN.print.index);@Last(MIS.SCRE
VAL=EN.sect.page)*@MIS.SCREEN.max.rows.used}
procedure 10 FREE L RAD.PROC $(R)RO[ro]|6
procedure.mnemonic 10 FREE L VAL=@RAD.PROC.mnemonic[@category,@procedure]
procedure.name 30 FREE L VAL=@RAD.PROC.name[@category,@procedure]
pt.location 10 FREE L RAD.ROOM $(R)RO[ro]EX|2
pth.spec.urn 30 URN L LAB.P.SPEC $(R)RO[ro]A|12
quantity 3 PINT R $(R)RO[ro]|14
quest.screen 15 FREE L MIS.SCREEN $(R)RO[ro]R|3
rad 1 YN L $(R)RO[ro]|29
rad.dose 8 PDEC R $(R)RO[ro]EX|20
rank.bill.on.status 1 INT R VAL=(IF{@bill.on.status L("XLITCR",@bill.on.status#0)}
VAL=)
rank.pc.bill.on.status 1 INT R VAL=(IF{@pc.bill.on.status IF{L("CPDIHAS",@pc.bill.on.
VAL=status#0)'>3;4}})
rank.status 1 INT R VAL=L("XLITCR",@status)
rank.wkld.bill.on.status 1 PINT R VAL=(IF{@wkld.bill.on.status L("XLITCR",@wkld.bill.on.
VAL=status#0)})
record.procedure.date 8 DATE L $(R)RO[ro]EX|21
report.status 6 FREE L VAL=IF{@RAD.RES.status[@RAD.ORD.report.urn]^XX "Canc,P
VAL=end,Draft,ISignd,HAdden,Adden,Signed"#(L("CPDIHAS"
VAL=,XX#0)_",")}
report.urn 10 URN L RAD.RES $(R)RO[ro]|23
req.dept 10 FREE L RAD.DEPT $(R)RO[ro]|20
req.number 10 FREE L $(R)RO[ro]REQNUM
req.number.bar 10 BAR.CODE L VAL=@req.number.padded
req.number.padded 10 FREE L VAL=@RAD.ORD.req.number^x$"1-"_(x#"1-"+10000000%0)
res.req.chk 1 YN L VAL=IF{"Y"=c.yn IF{@RAD.PROC.proc.result.required[@cat
VAL=egory,@procedure];@RAD.CAT.result.required[@catego
VAL=ry]};"Y"}
result.date 8 DATE L $(R)RO[ro]S|6
result.time 4 HHMM L $(R)RO[ro]S|7
result.user 10 FREE L MIS.USER $(R)RO[ro]S|8
room.date 8 DATE L $(R)RO[ro]EX|8
room.seconds 9 PINT R VAL=%Z.date.clinical(@room.date)*86400+%Z.time.in(@roo
VAL=m.time)
room.time 4 HHMM L $(R)RO[ro]EX|10
service.date 8 DATE L $(R)RO[ro]|10
service.time 4 HHMM L $(R)RO[ro]|11
site 10 FREE L RAD.SITE $(R)RO[ro]|28
sj.number 30 FREE L VAL=""
sort.date 8 DATE L
start.date 8 DATE L $(R)RO[ro]EX|4
start.seconds 9 PINT R VAL=%Z.date.clinical(@start.date)*86400+%Z.time.in(@st
VAL=art.time)
start.time 4 HHMM L $(R)RO[ro]EX|5
status 1 CHOICE L $(R)RO[ro]|2
status.prt3 3 FREE L VAL=("CNC,LOG,IPR,TKN,CMP,RES"#(@rank.status_","))
status.qual 4 FREE L VAL=IF{@cancel.status="TR"!(@cancel.status="RQ") "CNC?
VAL="}
stock.location 10 FREE L MIS.LOCN $(R)RO[ro]|19
subjacket 3 PINT R $(R)RO[ro]A|1
subjacket.sort 30 FREE L $(R)RO[ro]A|2
tech.2 10 FREE L MIS.USER $(R)RO[ro]EX|0
tech.3 10 FREE L MIS.USER $(R)RO[ro]EX|1
tech.screen 15 FREE L MIS.SCREEN $(R)RO[ro]R|2
technologist 10 FREE L MIS.USER $(R)RO[ro]|22
technologist.monogram 3 FREE L VAL=@UNV.USER.monogram[@technologist]
technologist.name 34 FREE L VAL=@MIS.USER.name[@technologist]
time.block 60 FREE L $(R)RO[ro]TB
transport 1 CHOICE L $(R)RO[ro]EX|9
unit.price 9 MONEY R $(R)RO[ro]|9
user 10 FREE L MIS.USER $(R)RO[ro]|16
wkld.bill.on.status 9 FREE L $(R)RO[ro]AA|1
Ì i 2
acr.codes
[urn, acr.code.q]
$(R)RO[ro]ACR[roAQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
acr.code.q 2 PINT R roAQ
acr.code 14 FREE L $(R)RO[ro]ACR[roAQ]
Ì i 2
acr.comments
[urn, acr.comment.q]
$(R)RO[ro]AC[roAC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
acr.comment.q 2 PINT R roAC
acr.comment 60 TEXT L $(R)RO[ro]AC[roAC]
Ì i 2
billing.data
[urn, bill.date.and.urn]
$(R)RO[ro]B[roBD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bill.date.and.urn 0 FREE L roBD
bill.activity.date 8 DATE L VAL=(@bill.date.and.urn$8)
bill.amount 9 MONEY R $(R)RO[ro]B[roBD]|1
bill.comment 35 FREE L $(R)RO[ro]B[roBD]|6
bill.comment.or.source 35 FREE L VAL=IF{@bill.comment;@bill.source^XX#0="M" @RAD.MAT.na
VAL=me[XX%0];XX#0="W" @RAD.WFCN.name[XX%0]}
bill.credit 1 YN L $(R)RO[ro]B[roBD]|3
bill.device 15 FREE L $(R)RO[ro]B[roBD]|5
bill.else.order.site 10 FREE L VAL=IF{@bill.site;@site}
bill.msp.fac.code 5 FREE L $(R)RO[ro]B[roBD]|10
bill.msp.sub.fac.code 5 FREE L $(R)RO[ro]B[roBD]|11
bill.post.type 1 CHOICE L $(R)RO[ro]B[roBD]|2
bill.proc.mat.wfunc 30 FREE L VAL=IF{@bill.source^XX#0="M" @RAD.MAT.name[XX%0];XX#0=
VAL="W" @RAD.WFCN.name[XX%0];@RAD.PROC.name[@category,
VAL=@procedure]}
bill.proc.number 10 FREE L $(R)RO[ro]B[roBD]|7
bill.qty 3 INT R $(R)RO[ro]B[roBD]|0
bill.site 10 FREE L RAD.SITE $(R)RO[ro]B[roBD]|8
bill.source 11 FREE L $(R)RO[ro]B[roBD]|9
bill.user 10 FREE L MIS.USER $(R)RO[ro]B[roBD]|4
Ì i 2
clinical.alerts
[urn, clin.alert]
$(R)RO[ro]CA[gqa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
clin.alert 10 FREE L MIS.CLIN.ALERT gqa
Ì i 2
clinical.alerts.details
[urn,clin.alert, clin.alerts.details]
$(R)RO[ro]CA[gqa]D[aqaDE]
Field Name Len Dat Typ J DPM Offset/Local/VAL
clin.alerts.details 72 FREE L aqaDE
Ì i 2
doc.copies
[urn, doc.urn]
$(R)RO[ro]CD[cd]
Field Name Len Dat Typ J DPM Offset/Local/VAL
doc.urn 2 URN L cd
doc 10 FREE L MIS.DOC $(R)RO[ro]CD[cd]|0
doc.add1 30 FREE L VAL=%MIS.DOC.get.address(@doc,MIS.DOC.facility,"ADDRES
VAL=S")
doc.add2 30 FREE L VAL=%MIS.DOC.get.address(@doc,MIS.DOC.facility,"ADDRES
VAL=S2")
doc.add3 30 FREE L VAL=IF{@doc %MIS.DOC.get.address(@doc,MIS.DOC.facility
VAL=,"CITY")_", "_%MIS.DOC.get.address(@doc,MIS.DOC.fa
VAL=cility,"STATE")_" "_%MIS.DOC.get.address(@doc,MIS
VAL=.DOC.facility,"ZIP")}
doc.email 40 FREE L VAL=@MIS.DOC.email[@doc]
doc.fax 24 FREE L VAL=@MIS.DOC.fax.number[@doc]
doc.ltr 1 YN L $(R)RO[ro]CD[cd]|3
doc.name 30 FREE L VAL=@MIS.DOC.name[@doc]
doc.phone 18 PHONE L VAL=@MIS.DOC.phone[@doc]
doc.quest 1 YN L $(R)RO[ro]CD[cd]|2
doc.rpt 1 YN L $(R)RO[ro]CD[cd]|1
Ì i 2
duplicate.data
[urn, dupl.ord]
$(R)RO[ro]XD[roDO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dupl.ord 8 URN L roDO
dupl.date 8 DATE L VAL=@RAD.ORD.service.date[@dupl.urn]
dupl.doctor 42 FREE L VAL=(@RAD.ORD.doctor[@dupl.urn]^DR:10L_" "_IF{@RAD.ORD
VAL=.ft.doc.name;@MIS.DOC.name[DR]})
dupl.priority 1 CHOICE L VAL=@RAD.ORD.priority[@dupl.urn]
dupl.time 4 HHMM L VAL=@RAD.ORD.service.time[@dupl.urn]
dupl.urn 6 FREE L $(R)RO[ro]XD[roDO]
Ì i 2
edit.data
[urn, edit.urn]
$(R)RO[ro]E[roED]
Field Name Len Dat Typ J DPM Offset/Local/VAL
edit.urn 3 URN L roED
edit.date 8 DATE L $(R)RO[ro]E[roED]|0
edit.device 30 FREE L UNV.CLIENT $(R)RO[ro]E[roED]|4
edit.event 63 FREE L $(R)RO[ro]E[roED]|3
edit.time 4 HHMM L $(R)RO[ro]E[roED]|1
edit.user 10 FREE L MIS.USER $(R)RO[ro]E[roED]|2
Ì i 2
exam.comments
[urn, exam.comment.q]
$(R)RO[ro]EC[roEC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
exam.comment.q 2 PINT R roEC
exam.comment 80 TEXT L $(R)RO[ro]EC[roEC]
Ì i 2
materials
[urn, material]
$(R)RO[ro]EX["M",rm]
Field Name Len Dat Typ J DPM Offset/Local/VAL
material 10 FREE L RAD.MAT rm
material.amt 7 PDEC R $(R)RO[ro]EX["M",rm]|2
material.mm.count 3 PINT R $(R)RO[ro]EX["M",rm]|3
material.qc.qty 3 PINT R $(R)RO[ro]EX["M",rm]|1
material.qty 3 PINT R $(R)RO[ro]EX["M",rm]|0
Ì i 2
repeats
[urn,material, repeat.reason]
$(R)RO[ro]EX["M",rm]R[rj]
Field Name Len Dat Typ J DPM Offset/Local/VAL
repeat.reason 10 FREE L RAD.REPEAT rj
repeat.qty 3 PINT R $(R)RO[ro]EX["M",rm]R[rj]|0
Ì i 2
findings
[urn, finding.q]
$(R)RO[ro]F[roFQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
finding.q 2 PINT R roFQ
finding 10 FREE L RAD.FIND $(R)RO[ro]F[roFQ]
Ì i 2
findings.classes
[urn,finding.q, finding.class.q]
$(R)RO[ro]F[roFQ]C[roFCQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
finding.class.q 2 PINT R roFCQ
finding.class 10 FREE L $(R)RO[ro]F[roFQ]C[roFCQ]
Ì i 2
findings.members
[urn,finding.q,finding.class.q, finding.member.q]
$(R)RO[ro]F[roFQ]C[roFCQ]M[roFMQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
finding.member.q 2 PINT R roFMQ
finding.member 10 FREE L $(R)RO[ro]F[roFQ]C[roFCQ]M[roFMQ]
Ì i 2
findings.findings
[urn,finding.q,finding.class.q,finding.member.q, finding.finding.q]
$(R)RO[ro]F[roFQ]C[roFCQ]M[roFMQ]F[roFFQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
finding.finding.q 2 PINT R roFFQ
finding.finding 10 FREE L $(R)RO[ro]F[roFQ]C[roFCQ]M[roFMQ]F[roFFQ]
Ì i 2
icd.modifiers
[urn, icd.mod.q]
$(R)RO[ro]ICD["M",gzmQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
icd.mod.q 3 PINT R gzmQ
icd.modifier 2 FREE L MIS.CPT.MOD $(R)RO[ro]ICD["M",gzmQ]|0
Ì i 2
icd.prof.modifiers
[urn, icd.prof.mod.q]
$(R)RO[ro]ICD["PM",gzmQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
icd.prof.mod.q 3 PINT R gzmQ
icd.prof.modifier 2 FREE L MIS.CPT.MOD $(R)RO[ro]ICD["PM",gzmQ]|0
Ì i 2
impressions
[urn, impression.q]
$(R)RO[ro]I[roI]
Field Name Len Dat Typ J DPM Offset/Local/VAL
impression.q 3 PINT R roI
impression 80 TEXT L $(R)RO[ro]I[roI]
Ì i 2
ins.copies
[urn, ins.urn]
$(R)RO[ro]CI[ci]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ins.urn 2 URN L ci
ins 10 FREE L MIS.INS $(R)RO[ro]CI[ci]|0
ins.add1 30 FREE L VAL=@MIS.INS.address[@ins]
ins.add2 30 FREE L VAL=@MIS.INS.address2[@ins]
ins.add3 30 FREE L VAL=IF{@ins @MIS.INS.city[@ins]_", "_@MIS.INS.state[@i
VAL=ns]_" "_@MIS.INS.zip[@ins]}
ins.email 40 FREE L VAL=@MIS.INS.email[@ins]
ins.fax 24 FREE L VAL=@MIS.INS.fax.number[@ins]
ins.ltr 1 YN L $(R)RO[ro]CI[ci]|3
ins.name 30 FREE L VAL=@MIS.INS.name[@ins]
ins.phone 18 PHONE L VAL=@MIS.INS.phone[@ins]
ins.quest 1 YN L $(R)RO[ro]CI[ci]|2
ins.rpt 1 YN L $(R)RO[ro]CI[ci]|1
Ì i 2
mri.follow.ups
[urn, mri.follow.up]
$(R)RO[ro]FU[rfFU]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mri.follow.up 10 URN L rfFU
mri.follow.up.date 8 DATE L $(R)RO[ro]FU[rfFU]|0
Ì i 2
mri.follow.ups.resolved
[urn, mri.follow.up.resolved]
$(R)RO[ro]FR[rfFU]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mri.follow.up.resolved 10 URN L rfFU
Ì i 2
other.copies
[urn, oth.urn]
$(R)RO[ro]CO[co]
Field Name Len Dat Typ J DPM Offset/Local/VAL
oth.urn 2 URN L co
oth.add1 30 FREE L $(R)RO[ro]CO[co]|1
oth.add2 30 FREE L $(R)RO[ro]CO[co]|2
oth.add3 30 FREE L $(R)RO[ro]CO[co]|3
oth.email 40 FREE L $(R)RO[ro]CO[co]|4
oth.fax 24 FREE L $(R)RO[ro]CO[co]|10
oth.ltr 1 YN L $(R)RO[ro]CO[co]|7
oth.mnemonic 30 FREE L $(R)RO[ro]CO[co]|0
oth.name 30 FREE L $(R)RO[ro]CO[co]|8
oth.phone 18 PHONE L $(R)RO[ro]CO[co]|9
oth.quest 1 YN L $(R)RO[ro]CO[co]|6
oth.rpt 1 YN L $(R)RO[ro]CO[co]|5
Ì i 2
pacs
[urn, pacs.q]
$(R)RO[ro]PACS[roPAC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pacs.q 2 PINT R roPAC
pacs.date 8 DATE L $(R)RO[ro]PACS[roPAC]|1
pacs.id 39 FREE L $(R)RO[ro]PACS[roPAC]|0
pacs.image.ct 3 INT R $(R)RO[ro]PACS[roPAC]|6
pacs.interp.id 30 FREE L $(R)RO[ro]PACS[roPAC]|5
pacs.interp.out 40 FREE L VAL=@pacs.interp.id_(" ("_@pacs.interp.type_")"'=" ()"
VAL=)
pacs.interp.type 4 CHOICE L $(R)RO[ro]PACS[roPAC]|4
pacs.source 10 FREE L $(R)RO[ro]PACS[roPAC]|7
pacs.status 10 CHOICE L $(R)RO[ro]PACS[roPAC]|3
pacs.time 4 HHMM L $(R)RO[ro]PACS[roPAC]|2
Ì i 2
pacs.numbers
[urn,pacs.q, pacs.num.q]
$(R)RO[ro]PACS[roPAC]PACSNUM[roPXN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pacs.num.q 2 PINT R roPXN
pacs.number 16 FREE L $(R)RO[ro]PACS[roPAC]PACSNUM[roPXN]|0
Ì i 2
pc.billing.data
[urn, pc.date.and.urn]
$(R)RO[ro]PB[roPBD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pc.date.and.urn 0 FREE L roPBD
pc.activity.date 8 DATE L VAL=(@pc.date.and.urn$8)
pc.amount 9 MONEY R $(R)RO[ro]PB[roPBD]|1
pc.comment 35 FREE L $(R)RO[ro]PB[roPBD]|6
pc.credit 1 YN L $(R)RO[ro]PB[roPBD]|3
pc.device 15 FREE L $(R)RO[ro]PB[roPBD]|5
pc.else.order.site 10 FREE L VAL=IF{@pc.site;@site}
pc.post.type 1 CHOICE L $(R)RO[ro]PB[roPBD]|2
pc.qty 3 INT R $(R)RO[ro]PB[roPBD]|0
pc.site 10 FREE L RAD.SITE $(R)RO[ro]PB[roPBD]|7
pc.user 10 FREE L MIS.USER $(R)RO[ro]PB[roPBD]|4
Ì i 2
peer.reviews
[urn, peer.review.dr]
$(R)RO[ro]PR[ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
peer.review.dr 10 FREE L MIS.DOC ggg
peer.agree 1 YN L $(R)RO[ro]PR[ggg]|0
peer.enter.date 8 DATE L $(R)RO[ro]PR[ggg]|1
peer.enter.time 4 HHMM L $(R)RO[ro]PR[ggg]|2
Ì i 2
peer.review.text
[urn,peer.review.dr, peer.review.q]
$(R)RO[ro]PR[ggg]T[roprq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
peer.review.q 3 PINT R roprq
peer.review 92 TEXT L $(R)RO[ro]PR[ggg]T[roprq]
Ì i 2
pictures
[urn, picture]
$(R)RO[ro]PIC[geg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
picture 15 FREE L MIS.PICTURE geg
picture.added 10 PINT R $(R)RO[ro]PIC[geg]|0
Ì i 2
rcp.copies
[urn, rcp.urn]
$(R)RO[ro]CR[cr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rcp.urn 2 URN L cr
rcp 10 FREE L RAD.RCP $(R)RO[ro]CR[cr]|0
rcp.add1 30 FREE L VAL=@RAD.RCP.addr1[@rcp]
rcp.add2 30 FREE L VAL=@RAD.RCP.addr2[@rcp]
rcp.add3 30 FREE L VAL=IF{@rcp @RAD.RCP.city[@rcp]_", "_@RAD.RCP.state[@r
VAL=cp]_" "_@RAD.RCP.zip[@rcp]}
rcp.email 40 FREE L VAL=@RAD.RCP.email.address[@rcp]
rcp.fax 24 FREE L VAL=@RAD.RCP.fax.number[@rcp]
rcp.ltr 1 YN L $(R)RO[ro]CR[cr]|3
rcp.name 30 FREE L VAL=@RAD.RCP.name[@rcp]
rcp.phone 18 PHONE L VAL=@RAD.RCP.phone[@rcp]
rcp.quest 1 YN L $(R)RO[ro]CR[cr]|2
rcp.rpt 1 YN L $(R)RO[ro]CR[cr]|1
Ì i 2
reprint
[urn, reprint.urn]
$(R)RO[ro]RPT[roRPT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reprint.urn 2 URN L roRPT
reprint.copies 2 PINT R $(R)RO[ro]RPT[roRPT]|2
reprint.destination 15 FREE L $(R)RO[ro]RPT[roRPT]|1
reprint.dict.destination 15 FREE L $(R)RO[ro]RPT[roRPT]|3
reprint.for 1 CHOICE L $(R)RO[ro]RPT[roRPT]|6
reprint.for.text 4 FREE L VAL=IF{@reprint.for "NONE.BOTH.ITS.OE"#(L("NBIO",@repr
VAL=int.for)_.)}
reprint.format 10 FREE L $(R)RO[ro]RPT[roRPT]|0
reprint.rule 10 FREE L RAD.RULE $(R)RO[ro]RPT[roRPT]|5
reprint.yn 1 YN L $(R)RO[ro]RPT[roRPT]|4
Ì i 2
responses
[urn, query]
$(R)RO[ro]R[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
query 10 FREE L MIS.QUERY ggv
resp.yn.comment 70 QRY.RESP L $(R)RO[ro]R[ggv]|5
response 70 QRY.RESP L $(R)RO[ro]R[ggv]|0
Ì i 2
responses.multiple
[urn,query, response.q]
$(R)RO[ro]R[ggv]M[ggvMQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
response.q 3 PINT R ggvMQ
response.mult 70 QRY.RESP L $(R)RO[ro]R[ggv]M[ggvMQ]|0
Ì i 2
user.pictures
[urn, pic.q]
$(R)RO[ro]UPIC[roPQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pic.q 3 PINT R roPQ
pic.desc 60 FREE L $(R)RO[ro]UPIC[roPQ]|0
pic.filename 20 FREE L $(R)RO[ro]UPIC[roPQ]|3
pic.temp 20 FREE L $(R)RO[ro]UPIC[roPQ]|4
pic.urn 3 PINT R $(R)RO[ro]UPIC[roPQ]|1
Ì i 2
user.pic.annotations
[urn,pic.q, pic.anno.q]
$(R)RO[ro]UPIC[roPQ]A[roPa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pic.anno.q 2 PINT R roPa
pic.anno 200 FREE L $(R)RO[ro]UPIC[roPQ]A[roPa]
Ì i 2
user.pic.text
[urn,pic.q, pic.text.q]
$(R)RO[ro]UPIC[roPQ]T[roPtq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pic.text.q 3 PINT R roPtq
pic.text.line 60 TEXT L $(R)RO[ro]UPIC[roPQ]T[roPtq]
Ì i 2
views
[urn, view]
$(R)RO[ro]V[rrv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
view 10 FREE L RAD.VIEW rrv
view.qty 1 PINT R $(R)RO[ro]V[rrv]|0
Ì i 2
workload.functions
[urn, wl.function]
$(R)RO[ro]WF[rwf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
wl.function 10 FREE L RAD.WFCN rwf
wl.count 2 INT R $(R)RO[ro]WF[rwf]|0
Ì i 2
mm.queue.materials
[mm.q.seconds,mm.q.urn, mm.q.material]
?(R)ROMMQ[roMMS,ro]M[rm]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mm.q.material 10 FREE L RAD.MAT rm
mm.q.mat.qty 4 SINT R ?(R)ROMMQ[roMMS,ro]M[rm]|0
Ì i 2
oe.activity
[oe.act.facility,oe.act.seconds,oe.act.oe.urn,oe.act.urn]
?(R)ROEA[gqb,roea,po,ro]
Field Name Len Dat Typ J DPM Offset/Local/VAL
oe.act.facility 10 FREE L MIS.FACILITY gqb
oe.act.seconds 5 PINT R roea
oe.act.oe.urn 10 URN L OE.ORD po
oe.act.urn 15 URN L RAD.ORD ro
oe.act.error 50 FREE L ?(R)ROEA[gqb,roea,po,ro]|1
oe.act.new.ord.from.edit 1 YN L ?(R)ROEA[gqb,roea,po,ro]|3
oe.act.status 3 CHOICE L ?(R)ROEA[gqb,roea,po,ro]|0
oe.act.user 10 FREE L MIS.USER ?(R)ROEA[gqb,roea,po,ro]|2
Ì i 2
oe.log
[oe.date.time,oe.log.q]
?(R)ROEL[roeot,roelq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
oe.date.time 9 FREE L roeot
oe.log.q 3 PINT R roelq
oe.log.date 8 DATE L VAL=%Z.date.in.magic(@oe.date.time)
oe.log.db 12 FREE L MIS.APPL.DB ?(R)ROEL[roeot,roelq]|4
oe.log.message 65 FREE L ?(R)ROEL[roeot,roelq]|5
oe.log.order 10 URN L OE.ORD ?(R)ROEL[roeot,roelq]|3
oe.log.patient 43 FREE L RAD.PAT ?(R)ROEL[roeot,roelq]|2
oe.log.time 4 HHMM L VAL=%Z.time.out(@oe.date.time)
oe.log.type 1 CHOICE L ?(R)ROEL[roeot,roelq]|0
oe.log.type.ok 1 YN L VAL=IF{L(c.oe.log.types,@oe.log.type)<L(c.oe.log.ty
VAL=pes) "Y";"N"}
oe.log.types 5 FREE L
oe.log.user 10 FREE L MIS.USER ?(R)ROEL[roeot,roelq]|1
Ì i 2
peer.review.summary
[peer.sum.date,peer.sum.site,peer.sum.review.dr,peer.sum.report.dr,peer.sum.category,peer.sum.p
?(R)ROPRS[roprD,rsi,ggg,ggg1,rc,rp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
peer.sum.date 8 DATE L roprD
peer.sum.site 10 FREE L RAD.SITE rsi
peer.sum.review.dr 10 FREE L MIS.DOC ggg
peer.sum.report.dr 10 FREE L MIS.DOC ggg1
peer.sum.category 10 FREE L RAD.CAT rc
peer.sum.procedure 10 FREE L RAD.PROC rp
peer.sum.agree 5 PINT R ?(R)ROPRS[roprD,rsi,ggg,ggg1,rc,rp]|1
peer.sum.count 5 PINT R ?(R)ROPRS[roprD,rsi,ggg,ggg1,rc,rp]|0
Ì i 2
xi.pacs.numbers
[xi.pacs.num.q]
/XI["PACS"]PACSNUM[roPXN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
xi.pacs.num.q 2 PINT R roPXN
xi.pacs.number 16 FREE L /XI["PACS"]PACSNUM[roPXN]|0
Ì i 2
xi.pacs.urls
/XI["PACS"]URL
Field Name Len Dat Typ J DPM Offset/Local/VAL
xi.pacs.url 255 FREE L /XI["PACS"]URL
Index Files Subscripts/Physical Base
acr.code.x [anatomy,pathology,mri.urn,service.date,urn] = acr.code
?(R)ROACR[rb,ry,ea,roSD,ro]
adm.room.bed.index [facility,room,bed] = patient
?(A)AARB[gqb,ggr,hrmB]
archive.id.x [category,comp.order.num,urn]
?(R)ROAI[rc,roCN,ro]
archive.x [archive.date,urn]
?(R)ROAR[roARD,ro]
bar.bch.x [bill.date.and.urn,urn]
?(R)ROBX[roBD,ro]
bar.comp.x [category,urn]
?(R)ROBBC[rc,ro]
bar.x [category,urn]
?(R)ROBB[rc,ro]
bill.x [category,bill.date.and.urn,comp.order.num,urn]
?(R)ROB[rc,roBD,roCN,ro]
canc.x [category,canc.date,cancel.rank,urn]
?(R)ROCX[rc,roCD,roCS,ro]
cash.x [user,order.date,order.time,urn]
?(R)ROCC[gu,roOD,roOT,ro]
cat.proc.x [category,procedure.mnemonic,urn]
?(R)ROCPX[rc,rpm,ro]
cat.x [category,comp.order.num,urn]
?(R)ROC[rc,roCN,ro]
check.dup.x [patient,category,procedure,dup.date.and.time,urn]
?(R)ROD[aa,rc,rp,roDD,ro]
consult.x [response,mri.urn,urn]
?(R)ROCN[roR,ea,ro]
delete.x [patient,urn]
?(R)RODL[aa,ro]
dept.x [dept,category]
&(R)RCD[rd,rc]
dup.x [category,service.date,urn]
?(R)RODX[rc,roSD,ro]
foc.urn.x [om.order.urn] = urn
?(R)ROTSURN[roFOC]
follow.up.x [follow.up.date,doctor,urn] = 0
?(R)ROFU[roD,ggg,ro]
icd.x [order.date,urn]
?(R)ROICD[roOD,ro]
material.x [site,dept,sort.date,film.type,material] = material.qty
?(R)ROEF[rsi,rd,roDT,roRF,rm]
mis.loc.rm.index [location,room]
&(G)GGRI[ggn,ggr]
mri.date.x [mri.urn,service.date,service.time,category,patient,urn]
?(R)ROG[ea,roSD,roST,rc,aa,ro]
mri.x [mri.urn,urn]
?(R)ROM[ea,ro]
nonpt.ord.x [service.date,urn]
?(R)RONP[roSD,ro]
ord.cat.date.x [category,order.date,urn]
?(R)ROOCDX[rc,roOD,ro]
ord.date.x [order.date,urn]
?(R)ROODX[roOD,ro]
order.num.x [category,comp.order.num]
?(R)RONUM[rc,roCN]
order.x [patient,order.date,urn]
?(R)ROE[aa,roOD,ro]
ov.id.x [ov.sender,ov.id] = urn
?(R)ROI[roSN,roID]
patient.x [category,patient,comp.order.num,urn]
?(R)ROPT[rc,aa,roCN,ro]
pc.bar.bch.x [pc.date.and.urn,urn]
?(R)ROPX[roPBD,ro]
pc.bar.x [category,urn]
?(R)ROPBB[rc,ro]
pc.bill.x [category,pc.date.and.urn,comp.order.num,urn]
?(R)ROPB[rc,roPBD,roCN,ro]
pc.pt.log.x [category,patient,pc.date.and.urn,urn]
?(R)ROPPL[rc,aa,roPBD,ro]
peer.review.x [peer.enter.date,peer.review.dr,peer.report.dr,urn]
?(R)ROPRX[roprD,ggg,ggg1,ro]
prof.fee.x [category,patient,batch.date,urn]
?(R)ROPF[rc,aa,gyD,ro]
provider.x [doctor,urn]
?(R)ROPVX[ggg,ro]
pt.log.x [category,patient,bill.date.and.urn,urn]
?(R)ROPL[rc,aa,roBD,ro]
pt.ord.x [patient,service.date,urn]
?(R)ROPO[aa,roSD,ro]
quest.x [mri.urn,category,service.date,urn]
?(R)ROQ[ea,rc,roSD,ro]
report.dr.x [peer.report.dr,peer.review.dr,urn]
?(R)ROPD[ggg1,ggg,ro]
req.num.x [dept,year,req.number,urn]
?(R)RORN[rd,roY,roRN,ro]
review.dr.x [peer.review.dr,peer.report.dr,urn]
?(R)ROVD[ggg,ggg1,ro]
service.date.x [service.date,urn]
?(R)ROO[roSD,ro]
site.x [site,urn]
?(R)ROSI[rsi,ro]
status.x [category,rank.status,comp.order.num,urn]
?(R)ROS[rc,roS,roCN,ro]
stock.x [stock.location,order.date,category,procedure,urn]
?(R)ROST[ggn,roOD,rc,rp,ro]
tech.x [technologist,urn]
?(R)ROTECH[gu,ro]
temp.group.x [group.q] = urn
/ROGX[rog]
temp.order.x [ord.q] = urn
/ROOX[roq]
temp.performing.dr.x [site,category,performing.dr,urn]
/ROTPPX[rsi,rc,ggg,ro]
urn.x [urn]
*(R)ROZ[ro]
|
|
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | |