Ì i 2
audit.x
[audit.seconds,audit.patient,audit.module,audit.spec]
?(S)SCAA[scaAS,aa,scaM,sss]
Field Name Len Dat Typ J DPM Offset/Local/VAL
audit.seconds 10 PINT R scaAS
audit.patient 30 FREE L LAB.C.PAT aa
audit.module 1 CHOICE L scaM
audit.spec 10 FREE L LAB.C.SPEC sss
audit.date 8 DATE L VAL=%Z.date.in.magic(LAB.C.ACT.audit.seconds)
audit.program 75 FREE L ?(S)SCAA[scaAS,aa,scaM,sss]|1
audit.spec.num 15 FREE L VAL=IF{@LAB.C.ACT.audit.module^x="L" @LAB.L.SPEC.numbe
VAL=r[@LAB.C.ACT.audit.spec];x="M" @LAB.M.SPEC.number[
VAL=@LAB.C.ACT.audit.spec];x="B" @LAB.B.SPEC.number[@L
VAL=AB.C.ACT.audit.spec];x="P" @LAB.P.SPEC.number[@LAB
VAL=.C.ACT.audit.spec]}
audit.time 4 HHMM L VAL=%Z.time.out(LAB.C.ACT.audit.seconds)
audit.user 10 FREE L MIS.USER ?(S)SCAA[scaAS,aa,scaM,sss]|0
audit.user.name.and.mne 47 FREE L VAL=@MIS.USER.name[@LAB.C.ACT.audit.user]_" ("_@LAB.C.
VAL=ACT.audit.user_")"
Ì i 2
by.patient
[date,patient,module,specimen]
*(S)SCA[sca,aa,scaM,scaS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
date 8 DATE L sca
patient 30 FREE L LAB.C.PAT aa
module 1 CHOICE L scaM
specimen 10 PINT R scaS
doctor 10 FREE L MIS.DOC
icd.code 7 FREE L LAB.C.DIAG
marker 10 ALPHANUM L LAB.C.MARK
new.activity 1 FREE L *(S)SCA[sca,aa,scaM,scaS]
req.urn 10 URN L LAB.C.REQ
Ì i 2
nur.bbk
[nur.bbk.q]
*(S)SCANB[scBNQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
nur.bbk.q 5 PINT R scBNQ
nur.bbk.error 12 CHOICE L *(S)SCANB[scBNQ]|5
nur.bbk.facility 10 FREE L MIS.FACILITY *(S)SCANB[scBNQ]|0
nur.bbk.patient 30 URN L ADM.PAT *(S)SCANB[scBNQ]|2
nur.bbk.seconds 9 PINT R *(S)SCANB[scBNQ]|1
nur.bbk.unit.status 12 CHOICE L *(S)SCANB[scBNQ]|4
nur.bbk.unit.urn 10 URN L LAB.B.UNIT *(S)SCANB[scBNQ]|3
Ì i 2
oe
[oe.facility,oe.seconds,oe.urn,oe.spec.urn]
*(S)SCAO[gqb,scaoS,po,scaoU]
Field Name Len Dat Typ J DPM Offset/Local/VAL
oe.facility 10 FREE L MIS.FACILITY gqb
oe.seconds 9 PINT R scaoS
oe.urn 10 URN L OE.ORD po
oe.spec.urn 10 URN L scaoU
oe.cancel.prod 15 FREE L *(S)SCAO[gqb,scaoS,po,scaoU]|9
oe.doctor 10 FREE L MIS.DOC *(S)SCAO[gqb,scaoS,po,scaoU]|4
oe.error 50 FREE L *(S)SCAO[gqb,scaoS,po,scaoU]|1
oe.module 1 CHOICE L *(S)SCAO[gqb,scaoS,po,scaoU]|2
oe.moved.from.req.urn 10 URN L LAB.C.REQ *(S)SCAO[gqb,scaoS,po,scaoU]|7
oe.priority 1 FREE L *(S)SCAO[gqb,scaoS,po,scaoU]|6
oe.prod.cancel.cnt 3 FREE L *(S)SCAO[gqb,scaoS,po,scaoU]|8
oe.spec.status 8 CHOICE L *(S)SCAO[gqb,scaoS,po,scaoU]|0
oe.test.affected 15 FREE L *(S)SCAO[gqb,scaoS,po,scaoU]|5
oe.user 10 FREE L MIS.USER *(S)SCAO[gqb,scaoS,po,scaoU]|3
Ì i 2
oe.data
[oe.facility2,oe.seconds2,oe.urn2,oe.spec.urn2]
*(S)SCAQ[gqb,scaoS,po,scaoU]
Field Name Len Dat Typ J DPM Offset/Local/VAL
oe.facility2 10 FREE L MIS.FACILITY gqb
oe.seconds2 9 PINT R scaoS
oe.urn2 10 URN L OE.ORD po
oe.spec.urn2 10 URN L scaoU
Ì € i 2
oe.tests
[oe.facility2,oe.seconds2,oe.urn2,oe.spec.urn2, oe.test]
*(S)SCAQ[gqb,scaoS,po,scaoU]T[scaT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
oe.test 15 FREE L scaT
oe.test.ct 1 PINT R *(S)SCAQ[gqb,scaoS,po,scaoU]T[scaT]|0
oe.test.doc 10 FREE L MIS.DOC *(S)SCAQ[gqb,scaoS,po,scaoU]T[scaT]|1
oe.test.ord.src 10 FREE L *(S)SCAQ[gqb,scaoS,po,scaoU]T[scaT]|2
Ì i 2
review.x
[review.module,review.spec.urn]
*(S)SCAR[scarM,scarU]
Field Name Len Dat Typ J DPM Offset/Local/VAL
review.module 1 CHOICE L scarM
review.spec.urn 7 URN L scarU
review.seconds 9 PINT R *(S)SCAR[scarM,scarU]
Index Files Subscripts/Physical Base
by.doctor.patient [date,doctor,patient,module,specimen] = new.activity
?(S)SCAD[sca,ggg,aa,scaM,scaS]
by.marker [date,marker,patient,module,specimen]
?(S)SCAM[sca,ssk,aa,scaM,scaS]
|
|
| | | | | |