sHelp
                                     LAB.C.TASKB
     i   2
 main
   tasks

 Ì   €   i   2
main
[urn]
*(S)SSJ[ssj]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 urn                         10 PINT     R                 ssj                                                         
 closed                       8 DATE     L                 *(S)SSJ[ssj]|3                                              
 date                         8 DATE     L                 *(S)SSJ[ssj]|0                                              
 mnemonic.id                 30 FREE     L                 VAL=("TB:",@task.list,%Z.date.out(@date),"Batch #"_@nu      
                                                           VAL=mber)                                                   
 name.id                     50 FREE     L                 VAL=(@LAB.C.TASKL.name[@task.list],%Z.date.out(@date),      
                                                           VAL="Batch #"_@number)                                      
 number                       3 PINT     R                 *(S)SSJ[ssj]|2                                              
 printed                      1 YN       L                 *(S)SSJ[ssj]|7                                              
 report.name                 50 FREE     L                 VAL=(@LAB.C.TASKL.name[@task.list],%Z.date.out(@date),      
                                                           VAL="Batch #"_@number)                                      
 site                        10 FREE     L  LAB.C.SITE     *(S)SSJ[ssj]|4                                          
 task.list                   10 FREE     L  LAB.C.TASKL    *(S)SSJ[ssj]|1                                          
 temp.prefix                  2 FREE     L                 VAL=TB                                                      
 time                         4 HHMM     L                 *(S)SSJ[ssj]|6                                              
 user                        10 FREE     L  MIS.USER       *(S)SSJ[ssj]|5                                          
 Ì   €   i   2
tasks
[urn,  task.q]
*(S)SSJ[ssj]T[ssjT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 task.q                       3 PINT     R                 ssjT                                                        
 task                        10 URN      L  LAB.C.TASKR    *(S)SSJ[ssj]T[ssjT]|0                                   

 Index Files                        Subscripts/Physical Base

 id.x                               [task.list,date,number] = urn
                                      ?(S)SSJI[ssql,ssjD,ssjN]