Ì € i 2
ee.addenda.signouts.es
[ee.addenda.so.sect, ee.addenda.signout.q]
/SPS.ESA[spr]A[soQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ee.addenda.signout.q 3 PINT R soQ
ee.addenda.f.date 8 DATE L /SPS.ESA[spr]A[soQ]|4
ee.addenda.f.q 3 PINT R /SPS.ESA[spr]A[soQ]|5
ee.addenda.f.sign 10 FREE L MIS.USER /SPS.ESA[spr]A[soQ]|3
ee.addenda.p.date 8 DATE L /SPS.ESA[spr]A[soQ]|1
ee.addenda.p.q 3 PINT R /SPS.ESA[spr]A[soQ]|2
ee.addenda.p.sign 10 FREE L MIS.USER /SPS.ESA[spr]A[soQ]|0
Ì i 2
ee.addenda.signouts
[ee.addendum.section]
/SPS.AS[spr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ee.addendum.section 10 FREE L LAB.P.SECT spr
ee.addendum.change 1 YN L /SPS.AS[spr]|0
ee.addendum.disp.q 10 FREE L /SPS.AS[spr]|2
ee.addendum.q 3 PINT R /SPS.AS[spr]|1
Ì € i 2
ee.final.asign.outs
[ee.addendum.section, ee.final.asign.q]
/SPS.AS[spr]FS[spsFQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ee.final.asign.q 2 PINT R spsFQ
ee.final.asign.date 8 DATE L /SPS.AS[spr]FS[spsFQ]|1
ee.final.asign.elect 1 YN L /SPS.AS[spr]FS[spsFQ]|2
ee.final.asign.entry 10 FREE L /SPS.AS[spr]FS[spsFQ]|4
ee.final.asign.es.q 3 PINT R /SPS.AS[spr]FS[spsFQ]|5
ee.final.asign.out 10 FREE L MIS.USER /SPS.AS[spr]FS[spsFQ]|0
ee.final.asign.user 10 FREE L MIS.USER /SPS.AS[spr]FS[spsFQ]|3
Ì € i 2
ee.prelim.asign.outs
[ee.addendum.section, ee.prelim.asign.q]
/SPS.AS[spr]PS[spsPQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ee.prelim.asign.q 2 PINT R spsPQ
ee.prelim.asign.date 8 DATE L /SPS.AS[spr]PS[spsPQ]|1
ee.prelim.asign.elect 1 YN L /SPS.AS[spr]PS[spsPQ]|2
ee.prelim.asign.entry 10 FREE L /SPS.AS[spr]PS[spsPQ]|4
ee.prelim.asign.es.q 3 PINT R /SPS.AS[spr]PS[spsPQ]|5
ee.prelim.asign.out 10 FREE L MIS.USER /SPS.AS[spr]PS[spsPQ]|0
ee.prelim.asign.user 10 FREE L MIS.USER /SPS.AS[spr]PS[spsPQ]|3
Ì i 2
ee.corrected.reasons
[ee.corrected.reason.q]
/SPS.CRR[spsCR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ee.corrected.reason.q 3 PINT R spsCR
ee.corrected.reason 60 TEXT L /SPS.CRR[spsCR]
Ì i 2
ee.signout.es
[ee.signout.user]
/SPS.ES[gu]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ee.signout.user 10 FREE L MIS.USER gu
ee.signout.change.f 1 YN L /SPS.ES[gu]|3
ee.signout.change.p 1 YN L /SPS.ES[gu]|2
ee.signout.final.date 8 DATE L /SPS.ES[gu]|1
ee.signout.prelim.date 8 DATE L /SPS.ES[gu]|0
Ì i 2
main
[urn]
$(SP)SPS[sps]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 30 URN L sps
activity.date 8 DATE L
addendum.status 1 INT R VAL=(@LAB.P.SPEC.status.int=995)
addendum.status.num 1 INT R VAL=995
age 8 FREE L VAL=%Z.age(@LAB.C.PAT.computed.birthdate,@received.dat
VAL=e)
age.sex 9 FREE L VAL=(@age_"/"_@LAB.C.PAT.sex)
all.procs.complete 1 YN L $(SP)SPS[sps]A|9
any.result.abn.flags 1 YN L $(SP)SPS[sps]|21
archive.date 8 DATE L $(SP)SPS[sps]A|18
assign.to 10 FREE L MIS.USER $(SP)SPS[sps]A|7
assign.to.name 20 FREE L VAL=@MIS.USER.name[@assign.to]
bar.code.number 6 FREE L $(SP)SPS[sps]A|8
calls.completed 2 PINT R $(SP)SPS[sps]CA
cancel.comments.file 0 FREE L $(SP)SPS[sps]CC
cancel.spec.wkld.func 10 FREE L LAB.C.WL.FUNC
cancelled.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.cancelled.time.int)
cancelled.status 1 INT R VAL=(@LAB.P.SPEC.status.int=999)
cancelled.status.num 1 INT R VAL=999
cancelled.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.cancelled.time.int)
cancelled.time.int 9 PINT R $(SP)SPS[sps]A|4
cancelled.user 10 FREE L MIS.USER $(SP)SPS[sps]A|3
clear.buffer 1 FREE L VAL=DO{># #S}
cmpl.active.workbatches 1 YN L VAL=%LAB.P.SPEC.cmpl.workbatch.display(IF{LAB.P.SPEC.u
VAL=rn;/LAB.P.SPEC.urn},115)
cmpl.closed.workbatches 1 YN L VAL=%LAB.P.SPEC.cmpl.closed.workbatch.display(IF{LAB.P
VAL=.SPEC.urn;@LAB.P.SPEC.urn},115)
cmpl.deleted.orders 1 YN L VAL=%LAB.P.SPEC.cmpl.deleted.orders(IF{LAB.P.SPEC.urn;
VAL=@LAB.P.SPEC.urn})
cmpl.ord.procs.ext 1 YN L VAL=%LAB.P.SPEC.proc.cmpl(LAB.P.SPEC.urn,"EU")
cmpl.ord.procs.ext.conf 1 YN L VAL=%LAB.P.SPEC.proc.cmpl(LAB.P.SPEC.urn,"EA")
cmpl.ord.procs.int 1 YN L VAL=%LAB.P.SPEC.proc.cmpl(LAB.P.SPEC.urn,"IU")
cmpl.ord.procs.int.conf 1 YN L VAL=%LAB.P.SPEC.proc.cmpl(LAB.P.SPEC.urn,"IA")
cmpl.procs.tiss.ext 1 YN L VAL=%LAB.P.SPEC.tis.proc.cmpl(LAB.P.SPEC.urn,"EU")
cmpl.procs.tiss.ext.conf 1 YN L VAL=%LAB.P.SPEC.tis.proc.cmpl(LAB.P.SPEC.urn,"EA")
cmpl.procs.tiss.int 1 YN L VAL=%LAB.P.SPEC.tis.proc.cmpl(LAB.P.SPEC.urn,"IU")
cmpl.procs.tiss.int.conf 1 YN L VAL=%LAB.P.SPEC.tis.proc.cmpl(LAB.P.SPEC.urn,"IA")
cmpl.tissues 1 YN L VAL=%LAB.P.SPEC.tis.cmpl(LAB.P.SPEC.urn,"")
confidential 4 CHOICE L
corrected.by.spec 30 URN L LAB.P.SPEC $(SP)SPS[sps]B|3
date 8 DATE L
db.prefix 2 FREE L $(SP)SPS[sps]|25
department 10 FREE L LAB.P.DEPT $(SP)SPS[sps]A|0
department.name 30 FREE L VAL=@LAB.P.DEPT.name[@department]
doctor 10 FREE L MIS.DOC
entered.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.entered.offset)
entered.offset 9 PINT R $(SP)SPS[sps]|13
entered.status 1 INT R VAL=(@LAB.P.SPEC.status.int=0)
entered.status.num 1 INT R VAL=0
entered.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.entered.offset)
entered.user 10 FREE L MIS.USER $(SP)SPS[sps]A|2
final.signout.date 8 DATE L $(SP)SPS[sps]A|12
fso.change.status 1 YN L $(SP)SPS[sps]A|13
historical 1 YN L $(SP)SPS[sps]A|16
id 15 URN L LAB.P.SPEC VAL=@LAB.P.SPEC.number
id.any.external 30 FREE L
id.any.internal 30 FREE L
id.for.cancel 30 FREE L
id.for.ee.result 25 FREE L
id.not.cancelled.internal 30 FREE L
id.signed 25 FREE L
id.spec 30 FREE L
int 3 PINT R
int.rpt.last.printed 25 FREE L VAL=%LAB.P.SPEC.sout.rpt.stat.list.M.last.printed("")
isolation.query.and.resp 137 FREE L VAL=%LAB.C.PAT.isolation.query.and.resp(IF{LAB.P.SPEC.
VAL=patient;@LAB.P.SPEC.patient})
label.format 10 FREE L LAB.C.COL.LBL
last.activity 8 PINT R $(SP)SPS[sps]|17
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.sent.to.hub 9 PINT R $(SP)SPS[sps]|18
last.updated 10 PINT R $(SP)SPS[sps]A|10
last.updated.date 8 DATE L VAL=%Z.date.in.magic(@last.updated)
last.updated.time 4 HHMM L VAL=%Z.time.out(@last.updated)
name.by.effective.date 30 FREE L VAL=%ADM.PAT.name.by.date(@patient,@received.date)
nameof.sort.x 10 FREE L
number 15 FREE L $(SP)SPS[sps]|0
number.part.only 6 PINT R $(SP)SPS[sps]|10
number.sort 13 FREE L $(SP)SPS[sps]|20
order.location 10 FREE L MIS.LOCN $(SP)SPS[sps]A|11
order.site 10 FREE L LAB.C.SITE $(SP)SPS[sps]A|5
other.findings 8 DATE L VAL=IF{patient %LAB.P.SPEC.other.find(patient,urn,req.
VAL=urn)}
patient 30 FREE L LAB.C.PAT $(SP)SPS[sps]|1
patient.header.line 92 FREE L VAL=%LAB.C.PAT.hdr.line(IF{LAB.P.SPEC.patient;@LAB.P.S
VAL=PEC.patient})
patient.header.line.name 92 FREE L VAL=%LAB.C.PAT.hdr.line(IF{LAB.P.SPEC.patient;@LAB.P.S
VAL=PEC.patient},"N")
patient.mpi 25 URN L MRI.PAT
pending.time 8 PINT R $(SP)SPS[sps]|22
prefix 2 FREE L $(SP)SPS[sps]|9
prefix.before.cancel 2 FREE L $(SP)SPS[sps]B|1
prefixes 5 FREE L VAL=(@LAB.P.SPEC.prefix_(":"_@LAB.P.SPEC.db.prefix'=":
VAL="))
prelim.sout.status.num 1 INT R VAL=980
pso.change.status 1 YN L $(SP)SPS[sps]A|14
qa.hold 1 YN L $(SP)SPS[sps]|26
qc 1 YN L $(SP)SPS[sps]A|19
queued.for.hub 1 YN L $(SP)SPS[sps]|23
receive.site 10 FREE L LAB.C.SITE $(SP)SPS[sps]A|5
received.by 10 FREE L MIS.USER $(SP)SPS[sps]|12
received.date 8 DATE L $(SP)SPS[sps]|3
received.time 4 HHMMU L $(SP)SPS[sps]|4
received.year 4 PINT R VAL=@LAB.P.SPEC.received.date$4
recv.date.or.year 8 PINT R
recv.date.tform 5 FREE L VAL=IF{@received.date^X "T"_IF{X=@.today "";%Z.date.su
VAL=b(X,@.today)^X<0;"+"_X}^X,IF{L(X)<6 X;X$2_"&
VAL=lt;<"}}
report.last.printed 8 PINT R $(SP)SPS[sps]|16
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.P.SPEC.req.urn]
req.urn 10 URN L LAB.C.REQ $(SP)SPS[sps]|8
reuse 1 YN L
rpt.ad.hoc.title 80 FREE L VAL=%LAB.P.SPEC.substitute("ad hoc title")
rpt.argument.string 0 FREE L VAL=/ARG
rpt.compile.copies.to 1 YN L VAL=%LAB.C.RB.copies.to("")
rpt.compile.dx 1 YN L VAL=%LAB.P.SPEC.cmpl.dx(LAB.P.SPEC.urn)
rpt.compile.markers 1 YN L VAL=IF{%LAB.C.MARK.strings(LAB.P.SPEC.urn,"P",^@Root(@
VAL=LAB.P.SPEC.markers.display)[LAB.P.SPEC.urn],IF{MKR
VAL=LEN;72}),"Y"}
rpt.compile.other.doctors 1 YN L VAL=%LAB.C.REQ.cmpl.oth.docs(LAB.P.SPEC.urn,@LAB.P.SPE
VAL=C.req.urn)
rpt.compile.related.dx 1 YN L VAL=%LAB.P.SPEC.cmpl.dx.rel(LAB.P.SPEC.urn)
rpt.format 10 FREE L LAB.C.RFMT
rpt.sort.key1.name 30 FREE L VAL=%LAB.P.SPEC.substitute("sort key 1 nm")
rpt.sort.key1.namei 36 FREE L VAL=%LAB.P.SPEC.substitute("sort key 1 nmi")
rpt.sort.key2.name 30 FREE L VAL=%LAB.P.SPEC.substitute("sort key 2 nm")
rpt.sort.key2.namei 36 FREE L VAL=%LAB.P.SPEC.substitute("sort key 2 nmi")
rpt.specimen.sort.key 20 FREE L VAL=%LAB.P.SPEC.substitute("sort key 1")
rpt.specimen.sort.key2 20 FREE L VAL=%LAB.P.SPEC.substitute("sort key 2")
rpt.specimen.sort.key3 20 FREE L
section 10 FREE L LAB.P.SECT
section2 10 FREE L
set.last.activity 0 FREE L VAL=@.sd-@LAB.P.SPEC.entered.offset^@LAB.P.SPEC.last.a
VAL=ctivity
set.report.last.printed 0 FREE L VAL=@.sd-@LAB.P.SPEC.entered.offset^@LAB.P.SPEC.report
VAL=.last.printed
signed.out.status 1 INT R VAL=(@LAB.P.SPEC.status.int=990)
signed.out.status.num 1 INT R VAL=990
snomed.rt 1 BOOLEAN L VAL=IF{IF{/LAB.P.SNOMED.VERSION;@LAB.P.SPEC.snomed.ver
VAL=sion[IF{urn;/urn}];@LAB.STATUS.snomed.version}$2="
VAL=RT" 1}
snomed.version 5 FREE L $(SP)SPS[sps]A|20
spec.slide.count 3 PDEC R $(SP)SPS[sps]A|15
spec.type 10 FREE L LAB.P.STYPE $(SP)SPS[sps]|5
spec.type.abbrev 10 FREE L VAL=@LAB.P.STYPE.abbrev[@spec.type]
spec.type.cds 15 FREE L MIS.SCREEN $(SP)SPS[sps]A|6
spec.type.name 30 FREE L VAL=@LAB.P.STYPE.name[@spec.type]
specimen.date 8 DATE L $(SP)SPS[sps]|6
specimen.header.line 92 FREE L VAL=%LAB.P.SPEC.hdr.line(LAB.P.SPEC.urn)
specimen.time 4 HHMMU L $(SP)SPS[sps]|7
status 4 FREE L $(SP)SPS[sps]|2
status.before.cancel 4 FREE L $(SP)SPS[sps]|15
status.int 2 INT R $(SP)SPS[sps]|19
status.name 15 FREE L VAL=@LAB.PARAM.pth.status.val.name[@LAB.P.SPEC.status.
VAL=int]
subm.doc.addr.and.phone 91 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.P.SPEC.subm.doctor,@LAB.
VAL=P.SPEC.req.urn,"AP")
subm.doc.address 75 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.P.SPEC.subm.doctor,@LAB.
VAL=P.SPEC.req.urn,"A")
subm.doc.city 30 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.P.SPEC.subm.doctor,@LAB.
VAL=P.SPEC.req.urn,"C")
subm.doc.email 40 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.P.SPEC.subm.doctor,@LAB.
VAL=P.SPEC.req.urn,"E")
subm.doc.lis.city 30 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.P.SPEC.subm.
VAL=doctor,@LAB.P.SPEC.req.urn,"C")
subm.doc.lis.city.st.zip 35 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.P.SPEC.subm.
VAL=doctor,@LAB.P.SPEC.req.urn,"CSZ")
subm.doc.lis.fax 18 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.P.SPEC.subm.
VAL=doctor,@LAB.P.SPEC.req.urn,"F")
subm.doc.lis.phone 18 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.P.SPEC.subm.
VAL=doctor,@LAB.P.SPEC.req.urn,"P")
subm.doc.lis.state 2 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.P.SPEC.subm.
VAL=doctor,@LAB.P.SPEC.req.urn,"ST")
subm.doc.lis.street.addr 30 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.P.SPEC.subm.
VAL=doctor,@LAB.P.SPEC.req.urn,"S")
subm.doc.lis.street.addr2 30 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.P.SPEC.subm.
VAL=doctor,@LAB.P.SPEC.req.urn,"S2")
subm.doc.lis.zip 10 FREE L VAL=%LAB.C.SPEC.client.mult.doc.addr(@LAB.P.SPEC.subm.
VAL=doctor,@LAB.P.SPEC.req.urn,"Z")
subm.doc.name 30 FREE L VAL=IF{@LAB.P.SPEC.subm.doc.non.dict.name;@MIS.DOC.nam
VAL=e[@LAB.P.SPEC.subm.doctor]}
subm.doc.non.dict.name 30 FREE L $(SP)SPS[sps]A|1
subm.doc.phone 15 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.P.SPEC.subm.doctor,@LAB.
VAL=P.SPEC.req.urn,"P")
subm.doc.state 2 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.P.SPEC.subm.doctor,@LAB.
VAL=P.SPEC.req.urn,"ST")
subm.doc.street 30 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.P.SPEC.subm.doctor,@LAB.
VAL=P.SPEC.req.urn,"S")
subm.doc.zip 10 FREE L VAL=%LAB.C.SPEC.doc.addr(@LAB.P.SPEC.subm.doctor,@LAB.
VAL=P.SPEC.req.urn,"Z")
subm.doctor 10 FREE L MIS.DOC $(SP)SPS[sps]|11
submitted.date.and.time 13 FREE L VAL=%Z.date.out(@LAB.P.SPEC.specimen.date)_" "_@LAB.P.
VAL=SPEC.specimen.time
submitted.date.tform 5 FREE L VAL=IF{@specimen.date^X "T"_IF{X=@.today "";%Z.date.su
VAL=b(X,@.today)^X<0;"+"_X}}
temp.prefix 2 FREE L VAL=PS
time 4 HHMMU L
tissue.key.num 3 PINT R $(SP)SPS[sps]A|17
use.me 0 FREE L $(SP)SPS[sps]|24
wkld.function 10 FREE L LAB.C.WL.FUNC $(SP)SPS[sps]|14
word.db.doc 30 FREE L $(SP)SPS[sps]B|0
word.subfolder 10 FREE L $(SP)SPS[sps]B|2
yn 1 YN L
Ì € i 2
addenda.sections
[urn, addenda.section]
$(SP)SPS[sps]AD[spr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
addenda.section 10 FREE L LAB.P.SECT spr
addenda.section.last.q 2 PINT R $(SP)SPS[sps]AD[spr]|0
Ì € i 2
call.attempt
[urn, call.attempt.q]
$(SP)SPS[sps]CA[ssnca]
Field Name Len Dat Typ J DPM Offset/Local/VAL
call.attempt.q 2 PINT R ssnca
call.attempt.action 16 FREE L $(SP)SPS[sps]CA[ssnca]|2
call.attempt.cc.q 1 PINT R $(SP)SPS[sps]CA[ssnca]|5
call.attempt.comment 60 FREE L $(SP)SPS[sps]CA[ssnca]|4
call.attempt.date 8 DATE L $(SP)SPS[sps]CA[ssnca]|0
call.attempt.time 4 HHMM L $(SP)SPS[sps]CA[ssnca]|1
call.attempt.user 10 FREE L MIS.USER $(SP)SPS[sps]CA[ssnca]|3
Ì € i 2
cancel.comments
[urn, cancel.comment.q]
$(SP)SPS[sps]CC[spsCC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
cancel.comment.q 2 PINT R spsCC
any.cancel.comments 1 YN L VAL=IF{@LAB.P.SPEC.cancel.comments[LAB.P.SPEC.urn,1] "
VAL=Y";"N"}
any.extern.cancel.comment 1 YN L VAL=IF{""^YY^XX,DO{+@LAB.P.SPEC.cancel.comments[LAB.L.
VAL=SPEC.urn,YY]^YY&'XX IF{@LAB.P.SPEC.cancel.comment[
VAL=YY]:0S#0="@";"Y"^XX}},""^YY,XX;"N"}
cancel.comment 60 TEXT L $(SP)SPS[sps]CC[spsCC]
cancel.comment.external 1 YN L VAL=IF{@LAB.P.SPEC.cancel.comment:0S#0="@" "N";"Y"}
cancel.comment.internal 1 YN L VAL=IF{@LAB.P.SPEC.cancel.comment:0S#0="@" "Y";"N"}
Ì € i 2
changed.numbers
[urn, changed.number.q]
$(SP)SPS[sps]CNU[spsCQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
changed.number.q 2 PINT R spsCQ
changed.number.part 5 PINT R $(SP)SPS[sps]CNU[spsCQ]|2
changed.prefix 2 FREE L $(SP)SPS[sps]CNU[spsCQ]|1
changed.received.date 8 DATE L $(SP)SPS[sps]CNU[spsCQ]|0
last.changed.number 15 FREE L VAL=IF{@changed.received.date[1] %LAB.P.SPEC.changed.n
VAL=um(urn)}
Ì € i 2
clinical.alerts
[urn, clin.alert]
$(SP)SPS[sps]CLA[gqa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
clin.alert 10 FREE L MIS.CLIN.ALERT gqa
Ì € i 2
clinical.alerts.details
[urn,clin.alert, clin.alerts.details]
$(SP)SPS[sps]CLA[gqa]D[aqaDE]
Field Name Len Dat Typ J DPM Offset/Local/VAL
clin.alerts.details 72 FREE L aqaDE
Ì € i 2
closed.worksheets
[urn, closed.worksheet.q]
$(SP)SPS[sps]CW[spsWq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
closed.worksheet.q 2 PINT R spsWq
any.closed.workbatches 1 YN L VAL=IF{@LAB.P.SPEC.closed.worksheets[LAB.P.SPEC.urn,1]
VAL= "Y";"N"}
closed.wb.closed.date 8 DATE L $(SP)SPS[sps]CW[spsWq]|4
closed.wb.closed.user 10 FREE L MIS.USER $(SP)SPS[sps]CW[spsWq]|5
closed.workbatch.date 8 DATE L $(SP)SPS[sps]CW[spsWq]|1
closed.workbatch.id 24 FREE L VAL=(@closed.worksheet,%Z.date.out(@closed.workbatch.d
VAL=ate),"#"_@closed.workbatch.number)
closed.workbatch.id.2 41 FREE L VAL=(@closed.worksheet,%Z.date.out(@closed.workbatch.d
VAL=ate),"#"_@closed.workbatch.number,"CLOSED:",%Z.dat
VAL=e.out(@closed.wb.closed.date))
closed.workbatch.number 3 PINT R $(SP)SPS[sps]CW[spsWq]|2
closed.workbatch.urn 10 PINT R LAB.P.WB $(SP)SPS[sps]CW[spsWq]|3
closed.worksheet 10 FREE L LAB.P.WS $(SP)SPS[sps]CW[spsWq]|0
Ì € i 2
comments
[urn, comment.q]
$(SP)SPS[sps]C[spsC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
comment.q 2 PINT R spsC
any.external.spec.comment 1 YN L VAL=IF{""^YY^XX,DO{+@LAB.P.SPEC.comments[LAB.P.SPEC.ur
VAL=n,YY]^YY&'XX IF{@LAB.P.SPEC.comment[YY]:0S#0="@";"
VAL=Y"^XX}},""^YY,XX;"N"}
any.spec.comments 1 YN L VAL=IF{@LAB.P.SPEC.comments[LAB.P.SPEC.urn,1] "Y";"N"}
comment 60 TEXT L $(SP)SPS[sps]C[spsC]
spec.comment.external 1 YN L VAL=IF{@LAB.P.SPEC.comment:0S#0="@" "N";"Y"}
spec.comment.internal 1 YN L VAL=IF{@LAB.P.SPEC.comment:0S#0="@" "Y";"N"}
Ì € i 2
corrected
[urn, corrected.q]
$(SP)SPS[sps]CR[spsCR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
corrected.q 3 PINT R spsCR
corrected.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.corrected.seconds)
corrected.seconds 9 PINT R $(SP)SPS[sps]CR[spsCR]|2
corrected.specimen 30 URN L LAB.P.SPEC $(SP)SPS[sps]CR[spsCR]|0
corrected.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.corrected.seconds)
corrected.user 10 FREE L MIS.USER $(SP)SPS[sps]CR[spsCR]|1
Ì € i 2
corrected.reasons
[urn,corrected.q, corrected.reason.q]
$(SP)SPS[sps]CR[spsCR]R[spsCRQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
corrected.reason.q 3 PINT R spsCRQ
corrected.reason 60 TEXT L $(SP)SPS[sps]CR[spsCR]R[spsCRQ]
Ì € i 2
deleted.orders
[urn, del.q]
$(SP)SPS[sps]DO[spsDO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
del.q 2 PINT R spsDO
del.comment 50 FREE L $(SP)SPS[sps]DO[spsDO]|6
del.count 2 PINT R $(SP)SPS[sps]DO[spsDO]|2
del.date 8 DATE L $(SP)SPS[sps]DO[spsDO]|3
del.module 1 CHOICE L $(SP)SPS[sps]DO[spsDO]|1
del.proc.abbrev.w.ct 17 FREE L VAL=@LAB.P.TERM.abbrev[@del.test.proc]_("\"_@LAB.P.SPE
VAL=C.del.count'="\1"'="\")
del.source 10 FREE L LAB.M.SRC $(SP)SPS[sps]DO[spsDO]|7
del.spec.desc 10 FREE L LAB.M.SPDESC $(SP)SPS[sps]DO[spsDO]|8
del.test.proc 10 URN L LAB.P.TERM $(SP)SPS[sps]DO[spsDO]|0
del.time 4 HHMM L $(SP)SPS[sps]DO[spsDO]|4
del.user 10 FREE L MIS.USER $(SP)SPS[sps]DO[spsDO]|5
Ì € i 2
final.sign.outs
[urn, final.sign.q]
$(SP)SPS[sps]FS[spsFS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
final.sign.q 2 PINT R spsFS
final.sign.date 8 DATE L $(SP)SPS[sps]FS[spsFS]|1
final.sign.electron.flg 1 FREE L VAL=IF{@final.sign.electronic="Y" "*"}
final.sign.electronic 1 YN L $(SP)SPS[sps]FS[spsFS]|2
final.sign.entry 10 FREE L $(SP)SPS[sps]FS[spsFS]|4
final.sign.entry.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.entered.offset+@LAB.P
VAL=.SPEC.final.sign.entry)
final.sign.entry.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.entered.offset+@LAB.P.SPEC
VAL=.final.sign.entry)
final.sign.out 10 FREE L MIS.USER $(SP)SPS[sps]FS[spsFS]|0
final.sign.user 10 FREE L MIS.USER $(SP)SPS[sps]FS[spsFS]|3
Ì € i 2
findings
[urn, find.sect]
$(SP)SPS[sps]F[spr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
find.sect 10 FREE L LAB.P.SECT spr
codes.section 1 FREE L VAL=(find.sect=.CO)
concepts.section 1 FREE L VAL=(find.sect=.CT)
find.any.data 1 FREE L $(SP)SPS[sps]F[spr]|6
find.any.prompt.res 1 YN L $(SP)SPS[sps]F[spr]|3
find.dictated.by 10 FREE L MIS.USER $(SP)SPS[sps]F[spr]|2
find.internal 1 YN L $(SP)SPS[sps]F[spr]|7
find.last.edit.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.entered.offset+@LAB.P
VAL=.SPEC.find.last.edit.sec)
find.last.edit.sec 9 PINT R $(SP)SPS[sps]F[spr]|0
find.last.edit.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.entered.offset+@LAB.P.SPEC
VAL=.find.last.edit.sec)
find.last.edit.user 10 FREE L MIS.USER $(SP)SPS[sps]F[spr]|1
find.max.length 2 PINT R $(SP)SPS[sps]F[spr]|5
find.snomed.version 3 FREE L $(SP)SPS[sps]F[spr]SV|0
find.workload 10 FREE L LAB.C.WL.FUNC $(SP)SPS[sps]F[spr]|4
its.category 10 FREE L RAD.CAT $(SP)SPS[sps]F[spr]ITS|0
its.order 10 URN L RAD.ORD $(SP)SPS[sps]F[spr]ITS|1
its.order.num 9 FREE L $(SP)SPS[sps]F[spr]ITS|2
its.outcome 10 FREE L RAD.OUTCOME $(SP)SPS[sps]F[spr]ITS|5
its.procedure 10 FREE L RAD.PROC $(SP)SPS[sps]F[spr]ITS|3
its.service.date 8 DATE L $(SP)SPS[sps]F[spr]ITS|4
list.section 1 FREE L VAL=IF{@codes.section;@concepts.section;@LAB.P.SECT.ty
VAL=pe="LIST"}
ques.section 1 FREE L VAL=(@LAB.P.SECT.type="QUES")
set.last.edit.sec 10 PINT R VAL=IF{@entered.offset @.sd-@entered.offset;0}
text.section 1 FREE L VAL=(@LAB.P.SECT.type="TEXT")
tr.seconds 10 PINT R $(SP)SPS[sps]F[spr]TS|3
tr.stats.chars 6 PINT R $(SP)SPS[sps]F[spr]TS|2
tr.stats.lines 6 PINT R $(SP)SPS[sps]F[spr]TS|0
tr.stats.words 6 PINT R $(SP)SPS[sps]F[spr]TS|1
Ì € i 2
addenda
[urn,find.sect, addenda.q]
$(SP)SPS[sps]F[spr]A[spsAQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
addenda.q 3 PINT R spsAQ
addendum.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.entered.offset+@LAB.P
VAL=.SPEC.addendum.sec)
addendum.dictated.by 10 FREE L MIS.USER $(SP)SPS[sps]F[spr]A[spsAQ]|2
addendum.sec 10 PINT R $(SP)SPS[sps]F[spr]A[spsAQ]|0
addendum.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.entered.offset+@LAB.P.SPEC
VAL=.addendum.sec)
addendum.user 10 FREE L MIS.USER $(SP)SPS[sps]F[spr]A[spsAQ]|1
fso.achange.status 1 YN L $(SP)SPS[sps]F[spr]A[spsAQ]|3
Ì € i 2
addendum
[urn,find.sect,addenda.q, addendum.q]
$(SP)SPS[sps]F[spr]A[spsAQ]T[spsAT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
addendum.q 3 PINT R spsAT
addendum.line 92 FREE L $(SP)SPS[sps]F[spr]A[spsAQ]T[spsAT]
Ì € i 2
addendum.fso
[urn,find.sect,addenda.q, final.asign.q]
$(SP)SPS[sps]F[spr]A[spsAQ]FS[spsAF]
Field Name Len Dat Typ J DPM Offset/Local/VAL
final.asign.q 2 PINT R spsAF
final.asign.date 8 DATE L $(SP)SPS[sps]F[spr]A[spsAQ]FS[spsAF]|1
final.asign.electron.flg 1 FREE L VAL=IF{@final.asign.electronic="Y" "*"}
final.asign.electronic 1 YN L $(SP)SPS[sps]F[spr]A[spsAQ]FS[spsAF]|2
final.asign.entry 10 FREE L $(SP)SPS[sps]F[spr]A[spsAQ]FS[spsAF]|4
final.asign.entry.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.entered.offset+@LAB.P
VAL=.SPEC.final.asign.entry)
final.asign.entry.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.entered.offset+@LAB.P.SPEC
VAL=.final.asign.entry)
final.asign.out 10 FREE L MIS.USER $(SP)SPS[sps]F[spr]A[spsAQ]FS[spsAF]|0
final.asign.user 10 FREE L MIS.USER $(SP)SPS[sps]F[spr]A[spsAQ]FS[spsAF]|3
Ì € i 2
addendum.pso
[urn,find.sect,addenda.q, prelim.asign.q]
$(SP)SPS[sps]F[spr]A[spsAQ]PS[spsAP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
prelim.asign.q 2 PINT R spsAP
prelim.asign.date 8 DATE L $(SP)SPS[sps]F[spr]A[spsAQ]PS[spsAP]|1
prelim.asign.electron.flg 1 FREE L VAL=IF{@prelim.asign.electronic="Y" "*"}
prelim.asign.electronic 1 YN L $(SP)SPS[sps]F[spr]A[spsAQ]PS[spsAP]|2
prelim.asign.entry 10 FREE L $(SP)SPS[sps]F[spr]A[spsAQ]PS[spsAP]|4
prelim.asign.entry.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.entered.offset+@LAB.P
VAL=.SPEC.prelim.asign.entry)
prelim.asign.entry.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.entered.offset+@LAB.P.SPEC
VAL=.prelim.asign.entry)
prelim.asign.out 10 FREE L MIS.USER $(SP)SPS[sps]F[spr]A[spsAQ]PS[spsAP]|0
prelim.asign.user 10 FREE L MIS.USER $(SP)SPS[sps]F[spr]A[spsAQ]PS[spsAP]|3
Ì € i 2
asaved.text
[urn,find.sect,addenda.q, asaved.text.q]
$(SP)SPS[sps]F[spr]A[spsAQ]X[astQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
asaved.text.q 3 PINT R astQ
asaved.text.line 92 FREE L $(SP)SPS[sps]F[spr]A[spsAQ]X[astQ]
Ì € i 2
codes
[urn,find.sect, code]
$(SP)SPS[sps]F[spr]C[spt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
code 10 URN L LAB.P.TERM spt
Ì € i 2
codes.linked
[urn,find.sect,code, code.link]
$(SP)SPS[sps]F[spr]C[spt]T[spt2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
code.link 10 URN L LAB.P.TERM spt2
Ì € i 2
codes.source
[urn,find.sect,code,code.link, code.source]
$(SP)SPS[sps]F[spr]C[spt]T[spt2]S[spr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
code.source 10 FREE L LAB.P.SECT spr
code.changed 10 FREE L MIS.USER $(SP)SPS[sps]F[spr]C[spt]T[spt2]S[spr]|0
Ì € i 2
concepts
[urn,find.sect, concept]
$(SP)SPS[sps]F[spr]CT[ssp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
concept 18 PINT R LAB.C.CONCEPT ssp
Ì € i 2
concepts.linked
[urn,find.sect,concept, concept.linked]
$(SP)SPS[sps]F[spr]CT[ssp]C[ssp2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
concept.linked 18 PINT R LAB.C.CONCEPT ssp2
Ì € i 2
concepts.source
[urn,find.sect,concept,concept.linked, concept.source]
$(SP)SPS[sps]F[spr]CT[ssp]C[ssp2]S[spr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
concept.source 10 FREE L LAB.P.SECT spr
concept.changed 10 FREE L MIS.USER $(SP)SPS[sps]F[spr]CT[ssp]C[ssp2]S[spr]|0
Ì € i 2
edit.history
[urn,find.sect, edit.q]
$(SP)SPS[sps]F[spr]E[spsFE]
Field Name Len Dat Typ J DPM Offset/Local/VAL
edit.q 3 PINT R spsFE
edit.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.entered.offset+@LAB.P
VAL=.SPEC.edit.sec)
edit.sec 9 PINT R $(SP)SPS[sps]F[spr]E[spsFE]|0
edit.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.entered.offset+@LAB.P.SPEC
VAL=.edit.sec)
edit.user 10 FREE L MIS.USER $(SP)SPS[sps]F[spr]E[spsFE]|1
Ì € i 2
findings.icd.codes
[urn,find.sect, find.icd.code]
$(SP)SPS[sps]F[spr]IC[drb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
find.icd.code 7 FREE L LAB.C.DIAG drb
Ì € i 2
findings.markers
[urn,find.sect, find.marker]
$(SP)SPS[sps]F[spr]M[ssk]
Field Name Len Dat Typ J DPM Offset/Local/VAL
find.marker 10 ALPHANUM L LAB.C.MARK ssk
Ì € i 2
findings.text
[urn,find.sect, find.text.q]
$(SP)SPS[sps]F[spr]T[spsFt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
find.text.q 3 PINT R spsFt
find.text.line 92 FREE L $(SP)SPS[sps]F[spr]T[spsFt]
Ì € i 2
histology
[urn,find.sect, hist.q]
$(SP)SPS[sps]F[spr]H[spsHQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hist.q 2 PINT R spsHQ
block 6 FREE L $(SP)SPS[sps]F[spr]H[spsHQ]|1
cassette 3 PINT R $(SP)SPS[sps]F[spr]H[spsHQ]|3
confirmed 3 FREE L $(SP)SPS[sps]F[spr]H[spsHQ]|5
disposition 10 FREE L $(SP)SPS[sps]F[spr]H[spsHQ]|7
ee.comment 1 YN L $(SP)SPS[sps]F[spr]H[spsHQ]|6
hist.comment.file 0 FREE L $(SP)SPS[sps]F[spr]H[spsHQ]C
hist.proc 10 URN L LAB.P.TERM $(SP)SPS[sps]F[spr]H[spsHQ]|8
hist.tissue 10 FREE L $(SP)SPS[sps]F[spr]H[spsHQ]|0
hist.tissue.key 3 PINT R $(SP)SPS[sps]F[spr]H[spsHQ]|9
level 3 PINT R $(SP)SPS[sps]F[spr]H[spsHQ]|4
pieces 3 PINT R $(SP)SPS[sps]F[spr]H[spsHQ]|2
Ì € i 2
histology.comments
[urn,find.sect,hist.q, hist.comment.q]
$(SP)SPS[sps]F[spr]H[spsHQ]C[spsHC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hist.comment.q 3 PINT R spsHC
hist.comment.line 60 TEXT L $(SP)SPS[sps]F[spr]H[spsHQ]C[spsHC]
Ì € i 2
histology.2
[urn,find.sect, hist2.q]
$(SP)SPS[sps]F[spr]H[spsH2]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hist2.q 2 PINT R spsH2
hist2.blocks 6 FREE L $(SP)SPS[sps]F[spr]H[spsH2]|2
hist2.id 4 FREE L $(SP)SPS[sps]F[spr]H[spsH2]|1
hist2.levels 3 PINT R $(SP)SPS[sps]F[spr]H[spsH2]|3
hist2.tissue 15 FREE L $(SP)SPS[sps]F[spr]H[spsH2]|0
hist2.tissue.urn 10 URN L LAB.P.TERM $(SP)SPS[sps]F[spr]H[spsH2]|4
Ì € i 2
histology.2.levels
[urn,find.sect,hist2.q, hist2.level]
$(SP)SPS[sps]F[spr]H[spsH2]L[spsHL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hist2.level 10 FREE L spsHL
hist2.comment 60 FREE L $(SP)SPS[sps]F[spr]H[spsH2]L[spsHL]|2
hist2.hist2.q 2 PINT R $(SP)SPS[sps]F[spr]H[spsH2]L[spsHL]|0
hist2.procedure 10 URN L LAB.P.TERM $(SP)SPS[sps]F[spr]H[spsH2]L[spsHL]|1
Ì € i 2
histology.2.comments
[urn,find.sect,hist2.q,hist2.level, hist2.comment.q]
$(SP)SPS[sps]F[spr]H[spsH2]L[spsHL]C[spsHT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
hist2.comment.q 3 PINT R spsHT
hist2.comment.line 60 TEXT L $(SP)SPS[sps]F[spr]H[spsH2]L[spsHL]C[spsHT]
Ì € i 2
saved.text
[urn,find.sect, saved.text.q]
$(SP)SPS[sps]F[spr]X[stQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
saved.text.q 3 PINT R stQ
saved.text.line 92 FREE L $(SP)SPS[sps]F[spr]X[stQ]
Ì € i 2
workload
[urn,find.sect, workload.function]
$(SP)SPS[sps]F[spr]W[scf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
workload.function 10 FREE L LAB.C.WL.FUNC scf
workload.count 2 PINT R $(SP)SPS[sps]F[spr]W[scf]|0
Ì € i 2
xref.tissues
[urn,find.sect, xref.q]
$(SP)SPS[sps]F[spr]X[sprXQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
xref.q 3 PINT R sprXQ
xref.tissue 10 URN L LAB.P.TERM $(SP)SPS[sps]F[spr]X[sprXQ]|0
xref.tissue.key 3 PINT R $(SP)SPS[sps]F[spr]X[sprXQ]|1
Ì € i 2
xref.text
[urn,find.sect,xref.q, xref.text.q]
$(SP)SPS[sps]F[spr]X[sprXQ]T[spsXQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
xref.text.q 3 PINT R spsXQ
xref.text.line 92 FREE L $(SP)SPS[sps]F[spr]X[sprXQ]T[spsXQ]
Ì € i 2
xsaved.text
[urn,find.sect,xref.q, xsaved.text.q]
$(SP)SPS[sps]F[spr]X[sprXQ]X[xstQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
xsaved.text.q 3 PINT R xstQ
xsaved.text.line 92 FREE L $(SP)SPS[sps]F[spr]X[sprXQ]X[xstQ]
Ì € i 2
follow.up
[urn, follow.up.date,follow.up.form]
$(SP)SPS[sps]FU[spsFD,ssx]
Field Name Len Dat Typ J DPM Offset/Local/VAL
follow.up.date 8 DATE L spsFD
follow.up.form 10 FREE L LAB.C.FORM ssx
Ì € i 2
icd.codes
[urn, icd.code]
$(SP)SPS[sps]IC[drb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
icd.code 7 FREE L LAB.C.DIAG drb
Ì € i 2
infce.audit.trail
[urn, infce.audit.q]
$(SP)SPS[sps]IF[spsiq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
infce.audit.q 2 PINT R spsiq
infce.audit.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.infce.audit.seconds+@
VAL=LAB.P.SPEC.entered.offset)
infce.audit.error 50 FREE L $(SP)SPS[sps]IF[spsiq]|6
infce.audit.infce 10 FREE L LAB.C.INFC.DICT$(SP)SPS[sps]IF[spsiq]|1
infce.audit.record 9 PINT R LAB.C.INFCE $(SP)SPS[sps]IF[spsiq]|2
infce.audit.record.type 1 CHOICE L $(SP)SPS[sps]IF[spsiq]|0
infce.audit.seconds 5 PINT R $(SP)SPS[sps]IF[spsiq]|4
infce.audit.status 6 CHOICE L $(SP)SPS[sps]IF[spsiq]|3
infce.audit.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.infce.audit.seconds+@LAB.P
VAL=.SPEC.entered.offset)
infce.audit.user 10 FREE L MIS.USER $(SP)SPS[sps]IF[spsiq]|5
Ì € i 2
int.reports
[urn, int.report]
$(SP)SPS[sps]IR[spsIR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
int.report 21 FREE L spsIR
int.report.printed 6 PINT R $(SP)SPS[sps]IR[spsIR]|0
int.report.rtf.or.word 4 CHOICE L $(SP)SPS[sps]IR[spsIR]|1
set.int.report.last.print 0 FREE L VAL=@.sd-@LAB.P.SPEC.entered.offset^@LAB.P.SPEC.int.re
VAL=port.printed[/IRPT]
Ì € i 2
markers
[urn, marker]
$(SP)SPS[sps]MK[ssk]
Field Name Len Dat Typ J DPM Offset/Local/VAL
marker 10 ALPHANUM L LAB.C.MARK ssk
Ì € i 2
oe.orders
[urn, oe.order]
$(SP)SPS[sps]OEO[po]
Field Name Len Dat Typ J DPM Offset/Local/VAL
oe.order 10 URN L OE.ORD po
Ì € i 2
ordered.procs
[urn, ordered.proc]
$(SP)SPS[sps]OP[spt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ordered.proc 10 URN L LAB.P.TERM spt
ordered.proc.ct 2 PINT R $(SP)SPS[sps]OP[spt]|0
ordered.proc.logic 0 FREE L
Ì € i 2
page.breaks
[urn, pb.rpt.format,pb.section,pb.line]
$(SP)SPS[sps]PB[scg,spr,spsPB]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pb.rpt.format 10 FREE L LAB.C.RFMT scg
pb.section 10 FREE L LAB.P.SECT spr
pb.line 3 INT R spsPB
pb.new.page 1 PINT R $(SP)SPS[sps]PB[scg,spr,spsPB]
Ì € i 2
prelim.sign.outs
[urn, prelim.sign.q]
$(SP)SPS[sps]PS[spsPS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
prelim.sign.q 2 PINT R spsPS
prelim.sign.date 8 DATE L $(SP)SPS[sps]PS[spsPS]|1
prelim.sign.electron.flg 1 FREE L VAL=IF{@prelim.sign.electronic="Y" "*"}
prelim.sign.electronic 1 YN L $(SP)SPS[sps]PS[spsPS]|2
prelim.sign.entry 10 FREE L $(SP)SPS[sps]PS[spsPS]|4
prelim.sign.entry.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.entered.offset+@LAB.P
VAL=.SPEC.prelim.sign.entry)
prelim.sign.entry.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.entered.offset+@LAB.P.SPEC
VAL=.prelim.sign.entry)
prelim.sign.out 10 FREE L MIS.USER $(SP)SPS[sps]PS[spsPS]|0
prelim.sign.user 10 FREE L MIS.USER $(SP)SPS[sps]PS[spsPS]|3
Ì € i 2
procs
[urn, proc]
$(SP)SPS[sps]P[spt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
proc 10 URN L LAB.P.TERM spt
proc.comp.date 8 DATE L VAL=%Z.date.in.magic(@LAB.P.SPEC.entered.offset+@LAB.P
VAL=.SPEC.proc.comp.sec)
proc.comp.sec 10 PINT R $(SP)SPS[sps]P[spt]|3
proc.comp.time 4 HHMM L VAL=%Z.time.out(@LAB.P.SPEC.entered.offset+@LAB.P.SPEC
VAL=.proc.comp.sec)
proc.comp.user 10 FREE L MIS.USER $(SP)SPS[sps]P[spt]|4
proc.complete 1 YN L $(SP)SPS[sps]P[spt]|2
proc.ct 2 PINT R $(SP)SPS[sps]P[spt]|0
proc.site 10 FREE L LAB.C.SITE $(SP)SPS[sps]P[spt]|1
Ì € i 2
qa.history
[urn, qa.hx.q]
$(SP)SPS[sps]QAX[qaQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
qa.hx.q 3 PINT R qaQ
qa.hx.date.time 10 PINT R $(SP)SPS[sps]QAX[qaQ]|2
qa.hx.decision 1 CHOICE L $(SP)SPS[sps]QAX[qaQ]|0
qa.hx.user 10 FREE L MIS.USER $(SP)SPS[sps]QAX[qaQ]|1
Ì € i 2
queries
[urn, query]
$(SP)SPS[sps]Q[ggv]
Field Name Len Dat Typ J DPM Offset/Local/VAL
query 10 FREE L MIS.QUERY ggv
any.ext.query 1 YN L VAL=%LAB.P.SPEC.any.ext.queries(LAB.P.SPEC.urn)
any.query 1 YN L VAL=IF{+@LAB.P.SPEC.queries[LAB.P.SPEC.urn,""] "Y";"N"
VAL=}
query.external 1 YN L VAL=IF{%LAB.P.SPEC.query.ie(LAB.P.SPEC.urn,LAB.P.SPEC.
VAL=query)="EXT" "Y";"N"}
query.internal 1 YN L VAL=IF{%LAB.P.SPEC.query.ie(LAB.P.SPEC.urn,LAB.P.SPEC.
VAL=query)="INT" "Y";"N"}
query.on.stype.cds 1 YN L VAL=IF{@LAB.P.SPEC.spec.type.cds^MIS.SCREEN.mnemonic_.
VAL==. "N";@MIS.SCREEN.fields "Y";"N"}
query.text 60 FREE L VAL=@MIS.QUERY.text[LAB.P.SPEC.query]
response 75 FREE L $(SP)SPS[sps]Q[ggv]|0
yn.comment 99 FREE L $(SP)SPS[sps]Q[ggv]|5
Ì € i 2
query.multiple
[urn,query, qry.mul.q]
$(SP)SPS[sps]Q[ggv]M[ggvMQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
qry.mul.q 3 PINT R ggvMQ
qry.mul.response 75 FREE L $(SP)SPS[sps]Q[ggv]M[ggvMQ]|0
Ì € i 2
reports
[urn, report]
$(SP)SPS[sps]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 $(SP)SPS[sps]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.P.SPEC.reports,@
VAL=LAB.P.SPEC.entered.offset)
Ì € i 2
report.times
[urn,report, report.time]
$(SP)SPS[sps]RP[sch]T[spsrt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
report.time 9 PINT R spsrt
report.time.print.flag 1 FREE L $(SP)SPS[sps]RP[sch]T[spsrt]|0
Ì € i 2
reports.by.doctor
[urn,report, rpt.doctor]
$(SP)SPS[sps]RP[sch]D[ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.doctor 10 FREE L MIS.DOC ggg
last.doctor.report 8 PINT R $(SP)SPS[sps]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.P.SPEC.reports.b
VAL=y.doctor,@LAB.P.SPEC.entered.offset)
Ì € i 2
report.times.by.doctor
[urn,report,rpt.doctor, report.doctor.time]
$(SP)SPS[sps]RP[sch]D[ggg]T[spsRd]
Field Name Len Dat Typ J DPM Offset/Local/VAL
report.doctor.time 9 PINT R spsRd
report.doctor.time.flag 1 FREE L $(SP)SPS[sps]RP[sch]D[ggg]T[spsRd]|0
Ì € i 2
reports.by.location
[urn,report, rpt.location]
$(SP)SPS[sps]RP[sch]L[ggn]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rpt.location 10 FREE L MIS.LOCN ggn
last.location.report 8 PINT R $(SP)SPS[sps]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.P.SPEC.reports.b
VAL=y.location,@LAB.P.SPEC.entered.offset)
Ì € i 2
report.times.by.location
[urn,report,rpt.location, report.location.time]
$(SP)SPS[sps]RP[sch]L[ggn]T[spsRl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
report.location.time 9 PINT R spsRl
report.location.time.flag 1 FREE L $(SP)SPS[sps]RP[sch]L[ggn]T[spsRl]|0
Ì € i 2
result.prompts
[urn, result.prompt]
$(SP)SPS[sps]QS[spp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
result.prompt 15 FREE L LAB.P.PROMPT spp
any.res 1 YN L VAL=IF{+@LAB.P.SPEC.questionnaires[LAB.P.SPEC.urn,""]
VAL="Y";"N"}
result 92 FREE L $(SP)SPS[sps]QS[spp]|0
result.abn.flag 3 FREE L $(SP)SPS[sps]QS[spp]|2
result.default 92 FREE L $(SP)SPS[sps]QS[spp]|3
result.text 92 FREE L $(SP)SPS[sps]QS[spp]|1
Ì € i 2
result.mult
[urn,result.prompt, mult.result.q]
$(SP)SPS[sps]QS[spp,spsRQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mult.result.q 2 PINT R spsRQ
mult.result 30 FREE L $(SP)SPS[sps]QS[spp,spsRQ]|0
mult.result.abn.flag 3 FREE L $(SP)SPS[sps]QS[spp,spsRQ]|2
mult.result.text 60 FREE L $(SP)SPS[sps]QS[spp,spsRQ]|1
Ì € i 2
result.prompts.qa
[urn, result.prompt.qa]
$(SP)SPS[sps]QSQ[spp]
Field Name Len Dat Typ J DPM Offset/Local/VAL
result.prompt.qa 15 FREE L LAB.P.PROMPT spp
result.data 200 FREE L $(SP)SPS[sps]QSQ[spp]
Ì € i 2
rich.text.reports
[urn, rtf.report.format]
$(SP)SPS[sps]RTF[scg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rtf.report.format 10 FREE L LAB.C.RFMT scg
rtf.confidential 1 CHOICE L $(SP)SPS[sps]RTF[scg]|1
rtf.date 8 DATE L VAL=IF{@LAB.P.SPEC.rtf.seconds^XX %Z.date.in.magic(XX)
VAL=}
rtf.seconds 9 PINT R $(SP)SPS[sps]RTF[scg]|0
rtf.time 4 HHMM L VAL=IF{@LAB.P.SPEC.rtf.seconds^XX %Z.time.out(XX)}
Ì € i 2
rich.text.saved.previews
[urn, rtf.sprev.q]
$(SP)SPS[sps]RSP[spsRQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rtf.sprev.q 3 PINT R spsRQ
rtf.sprev.date 8 DATE L VAL=IF{@LAB.P.SPEC.rtf.sprev.seconds^XX %Z.date.in.mag
VAL=ic(XX)}
rtf.sprev.format 10 FREE L LAB.C.RFMT $(SP)SPS[sps]RSP[spsRQ]|0
rtf.sprev.seconds 9 PINT R $(SP)SPS[sps]RSP[spsRQ]|1
rtf.sprev.time 4 HHMM L VAL=IF{@LAB.P.SPEC.rtf.sprev.seconds^XX %Z.time.out(XX
VAL=)}
rtf.sprev.user 10 FREE L MIS.USER $(SP)SPS[sps]RSP[spsRQ]|2
Ì € i 2
sign.urns
[urn, sign.urn.provider]
$(SP)SPS[sps]SU[ggg]
Field Name Len Dat Typ J DPM Offset/Local/VAL
sign.urn.provider 10 FREE L MIS.DOC ggg
sign.urn 30 URN L MIS.SIGN $(SP)SPS[sps]SU[ggg]|0
sign.urn.sec 10 PINT R $(SP)SPS[sps]SU[ggg]|1
Ì € i 2
signout.audit
[urn, signout.audit.q]
$(SP)SPS[sps]SX[spsSX]
Field Name Len Dat Typ J DPM Offset/Local/VAL
signout.audit.q 3 PINT R spsSX
signout.audit.action 6 CHOICE L $(SP)SPS[sps]SX[spsSX]|6
signout.audit.addn.sect 10 FREE L LAB.P.SECT $(SP)SPS[sps]SX[spsSX]|3
signout.audit.comment 50 FREE L $(SP)SPS[sps]SX[spsSX]|8
signout.audit.date 8 DATE L $(SP)SPS[sps]SX[spsSX]|1
signout.audit.edit.date 8 DATE L VAL=%Z.date.in.magic(@signout.audit.date.time+@entered
VAL=.offset)
signout.audit.edit.time 4 HHMM L VAL=%Z.time.out(@signout.audit.date.time+@entered.offs
VAL=et)
signout.audit.electronic 1 YN L $(SP)SPS[sps]SX[spsSX]|7
signout.audit.sign 10 FREE L MIS.USER $(SP)SPS[sps]SX[spsSX]|0
signout.audit.type 2 CHOICE L $(SP)SPS[sps]SX[spsSX]|2
signout.audit.type.out 6 CHOICE L VAL=IF{@signout.audit.type^XX="P" "PRELIM";XX="F" "FIN
VAL=AL";XX="PA" "PADDEN";XX="FA" "FADDEN"}
signout.audit.user 10 FREE L MIS.USER $(SP)SPS[sps]SX[spsSX]|4
Ì € i 2
site.orders
[urn, site.order.site,site.order]
$(SP)SPS[sps]SO[scl,spt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
site.order.site 10 FREE L LAB.C.SITE scl
site.order 10 URN L LAB.P.TERM spt
Ì € i 2
sites
[urn, site]
$(SP)SPS[sps]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.P.SPEC.site.status[urn,@.lis.site]\2=1 "
VAL=Y";"N"}
need.at.site 1 YN L VAL=IF{@p.LAB.P.SPEC.site.status[urn,@.lis.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.P.SPEC.site.status[urn,@.lis.site])
VAL= "Y";"N"}
received.at.site 1 YN L VAL=IF{@p.LAB.P.SPEC.site.status[urn,@.lis.site]=3 "Y"
VAL=;"N"}
set.site.received 0 FREE L VAL=@.sd-@LAB.P.SPEC.entered.offset^@LAB.P.SPEC.site.r
VAL=eceived
site.batch 20 FREE L $(SP)SPS[sps]LS[scl]|6
site.final.destination 1 YN L $(SP)SPS[sps]LS[scl]|4
site.next.sites 40 FREE L $(SP)SPS[sps]LS[scl]|5
site.received 8 PINT R $(SP)SPS[sps]LS[scl]|1
site.received.by 10 FREE L MIS.USER $(SP)SPS[sps]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 $(SP)SPS[sps]LS[scl]|3
site.status 1 CHOICE L $(SP)SPS[sps]LS[scl]|0
was.at.site 1 YN L VAL=IF{@p.LAB.P.SPEC.site.status[urn,@.lis.site]=0 "Y"
VAL=;"N"}
Ì € i 2
status.hx
[urn, status.q]
$(SP)SPS[sps]SH[spsSH]
Field Name Len Dat Typ J DPM Offset/Local/VAL
status.q 2 PINT R spsSH
new.status 4 FREE L $(SP)SPS[sps]SH[spsSH]|0
status.date 8 DATE L VAL=%Z.date.in.magic(@status.sec+@entered.offset)
status.sec 9 PINT R $(SP)SPS[sps]SH[spsSH]|2
status.time 4 HHMM L VAL=%Z.time.out(@status.sec+@entered.offset)
status.user 10 FREE L MIS.USER $(SP)SPS[sps]SH[spsSH]|1
Ì € i 2
storage
[urn, storage.area,storage.location,storage.shelf,storage.rack,storage.row,storage.col]
$(SP)SPS[sps]STR[ssz,sszl,sszs,sszr,sszR,sszC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
storage.area 10 FREE L 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 $(SP)SPS[sps]STR[ssz,sszl,sszs,sszr,sszR,sszC]
Ì € i 2
tissues
[urn, tissue.q]
$(SP)SPS[sps]T[sptQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
tissue.q 3 PINT R sptQ
tissue 10 URN L LAB.P.TERM $(SP)SPS[sps]T[sptQ]|0
tissue.desc 65 FREE L $(SP)SPS[sps]T[sptQ]|1
tissue.desc.30 30 FREE L VAL=@tissue.desc$30
tissue.id 4 FREE L $(SP)SPS[sps]T[sptQ]|2
tissue.key 3 PINT R $(SP)SPS[sps]T[sptQ]|4
tissue.name.and.desc 93 FREE L VAL=IF{@LAB.P.SPEC.tissue.synonym;@LAB.P.TERM.name[@LA
VAL=B.P.SPEC.tissue]}_(" ("_@LAB.P.SPEC.tissue.desc.30
VAL=_")"'=" ()")
tissue.synonym 60 FREE L $(SP)SPS[sps]T[sptQ]|3
tissue.term.or.syn 60 FREE L VAL=IF{@LAB.P.SPEC.tissue.synonym;@LAB.P.TERM.name[@LA
VAL=B.P.SPEC.tissue]}
tissue.term.or.syn.35 35 FREE L VAL=IF{@LAB.P.SPEC.tissue.synonym;@LAB.P.TERM.name[@LA
VAL=B.P.SPEC.tissue]}$35
Ì € i 2
tissues.by.key
[urn, tissue.by.key]
$(SP)SPS[sps]TK[sptK]
Field Name Len Dat Typ J DPM Offset/Local/VAL
tissue.by.key 10 PINT R sptK
tissue.by.key.id 4 FREE L $(SP)SPS[sps]TK[sptK]|1
tissue.by.key.q 3 PINT R $(SP)SPS[sps]TK[sptK]|2
tissue.by.key.tissue 10 URN L LAB.P.TERM $(SP)SPS[sps]TK[sptK]|0
Ì € i 2
tissues.by.value
[urn, tissue.by.val,tissue.by.val.q]
$(SP)SPS[sps]TV[spt,sptQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
tissue.by.val 10 URN L LAB.P.TERM spt
tissue.by.val.q 3 PINT R sptQ
Ì € i 2
user.slide.counts
[urn, user.slide.user,user.slide.date]
$(SP)SPS[sps]UC[gu,spsD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
user.slide.user 10 FREE L MIS.USER gu
user.slide.date 8 DATE L spsD
user.slide.count 3 PDEC R $(SP)SPS[sps]UC[gu,spsD]|0
Ì € i 2
word.saved.previews
[urn, word.sprev.q]
$(SP)SPS[sps]WSP[spsWQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
word.sprev.q 3 PINT R spsWQ
word.sprev.date 8 DATE L VAL=IF{@LAB.P.SPEC.word.sprev.seconds^XX %Z.date.in.ma
VAL=gic(XX)}
word.sprev.format 10 FREE L LAB.C.RFMT $(SP)SPS[sps]WSP[spsWQ]|0
word.sprev.seconds 9 PINT R $(SP)SPS[sps]WSP[spsWQ]|1
word.sprev.time 4 HHMM L VAL=IF{@LAB.P.SPEC.word.sprev.seconds^XX %Z.time.out(X
VAL=X)}
word.sprev.user 10 FREE L MIS.USER $(SP)SPS[sps]WSP[spsWQ]|2
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | |