Ì i 2
main
[category,number]
&(R)RP[rc,rp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
category 10 FREE L RAD.CAT rc
number 10 FREE R rp
active 1 YN L &(R)RP[rc,rp]|0
add.bill.proc.number 10 FREE L &(R)RP[rc,rp]TB|3
add.price 9 MONEY R &(R)RP[rc,rp]TB|2
add.time.block 4 HHMM L &(R)RP[rc,rp]TB|1
ask.qty 1 YN L &(R)RP[rc,rp]|3
ask.quest 1 YN L &(R)RP[rc,rp]EX|1
bill.on.status 10 CHOICE L &(R)RP[rc,rp]|15
bill.proc.number 10 FREE L &(R)RP[rc,rp]|17
chg.no.bill.code 1 YN L &(R)RP[rc,rp]B|8
class 10 FREE L RAD.CLASS &(R)RP[rc,rp]EX|6
confidential.flag 1 YN L &(R)RP[rc,rp]|30
cpt.code 10 FREE L MIS.CPT &(R)RP[rc,rp]B|9
cr.gl.acct 20 FREE L &(R)RP[rc,rp]A|2
default.priority 1 CHOICE L &(R)RP[rc,rp]|6
default.qty 3 PINT R &(R)RP[rc,rp]|7
dept 10 FREE L RAD.DEPT VAL=@RAD.CAT.dept[category]
dept.header 16 FREE L VAL=("DEPT: "_dept)
dft.room 10 FREE L RAD.ROOM &(R)RP[rc,rp]EX|0
dr.gl.acct 20 FREE L &(R)RP[rc,rp]A|1
duplicate.order.hours 4 PDEC R &(R)RP[rc,rp]|12
edit.flag 1 YN L &(R)RP[rc,rp]|19
edit.text.doc 0 FREE L
enter.findings 1 YN L &(R)RP[rc,rp]EX|4
enter.outcome 1 YN L &(R)RP[rc,rp]EX|5
enter.picture 1 YN L &(R)RP[rc,rp]EX|7
file.materials.w.order 1 YN L &(R)RP[rc,rp]B|7
header 34 FREE L VAL=("DEPT: "_dept_" - CAT: "_category)
history 1 YN L &(R)RP[rc,rp]|24
hub.data.editable 1 YN L &(R)RP[rc,rp]HUB|1
hub.data.name 35 FREE L &(R)RP[rc,rp]HUB|0
id 10 FREE L VAL=@RAD.PROC.mnemonic
initial.time.block 4 HHMM L &(R)RP[rc,rp]TB|0
item.number 15 FREE L &(R)RP[rc,rp]|29
last.update 30 FREE L &(R)RP[rc,rp]UPD
library.path 10 FREE L RAD.LIBPATH &(R)RP[rc,rp]B|1
limit.qty 3 PINT R &(R)RP[rc,rp]|10
loc.sign.in.status 10 CHOICE L &(R)RP[rc,rp]B|2
locator.code 10 FREE L RAD.LC &(R)RP[rc,rp]B|0
med.rec.form 15 FREE L MIS.MR.FORM &(R)RP[rc,rp]B|12
mm.status 10 CHOICE L &(R)RP[rc,rp]|22
mnemonic 10 FREE L &(R)RP[rc,rp]|2
name 30 FREE L &(R)RP[rc,rp]|1
order.lis.view.group 10 FREE L LAB.C.TEST.VIEW&(R)RP[rc,rp]B|4
order.picture 15 FREE L MIS.PICTURE &(R)RP[rc,rp]B|3
payment.type 10 CHOICE L &(R)RP[rc,rp]A|0
pc.bill.proc.number 10 FREE L &(R)RP[rc,rp]|25
pc.edit.flag 1 YN L &(R)RP[rc,rp]|27
pc.price 9 MONEY R &(R)RP[rc,rp]|26
performing.dr 1 CHOICE L &(R)RP[rc,rp]|28
price 9 MONEY R &(R)RP[rc,rp]|18
proc.result.required 1 YN L &(R)RP[rc,rp]B|10
rad.only 1 YN L &(R)RP[rc,rp]|31
radiation.dose 8 PDEC R &(R)RP[rc,rp]EX|3
record.lis.view.group 10 FREE L LAB.C.TEST.VIEW&(R)RP[rc,rp]B|5
screen 15 FREE L MIS.SCREEN &(R)RP[rc,rp]|16
series.limit 2 PINT R &(R)RP[rc,rp]|11
subjacket.sort 8 CHOICE L &(R)RP[rc,rp]B|6
tech.1.1.exam 3 INT R &(R)RP[rc,rp]WE|0
tech.1.1.proc 3 INT R &(R)RP[rc,rp]WP|0
tech.1.1.units 9 DEC2 R &(R)RP[rc,rp]WU|0
tech.1.2.exam 3 INT R &(R)RP[rc,rp]WE|1
tech.1.2.proc 3 INT R &(R)RP[rc,rp]WP|1
tech.1.2.units 9 DEC2 R &(R)RP[rc,rp]WU|1
tech.1.3.exam 3 INT R &(R)RP[rc,rp]WE|3
tech.1.3.proc 3 INT R &(R)RP[rc,rp]WP|3
tech.1.3.units 9 DEC2 R &(R)RP[rc,rp]WU|3
tech.2.2.exam 3 INT R &(R)RP[rc,rp]WE|2
tech.2.2.proc 3 INT R &(R)RP[rc,rp]WP|2
tech.2.2.units 9 DEC2 R &(R)RP[rc,rp]WU|2
tech.2.3.exam 3 INT R &(R)RP[rc,rp]WE|4
tech.2.3.proc 3 INT R &(R)RP[rc,rp]WP|4
tech.2.3.units 9 DEC2 R &(R)RP[rc,rp]WU|4
tech.3.3.exam 3 INT R &(R)RP[rc,rp]WE|5
tech.3.3.proc 3 INT R &(R)RP[rc,rp]WP|5
tech.3.3.units 9 DEC2 R &(R)RP[rc,rp]WU|5
tech.screen 15 FREE L MIS.SCREEN &(R)RP[rc,rp]EX|2
turnaround.mins 4 PINT R &(R)RP[rc,rp]|20
unit.value 6 DEC2 R &(R)RP[rc,rp]|21
wkld.bill.on.status 10 CHOICE L &(R)RP[rc,rp]B|11
Ì i 2
destinations
[category,number, dest.urn]
&(R)RP[rc,rp]D[rpDU]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dest.urn 2 URN R rpDU
any.text 1 YN L VAL=IF{+@main[category,number]T[@format,@destination,"
VAL="] "Y";" "}
copies 2 PINT R &(R)RP[rc,rp]D[rpDU]|2
destination 15 FREE L &(R)RP[rc,rp]D[rpDU]|1
edit.text 1 YN L &(R)RP[rc,rp]D[rpDU]|3
format 10 FREE L &(R)RP[rc,rp]D[rpDU]|0
hold.form 9 CHOICE L &(R)RP[rc,rp]D[rpDU]|8
multiple.orders 1 YN L &(R)RP[rc,rp]D[rpDU]|7
print 1 CHOICE L &(R)RP[rc,rp]D[rpDU]|5
print.rule 10 FREE L RAD.RULE &(R)RP[rc,rp]D[rpDU]|6
type 3 FREE L &(R)RP[rc,rp]D[rpDU]|4
Ì i 2
lab.tests
[category,number, lab.test.num]
&(R)RP[rc,rp]LT[slt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
lab.test.num 9 URN L slt
lab.test.mne 15 FREE L &(R)RP[rc,rp]LT[slt]
Ì i 2
location.priorities
[category,number, location]
&(R)RP[rc,rp]LP[rpL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
location 10 FREE L MIS.LOCN rpL
loc.priority 1 CHOICE L &(R)RP[rc,rp]LP[rpL]|0
Ì i 2
materials
[category,number, material]
&(R)RP[rc,rp]M[rm]
Field Name Len Dat Typ J DPM Offset/Local/VAL
material 10 FREE L RAD.MAT rm
material.qty 3 PINT R &(R)RP[rc,rp]M[rm]|0
Ì i 2
mic.procs
[category,number, mic.proc.num]
&(R)RP[rc,rp]MP[smp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mic.proc.num 9 URN L smp
mic.proc.mne 15 FREE L &(R)RP[rc,rp]MP[smp]
Ì i 2
order.rules
[category,number, order.rule.q]
&(R)RP[rc,rp]OR[rpOR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
order.rule.q 2 PINT R rpOR
edit.order.rule 1 YN L &(R)RP[rc,rp]OR[rpOR]|1
order.rule 10 FREE L RAD.RULE &(R)RP[rc,rp]OR[rpOR]|0
Ì i 2
pom.rules
[category,number, pom.rule.q]
&(R)RP[rc,rp]POR[rpPOR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pom.rule.q 2 PINT R rpPOR
pom.rule 10 FREE L RAD.RULE &(R)RP[rc,rp]POR[rpPOR]|0
Ì i 2
print.text
[category,number, text.format,text.dest,text.urn]
&(R)RP[rc,rp]T[rpF,rpD,rpT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
text.format 10 FREE L rpF
text.dest 15 FREE L rpD
text.urn 2 URN L rpT
text 69 TEXT L &(R)RP[rc,rp]T[rpF,rpD,rpT]
text.out 69 FREE L VAL=@Text.out(@text)
Ì i 2
queries
[category,number, query]
&(R)RP[rc,rp]Q[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
query 10 FREE L MIS.QUERY ggv
query.resp.yn.comment 70 QRY.RESP L &(R)RP[rc,rp]Q[ggv]|5
query.response 70 QRY.RESP L &(R)RP[rc,rp]Q[ggv]|0
Ì i 2
queries.multiple
[category,number,query, query.resp.q]
&(R)RP[rc,rp]Q[ggv]M[ggvMQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
query.resp.q 3 PINT R ggvMQ
query.resp.mult 70 QRY.RESP L &(R)RP[rc,rp]Q[ggv]M[ggvMQ]|0
Ì i 2
restrict.to.sites
[category,number, restrict.to.site]
&(R)RP[rc,rp]RS[rsi]
Field Name Len Dat Typ J DPM Offset/Local/VAL
restrict.to.site 10 FREE L RAD.SITE rsi
Ì i 2
rooms
[category,number, room]
&(R)RP[rc,rp]R[rr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
room 10 FREE L RAD.ROOM rr
Ì i 2
sites
[category,number, site]
&(R)RP[rc,rp]S[rsi]
Field Name Len Dat Typ J DPM Offset/Local/VAL
site 10 FREE L RAD.SITE rsi
site.ask.quest 1 YN L &(R)RP[rc,rp]S[rsi]|1
site.dft.room 10 FREE L RAD.ROOM &(R)RP[rc,rp]S[rsi]|0
site.enter.findings 1 YN L &(R)RP[rc,rp]S[rsi]|3
site.enter.outcome 1 YN L &(R)RP[rc,rp]S[rsi]|4
site.enter.picture 1 YN L &(R)RP[rc,rp]S[rsi]|9
site.library.path 10 FREE L RAD.LIBPATH &(R)RP[rc,rp]S[rsi]|6
site.loc.data 0 FREE L VAL=@Color.use(@Z.color.labels)_IF{IF{@site.subjacket.
VAL=sort;@site.locator.code;@site.loc.sign.in.sts;@sit
VAL=e.library.path} @Z.check.mark.data;" "}_@Color.use
VAL=(@Z.color.data)
site.loc.edit 1 YN L &(R)RP[rc,rp]S[rsi]x
site.loc.sign.in.sts 10 CHOICE L &(R)RP[rc,rp]S[rsi]|7
site.locator.code 10 FREE L RAD.LC &(R)RP[rc,rp]S[rsi]|5
site.subjacket.sort 8 CHOICE L &(R)RP[rc,rp]S[rsi]|8
site.tech.screen 15 FREE L MIS.SCREEN &(R)RP[rc,rp]S[rsi]|2
Ì i 2
site.materials
[category,number,site, site.material]
&(R)RP[rc,rp]S[rsi]M[rm]
Field Name Len Dat Typ J DPM Offset/Local/VAL
site.material 10 FREE L RAD.MAT rm
site.material.qty 3 PINT R &(R)RP[rc,rp]S[rsi]M[rm]|0
Ì i 2
site.rooms
[category,number,site, site.room]
&(R)RP[rc,rp]S[rsi]R[rr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
site.room 10 FREE L RAD.ROOM rr
Ì i 2
sites1
[category,number, site1]
&(R)RP[rc,rp]S1[rsi]
Field Name Len Dat Typ J DPM Offset/Local/VAL
site1 10 FREE L RAD.SITE rsi
site.any.order.rules 1 FREE L &(R)RP[rc,rp]S1[rsi]|2
site.edit.order.rule 1 YN L &(R)RP[rc,rp]S1[rsi]|3
site.screen 15 FREE L MIS.SCREEN &(R)RP[rc,rp]S1[rsi]|0
Ì i 2
site.order.rules
[category,number,site1, site.order.rule.q]
&(R)RP[rc,rp]S1[rsi]SOR[rpSOR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
site.order.rule.q 2 PINT R rpSOR
site.order.rule 10 FREE L RAD.RULE &(R)RP[rc,rp]S1[rsi]SOR[rpSOR]|0
Ì i 2
sites2
[category,number, site2]
&(R)RP[rc,rp]S2[rsi]
Field Name Len Dat Typ J DPM Offset/Local/VAL
site2 10 FREE L RAD.SITE rsi
ccm.site.dur.req 1 CHOICE L &(R)RP[rc,rp]S2[rsi]|11
site.add.bill.proc.number 10 FREE L &(R)RP[rc,rp]S2[rsi]TB|3
site.add.price 9 MONEY R &(R)RP[rc,rp]S2[rsi]TB|2
site.add.time.block 4 HHMM L &(R)RP[rc,rp]S2[rsi]TB|1
site.bill.data 0 FREE L VAL=@Color.use(@Z.color.labels)_IF{@sites2:0XS @Z.chec
VAL=k.mark.data;" "}_@Color.use(@Z.color.data)
site.bill.edit 1 YN L &(R)RP[rc,rp]S2[rsi]x
site.bill.on.status 10 CHOICE L &(R)RP[rc,rp]S2[rsi]|0
site.bill.proc.number 10 FREE L &(R)RP[rc,rp]S2[rsi]|1
site.bill.wkld.status 10 CHOICE L &(R)RP[rc,rp]S2[rsi]|10
site.chg.no.bill.code 1 YN L &(R)RP[rc,rp]S2[rsi]|9
site.edit.flag 1 YN L &(R)RP[rc,rp]S2[rsi]|3
site.initial.time.block 4 HHMM L &(R)RP[rc,rp]S2[rsi]TB|0
site.pc.bill.proc.number 10 FREE L &(R)RP[rc,rp]S2[rsi]|5
site.pc.edit.flag 1 YN L &(R)RP[rc,rp]S2[rsi]|7
site.pc.price 9 MONEY R &(R)RP[rc,rp]S2[rsi]|6
site.performing.dr 1 CHOICE L &(R)RP[rc,rp]S2[rsi]|8
site.price 9 MONEY R &(R)RP[rc,rp]S2[rsi]|2
site.unit.value 6 DEC2 R &(R)RP[rc,rp]S2[rsi]|4
Ì i 2
views
[category,number, view]
&(R)RP[rc,rp]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)RP[rc,rp]V[rrv]|0
Ì i 2
workload.functions
[category,number, wl.function]
&(R)RP[rc,rp]WF[rwf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
wl.function 10 FREE L RAD.WFCN rwf
wl.func.count 2 INT R &(R)RP[rc,rp]WF[rwf]|0
Ì i 2
workload.unit.functions
[category,number, wl.unit.function]
&(R)RP[rc,rp]WU["F",rwf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
wl.unit.function 10 FREE L RAD.WFCN rwf
Index Files Subscripts/Physical Base
dept.x [dept,category]
&(R)RCD[rd,rc]
err.x [category,mnemonic]
&(R)RPE[rc,rpM]
lab.test.x [lab.test.num,category,number]
&(R)RPLT[slt,rc,rp]
mic.proc.x [mic.proc.num,category,number]
&(R)RPMP[smp,rc,rp]
mne.x [category,mnemonic,number] = active
&(R)RPM[rc,rpM,rp]
name.x [category,name,number] = active
&(R)RPN[rc,rpN,rp]
|
|
| | | | | | | | | | | | | | | | | | | | |