sHelp
                                     LAB.P.SLIDE
     i   2
   lab.p.slide.main
     lab.p.slide.comments
     lab.p.slide.workload
     lab.p.slide.process.slides
     lab.p.slide.process.sl.chosen
     lab.p.slide.process.sorts
       lab.p.slide.process.comments

 Ì     i   2
lab.p.slide.main    (main) 
[urn]
?SPSSL[spssl]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 urn                         10 URN      L                 spssl                                                       
 active                       1 YN       L                 ?SPSSL[spssl]|7                                             
 date                         8 DATE     L                                                                             
 entered                      8 DATE     L                 ?SPSSL[spssl]|8                                             
 expected                     8 DATE     L                 ?SPSSL[spssl]|4                                             
 location                    10 FREE     L  LAB.P.LOCATION ?SPSSL[spssl]|2                                         
 returned                     8 DATE     L                 ?SPSSL[spssl]|5                                             
 sent                         8 DATE     L                 ?SPSSL[spssl]|3                                             
 slide                       30 FREE     L                 ?SPSSL[spssl]|1                                             
 sort.key                    20 FREE     L                                                                             
 specimen                    30 URN      L  LAB.P.SPEC     ?SPSSL[spssl]|0                                         
 specimen.id                 30 FREE     L                                                                             
 status                       8 CHOICE   L                 VAL=IF{urn="NEW";'@sent "UNSENT";@returned "RETURNED";      
                                                           VAL=@expected<@.today "OVERDUE";"SENT"}                  
 user                        10 FREE     L  MIS.USER       ?SPSSL[spssl]|6                                         
 view.lines                  60 FREE     L                 VAL=%LAB.U.view.text(^@Root(@comments[urn]),IF{@.gui 1      
                                                           VAL=1;13},4,60,{@Z.color.labels1,@Z.color.data1},"",1,      
                                                           VAL="","",1)&""                                             
 Ì     i   2
lab.p.slide.comments    (comments) 
[urn, comment.q]
?SPSSL[spssl]C[spsCQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 comment.q                    3 PINT     R                 spsCQ                                                       
 comment                     80 FREE     L                 ?SPSSL[spssl]C[spsCQ]                                       
 Ì     i   2
lab.p.slide.workload    (workload) 
[urn, workload.function]
?SPSSL[spssl]W[scf]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 workload.function           10 FREE     L  LAB.C.WL.FUNC  scf                                                     
 workload.count               3 PINT     R                 ?SPSSL[spssl]W[scf]|0                                       
 Ì     i   2
lab.p.slide.process.slides    (process.slides) 
[process.q]
/.LAB.SPSSL["S",spssP]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 process.q                    3 FREE     L                 spssP                                                       
 process.comment.file         1 FREE     L                 /.LAB.SPSSL["S",spssP]C                                     
 process.comment.line        92 FREE     L                 /.LAB.SPSSL["S",spssP]|10                                   
 process.display.only           PINT     R                 /.LAB.SPSSL["S",spssP]|9                                    
 process.expected             8 DATE     L                 /.LAB.SPSSL["S",spssP]|5                                    
 process.location            10 FREE     L  LAB.P.LOCATION /.LAB.SPSSL["S",spssP]|2                                
 process.number              15 FREE     L                 /.LAB.SPSSL["S",spssP]|7                                    
 process.patient             30 FREE     L  LAB.C.PAT      /.LAB.SPSSL["S",spssP]|8                                
 process.returned             8 DATE     L                 /.LAB.SPSSL["S",spssP]|6                                    
 process.sent                 8 DATE     L                 /.LAB.SPSSL["S",spssP]|4                                    
 process.slide               30 FREE     L                 /.LAB.SPSSL["S",spssP]|3                                    
 process.specimen            30 URN      L  LAB.P.SPEC     /.LAB.SPSSL["S",spssP]|1                                
 process.urn                 10 URN      L  LAB.P.SLIDE    /.LAB.SPSSL["S",spssP]|0                                
 Ì     i   2
lab.p.slide.process.sl.chosen    (process.slides.chosen) 
[process.q.chosen]
/.LAB.SPSSL["C",spsPC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 process.q.chosen             3 FREE     L                 spsPC                                                       
 process.q.from              10 FREE     L                 /.LAB.SPSSL["C",spsPC]|1                                    
 process.slide.urn.chosen    10 URN      L  LAB.P.SLIDE    /.LAB.SPSSL["C",spsPC]|0                                
 Ì     i   2
lab.p.slide.process.sorts    (process.sorts) 
[process.sort.q]
/.LAB.SPSSL["SR",spsPQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 process.sort.q               2 PINT     R                 spsPQ                                                       
 process.sort                 9 CHOICE   L                 /.LAB.SPSSL["SR",spsPQ]|0                                   
 Ì     i   2
lab.p.slide.process.comments    (process.comments) 
[process.date.queue, process.comment.q]
/.LAB.SPSSL["R",spss]C[spslC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 process.comment.q            3 PINT     R                 spslC                                                       
 process.comment             60 FREE     L                 /.LAB.SPSSL["R",spss]C[spslC]                               
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 lab.p.slide.activity.x             [date,urn]
   activity.x                         :SPSSLA[spsD,spssl]

 lab.p.slide.expected.x             [expected,urn]
   expected.x                         :SPSSLE[spsEX,spssl]

 lab.p.slide.location.x             [location,urn]
   location.x                         :SPSSLO[spsLO,spssl]

 lab.p.slide.slide.x                [slide,urn] = active
   slide.x                            :SPSSLL[spsSL,spssl]

 lab.p.slide.sort.x                 [sort.key,urn]
   sort.x                             :SPSSLS[spsSK,spssl]

 lab.p.slide.specimen.x             [specimen,slide,sent,urn]
   specimen.x                         :SPSSLP[sps,spsSL,spsSE,spssl]