Ì i 2
main
[urn]
*(SP)SPB[spb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
urn 10 PINT R spb
closed 8 DATE L *(SP)SPB[spb]|4
date 8 DATE L *(SP)SPB[spb]|0
department 10 FREE L LAB.P.DEPT *(SP)SPB[spb]|5
duplicate.flag 16 FREE L VAL=IF{@closed "CLOSED"}^x_IF{@printed IF{x " "}_"DUPL
VAL=ICATE"}
entered.time 4 TIME L *(SP)SPB[spb]|7
entered.user 10 FREE L MIS.USER *(SP)SPB[spb]|6
mnemonic.id 30 FREE L VAL=("WB:",@worksheet,%Z.date.out(@date),"Batch #"_@nu
VAL=mber)
name.id 50 FREE L VAL=(@LAB.P.WS.name[@worksheet],%Z.date.out(@date),"BA
VAL=TCH #"_@number)
number 3 PINT R *(SP)SPB[spb]|2
printed 1 YN L *(SP)SPB[spb]|9
site 10 FREE L LAB.C.SITE *(SP)SPB[spb]|8
status 6 FREE L *(SP)SPB[spb]|3
temp.prefix 2 FREE L VAL=PW
worksheet 10 FREE L LAB.P.WS *(SP)SPB[spb]|1
Ì € i 2
specimens
[urn, specimen.q]
*(SP)SPB[spb]S[spbSq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
specimen.q 3 PINT R spbSq
specimen 30 URN L LAB.P.SPEC *(SP)SPB[spb]S[spbSq]|0
Ì i 2
preview
[prev.worksheet]
/SPBp[spw]
Field Name Len Dat Typ J DPM Offset/Local/VAL
prev.worksheet 10 FREE L LAB.P.WS spw
prev.batches 3 INT R /SPBp[spw]|3
prev.last 3 PINT R /SPBp[spw]|1
prev.min.max 10 FREE L /SPBp[spw]|2
prev.specimen 3 PINT R /SPBp[spw]|0
Ì i 2
process
/(.D)PTH.WP
Field Name Len Dat Typ J DPM Offset/Local/VAL
pr.batch 10 PINT R LAB.P.WB /(.D)PTH.WP|0
pr.rebuild 1 FREE L /(.D)PTH.WP|2
pr.worksheet 10 FREE L LAB.P.WS /(.D)PTH.WP|1
Ì € i 2
process.specs
[pr.specimen.q]
/(.D)PTH.WP["S",spbSq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pr.specimen.q 5 PINT R spbSq
pr.specimen.id 15 FREE L /(.D)PTH.WP["S",spbSq]|0
pr.specimen.patient 30 FREE L LAB.C.PAT /(.D)PTH.WP["S",spbSq]|2
pr.specimen.procs 30 FREE L /(.D)PTH.WP["S",spbSq]|4
pr.specimen.q.ext 5 PINT R VAL=@pr.specimen.q
pr.specimen.tissues 31 FREE L /(.D)PTH.WP["S",spbSq]|3
pr.specimen.urn 30 URN L LAB.P.SPEC /(.D)PTH.WP["S",spbSq]|1
Ì i 2
process.specs.chosen
[spec.chosen.q]
/LAB.SPBP[spbCQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
spec.chosen.q 3 PINT R spbCQ
item.chosen.q 3 PINT R /LAB.SPBP[spbCQ]|1
spec.chosen.id 30 FREE L /LAB.SPBP[spbCQ]|0
Ì i 2
reprint
[repr.q]
/SPB.RP[spbrq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
repr.q 3 PINT R spbrq
repr.batches 11 FREE L /SPB.RP[spbrq]|3
repr.dates 17 FREE L /SPB.RP[spbrq]|1
repr.type 6 CHOICE L /SPB.RP[spbrq]|2
repr.worksheets 21 FREE L /SPB.RP[spbrq]|0
Ì i 2
workbatch.list
[workbatch.q]
/L[spbLq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
workbatch.q 2 PINT R spbLq
workbatch.date 8 FREE L /L[spbLq]|2
workbatch.number 3 PINT R /L[spbLq]|3
workbatch.urn 10 PINT R LAB.P.WB /L[spbLq]|0
workbatch.worksheet 10 FREE L LAB.P.WS /L[spbLq]|1
Ì i 2
worksheet.create.list
[wksht.q]
/SPB.WK[spbWQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
wksht.q 2 PINT R spbWQ
wksht.fill.last 3 CHOICE L /SPB.WK[spbWQ]|2
wksht.no.of.wkshts 3 FREE L /SPB.WK[spbWQ]|1
wksht.select 5 CHOICE L /SPB.WK[spbWQ]|4
wksht.spec.prefix 2 FREE L /SPB.WK[spbWQ]|3
wksht.worksheet 10 FREE L LAB.P.WS /SPB.WK[spbWQ]|0
Ì € i 2
assigned.to.range
[wksht.q, range.assigned.to]
/SPB.WK[spbWQ]A[gu]
Field Name Len Dat Typ J DPM Offset/Local/VAL
range.assigned.to 10 FREE L MIS.USER gu
range.assigned.to.action 7 CHOICE L /SPB.WK[spbWQ]A[gu]|0
Ì € i 2
worksheet.create.by.batch
[wksht.q, other.batch.q]
/SPB.WK[spbWQ]B[spbOB]
Field Name Len Dat Typ J DPM Offset/Local/VAL
other.batch.q 2 PINT R spbOB
other.batch 10 PINT R LAB.P.WB /SPB.WK[spbWQ]B[spbOB]|0
other.batch.date 8 DATE L /SPB.WK[spbWQ]B[spbOB]|2
other.batch.number 3 PINT R /SPB.WK[spbWQ]B[spbOB]|3
other.batch.worksheet 10 FREE L LAB.P.WS /SPB.WK[spbWQ]B[spbOB]|1
Ì € i 2
worksheet.create.by.spec
[wksht.q, range.q]
/SPB.WK[spbWQ]S[spbRq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
range.q 2 PINT R spbRq
range.ent.date 8 DATE L /SPB.WK[spbWQ]S[spbRq]|2
range.from.number 7 PINT R /SPB.WK[spbWQ]S[spbRq]|3
range.prefix 2 FREE L /SPB.WK[spbWQ]S[spbRq]|0
range.recv.date 8 DATE L /SPB.WK[spbWQ]S[spbRq]|1
range.thru.number 7 PINT R /SPB.WK[spbWQ]S[spbRq]|4
Ì € i 2
worksheet.create.specs
[wksht.q, wb.specimen.q]
/SPB.WK[spbWQ]SP[spsQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
wb.specimen.q 3 PINT R spsQ
wb.specimen 30 URN L LAB.P.SPEC /SPB.WK[spbWQ]SP[spsQ]|0
Index Files Subscripts/Physical Base
id.x [worksheet,date,number] = urn
?(SP)SPBI[spw,spbD,spbN]
|
|
| | | | | | | | | | | |