sHelp
                                     LAB.C.MRI
     i   2
   lab.c.mri.expired.patients
   lab.c.medical.record.data
     lab.c.mri.bbk.specimens
       lab.c.mri.bbk.comments
       lab.c.mri.bbk.products
       lab.c.mri.bbk.tests
         lab.c.mri.bbk.mul.results
         lab.c.mri.bbk.result.comments
     lab.c.mri.bbk.tests.by.coll
     lab.c.mri.lab.specimens
       lab.c.mri.lab.comments
       lab.c.mri.lab.tests
         lab.c.mri.lab.mul.results
         lab.c.mri.lab.result.comments
     lab.c.mri.lab.tests.by.collect
     lab.c.mri.marker
     lab.c.mri.merge.unit.recips
     lab.c.mri.mic.procs.by.collect
     lab.c.mri.mic.specs
       lab.c.mri.mic.comments
       lab.c.mri.mic.procs
   lab.c.mri.activity.index
   lab.c.mri.oe.req.x

 Ì     i   2
lab.c.mri.expired.patients    (expired.pts) 
[expired.date,expired.pt.mri]
: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
lab.c.medical.record.data    (main) 
[urn]
?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                 ?SSH[ea]|0                                                  
 birthdate                    8 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           8 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.DICT   VAL=@t.MRI.PAT.discharge.disposition                    
 expire.date                  8 DATE     L                 VAL=@MRI.PAT.exp.date                                       
 hx.urn                      10 URN      L  LAB.B.HX       ?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                                         
 name.change.date             8 DATE     L                 ?SSH[ea]NC|0                                                
 name.change.name            30 FREE     L                 ?SSH[ea]NC|1                                                
 ref.pt.id                   10 FREE     L                                                                             
 sex                          1 CHOICE   L                 VAL=@t.MRI.PAT.sex                                          
 unit.number                 10 FREE     L                 VAL=@t.MRI.PAT.px.unit.number[LAB.C.MRI.urn,@.mri.pfx]      
 Ì     i   2
lab.c.mri.bbk.specimens    (bbk.specs) 
[urn, bbk.spec]
?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                 ?SSH[ea]BS[sbs]A|9                                          
 bbk.cancel.comments.file     0 FREE     L                 ?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                 ?SSH[ea]BS[sbs]A|3                                          
 bbk.cancelled.user          10 FREE     L  MIS.USER       ?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                 ?SSH[ea]BS[sbs]A|5                                          
 bbk.collected.by            10 FREE     L  MIS.USER       ?SSH[ea]BS[sbs]|13                                      
 bbk.collection.batch        10 PINT     R  LAB.C.CB       ?SSH[ea]BS[sbs]|20                                      
 bbk.collection.batch.date    8 DATE     L                 ?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  ?SSH[ea]BS[sbs]|15                                      
 bbk.collection.date          8 DATE     L                 ?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                 ?SSH[ea]BS[sbs]|4                                           
 bbk.comments.file            0 FREE     L                 ?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                 ?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       ?SSH[ea]BS[sbs]A|1                                      
 bbk.last.activity            8 PINT     R                 ?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                 ?SSH[ea]BS[sbs]|17                                          
 bbk.number                  13 FREE     L                 ?SSH[ea]BS[sbs]|0                                           
 bbk.number.part              5 PINT     R                 ?SSH[ea]BS[sbs]|8                                           
 bbk.order.site              10 FREE     L  LAB.C.SITE     ?SSH[ea]BS[sbs]A|8                                      
 bbk.patient                 30 FREE     L  LAB.C.PAT      ?SSH[ea]BS[sbs]|1                                       
 bbk.prefix                   2 FREE     L                 ?SSH[ea]BS[sbs]|7                                           
 bbk.priority                 1 FREE     L                 ?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                 ?SSH[ea]BS[sbs]|12                                          
 bbk.received.by             10 FREE     L  MIS.USER       ?SSH[ea]BS[sbs]|14                                      
 bbk.received.date            8 DATE     L                 ?SSH[ea]BS[sbs]|9                                           
 bbk.received.time            4 HHMMU    L                 ?SSH[ea]BS[sbs]|10                                          
 bbk.report.last.printed      8 PINT     R                 ?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      ?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                 ?SSH[ea]BS[sbs]|2                                           
 bbk.status.before.cancel     4 CHOICE   L                 ?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.DI      
                                                           VAL=CT.name[@LAB.C.MRI.bbk.subm.doctor]}                    
 bbk.subm.doc.non.dict.nm    30 FREE     L                 ?SSH[ea]BS[sbs]A|0                                          
 bbk.subm.doctor             10 FREE     L  MIS.DOC.DICT   ?SSH[ea]BS[sbs]|11                                      
 bbk.wkld.function           10 FREE     L  LAB.C.WL.FUNC  ?SSH[ea]BS[sbs]|18                                      
 Ì     i   2
lab.c.mri.bbk.comments    (bbk.comments) 
[urn,bbk.spec, bbk.comment.q]
?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 FREE     L                 ?SSH[ea]BS[sbs]C[sshBC]                                     
 Ì     i   2
lab.c.mri.bbk.products    (bbk.products) 
[urn,bbk.spec, bbk.product]
?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                 ?SSH[ea]BS[sbs]P[sbp]|0                                     
 Ì     i   2
lab.c.mri.bbk.tests    (bbk.tests) 
[urn,bbk.spec, bbk.test]
?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                 ?SSH[ea]BS[sbs]T[sbt]|7                                     
 bbk.alpha.result.code       10 FREE     L                 ?SSH[ea]BS[sbs]T[sbt]|11                                    
 bbk.canned.text             10 FREE     L  LAB.C.TEXT     ?SSH[ea]BS[sbs]T[sbt]|14                                
 bbk.clin.sign.comment        1 YN       L                 ?SSH[ea]BS[sbs]T[sbt]C                                      
 bbk.end.of.profile           9 PDEC5    R  LAB.B.TEST     ?SSH[ea]BS[sbs]T[sbt]|15                                
 bbk.int.abnormal.flag        3 CHOICE   L                 ?SSH[ea]BS[sbs]T[sbt]|13                                    
 bbk.normal.range            11 FREE     L                 ?SSH[ea]BS[sbs]T[sbt]|8                                     
 bbk.result                  20 FREE     L                 ?SSH[ea]BS[sbs]T[sbt]|0                                     
 bbk.result.group            10 FREE     L                 ?SSH[ea]BS[sbs]T[sbt]|1                                     
 bbk.result.method           10 FREE     L  LAB.C.METH     ?SSH[ea]BS[sbs]T[sbt]|6                                 
 bbk.result.time              8 PINT     R                 ?SSH[ea]BS[sbs]T[sbt]|2                                     
 bbk.result.user             10 FREE     L  MIS.USER       ?SSH[ea]BS[sbs]T[sbt]|4                                 
 bbk.review.flag              1 FREE     L                 ?SSH[ea]BS[sbs]T[sbt]|16                                    
 bbk.test.future.spec        30 URN      L  LAB.B.SPEC     ?SSH[ea]BS[sbs]T[sbt]|10                                
 bbk.test.past.spec          30 URN      L  LAB.B.SPEC     ?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     ?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                 ?SSH[ea]BS[sbs]T[sbt]|12                                    
 bbk.verify.time              8 PINT     R                 ?SSH[ea]BS[sbs]T[sbt]|3                                     
 bbk.verify.user             10 FREE     L  MIS.USER       ?SSH[ea]BS[sbs]T[sbt]|5                                 
 bbk.workbatch.urn           10 PINT     R  LAB.B.WB       ?SSH[ea]BS[sbs]T[sbt]|17                                
 Ì     i   2
lab.c.mri.bbk.mul.results    (bbk.mul.results) 
[urn,bbk.spec,bbk.test, bbk.mul.q]
?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                 ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|7                             
 bbk.mul.alpha.result.code   10 FREE     L                 ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|11                            
 bbk.mul.canned.text         10 FREE     L  LAB.C.TEXT     ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|14                        
 bbk.mul.ifc.flag             1 YN       L                 ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|21                            
 bbk.mul.int.abnormal.flag    4 FREE     L                 ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|13                            
 bbk.mul.reflex.flag         30 FREE     L                 ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|17                            
 bbk.mul.repeat.flag          1 YN       L                 ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|8                             
 bbk.mul.result              20 FREE     L                 ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|0                             
 bbk.mul.result.group        10 FREE     L                 ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|1                             
 bbk.mul.result.method       10 FREE     L  LAB.C.METH     ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|6                         
 bbk.mul.result.time          8 PINT     R                 ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|2                             
 bbk.mul.result.user         10 FREE     L  MIS.USER       ?SSH[ea]BS[sbs]T[sbt]A[sbsMq]|4                         
 Ì     i   2
lab.c.mri.bbk.result.comments    (bbk.result.comments) 
[urn,bbk.spec,bbk.test, bbk.result.comment.q]
?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 FREE     L                 ?SSH[ea]BS[sbs]T[sbt]C[sbsK]                                
 Ì     i   2
lab.c.mri.bbk.tests.by.coll    (bbk.tests.by.coll) 
[urn, bbk.test.coll,bbk.date.coll,bbk.time.coll,bbk.number.coll]
?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             13 FREE     L                 sbsN                                                        
 bbk.spec.coll               30 URN      L  LAB.B.SPEC     ?SSH[ea]BT[sbt,sbsD,sbsT,sbsN]                          
 Ì     i   2
lab.c.mri.lab.specimens    (lab.specs) 
[urn, lab.spec]
?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                 ?SSH[ea]LS[sls]A|9                                          
 lab.cancel.comments.file     0 FREE     L                 ?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                 ?SSH[ea]LS[sls]A|3                                          
 lab.cancelled.user          10 FREE     L  MIS.USER       ?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                 ?SSH[ea]LS[sls]A|5                                          
 lab.collected.by            10 FREE     L  MIS.USER       ?SSH[ea]LS[sls]|13                                      
 lab.collection.batch        10 PINT     R  LAB.C.CB       ?SSH[ea]LS[sls]|20                                      
 lab.collection.batch.date    8 DATE     L                 ?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  ?SSH[ea]LS[sls]|15                                      
 lab.collection.date          8 DATE     L                 ?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                 ?SSH[ea]LS[sls]|4                                           
 lab.comments.file            0 FREE     L                 ?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                 ?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       ?SSH[ea]LS[sls]A|1                                      
 lab.last.activity            8 PINT     R                 ?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     ?SSH[ea]LS[sls]A|7                                      
 lab.master.urn              30 URN      L  LAB.L.SPEC     ?SSH[ea]LS[sls]A|6                                      
 lab.normals.age              8 AGE.SORT L                 ?SSH[ea]LS[sls]|17                                          
 lab.number                  17 FREE     L                 ?SSH[ea]LS[sls]|0                                           
 lab.number.part              5 PINT     R                 ?SSH[ea]LS[sls]|8                                           
 lab.order.site              10 FREE     L  LAB.C.SITE     ?SSH[ea]LS[sls]A|8                                      
 lab.patient                 30 FREE     L  LAB.C.PAT      ?SSH[ea]LS[sls]|1                                       
 lab.prefix                   2 FREE     L                 ?SSH[ea]LS[sls]|7                                           
 lab.priority                 1 FREE     L                 ?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                 ?SSH[ea]LS[sls]|12                                          
 lab.received.by             10 FREE     L  MIS.USER       ?SSH[ea]LS[sls]|14                                      
 lab.received.date            8 DATE     L                 ?SSH[ea]LS[sls]|9                                           
 lab.received.time            4 HHMMU    L                 ?SSH[ea]LS[sls]|10                                          
 lab.report.last.printed      8 PINT     R                 ?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      ?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                 ?SSH[ea]LS[sls]|2                                           
 lab.status.before.cancel     4 CHOICE   L                 ?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.DI      
                                                           VAL=CT.name[@LAB.C.MRI.lab.subm.doctor]}                    
 lab.subm.doc.non.dict.nm    30 FREE     L                 ?SSH[ea]LS[sls]A|0                                          
 lab.subm.doctor             10 FREE     L  MIS.DOC.DICT   ?SSH[ea]LS[sls]|11                                      
 lab.wkld.function           10 FREE     L  LAB.C.WL.FUNC  ?SSH[ea]LS[sls]|18                                      
 Ì     i   2
lab.c.mri.lab.comments    (lab.comments) 
[urn,lab.spec, lab.comment.q]
?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 FREE     L                 ?SSH[ea]LS[sls]C[sshLC]                                     
 Ì     i   2
lab.c.mri.lab.tests    (lab.tests) 
[urn,lab.spec, lab.test]
?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                 ?SSH[ea]LS[sls]T[slt]|7                                     
 lab.alpha.result.code       10 FREE     L                 ?SSH[ea]LS[sls]T[slt]|11                                    
 lab.canned.text             10 FREE     L  LAB.C.TEXT     ?SSH[ea]LS[sls]T[slt]|14                                
 lab.clin.sign.comment        1 YN       L                 ?SSH[ea]LS[sls]T[slt]C                                      
 lab.end.of.profile           9 PDEC5    R  LAB.L.TEST     ?SSH[ea]LS[sls]T[slt]|15                                
 lab.int.abnormal.flag        3 CHOICE   L                 ?SSH[ea]LS[sls]T[slt]|13                                    
 lab.normal.range            11 FREE     L                 ?SSH[ea]LS[sls]T[slt]|8                                     
 lab.result                  20 FREE     L                 ?SSH[ea]LS[sls]T[slt]|0                                     
 lab.result.group            10 FREE     L                 ?SSH[ea]LS[sls]T[slt]|1                                     
 lab.result.method           10 FREE     L  LAB.C.METH     ?SSH[ea]LS[sls]T[slt]|6                                 
 lab.result.time              8 PINT     R                 ?SSH[ea]LS[sls]T[slt]|2                                     
 lab.result.user             10 FREE     L  MIS.USER       ?SSH[ea]LS[sls]T[slt]|4                                 
 lab.review.flag              1 FREE     L                 ?SSH[ea]LS[sls]T[slt]|16                                    
 lab.test.future.spec        30 URN      L  LAB.L.SPEC     ?SSH[ea]LS[sls]T[slt]|10                                
 lab.test.past.spec          30 URN      L  LAB.L.SPEC     ?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     ?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                 ?SSH[ea]LS[sls]T[slt]|18                                    
 lab.units                   10 FREE     L                 ?SSH[ea]LS[sls]T[slt]|12                                    
 lab.verify.time              8 PINT     R                 ?SSH[ea]LS[sls]T[slt]|3                                     
 lab.verify.user             10 FREE     L  MIS.USER       ?SSH[ea]LS[sls]T[slt]|5                                 
 lab.workbatch.urn           10 PINT     R  LAB.L.WB       ?SSH[ea]LS[sls]T[slt]|17                                
 Ì     i   2
lab.c.mri.lab.mul.results    (lab.mul.results) 
[urn,lab.spec,lab.test, lab.mul.q]
?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                 ?SSH[ea]LS[sls]T[slt]A[slsMq]|7                             
 lab.mul.alpha.result.code   10 FREE     L                 ?SSH[ea]LS[sls]T[slt]A[slsMq]|11                            
 lab.mul.canned.text         10 FREE     L  LAB.C.TEXT     ?SSH[ea]LS[sls]T[slt]A[slsMq]|14                        
 lab.mul.ifc.flag             1 YN       L                 ?SSH[ea]LS[sls]T[slt]A[slsMq]|21                            
 lab.mul.int.abnormal.flag    4 FREE     L                 ?SSH[ea]LS[sls]T[slt]A[slsMq]|13                            
 lab.mul.reflex.flag         30 FREE     L                 ?SSH[ea]LS[sls]T[slt]A[slsMq]|17                            
 lab.mul.repeat.flag          1 YN       L                 ?SSH[ea]LS[sls]T[slt]A[slsMq]|8                             
 lab.mul.result              20 FREE     L                 ?SSH[ea]LS[sls]T[slt]A[slsMq]|0                             
 lab.mul.result.group        10 FREE     L                 ?SSH[ea]LS[sls]T[slt]A[slsMq]|1                             
 lab.mul.result.method       10 FREE     L  LAB.C.METH     ?SSH[ea]LS[sls]T[slt]A[slsMq]|6                         
 lab.mul.result.time          8 PINT     R                 ?SSH[ea]LS[sls]T[slt]A[slsMq]|2                             
 lab.mul.result.user         10 FREE     L  MIS.USER       ?SSH[ea]LS[sls]T[slt]A[slsMq]|4                         
 Ì     i   2
lab.c.mri.lab.result.comments    (lab.result.comments) 
[urn,lab.spec,lab.test, lab.result.comment.q]
?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 FREE     L                 ?SSH[ea]LS[sls]T[slt]C[slsK]                                
 Ì     i   2
lab.c.mri.lab.tests.by.collect    (lab.tests.by.coll) 
[urn, lab.test.coll,lab.date.coll,lab.time.coll,lab.number.coll]
?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             17 FREE     L                 slsN                                                        
 lab.spec.coll               30 URN      L  LAB.L.SPEC     ?SSH[ea]LT[slt,slsD,slsT,slsN]                          
 Ì     i   2
lab.c.mri.marker    (markers) 
[urn, marker,marker.origin,marker.origin.urn]
?SSH[ea]MK[ssk,sskMO,sskMU]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 marker                      10 FREE     L  LAB.C.MARK     ssk                                                     
 marker.origin                2 CHOICE   L                 sskMO                                                       
 marker.origin.urn           12 FREE     L                 sskMU                                                       
 marker.date                  8 DATE     L                 ?SSH[ea]MK[ssk,sskMO,sskMU]|1                               
 marker.first.date            8 DATE     L                 ?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                 ?SSH[ea]MK[ssk,sskMO,sskMU]|2                               
 marker.user                 10 FREE     L  MIS.USER       ?SSH[ea]MK[ssk,sskMO,sskMU]|0                           
 Ì     i   2
lab.c.mri.merge.unit.recips    (merge.unit.recipients) 
[urn, merge.unit]
?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
lab.c.mri.mic.procs.by.collect    (mic.procs.by.coll) 
[urn, mic.proc.coll,mic.date.coll,mic.time.coll,mic.number.coll]
?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             17 FREE     L                 smsN                                                        
 mic.spec.coll               30 URN      L  LAB.M.SPEC     ?SSH[ea]MP[smp,smsD,smsT,smsN]                          
 Ì     i   2
lab.c.mri.mic.specs    (mic.specs) 
[urn, mic.spec]
?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                 ?SSH[ea]MS[sms]A|10                                         
 mic.cancel.comments.file     0 FREE     L                 ?SSH[ea]MS[sms]CC                                           
 mic.cancelled.time.int       9 PINT     R                 ?SSH[ea]MS[sms]A|5                                          
 mic.cancelled.user          10 FREE     L  MIS.USER       ?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       ?SSH[ea]MS[sms]|13                                      
 mic.collection.batch        10 PINT     R  LAB.C.CB       ?SSH[ea]MS[sms]|20                                      
 mic.collection.batch.date    8 DATE     L                 ?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                 ?SSH[ea]MS[sms]A|7                                          
 mic.collection.category     10 FREE     L  LAB.C.COL.CAT  ?SSH[ea]MS[sms]|15                                      
 mic.collection.date          8 DATE     L                 ?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                 ?SSH[ea]MS[sms]|4                                           
 mic.comments.file            0 FREE     L                 ?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                 ?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       ?SSH[ea]MS[sms]A|3                                      
 mic.last.activity            8 PINT     R                 ?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                 ?SSH[ea]MS[sms]|17                                          
 mic.number                  17 FREE     L                 ?SSH[ea]MS[sms]|0                                           
 mic.number.part              5 PINT     R                 ?SSH[ea]MS[sms]|8                                           
 mic.order.location          10 FREE     L  MIS.LOCN.DICT  ?SSH[ea]MS[sms]A|9                                      
 mic.order.site              10 FREE     L  LAB.C.SITE     ?SSH[ea]MS[sms]A|8                                      
 mic.patient                 30 FREE     L  LAB.C.PAT      ?SSH[ea]MS[sms]|1                                       
 mic.prefix                   2 FREE     L                 ?SSH[ea]MS[sms]|7                                           
 mic.priority                 1 FREE     L                 ?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     ?SSH[ea]MS[sms]A|11                                     
 mic.received                 1 YN       L                 ?SSH[ea]MS[sms]|12                                          
 mic.received.by             10 FREE     L  MIS.USER       ?SSH[ea]MS[sms]|14                                      
 mic.received.date            8 DATE     L                 ?SSH[ea]MS[sms]|9                                           
 mic.received.time            4 HHMMU    L                 ?SSH[ea]MS[sms]|10                                          
 mic.report.last.printed      8 PINT     R                 ?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      ?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      ?SSH[ea]MS[sms]A|0                                      
 mic.spec.desc               10 FREE     L  LAB.M.SPDESC   ?SSH[ea]MS[sms]A|1                                      
 mic.status                   4 CHOICE   L                 ?SSH[ea]MS[sms]|2                                           
 mic.status.before.cancel     4 CHOICE   L                 ?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.DI      
                                                           VAL=CT.name[@LAB.C.MRI.mic.subm.doctor]}                    
 mic.subm.doc.non.dict.nm    30 FREE     L                 ?SSH[ea]MS[sms]A|2                                          
 mic.subm.doctor             10 FREE     L  MIS.DOC.DICT   ?SSH[ea]MS[sms]|11                                      
 mic.wkld.function           10 FREE     L  LAB.C.WL.FUNC  ?SSH[ea]MS[sms]|18                                      
 Ì     i   2
lab.c.mri.mic.comments    (mic.comments) 
[urn,mic.spec, mic.comment.q]
?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 FREE     L                 ?SSH[ea]MS[sms]C[sshMC]                                     
 Ì     i   2
lab.c.mri.mic.procs    (mic.procs) 
[urn,mic.spec, mic.proc]
?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                 ?SSH[ea]MS[sms]T[smp]|8                                     
 mic.proc.complete            1 YN       L                 ?SSH[ea]MS[sms]T[smp]|2                                     
 mic.proc.deleted             1 YN       L                 ?SSH[ea]MS[sms]T[smp]|5                                     
 mic.proc.site               10 FREE     L  LAB.C.SITE     ?SSH[ea]MS[sms]T[smp]|3                                 
 mic.review.flag              1 FREE     L                 ?SSH[ea]MS[sms]T[smp]|7                                     
 mic.verified.res.q           2 PINT     R                 ?SSH[ea]MS[sms]T[smp]|6                                     
 mic.verify.time              7 PINT     R                 ?SSH[ea]MS[sms]T[smp]|1                                     
 mic.verify.user             10 FREE     L  MIS.USER       ?SSH[ea]MS[sms]T[smp]|0                                 
 mic.workbatch.urn           10 PINT     R  LAB.M.WB       ?SSH[ea]MS[sms]T[smp]|4                                 
 Ì     i   2
lab.c.mri.activity.index    (mri.act.x) 
[mri.urn,lab.module,spec.urn]
:SSHA[ea,sshM,sshU]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mri.urn                     25 URN      L  MRI.PAT        ea                                                      
 lab.module                   1 CHOICE   L                 sshM                                                        
 spec.urn                     9 FREE     L                 sshU                                                        
 activity.date                8 DATE     L                 :SSHA[ea,sshM,sshU]|0                                       
 spec.status                  6 FREE     L                 :SSHA[ea,sshM,sshU]|1                                       
 Ì     i   2
lab.c.mri.oe.req.x    (oe.req.x) 
[oe.mri.urn,oe.lab.module,oe.urn]
: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     :SSHR[ea,sshrM,po]|1                                    
 oe.mic.source               10 FREE     L  LAB.M.SRC      :SSHR[ea,sshrM,po]|1                                    
 oe.pt.acct                  30 FREE     L  LAB.C.PAT      :SSHR[ea,sshrM,po]|3                                    
 oe.pth.proc                 10 URN      L  LAB.P.TERM     :SSHR[ea,sshrM,po]|1                                    
 oe.req.urn                  10 URN      L  LAB.C.REQ      :SSHR[ea,sshrM,po]|2                                    
 oe.spec.urn                  9 FREE     L                 :SSHR[ea,sshrM,po]|0                                        
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 lab.c.mri.bbk.product.date.x       [bbk.product,bbk.collection.date,urn,bbk.spec]
   bbk.product.date.x                 :SSHBPD[sbp,sbsD,ea,sbs]

 lab.c.mri.bbk.product.x            [bbk.product,urn,bbk.spec]
   bbk.product.x                      :SSHBP[sbp,ea,sbs]

 lab.c.mri.bbk.test.date.x          [bbk.test,bbk.collection.date,urn,bbk.spec]
   bbk.test.date.x                    :SSHBD[sbt,sbsD,ea,sbs]

 lab.c.mri.bbk.test.x               [bbk.test,urn,bbk.spec]
   bbk.test.x                         :SSHB[sbt,ea,sbs]

 lab.c.mri.bbk.wristband.x          [bbk.wristband.num] = urn
   bbk.wristband.x                    :SSHBW[sbsWB]

 lab.c.mri.lab.test.date.x          [lab.test,lab.collection.date,urn,lab.spec]
   lab.test.date.x                    :SSHLD[slt,slsD,ea,sls]

 lab.c.mri.lab.test.x               [lab.test,urn,lab.spec]
   lab.test.x                         :SSHL[slt,ea,sls]

 lab.c.mri.marker.index             [marker,urn]
   marker.x                           :SSHMK[ssk,ea]

 lab.c.mri.mic.proc.date.x          [mic.proc,mic.collection.date,urn,mic.spec]
   mic.proc.date.x                    :SSHPD[smp,smsD,ea,sms]

 lab.c.mri.mic.proc.index           [mic.proc,urn,mic.spec]
   mic.proc.x                         :SSHP[smp,ea,sms]

 lab.c.mri.mpi.account.index        [urn,LAB.C.PAT.urn]
   mpi.acct.x                         :SSHM[ea,aa]

 lab.c.mri.ref.pt.id.x              [client,ref.pt.id] = urn
   ref.pt.id.x                        :SSHID[ggg,scrID]

 lab.c.mri.refi.pt.id.x             [ref.pt.id,client] = urn
   refi.pt.id.x                       :SSHII[scrID,ggg]