Ì i 2
mri.correspondence.file (main)
[prefix,request]
:ECA[epx,ec]
Field Name Len Dat Typ J DPM Offset/Local/VAL
prefix 2 FREE L epx
request 32 FREE L ec
completed.date 8 DATE L :ECA[epx,ec]|9
completed.number 3 PINT R :ECA[epx,ec]|10
completed.user 10 FREE L MIS.USER VAL=@MRI.CORR.activity.user[@.mri.pfx,MRI.CORR.request
VAL=,@MRI.CORR.completed.date,@MRI.CORR.completed.numb
VAL=er]
date.needed 8 DATE L :ECA[epx,ec]|11
delay.date 10 DATE L :ECA[epx,ec]|18
delay.reason 50 FREE L :ECA[epx,ec]|17
fee 8 MONEY R :ECA[epx,ec]|3
from.date 8 DATE L :ECA[epx,ec]|21
hipaa.req 1 YN L :ECA[epx,ec]|14
id 32 FREE L
id.ver 1 YN L :ECA[epx,ec]|19
id.ver.comm 25 FREE L :ECA[epx,ec]|20
last.let.date 8 DATE L :ECA[epx,ec]|7
last.let.number 3 PINT R :ECA[epx,ec]|8
last.let.user 10 FREE L MIS.USER VAL=@MRI.CORR.activity.user[@.mri.pfx,MRI.CORR.request
VAL=,@MRI.CORR.last.let.date,@MRI.CORR.last.let.number
VAL=]
last.letter 8 FREE L MRI.COR.LET VAL=@MRI.CORR.activity.letter[@.mri.pfx,MRI.CORR.reque
VAL=st,@MRI.CORR.last.let.date,@MRI.CORR.last.let.numb
VAL=er]
list.view.unitnum 30 FREE L VAL=IF{'MRI.PAT.urn "";@old.patient;"NEW"}
logged.date 8 DATE L :ECA[epx,ec]|5
logged.number 3 PINT R :ECA[epx,ec]|6
logged.user 10 FREE L MIS.USER VAL=@MRI.CORR.activity.user[@.mri.pfx,MRI.CORR.request
VAL=,@MRI.CORR.logged.date,@MRI.CORR.logged.number]
name 30 FREE L VAL=IF{@MRI.PAT.name[@patient];@unknown.name}
pages 5 PINT R :ECA[epx,ec]|2
paid 1 YN L :ECA[epx,ec]|4
patient 25 URN L MRI.PAT :ECA[epx,ec]|1
phy.appr 1 YN L :ECA[epx,ec]|15
phy.mne 10 FREE L MIS.DOC.DICT :ECA[epx,ec]|16
requestor 12 URN L MRI.COR.REQV :ECA[epx,ec]R|0
requestor.city 30 FREE L :ECA[epx,ec]R|4
requestor.file.no 15 FREE L :ECA[epx,ec]R|8
requestor.name 30 FREE L :ECA[epx,ec]R|1
requestor.phone 18 PHONE L :ECA[epx,ec]R|7
requestor.state 2 FREE L :ECA[epx,ec]R|5
requestor.street.1 30 FREE L :ECA[epx,ec]R|2
requestor.street.2 30 FREE L :ECA[epx,ec]R|3
requestor.zip 10 ZIP.POST L :ECA[epx,ec]R|6
status 8 CHOICE L :ECA[epx,ec]|0
thru.date 8 DATE L :ECA[epx,ec]|22
type 10 FREE L MRI.COR.TYP :ECA[epx,ec]|12
unknown.name 30 NAME L :ECA[epx,ec]|13
Ì € i 2
mri.corr.activity (activity)
[prefix,request, activity.date,activity.number]
:ECA[epx,ec]X[ecaD,ecaN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
activity.date 8 DATE L ecaD
activity.number 3 PINT R ecaN
activity.letter 8 FREE L MRI.COR.LET :ECA[epx,ec]X[ecaD,ecaN]|2
activity.type 15 CHOICE L :ECA[epx,ec]X[ecaD,ecaN]|1
activity.user 10 FREE L MIS.USER :ECA[epx,ec]X[ecaD,ecaN]|0
Ì € i 2
mri.corr.comments (comments)
[prefix,request, comment.order]
:ECA[epx,ec]C[ecaC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
comment.order 3 PINT R ecaC
comment 50 FREE L :ECA[epx,ec]C[ecaC]|0
Ì € i 2
mri.corr.custom.defined.query (customer.defined.queries)
[prefix,request, cd.query]
:ECA[epx,ec]CD[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.query 10 FREE L MIS.QUERY ggv
cd.mult.qry.map.date 8 DATE L :ECA[epx,ec]CD[ggv]INIT
cd.response 75 QRY.RESP L :ECA[epx,ec]CD[ggv]|0
Ì € i 2
mri.corr.cust.def.mult.queries (customer.def.mult.queries)
[prefix,request,cd.query, cdm.seq.no]
:ECA[epx,ec]CD[ggv]M[ggvN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cdm.seq.no 3 PINT R ggvN
cdm.response 75 QRY.RESP L :ECA[epx,ec]CD[ggv]M[ggvN]|0
Ì € i 2
mri.corr.custom.defined.screen (customer.defined.screens)
[prefix,request, cd.screen]
:ECA[epx,ec]CDS[gxx]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cd.screen 15 FREE L MIS.SCREEN gxx
Ì € i 2
merged.from.pts (merged.from.pts)
[prefix,request, merged.from.number]
:ECA[epx,ec]MF[ecZ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
merged.from.number 2 PINT R ecZ
merged.from.patient 25 URN L MRI.PAT :ECA[epx,ec]MF[ecZ]|0
Ì € i 2
mri.corr.reasons (reasons)
[prefix,request, reason.order]
:ECA[epx,ec]S[ecaR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reason.order 2 PINT R ecaR
reason 10 FREE L MRI.COR.RSN :ECA[epx,ec]S[ecaR]|0
Ì € i 2
mri.corr.req.info (req.infos)
[prefix,request, req.info.order]
:ECA[epx,ec]I[ecaI]
Field Name Len Dat Typ J DPM Offset/Local/VAL
req.info.order 2 PINT R ecaI
req.inf 10 FREE L MRI.COR.RI :ECA[epx,ec]I[ecaI]|0
req.info 12 FREE L :ECA[epx,ec]I[ecaI]|0
req.info.name 55 FREE L VAL=IF{@MRI.COR.RI.name[@req.inf];@req.inf}
Ì € i 2
mri.corr.requestor.email.addr (requestor.email.address)
[prefix,request, requestor.email.seq.no]
:ECA[epx,ec]R["EM",ecbEQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
requestor.email.seq.no 2 PINT R ecbEQ
requestor.email.addr 40 FREE L :ECA[epx,ec]R["EM",ecbEQ]|0
Ì i 2
mri.corr.user.file.counts (user.file.counts)
[corr.user,corr.date]
:ECACNT[gu,ed]
Field Name Len Dat Typ J DPM Offset/Local/VAL
corr.user 10 FREE L MIS.USER gu
corr.date 8 DATE L ed
corr.count 3 INT R :ECACNT[gu,ed]
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
mri.corr.acct.req.index [prefix,request,completed.date]
acct.req.x ?ECAAR[epx,ec,ecCD]
mri.corr.hold.type.index [prefix,type,request]
hold.type.x ?ECAH[epx,ecc,ec]
mri.corr.logged.type.index [prefix,type,request] = logged.date
log.type.x ?ECATY[epx,ecc,ec]
mri.corr.patient.index [prefix,patient,request]
patient.x ?ECAM[epx,ea,ec]
mri.corr.requestor.no.index [prefix,requestor.file.no,request]
req.no.x ?ECAN[epx,ecbF,ec]
mri.corr.requestor.index [prefix,requestor.name,request]
requestor.x ?ECAR[epx,ecbN,ec]
|
|
| | | | | | | | | |