sHelp
                                     LAB.C.MRI
     i   2
 expired.pts
 main
   bbk.specs
     bbk.comments
     bbk.products
     bbk.tests
       bbk.mul.results
       bbk.result.comments
   bbk.tests.by.coll
   lab.specs
     lab.comments
     lab.tests
       lab.mul.results
       lab.result.comments
   lab.tests.by.coll
   markers
   merge.unit.recipients
   mic.procs.by.coll
   mic.specs
     mic.comments
     mic.procs
 od.x
 oe.req.x

 Ì     i   2
expired.pts
[expired.date,expired.pt.mri]
*(S)SSHE[sshED,ea]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 expired.date                 8 DATE     L                 sshED                                                       
 expired.pt.mri              25 URN      L  LAB.C.MRI      ea                                                      
 Ì   €   i   2
main
[urn]
*(S)SSH[ea]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 urn                         25 URN      L  MRI.PAT        ea                                                      
 active                       1 YN       L                 VAL=@t.MRI.PAT.active                                       
 adm.urn                     30 FREE     L  LAB.C.PAT                                                              
 age                          7 AGE      R                 VAL=@t.MRI.PAT.age                                          
 any.lab.spec.history         1 YN       L                 VAL=IF{+@LAB.C.MRI.lab.specs[LAB.C.MRI.urn,""] "Y";"N"      
                                                           VAL=}                                                       
 bad.debt                     1 YN       L                 VAL=@t.MRI.PAT.bad.debt                                     
 bbk.wristband.num           10 FREE     L                 *(S)SSH[ea]|0                                               
 birthdate                   10 BDATE    L                 VAL=@t.MRI.PAT.birthdate                                    
 client                      10 FREE     L  LAB.R.CLIENT                                                           
 comment                     60 FREE     L                 VAL=@t.MRI.PAT.comment                                      
 computed.birthdate          10 BDATE    L                 VAL=@t.MRI.PAT.computed.birthdate                           
 confidential                 1 YN       L                 VAL=@t.MRI.PAT.confidential                                 
 current.age                  7 FREE     L                 VAL=%Z.age(@t.MRI.PAT.computed.birthdate,LAB.C.MRI.exp      
                                                           VAL=ire.date)                                               
 demo.recall.date             8 DATE     L                 VAL=@t.MRI.PAT.demo.recall.date                             
 discharge.disposition       10 FREE     L  MIS.DIS        VAL=@t.MRI.PAT.discharge.disposition                    
 expire.date                  8 DATE     L                 VAL=IF{"Y"'=@MIS.DIS.expired[@MRI.PAT.discharge.dispos      
                                                           VAL=ition] "";@MRI.PAT.visit.discharge.date[+@MRI.PAT.      
                                                           VAL=visits[urn,""]^XX];99999999-(XX#"0|"$8)}                
 hx.urn                      10 URN      L  LAB.B.HX       *(S)SSH[ea]|1                                           
 id.external                 25 URN      L                                                                             
 id.internal                 25 URN      L                                                                             
 last.activity.date           8 DATE     L                 VAL=@t.MRI.PAT.last.activity.date                           
 maiden.other.name           30 NAME     L                 VAL=@t.MRI.PAT.maiden.other.name                            
 merged.to                   25 URN      L  MRI.PAT        VAL=@t.MRI.PAT.merged.to                                
 mf.unit.number              12 FREE     L                 VAL=@t.MRI.PAT.mf.unit.number                               
 mothers.first.name          20 FREE     L                 VAL=@t.MRI.PAT.mothers.first.name                           
 name                        30 NAME     L                 VAL=@t.MRI.PAT.name                                         
 ref.pt.id                   10 FREE     L                                                                             
 sex                          1 CHOICE   L                 VAL=@t.MRI.PAT.sex                                          
 temp.prefix                  2 FREE     L                 VAL=CM                                                      
 unit.number                 10 FREE     L                 VAL=@t.MRI.PAT.px.unit.number[LAB.C.MRI.urn,@.mri.pfx]      
 Ì   €   i   2
bbk.specs
[urn,  bbk.spec]
*(S)SSH[ea]BS[sbs]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 bbk.spec                    30 URN      L  LAB.B.SPEC     sbs                                                     
 bbk.age.sex                  9 FREE     L                 VAL=(%Z.age.format.strip(@LAB.C.MRI.bbk.normals.age)_"      
                                                           VAL=/"_@LAB.C.MRI.sex)                                      
 bbk.bar.code.number         11 FREE     L                 *(S)SSH[ea]BS[sbs]A|9                                       
 bbk.cancel.comments.file     0 FREE     L                 *(S)SSH[ea]BS[sbs]CC                                        
 bbk.cancelled.date           8 DATE     L                 VAL=%Z.date.in.magic(@LAB.C.MRI.bbk.cancelled.time.int      
                                                           VAL=)                                                       
 bbk.cancelled.time           4 HHMM     L                 VAL=%Z.time.out(@LAB.C.MRI.bbk.cancelled.time.int)          
 bbk.cancelled.time.int       9 PINT     R                 *(S)SSH[ea]BS[sbs]A|3                                       
 bbk.cancelled.user          10 FREE     L  MIS.USER       *(S)SSH[ea]BS[sbs]A|2                                   
 bbk.coll.date.and.time      13 FREE     L                 VAL=%Z.date.out(@LAB.C.MRI.bbk.collection.date)_" "_@L      
                                                           VAL=AB.C.MRI.bbk.collection.time                            
 bbk.collect.batch.number     3 PINT     R                 *(S)SSH[ea]BS[sbs]A|5                                       
 bbk.collected.by            10 FREE     L  MIS.USER       *(S)SSH[ea]BS[sbs]|13                                   
 bbk.collection.batch        10 PINT     R  LAB.C.CB       *(S)SSH[ea]BS[sbs]|20                                   
 bbk.collection.batch.date    8 DATE     L                 *(S)SSH[ea]BS[sbs]A|4                                       
 bbk.collection.batch.id     24 FREE     L                 VAL=@LAB.C.MRI.bbk.collection.category_IF{@LAB.C.MRI.b      
                                                           VAL=bk.collection.batch.date^XX " "_%Z.date.out(XX)_"       
                                                           VAL=#"_@LAB.C.MRI.bbk.collection.batch.number}              
 bbk.collection.category     10 FREE     L  LAB.C.COL.CAT  *(S)SSH[ea]BS[sbs]|15                                   
 bbk.collection.date          8 DATE     L                 *(S)SSH[ea]BS[sbs]|3                                        
 bbk.collection.date.tform    5 FREE     L                 VAL=IF{@LAB.C.MRI.bbk.collection.date^X "T"_IF{X=@.tod      
                                                           VAL=ay "";%Z.date.sub(X,@.today)^X<0;"+"_X}}             
 bbk.collection.time          4 HHMMU    L                 *(S)SSH[ea]BS[sbs]|4                                        
 bbk.comments.file            0 FREE     L                 *(S)SSH[ea]BS[sbs]C                                         
 bbk.entered.date             8 DATE     L                 VAL=%Z.date.in.magic(@LAB.C.MRI.bbk.entered.offset)         
 bbk.entered.offset           9 PINT     R                 *(S)SSH[ea]BS[sbs]|16                                       
 bbk.entered.time             4 HHMM     L                 VAL=%Z.time.out(@LAB.C.MRI.bbk.entered.offset)              
 bbk.entered.user            10 FREE     L  MIS.USER       *(S)SSH[ea]BS[sbs]A|1                                   
 bbk.last.activity            8 PINT     R                 *(S)SSH[ea]BS[sbs]|22                                       
 bbk.last.activity.date       8 DATE     L                 VAL=IF{@LAB.C.MRI.bbk.last.activity^XX %Z.date.in.magi      
                                                           VAL=c(XX+@LAB.C.MRI.bbk.entered.offset)}                    
 bbk.last.activity.time       4 HHMM     L                 VAL=IF{@LAB.C.MRI.bbk.last.activity^XX %Z.time.out(XX+      
                                                           VAL=@LAB.C.MRI.bbk.entered.offset)}                         
 bbk.normals.age              8 AGE.SORT L                 *(S)SSH[ea]BS[sbs]|17                                       
 bbk.number                  15 FREE     L                 *(S)SSH[ea]BS[sbs]|0                                        
 bbk.number.part              5 PINT     R                 *(S)SSH[ea]BS[sbs]|8                                        
 bbk.order.site              10 FREE     L  LAB.C.SITE     *(S)SSH[ea]BS[sbs]A|8                                   
 bbk.patient                 30 FREE     L  LAB.C.PAT      *(S)SSH[ea]BS[sbs]|1                                    
 bbk.prefix                   2 FREE     L                 *(S)SSH[ea]BS[sbs]|7                                        
 bbk.priority                 1 FREE     L                 *(S)SSH[ea]BS[sbs]|6                                        
 bbk.recd.date.and.time      13 FREE     L                 VAL=IF{@LAB.C.MRI.bbk.received.date %Z.date.out(@LAB.C      
                                                           VAL=.MRI.bbk.received.date)_" "_@LAB.C.MRI.bbk.receive      
                                                           VAL=d.time}                                                 
 bbk.received                 1 YN       L                 *(S)SSH[ea]BS[sbs]|12                                       
 bbk.received.by             10 FREE     L  MIS.USER       *(S)SSH[ea]BS[sbs]|14                                   
 bbk.received.date            8 DATE     L                 *(S)SSH[ea]BS[sbs]|9                                        
 bbk.received.time            4 HHMMU    L                 *(S)SSH[ea]BS[sbs]|10                                       
 bbk.report.last.printed      8 PINT     R                 *(S)SSH[ea]BS[sbs]|21                                       
 bbk.req.number               8 FREE     L                 VAL=@LAB.C.REQ.number[@LAB.C.MRI.bbk.req.urn]               
 bbk.req.urn                 10 URN      L  LAB.C.REQ      *(S)SSH[ea]BS[sbs]|5                                    
 bbk.rpt.last.prt.date        8 DATE     L                 VAL=IF{@LAB.C.MRI.bbk.report.last.printed^XX %Z.date.i      
                                                           VAL=n.magic(XX+@LAB.C.MRI.bbk.entered.offset)}              
 bbk.rpt.last.prt.time        4 HHMM     L                 VAL=IF{@LAB.C.MRI.bbk.report.last.printed^XX %Z.time.o      
                                                           VAL=ut(XX+@LAB.C.MRI.bbk.entered.offset)}                   
 bbk.status                   4 CHOICE   L                 *(S)SSH[ea]BS[sbs]|2                                        
 bbk.status.before.cancel     4 CHOICE   L                 *(S)SSH[ea]BS[sbs]|19                                       
 bbk.subm.doc.name           30 FREE     L                 VAL=IF{@LAB.C.MRI.bbk.subm.doc.non.dict.nm;@MIS.DOC.na      
                                                           VAL=me[@LAB.C.MRI.bbk.subm.doctor]}                         
 bbk.subm.doc.non.dict.nm    30 FREE     L                 *(S)SSH[ea]BS[sbs]A|0                                       
 bbk.subm.doctor             10 FREE     L  MIS.DOC        *(S)SSH[ea]BS[sbs]|11                                   
 bbk.wkld.function           10 FREE     L  LAB.C.WL.FUNC  *(S)SSH[ea]BS[sbs]|18                                   
 Ì   €   i   2
bbk.comments
[urn,bbk.spec,  bbk.comment.q]
*(S)SSH[ea]BS[sbs]C[sshBC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 bbk.comment.q                2 PINT     R                 sshBC                                                       
 bbk.comment                 60 TEXT     L                 *(S)SSH[ea]BS[sbs]C[sshBC]                                  
 Ì   €   i   2
bbk.products
[urn,bbk.spec,  bbk.product]
*(S)SSH[ea]BS[sbs]P[sbp]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 bbk.product                 15 FREE     L  LAB.B.PROD     sbp                                                     
 bbk.product.count            2 PINT     R                 *(S)SSH[ea]BS[sbs]P[sbp]|0                                  
 Ì   €   i   2
bbk.tests
[urn,bbk.spec,  bbk.test]
*(S)SSH[ea]BS[sbs]T[sbt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 bbk.test                     9 PDEC5    R  LAB.B.TEST     sbt                                                     
 bbk.abnormal.flag            3 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]|7                                  
 bbk.alpha.result.code       10 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]|11                                 
 bbk.canned.text             10 FREE     L  LAB.C.TEXT     *(S)SSH[ea]BS[sbs]T[sbt]|14                             
 bbk.clin.sign.comment        1 YN       L                 *(S)SSH[ea]BS[sbs]T[sbt]C                                   
 bbk.end.of.profile           9 PDEC5    R  LAB.B.TEST     *(S)SSH[ea]BS[sbs]T[sbt]|15                             
 bbk.int.abnormal.flag        3 CHOICE   L                 *(S)SSH[ea]BS[sbs]T[sbt]|13                                 
 bbk.normal.range            11 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]|8                                  
 bbk.result                  20 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]|0                                  
 bbk.result.group            10 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]|1                                  
 bbk.result.method           10 FREE     L  LAB.C.METH     *(S)SSH[ea]BS[sbs]T[sbt]|6                              
 bbk.result.time              8 PINT     R                 *(S)SSH[ea]BS[sbs]T[sbt]|2                                  
 bbk.result.user             10 FREE     L  MIS.USER       *(S)SSH[ea]BS[sbs]T[sbt]|4                              
 bbk.review.flag              1 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]|16                                 
 bbk.test.future.spec        30 URN      L  LAB.B.SPEC     *(S)SSH[ea]BS[sbs]T[sbt]|10                             
 bbk.test.past.spec          30 URN      L  LAB.B.SPEC     *(S)SSH[ea]BS[sbs]T[sbt]|9                              
 bbk.test.result.date         8 DATE     L                 VAL=IF{@LAB.C.MRI.bbk.result.time^XX %Z.date.in.magic(      
                                                           VAL=XX+@LAB.C.MRI.bbk.entered.offset)}                      
 bbk.test.result.time         4 HHMM     L                 VAL=IF{@LAB.C.MRI.bbk.result.time^XX %Z.time.out(XX+@L      
                                                           VAL=AB.C.MRI.bbk.entered.offset)}                           
 bbk.test.site               10 FREE     L  LAB.C.SITE     *(S)SSH[ea]BS[sbs]T[sbt]|19                             
 bbk.test.verify.date         8 DATE     L                 VAL=IF{@LAB.C.MRI.bbk.verify.time^XX %Z.date.in.magic(      
                                                           VAL=XX+@LAB.C.MRI.bbk.entered.offset)}                      
 bbk.test.verify.time         4 TIME     L                 VAL=IF{@LAB.C.MRI.bbk.verify.time^XX %Z.time.out(XX+@L      
                                                           VAL=AB.C.MRI.bbk.entered.offset)}                           
 bbk.units                   10 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]|12                                 
 bbk.verify.time              8 PINT     R                 *(S)SSH[ea]BS[sbs]T[sbt]|3                                  
 bbk.verify.user             10 FREE     L  MIS.USER       *(S)SSH[ea]BS[sbs]T[sbt]|5                              
 bbk.workbatch.urn           10 PINT     R  LAB.B.WB       *(S)SSH[ea]BS[sbs]T[sbt]|17                             
 Ì   €   i   2
bbk.mul.results
[urn,bbk.spec,bbk.test,  bbk.mul.q]
*(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 bbk.mul.q                    2 PINT     R                 sbsMq                                                       
 bbk.mul.abnormal.flag        3 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|7                          
 bbk.mul.alpha.result.code   10 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|11                         
 bbk.mul.canned.text         10 FREE     L  LAB.C.TEXT     *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|14                     
 bbk.mul.ifc.flag             1 YN       L                 *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|21                         
 bbk.mul.int.abnormal.flag    4 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|13                         
 bbk.mul.reflex.flag         30 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|17                         
 bbk.mul.repeat.flag          1 YN       L                 *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|8                          
 bbk.mul.result              20 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|0                          
 bbk.mul.result.group        10 FREE     L                 *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|1                          
 bbk.mul.result.method       10 FREE     L  LAB.C.METH     *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|6                      
 bbk.mul.result.time          8 PINT     R                 *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|2                          
 bbk.mul.result.user         10 FREE     L  MIS.USER       *(S)SSH[ea]BS[sbs]T[sbt]A[sbsMq]|4                      
 Ì   €   i   2
bbk.result.comments
[urn,bbk.spec,bbk.test,  bbk.result.comment.q]
*(S)SSH[ea]BS[sbs]T[sbt]C[sbsK]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 bbk.result.comment.q         2 PINT     R                 sbsK                                                        
 bbk.result.comment          60 TEXT     L                 *(S)SSH[ea]BS[sbs]T[sbt]C[sbsK]                             
 Ì   €   i   2
bbk.tests.by.coll
[urn,  bbk.test.coll,bbk.date.coll,bbk.time.coll,bbk.number.coll]
*(S)SSH[ea]BT[sbt,sbsD,sbsT,sbsN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 bbk.test.coll                9 PDEC5    R  LAB.B.TEST     sbt                                                     
 bbk.date.coll                8 DATE     L                 sbsD                                                        
 bbk.time.coll                4 HHMMU    L                 sbsT                                                        
 bbk.number.coll             15 FREE     L                 sbsN                                                        
 bbk.spec.coll               30 URN      L  LAB.B.SPEC     *(S)SSH[ea]BT[sbt,sbsD,sbsT,sbsN]                       
 Ì   €   i   2
lab.specs
[urn,  lab.spec]
*(S)SSH[ea]LS[sls]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 lab.spec                    30 URN      L  LAB.L.SPEC     sls                                                     
 lab.age.sex                  9 FREE     L                 VAL=(%Z.age.format.strip(@LAB.C.MRI.lab.normals.age)_"      
                                                           VAL=/"_@LAB.C.MRI.sex)                                      
 lab.bar.code.number         11 FREE     L                 *(S)SSH[ea]LS[sls]A|9                                       
 lab.cancel.comments.file     0 FREE     L                 *(S)SSH[ea]LS[sls]CC                                        
 lab.cancelled.date           8 DATE     L                 VAL=%Z.date.in.magic(@LAB.C.MRI.lab.cancelled.time.int      
                                                           VAL=)                                                       
 lab.cancelled.time           4 HHMM     L                 VAL=%Z.time.out(@LAB.C.MRI.lab.cancelled.time.int)          
 lab.cancelled.time.int       9 PINT     R                 *(S)SSH[ea]LS[sls]A|3                                       
 lab.cancelled.user          10 FREE     L  MIS.USER       *(S)SSH[ea]LS[sls]A|2                                   
 lab.coll.date.and.time      13 FREE     L                 VAL=%Z.date.out(@LAB.C.MRI.lab.collection.date)_" "_@L      
                                                           VAL=AB.C.MRI.lab.collection.time                            
 lab.collect.batch.number     3 PINT     R                 *(S)SSH[ea]LS[sls]A|5                                       
 lab.collected.by            10 FREE     L  MIS.USER       *(S)SSH[ea]LS[sls]|13                                   
 lab.collection.batch        10 PINT     R  LAB.C.CB       *(S)SSH[ea]LS[sls]|20                                   
 lab.collection.batch.date    8 DATE     L                 *(S)SSH[ea]LS[sls]A|4                                       
 lab.collection.batch.id     24 FREE     L                 VAL=@LAB.C.MRI.lab.collection.category_IF{@LAB.C.MRI.l      
                                                           VAL=ab.collect.batch.date^XX " "_%Z.date.out(XX)_" #"_      
                                                           VAL=@LAB.C.MRI.lab.collect.batch.number}                    
 lab.collection.category     10 FREE     L  LAB.C.COL.CAT  *(S)SSH[ea]LS[sls]|15                                   
 lab.collection.date          8 DATE     L                 *(S)SSH[ea]LS[sls]|3                                        
 lab.collection.date.tform    5 FREE     L                 VAL=IF{@LAB.C.MRI.lab.collection.date^X "T"_IF{X=@.tod      
                                                           VAL=ay "";%Z.date.sub(X,@.today)^X<0;"+"_X}}             
 lab.collection.time          4 HHMMU    L                 *(S)SSH[ea]LS[sls]|4                                        
 lab.comments.file            0 FREE     L                 *(S)SSH[ea]LS[sls]C                                         
 lab.entered.date             8 DATE     L                 VAL=%Z.date.in.magic(@LAB.C.MRI.lab.entered.offset)         
 lab.entered.offset           9 PINT     R                 *(S)SSH[ea]LS[sls]|16                                       
 lab.entered.time             4 HHMM     L                 VAL=%Z.time.out(@LAB.C.MRI.lab.entered.offset)              
 lab.entered.user            10 FREE     L  MIS.USER       *(S)SSH[ea]LS[sls]A|1                                   
 lab.last.activity            8 PINT     R                 *(S)SSH[ea]LS[sls]|22                                       
 lab.last.activity.date       8 DATE     L                 VAL=IF{@LAB.C.MRI.lab.last.activity^XX %Z.date.in.magi      
                                                           VAL=c(XX+@LAB.C.MRI.lab.entered.offset)}                    
 lab.last.activity.time       4 HHMM     L                 VAL=IF{@LAB.C.MRI.lab.last.activity^XX %Z.time.out(XX+      
                                                           VAL=@LAB.C.MRI.lab.entered.offset)}                         
 lab.master.test              9 PDEC5    R  LAB.L.TEST     *(S)SSH[ea]LS[sls]A|7                                   
 lab.master.urn              30 URN      L  LAB.L.SPEC     *(S)SSH[ea]LS[sls]A|6                                   
 lab.normals.age              8 AGE.SORT L                 *(S)SSH[ea]LS[sls]|17                                       
 lab.number                  15 FREE     L                 *(S)SSH[ea]LS[sls]|0                                        
 lab.number.part              5 PINT     R                 *(S)SSH[ea]LS[sls]|8                                        
 lab.order.site              10 FREE     L  LAB.C.SITE     *(S)SSH[ea]LS[sls]A|8                                   
 lab.patient                 30 FREE     L  LAB.C.PAT      *(S)SSH[ea]LS[sls]|1                                    
 lab.prefix                   2 FREE     L                 *(S)SSH[ea]LS[sls]|7                                        
 lab.priority                 1 FREE     L                 *(S)SSH[ea]LS[sls]|6                                        
 lab.recd.date.and.time      13 FREE     L                 VAL=IF{@LAB.C.MRI.lab.received.date %Z.date.out(@LAB.C      
                                                           VAL=.MRI.lab.received.date)_" "_@LAB.C.MRI.lab.receive      
                                                           VAL=d.time}                                                 
 lab.received                 1 YN       L                 *(S)SSH[ea]LS[sls]|12                                       
 lab.received.by             10 FREE     L  MIS.USER       *(S)SSH[ea]LS[sls]|14                                   
 lab.received.date            8 DATE     L                 *(S)SSH[ea]LS[sls]|9                                        
 lab.received.time            4 HHMMU    L                 *(S)SSH[ea]LS[sls]|10                                       
 lab.report.last.printed      8 PINT     R                 *(S)SSH[ea]LS[sls]|21                                       
 lab.req.number               8 FREE     L                 VAL=@LAB.C.REQ.number[@LAB.C.MRI.lab.req.urn]               
 lab.req.urn                 10 URN      L  LAB.C.REQ      *(S)SSH[ea]LS[sls]|5                                    
 lab.rpt.last.prt.date        8 DATE     L                 VAL=IF{@LAB.C.MRI.lab.report.last.printed^XX %Z.date.i      
                                                           VAL=n.magic(XX+@LAB.C.MRI.lab.entered.offset)}              
 lab.rpt.last.prt.time        4 HHMM     L                 VAL=IF{@LAB.C.MRI.lab.report.last.printed^XX %Z.time.o      
                                                           VAL=ut(XX+@LAB.C.MRI.lab.entered.offset)}                   
 lab.status                   4 CHOICE   L                 *(S)SSH[ea]LS[sls]|2                                        
 lab.status.before.cancel     4 CHOICE   L                 *(S)SSH[ea]LS[sls]|19                                       
 lab.subm.doc.name           30 FREE     L                 VAL=IF{@LAB.C.MRI.lab.subm.doc.non.dict.nm;@MIS.DOC.na      
                                                           VAL=me[@LAB.C.MRI.lab.subm.doctor]}                         
 lab.subm.doc.non.dict.nm    30 FREE     L                 *(S)SSH[ea]LS[sls]A|0                                       
 lab.subm.doctor             10 FREE     L  MIS.DOC        *(S)SSH[ea]LS[sls]|11                                   
 lab.wkld.function           10 FREE     L  LAB.C.WL.FUNC  *(S)SSH[ea]LS[sls]|18                                   
 Ì   €   i   2
lab.comments
[urn,lab.spec,  lab.comment.q]
*(S)SSH[ea]LS[sls]C[sshLC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 lab.comment.q                2 PINT     R                 sshLC                                                       
 lab.comment                 60 TEXT     L                 *(S)SSH[ea]LS[sls]C[sshLC]                                  
 Ì   €   i   2
lab.tests
[urn,lab.spec,  lab.test]
*(S)SSH[ea]LS[sls]T[slt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 lab.test                     9 PDEC5    R  LAB.L.TEST     slt                                                     
 lab.abnormal.flag            3 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]|7                                  
 lab.alpha.result.code       10 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]|11                                 
 lab.canned.text             10 FREE     L  LAB.C.TEXT     *(S)SSH[ea]LS[sls]T[slt]|14                             
 lab.clin.sign.comment        1 YN       L                 *(S)SSH[ea]LS[sls]T[slt]C                                   
 lab.end.of.profile           9 PDEC5    R  LAB.L.TEST     *(S)SSH[ea]LS[sls]T[slt]|15                             
 lab.int.abnormal.flag        3 CHOICE   L                 *(S)SSH[ea]LS[sls]T[slt]|13                                 
 lab.normal.range            11 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]|8                                  
 lab.result                  20 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]|0                                  
 lab.result.group            10 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]|1                                  
 lab.result.method           10 FREE     L  LAB.C.METH     *(S)SSH[ea]LS[sls]T[slt]|6                              
 lab.result.time              8 PINT     R                 *(S)SSH[ea]LS[sls]T[slt]|2                                  
 lab.result.user             10 FREE     L  MIS.USER       *(S)SSH[ea]LS[sls]T[slt]|4                              
 lab.review.flag              1 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]|16                                 
 lab.test.future.spec        30 URN      L  LAB.L.SPEC     *(S)SSH[ea]LS[sls]T[slt]|10                             
 lab.test.past.spec          30 URN      L  LAB.L.SPEC     *(S)SSH[ea]LS[sls]T[slt]|9                              
 lab.test.result.date         8 DATE     L                 VAL=IF{@LAB.C.MRI.lab.result.time^XX %Z.date.in.magic(      
                                                           VAL=XX+@LAB.C.MRI.lab.entered.offset)}                      
 lab.test.result.time         4 HHMM     L                 VAL=IF{@LAB.C.MRI.lab.result.time^XX %Z.time.out(XX+@L      
                                                           VAL=AB.C.MRI.lab.entered.offset)}                           
 lab.test.site               10 FREE     L  LAB.C.SITE     *(S)SSH[ea]LS[sls]T[slt]|19                             
 lab.test.verify.date         8 DATE     L                 VAL=IF{@LAB.C.MRI.lab.verify.time^XX %Z.date.in.magic(      
                                                           VAL=XX+@LAB.C.MRI.lab.entered.offset)}                      
 lab.test.verify.time         4 HHMM     L                 VAL=IF{@LAB.C.MRI.lab.verify.time^XX %Z.time.out(XX+@L      
                                                           VAL=AB.C.MRI.lab.entered.offset)}                           
 lab.timed.master             1 YN       L                 *(S)SSH[ea]LS[sls]T[slt]|18                                 
 lab.units                   10 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]|12                                 
 lab.verify.time              8 PINT     R                 *(S)SSH[ea]LS[sls]T[slt]|3                                  
 lab.verify.user             10 FREE     L  MIS.USER       *(S)SSH[ea]LS[sls]T[slt]|5                              
 lab.workbatch.urn           10 PINT     R  LAB.L.WB       *(S)SSH[ea]LS[sls]T[slt]|17                             
 Ì   €   i   2
lab.mul.results
[urn,lab.spec,lab.test,  lab.mul.q]
*(S)SSH[ea]LS[sls]T[slt]A[slsMq]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 lab.mul.q                    2 PINT     R                 slsMq                                                       
 lab.mul.abnormal.flag        3 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|7                          
 lab.mul.alpha.result.code   10 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|11                         
 lab.mul.canned.text         10 FREE     L  LAB.C.TEXT     *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|14                     
 lab.mul.ifc.flag             1 YN       L                 *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|21                         
 lab.mul.int.abnormal.flag    4 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|13                         
 lab.mul.reflex.flag         30 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|17                         
 lab.mul.repeat.flag          1 YN       L                 *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|8                          
 lab.mul.result              20 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|0                          
 lab.mul.result.group        10 FREE     L                 *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|1                          
 lab.mul.result.method       10 FREE     L  LAB.C.METH     *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|6                      
 lab.mul.result.time          8 PINT     R                 *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|2                          
 lab.mul.result.user         10 FREE     L  MIS.USER       *(S)SSH[ea]LS[sls]T[slt]A[slsMq]|4                      
 Ì   €   i   2
lab.result.comments
[urn,lab.spec,lab.test,  lab.result.comment.q]
*(S)SSH[ea]LS[sls]T[slt]C[slsK]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 lab.result.comment.q         2 PINT     R                 slsK                                                        
 lab.result.comment          60 TEXT     L                 *(S)SSH[ea]LS[sls]T[slt]C[slsK]                             
 Ì   €   i   2
lab.tests.by.coll
[urn,  lab.test.coll,lab.date.coll,lab.time.coll,lab.number.coll]
*(S)SSH[ea]LT[slt,slsD,slsT,slsN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 lab.test.coll                9 PDEC5    R  LAB.L.TEST     slt                                                     
 lab.date.coll                8 DATE     L                 slsD                                                        
 lab.time.coll                4 HHMMU    L                 slsT                                                        
 lab.number.coll             15 FREE     L                 slsN                                                        
 lab.spec.coll               30 URN      L  LAB.L.SPEC     *(S)SSH[ea]LT[slt,slsD,slsT,slsN]                       
 Ì   €   i   2
markers
[urn,  marker,marker.origin,marker.origin.urn]
*(S)SSH[ea]MK[ssk,sskMO,sskMU]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 marker                      10 ALPHANUM L  LAB.C.MARK     ssk                                                     
 marker.origin                2 CHOICE   L                 sskMO                                                       
 marker.origin.urn           12 FREE     L                 sskMU                                                       
 marker.date                  8 DATE     L                 *(S)SSH[ea]MK[ssk,sskMO,sskMU]|1                            
 marker.first.date            8 DATE     L                 *(S)SSH[ea]MK[ssk,sskMO,sskMU]|3                            
 marker.load                  0 FREE     L                 VAL=DO{+@p.markers[urn,marker]^marker 1^e.marker[marke      
                                                           VAL=r]}                                                     
 marker.time                  4 HHMM     L                 *(S)SSH[ea]MK[ssk,sskMO,sskMU]|2                            
 marker.user                 10 FREE     L  MIS.USER       *(S)SSH[ea]MK[ssk,sskMO,sskMU]|0                        
 Ì   €   i   2
merge.unit.recipients
[urn,  merge.unit]
*(S)SSH[ea]MUR[sbu]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 merge.unit                  10 URN      L  LAB.B.UNIT     sbu                                                     
 Ì   €   i   2
mic.procs.by.coll
[urn,  mic.proc.coll,mic.date.coll,mic.time.coll,mic.number.coll]
*(S)SSH[ea]MP[smp,smsD,smsT,smsN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mic.proc.coll                9 PDEC5    R  LAB.M.PROC     smp                                                     
 mic.date.coll                8 DATE     L                 smsD                                                        
 mic.time.coll                4 HHMMU    L                 smsT                                                        
 mic.number.coll             15 FREE     L                 smsN                                                        
 mic.spec.coll               30 URN      L  LAB.M.SPEC     *(S)SSH[ea]MP[smp,smsD,smsT,smsN]                       
 Ì   €   i   2
mic.specs
[urn,  mic.spec]
*(S)SSH[ea]MS[sms]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mic.spec                    30 URN      L  LAB.M.SPEC     sms                                                     
 mic.age.sex                  9 FREE     L                 VAL=(%Z.age.format.strip(@LAB.C.MRI.mic.normals.age)_"      
                                                           VAL=/"_@LAB.C.MRI.sex)                                      
 mic.bar.code.number         11 FREE     L                 *(S)SSH[ea]MS[sms]A|10                                      
 mic.cancel.comments.file     0 FREE     L                 *(S)SSH[ea]MS[sms]CC                                        
 mic.cancelled.time.int       9 PINT     R                 *(S)SSH[ea]MS[sms]A|5                                       
 mic.cancelled.user          10 FREE     L  MIS.USER       *(S)SSH[ea]MS[sms]A|4                                   
 mic.coll.date.and.time      13 FREE     L                 VAL=%Z.date.out(@LAB.C.MRI.mic.collection.date)_" "_@L      
                                                           VAL=AB.C.MRI.mic.collection.time                            
 mic.collected.by            10 FREE     L  MIS.USER       *(S)SSH[ea]MS[sms]|13                                   
 mic.collection.batch        10 PINT     R  LAB.C.CB       *(S)SSH[ea]MS[sms]|20                                   
 mic.collection.batch.date    8 DATE     L                 *(S)SSH[ea]MS[sms]A|6                                       
 mic.collection.batch.id     24 FREE     L                 VAL=@LAB.C.MRI.mic.collection.category_IF{@LAB.C.MRI.m      
                                                           VAL=ic.collect.batch.date^XX " "_%Z.date.out(XX)_" #"_      
                                                           VAL=@LAB.C.MRI.mic.collect.batch.number}                    
 mic.collection.batch.numb    3 PINT     R                 *(S)SSH[ea]MS[sms]A|7                                       
 mic.collection.category     10 FREE     L  LAB.C.COL.CAT  *(S)SSH[ea]MS[sms]|15                                   
 mic.collection.date          8 DATE     L                 *(S)SSH[ea]MS[sms]|3                                        
 mic.collection.date.tform    5 FREE     L                 VAL=IF{@LAB.C.MRI.mic.collection.date^X "T"_IF{X=@.tod      
                                                           VAL=ay "";%Z.date.sub(X,@.today)^X<0;"+"_X}}             
 mic.collection.time          4 HHMMU    L                 *(S)SSH[ea]MS[sms]|4                                        
 mic.comments.file            0 FREE     L                 *(S)SSH[ea]MS[sms]C                                         
 mic.entered.date             8 DATE     L                 VAL=%Z.date.in.magic(@LAB.C.MRI.mic.entered.offset)         
 mic.entered.offset           9 PINT     R                 *(S)SSH[ea]MS[sms]|16                                       
 mic.entered.time             4 HHMM     L                 VAL=%Z.time.out(@LAB.C.MRI.mic.entered.offset)              
 mic.entered.user            10 FREE     L  MIS.USER       *(S)SSH[ea]MS[sms]A|3                                   
 mic.last.activity            8 PINT     R                 *(S)SSH[ea]MS[sms]|22                                       
 mic.last.activity.date       8 DATE     L                 VAL=IF{@LAB.C.MRI.mic.last.activity^XX %Z.date.in.magi      
                                                           VAL=c(XX+@LAB.C.MRI.mic.entered.offset)}                    
 mic.last.activity.time       4 HHMM     L                 VAL=IF{@LAB.C.MRI.mic.last.activity^XX %Z.time.out(XX+      
                                                           VAL=@LAB.C.MRI.mic.entered.offset)}                         
 mic.normals.age              8 AGE.SORT L                 *(S)SSH[ea]MS[sms]|17                                       
 mic.number                  15 FREE     L                 *(S)SSH[ea]MS[sms]|0                                        
 mic.number.part              5 PINT     R                 *(S)SSH[ea]MS[sms]|8                                        
 mic.order.location          10 FREE     L  MIS.LOCN       *(S)SSH[ea]MS[sms]A|9                                   
 mic.order.site              10 FREE     L  LAB.C.SITE     *(S)SSH[ea]MS[sms]A|8                                   
 mic.patient                 30 FREE     L  LAB.C.PAT      *(S)SSH[ea]MS[sms]|1                                    
 mic.prefix                   2 FREE     L                 *(S)SSH[ea]MS[sms]|7                                        
 mic.priority                 1 FREE     L                 *(S)SSH[ea]MS[sms]|6                                        
 mic.recd.date.and.time      13 FREE     L                 VAL=IF{@LAB.C.MRI.mic.received.date %Z.date.out(@LAB.C      
                                                           VAL=.MRI.mic.received.date)_" "_@LAB.C.MRI.mic.receive      
                                                           VAL=d.time}                                                 
 mic.receive.site            10 FREE     L  LAB.C.SITE     *(S)SSH[ea]MS[sms]A|11                                  
 mic.received                 1 YN       L                 *(S)SSH[ea]MS[sms]|12                                       
 mic.received.by             10 FREE     L  MIS.USER       *(S)SSH[ea]MS[sms]|14                                   
 mic.received.date            8 DATE     L                 *(S)SSH[ea]MS[sms]|9                                        
 mic.received.time            4 HHMMU    L                 *(S)SSH[ea]MS[sms]|10                                       
 mic.report.last.printed      8 PINT     R                 *(S)SSH[ea]MS[sms]|21                                       
 mic.req.number               8 FREE     L                 VAL=@LAB.C.REQ.number[@LAB.C.MRI.mic.req.urn]               
 mic.req.urn                 10 URN      L  LAB.C.REQ      *(S)SSH[ea]MS[sms]|5                                    
 mic.rpt.last.prt.date        8 DATE     L                 VAL=IF{@LAB.C.MRI.mic.report.last.printed^XX %Z.date.i      
                                                           VAL=n.magic(XX+@LAB.C.MRI.mic.entered.offset)}              
 mic.rpt.last.prt.time        4 HHMM     L                 VAL=IF{@LAB.C.MRI.mic.report.last.printed^XX %Z.time.o      
                                                           VAL=ut(XX+@LAB.C.MRI.mic.entered.offset)}                   
 mic.source                  10 FREE     L  LAB.M.SRC      *(S)SSH[ea]MS[sms]A|0                                   
 mic.spec.desc               10 FREE     L  LAB.M.SPDESC   *(S)SSH[ea]MS[sms]A|1                                   
 mic.status                   4 CHOICE   L                 *(S)SSH[ea]MS[sms]|2                                        
 mic.status.before.cancel     4 CHOICE   L                 *(S)SSH[ea]MS[sms]|19                                       
 mic.subm.doc.name           30 FREE     L                 VAL=IF{@LAB.C.MRI.mic.subm.doc.non.dict.nm;@MIS.DOC.na      
                                                           VAL=me[@LAB.C.MRI.mic.subm.doctor]}                         
 mic.subm.doc.non.dict.nm    30 FREE     L                 *(S)SSH[ea]MS[sms]A|2                                       
 mic.subm.doctor             10 FREE     L  MIS.DOC        *(S)SSH[ea]MS[sms]|11                                   
 mic.wkld.function           10 FREE     L  LAB.C.WL.FUNC  *(S)SSH[ea]MS[sms]|18                                   
 Ì   €   i   2
mic.comments
[urn,mic.spec,  mic.comment.q]
*(S)SSH[ea]MS[sms]C[sshMC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mic.comment.q                2 PINT     R                 sshMC                                                       
 mic.comment                 60 TEXT     L                 *(S)SSH[ea]MS[sms]C[sshMC]                                  
 Ì   €   i   2
mic.procs
[urn,mic.spec,  mic.proc]
*(S)SSH[ea]MS[sms]T[smp]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 mic.proc                     9 PDEC5    R  LAB.M.PROC     smp                                                     
 mic.historical               1 FREE     L                 *(S)SSH[ea]MS[sms]T[smp]|8                                  
 mic.proc.complete            1 YN       L                 *(S)SSH[ea]MS[sms]T[smp]|2                                  
 mic.proc.deleted             1 YN       L                 *(S)SSH[ea]MS[sms]T[smp]|5                                  
 mic.proc.site               10 FREE     L  LAB.C.SITE     *(S)SSH[ea]MS[sms]T[smp]|3                              
 mic.review.flag              1 FREE     L                 *(S)SSH[ea]MS[sms]T[smp]|7                                  
 mic.verified.res.q           2 PINT     R                 *(S)SSH[ea]MS[sms]T[smp]|6                                  
 mic.verify.user             10 FREE     L  MIS.USER       *(S)SSH[ea]MS[sms]T[smp]|0                              
 mic.workbatch.urn           10 PINT     R  LAB.M.WB       *(S)SSH[ea]MS[sms]T[smp]|4                              
 Ì     i   2
od.x
[od.mri,od.module,od.coll.date,od.patient,od.spec.id]
*(S)SSHO[ea,sshOM,sshOD,aa,sshOS]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 od.mri                      25 URN      L  LAB.C.MRI      ea                                                      
 od.module                    1 CHOICE   L                 sshOM                                                       
 od.coll.date                 8 DATE     L                 sshOD                                                       
 od.patient                  30 FREE     L  LAB.C.PAT      aa                                                      
 od.spec.id                  15 FREE     L                 sshOS                                                       
 od.spec                     10 URN      L                 *(S)SSHO[ea,sshOM,sshOD,aa,sshOS]|0                         
 Ì     i   2
oe.req.x
[oe.mri.urn,oe.lab.module,oe.urn]
*(S)SSHR[ea,sshrM,po]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 oe.mri.urn                  25 URN      L  LAB.C.MRI      ea                                                      
 oe.lab.module                1 CHOICE   L                 sshrM                                                       
 oe.urn                      10 URN      L  OE.ORD         po                                                      
 oe.lab.test                  9 PDEC5    R  LAB.L.TEST     *(S)SSHR[ea,sshrM,po]|1                                 
 oe.mic.source               10 FREE     L  LAB.M.SRC      *(S)SSHR[ea,sshrM,po]|1                                 
 oe.pt.acct                  30 FREE     L  LAB.C.PAT      *(S)SSHR[ea,sshrM,po]|3                                 
 oe.req.urn                  10 URN      L  LAB.C.REQ      *(S)SSHR[ea,sshrM,po]|2                                 
 oe.spec.urn                  9 FREE     L                 *(S)SSHR[ea,sshrM,po]|0                                     

 Index Files                        Subscripts/Physical Base

 bbk.product.date.x                 [bbk.product,bbk.collection.date,urn,bbk.spec]
                                      ?(S)SSHBPD[sbp,sbsD,ea,sbs]

 bbk.product.x                      [bbk.product,urn,bbk.spec]
                                      ?(S)SSHBP[sbp,ea,sbs]

 bbk.test.date.x                    [bbk.test,bbk.collection.date,urn,bbk.spec]
                                      ?(S)SSHBD[sbt,sbsD,ea,sbs]

 bbk.test.x                         [bbk.test,urn,bbk.spec]
                                      ?(S)SSHB[sbt,ea,sbs]

 bbk.wristband.x                    [bbk.wristband.num] = urn
                                      ?(S)SSHBW[sbsWB]

 lab.test.date.x                    [lab.test,lab.collection.date,urn,lab.spec]
                                      ?(S)SSHLD[slt,slsD,ea,sls]

 lab.test.x                         [lab.test,urn,lab.spec]
                                      ?(S)SSHL[slt,ea,sls]

 marker.x                           [marker,urn]
                                      ?(S)SSHMK[ssk,ea]

 mic.proc.date.x                    [mic.proc,mic.collection.date,urn,mic.spec]
                                      ?(S)SSHPD[smp,smsD,ea,sms]

 mic.proc.x                         [mic.proc,urn,mic.spec]
                                      ?(S)SSHP[smp,ea,sms]

 mpi.acct.x                         [urn,LAB.C.PAT.urn]
                                      ?(A)AAMX[ea,aa]

 ref.pt.id.x                        [client,ref.pt.id] = urn
                                      ?(S)SSHID[ggg,scrID]

 refi.pt.id.x                       [ref.pt.id,client] = urn
                                      ?(S)SSHII[scrID,ggg]