Ì i 2
lab.m.specimen.file (main)
[urn]
?SMS[sms]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 30 URN L sms
activity.date 8 DATE L
age 7 FREE L VAL=%Z.age(@LAB.C.PAT.computed.birthdate,@collection.d
VAL=ate)
age.at.collection 7 FREE L VAL=%Z.age.format.strip(@normals.age)
age.sex 9 FREE L VAL=(@age_"/"_@LAB.C.PAT.sex'="/")
answer 10 FREE L
bar.code.number 11 FREE L ?SMS[sms]A|10
cancel.comments.file 0 FREE L ?SMS[sms]CC
cancel.spec.wkld.func 10 FREE L LAB.C.WL.FUNC
cancelled.date 8 DATE L VAL=%Z.date.in.magic(@LAB.M.SPEC.cancelled.time.int)
cancelled.time 4 HHMM L VAL=%Z.time.out(@LAB.M.SPEC.cancelled.time.int)
cancelled.time.int 9 PINT R ?SMS[sms]A|5
cancelled.user 10 FREE L MIS.USER ?SMS[sms]A|4
cmpl.active.workbatches 1 YN L VAL=%LAB.M.SPEC.cmpl.workbatch.display(IF{LAB.M.SPEC.u
VAL=rn;/LAB.M.SPEC.urn})
cmpl.closed.workbatches 1 YN L VAL=%LAB.M.SPEC.cmpl.closed.workbatch.display(IF{LAB.M
VAL=.SPEC.urn;@LAB.M.SPEC.urn})
cmpl.deleted.orders 1 YN L VAL=%LAB.M.SPEC.cmpl.deleted.orders(IF{LAB.M.SPEC.urn;
VAL=@LAB.M.SPEC.urn})
cmpl.ord.procs.ext 1 YN L VAL=%LAB.M.SPEC.ord.cmpl(LAB.M.SPEC.urn,"EU")
cmpl.ord.procs.ext.conf 1 YN L VAL=%LAB.M.SPEC.ord.cmpl(LAB.M.SPEC.urn,"EA")
cmpl.ord.procs.int 1 YN L VAL=%LAB.M.SPEC.ord.cmpl(LAB.M.SPEC.urn,"IU")
cmpl.ord.procs.int.conf 1 YN L VAL=%LAB.M.SPEC.ord.cmpl(LAB.M.SPEC.urn,"IA")
cmpl.procs.setup.int 1 YN L VAL=%LAB.M.SPEC.procs.setup.cmpl(LAB.M.SPEC.urn,"IU")
cmpl.procs.setup.int.conf 1 YN L VAL=%LAB.M.SPEC.procs.setup.cmpl(LAB.M.SPEC.urn,"IA")
coll.time.sort 5 FREE L ?SMS[sms]A|16
collected.by 10 FREE L MIS.USER ?SMS[sms]|13
collection.batch 10 PINT R LAB.C.CB ?SMS[sms]|20
collection.batch.date 8 DATE L ?SMS[sms]A|6
collection.batch.id 24 FREE L VAL=@LAB.M.SPEC.collection.category_IF{@LAB.M.SPEC.col
VAL=lection.batch.date^XX " "_%Z.date.out(XX)_" #"_@LA
VAL=B.M.SPEC.collection.batch.number}
collection.batch.number 3 PINT R ?SMS[sms]A|7
collection.category 10 FREE L LAB.C.COL.CAT ?SMS[sms]|15
collection.date 8 DATE L ?SMS[sms]|3
collection.date.and.time 13 FREE L VAL=%Z.date.out(@LAB.M.SPEC.collection.date)_" "_@LAB.
VAL=M.SPEC.collection.time
collection.date.ee 8 DATE L ?SMS[sms]|3
collection.date.tform 5 FREE L VAL=IF{@collection.date^X "T"_IF{X=@.today "";%Z.date.
VAL=sub(X,@.today)^X<0;"+"_X}}
collection.time 4 HHMMU L ?SMS[sms]|4
collection.year 4 PINT R VAL=@LAB.M.SPEC.collection.date$4
comments.file 0 FREE L ?SMS[sms]C
db.px 3 FREE L ?SMS[sms]A|21
donor.number 8 FREE L VAL=IF{@MIS.PAT.status="BB DON" @MIS.PAT.name$8}
entered.date 8 DATE L VAL=%Z.date.in.magic(@LAB.M.SPEC.entered.offset)
entered.offset 9 PINT R ?SMS[sms]|16
entered.time 4 HHMM L VAL=%Z.time.out(@LAB.M.SPEC.entered.offset)
entered.user 10 FREE L MIS.USER ?SMS[sms]A|3
entered.year 4 PINT R VAL=%Z.date.in.magic(@LAB.M.SPEC.entered.offset)$4
func 10 FREE L LAB.C.WL.FUNC
id 17 URN L LAB.M.SPEC VAL=@LAB.M.SPEC.number
id.any.external 30 FREE L
id.any.internal 30 FREE L
id.for.ee.result 30 FREE L
id.not.can.int.bc 30 FREE L
id.not.cancelled.internal 30 FREE L
id.spec 30 FREE L
label.col.or.spec 1 CHOICE L
label.format 10 FREE L LAB.C.COL.LBL
last.activity 8 PINT R ?SMS[sms]|22
last.activity.date 8 DATE L VAL=IF{@last.activity^XX %Z.date.in.magic(XX+@entered.
VAL=offset)}
last.activity.time 4 HHMM L VAL=IF{@last.activity^XX %Z.time.out(XX+@entered.offse
VAL=t)}
last.file.no.act.date 8 DATE L VAL=IF{@last.file.no.activity^XX %Z.date.in.magic(XX+@
VAL=entered.offset)}
last.file.no.act.time 4 HHMM L VAL=IF{@last.file.no.activity^XX %Z.time.out(XX+@enter
VAL=ed.offset)}
last.file.no.act.user 10 FREE L MIS.USER ?SMS[sms]A|20
last.file.no.activity 8 PINT R ?SMS[sms]A|19
last.sent.to.emr 9 PINT R ?SMS[sms]|23
linked.spec.number 13 FREE L ?SMS[sms]A|22
linked.spec.urn 30 PINT R ?SMS[sms]A|23
mic.st.earliest.date 8 DATE L VAL=(%LAB.M.SPEC.setup.times(@LAB.M.SPEC.urn,1)#0P)
mic.st.earliest.time 4 HHMM L VAL=(%LAB.M.SPEC.setup.times(@LAB.M.SPEC.urn,1)#1P)
mic.st.most.recent.date 8 DATE L VAL=(%LAB.M.SPEC.setup.times(@LAB.M.SPEC.urn,2)#0P)
mic.st.most.recent.time 4 HHMM L VAL=(%LAB.M.SPEC.setup.times(@LAB.M.SPEC.urn,2)#1P)
module 1 CHOICE L
module.and.number 18 FREE L
nameof.sort.x 10 FREE L
no.reportables 1 YN L ?SMS[sms]A|12
normals.age 8 AGE.SORT L ?SMS[sms]|17
number 17 FREE L ?SMS[sms]|0
number.part 7 PINT R ?SMS[sms]|8
number.part.only 7 PINT R ?SMS[sms]|8
number.sort FREE L VAL=@collection.date_@number_urn
number.without.db.px 13 FREE L VAL=IF{@LAB.M.SPEC.number#"2:"_.=. @LAB.M.SPEC.number;
VAL=@LAB.M.SPEC.number#"0:"_(@LAB.M.SPEC.number%"1:")}
oe.order.date.time 60 FREE L VAL=%LAB.M.SPEC.oe.order.date.user(urn,1)
oe.order.date.time.user 60 FREE L VAL=%LAB.M.SPEC.oe.order.date.user(urn,3)
oe.order.numbers 30 FREE L VAL=%LAB.M.SPEC.oe.order.number(urn)
oe.order.user 60 FREE L VAL=%LAB.M.SPEC.oe.order.date.user(urn,2)
order.location 10 FREE L MIS.LOCN.DICT ?SMS[sms]A|9
order.site 10 FREE L LAB.C.SITE ?SMS[sms]A|8
original.coll.date 8 DATE L ?SMS[sms]A|18
original.coll.time 4 HHMM L ?SMS[sms]A|17
patient 30 FREE L LAB.C.PAT ?SMS[sms]|1
patient.header.line 92 FREE L VAL=%LAB.C.PAT.hdr.line(IF{LAB.M.SPEC.patient;@LAB.M.S
VAL=PEC.patient})
patient.header.line.name 92 FREE L VAL=%LAB.C.PAT.hdr.line(IF{LAB.M.SPEC.patient;@LAB.M.S
VAL=PEC.patient},"N")
prefix 2 FREE L ?SMS[sms]|7
preview.mode 1 FREE L
priority 1 FREE L ?SMS[sms]|6
prompt 10 FREE L LAB.M.PROMPT
queued.for.emr 1 YN L ?SMS[sms]|24
receive.site 10 FREE L LAB.C.SITE ?SMS[sms]A|11
received 1 YN L ?SMS[sms]|12
received.by 10 FREE L MIS.USER ?SMS[sms]|14
received.date 8 DATE L ?SMS[sms]|9
received.date.and.time 13 FREE L VAL=IF{@LAB.M.SPEC.received.date %Z.date.out(@LAB.M.SP
VAL=EC.received.date)_" "_@LAB.M.SPEC.received.time}
received.px 2 FREE L ?SMS[sms]A|13
received.time 4 HHMMU L ?SMS[sms]|10
received.year 4 PINT R VAL=@LAB.M.SPEC.received.date$4
recv.version 2 PINT R ?SMS[sms]A|27
report.last.printed 8 PINT R ?SMS[sms]|21
report.last.printed.date 8 DATE L VAL=IF{@report.last.printed^XX %Z.date.in.magic(XX+@en
VAL=tered.offset)}
report.last.printed.time 4 HHMM L VAL=IF{@report.last.printed^XX %Z.time.out(XX+@entered
VAL=.offset)}
req.number 8 FREE L VAL=@LAB.C.REQ.number[@LAB.M.SPEC.req.urn]
req.urn 10 URN L LAB.C.REQ ?SMS[sms]|5
reuse.mic 1 YN L
rpt.any.ord.queries.cmpld 1 YN L VAL=IF{+@rpt.order.queries[urn,""] "Y";"N"}
rpt.any.procs.cmpld 1 YN L VAL=IF{@Last(LAB.M.SPEC.rpt.proc) "Y";"N"}
rpt.argument.string 0 FREE L VAL=/ARG
rpt.argument.string.1 1 YN L VAL=IF{Q(LAB.M.SPEC.urn,"EOA3","ANRDGV",0,2,"")^@rpt.a
VAL=rgument.string,"Y"}
rpt.argument.string.2 1 YN L VAL=IF{Q(LAB.M.SPEC.urn,"EPA1","ANRDGV",0,2,"")^@rpt.a
VAL=rgument.string,"Y"}
rpt.argument.string.3 1 YN L VAL=IF{Q(LAB.M.SPEC.urn,"EOU3","ADGV",0,2,"")^@rpt.arg
VAL=ument.string,"Y"}
rpt.argument.string.4 1 YN L VAL=IF{Q(LAB.M.SPEC.urn,"IPU1","URDGV",0,2,"")^@rpt.ar
VAL=gument.string,"Y"}
rpt.cmpl.ord.queries.all 1 YN L VAL=%LAB.M.SPEC.cmpl.ord.queries(LAB.M.SPEC.urn)
rpt.cmpl.ord.queries.ext 1 YN L VAL=%LAB.M.SPEC.cmpl.ord.queries(LAB.M.SPEC.urn,"E")
rpt.compile.copies.to 1 YN L VAL=%LAB.C.RB.copies.to("")
rpt.compile.markers 1 YN L VAL=IF{%LAB.C.MARK.strings(LAB.M.SPEC.urn,"M",^@Root(@
VAL=LAB.M.SPEC.markers.display)[LAB.M.SPEC.urn],IF{MKR
VAL=LEN;72}),"Y"}
rpt.compile.other.doctors 1 YN L VAL=%LAB.C.REQ.cmpl.oth.docs(LAB.M.SPEC.urn,@LAB.M.SPE
VAL=C.req.urn)
rpt.compile.procs 1 YN L VAL=%LAB.M.SPEC.rpt.cmpl("")X
rpt.compile.procs.1 1 YN L VAL=IF{@LAB.M.SPEC.rpt.argument.string.1,@LAB.M.SPEC.r
VAL=pt.compile.procs,"Y"}
rpt.compile.procs.2 1 YN L VAL=IF{@LAB.M.SPEC.rpt.argument.string.2,@LAB.M.SPEC.r
VAL=pt.compile.procs,"Y"}
rpt.compile.procs.3 1 YN L VAL=IF{@LAB.M.SPEC.rpt.argument.string.3,@LAB.M.SPEC.r
VAL=pt.compile.procs,"Y"}
rpt.compile.procs.4 1 YN L VAL=IF{@LAB.M.SPEC.rpt.argument.string.4,@LAB.M.SPEC.r
VAL=pt.compile.procs,"Y"}
rpt.compile.procs.orgs 1 YN L VAL=IF{%LAB.M.SPEC.procs.orgs(^@Root(@LAB.M.SPEC.procs
VAL=.orgs.display)[LAB.M.SPEC.urn],LAB.M.SPEC.urn,IF{O
VAL=LEN;60},1),"Y"}
rpt.print.proc.hdrs 0 FREE L VAL=%LAB.M.SPEC.result.lines.hdrs("")
rpt.print.procs 0 FREE L VAL=%LAB.M.SPEC.result.lines("")X
rpt.print.procs.1 0 FREE L VAL=IF{@LAB.M.SPEC.rpt.argument.string.1,@LAB.M.SPEC.r
VAL=pt.print.procs,""}
rpt.print.procs.2 0 FREE L VAL=IF{@LAB.M.SPEC.rpt.argument.string.2,@LAB.M.SPEC.r
VAL=pt.print.procs,""}
rpt.print.procs.3 0 FREE L VAL=IF{@LAB.M.SPEC.rpt.argument.string.3,@LAB.M.SPEC.r
VAL=pt.print.procs,""}
rpt.print.procs.4 0 FREE L VAL=IF{@LAB.M.SPEC.rpt.argument.string.4,@LAB.M.SPEC.r
VAL=pt.print.procs,""}
rpt.setup.proc.hdrs 0 FREE L VAL=@LAB.M.SPEC.rpt.test.hdrs^/HN
rpt.specimen.sort.key 20 FREE L
rpt.specimen.sort.key2 20 FREE L
rpt.specimen.sort.key3 20 FREE L
set.last.activity 0 FREE L VAL=@.sd-@LAB.M.SPEC.entered.offset^@LAB.M.SPEC.last.a
VAL=ctivity
set.last.file.no.activity 0 FREE L VAL=@.sd-@LAB.M.SPEC.entered.offset^@LAB.M.SPEC.last.f
VAL=ile.no.activity,@.user^@LAB.M.SPEC.last.file.no.ac
VAL=t.user
set.report.last.printed 0 FREE L VAL=@.sd-@LAB.M.SPEC.entered.offset^@LAB.M.SPEC.report
VAL=.last.printed
set.spec.as.reviewed 0 FREE L VAL=%LAB.M.SPEC.review.rpt.M.mark.as.reviewed(LAB.M.SP
VAL=EC.urn)
source 10 FREE L LAB.M.SRC ?SMS[sms]A|0
source.abbrev 10 FREE L VAL=@LAB.M.SRC.abbrev[@LAB.M.SPEC.source]
source.and.spec.desc 21 FREE L VAL=@LAB.M.SRC.abbrev[@LAB.M.SPEC.source]_IF{@LAB.M.SP
VAL=EC.spec.desc>" " "\"_@LAB.M.SPDESC.abbrev[@LAB.
VAL=M.SPEC.spec.desc]}
source.category 10 FREE L LAB.M.SCAT VAL=@LAB.M.SRC.category[@LAB.M.SPEC.source]
source.name 30 FREE L VAL=@LAB.M.SRC.name[@LAB.M.SPEC.source]
spec.desc 10 FREE L LAB.M.SPDESC ?SMS[sms]A|1
spec.desc.abbrev 10 FREE L VAL=@LAB.M.SPDESC.abbrev[@LAB.M.SPEC.spec.desc]
spec.desc.name 30 FREE L VAL=@LAB.M.SPDESC.name[@LAB.M.SPEC.spec.desc]
specimen.header.line 92 FREE L VAL=%LAB.M.SPEC.hdr.line(LAB.M.SPEC.urn)
status 4 CHOICE L ?SMS[sms]|2
status.before.cancel 4 CHOICE L ?SMS[sms]|19
status.choice.string 40 FREE L VAL=",CAN,ORD,COLB,RECD,WKST,UNV,RES,COMP"
subm.doc.addr.and.phone 91 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.M.SPEC.subm.doctor,@LAB.
VAL=M.SPEC.req.urn,"AP")
subm.doc.address 75 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.M.SPEC.subm.doctor,@LAB.
VAL=M.SPEC.req.urn,"A")
subm.doc.city 30 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.M.SPEC.subm.doctor,@LAB.
VAL=M.SPEC.req.urn,"C")
subm.doc.email 40 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.M.SPEC.subm.doctor,@LAB.
VAL=M.SPEC.req.urn,"E")
subm.doc.fax 18 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.M.SPEC.subm.doctor,@LAB.
VAL=M.SPEC.req.urn,"F")
subm.doc.lis.city 30 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.M.SPEC.subm.
VAL=doctor,@LAB.M.SPEC.req.urn,"C")
subm.doc.lis.city.st.zip 44 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.M.SPEC.subm.
VAL=doctor,@LAB.M.SPEC.req.urn,"CSZ")
subm.doc.lis.email 40 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.M.SPEC.subm.
VAL=doctor,@LAB.M.SPEC.req.urn,"E")
subm.doc.lis.fax 18 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.M.SPEC.subm.
VAL=doctor,@LAB.M.SPEC.req.urn,"F")
subm.doc.lis.phone 18 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.M.SPEC.subm.
VAL=doctor,@LAB.M.SPEC.req.urn,"P")
subm.doc.lis.state 2 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.M.SPEC.subm.
VAL=doctor,@LAB.M.SPEC.req.urn,"ST")
subm.doc.lis.street.addr 30 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.M.SPEC.subm.
VAL=doctor,@LAB.M.SPEC.req.urn,"S")
subm.doc.lis.street.addr2 30 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.M.SPEC.subm.
VAL=doctor,@LAB.M.SPEC.req.urn,"S2")
subm.doc.lis.zip 10 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.M.SPEC.subm.
VAL=doctor,@LAB.M.SPEC.req.urn,"Z")
subm.doc.name 30 FREE L VAL=IF{@LAB.M.SPEC.subm.doc.non.dict.name;@MIS.DOC.DIC
VAL=T.name[@LAB.M.SPEC.subm.doctor]}
subm.doc.non.dict.name 30 FREE L ?SMS[sms]A|2
subm.doc.phone 15 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.M.SPEC.subm.doctor,@LAB.
VAL=M.SPEC.req.urn,"P")
subm.doc.state 2 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.M.SPEC.subm.doctor,@LAB.
VAL=M.SPEC.req.urn,"ST")
subm.doc.street 30 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.M.SPEC.subm.doctor,@LAB.
VAL=M.SPEC.req.urn,"S")
subm.doc.zip 10 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.M.SPEC.subm.doctor,@LAB.
VAL=M.SPEC.req.urn,"Z")
subm.doctor 10 FREE L MIS.DOC.DICT ?SMS[sms]|11
uncoll.sample.types 1 YN L ?SMS[sms]A|29
unit 10 URN L LAB.B.UNIT ?SMS[sms]A|15
unit.number 14 FREE L VAL=@LAB.B.UNIT.unit.number[@unit]
unreceived.px 2 FREE L ?SMS[sms]A|14
unrecv.sample.types 1 YN L ?SMS[sms]A|28
wkld.function 10 FREE L LAB.C.WL.FUNC ?SMS[sms]|18
worksheet 10 FREE L LAB.M.WS
yn 1 YN L
Ì € i 2
lab.m.spec.alert.procs (alert.procs)
[urn, alert.proc]
?SMS[sms]AP[smp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
alert.proc 9 PDEC5 R LAB.M.PROC smp
alert.proc.recv.seconds 9 PINT R ?SMS[sms]AP[smp]|0
alert.proc.res.seconds 9 PINT R ?SMS[sms]AP[smp]|1
Ì € i 2
lab.m.spec.bar.codes (bar.codes)
[urn, other.bar.code.number]
?SMS[sms]BC[smsbc]
Field Name Len Dat Typ J DPM Offset/Local/VAL
other.bar.code.number 11 FREE L smsbc
Ì € i 2
lab.m.spec.cancel.comments (cancel.comments)
[urn, cancel.comment.q]
?SMS[sms]CC[slsCC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cancel.comment.q 2 PINT R slsCC
any.cancel.comments 1 YN L VAL=IF{@LAB.M.SPEC.cancel.comments[LAB.M.SPEC.urn,1] "
VAL=Y";"N"}
any.extern.cancel.comment 1 YN L VAL=IF{""^YY^XX,DO{+@LAB.M.SPEC.cancel.comments[LAB.M.
VAL=SPEC.urn,YY]^YY&'XX IF{@LAB.M.SPEC.cancel.comment[
VAL=YY]:0S#0="@";"Y"^XX}},""^YY,XX;"N"}
cancel.comment 60 FREE L ?SMS[sms]CC[slsCC]
cancel.comment.external 1 YN L VAL=IF{@LAB.M.SPEC.cancel.comment:0S#0="@" "N";"Y"}
cancel.comment.internal 1 YN L VAL=IF{@LAB.M.SPEC.cancel.comment:0S#0="@" "Y";"N"}
Ì € i 2
lab.m.spec.changed.numbers (changed.numbers)
[urn, changed.number.q]
?SMS[sms]CNU[smsCQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
changed.number.q 2 PINT R smsCQ
changed.collection.year 2 PINT R ?SMS[sms]CNU[smsCQ]|0
changed.number.db 3 FREE L ?SMS[sms]CNU[smsCQ]|3
changed.number.part 5 PINT R ?SMS[sms]CNU[smsCQ]|2
changed.prefix 2 FREE L ?SMS[sms]CNU[smsCQ]|1
last.changed.number 17 FREE L VAL=IF{@changed.collection.year[1] %LAB.M.SPEC.changed
VAL=.num(urn)}
Ì € i 2
lab.m.spec.clinical.alerts (clinical.alerts)
[urn, clin.alert]
?SMS[sms]CLA[gqa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
clin.alert 10 FREE L MIS.CLIN.ALERT gqa
Ì € i 2
lab.m.spec.clinical.alerts.dtl (clinical.alerts.detail)
[urn,clin.alert, clin.alerts.detail]
?SMS[sms]CLA[gqa]D[aqaDE]
Field Name Len Dat Typ J DPM Offset/Local/VAL
clin.alerts.detail 72 FREE L aqaDE
Ì € i 2
lab.m.spec.comments (comments)
[urn, comment.q]
?SMS[sms]C[smsC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
comment.q 2 PINT R smsC
any.external.spec.comment 1 YN L VAL=IF{""^YY^XX,DO{+@LAB.M.SPEC.comments[LAB.M.SPEC.ur
VAL=n,YY]^YY&'XX IF{@LAB.M.SPEC.comment[YY]:0S#0="@";"
VAL=Y"^XX}},""^YY,XX;"N"}
any.spec.comments 1 YN L VAL=IF{@LAB.M.SPEC.comments[LAB.M.SPEC.urn,1] "Y";"N"}
comment 60 FREE L ?SMS[sms]C[smsC]
spec.comment.external 1 YN L VAL=IF{@LAB.M.SPEC.comment:0S#0="@" "N";"Y"}
spec.comment.internal 1 YN L VAL=IF{@LAB.M.SPEC.comment:0S#0="@" "Y";"N"}
Ì € i 2
lab.m.spec.default.profile (default.profile)
[urn, order.proc]
?SMS[sms]DP[smp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
order.proc 9 PDEC5 R LAB.M.PROC smp
order.proc.def.profile 10 FREE L ?SMS[sms]DP[smp]|0
Ì € i 2
lab.m.spec.deleted.orders (deleted.orders)
[urn, del.q]
?SMS[sms]DO[smsDO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
del.q 2 PINT R smsDO
del.comment 50 FREE L ?SMS[sms]DO[smsDO]|6
del.count 2 PINT R ?SMS[sms]DO[smsDO]|2
del.date 8 DATE L ?SMS[sms]DO[smsDO]|3
del.module 1 CHOICE L ?SMS[sms]DO[smsDO]|1
del.proc.time 8 PINT R ?SMS[sms]DO[smsDO]|9
del.source 10 FREE L LAB.M.SRC ?SMS[sms]DO[smsDO]|7
del.spec.desc 10 FREE L LAB.M.SPDESC ?SMS[sms]DO[smsDO]|8
del.test.proc 9 PDEC5 R LAB.M.PROC ?SMS[sms]DO[smsDO]|0
del.test.proc.abb.src.ct 40 FREE L VAL=@LAB.M.PROC.abbrev[@del.test.proc]_("\"_@LAB.M.SPE
VAL=C.del.count'="\1"'="\")_("\"_@LAB.M.SPEC.del.sourc
VAL=e'="\"_D(34)_("\"_@LAB.M.SPEC.del.spec.desc'="\")
del.test.proc.abbrev.w.ct 17 FREE L VAL=@LAB.M.PROC.abbrev[@del.test.proc]_("\"_@LAB.M.SPE
VAL=C.del.count'="\1"'="\")
del.time 4 HHMM L ?SMS[sms]DO[smsDO]|4
del.user 10 FREE L MIS.USER ?SMS[sms]DO[smsDO]|5
Ì € i 2
lab.m.spec.exc.org.prompt.mis (exc.org.prompt.mis)
[urn, exc.op.org.id,exc.op.prompt]
?SMS[sms]EOP[smoID,smq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
exc.op.org.id 12 FREE L smoID
exc.op.prompt 10 FREE L LAB.M.PROMPT smq
exc.op.msg 55 FREE L VAL=("Mismatch:",@LAB.M.SPEC.org.abbrev.w.id,"/",@LAB.
VAL=M.PROMPT.text)
exc.op.seconds 9 PINT R ?SMS[sms]EOP[smoID,smq]
Ì € i 2
lab.m.spec.icd.codes (icd.codes)
[urn, icd.code]
?SMS[sms]IC[drb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
icd.code 7 FREE L LAB.C.DIAG drb
Ì € i 2
lab.m.spec.infce.audit.trail (infce.audit.trail)
[urn, infce.audit.q]
?SMS[sms]IF[smsiq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
infce.audit.q 2 PINT R smsiq
infce.audit.date 8 DATE L VAL=%Z.date.in.magic(@LAB.M.SPEC.infce.audit.seconds+@
VAL=LAB.M.SPEC.entered.offset)
infce.audit.error 50 FREE L ?SMS[sms]IF[smsiq]|6
infce.audit.infce 10 FREE L LAB.C.INFC.DICT?SMS[sms]IF[smsiq]|1
infce.audit.record 9 PINT R LAB.C.INFCE ?SMS[sms]IF[smsiq]|2
infce.audit.record.type 1 CHOICE L ?SMS[sms]IF[smsiq]|0
infce.audit.seconds 5 PINT R ?SMS[sms]IF[smsiq]|4
infce.audit.status 6 CHOICE L ?SMS[sms]IF[smsiq]|3
infce.audit.time 4 HHMM L VAL=%Z.time.out(@LAB.M.SPEC.infce.audit.seconds+@LAB.M
VAL=.SPEC.entered.offset)
infce.audit.user 10 FREE L MIS.USER ?SMS[sms]IF[smsiq]|5
Ì € i 2
lab.m.spec.markers (markers)
[urn, marker]
?SMS[sms]MK[ssk]
Field Name Len Dat Typ J DPM Offset/Local/VAL
marker 10 FREE L LAB.C.MARK ssk
marker.wkld.func 10 FREE L LAB.C.WL.FUNC ?SMS[sms]MK[ssk]WF
Ì € i 2
lab.m.spec.ord.date.time.pr.gr (ord.date.time.prof.or.grp)
[urn, ord.proc.for.prof.or.grp]
?SMS[sms]OO[smp2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ord.proc.for.prof.or.grp 9 PDEC5 R LAB.M.PROC smp2
ord.proc.date.prof.or.grp 8 DATE L ?SMS[sms]OO[smp2]|0
ord.proc.time.prof.or.grp 4 HHMMU L ?SMS[sms]OO[smp2]|1
Ì € i 2
lab.m.spec.order.queries (order.queries)
[urn, order.query]
?SMS[sms]OQ[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
order.query 10 FREE L MIS.QUERY ggv
any.extern.order.queries 1 YN L VAL=%LAB.M.SPEC.any.ext.queries(LAB.M.SPEC.urn)
any.order.queries 1 YN L VAL=IF{+@LAB.M.SPEC.order.queries[LAB.M.SPEC.urn,""] "
VAL=Y";"N"}
order.answer 75 QRY.RESP L ?SMS[sms]OQ[ggv]|0
order.query.external 1 YN L VAL=IF{@LAB.M.SPEC.order.answer#0="@" "N";@MIS.QUERY.t
VAL=ext#0="@" "N";"Y"}
order.query.internal 1 YN L VAL=IF{@LAB.M.SPEC.order.answer#0="@" "Y";@MIS.QUERY.t
VAL=ext#0="@" "Y";"N"}
order.query.map.date 8 DATE L ?SMS[sms]OQ[ggv]INIT
order.query.text 60 FREE L VAL=@MIS.QUERY.text[LAB.M.SPEC.order.query]
Ì € i 2
lab.m.spec.order.queries.mult (order.queries.mult)
[urn,order.query, order.query.seq.no]
?SMS[sms]OQ[ggv]M[ggvN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
order.query.seq.no 3 PINT R ggvN
any.ex.order.queries.mult 1 YN L VAL=%LAB.M.SPEC.any.ext.queries(LAB.M.SPEC.urn)
order.query.external.mult 1 YN L VAL=IF{@LAB.M.SPEC.order.query.response#0="@" "N";@MIS
VAL=.QUERY.text#0="@" "N";"Y"}
order.query.internal.mult 1 YN L VAL=IF{@LAB.M.SPEC.order.query.response#0="@" "Y";@MIS
VAL=.QUERY.text#0="@" "Y";"N"}
order.query.response 75 QRY.RESP L ?SMS[sms]OQ[ggv]M[ggvN]|0
order.query.text.mult 60 FREE L VAL=@MIS.QUERY.text[LAB.M.SPEC.order.query.seq.no]
Ì € i 2
lab.m.spec.ord.priority.procs (ordered.priority.procs)
[urn, ord.priority.proc]
?SMS[sms]OP[smp2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ord.priority.proc 9 PDEC5 R LAB.M.PROC smp2
ord.proc.priority 1 FREE L ?SMS[sms]OP[smp2]|0
Ì € i 2
lab.m.spec.ordered.procedures (ordered.procs)
[urn, ordered.proc]
?SMS[sms]O[smp2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ordered.proc 9 PDEC5 R LAB.M.PROC smp2
ordered.proc.count 2 PINT R ?SMS[sms]O[smp2]|0
ordered.proc.date 8 DATE L ?SMS[sms]O[smp2]|4
ordered.proc.def.profile 9 PDEC5 R LAB.M.PROC ?SMS[sms]O[smp2]|3
ordered.proc.link 9 PDEC5 R LAB.M.PROC ?SMS[sms]O[smp2]|1
ordered.proc.priority 1 FREE L ?SMS[sms]O[smp2]|2
ordered.proc.time 4 HHMMU L ?SMS[sms]O[smp2]|5
Ì € i 2
lab.m.spec.proc.times (proc.times)
[urn, proc.time.proc]
?SMS[sms]TT[smp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.time.proc 9 PDEC5 R LAB.M.PROC smp
proc.time 8 PINT R ?SMS[sms]TT[smp]|0
Ì € i 2
lab.m.spec.result.procedures (procs)
[urn, proc]
?SMS[sms]T[smp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc 9 PDEC5 R LAB.M.PROC smp
any.prev.results 1 YN L VAL=IF{@LAB.M.SPEC.res.status[1]="C" "Y";"N"}
any.unverified.results 1 YN L VAL=@LAB.M.SPEC.res.status[@Last(res.q)]="U"
any.verified.results 1 YN L VAL=IF{'@LAB.M.SPEC.verified.res.q "N";@LAB.M.SPEC.pro
VAL=c.deleted="Y" "N";"Y"}
last.dft.q 2 PINT R ?SMS[sms]T[smp]|7
method 10 FREE L LAB.C.METH ?SMS[sms]T[smp]|1
order.link 9 PDEC5 R LAB.M.PROC ?SMS[sms]T[smp]|9
order.priority 1 FREE L ?SMS[sms]T[smp]|10
pending.time 8 PINT R ?SMS[sms]T[smp]|14
proc.complete 1 YN L ?SMS[sms]T[smp]|2
proc.deleted 1 YN L ?SMS[sms]T[smp]|5
proc.order.date 8 DATE L ?SMS[sms]T[smp]OT|0
proc.order.time 4 HHMMU L ?SMS[sms]T[smp]OT|1
proc.sample.type 10 FREE L LAB.C.STYPE ?SMS[sms]T[smp]|15
proc.setup.by 10 FREE L MIS.USER ?SMS[sms]T[smp]|13
proc.setup.date 8 DATE L ?SMS[sms]T[smp]|11
proc.setup.time 4 HHMMU L ?SMS[sms]T[smp]|12
proc.site 10 FREE L LAB.C.SITE ?SMS[sms]T[smp]|3
proc.workcard 10 FREE L LAB.M.WC ?SMS[sms]T[smp]|8
review.flag 1 FREE L ?SMS[sms]T[smp]|6
verified.res.q 2 PINT R ?SMS[sms]T[smp]|0
workbatch.urn 10 PINT R LAB.M.WB ?SMS[sms]T[smp]|4
Ì € i 2
lab.m.spec.procs.rad.data (procs.rad.data)
[urn,proc, rad.order]
?SMS[sms]T[smp]RAD[ro]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rad.order 12 PINT R ro
rad.category 30 FREE L ?SMS[sms]T[smp]RAD[ro]|0
rad.order.num 9 FREE L ?SMS[sms]T[smp]RAD[ro]|2
rad.outcome 10 FREE L ?SMS[sms]T[smp]RAD[ro]|3
rad.procedure 30 FREE L ?SMS[sms]T[smp]RAD[ro]|1
Ì € i 2
lab.m.spec.prompt.workload (prompt.workload)
[urn,proc, wl.prompt,wl.method,wl.answer]
?SMS[sms]T[smp]PW[smq,ssm,smqA]
Field Name Len Dat Typ J DPM Offset/Local/VAL
wl.prompt 10 FREE L LAB.M.PROMPT smq
wl.method 10 FREE L LAB.C.METH ssm
wl.answer 10 FREE L smqA
wl.cnt 3 PINT R ?SMS[sms]T[smp]PW[smq,ssm,smqA]|0
wl.type 1 CHOICE L ?SMS[sms]T[smp]PW[smq,ssm,smqA]|1
Ì € i 2
lab.m.spec.procedure.results (results)
[urn,proc, res.q]
?SMS[sms]T[smp]R[smsS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
res.q 2 PINT R smsS
abnormal 3 FREE L ?SMS[sms]T[smp]R[smsS]|4
any.ext.res 1 FREE L ?SMS[sms]T[smp]R[smsS]|8
prelim.or.final 1 CHOICE L ?SMS[sms]T[smp]R[smsS]|2
proc.result.date 8 DATE L VAL=IF{@res.time^XX %Z.date.in.magic(XX+@entered.offse
VAL=t)}
proc.result.time 4 HHMM L VAL=IF{@res.time^XX %Z.time.out(XX+@entered.offset)}
proc.verify.date 8 DATE L VAL=IF{@ver.time^XX %Z.date.in.magic(XX+@entered.offse
VAL=t)}
proc.verify.time 4 HHMM L VAL=IF{@ver.time^XX %Z.time.out(XX+@entered.offset)}
res.analyzer 10 FREE L LAB.M.AA.INSTR ?SMS[sms]T[smp]R[smsS]|9
res.status 1 CHOICE L ?SMS[sms]T[smp]R[smsS]|3
res.time 7 PINT R ?SMS[sms]T[smp]R[smsS]|1
res.user 10 FREE L MIS.USER ?SMS[sms]T[smp]R[smsS]|0
special.result 6 FREE L ?SMS[sms]T[smp]R[smsS]|5
ver.time 7 PINT R ?SMS[sms]T[smp]R[smsS]|7
ver.user 10 FREE L MIS.USER ?SMS[sms]T[smp]R[smsS]|6
Ì € i 2
lab.m.spec.exc.ver.orgs.miss (exc.ver.orgs)
[urn,proc,res.q, exc.ver.org]
?SMS[sms]T[smp]R[smsS]EVO[smoID]
Field Name Len Dat Typ J DPM Offset/Local/VAL
exc.ver.org 12 FREE L smoID
exc.ver.org.msg 60 FREE L VAL=("Verified organism",@LAB.M.SPEC.org.abbrev.w.id,"
VAL=no longer in this result.")
exc.ver.org.set 1 PINT R ?SMS[sms]T[smp]R[smsS]EVO[smoID]
Ì € i 2
lab.m.spec.interpretation (interpretation)
[urn,proc,res.q, interp.q]
?SMS[sms]T[smp]R[smsS]I[smsIQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
interp.q 2 PINT R smsIQ
interp.line 60 FREE L ?SMS[sms]T[smp]R[smsS]I[smsIQ]
Ì € i 2
lab.m.spec.organism.order (organism.order)
[urn,proc,res.q, org.ord.q]
?SMS[sms]T[smp]R[smsS]OO[smsOo]
Field Name Len Dat Typ J DPM Offset/Local/VAL
org.ord.q 2 PINT R smsOo
org.ord.id 12 FREE L ?SMS[sms]T[smp]R[smsS]OO[smsOo]|0
Ì € i 2
lab.m.spec.organisms (organisms)
[urn,proc,res.q, org.id]
?SMS[sms]T[smp]R[smsS]O[smoID]
Field Name Len Dat Typ J DPM Offset/Local/VAL
org.id 15 FREE L smoID
infect.ctrl 1 YN L ?SMS[sms]T[smp]R[smsS]O[smoID]|1
org 10 FREE L LAB.M.ORG
org.abbrev.w.id 12 FREE L VAL=@LAB.M.ORG.abbrev[org.id#"0#"]_(org.id%"0#")
org.abbrev.wo.id 10 FREE L VAL=@LAB.M.ORG.abbrev[org.id#"0#"]
org.id.org 10 FREE L VAL=org.id#"0#"
org.name.w.id 32 FREE L VAL=@LAB.M.ORG.name[org.id#"0#"]_(org.id%"0#")
org.name.wo.id 30 FREE L VAL=@LAB.M.ORG.name[org.id#"0#"]
org.no.therapy.upd 1 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]|5
org.prev.name 30 FREE L VAL=%LAB.M.ORG.prev.name(org.id#"0#")
org.rpt.name.w.id 32 FREE L VAL=@LAB.M.ORG.rpt.name[org.id#"0#"]_(org.id%"0#")
org.rpt.name.wo.id 30 FREE L VAL=@LAB.M.ORG.rpt.name[org.id#"0#"]
org.src.exception 2 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]|2
organism.comment 10 FREE L LAB.C.TEXT ?SMS[sms]T[smp]R[smsS]O[smoID]|4
organism.defined 1 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]|0
organism.np 2 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]|3
Ì € i 2
lab.m.spec.sensitivities (sensitivities)
[urn,proc,res.q,org.id, sen.proc]
?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]
Field Name Len Dat Typ J DPM Offset/Local/VAL
sen.proc 9 PDEC5 R LAB.M.PROC smps
sen.charge 6 MONEY R ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]|2
sen.entry.analyzer 10 FREE L LAB.M.AA.INSTR ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]|4
sen.entry.time 7 PINT R ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]|1
sen.entry.user 10 FREE L MIS.USER ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]|0
sen.filename 4 FREE L VAL=/SFN
sen.int.abn.flag 1 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]|3
sen.mic.reference.chart 10 FREE L LAB.C.TEXT ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]|7
sen.proc.entry.date 8 DATE L VAL=IF{@sen.entry.time^XX %Z.date.in.magic(XX+@entered
VAL=.offset)}
sen.proc.entry.time 4 HHMM L VAL=IF{@sen.entry.time^XX %Z.time.out(XX+@entered.offs
VAL=et)}
sen.proc.ordered.date 8 DATE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]|5
sen.proc.ordered.time 4 HHMMU L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]|6
sen.site 10 FREE L LAB.C.SITE ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]|8
setup.sen.filename 20 FREE L VAL=^@Root(@sensitivities)^/SFN
setup.t.sen.filename 20 FREE L VAL=^@Root(@t.sensitivities)^/SFN
Ì € i 2
lab.m.spec.antibiotics (antibiotics)
[urn,proc,res.q,org.id,sen.proc, antibiotic]
?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]
Field Name Len Dat Typ J DPM Offset/Local/VAL
antibiotic 9 PDEC5 R LAB.M.ANTI sma
anti.bad.therapy.upd 1 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]|9
anti.no.print 2 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]|3
anti.override.rte.dose 1 YN L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]|8
anti.res.prefix 15 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]|6
get.sensi.src.id 6 FREE L VAL=IF{IF{@LAB.M.SRC.sensi.id[@source]^sensi.src.id @F
VAL=irst(LAB.M.PROC.mic.value)} sensi.src.id;@LAB.M.PR
VAL=OC.mic.sensi.source.q.id[1]^sensi.src.id}
kb.zone.size 9 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]|2
mic.value 9 PDEC R ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]|1
override.reaction 6 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]|7
reaction 6 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]|0
rx.abnormal 3 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]|4
rx.int.abnormal 3 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]|5
sensi.src.id 6 FREE L
Ì € i 2
lab.m.spec.antibiotic.text (antibiotic.text)
[urn,proc,res.q,org.id,sen.proc,antibiotic, anti.text.q]
?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]T[smsAt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
anti.text.q 2 PINT R smsAt
anti.text 60 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]A[sma]T[smsAt]
Ì € i 2
lab.m.spec.antibiotic.deltas (exc.anti.deltas)
[urn,proc,res.q,org.id,sen.proc, exc.ad.anti]
?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]E[sma]
Field Name Len Dat Typ J DPM Offset/Local/VAL
exc.ad.anti 9 PDEC5 R LAB.M.ANTI sma
exc.ad.anti.rx 2 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]E[sma]|0
exc.ad.anti.zs.or.mv 10 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]E[sma]|2
exc.ad.delta.spec 30 URN L LAB.M.SPEC ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]E[sma]|1
exc.ad.msg 90 FREE L
Ì € i 2
lab.m.spec.sensi.comments (sensi.comments)
[urn,proc,res.q,org.id,sen.proc, sen.comment.q]
?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]C[smsSC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
sen.comment.q 2 PINT R smsSC
sen.comment 60 FREE L ?SMS[sms]T[smp]R[smsS]O[smoID]S[smps]C[smsSC]
Ì € i 2
lab.m.spec.result.cult (result.cult)
[urn,proc,res.q, result.org.q]
?SMS[sms]T[smp]R[smsS]K[smsRO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
result.org.q 2 PINT R smsRO
result.org.except 2 FREE L ?SMS[sms]T[smp]R[smsS]K[smsRO]|1
result.org.id 15 FREE L ?SMS[sms]T[smp]R[smsS]K[smsRO]|0
result.org.np 2 FREE L ?SMS[sms]T[smp]R[smsS]K[smsRO]|2
Ì € i 2
lab.m.spec.result.cult.prompts (result.cult.prompts)
[urn,proc,res.q,result.org.q, result.cult.prompt]
?SMS[sms]T[smp]R[smsS]K[smsRO]P[smq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
result.cult.prompt 10 FREE L LAB.M.PROMPT smq
result.cult.abn.flag 3 FREE L ?SMS[sms]T[smp]R[smsS]K[smsRO]P[smq]|2
result.cult.infect.ctrl 1 FREE L ?SMS[sms]T[smp]R[smsS]K[smsRO]P[smq]|4
result.cult.int.abn.flag 3 FREE L ?SMS[sms]T[smp]R[smsS]K[smsRO]P[smq]|3
result.cult.res 40 FREE L ?SMS[sms]T[smp]R[smsS]K[smsRO]P[smq]|0
result.cult.text 60 FREE L ?SMS[sms]T[smp]R[smsS]K[smsRO]P[smq]|1
Ì € i 2
lab.m.spec.result.id.tests (result.id.tests)
[urn,proc,res.q,result.org.q, id.test.q]
?SMS[sms]T[smp]R[smsS]K[smsRO]T[smjIQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
id.test.q 2 PINT R smjIQ
id.group 10 FREE L LAB.M.ID.GRP ?SMS[sms]T[smp]R[smsS]K[smsRO]T[smjIQ]|2
id.pos.neg 1 CHOICE L ?SMS[sms]T[smp]R[smsS]K[smsRO]T[smjIQ]|1
id.test 10 FREE L LAB.M.ID.TEST ?SMS[sms]T[smp]R[smsS]K[smsRO]T[smjIQ]|0
id.test.name 30 FREE L VAL=@LAB.M.ID.TEST.name[@LAB.M.SPEC.id.test]
Ì € i 2
lab.m.spec.result.lines (result.lines)
[urn,proc,res.q, result.line.q]
?SMS[sms]T[smp]R[smsS]F[smsL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
result.line.q 2 PINT R smsL
result.line 60 FREE L ?SMS[sms]T[smp]R[smsS]F[smsL]
Ì € i 2
lab.m.spec.result.prompts (result.prompts)
[urn,proc,res.q, result.prompt]
?SMS[sms]T[smp]R[smsS]Q[smq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
result.prompt 10 FREE L LAB.M.PROMPT smq
result 40 FREE L ?SMS[sms]T[smp]R[smsS]Q[smq]|0
result.abn.flag 3 FREE L ?SMS[sms]T[smp]R[smsS]Q[smq]|2
result.infect.ctrl 1 FREE L ?SMS[sms]T[smp]R[smsS]Q[smq]|4
result.int.abn.flag 3 FREE L ?SMS[sms]T[smp]R[smsS]Q[smq]|3
result.text 60 FREE L ?SMS[sms]T[smp]R[smsS]Q[smq]|1
Ì € i 2
lab.m.spec.result.mult (result.mult)
[urn,proc,res.q,result.prompt, mult.result.q]
?SMS[sms]T[smp]R[smsS]Q[smq,smsRQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mult.result.q 2 PINT R smsRQ
mult.result 30 FREE L ?SMS[sms]T[smp]R[smsS]Q[smq,smsRQ]|0
mult.result.abn.flag 3 FREE L ?SMS[sms]T[smp]R[smsS]Q[smq,smsRQ]|2
mult.result.infect.ctrl 1 YN L ?SMS[sms]T[smp]R[smsS]Q[smq,smsRQ]|4
mult.result.int.abn.flag 3 FREE L ?SMS[sms]T[smp]R[smsS]Q[smq,smsRQ]|3
mult.result.text 60 FREE L ?SMS[sms]T[smp]R[smsS]Q[smq,smsRQ]|1
Ì € i 2
lab.m.spec.result.prompts.add (result.prompts.added)
[urn,proc,res.q, prompt.q]
?SMS[sms]T[smp]R[smsS]PQ[smsPQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
prompt.q 2 PINT R smsPQ
prompt.added 10 FREE L LAB.M.PROMPT ?SMS[sms]T[smp]R[smsS]PQ[smsPQ]|0
prompt.screen.type 4 CHOICE L ?SMS[sms]T[smp]R[smsS]PQ[smsPQ]|1
prompt.source 10 FREE L ?SMS[sms]T[smp]R[smsS]PQ[smsPQ]|2
prompt.source.prompt 10 FREE L LAB.M.PROMPT ?SMS[sms]T[smp]R[smsS]PQ[smsPQ]|3
Ì € i 2
lab.m.spec.reports (reports)
[urn, report]
?SMS[sms]RP[sch]
Field Name Len Dat Typ J DPM Offset/Local/VAL
report 10 FREE L LAB.C.RPT sch
last.other.report 8 PINT R ?SMS[sms]RP[sch]|0
last.other.report.date 8 DATE L VAL=IF{@last.other.report^XX %Z.date.in.magic(XX+@ente
VAL=red.offset)}
last.other.report.time 4 HHMM L VAL=IF{@last.other.report^XX %Z.time.out(XX+@entered.o
VAL=ffset)}
set.last.other.report 0 FREE L VAL=%LAB.C.SPEC.set.report.flag(^@LAB.M.SPEC.reports,@
VAL=LAB.M.SPEC.entered.offset)
Ì € i 2
lab.m.spec.report.times (report.times)
[urn,report, report.time]
?SMS[sms]RP[sch]T[smsRt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
report.time 9 PINT R smsRt
report.time.print.flag 1 FREE L ?SMS[sms]RP[sch]T[smsRt]|0
Ì € i 2
lab.m.spec.reports.by.doctor (reports.by.doctor)
[urn,report, rpt.doctor]
?SMS[sms]RP[sch]D[ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.doctor 10 FREE L MIS.DOC.DICT ggg
last.doctor.report 8 PINT R ?SMS[sms]RP[sch]D[ggg]|0
last.doctor.report.date 8 DATE L VAL=IF{@last.doctor.report^XX %Z.date.in.magic(XX+@ent
VAL=ered.offset)}
last.doctor.report.time 4 HHMM L VAL=IF{@last.doctor.report^XX %Z.time.out(XX+@entered.
VAL=offset)}
set.last.doctor.report 0 FREE L VAL=%LAB.C.SPEC.set.report.flag(^@LAB.M.SPEC.reports.b
VAL=y.doctor,@LAB.M.SPEC.entered.offset)
Ì € i 2
lab.m.spec.rpt.times.by.doctor (report.times.by.doctor)
[urn,report,rpt.doctor, report.doctor.time]
?SMS[sms]RP[sch]D[ggg]T[smsRd]
Field Name Len Dat Typ J DPM Offset/Local/VAL
report.doctor.time 9 PINT R smsRd
report.doctor.time.flag 1 FREE L ?SMS[sms]RP[sch]D[ggg]T[smsRd]|0
Ì € i 2
lab.m.spec.reports.by.location (reports.by.location)
[urn,report, rpt.location]
?SMS[sms]RP[sch]L[ggn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.location 10 FREE L MIS.LOCN.DICT ggn
last.location.report 8 PINT R ?SMS[sms]RP[sch]L[ggn]|0
last.location.report.date 8 DATE L VAL=IF{@last.location.report^XX %Z.date.in.magic(XX+@e
VAL=ntered.offset)}
last.location.report.time 4 HHMM L VAL=IF{@last.location.report^XX %Z.time.out(XX+@entere
VAL=d.offset)}
set.last.location.report 0 FREE L VAL=%LAB.C.SPEC.set.report.flag(^@LAB.M.SPEC.reports.b
VAL=y.location,@LAB.M.SPEC.entered.offset)
Ì € i 2
lab.m.spec.rpt.times.by.loc (report.times.by.location)
[urn,report,rpt.location, report.location.time]
?SMS[sms]RP[sch]L[ggn]T[smsRl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
report.location.time 9 PINT R smsRl
report.location.time.flag 1 FREE L ?SMS[sms]RP[sch]L[ggn]T[smsRl]|0
Ì € i 2
lab.m.spec.review.data (review)
[urn, review.offset]
?SMS[sms]RV[smsRO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
review.offset 7 PINT R smsRO
last.reviewed 9 PINT R VAL=IF{@Last(@LAB.M.SPEC.review.offset)^XX XX+@LAB.M.S
VAL=PEC.entered.offset}
review.date 8 FREE L VAL=%Z.date.out(%Z.date.in.magic(@LAB.M.SPEC.entered.o
VAL=ffset+@LAB.M.SPEC.review.offset))
review.time 4 FREE L VAL=%Z.time.out(@LAB.M.SPEC.entered.offset+@LAB.M.SPEC
VAL=.review.offset)
review.user 10 FREE L MIS.USER ?SMS[sms]RV[smsRO]|0
set.last.review.user 10 FREE L VAL=@.user^@LAB.M.SPEC.review.user[@.sd-@LAB.M.SPEC.en
VAL=tered.offset]
Ì € i 2
lab.m.spec.sample.types (sample.types)
[urn, sample.type]
?SMS[sms]ST[stp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
sample.type 10 FREE L LAB.C.STYPE stp
st.bar.code.number 11 FREE L ?SMS[sms]ST[stp]|0
st.coll.batch 10 PINT R LAB.C.CB ?SMS[sms]ST[stp]|5
st.coll.batch.date 8 DATE L ?SMS[sms]ST[stp]|6
st.coll.batch.number 3 PINT R ?SMS[sms]ST[stp]|7
st.coll.cat 10 FREE L LAB.C.COL.CAT ?SMS[sms]ST[stp]|11
st.coll.date 8 DATE L ?SMS[sms]ST[stp]|2
st.coll.time 4 HHMMU L ?SMS[sms]ST[stp]|3
st.coll.user 10 FREE L MIS.USER ?SMS[sms]ST[stp]|4
st.recv.date 8 DATE L ?SMS[sms]ST[stp]|8
st.recv.time 4 HHMMU L ?SMS[sms]ST[stp]|9
st.recv.user 10 FREE L MIS.USER ?SMS[sms]ST[stp]|10
st.status 4 CHOICE L ?SMS[sms]ST[stp]|1
Ì € i 2
lab.m.spec.site.orders (site.orders)
[urn, site.order.site,site.order]
?SMS[sms]SO[scl,smp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
site.order.site 10 FREE L LAB.C.SITE scl
site.order 9 PDEC5 R LAB.M.PROC smp
Ì € i 2
lab.m.spec.sites (sites)
[urn, site]
?SMS[sms]LS[scl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
site 10 FREE L LAB.C.SITE scl
current.site 10 FREE L
have.at.site 1 YN L VAL=IF{@p.LAB.M.SPEC.site.status[urn,/.LAB.SITE]\2=1 "
VAL=Y";"N"}
need.at.site 1 YN L VAL=IF{@p.LAB.M.SPEC.site.status[urn,/.LAB.SITE]=2 "Y"
VAL=;"N"}
need.spec.at.site 1 PINT R VAL=2
never.at.site 1 YN L VAL=IF{@Not(@p.LAB.M.SPEC.site.status[urn,/.LAB.SITE])
VAL= "Y";"N"}
received.at.site 1 YN L VAL=IF{@p.LAB.M.SPEC.site.status[urn,/.LAB.SITE]=3 "Y"
VAL=;"N"}
set.site.received 0 FREE L VAL=@.sd-@LAB.M.SPEC.entered.offset^@LAB.M.SPEC.site.r
VAL=eceived
site.final.destination 1 YN L ?SMS[sms]LS[scl]|4
site.next.sites 40 FREE L ?SMS[sms]LS[scl]|5
site.received 8 PINT R ?SMS[sms]LS[scl]|1
site.received.by 10 FREE L MIS.USER ?SMS[sms]LS[scl]|2
site.received.date 8 DATE L VAL=IF{@site.received^XX %Z.date.in.magic(XX+@entered.
VAL=offset)}
site.received.time 4 HHMM L VAL=IF{@site.received^XX %Z.time.out(XX+@entered.offse
VAL=t)}
site.recvd.from.site 10 FREE L LAB.C.SITE ?SMS[sms]LS[scl]|3
site.resulted 1 YN L ?SMS[sms]LS[scl]|6
site.status 1 CHOICE L ?SMS[sms]LS[scl]|0
was.at.site 1 YN L VAL=IF{@p.LAB.M.SPEC.site.status[urn,/.LAB.SITE]=0 "Y"
VAL=;"N"}
Ì € i 2
lab.m.spec.point.of.testing (point.of.testing)
[urn,site, pot.dept]
?SMS[sms]LS[scl]POT[smd]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pot.dept 10 FREE L LAB.M.DEPT smd
pot.rec.time PINT R ?SMS[sms]LS[scl]POT[smd]|0
pot.rec.user 10 FREE L MIS.USER ?SMS[sms]LS[scl]POT[smd]|1
Ì € i 2
lab.m.spec.storage (storage)
[urn, storage.area,storage.location,storage.shelf,storage.rack,storage.row,storage.col]
?SMS[sms]STR[ssz,sszl,sszs,sszr,sszR,sszC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
storage.area 10 FREE L LAB.C.STR.DICT ssz
storage.location 10 FREE L sszl
storage.shelf 10 FREE L sszs
storage.rack 10 FREE L sszr
storage.row 2 PINT R sszR
storage.col 2 PINT R sszC
storage.discard.date 8 DATE L ?SMS[sms]STR[ssz,sszl,sszs,sszr,sszR,sszC]
Ì € i 2
lab.m.spec.wb.available.procs (workbatch.available.procs)
[urn, wb.proc]
?SMS[sms]WT[smp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
wb.proc 9 PDEC5 R LAB.M.PROC smp
Ì € i 2
lab.m.spec.workbatch.history (workbatch.history)
[urn, closed.worksheet,closed.workbatch.date,closed.workbatch.number]
?SMS[sms]WH[smw,smsWD,smsWN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
closed.worksheet 10 FREE L LAB.M.WS smw
closed.workbatch.date 8 DATE L smsWD
closed.workbatch.number 3 PINT R smsWN
any.closed.workbatches 1 YN L VAL=IF{@Last(LAB.M.SPEC.closed.worksheet) "Y";"N"}
closed.wb.closed.date 8 DATE L ?SMS[sms]WH[smw,smsWD,smsWN]|0
closed.wb.closed.user 10 FREE L MIS.USER ?SMS[sms]WH[smw,smsWD,smsWN]|1
closed.workbatch.id 24 FREE L VAL=(closed.worksheet,%Z.date.out(closed.workbatch.dat
VAL=e),"#"_closed.workbatch.number)
Ì € i 2
lab.m.spec.worksheet.batches (workbatches)
[urn, workbatch]
?SMS[sms]W[smb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
workbatch 10 PINT R LAB.M.WB smb
any.workbatches 1 YN L VAL=IF{@Last(LAB.M.SPEC.workbatch) "Y";"N"}
workbatch.id 24 FREE L VAL=(@LAB.M.WB.worksheet,%Z.date.out(@LAB.M.WB.date),"
VAL=#"_@LAB.M.WB.number)
Ì € i 2
lab.m.spec.workcards (workcards)
[urn, workcard]
?SMS[sms]WC[sme]
Field Name Len Dat Typ J DPM Offset/Local/VAL
workcard 10 FREE L LAB.M.WC sme
wrkcrd.res.pf.status 2 CHOICE L ?SMS[sms]WC[sme]|2
wrkcrd.res.time 9 PINT R ?SMS[sms]WC[sme]|1
wrkcrd.res.user 10 FREE L MIS.USER ?SMS[sms]WC[sme]|0
Ì € i 2
lab.m.spec.workcard.procedures (workcard.procs)
[urn,workcard, workcard.proc]
?SMS[sms]WC[sme]T[smp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
workcard.proc 9 PDEC5 R LAB.M.PROC smp
workcard.proc.field 5 FREE L ?SMS[sms]WC[sme]T[smp]|0
workcard.proc.res.field 5 FREE L ?SMS[sms]WC[sme]T[smp]|1
Ì € i 2
lab.m.spec.workcard.organisms (workcard.organisms)
[urn,workcard,workcard.proc, workcard.organism.q]
?SMS[sms]WC[sme]T[smp]OO[smsOo]
Field Name Len Dat Typ J DPM Offset/Local/VAL
workcard.organism.q 2 PINT R smsOo
workcard.organism.field 5 FREE L ?SMS[sms]WC[sme]T[smp]OO[smsOo]|0
Ì € i 2
lab.m.spec.workcard.org.prompt (workcard.org.prompts)
[urn,workcard,workcard.proc,workcard.organism.q, workcard.org.prompt]
?SMS[sms]WC[sme]T[smp]OO[smsOo]P[smq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
workcard.org.prompt 10 FREE L LAB.M.PROMPT smq
workcard.org.prompt.field 5 FREE L ?SMS[sms]WC[sme]T[smp]OO[smsOo]P[smq]|0
Ì € i 2
lab.m.spec.workcard.sens (workcard.sensitivities)
[urn,workcard,workcard.proc,workcard.organism.q, workcard.sen.proc]
?SMS[sms]WC[sme]T[smp]OO[smsOo]S[smps]
Field Name Len Dat Typ J DPM Offset/Local/VAL
workcard.sen.proc 9 PDEC5 R LAB.M.PROC smps
workcard.sen.proc.field 5 FREE L ?SMS[sms]WC[sme]T[smp]OO[smsOo]S[smps]|0
Ì € i 2
lab.m.spec.workcard.antibiotic (workcard.antibiotics)
[urn,workcard,workcard.proc,workcard.organism.q,workcard.sen.proc, workcard.antibiotic]
?SMS[sms]WC[sme]T[smp]OO[smsOo]S[smps]A[sma]
Field Name Len Dat Typ J DPM Offset/Local/VAL
workcard.antibiotic 9 PDEC5 R LAB.M.ANTI sma
workcard.anti.field 5 FREE L ?SMS[sms]WC[sme]T[smp]OO[smsOo]S[smps]A[sma]|0
Ì € i 2
lab.m.spec.workcard.prompts (workcard.prompts)
[urn,workcard,workcard.proc, workcard.prompt]
?SMS[sms]WC[sme]T[smp]Q[smq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
workcard.prompt 10 FREE L LAB.M.PROMPT smq
workcard.prompt.field 5 FREE L ?SMS[sms]WC[sme]T[smp]Q[smq]|0
Ì € i 2
lab.m.spec.workcard.results (workcard.results)
[urn,workcard, wrkcrd.field.no]
?SMS[sms]WC[sme]R[smeF]
Field Name Len Dat Typ J DPM Offset/Local/VAL
wrkcrd.field.no 5 FREE L smeF
wrkcrd.field.res.abn.flag 3 FREE L ?SMS[sms]WC[sme]R[smeF]|2
wrkcrd.field.res.int.abn 3 FREE L ?SMS[sms]WC[sme]R[smeF]|3
wrkcrd.field.res.special 10 FREE L ?SMS[sms]WC[sme]R[smeF]|4
wrkcrd.field.res.text 60 FREE L ?SMS[sms]WC[sme]R[smeF]|1
wrkcrd.field.result 92 FREE L ?SMS[sms]WC[sme]R[smeF]|0
Ì € i 2
workcard.mult.result (workcard.mult.result)
[urn,workcard,wrkcrd.field.no, wc.fld.mult.res.q]
?SMS[sms]WC[sme]R[smeF]M[smeRQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
wc.fld.mult.res.q 2 PINT R smeRQ
wc.fld.mlt.res.infct.ctrl 1 YN L ?SMS[sms]WC[sme]R[smeF]M[smeRQ]|4
wc.fld.mlt.res.int.abn.fl 3 FREE L ?SMS[sms]WC[sme]R[smeF]M[smeRQ]|3
wc.fld.mult.res.abn.flag 3 FREE L ?SMS[sms]WC[sme]R[smeF]M[smeRQ]|2
wc.fld.mult.res.text 60 FREE L ?SMS[sms]WC[sme]R[smeF]M[smeRQ]|1
wc.fld.mult.result 30 FREE L ?SMS[sms]WC[sme]R[smeF]M[smeRQ]|0
Ì i 2
lab.m.spec.markers.display (markers.display)
[marker.disp.spec,marker.disp.q]
/SMSmkr[sms,smsMQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
marker.disp.spec 30 URN L LAB.M.SPEC sms
marker.disp.q 2 PINT R smsMQ
marker.display.line 72 FREE L /SMSmkr[sms,smsMQ]
Ì i 2
lab.m.spec.ord.procs.display (ordered.procs.display)
[ord.proc.line.spec.urn,ord.proc.line.q]
/SMSo[sms,smsO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ord.proc.line.spec.urn 30 URN L LAB.M.SPEC sms
ord.proc.line.q 2 PINT R smsO
ord.proc.line 72 FREE L /SMSo[sms,smsO]
Ì i 2
lab.m.spec.procs.orgs.display (procs.orgs.display)
[procs.orgs.spec,procs.orgs.q]
/SMSpod[sms,smsPQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
procs.orgs.spec 30 URN L LAB.M.SPEC sms
procs.orgs.q 2 PINT R smsPQ
procs.orgs.orgs 60 FREE L /SMSpod[sms,smsPQ]|1
procs.orgs.proc.abbrev 16 FREE L /SMSpod[sms,smsPQ]|0
Ì i 2
lab.m.spec.procs.setup.display (procs.setup.display)
[proc.setup.spec.urn,proc.setup.q]
/SMSps[sms,smsPS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc.setup.spec.urn 30 URN L LAB.M.SPEC sms
proc.setup.q 2 PINT R smsPS
proc.setup.line 72 FREE L /SMSps[sms,smsPS]
Ì i 2
lab.m.spec.quick.enter.res.log (qer.x)
[qer.log.date,qer.log.q]
:SMSQL[smsql,smsqq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
qer.log.date 8 DATE L smsql
qer.log.q 3 PINT R smsqq
qer.log.method 10 FREE L LAB.C.METH :SMSQL[smsql,smsqq]|3
qer.log.pf 2 CHOICE L :SMSQL[smsql,smsqq]|2
qer.log.proc 9 PDEC5 R LAB.M.PROC :SMSQL[smsql,smsqq]|0
qer.log.proc.mnemonic 15 FREE L VAL=@LAB.M.PROC.mnemonic[@qer.log.proc]
qer.log.result 6 FREE L :SMSQL[smsql,smsqq]|1
qer.log.time 4 HHMM L :SMSQL[smsql,smsqq]|8
qer.log.time.check 1 YN L VAL=IF{IF{qer.log.date=b.qer.log.date @qer.log.time<
VAL=;b.qer.log.time} "N";IF{qer.log.date=e.qer.log.dat
VAL=e @qer.log.time>e.qer.log.time} "N";"Y"}
qer.log.user 10 FREE L MIS.USER :SMSQL[smsql,smsqq]|7
qer.log.wb.date 8 DATE L :SMSQL[smsql,smsqq]|5
qer.log.wb.number 3 PINT R :SMSQL[smsql,smsqq]|6
qer.log.worksheet 10 FREE L LAB.M.WS :SMSQL[smsql,smsqq]|4
Ì € i 2
lab.m.spec.qk.ent.res.interp (qer.x.interp)
[qer.log.date,qer.log.q, qer.log.interp.q]
:SMSQL[smsql,smsqq]I[smsIQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
qer.log.interp.q 2 PINT R smsIQ
qer.log.interp.line 60 FREE L :SMSQL[smsql,smsqq]I[smsIQ]
Ì € i 2
lab.m.spec.qk.ent.res.specs (qer.x.specs)
[qer.log.date,qer.log.q, qer.log.spec]
:SMSQL[smsql,smsqq]S[sms]
Field Name Len Dat Typ J DPM Offset/Local/VAL
qer.log.spec 30 URN L LAB.M.SPEC sms
qer.log.last.pf 2 CHOICE L :SMSQL[smsql,smsqq]S[sms]|1
qer.log.last.result 6 FREE L :SMSQL[smsql,smsqq]S[sms]|0
qer.log.no.file 12 FREE L :SMSQL[smsql,smsqq]S[sms]|2
Ì i 2
lab.m.spec.rpt.times.display (reported.times.display)
[reported.times.spec,reported.times.q]
/SMSrptdt[sms,smsTq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
reported.times.spec 30 URN L LAB.M.SPEC sms
reported.times.q PINT R smsTq
any.prev.reported.time 1 YN L VAL=IF{@First(reported.times.q) "Y";"N"}
reported.times 200 FREE L /SMSrptdt[sms,smsTq]
Ì i 2
lab.m.spec.report.copies.to (rpt.copies.to)
[rpt.specimen.urn,rpt.copies.to.doctor]
/SCEdr[sms,gggNM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.specimen.urn 30 URN L LAB.M.SPEC sms
rpt.copies.to.doctor 30 FREE L gggNM
Ì i 2
lab.m.spec.report.fields (rpt.fields)
[rpt.spec.urn]
/SMSr[sms]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.spec.urn 30 URN L LAB.M.SPEC sms
rpt.res.line.setup 1 YN L
Ì € i 2
lab.m.spec.report.procs (rpt.fields.procs)
[rpt.spec.urn, rpt.proc,rpt.proc.res.q.sort]
/SMSr[sms]T[smp,smsSQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.proc 9 PDEC5 R LAB.M.PROC smp
rpt.proc.res.q.sort 2 PINT R smsSQ
rpt.proc.pending 1 FREE L /SMSr[sms]T[smp,smsSQ]|1
rpt.proc.res.q 2 PINT R /SMSr[sms]T[smp,smsSQ]|0
rpt.proc.special.result 3 FREE L /SMSr[sms]T[smp,smsSQ]|3
rpt.proc.status 15 FREE L /SMSr[sms]T[smp,smsSQ]|2
Ì € i 2
lab.m.spec.report.sort (rpt.fields.sort)
[rpt.spec.urn, rpt.hdr.sort.num,rpt.hdr.proc.q,rpt.sort.proc,rpt.sort.res.q.sort]
/SMSr[sms]S[smhN,smhTQ,smp,smsSQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.hdr.sort.num 8 PDEC R smhN
rpt.hdr.proc.q 3 PINT R smhTQ
rpt.sort.proc 9 PDEC5 R LAB.M.PROC smp
rpt.sort.res.q.sort 2 PINT R smsSQ
rpt.proc.hdrs 200 FREE L /SMSr[sms]S[smhN,smhTQ,smp,smsSQ]|0
Ì i 2
lab.m.spec.rpt.order.queries (rpt.order.queries)
[rpt.ord.queries.spec.urn,rpt.ord.queries.q]
/SMSoq[sms,smsoq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.ord.queries.spec.urn 30 URN L LAB.M.SPEC sms
rpt.ord.queries.q 2 PINT R smsoq
rpt.ord.query.and.answer 81 FREE L /SMSoq[sms,smsoq]
Ì i 2
lab.m.spec.rpt.other.doctors (rpt.other.doctors)
[rpt.oth.docs.spec.urn,rpt.oth.docs.q]
/SCRod[sms,smsOD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.oth.docs.spec.urn 30 URN L LAB.M.SPEC sms
rpt.oth.docs.q 1 PINT R smsOD
rpt.other.doctor.name 30 FREE L /SCRod[sms,smsOD]
Ì i 2
lab.m.specimen.summary.headers (summary.headers)
Field Name Len Dat Typ J DPM Offset/Local/VAL
sum.hdr.cdate.c 20 FREE L VAL=%Z.date.out(@LAB.M.SPEC.collection.date)_" "_@sum.
VAL=hdr.continued.message
sum.hdr.continued.message 12 FREE L VAL=IF{/c|0 "(continued)"}
sum.hdr.proc.footnote 5 FREE L VAL=IF{/c|0 "";/c|5}
sum.hdr.proc.name 35 FREE L VAL=@LAB.M.PROC.name_" "_@sum.hdr.proc.footnote
sum.hdr.proc.new.res.flag 1 FREE L VAL=IF{/c|0 "";/c|2 ">"}
sum.hdr.proc.status 26 FREE L VAL=IF{/c|0 "";/MST^S IF{S#0="F" "Final";S#0="P" "Prel
VAL=iminary"}_IF{S#1="c" " "_(@LAB.PARAM.mic.changed)}
VAL=}
sum.hdr.proc.status.wdate 29 FREE L VAL=IF{/c|0 "";/MST^S IF{S#0="F" "Final"_" "_(%Z.date.
VAL=out(@proc.verify.date));S#0="P" "Preliminary"}_IF{
VAL=S#1="c" " "_(@LAB.PARAM.mic.changed)}}
sum.hdr.proc.string 0 FREE L VAL=%LAB.M.SPEC.results.sum.proc.string(urn,proc,res.q
VAL=)
sum.hdr.rdate.c 20 FREE L VAL=%Z.date.out(@LAB.M.SPEC.received.date)_" "_@sum.hd
VAL=r.continued.message
sum.hdr.source.cat.name 30 FREE L VAL=@LAB.M.SCAT.name[@LAB.M.SRC.category[@LAB.M.SPEC.s
VAL=ource]]
sum.hdr.source.cat.name.c 42 FREE L VAL=@sum.hdr.source.cat.name_" "_@sum.hdr.continued.me
VAL=ssage
sum.hdr.source.name 30 FREE L VAL=@LAB.M.SRC.name[@LAB.M.SPEC.source]
sum.hdr.source.name.c 42 FREE L VAL=@sum.hdr.source.name_" "_@sum.hdr.continued.messag
VAL=e
sum.hdr.spec.c 29 FREE L VAL=@LAB.M.SPEC.number_" "_@sum.hdr.continued.message
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
lab.m.spec.changed.number.x [collection.year,prefix,number.part] = urn
changed.number.x :SMSNC[smsY,spx,smsI]
lab.m.spec.collect.date.index [collection.date,prefix,number.part] = urn
coll.date.x :SMSC[smsD,spx,smsI]
lab.m.spec.temp.except.index [rpt.specimen.sort.key,rpt.specimen.sort.key2,number] = urn
except.rpt.x /SMSrpt[smsRK,smsR2,smsN]
lab.m.spec.exception.x [activity.date,prefix,number,urn]
exception.x :SMSE[smsA,spx,smsN,sms]
lab.m.spec.fax.audit.x [MIS.SPOOL.urn,urn] = activity.date
fax.audit.x :SMSGXA[gxa,sms]
lab.m.spec.infection.control.x [activity.date,module,urn]
infect.ctrl.x :SMSI[smsA,sssM,sms]
lab.spec.m.mpi.index [LAB.C.MRI.urn,collection.date,collection.time,prefix,number.part] = urn
mpi.x :SMSM[ea,smsD,smsT,spx,smsI]
lab.m.spec.number.index [collection.year,prefix,number.part] = urn
number.x :SMSN[smsY,spx,smsI]
lab.m.spec.temp.opr.index [rpt.specimen.sort.key,proc,number] = urn
opr.sort.x /SMSopr[smsRK,smp,smsN]
lab.m.spec.patient.index [patient,collection.date,collection.time,prefix,number.part] = urn
patient.x :SMSP[aa,smsD,smsT,spx,smsI]
lab.m.spec.pending.index [collection.date,prefix,number.part] = urn
pending.x :SMSO[smsD,spx,smsI]
lab.m.spec.prev.procedure.x [activity.date,urn,proc]
prev.proc.x :SMSPT[smsA,sms,smp]
lab.m.spec.procedure.pending.x [proc,collection.date,number] = urn
proc.pending.x :SMST[smp,smsD,smsN]
lab.m.spec.proc.used.index [proc]
proc.used.x :SMSPU[smp]
lab.m.spec.temp.patient.index [prefix,rpt.specimen.sort.key,rpt.specimen.sort.key2,number] = urn
pt.ml.sort.x /SMSpml[spx,smsRK,smsR2,smsN]
lab.m.spec.received.date.index [received.date,prefix,number] = urn
recv.date.x :SMSR[smsRD,spx,smsN]
lab.l.spec.rpt.specs.by.pat [patient,urn]
rpt.pat.spec.list.x /SMSp[aa,sms]
lab.m.spec.temp.rpt.proc.index [urn,proc]
rpt.proc.x /SMSt[sms,smp]
lab.m.spec.temp.sort.proc.x [rpt.specimen.sort.key,number,proc]
rpt.sort.proc.x /SMSrpt[smsRK,smsN,smp]
lab.m.spec.temp.rpt.sort.index [rpt.specimen.sort.key,number] = urn
rpt.sort.x /SMSrpt[smsRK,smsN]
lab.m.spec.report.specimens [rpt.specimen.sort.key] = urn
rpt.spec.list.x /SMSs[smsRK]
lab.m.spec.unverified.index [activity.date,prefix,number,urn]
unverified.x :SMSU[smsA,spx,smsN,sms]
lab.m.spec.wksht.holding.index [worksheet,priority,received.date,prefix,number.part] = urn
worksheet.x :SMSW[smw,smsPR,smsRD,spx,smsI]
|
|
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | |