sHelp
                                     PP.POS
     i   2
   pp.position.dictionary
     pp.pos.approved.hours

 Ì     i   2
pp.position.dictionary    (main) 
[position.number]
&JP[jp]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 position.number             18 FREE     L                 jp                                                          
 active                       1 YN       L                 &JP[jp]|0                                                   
 approved.hrs.per.period      8 DEC      R                 &JP[jp]|4                                                   
 audit.user                  10 FREE     L  MIS.USER       &JP[jp]USR                                              
 authorized.to.fill           1 YN       L                 &JP[jp]|10                                                  
 comment                     35 FREE     L                 &JP[jp]|9                                                   
 dept                        15 FREE     L  MIS.GL.DEPT    &JP[jp]|2                                               
 effective.date               8 DATE     L                 &JP[jp]|6                                                   
 expiration.date              8 DATE     L                 &JP[jp]|7                                                   
 job.code                    10 FREE     L  PP.JOB         &JP[jp]|3                                               
 last.update                 50 FREE     L                 &JP[jp]UPD                                                  
 payroll                      8 FREE     L  PP.PAYROLL     &JP[jp]|11                                              
 shift                        1 PINT     L                 &JP[jp]|5                                                   
 title                       35 FREE     L                 &JP[jp]|1                                                   
 Ì     i   2
pp.pos.approved.hours    (approved.hours) 
[position.number, app.hrs.ending.date]
&JP[jp]A[jaS]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 app.hrs.ending.date          8 DATE     L                 jaS                                                         
 app.hrs.hours                8 DEC      R                 &JP[jp]A[jaS]|0                                             
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 pp.position.dict.dept.index        [dept,position.number]
   dept.x                             &JPD[gd,jp]

 pp.position.dict.job.index         [job.code,position.number]
   job.x                              &JPJ[jj,jp]