sHelp
                                     LAB.C.STORE
     i   2
   lab.c.store.display.locations
   lab.c.store.display.slides
   lab.c.storage.main
     lab.c.storage.specimens

 Ì     i   2
lab.c.store.display.locations    (display.locations) 
[disloc.q]
/SSZL[sszl]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 disloc.q                     3 PINT     R                 sszl                                                        
 disloc.area                 10 FREE     L  LAB.C.STR.DICT /SSZL[sszl]|0                                           
 disloc.cols                  2 PINT     R                 /SSZL[sszl]|5                                               
 disloc.discarded             8 FREE     L                 /SSZL[sszl]|6                                               
 disloc.location             10 FREE     L                 /SSZL[sszl]|1                                               
 disloc.rack                 10 FREE     L                 /SSZL[sszl]|3                                               
 disloc.rows                  2 PINT     R                 /SSZL[sszl]|4                                               
 disloc.shelf                10 FREE     L                 /SSZL[sszl]|2                                               

 Ì     i   2
lab.c.store.display.slides    (display.slides) 
[dislide.q]
/SSZS[sszs]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 dislide.q                    3 PINT     R                 sszs                                                        
 dislide.expected             8 DATE     L                 /SSZS[sszs]|4                                               
 dislide.location            10 FREE     L  LAB.P.LOCATION /SSZS[sszs]|2                                           
 dislide.sent                 8 DATE     L                 /SSZS[sszs]|3                                               
 dislide.slide               30 FREE     L                 /SSZS[sszs]|1                                               
 dislide.urn                 10 URN      L  LAB.P.SLIDE    /SSZS[sszs]|0                                           

 Ì     i   2
lab.c.storage.main    (main) 
[area,location,shelf,rack]
?SSZR[ssz,sszl,sszs,sszr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 area                        10 FREE     L  LAB.C.STR.DICT ssz                                                     
 location                    10 FREE     L                 sszl                                                        
 shelf                       10 FREE     L                 sszs                                                        
 rack                        10 FREE     L                 sszr                                                        
 rack.cols                    2 PINT     R                 ?SSZR[ssz,sszl,sszs,sszr]|1                                 
 rack.created                 9 PINT     R                 ?SSZR[ssz,sszl,sszs,sszr]|2                                 
 rack.created.date            8 DATE     L                 VAL=%Z.date.in.magic(@LAB.C.STORE.rack.created)             
 rack.discard.date            8 DATE     L                 VAL=%Z.date.in.magic(@LAB.C.STORE.rack.retention*86400      
                                                           VAL=+@LAB.C.STORE.rack.created)                             
 rack.retention               5 PINT     R                 ?SSZR[ssz,sszl,sszs,sszr]|4                                 
 rack.rows                    2 PINT     R                 ?SSZR[ssz,sszl,sszs,sszr]|0                                 
 rack.user                   10 FREE     L  MIS.USER       ?SSZR[ssz,sszl,sszs,sszr]|3                             

 Ì   €�   i   2
lab.c.storage.specimens    (specimens) 
[area,location,shelf,rack, rack.row,rack.col]
?SSZR[ssz,sszl,sszs,sszr]S[sszR,sszC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 rack.row                     2 PINT     R                 sszR                                                        
 rack.col                     2 PINT     R                 sszC                                                        
 bbk.spec                    30 URN      L  LAB.B.SPEC     ?SSZR[ssz,sszl,sszs,sszr]S[sszR,sszC]|1                 
 lab.spec                    30 URN      L  LAB.L.SPEC     ?SSZR[ssz,sszl,sszs,sszr]S[sszR,sszC]|1                 
 mic.spec                    30 URN      L  LAB.M.SPEC     ?SSZR[ssz,sszl,sszs,sszr]S[sszR,sszC]|1                 
 module                       1 CHOICE   L                 ?SSZR[ssz,sszl,sszs,sszr]S[sszR,sszC]|0                     
 pth.spec                    30 URN      L  LAB.P.SPEC     ?SSZR[ssz,sszl,sszs,sszr]S[sszR,sszC]|1                 
 spec.urn                     9 FREE     L                 ?SSZR[ssz,sszl,sszs,sszr]S[sszR,sszC]|1                     

 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 lab.c.storage.discard.x            [rack.discard.date,area,location,shelf,rack]
   discard.x                          ?SSZD[sszD,ssz,sszl,sszs,sszr]