sHelp
                                     PP.PAY
     i   2
   pp.pay.accrual.payrolls
     pp.pay.accrual.payroll
   pp.pay.ap.detail
   pp.pay.ca.labor.file
     pp.pay.ca.labor.data
   pp.pay.cpu.dd.security
   pp.pay.cpu.direct.deposit.file
     pp.pay.cpu.dd.file
       pp.pay.cpu.dd.data
       pp.pay.cpu.dd.turnaround
   pp.pay.de6.file
     pp.pay.de6.file.records
   pp.pay.gl.accrual.batch.stuff
   pp.pay.gl.dates
   pp.pay.gl.dist
   pp.pay.gl.expense.summary
   pp.time.card.file
     pp.pay.ck.earnings
     pp.time.card.benefits
     pp.time.card.earnings
     pp.time.card.withholding
     pp.time.card.current.values.sj
     pp.time.card.earning.exception
     pp.pay.mult.pay.check
     pp.pay.mult.pay.dd
     pp.pay.mult.pay.source
     pp.time.card.earnings.input
     pp.pay.time.card.withholdings
     pp.pay.vaca.advance.data.in
     pp.pay.vacation.advances
   pp.pay.qtr.earn.file
     pp.pay.qtr.earn.file.records
   temp.reconcile.check
   pp.pay.retro
     pp.pay.retro.contracts
     pp.pay.retro.empls
     pp.pay.retro.job.codes
     pp.pay.retro.payrolls
     pp.pay.retro.results
       pp.pay.retro.earnings
       pp.pay.retro.withholdings

 Ì     i   2
pp.pay.accrual.payroll    (accrual.payroll) 
[acc.payroll]
:JZPAD[ja]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 acc.payroll                  8 FREE     L                 ja                                                          
 acc.do.accruals              1 YN       L                 :JZPAD[ja]|0                                                
 acc.edit                     1 YN       L                 :JZPAD[ja]|2                                                
 acc.edit.percent             1 CHOICE   L                 :JZPAD[ja]|3                                                
 acc.factor                  10 PDEC     R                 :JZPAD[ja]|4                                                
 acc.num.days                 3 PINT     R                 :JZPAD[ja]|5                                                
 acc.pay.date                 8 DATE     L                 :JZPAD[ja]|1                                                
 acc.payroll.freq             3 PINT     R                 :JZPAD[ja]|6                                                
 acc.slash                    1 FREE     L                 VAL=IF{@acc.edit.percent="F" "/"}                           
 Ì     i   2
pp.pay.ap.detail    (ap.detail) 
[ap.date,ap.mis.batch,ap.mis.txn,ap.mis.line,ap.urn]
:JZ.AP[gkbD,gkb,gkbT,gkbL,jz]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ap.date                      8 DATE     L                 gkbD                                                        
 ap.mis.batch                 5 PINT     R                 gkb                                                         
 ap.mis.txn                   4 PINT     R                 gkbT                                                        
 ap.mis.line                  4 PINT     R                 gkbL                                                        
 ap.urn                       8 URN      L  PP.PAY         jz                                                      
 ap.amount                    8 SMONEY   R                 :JZ.AP[gkbD,gkb,gkbT,gkbL,jz]                               
 Ì     i   2
pp.pay.ca.labor.file    (ca.labor.file) 
[ca.labor.date]
*JZLR[jzLRD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ca.labor.date                8 DATE     L                 jzLRD                                                       
 ca.labor.status             10 CHOICE   L                 *JZLR[jzLRD]|0                                              
 Ì     i   2
pp.pay.ca.labor.data    (ca.labor.data) 
[ca.labor.date, ca.labor.dept,ca.labor.eoc,ca.labor.job]
*JZLR[jzLRD,gd,ge,jj]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ca.labor.dept               15 FREE     L  MIS.GL.DEPT    gd                                                      
 ca.labor.eoc                 7 FREE     L  MIS.GL.EOC     ge                                                      
 ca.labor.job                10 FREE     L  PP.JOB         jj                                                      
 ca.non.prod.amt             12 SMONEY   R                 *JZLR[jzLRD,gd,ge,jj]|7                                     
 ca.non.prod.hrs              8 DEC1     R                 *JZLR[jzLRD,gd,ge,jj]|6                                     
 ca.ot.amt                   12 SMONEY   R                 *JZLR[jzLRD,gd,ge,jj]|3                                     
 ca.ot.hrs                    8 DEC1     R                 *JZLR[jzLRD,gd,ge,jj]|2                                     
 ca.other.prod.amt           12 SMONEY   R                 *JZLR[jzLRD,gd,ge,jj]|5                                     
 ca.other.prod.hrs            8 DEC1     R                 *JZLR[jzLRD,gd,ge,jj]|4                                     
 ca.reg.amt                  12 SMONEY   R                 *JZLR[jzLRD,gd,ge,jj]|1                                     
 ca.reg.hrs                   8 DEC1     R                 *JZLR[jzLRD,gd,ge,jj]|0                                     
 Ì     i   2
pp.pay.cpu.dd.security    (cpu.dd.security) 
?JZ.DPW

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cpu.dd.sec.1                 8 FREE     L                 ?JZ.DPW|0                                                   
 cpu.dd.sec.2                 8 FREE     L                 ?JZ.DPW|1                                                   
 cpu.dd.sec.3                 8 FREE     L                 ?JZ.DPW|2                                                   
 cpu.dd.sec.dt                8 DATE     L                 ?JZ.DPW|3                                                   
 cpu.dd.sec.tm                4 TIME     L                 ?JZ.DPW|4                                                   
 cpu.dd.sec.user             10 FREE     L  MIS.USER       ?JZ.DPW|5                                               
 Ì     i   2
pp.pay.cpu.direct.deposit.file    (cpu.direct.deposit) 
[cpu.dd.payroll,cpu.dd.pay.date]
?JZ.D[ja,jzPD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cpu.dd.payroll               8 FREE     L  PP.PAYROLL     ja                                                      
 cpu.dd.pay.date              8 DATE     L                 jzPD                                                        
 Ì     i   2
pp.pay.cpu.dd.file    (cpu.dd.file) 
[cpu.dd.payroll,cpu.dd.pay.date, cpu.dd.file.counter]
?JZ.D[ja,jzPD]N[jzDFC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cpu.dd.file.counter          3 INT      R                 jzDFC                                                       
 cpu.dd.compile.date          8 DATE     L                 ?JZ.D[ja,jzPD]N[jzDFC]|0                                    
 cpu.dd.date.sent             8 DATE     L                 ?JZ.D[ja,jzPD]N[jzDFC]|2                                    
 cpu.dd.err.trap            240 FREE     L                 ?JZ.D[ja,jzPD]N[jzDFC]TR                                    
 cpu.dd.pnote.y.n             1 YN       L                                                                             
 cpu.dd.sent.by              10 FREE     L  MIS.USER       ?JZ.D[ja,jzPD]N[jzDFC]|4                                
 cpu.dd.status                9 CHOICE   L                 ?JZ.D[ja,jzPD]N[jzDFC]|1                                    
 cpu.dd.time.sent             4 TIME     L                 ?JZ.D[ja,jzPD]N[jzDFC]|3                                    
 cpu.dd.type                  8 CHOICE   L                 ?JZ.D[ja,jzPD]N[jzDFC]|5                                    
 Ì     i   2
pp.pay.cpu.dd.data    (cpu.dd.data) 
[cpu.dd.payroll,cpu.dd.pay.date,cpu.dd.file.counter, cpu.dd.data.count]
?JZ.D[ja,jzPD]N[jzDFC]D[cpuDC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cpu.dd.data.count            5 INT      R                 cpuDC                                                       
 cpu.dd.data.record          94 FREE     L                 ?JZ.D[ja,jzPD]N[jzDFC]D[cpuDC]                              
 cpu.dd.data.record.can     240 FREE     L                 ?JZ.D[ja,jzPD]N[jzDFC]D[cpuDC]                              
 Ì     i   2
pp.pay.cpu.dd.turnaround    (cpu.dd.turnaround) 
[cpu.dd.payroll,cpu.dd.pay.date,cpu.dd.file.counter, cpu.dd.turnaround.count]
?JZ.D[ja,jzPD]N[jzDFC]T[cpuDC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 cpu.dd.turnaround.count      5 INT      R                 cpuDC                                                       
 cpu.dd.turnaround.record   132 FREE     L                 ?JZ.D[ja,jzPD]N[jzDFC]T[cpuDC]                              
 Ì     i   2
pp.pay.de6.file    (de6.file) 
[de6.year,de6.quarter]
?JZ.DE6[jdyr,jdqt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 de6.year                     4 YEAR     L                 jdyr                                                        
 de6.quarter                  1 PINT     R                 jdqt                                                        
 de6.compile.date             8 DATE     L                 ?JZ.DE6[jdyr,jdqt]|0                                        
 de6.status                   9 CHOICE   L                 ?JZ.DE6[jdyr,jdqt]|1                                        
 Ì     i   2
pp.pay.de6.file.records    (de6.file.records) 
[de6.year,de6.quarter, de6.count]
?JZ.DE6[jdyr,jdqt]R[jdcnt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 de6.count                    5 INT      R                 jdcnt                                                       
 de6.record                 250 FREE     L                 ?JZ.DE6[jdyr,jdqt]R[jdcnt]                                  
 Ì     i   2
pp.pay.gl.accrual.batch.stuff    (gl.accrual.batch.stuff) 
[date.accrual.can.be.done]
?JZGLA[jzgla]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 date.accrual.can.be.done     8 DATE     L                 jzgla                                                       
 period.for.accrual          10 FREE     L  MIS.GL.PERIOD  ?JZGLA[jzgla]                                           
 Ì     i   2
pp.pay.gl.dates    (gl.dates) 
[gl.period]
:JZ.GL[gp]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 gl.period                   10 FREE     L  MIS.GL.PERIOD  gp                                                      
 gl.date                      8 DATE     L                 :JZ.GL[gp]                                                  
 Ì     i   2
pp.pay.gl.dist    (gl.dist) 
[gl.dist.urn,gl.dist.dept,gl.dist.eoc,gl.dist.acct,gl.dist.src.type,gl.dist.job.code,gl.dist.source]
:JZGLD[jz,gdDPT,ge,gaEXP,jzTYP,jj,jzSRC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 gl.dist.urn                  8 PINT     R                 jz                                                          
 gl.dist.dept                15 FREE     L  MIS.GL.DEPT    gdDPT                                                   
 gl.dist.eoc                  7 FREE     L  MIS.GL.EOC     ge                                                      
 gl.dist.acct                25 FREE     L  MIS.GL.ACCOUNT gaEXP                                                   
 gl.dist.src.type             1 FREE     L                 jzTYP                                                       
 gl.dist.job.code            10 FREE     L  PP.JOB         jj                                                      
 gl.dist.source               8 PDEC     R                 jzSRC                                                       
 gl.dist.amt                 10 MONEY    R                 :JZGLD[jz,gdDPT,ge,gaEXP,jzTYP,jj,jzSRC]                    
 Ì     i   2
pp.pay.gl.expense.summary    (gl.expense.summary) 
[gl.exp.period,gl.exp.dept,gl.exp.acct,gl.exp.payroll,gl.exp.tc.type,gl.exp.tc.date,gl.exp.src.type,gl.exp.urn]
:JZGES[gpPER,gdDPT,gaEXP,ja,jzTCT,jzTCD,jzTYP,jzEXP]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 gl.exp.period               10 FREE     L  MIS.GL.PERIOD  gpPER                                                   
 gl.exp.dept                 15 FREE     L  MIS.GL.DEPT    gdDPT                                                   
 gl.exp.acct                 25 FREE     L  MIS.GL.ACCOUNT gaEXP                                                   
 gl.exp.payroll               8 FREE     L  PP.PAYROLL     ja                                                      
 gl.exp.tc.type               2 FREE     L                 jzTCT                                                       
 gl.exp.tc.date               8 DATE     L                 jzTCD                                                       
 gl.exp.src.type              1 FREE     L                 jzTYP                                                       
 gl.exp.urn                   8 PINT     R                 jzEXP                                                       
 gl.exp.amt                  10 MONEY    R                 :JZGES[gpPER,gdDPT,gaEXP,ja,jzTCT,jzTCD,jzTYP,jzEXP]        
 Ì     i   2
pp.time.card.file    (main) 
[urn]
:JZ[jz]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 urn                          8 URN      L                 jz                                                          
 att.data.complete            1 YN       L                 :JZ[jz]|26                                                  
 check.comment               65 FREE     L                 :JZ[jz]C                                                    
 check.number                10 INT      L                 :JZ[jz]|14                                                  
 check.sort.field            32 FREE     L                                                                             
 ck.act.date                  8 DATE     L                                                                             
 ck.act.stat                  1 CHOICE   L                                                                             
 compute.benefits             1 YN       L                                                                             
 computed.ben.contr.hours     8 DEC3     R                 :JZ[jz]|17                                                  
 computed.rvw.contr.hours     8 DEC3     R                 :JZ[jz]|18                                                  
 dd.check.comment            65 FREE     L                 :JZ[jz]DC                                                   
 dd.number                   10 FREE     L                 :JZ[jz]|13                                                  
 employee                    42 URN      L  PP.PER         :JZ[jz]|0                                               
 exclude.uic                  1 YN       L                 :JZ[jz]|23                                                  
 flsa.method                  1 CHOICE   L                 :JZ[jz]|27                                                  
 gl.per.for.gl.dist          10 GLPERIOD L                 :JZ[jz]GLD                                                  
 gl.per.for.stats            10 GLPERIOD L                 :JZ[jz]SP                                                   
 gl.post.date                 8 DATE     L                 :JZ[jz]|19                                                  
 gl.void.date                 8 DATE     L                 :JZ[jz]|20                                                  
 gross.pay                    8 MONEY    R                 :JZ[jz]|8                                                   
 gross.pay.ytd                9 MONEY    R                 :JZ[jz]|9                                                   
 master.record.urn            8 URN      L                 :JZ[jz]|25                                                  
 net.pay                      8 MONEY    R                 :JZ[jz]|10                                                  
 next.in.dept                 1 CHOICE   L                                                                             
 order.of.additionals         1 FREE     L                 :JZ[jz]|28                                                  
 pay.date                     8 DATE     L                 :JZ[jz]|4                                                   
 payment.number              10 FREE     L                 VAL=IF{@check.number;@dd.number}                            
 payment.status               8 CHOICE   L                 :JZ[jz]|15                                                  
 payment.status.date          8 DATE     L                 :JZ[jz]|16                                                  
 payment.type                 2 CHOICE   L                 :JZ[jz]|12                                                  
 pp.per.txn                   8 PINT     R                 :JZ[jz]|11                                                  
 repl.ck.date                 8 DATE     L                 :JZ[jz]|29                                                  
 secondary.pay                8 MONEY    R                 :JZ[jz]|5                                                   
 sort.name                   26 FREE     L                 VAL=@employee's.sort.name                                   
 system.flag                  1 FREE     L                 :JZ[jz]|21                                                  
 tc.control                   7 DEC3     R                 :JZ[jz]|22                                                  
 tc.date                      8 DATE     L                 :JZ[jz]|1                                                   
 tc.flag                      7 FREE     L                 :JZ[jz]|7                                                   
 tc.retro.date                8 DATE     L                 :JZ[jz]|30                                                  
 tc.status                    7 CHOICE   L                 :JZ[jz]|2                                                   
 tc.status.date               8 DATE     L                                                                             
 tc.type                      1 CHOICE   L                 :JZ[jz]|3                                                   
 tcc.base.rate                8 RATE     R                 :JZ[jz]D|2                                                  
 tcc.contract                 8 FREE     L  PP.CONTRACT    :JZ[jz]D|9                                              
 tcc.dept                    15 FREE     L  MIS.GL.DEPT    :JZ[jz]D|1                                              
 tcc.empl.type                5 FREE     L  PP.TYPE        :JZ[jz]D|7                                              
 tcc.ins.coverage.amount      9 MONEY    R                 :JZ[jz]D|8                                                  
 tcc.job.code                10 FREE     L  PP.JOB         :JZ[jz]D|3                                              
 tcc.outside.agency           1 YN       L                 :JZ[jz]D|12                                                 
 tcc.payroll                  8 FREE     L  PP.PAYROLL     :JZ[jz]D|5                                              
 tcc.position.number         18 FREE     L  PP.POS         :JZ[jz]D|6                                              
 tcc.shift                    1 PINT     L                 :JZ[jz]D|4                                                  
 tcc.uic.max.dollars          9 MONEY    R                 :JZ[jz]D|10                                                 
 total.hours                  8 SDEC3    R                 :JZ[jz]|6                                                   
 unedited.advance             1 YN       L                 :JZ[jz]|24                                                  
 void.date.of.record          8 DATE     L                                                                             
 Ì     i   2
pp.pay.ck.earnings    (ck.earnings) 
[urn, ck.type,ck.earning,ck.earn.rate]
:JZ[jz]CE[ckT,je,jeCR]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ck.type                      1 PDEC     R                 ckT                                                         
 ck.earning                   8 PDEC     L  PP.EARN        je                                                      
 ck.earn.rate                 8 FREE     R                 jeCR                                                        
 ck.earn.amount              10 SMONEY   R                 :JZ[jz]CE[ckT,je,jeCR]|2                                    
 ck.earn.amount.ytd          10 SMONEY   R                 :JZ[jz]CE[ckT,je,jeCR]|4                                    
 ck.earn.benefit.avail       13 FREE     L                 :JZ[jz]CE[ckT,je,jeCR]|5                                    
 ck.earn.caption             17 FREE     L                 :JZ[jz]CE[ckT,je,jeCR]|3                                    
 ck.earn.hours                7 SDEC3    R                 :JZ[jz]CE[ckT,je,jeCR]|0                                    
 ck.earn.primary.hours        7 SDEC3    R                 :JZ[jz]CE[ckT,je,jeCR]|1                                    
 Ì     i   2
pp.time.card.benefits    (computed.benefit) 
[urn, benefit]
:JZ[jz]TB[je]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 benefit                      8 PDEC     L  PP.EARN        je                                                      
 benefit.accrued.balance      8 SDEC3    R                 VAL=%PP.PER.benefit.balance(urn,benefit,"ACCRUED")          
 benefit.avail.balance        8 SDEC3    R                 VAL=%PP.PER.benefit.balance(urn,benefit,"AVAILABLE")        
 benefit.award                8 DEC3     R                 :JZ[jz]TB[je]|8                                             
 benefit.earned               8 DEC3     R                 :JZ[jz]TB[je]|4                                             
 benefit.hour.basis           8 DEC3     R                 :JZ[jz]TB[je]|3                                             
 benefit.occurance            3 PINT     R                 :JZ[jz]TB[je]|11                                            
 benefit.plan                 8 FREE     L                 :JZ[jz]TB[je]|0                                             
 benefit.print.earned         8 DEC3     R                 VAL=(@benefit.earned+@benefit.award)                        
 benefit.taken                8 DEC3     R                 :JZ[jz]TB[je]|6                                             
 benefit.total.balance        8 SDEC3    R                 VAL=%PP.PER.benefit.balance(urn,benefit,"TOTAL")            
 benefit.transfer             8 DEC3     R                 :JZ[jz]TB[je]|9                                             
 benefit.zero.avail.first     8 DEC3     R                 :JZ[jz]TB[je]|10                                            
 Ì     i   2
pp.time.card.earnings    (computed.earning) 
[urn, earning]
:JZ[jz]TE[je]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 earning                      8 PDEC     L  PP.EARN        je                                                      
 earning.amount               9 SMONEY   R                 :JZ[jz]TE[je]|1                                             
 earning.amount.fiscal.ytd    9 SMONEY   R                 VAL=%PP.PAY.pm.computed.earnings("FYTD",urn,earning)        
 earning.amount.mtd           9 SMONEY   R                 VAL=%PP.PAY.pm.computed.earnings("MTD",urn,earning)         
 earning.amount.qtd           9 SMONEY   R                 VAL=%PP.PAY.pm.computed.earnings("QTD",urn,earning)         
 earning.amount.ytd           9 SMONEY   R                 :JZ[jz]TE[je]|3                                             
 earning.hours                8 SDEC3    R                 :JZ[jz]TE[je]|0                                             
 earning.hours.ytd            8 SDEC3    R                 :JZ[jz]TE[je]|2                                             
 Ì     i   2
pp.time.card.withholding    (computed.withholding) 
[urn, whold]
:JZ[jz]TW[jw]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 whold                        8 PDEC     L  PP.WHOLD       jw                                                      
 whold.amount                 8 SMONEY   R                 :JZ[jz]TW[jw]|0                                             
 whold.amount.ytd             8 SMONEY   R                 :JZ[jz]TW[jw]|1                                             
 whold.arrear.amt.taken       8 SMONEY   R                 :JZ[jz]TW[jw]|15                                            
 whold.base                   8 SMONEY   R                 :JZ[jz]TW[jw]|5                                             
 whold.base.ytd               8 SMONEY   R                 :JZ[jz]TW[jw]|6                                             
 whold.bond.amount.pur        8 SMONEY   R                 :JZ[jz]TW[jw]|8                                             
 whold.bond.num.pur           4 PINT     R                 :JZ[jz]TW[jw]|7                                             
 whold.calculated             8 SMONEY   R                 VAL=(@whold.amount+@whold.not.taken)                        
 whold.ck.print.check         1 FREE     L                 VAL=(@whold.amount-0'=0!(@whold.amount.ytd-0'=0)&(whol      
                                                           VAL=d>/WHLD))                                            
 whold.ee.additional          8 SMONEY   R                 :JZ[jz]TW[jw]|11                                            
 whold.employer.amount        8 SMONEY   R                 :JZ[jz]TW[jw]|3                                             
 whold.employer.ytd           8 SMONEY   R                 :JZ[jz]TW[jw]|4                                             
 whold.er.additional          8 SMONEY   R                 :JZ[jz]TW[jw]|12                                            
 whold.ignore.partial         1 YN       L                 :JZ[jz]TW[jw]|9                                             
 whold.net.prior.to.calc      8 SMONEY   R                 :JZ[jz]TW[jw]|10                                            
 whold.not.taken              8 SMONEY   R                 :JZ[jz]TW[jw]|2                                             
 whold.not.taken.is.arrear    1 YN       L                 :JZ[jz]TW[jw]|14                                            
 whold.only.additional        1 YN       L                 :JZ[jz]TW[jw]|13                                            
 Ì     i   2
pp.time.card.current.values.sj    (current.values.sec.job) 
[urn, tcc.sec.job.counter]
:JZ[jz]D["SJ",jySC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tcc.sec.job.counter          2 INT      R                 jySC                                                        
 tcc.sec.job                 10 FREE     L  PP.JOB         :JZ[jz]D["SJ",jySC]|0                                   
 tcc.sec.job.contract         8 FREE     L  PP.CONTRACT    :JZ[jz]D["SJ",jySC]|4                                   
 tcc.sec.job.dept            15 FREE     L  MIS.GL.DEPT    :JZ[jz]D["SJ",jySC]|2                                   
 tcc.sec.job.rate             8 RATE     R                 :JZ[jz]D["SJ",jySC]|1                                       
 Ì     i   2
pp.time.card.earning.exception    (earning.exception) 
[urn, exception.earning]
:JZ[jz]TEE[je]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 exception.earning            8 PDEC     L  PP.EARN        je                                                      
 exception.max.per            8 PDEC     R                 :JZ[jz]TEE[je]|0                                            
 exception.max.yr             8 PDEC     R                 :JZ[jz]TEE[je]|1                                            
 Ì     i   2
pp.pay.mult.pay.check    (mult.pay.check) 
[urn, mpc.counter]
:JZ[jz]MP["C",mpcC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mpc.counter                  2 INT      R                 mpcC                                                        
 mpc.amount                  10 MONEY    R                 :JZ[jz]MP["C",mpcC]|2                                       
 mpc.number                  10 FREE     L                 :JZ[jz]MP["C",mpcC]|0                                       
 mpc.urn                      8 FREE     L                 :JZ[jz]MP["C",mpcC]|1                                       
 Ì     i   2
pp.pay.mult.pay.dd    (mult.pay.dd) 
[urn, mpd.counter]
:JZ[jz]MP["D",mpdC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mpd.counter                  2 INT      R                 mpdC                                                        
 mpd.account.number          17 FREE     L                 :JZ[jz]MP["D",mpdC]|1                                       
 mpd.account.type             1 CHOICE   L                 :JZ[jz]MP["D",mpdC]|2                                       
 mpd.amount                  10 MONEY    R                 :JZ[jz]MP["D",mpdC]|4                                       
 mpd.bank                    17 FREE     L  PP.BANK        :JZ[jz]MP["D",mpdC]|0                                   
 mpd.number                  10 FREE     L                 :JZ[jz]MP["D",mpdC]|3                                       
 Ì     i   2
pp.pay.mult.pay.source    (mult.pay.source) 
[urn, mp.counter]
:JZ[jz]MP["S",mpC]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 mp.counter                   2 INT      R                 mpC                                                         
 mp.account.number           17 FREE     L                 :JZ[jz]MP["S",mpC]|2                                        
 mp.account.type              1 CHOICE   L                 :JZ[jz]MP["S",mpC]|3                                        
 mp.amount                   10 MONEY    R                 :JZ[jz]MP["S",mpC]|4                                        
 mp.bank                     17 FREE     L  PP.BANK        :JZ[jz]MP["S",mpC]|1                                    
 mp.check.number             10 FREE     L                 :JZ[jz]MP["S",mpC]|6                                        
 mp.check.urn                 8 URN      L                 :JZ[jz]MP["S",mpC]|9                                        
 mp.dd.number                10 FREE     L                 :JZ[jz]MP["S",mpC]|5                                        
 mp.dd.prenote                1 YN       L                 :JZ[jz]MP["S",mpC]|11                                       
 mp.payment.status            8 CHOICE   L                 :JZ[jz]MP["S",mpC]|7                                        
 mp.payment.status.date       8 DATE     L                 :JZ[jz]MP["S",mpC]|8                                        
 mp.repl.ck.date              8 DATE     L                 :JZ[jz]MP["S",mpC]|12                                       
 mp.repl.dd.number           10 FREE     L                 :JZ[jz]MP["S",mpC]|13                                       
 mp.replaced.ck               8 FREE     L                 :JZ[jz]MP["S",mpC]|10                                       
 mp.type                      7 CHOICE   L                 :JZ[jz]MP["S",mpC]|0                                        
 Ì     i   2
pp.time.card.earnings.input    (time.card.earnings) 
[urn, tc.counter]
:JZ[jz]T1[jzT]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tc.counter                   2 INT      R                 jzT                                                         
 tc.add.earn                  1 YN       L                 :JZ[jz]T1[jzT]|15                                           
 tc.add.on                    1 YN       L                 :JZ[jz]T1[jzT]|13                                           
 tc.amount                    8 SMONEY   R                 :JZ[jz]T1[jzT]|4                                            
 tc.amount.input              8 SMONEY   R                 :JZ[jz]T1[jzT]|11                                           
 tc.clear.stuff               0 FREE     L                 VAL=IF{""^A,^/JZ[urn]T1^B DO{+[B,A]^A IF{"Y"=[B,A]|13       
                                                           VAL=""^[B,A];""^[B,A]|3^[B,A]|4^[B,A]|5^[B,A]|6}},""}       
 tc.date.worked               8 DATE     L                 :JZ[jz]T1[jzT]|0                                            
 tc.dept.input               15 FREE     L  MIS.GL.DEPT    :JZ[jz]T1[jzT]|7                                        
 tc.earning                   8 PDEC     L  PP.EARN        :JZ[jz]T1[jzT]|1                                        
 tc.earning.report            8 PDEC     L  PP.EARN        VAL=@tc.earning                                         
 tc.expense.dept             15 FREE     L  MIS.GL.DEPT    VAL=IF{@tc.dept.input;@tcc.dept}                        
 tc.flsa.week                 1 INT      R                 :JZ[jz]T1[jzT]|14                                           
 tc.hours                     8 SDEC3    R                 :JZ[jz]T1[jzT]|2                                            
 tc.job.input                10 FREE     L  PP.JOB         :JZ[jz]T1[jzT]|9                                        
 tc.line.prorated             1 YN       L                 :JZ[jz]T1[jzT]|19                                           
 tc.line.rate.date            8 DATE     L                 :JZ[jz]T1[jzT]|23                                           
 tc.line.rate.split           1 FREE     L                 :JZ[jz]T1[jzT]|22                                           
 tc.prev.counter              2 INT      R                 :JZ[jz]T1[jzT]|17                                           
 tc.rate                      8 RATE     R                 :JZ[jz]T1[jzT]|3                                            
 tc.rate.input                8 RATE     R                 :JZ[jz]T1[jzT]|10                                           
 tc.rate.mult.input           7 RATE     R                 :JZ[jz]T1[jzT]|12                                           
 tc.second.amount             8 SMONEY   R                 :JZ[jz]T1[jzT]|6                                            
 tc.second.job.contract       8 FREE     L  PP.CONTRACT    :JZ[jz]T1[jzT]|21                                       
 tc.second.rate               8 RATE     R                 :JZ[jz]T1[jzT]|5                                            
 tc.second.rate.override      1 YN       L                 :JZ[jz]T1[jzT]|20                                           
 tc.shift.input               1 PINT     L                 :JZ[jz]T1[jzT]|8                                            
 tc.supp.earn                 1 YN       L                 :JZ[jz]T1[jzT]|18                                           
 tc.uic.insured.weeks         5 FREE     L                 :JZ[jz]T1[jzT]|16                                           
 Ì     i   2
pp.pay.time.card.withholdings    (time.card.withholdings) 
[urn, tc.whold]
:JZ[jz]T2[jw]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 tc.whold                     8 PDEC     L  PP.WHOLD       jw                                                      
 tc.base.sys.calc.spc         1 YN       L                 :JZ[jz]T2[jw]|7                                             
 tc.ee.sys.calc.spc           1 YN       L                 :JZ[jz]T2[jw]|5                                             
 tc.employee.whold            8 SMONEY   R                 :JZ[jz]T2[jw]|1                                             
 tc.employee.whold.spc        8 SMONEY   R                 :JZ[jz]T2[jw]|1                                             
 tc.employer.whold            8 SMONEY   R                 :JZ[jz]T2[jw]|2                                             
 tc.employer.whold.spc        8 SMONEY   R                 :JZ[jz]T2[jw]|2                                             
 tc.er.sys.calc.spc           1 YN       L                 :JZ[jz]T2[jw]|6                                             
 tc.from.pp.per.spc           1 YN       L                 :JZ[jz]T2[jw]|8                                             
 tc.whold.add.to.amount       8 SMONEY   R                 :JZ[jz]T2[jw]|4                                             
 tc.whold.base                8 SMONEY   R                 :JZ[jz]T2[jw]|3                                             
 tc.whold.base.spc            8 SMONEY   R                 :JZ[jz]T2[jw]|3                                             
 tc.whold.comb.base.oride     1 YN       L                 :JZ[jz]T2[jw]|9                                             
 tc.whold.end.balance         8 SMONEY   L                 VAL=%PP.PAY.tc.whold.end.balance("")                        
 tc.whold.prev.balance        8 SMONEY   L                 VAL=%PP.PAY.tc.whold.prev.balance("")                       
 Ì     i   2
pp.pay.vaca.advance.data.in    (vacation.advance.data.in) 
[urn, vac.whold]
:JZ[jz]TWA[jw]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 vac.whold                    8 PDEC     L  PP.WHOLD       jw                                                      
 vac.whold.advance            8 SMONEY   R                 :JZ[jz]TWA[jw]|0                                            
 Ì     i   2
pp.pay.vacation.advances    (vacation.advances) 
[urn, advance.tc.date]
:JZ[jz]T3[jzAD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 advance.tc.date              8 DATE     L                 jzAD                                                        
 advance.tc.hours             7 DEC3     R                 :JZ[jz]T3[jzAD]|0                                           
 advance.tc.urn               8 URN      L  PP.PAY         :JZ[jz]T3[jzAD]|1                                       
 Ì     i   2
pp.pay.qtr.earn.file    (qtr.earn.file) 
[qtr.earn.year,qtr.earn.quarter]
?JZ.QTR[jqyr,jqtr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 qtr.earn.year                4 YEAR     L                 jqyr                                                        
 qtr.earn.quarter             1 PINT     R                 jqtr                                                        
 qtr.earn.compile.date        8 DATE     L                 ?JZ.QTR[jqyr,jqtr]|0                                        
 qtr.earn.status              9 CHOICE   L                 ?JZ.QTR[jqyr,jqtr]|1                                        
 Ì     i   2
pp.pay.qtr.earn.file.records    (qtr.earn.file.records) 
[qtr.earn.year,qtr.earn.quarter, qtr.earn.count]
?JZ.QTR[jqyr,jqtr]R[jqcnt]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 qtr.earn.count               5 INT      R                 jqcnt                                                       
 qtr.earn.record            240 FREE     L                 ?JZ.QTR[jqyr,jqtr]R[jqcnt]                                  
 Ì     i   2
temp.reconcile.check    (reconcile.check) 
[rec.count]
/REC[rc]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 rec.count                    2 PINT     R                 rc                                                          
 rec.bank.account.no         10 FREE     L                 /REC[rc]|1                                                  
 rec.from.check               9 PINT     R                 /REC[rc]|2                                                  
 rec.payroll                  8 FREE     L  PP.PAYROLL     /REC[rc]|0                                              
 rec.thru.check               9 PINT     R                 /REC[rc]|3                                                  
 Ì     i   2
pp.pay.retro    (retro) 
[ret.urn]
:JZ.R[jzr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 ret.urn                      5 INT      R                 jzr                                                         
 ret.compile.status          11 CHOICE   L                 :JZ.R[jzr]|0                                                
 ret.compiled.report         10 FREE     L  PP.LIST        :JZ.R[jzr]|10                                           
 ret.daily                    1 YN       L                 :JZ.R[jzr]|8                                                
 ret.from.tc                  8 DATE     L                 :JZ.R[jzr]|5                                                
 ret.star.exist               1 FREE     L                 :JZ.R[jzr]|9                                                
 ret.start.date               8 DATE     L                 :JZ.R[jzr]|1                                                
 ret.start.time               5 TIME     L                 :JZ.R[jzr]|2                                                
 ret.status.date              8 DATE     L                 :JZ.R[jzr]|7                                                
 ret.stop.date                8 DATE     L                 :JZ.R[jzr]|3                                                
 ret.stop.time                5 TIME     L                 :JZ.R[jzr]|4                                                
 ret.thru.tc                  8 DATE     L                 :JZ.R[jzr]|6                                                
 Ì     i   2
pp.pay.retro.contracts    (retro.contracts) 
[ret.urn, retro.contract]
:JZ.R[jzr]C[ju]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 retro.contract               8 FREE     L  PP.CONTRACT    ju                                                      
 Ì     i   2
pp.pay.retro.empls    (retro.empls) 
[ret.urn, retro.empl]
:JZ.R[jzr]E[jy]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 retro.empl                  42 URN      L  PP.PER         jy                                                      
 Ì     i   2
pp.pay.retro.job.codes    (retro.job.codes) 
[ret.urn, retro.job.code]
:JZ.R[jzr]J[jj]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 retro.job.code              10 FREE     L  PP.JOB         jj                                                      
 Ì     i   2
pp.pay.retro.payrolls    (retro.payrolls) 
[ret.urn, retro.payroll]
:JZ.R[jzr]P[ja]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 retro.payroll                8 FREE     L  PP.PAYROLL     ja                                                      
 Ì     i   2
pp.pay.retro.results    (retro.results) 
[ret.urn, retro.employee,retro.tc.date]
:JZ.R[jzr]R[jy,jzD]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 retro.employee              42 URN      L  PP.PER         jy                                                      
 retro.tc.date                8 DATE     L                 jzD                                                         
 Ì     i   2
pp.pay.retro.earnings    (retro.earnings) 
[ret.urn,retro.employee,retro.tc.date, retro.earning]
:JZ.R[jzr]R[jy,jzD]E[je]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 retro.earning                8 PDEC     L  PP.EARN        je                                                      
 retro.earning.diff           9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]E[je]|2                                  
 retro.earning.new            9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]E[je]|1                                  
 retro.earning.old            9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]E[je]|0                                  
 Ì     i   2
pp.pay.retro.withholdings    (retro.withholdings) 
[ret.urn,retro.employee,retro.tc.date, retro.whold]
:JZ.R[jzr]R[jy,jzD]W[jw]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL                                        
 retro.whold                  8 PDEC     L  PP.WHOLD       jw                                                      
 retro.whold.ee.diff          9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]W[jw]|2                                  
 retro.whold.ee.new           9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]W[jw]|1                                  
 retro.whold.ee.old           9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]W[jw]|0                                  
 retro.whold.er.diff          9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]W[jw]|5                                  
 retro.whold.er.new           9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]W[jw]|4                                  
 retro.whold.er.old           9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]W[jw]|3                                  
 retro.whold.not.taken.dif    9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]W[jw]|9                                  
 retro.whold.not.taken.new    9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]W[jw]|8                                  
 retro.whold.not.taken.old    9 SMONEY   R                 :JZ.R[jzr]R[jy,jzD]W[jw]|7                                  
 retro.whold.star             1 FREE     L                 :JZ.R[jzr]R[jy,jzD]W[jw]|6                                  
 Ì       2
 INDEX FILE/INTERNAL NAME           SUBSCRIPTS/PHYSICAL BASE

 pp.pay.card.pend.x                 [employee,pay.date] = urn
   card.pend.x                        ?JZP[jy,jzPD]

 pp.pay.check.approv.x              [tcc.payroll,check.sort.field,employee,urn]
   check.approv.x                     ?JZCA[ja,jzCS,jy,jz]

 pp.unreconciled.check.index        [tcc.payroll,check.number] = urn
   check.unrec.x                      ?JZU[ja,jzCN]

 pp.check.index                     [tcc.payroll,check.number] = urn
   check.x                            ?JZC[ja,jzCN]

 pp.pay.ck.act.date.x               [tcc.payroll,ck.act.date,check.number,ck.act.stat] = urn
   ck.act.date.x                      ?JZCAD[ja,jzPSD,jzCN,jzCAS]

 pp.dd.tape.before.checks.index     [tcc.payroll]
   dd.tape.x                          ?JZDDT[ja]

 pp.pay.dd.x                        [tcc.payroll,pay.date,urn]
   dd.x                               ?JZD[ja,jzPD,jz]

 pp.pay.gl.dates.x                  [gl.date] = gl.period
   gl.dates.x                         ?JZ.GLX[jzgld]

 pp.pay.gl.post.x                   [gl.post.date,urn]
   gl.post.x                          ?JZGL[jzGP,jz]

 pp.mult.pay.index                  [tcc.payroll,pay.date,urn]
   mult.pay.x                         ?JZMP[ja,jzPD,jz]

 pp.time.card.pay.date.index        [employee,pay.date,urn]
   pay.x                              ?JZPT[jy,jzPD,jz]

 pp.pay.pd.pay.x                    [tcc.payroll,tcc.dept,pay.date,employee,urn]
   pd.pay.x                           ?JZPDP[ja,gd,jzPD,jy,jz]

 pp.pay.pd.time.card.x              [tcc.payroll,tcc.dept,tc.date,employee] = urn
   pd.time.card.x                     ?JZPDT[ja,gd,jzD,jy]

 pp.pay.pd.voided.time.card.x       [tcc.payroll,tcc.dept,tc.date,employee,urn]
   pd.voided.time.card.x              ?JZPDV[ja,gd,jzD,jy,jz]

 pp.pay.tc.act.date.x               [tcc.payroll,tc.status.date,tcc.dept,tc.status,urn]
   tc.act.date.x                      ?JZTAD[ja,jzTSD,gd,jzTCS,jz]

 pp.time.card.tc.date.index         [employee,tc.date] = urn
   time.card.x                        ?JZT[jy,jzD]

 pp.pay.void.x                      [employee] = urn
   void.x                             ?JZV[jy]

 pp.time.card.voided.tc.date.x      [employee,tc.date,urn]
   voided.time.card.x                 ?JZTV[jy,jzD,jz]

 pp.pay.whold.not.taken.x           [tc.date,urn,whold]
   whold.not.taken.x                  ?JZWNT[jzD,jz,jw]