Ì i 2
lab.c.req.add.del.can.index (add.del.can.x)
[adc.date,adc.req.urn,adc.q]
:SCRX[scrA,scr,scrAQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
adc.date 8 DATE L scrA
adc.req.urn 10 URN L LAB.C.REQ scr
adc.q 1 PINT R scrAQ
adc.action 3 CHOICE L :SCRX[scrA,scr,scrAQ]|2
adc.bbk.exm 1 YN L :SCRX[scrA,scr,scrAQ]|10
adc.bbk.unit.urn 10 URN L LAB.B.UNIT :SCRX[scrA,scr,scrAQ]|9
adc.del.comment 50 FREE L VAL=@LAB.C.REQ.del.comment[@LAB.C.REQ.adc.del.comment.
VAL=q]
adc.del.comment.q 2 PINT R :SCRX[scrA,scr,scrAQ]|6
adc.mic.source 10 FREE L LAB.M.SRC :SCRX[scrA,scr,scrAQ]|7
adc.mic.spec.desc 10 FREE L LAB.M.SPDESC :SCRX[scrA,scr,scrAQ]|8
adc.mic.src.and.spdesc 21 FREE L VAL=@LAB.C.REQ.adc.mic.source_("\"_@LAB.C.REQ.adc.mic.
VAL=spec.desc'="\"'="\ ")
adc.module 1 CHOICE L :SCRX[scrA,scr,scrAQ]|0
adc.test 9 PDEC5 R :SCRX[scrA,scr,scrAQ]|1
adc.test.abbrev 15 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.adc.test,@LAB.C.REQ
VAL=.adc.module,"A")
adc.test.abbrev.and.count 18 FREE L VAL=@adc.test.abbrev_("\"_@adc.test.count'="\1"'="\-1"
VAL='="\0"'="\")
adc.test.bill.code 10 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.adc.test,@LAB.C.REQ
VAL=.adc.module,"B",LAB.C.REQ.urn,IF{@LAB.C.REQ.adc.mo
VAL=dule="U" @LAB.C.REQ.adc.bbk.unit.urn},@LAB.C.REQ.a
VAL=dc.bbk.exm="Y")
adc.test.count 2 PINT R :SCRX[scrA,scr,scrAQ]|5
adc.test.cpt.cd.and.type 23 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.adc.test,@LAB.C.REQ
VAL=.adc.module,"P",LAB.C.REQ.urn,@LAB.C.REQ.adc.bbk.u
VAL=nit.urn,@LAB.C.REQ.adc.bbk.exm="Y")
adc.test.name 30 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.adc.test,@LAB.C.REQ
VAL=.adc.module,"N")
adc.test.name.and.count 33 FREE L VAL=@adc.test.name_("\"_@adc.test.count'="\1"'="\-1"'=
VAL="\0"'="\")
adc.time 4 HHMM L :SCRX[scrA,scr,scrAQ]|4
adc.user 10 FREE L MIS.USER :SCRX[scrA,scr,scrAQ]|3
Ì i 2
lab.c.req.bill.adjust.index (adjust.x)
[adj.date,adj.req.urn,adj.q]
:SCRA[scrA,scr,scrAQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
adj.date 8 DATE L scrA
adj.req.urn 10 URN L LAB.C.REQ scr
adj.q 1 PINT R scrAQ
adj.action 6 FREE L :SCRA[scrA,scr,scrAQ]|2
adj.module 1 CHOICE L :SCRA[scrA,scr,scrAQ]|0
adj.spec.number 17 FREE L :SCRA[scrA,scr,scrAQ]|3
adj.test 9 PDEC5 R :SCRA[scrA,scr,scrAQ]|1
adj.test.abbrev 15 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.adj.test,@LAB.C.REQ
VAL=.adj.module,"A")
adj.test.bill.code 10 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.adj.test,@LAB.C.REQ
VAL=.adj.module,"B",LAB.C.REQ.urn)
adj.test.cpt.cd.and.type 23 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.adj.test,@LAB.C.REQ
VAL=.adj.module,"P",LAB.C.REQ.urn)
adj.test.name 30 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.adj.test,@LAB.C.REQ
VAL=.adj.module,"N")
Ì i 2
lab.c.req.bar.code.index (bar.code.x)
[bar.code]
:SCRC[scrBC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bar.code 8 FREE L scrBC
bar.code.client 10 FREE L MIS.DOC.DICT :SCRC[scrBC]|1
bar.code.req 10 URN L LAB.C.REQ :SCRC[scrBC]|0
Ì i 2
lab.c.req.form.for.client (form.for.client)
[form.client]
/SSXC[ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
form.client 10 FREE L MIS.DOC.DICT ggg
bill.client.name 30 FREE L VAL=@MIS.DOC.DICT.name[@LAB.C.REQ.ref.bill.client]
client.city.state.zip 35 FREE L VAL=(@MIS.DOC.DICT.city_",",@MIS.DOC.DICT.state,@MIS.D
VAL=OC.DICT.zip)
client.lab.code 12 FREE L VAL=@MIS.DOC.DICT.lab.code
client.mult.city 30 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(MIS.DOC.DICT.mnem
VAL=onic,LAB.C.REQ.urn,"C")
client.mult.city.st.zip 44 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(MIS.DOC.DICT.mnem
VAL=onic,LAB.C.REQ.urn,"CSZ")
client.mult.fax 18 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(MIS.DOC.DICT.mnem
VAL=onic,LAB.C.REQ.urn,"F")
client.mult.phone 18 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(MIS.DOC.DICT.mnem
VAL=onic,LAB.C.REQ.urn,"P")
client.mult.state 2 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(MIS.DOC.DICT.mnem
VAL=onic,LAB.C.REQ.urn,"ST")
client.mult.street.addr 30 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(MIS.DOC.DICT.mnem
VAL=onic,LAB.C.REQ.urn,"S")
client.mult.street.addr2 30 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(MIS.DOC.DICT.mnem
VAL=onic,LAB.C.REQ.urn,"S2")
client.mult.zip 10 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(MIS.DOC.DICT.mnem
VAL=onic,LAB.C.REQ.urn,"Z")
client.name 30 FREE L VAL=@MIS.DOC.DICT.name
client.street.address 30 FREE L VAL=@MIS.DOC.DICT.address
form.bar.code 8 BAR.CODE L /SSXC[ggg]|0
form.bar.code.number 8 FREE L /SSXC[ggg]|0
sub.from.name 30 FREE L VAL=@MIS.DOC.DICT.name[@LAB.C.REQ.ref.sub.from]
Ì i 2
lab.c.req.forms.printed (forms)
[forms.client,forms.form]
:SCRF[ggg,ssx]
Field Name Len Dat Typ J DPM Offset/Local/VAL
forms.client 10 FREE L MIS.DOC.DICT ggg
forms.form 10 FREE L LAB.C.FORM ssx
forms.last.count 4 PINT R :SCRF[ggg,ssx]|1
forms.last.date 8 DATE L :SCRF[ggg,ssx]|0
forms.last.user 10 FREE L MIS.USER :SCRF[ggg,ssx]|2
forms.total 6 PINT R :SCRF[ggg,ssx]|3
Ì i 2
lab.c.req.icd.code.temp.file (icd.code.temp)
[urn.icd,icd.t.code]
/SCRICD[scr,drb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn.icd 10 URN L LAB.C.REQ scr
icd.t.code 7 URN L drb
icd.t.name 60 FREE L /SCRICD[scr,drb]|0
Ì i 2
lab.c.requisition.file (main)
[urn]
?SCR[scr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 10 URN L scr
autofax.yn 1 YN L ?SCR[scr]|22
bar.code.number 8 PINT R ?SCR[scr]|16
call 1 YN L ?SCR[scr]|21
cancel.date 8 DATE L VAL=IF{@LAB.C.REQ.cancel.seconds^XX %Z.date.in.magic(X
VAL=X)}
cancel.seconds 9 PINT R ?SCR[scr]|11
cancel.time 4 HHMM L VAL=IF{@LAB.C.REQ.cancel.seconds^XX %Z.time.out(XX)}
cancel.user 10 FREE L MIS.USER ?SCR[scr]|6
client 10 FREE L MIS.DOC.DICT ?SCR[scr]|2
collected.by.req 10 FREE L MIS.USER ?SCR[scr]CD|13
collection.category.req 10 FREE L LAB.C.COL.CAT ?SCR[scr]CD|15
collection.date.req 8 DATE L ?SCR[scr]|13
collection.seconds.req 9 PINT R VAL=%Z.date.clinical(@collection.date.req)*86400+(@col
VAL=lection.time.req?0N$2*60+(@collection.time.req?0N%
VAL=1)*60)
collection.time.req 4 HHMMU L ?SCR[scr]CD|4
computed.pt.bill.type 1 CHOICE L VAL=IF{@ADM.PAT.refer.client[@patient]'="U" "C";@ADM.P
VAL=AT.refer.client[@patient]="U";"P"}
enter.date 8 DATE L ?SCR[scr]|3
enter.date.and.time 13 FREE L VAL=%Z.date.out(@LAB.C.REQ.enter.date)_"-"_@LAB.C.REQ.
VAL=enter.time
enter.time 4 HHMM L ?SCR[scr]|4
enter.user 10 FREE L MIS.USER ?SCR[scr]|5
entered.priority 1 FREE L ?SCR[scr]|18
future.mri.urn 25 URN L VAL=/MRI.FUTURE.URN
future.req 10 URN L
id 30 URN L LAB.C.REQ VAL=@LAB.C.REQ.number
last.bill.date 8 DATE L ?SCR[scr]|19
last.edit.date 8 DATE L ?SCR[scr]|7
last.edit.time 4 HHMM L ?SCR[scr]|8
last.edit.user 10 FREE L MIS.USER ?SCR[scr]|9
mri.action 1 FREE L VAL=/MRI.ACT
mri.display 43 FREE L VAL=/MRI
new.req 15 FREE L
number 8 FREE L ?SCR[scr]|0
oe.other.provider 10 FREE L MIS.DOC.DICT
old.or.cancel.req 15 FREE L
old.req 15 FREE L
order.infce 10 FREE L LAB.C.INFC.DICT?SCR[scr]|15
order.site 10 FREE L LAB.C.SITE ?SCR[scr]|12
order.source 10 FREE L MIS.SOURCE ?SCR[scr]|23
patient 30 FREE L LAB.C.PAT ?SCR[scr]|1
pt.activity 1 YN L ?SCR[scr]PT|7
pt.age 7 AGE L ?SCR[scr]PT|2
pt.bill.type 1 CHOICE L ?SCR[scr]PT|4
pt.birthdate 8 BDATE L ?SCR[scr]PT|1
pt.edit 1 YN L ?SCR[scr]PT|6
pt.fin.class 10 FREE L MIS.FIN.CLASS ?SCR[scr]PT|5
pt.medical.record 50 FREE L ?SCR[scr]PT|8
pt.name 30 FREE L ?SCR[scr]PT|0
pt.sex 1 CHOICE L ?SCR[scr]PT|3
pt.soc.sec.number 14 FREE L ?SCR[scr]PT|9
received.by.req 10 FREE L MIS.USER ?SCR[scr]CD|14
received.date.req 8 DATE L ?SCR[scr]CD|9
received.req YN L ?SCR[scr]CD|12
received.time.req 4 HHMMU L ?SCR[scr]CD|10
ref.assign.mpi 1 FREE L VAL=/REF.ASSIGN.MPI
ref.attend.phys 30 FREE L ?SCR[scr]REF|7
ref.batch 30 FREE L ?SCR[scr]REF|10
ref.bill.client 10 FREE L MIS.DOC.DICT ?SCR[scr]REF|11
ref.collect.date 8 DATE L ?SCR[scr]REF|0
ref.collect.time 4 HHMMU L ?SCR[scr]REF|1
ref.collected.by 10 FREE L ?SCR[scr]REF|8
ref.future.req.urn 10 URN L ?SCR[scr]REF|16
ref.mult.addr.urn 2 PINT R ?SCR[scr]REF|13
ref.orig.bill.client 10 FREE L MIS.DOC.DICT ?SCR[scr]REF|12
ref.priority 1 FREE L ?SCR[scr]REF|9
ref.pt.id 15 FREE L ?SCR[scr]REF|6
ref.received 1 YN L ?SCR[scr]REF|5
ref.received.by 10 FREE L MIS.USER ?SCR[scr]REF|4
ref.received.date 8 DATE L ?SCR[scr]REF|2
ref.received.time 4 HHMMU L ?SCR[scr]REF|3
ref.req 15 FREE L
ref.sub.from 10 FREE L MIS.DOC.DICT ?SCR[scr]REF|14
ref.web.user 20 FREE L MIS.WEB.USER ?SCR[scr]REF|15
reference.req 1 YN L ?SCR[scr]|17
status 11 FREE L VAL=IF{@LAB.C.REQ.cancel.user "*CANCELLED*";LAB.C.REQ.
VAL=urn "ENTERED"}
subm.doc.name 30 FREE L VAL=IF{@LAB.C.REQ.subm.doc.non.dict.name;@MIS.DOC.DICT
VAL=.name[@LAB.C.REQ.subm.doctor]}
subm.doc.non.dict.name 30 FREE L ?SCR[scr]|10
subm.doctor 10 FREE L MIS.DOC.DICT ?SCR[scr]|2
suppress.pci 1 YN L ?SCR[scr]|20
unit 10 URN L LAB.B.UNIT ?SCR[scr]|14
wkld.function.req 10 FREE L LAB.C.WL.FUNC ?SCR[scr]CD|18
Ì € i 2
lab.c.req.bbk.ordered.products (bbk.ordered.products)
[urn, bbk.product]
?SCR[scr]U[sbp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bbk.product 15 FREE L LAB.B.PROD sbp
bbk.product.can.count 2 PINT R ?SCR[scr]U[sbp]|6
bbk.product.chrgd.count 2 PINT R ?SCR[scr]U[sbp]|1
bbk.product.count 2 PINT R ?SCR[scr]U[sbp]|0
bbk.product.cume.charge 10 MONEY R ?SCR[scr]U[sbp]|2
bbk.product.diagnosis 10 FREE L ?SCR[scr]U[sbp]|7
bbk.product.ent.date 8 DATE L VAL=%Z.date.in.magic(@LAB.C.REQ.bbk.product.entered)
bbk.product.ent.time 4 HHMM L VAL=%Z.time.out(@LAB.C.REQ.bbk.product.entered)
bbk.product.entered 10 PINT R ?SCR[scr]U[sbp]|11
bbk.product.oe.other.pvdr 10 FREE L MIS.DOC.DICT ?SCR[scr]U[sbp]|9
bbk.product.ord.src 10 FREE L MIS.SOURCE ?SCR[scr]U[sbp]|10
bbk.product.order.status 10 FREE L ?SCR[scr]U[sbp]|8
bbk.product.priority 1 FREE L ?SCR[scr]U[sbp]|5
bbk.product.spec.list 30 FREE L ?SCR[scr]U[sbp]|4
bbk.product.subm.doctor 10 FREE L MIS.DOC.DICT ?SCR[scr]U[sbp]|3
Ì € i 2
lab.c.req.bbk.ord.prod.queries (bbk.ordered.prod.queries)
[urn,bbk.product, bbk.prod.query]
?SCR[scr]U[sbp]Q[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bbk.prod.query 10 FREE L MIS.QUERY ggv
bbk.prod.query.def 1 FREE L ?SCR[scr]U[sbp]Q[ggv]|0
Ì € i 2
lab.c.req.bbk.ordered.tests (bbk.ordered.tests)
[urn, bbk.test]
?SCR[scr]R[sbt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bbk.test 9 PDEC5 R LAB.B.TEST sbt
bbk.test.adj.count 2 PINT R ?SCR[scr]R[sbt]|1
bbk.test.bill.ct.exm 2 INT R ?SCR[scr]R[sbt]|13
bbk.test.bill.ct.mxm 2 INT R ?SCR[scr]R[sbt]|12
bbk.test.bt.spec.list 30 FREE L ?SCR[scr]R[sbt]|17
bbk.test.count 2 PINT R ?SCR[scr]R[sbt]|0
bbk.test.cume.charge 10 MONEY R ?SCR[scr]R[sbt]|2
bbk.test.cume.charge.exm 10 MONEY R ?SCR[scr]R[sbt]|11
bbk.test.default.profile 10 FREE L ?SCR[scr]R[sbt]|7
bbk.test.diagnosis 10 FREE L ?SCR[scr]R[sbt]|8
bbk.test.ent.date 8 DATE L VAL=%Z.date.in.magic(@LAB.C.REQ.bbk.test.entered)
bbk.test.ent.time 4 HHMM L VAL=%Z.time.out(@LAB.C.REQ.bbk.test.entered)
bbk.test.entered 10 PINT R ?SCR[scr]R[sbt]|16
bbk.test.exm.res.billing 1 FREE L ?SCR[scr]R[sbt]|10
bbk.test.oe.other.prvdr 10 FREE L MIS.DOC.DICT ?SCR[scr]R[sbt]|14
bbk.test.ord.src 10 FREE L MIS.SOURCE ?SCR[scr]R[sbt]|15
bbk.test.order.status 10 FREE L ?SCR[scr]R[sbt]|9
bbk.test.priority 1 FREE L ?SCR[scr]R[sbt]|6
bbk.test.qns.nd.count 2 PINT R ?SCR[scr]R[sbt]|3
bbk.test.spec.list 30 FREE L ?SCR[scr]R[sbt]|5
bbk.test.subm.doctor 10 FREE L MIS.DOC.DICT ?SCR[scr]R[sbt]|4
Ì € i 2
lab.c.req.bbk.ord.test.prods (bbk.ordered.test.products)
[urn,bbk.test, bbk.test.product]
?SCR[scr]R[sbt]P[sbp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bbk.test.product 15 FREE L LAB.B.PROD sbp
bbk.test.product.count 2 PINT R ?SCR[scr]R[sbt]P[sbp]|0
Ì € i 2
lab.c.req.bbk.ord.test.queries (bbk.ordered.test.queries)
[urn,bbk.test, bbk.test.query]
?SCR[scr]R[sbt]Q[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bbk.test.query 10 FREE L MIS.QUERY ggv
bbk.test.query.def 1 FREE L ?SCR[scr]R[sbt]Q[ggv]|0
Ì € i 2
lab.c.req.bbk.ord.tests.compon (bbk.ordered.tests.compon)
[urn,bbk.test, bbk.test.component]
?SCR[scr]R[sbt]C[sbt2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bbk.test.component 9 PDEC5 R LAB.B.TEST sbt2
bbk.test.comp.count 2 PINT R ?SCR[scr]R[sbt]C[sbt2]|0
bbk.test.comp.cume.charge 10 MONEY R ?SCR[scr]R[sbt]C[sbt2]|1
bbk.test.comp.qns.nd.ct 2 PINT R ?SCR[scr]R[sbt]C[sbt2]|2
Ì € i 2
lab.c.req.bbk.ord.tests.xm.rpl (bbk.ordered.tests.xm.repl)
[urn,bbk.test, bbk.test.xm.repl]
?SCR[scr]R[sbt]XT[sbtXc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bbk.test.xm.repl 9 PDEC5 R LAB.B.TEST sbtXc
bbk.test.xm.repl.cnt.exm 2 PINT R ?SCR[scr]R[sbt]XT[sbtXc]|1
bbk.test.xm.repl.count 2 PINT R ?SCR[scr]R[sbt]XT[sbtXc]|0
Ì € i 2
lab.c.req.bbk.specimens (bbk.specimens)
[urn, bbk.spec.px,bbk.spec.q]
?SCR[scr]N[spxB,scrB]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bbk.spec.px 2 FREE L spxB
bbk.spec.q 1 PINT R scrB
bbk.spec.cancelled 1 YN L ?SCR[scr]N[spxB,scrB]|1
bbk.spec.link.id 2 FREE L ?SCR[scr]N[spxB,scrB]|2
bbk.spec.urn 30 URN L LAB.B.SPEC ?SCR[scr]N[spxB,scrB]|0
Ì € i 2
lab.c.req.bill.codes (bill.codes)
[urn, bc.mod.and.test]
?SCR[scr]BC[scrBC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bc.mod.and.test 10 FREE L scrBC
bill.code 10 FREE L ?SCR[scr]BC[scrBC]|0
cpt.code 12 FREE L ?SCR[scr]BC[scrBC]|1
cpt.code.type 10 FREE L ?SCR[scr]BC[scrBC]|2
exm.bill.code 10 FREE L ?SCR[scr]BC[scrBC]|3
exm.cpt.code 12 FREE L ?SCR[scr]BC[scrBC]|4
exm.cpt.code.type 10 FREE L ?SCR[scr]BC[scrBC]|5
Ì € i 2
lab.c.req.bill.codes.bbk.units (bill.codes.bbk.units)
[urn,bc.mod.and.test, bc.bbk.unit]
?SCR[scr]BC[scrBC]BU[sbu]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bc.bbk.unit 10 URN L LAB.B.UNIT sbu
bc.bbk.unit.bill.code 10 FREE L ?SCR[scr]BC[scrBC]BU[sbu]|0
bc.bbk.unit.cpt.code 12 FREE L ?SCR[scr]BC[scrBC]BU[sbu]|1
bc.bbk.unit.cpt.type 10 FREE L ?SCR[scr]BC[scrBC]BU[sbu]|2
Ì € i 2
lab.c.req.billing (billing)
[urn, bill.date,bill.q]
?SCR[scr]B[scrD,scrQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bill.date 8 DATE L scrD
bill.q 2 PINT R scrQ
bill.action 6 FREE L ?SCR[scr]B[scrD,scrQ]|2
bill.bbk.unit 10 URN L LAB.B.UNIT ?SCR[scr]B[scrD,scrQ]|9
bill.charge 10 SMONEY R ?SCR[scr]B[scrD,scrQ]|4
bill.collection.date 8 DATE L VAL=%LAB.C.REQ.bill.collection.date(@LAB.C.REQ.patient
VAL=,{LAB.C.REQ.urn,LAB.C.REQ.bill.date,LAB.C.REQ.bill
VAL=.q})
bill.count 2 SINT R ?SCR[scr]B[scrD,scrQ]|3
bill.exm 1 YN L ?SCR[scr]B[scrD,scrQ]|12
bill.mic.proc.of.sensi 9 PDEC5 R LAB.M.PROC ?SCR[scr]B[scrD,scrQ]|10
bill.on.date 8 DATE L ?SCR[scr]B[scrD,scrQ]|8
bill.specimen 8 URN L ?SCR[scr]B[scrD,scrQ]|7
bill.subm.doctor 10 FREE L MIS.DOC.DICT ?SCR[scr]B[scrD,scrQ]|11
bill.svc.date.sent 8 DATE L ?SCR[scr]B[scrD,scrQ]|13
bill.test.proc 9 PDEC5 R ?SCR[scr]B[scrD,scrQ]|1
bill.test.proc.abbrev 15 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.bill.test.proc,@LAB
VAL=.C.REQ.bill.type,"A")
bill.test.proc.abbrv.w.ct 17 FREE L VAL=@LAB.C.REQ.bill.test.proc.abbrev_("\"_@LAB.C.REQ.b
VAL=ill.count'="\1"'="\-1"'="\0"'="\")
bill.test.proc.bill.code 10 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.bill.test.proc,@LAB
VAL=.C.REQ.bill.type,"B",@LAB.C.REQ.urn,@LAB.C.REQ.bil
VAL=l.bbk.unit,IF{@LAB.C.REQ.bill.exm="Y" 1;""})
bill.test.proc.mnemonic 15 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.bill.test.proc,@LAB
VAL=.C.REQ.bill.type,"M")
bill.test.proc.name 30 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.bill.test.proc,@LAB
VAL=.C.REQ.bill.type,"N")
bill.test.proc.name.w.ct 32 FREE L VAL=@LAB.C.REQ.bill.test.proc.name_("\"_@LAB.C.REQ.bil
VAL=l.count'="\1"'="\-1"'="\0"'="\")
bill.time 4 HHMM L ?SCR[scr]B[scrD,scrQ]|5
bill.type 1 CHOICE L ?SCR[scr]B[scrD,scrQ]|0
bill.user 10 FREE L MIS.USER ?SCR[scr]B[scrD,scrQ]|6
Ì € i 2
lab.c.req.billing.professional (billing.professional)
[urn,bill.date,bill.q, billing.prof]
?SCR[scr]B[scrD,scrQ]P[scrBP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
billing.prof 11 FREE L scrBP
billing.prof.date 8 DATE L ?SCR[scr]B[scrD,scrQ]P[scrBP]|0
Ì € i 2
lab.c.req.cancel.comments (cancel.comments)
[urn, cancel.comment.q]
?SCR[scr]CC[scrc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cancel.comment.q 2 PINT R scrc
cancel.comment 60 FREE L ?SCR[scr]CC[scrc]
Ì € i 2
lab.c.req.containers (containers)
[urn, container]
?SCR[scr]CON[sck]
Field Name Len Dat Typ J DPM Offset/Local/VAL
container 10 FREE L LAB.C.CONTAINERsck
container.cnt 2 PINT R ?SCR[scr]CON[sck]|0
Ì € i 2
lab.c.req.deleted.orders (deleted.orders)
[urn, del.q]
?SCR[scr]DO[scrDO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
del.q 2 PINT R scrDO
del.comment 50 FREE L ?SCR[scr]DO[scrDO]|6
del.count 2 PINT R ?SCR[scr]DO[scrDO]|2
del.date 8 DATE L ?SCR[scr]DO[scrDO]|3
del.date.mmdd 5 FREE L VAL=%Z.date.out(@del.date,"",5)
del.module 1 CHOICE L ?SCR[scr]DO[scrDO]|1
del.source 10 FREE L LAB.M.SRC ?SCR[scr]DO[scrDO]|7
del.source.and.spec.desc 21 FREE L VAL=IF{@del.module="M" @del.source_("\"_@del.spec.desc
VAL='="\"'="\ ")}
del.spec.desc 10 FREE L LAB.M.SPDESC ?SCR[scr]DO[scrDO]|8
del.test.proc 10 URN L ?SCR[scr]DO[scrDO]|0
del.test.proc.abb.src.ct 40 FREE L VAL=@LAB.C.REQ.del.test.proc.abbrev_("\"_@LAB.C.REQ.de
VAL=l.count'="\1"'="\")_("\"_@LAB.C.REQ.del.source'="\
VAL=")_("\"_@LAB.C.REQ.del.spec.desc'="\")
del.test.proc.abbrev 15 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.del.test.proc,@LAB.
VAL=C.REQ.del.module,"A")
del.test.proc.abbrev.w.ct 17 FREE L VAL=@LAB.C.REQ.del.test.proc.abbrev_("\"_@LAB.C.REQ.de
VAL=l.count'="\1"'="\")
del.test.proc.mne.src.ct 40 FREE L VAL=@LAB.C.REQ.del.test.proc.mnemonic_("\"_@LAB.C.REQ.
VAL=del.count'="\1"'="\")_("\"_@LAB.C.REQ.del.source'=
VAL="\")_("\"_@LAB.C.REQ.del.spec.desc'="\")
del.test.proc.mne.w.ct 18 FREE L VAL=@LAB.C.REQ.del.test.proc.mnemonic_("\"_@LAB.C.REQ.
VAL=del.count'="\1"'="\")
del.test.proc.mnemonic 15 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.del.test.proc,@LAB.
VAL=C.REQ.del.module,"M")
del.test.proc.nam.src.ct 54 FREE L VAL=@LAB.C.REQ.del.test.proc.name_("\"_@LAB.C.REQ.del.
VAL=count'="\1"'="\")_("\"_@LAB.C.REQ.del.source'="\")
VAL=_("\"_@LAB.C.REQ.del.spec.desc'="\")
del.test.proc.name 30 FREE L VAL=%LAB.C.REQ.req.test(@LAB.C.REQ.del.test.proc,@LAB.
VAL=C.REQ.del.module,"N")
del.test.proc.name.w.ct 32 FREE L VAL=@LAB.C.REQ.del.test.proc.name_("\"_@LAB.C.REQ.del.
VAL=count'="\1"'="\")
del.time 4 HHMM L ?SCR[scr]DO[scrDO]|4
del.user 10 FREE L MIS.USER ?SCR[scr]DO[scrDO]|5
Ì € i 2
lab.c.req.doctor.address.info (doctor.address.info)
[urn, doc.address.doctor]
?SCR[scr]DA[ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
doc.address.doctor 10 FREE L ggg
doc.address.1 45 FREE L ?SCR[scr]DA[ggg]|0
doc.address.2 45 FREE L ?SCR[scr]DA[ggg]|1
doc.address.3 45 FREE L ?SCR[scr]DA[ggg]|2
doc.address.4 45 FREE L ?SCR[scr]DA[ggg]|3
Ì € i 2
lab.c.req.doctor.email.address (doctor.email.addresses)
[urn,doc.address.doctor, doc.email.q]
?SCR[scr]DA[ggg]E[scrEQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
doc.email.q 2 PINT R scrEQ
doc.email 40 FREE L ?SCR[scr]DA[ggg]E[scrEQ]|0
Ì € i 2
lab.c.req.duplicate.order.rsns (duplicate.order.reasons)
[urn, dup.module.and.test]
?SCR[scr]DUP[scrDU]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dup.module.and.test 32 FREE L scrDU
dup.reason 50 FREE L ?SCR[scr]DUP[scrDU]|0
dup.req.number 8 FREE L VAL=@number[@dup.req.urn]
dup.req.urn 10 URN L LAB.C.REQ ?SCR[scr]DUP[scrDU]|2
dup.source 10 FREE L LAB.M.SRC VAL=@LAB.C.REQ.dup.module.and.test#"1\"
dup.source.and.spdesc 21 FREE L VAL=@LAB.C.REQ.dup.module.and.test'$"1\"
dup.spec.desc 10 FREE L LAB.M.SPDESC VAL=@LAB.C.REQ.dup.module.and.test#"2\"
dup.test.abbrev 15 FREE L VAL=%LAB.C.REQ.req.test(LAB.C.REQ.dup.module.and.test%
VAL=0#"0\",LAB.C.REQ.dup.module.and.test#0,"A")
dup.test.mnemonic 15 FREE L VAL=%LAB.C.REQ.req.test(LAB.C.REQ.dup.module.and.test%
VAL=0#"0\",LAB.C.REQ.dup.module.and.test#0,"M")
dup.test.name 30 FREE L VAL=%LAB.C.REQ.req.test(LAB.C.REQ.dup.module.and.test%
VAL=0#"0\",LAB.C.REQ.dup.module.and.test#0,"N")
dup.user 10 FREE L MIS.USER ?SCR[scr]DUP[scrDU]|1
Ì € i 2
lab.c.req.icd (icd)
[urn, icd.module,icd.order]
?SCR[scr]I[scrim,scrio]
Field Name Len Dat Typ J DPM Offset/Local/VAL
icd.module 1 CHOICE L scrim
icd.order 9 FREE L scrio
icd.code 7 FREE L ?SCR[scr]I[scrim,scrio]|0
icd.comment 60 FREE L ?SCR[scr]I[scrim,scrio]|4
icd.doctor 10 FREE L MIS.DOC.DICT ?SCR[scr]I[scrim,scrio]|2
icd.prof.or.grp.test.num 9 FREE L ?SCR[scr]I[scrim,scrio]|5
icd.status 1 FREE L ?SCR[scr]I[scrim,scrio]|1
icd.user 10 FREE L MIS.USER ?SCR[scr]I[scrim,scrio]|3
Ì € i 2
lab.c.req.cpt.modifiers (cpt.modifiers)
[urn,icd.module,icd.order, cpt.query]
?SCR[scr]I[scrim,scrio]Q[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cpt.query 10 FREE L MIS.QUERY ggv
cpt.query.answer 75 QRY.RESP L ?SCR[scr]I[scrim,scrio]Q[ggv]|0
cpt.query.text FREE L VAL=@MIS.QUERY.text[LAB.C.REQ.cpt.query]
Ì € i 2
lab.c.req.icd.modifiers (icd.modifiers)
[urn,icd.module,icd.order, icd.mod.q]
?SCR[scr]I[scrim,scrio]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 ?SCR[scr]I[scrim,scrio]M[gzmQ]|0
Ì € i 2
lab.c.req.infce.data (infce.data)
[urn, infce]
?SCR[scr]ID[ssid]
Field Name Len Dat Typ J DPM Offset/Local/VAL
infce 10 FREE L LAB.C.INFC.DICTssid
infce.ov.number 15 FREE L ?SCR[scr]ID[ssid]|0
Ì € i 2
lab.c.req.lab.ordered.tests (lab.ordered.tests)
[urn, lab.test]
?SCR[scr]T[slt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
lab.test 9 PDEC5 R LAB.L.TEST slt
lab.test.adj.count 2 PINT R ?SCR[scr]T[slt]|1
lab.test.count 2 PINT R ?SCR[scr]T[slt]|0
lab.test.cume.charge 10 MONEY R ?SCR[scr]T[slt]|2
lab.test.default.profile 10 FREE L ?SCR[scr]T[slt]|8
lab.test.diagnosis 10 FREE L ?SCR[scr]T[slt]|9
lab.test.ent.date 8 DATE L VAL=%Z.date.in.magic(@LAB.C.REQ.lab.test.entered)
lab.test.ent.time 4 HHMM L VAL=%Z.time.out(@LAB.C.REQ.lab.test.entered)
lab.test.entered 10 PINT R ?SCR[scr]T[slt]|13
lab.test.oe.other.prvdr 10 FREE L MIS.DOC.DICT ?SCR[scr]T[slt]|11
lab.test.ord.src 10 FREE L MIS.SOURCE ?SCR[scr]T[slt]|12
lab.test.order.status 10 FREE L ?SCR[scr]T[slt]|10
lab.test.prefix 2 FREE L ?SCR[scr]T[slt]|5
lab.test.priority 1 FREE L ?SCR[scr]T[slt]|7
lab.test.qns.nd.count 2 PINT R ?SCR[scr]T[slt]|3
lab.test.spec.list 30 FREE L ?SCR[scr]T[slt]|6
lab.test.subm.doctor 10 FREE L MIS.DOC.DICT ?SCR[scr]T[slt]|4
Ì € i 2
lab.c.req.lab.ord.test.queries (lab.ordered.test.queries)
[urn,lab.test, lab.test.query]
?SCR[scr]T[slt]Q[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
lab.test.query 10 FREE L MIS.QUERY ggv
lab.test.query.def 1 FREE L ?SCR[scr]T[slt]Q[ggv]|0
Ì € i 2
lab.c.req.ord.tests.compon (lab.ordered.tests.compon)
[urn,lab.test, lab.test.component]
?SCR[scr]T[slt]C[slt2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
lab.test.component 9 PDEC5 R LAB.L.TEST slt2
lab.test.comp.count 2 PINT R ?SCR[scr]T[slt]C[slt2]|0
lab.test.comp.cume.charge 10 MONEY R ?SCR[scr]T[slt]C[slt2]|1
lab.test.comp.qns.nd.ct 2 PINT R ?SCR[scr]T[slt]C[slt2]|2
Ì € i 2
lab.c.req.lab.specimens (lab.specimens)
[urn, lab.spec.px,lab.spec.q]
?SCR[scr]L[spxL,scrL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
lab.spec.px 2 FREE L spxL
lab.spec.q 1 PINT R scrL
lab.spec.cancelled 1 YN L ?SCR[scr]L[spxL,scrL]|1
lab.spec.link.id 2 FREE L ?SCR[scr]L[spxL,scrL]|2
lab.spec.urn 30 URN L LAB.L.SPEC ?SCR[scr]L[spxL,scrL]|0
Ì € i 2
lab.c.req.markers (markers)
[urn, marker]
?SCR[scr]MK[ssk]
Field Name Len Dat Typ J DPM Offset/Local/VAL
marker 10 FREE L LAB.C.MARK ssk
Ì € i 2
lab.c.req.mic.ord.proc.queries (mic.ordered.proc.queries)
[urn, mic.proc.for.query,mic.proc.query]
?SCR[scr]OPQ[smp,ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mic.proc.for.query 9 PDEC5 R LAB.M.PROC smp
mic.proc.query 10 FREE L MIS.QUERY ggv
mic.proc.query.def 1 FREE L ?SCR[scr]OPQ[smp,ggv]|0
Ì € i 2
lab.c.req.mic.ordered.procs (mic.ordered.procs)
[urn, mic.proc.source,mic.proc.spec.desc,mic.proc]
?SCR[scr]P[smt,smf,smp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mic.proc.source 10 FREE L LAB.M.SRC smt
mic.proc.spec.desc 10 FREE L LAB.M.SPDESC smf
mic.proc 9 PDEC5 R LAB.M.PROC smp
mic.proc.adj.count 2 PINT R ?SCR[scr]P[smt,smf,smp]|1
mic.proc.count 2 PINT R ?SCR[scr]P[smt,smf,smp]|0
mic.proc.cume.charge 10 MONEY R ?SCR[scr]P[smt,smf,smp]|2
mic.proc.default.profile 10 FREE L ?SCR[scr]P[smt,smf,smp]|7
mic.proc.diagnosis 10 FREE L ?SCR[scr]P[smt,smf,smp]|8
mic.proc.ent.date 8 DATE L VAL=%Z.date.in.magic(@LAB.C.REQ.mic.proc.entered)
mic.proc.ent.time 4 HHMM L VAL=%Z.time.out(@LAB.C.REQ.mic.proc.entered)
mic.proc.entered 10 PINT R ?SCR[scr]P[smt,smf,smp]|12
mic.proc.oe.other.prvdr 10 FREE L MIS.DOC.DICT ?SCR[scr]P[smt,smf,smp]|10
mic.proc.ord.src 10 FREE L MIS.SOURCE ?SCR[scr]P[smt,smf,smp]|11
mic.proc.order.status 10 FREE L ?SCR[scr]P[smt,smf,smp]|9
mic.proc.priority 1 FREE L ?SCR[scr]P[smt,smf,smp]|6
mic.proc.qns.nd.count 2 PINT R ?SCR[scr]P[smt,smf,smp]|3
mic.proc.spec.list 30 FREE L ?SCR[scr]P[smt,smf,smp]|5
mic.proc.subm.doctor 10 FREE L MIS.DOC.DICT ?SCR[scr]P[smt,smf,smp]|4
Ì € i 2
lab.c.req.mic.ord.procs.compon (mic.ordered.procs.compon)
[urn,mic.proc.source,mic.proc.spec.desc,mic.proc, mic.proc.component]
?SCR[scr]P[smt,smf,smp]C[smp2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mic.proc.component 9 PDEC5 R LAB.M.PROC smp2
mic.proc.comp.count 2 PINT R ?SCR[scr]P[smt,smf,smp]C[smp2]|0
mic.proc.comp.cume.charge 10 MONEY R ?SCR[scr]P[smt,smf,smp]C[smp2]|1
mic.proc.comp.qns.nd.ct 2 PINT R ?SCR[scr]P[smt,smf,smp]C[smp2]|2
Ì € i 2
lab.c.req.mic.specimens (mic.specimens)
[urn, mic.spec.px,mic.spec.source,mic.spec.desc,mic.spec.q]
?SCR[scr]M[spxM,smt,smf,scrM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mic.spec.px 2 FREE L spxM
mic.spec.source 10 FREE L LAB.M.SRC smt
mic.spec.desc 10 FREE L LAB.M.SPDESC smf
mic.spec.q 1 PINT R scrM
mic.spec.cancelled 1 YN L ?SCR[scr]M[spxM,smt,smf,scrM]|1
mic.spec.link.id 2 FREE L ?SCR[scr]M[spxM,smt,smf,scrM]|2
mic.spec.urn 30 URN L LAB.M.SPEC ?SCR[scr]M[spxM,smt,smf,scrM]|0
Ì € i 2
msp.codes (msp.codes)
[urn, msp.module,msp.bill.test]
?SCR[scr]MSP[scrMM,scrMT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
msp.module 1 CHOICE L scrMM
msp.bill.test 10 FREE L scrMT
msp.fac.code 5 FREE L ?SCR[scr]MSP[scrMM,scrMT]|0
msp.subfac.code 5 FREE L ?SCR[scr]MSP[scrMM,scrMT]|1
msp.subfac.code.calc 5 FREE L VAL=%LAB.C.REQ.calc.msp.codes(IF{LAB.C.REQ.urn;/LAB.C.
VAL=REQ.urn})
Ì € i 2
lab.c.req.order.queries (order.queries)
[urn, order.query]
?SCR[scr]Q[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
order.query 10 FREE L MIS.QUERY ggv
order.answer 75 QRY.RESP L ?SCR[scr]Q[ggv]|0
order.query.map.date 8 DATE L ?SCR[scr]Q[ggv]INIT
order.query.text 60 FREE L VAL=@MIS.QUERY.text[LAB.C.REQ.order.query]
Ì € i 2
lab.c.req.order.queries.mult (order.queries.mult)
[urn,order.query, order.query.seq.no]
?SCR[scr]Q[ggv]M[ggvN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
order.query.seq.no 3 PINT R ggvN
order.answer.mult 75 QRY.RESP L ?SCR[scr]Q[ggv]M[ggvN]|0
Ì € i 2
lab.c.req.osr.letters (osr.letters)
[urn, osrl.client,osrl.date]
?SCR[scr]OSRL[ggg,scrLD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
osrl.client 10 FREE L MIS.DOC.DICT ggg
osrl.date 8 DATE L scrLD
osrl.format 10 FREE L LAB.C.FORM ?SCR[scr]OSRL[ggg,scrLD]|0
osrl.time 9 PINT R ?SCR[scr]OSRL[ggg,scrLD]|2
osrl.user 10 FREE L MIS.USER ?SCR[scr]OSRL[ggg,scrLD]|1
Ì € i 2
lab.c.req.other.doctors (other.doctors)
[urn, other.doctor]
?SCR[scr]DR[ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
other.doctor 10 FREE L MIS.DOC.DICT ggg
other.doc.edit.addr 1 YN L ?SCR[scr]DR[ggg]|2
other.doc.mult.addr.urn 2 PINT R ?SCR[scr]DR[ggg]|1
other.doc.name 30 FREE L VAL=IF{@LAB.C.REQ.other.doc.non.dict.name;@MIS.DOC.DIC
VAL=T.name[@LAB.C.REQ.other.doctor]}
other.doc.non.dict.name 30 FREE L ?SCR[scr]DR[ggg]|0
Ì € i 2
lab.c.req.pth.ordered.procs (pth.ordered.procs)
[urn, pth.proc]
?SCR[scr]J[spt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pth.proc 10 URN L LAB.P.TERM spt
pth.proc.count 2 PINT R ?SCR[scr]J[spt]|0
pth.proc.cume.charge 10 MONEY R ?SCR[scr]J[spt]|1
pth.proc.diagnosis 10 FREE L ?SCR[scr]J[spt]|3
pth.proc.ent.date 8 DATE L VAL=%Z.date.in.magic(@LAB.C.REQ.pth.proc.entered)
pth.proc.ent.time 4 HHMM L VAL=%Z.time.out(@LAB.C.REQ.pth.proc.entered)
pth.proc.entered 10 PINT R ?SCR[scr]J[spt]|6
pth.proc.logic 0 FREE L ?SCR[scr]J[spt]x
pth.proc.oe.other.prvdr 10 FREE L MIS.DOC.DICT ?SCR[scr]J[spt]|5
pth.proc.order.status 10 FREE L ?SCR[scr]J[spt]|4
pth.proc.subm.doctor 10 FREE L MIS.DOC.DICT ?SCR[scr]J[spt]|2
Ì € i 2
lab.c.req.pth.ord.proc.queries (pth.ordered.proc.queries)
[urn,pth.proc, pth.proc.query]
?SCR[scr]J[spt]Q[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pth.proc.query 10 FREE L MIS.QUERY ggv
pth.proc.query.def 1 FREE L ?SCR[scr]J[spt]Q[ggv]|0
Ì € i 2
lab.c.req.pth.ord.procs.compon (pth.ordered.procs.compon)
[urn,pth.proc, pth.proc.component]
?SCR[scr]J[spt]C[spt2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pth.proc.component 10 URN L LAB.P.TERM spt2
pth.proc.comp.count 2 PINT R ?SCR[scr]J[spt]C[spt2]|0
pth.proc.comp.cume.charge 10 MONEY R ?SCR[scr]J[spt]C[spt2]|1
Ì € i 2
lab.c.req.pth.specimens (pth.specimens)
[urn, pth.spec.q]
?SCR[scr]H[scrP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pth.spec.q 1 PINT R scrP
pth.spec.cancelled 1 YN L ?SCR[scr]H[scrP]|1
pth.spec.urn 30 URN L LAB.P.SPEC ?SCR[scr]H[scrP]|0
Ì € i 2
lab.c.req.ref.diagnoses (ref.diagnoses)
[urn, ref.diag.q]
?SCR[scr]REF["DX",scrDQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ref.diag.q 2 PINT R scrDQ
ref.diag 7 FREE L MIS.DIAG ?SCR[scr]REF["DX",scrDQ]|0
Ì € i 2
lab.c.req.outreach.queries (ref.queries)
[urn, ref.query]
?SCR[scr]REF["Q",ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ref.query 10 FREE L MIS.QUERY ggv
ref.response 60 FREE L ?SCR[scr]REF["Q",ggv]|0
Ì € i 2
lab.c.req.transmission.doctors (transmission.doctors)
[urn, trans.doctor]
?SCR[scr]TD[ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
trans.doctor 10 FREE L MIS.DOC.DICT ggg
Ì € i 2
lab.c.req.doctor.transmissions (doctor.transmissions)
[urn,trans.doctor, doctor.trans.to]
?SCR[scr]TD[ggg]DT[gggTD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
doctor.trans.to 10 FREE L MIS.DOC.DICT gggTD
doctor.trans.addr.1 45 FREE L ?SCR[scr]TD[ggg]DT[gggTD]|3
doctor.trans.addr.2 45 FREE L ?SCR[scr]TD[ggg]DT[gggTD]|4
doctor.trans.addr.3 45 FREE L ?SCR[scr]TD[ggg]DT[gggTD]|5
doctor.trans.addr.4 45 FREE L ?SCR[scr]TD[ggg]DT[gggTD]|6
doctor.trans.copies 1 PINT R ?SCR[scr]TD[ggg]DT[gggTD]|9
doctor.trans.dev.type 15 FREE L ?SCR[scr]TD[ggg]DT[gggTD]|8
doctor.trans.line.class 15 FREE L MIS.LINE.CLASS ?SCR[scr]TD[ggg]DT[gggTD]|1
doctor.trans.phone 24 FREE L ?SCR[scr]TD[ggg]DT[gggTD]|2
doctor.trans.report 10 FREE L LAB.C.RPT ?SCR[scr]TD[ggg]DT[gggTD]|7
doctor.trans.to.name 30 FREE L ?SCR[scr]TD[ggg]DT[gggTD]|0
Ì i 2
lab.c.req.oe.log (oe.log)
[oe.date.time,oe.q]
:SCROE[scroD,scroQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
oe.date.time 9 FREE L scroD
oe.q 4 PINT R scroQ
oe.date 8 DATE L VAL=%Z.date.in.magic(oe.date.time)
oe.db 12 FREE L MIS.APPL :SCROE[scroD,scroQ]|4
oe.message 50 FREE L :SCROE[scroD,scroQ]|5
oe.order 10 URN L OE.ORD :SCROE[scroD,scroQ]|3
oe.patient 30 FREE L LAB.C.PAT :SCROE[scroD,scroQ]|2
oe.time 4 HHMM L VAL=%Z.time.out(oe.date.time)
oe.type 1 CHOICE L :SCROE[scroD,scroQ]|0
oe.type.ok 1 YN L VAL=IF{L(c.oe.types,@oe.type)<L(c.oe.types) "Y";"N"
VAL=}
oe.types 5 FREE L
oe.user 10 FREE L MIS.USER :SCROE[scroD,scroQ]|1
Ì i 2
lab.c.req.ord.tests.display (ordered.tests.display)
[ord.test.line.req.urn,ord.test.line.q]
/SCRo[scr,slrO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ord.test.line.req.urn 10 URN L LAB.C.REQ scr
ord.test.line.q 2 PINT R slrO
oe.order.numbers 30 FREE L VAL=%LAB.C.REQ.oe.order.num.line(urn)
ord.test.line 72 FREE L /SCRo[scr,slrO]
Ì i 2
lab.c.req.reflex.index (reflex.x)
[reflex.date,reflex.patient,reflex.q]
?SCRR[scrrD,aa,scrrQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reflex.date 8 DATE L scrrD
reflex.patient 30 FREE L LAB.C.PAT aa
reflex.q 2 PINT R scrrQ
next.reflex.q 2 FREE L VAL=@Lock(@Root(@LAB.C.REQ.reflex.x)),@Root(@LAB.C.REQ
VAL=.reflex.x)+1^@Root(@LAB.C.REQ.reflex.x)^LAB.C.REQ.
VAL=reflex.q,@Unlock(@Root(@LAB.C.REQ.reflex.x))
reflex.group 10 FREE L LAB.C.OE.GRP ?SCRR[scrrD,aa,scrrQ]|7
reflex.module 1 CHOICE L ?SCRR[scrrD,aa,scrrQ]|2
reflex.new.req 10 URN L LAB.C.REQ ?SCRR[scrrD,aa,scrrQ]|4
reflex.req 10 URN L LAB.C.REQ ?SCRR[scrrD,aa,scrrQ]|1
reflex.time 4 HHMM L ?SCRR[scrrD,aa,scrrQ]|5
reflex.trigger.spec 9 FREE L ?SCRR[scrrD,aa,scrrQ]|3
reflex.type 1 CHOICE L ?SCRR[scrrD,aa,scrrQ]|0
reflex.user 10 FREE L MIS.USER ?SCRR[scrrD,aa,scrrQ]|6
Ì € i 2
lab.c.req.reflex.bbk.orders (reflex.bbk.orders)
[reflex.date,reflex.patient,reflex.q, reflex.bbk.order]
?SCRR[scrrD,aa,scrrQ]BO[sbt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reflex.bbk.order 9 PDEC5 R LAB.B.TEST sbt
Ì € i 2
lab.c.req.reflex.bbk.specs (reflex.bbk.specs)
[reflex.date,reflex.patient,reflex.q, reflex.bbk.spec.no]
?SCRR[scrrD,aa,scrrQ]B[sbsN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reflex.bbk.spec.no 13 FREE L sbsN
reflex.bbk.spec.urn 30 URN L LAB.B.SPEC ?SCRR[scrrD,aa,scrrQ]B[sbsN]|0
Ì € i 2
lab.c.req.reflex.lab.orders (reflex.lab.orders)
[reflex.date,reflex.patient,reflex.q, reflex.lab.order]
?SCRR[scrrD,aa,scrrQ]LO[slt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reflex.lab.order 9 PDEC5 R LAB.L.TEST slt
Ì € i 2
lab.c.req.reflex.lab.specs (reflex.lab.specs)
[reflex.date,reflex.patient,reflex.q, reflex.lab.spec.no]
?SCRR[scrrD,aa,scrrQ]L[slsN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reflex.lab.spec.no 17 FREE L slsN
reflex.lab.spec.urn 30 URN L LAB.L.SPEC ?SCRR[scrrD,aa,scrrQ]L[slsN]|0
Ì € i 2
lab.c.req.reflex.mic.orders (reflex.mic.orders)
[reflex.date,reflex.patient,reflex.q, reflex.mic.order,reflex.mic.source,reflex.mic.spec.desc]
?SCRR[scrrD,aa,scrrQ]MO[smp,smt,smf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reflex.mic.order 9 PDEC5 R LAB.M.PROC smp
reflex.mic.source 10 FREE L LAB.M.SRC smt
reflex.mic.spec.desc 10 FREE L LAB.M.SPDESC smf
Ì € i 2
lab.c.req.reflex.mic.specs (reflex.mic.specs)
[reflex.date,reflex.patient,reflex.q, reflex.mic.spec.no]
?SCRR[scrrD,aa,scrrQ]M[smsN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reflex.mic.spec.no 17 FREE L smsN
reflex.mic.spec.urn 30 URN L LAB.M.SPEC ?SCRR[scrrD,aa,scrrQ]M[smsN]|0
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
lab.c.req.bill.activity.index [bill.date,patient,urn]
bill.x :SCRB[scrD,aa,scr]
lab.c.req.client.index [client,patient,urn]
client.x ?SCRCL[ggg,aa,scr]
lab.c.req.doctor.index [subm.doctor,patient,urn]
doctor.x :SCRCL[ggg,aa,scr]
lab.c.req.duplicate.order.x [activity.date,number,dup.module.and.test] = urn
dup.order.x :SCRDP[adt,scrN,scrDU]
lab.c.req.icd.index [enter.date,urn]
icd.x ?SCRIX[scrd,scr]
lab.c.req.incomplete.pt.index [patient,urn]
incomplete.pt.x :SCRIR[aa,scr]
lab.c.req.infce.number.index [infce.ov.number,infce,urn]
infce.number.x :SCRI[ssidf,ssid,scr]
lab.c.req.marker.x [marker,urn]
marker.x ?SCRM[ssk,scr]
lab.c.req.number.index [number] = urn
number.x ?SCRN[scrN]
lab.c.req.patient.index [patient,number] = urn
patient.x ?SCRP[aa,scrN]
lab.c.req.rpt.list.by.pat [rpt.patient.name,rpt.patient.acct.number,number] = urn
rpt.pat.req.list.x /SCRp[aaNM,aaAN,scrN]
|
|
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | |