sHelp
                                     WL.ACCESS
       2
   wl.access
     wl.user.access.facilities
       user.consultants

 Ì       2
wl.access    (main) 
[mnemonic]
&WLA[wla]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mnemonic                    10 FREE     L                 wla                                                         
 active                       1 YN       L                 &WLA[wla]|0                                                 
 by.access.or.user            6 CHOICE   L                                                                             
 last.update                 10 PINT     R                 &WLA[wla]UPD                                                
 name                        30 FREE     L                 &WLA[wla]|1                                                 
 Ì        2
wl.user.access.facilities    (facilities) 
[mnemonic, facility]
&WLA[wla]FAC[gqb]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 facility                    10 FREE     L  MIS.FACILITY   gqb                                                     
 Ì       2
user.consultants    (user.consultants) 
[mnemonic,user, user.consultant]
&WLA[wla]U[gu]CON[ggg]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 user.consultant             10 FREE     L  MIS.DOC.DICT   ggg