sHelp
                                     PP.PER.FLEX
     i   2
 enroll.yr.grp
 main
   years
     credits
     cust.def.queries
       cust.def.mult.queries
     fsa.types
       fsa.claims
         void.checks
     option.types
     payrolls
       vacation.sales

 Ì     i   2
enroll.yr.grp
[enroll.year,enroll.grp]
*(JF)JY.FE[jfyr,jfgr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 enroll.year                  8 FREE     L  PP.FLEX.YR     jfyr                                                    
 enroll.grp                   8 FREE     L  PP.FLEX.GRP    jfgr                                                    
 enroll.date                  8 DATE     L                 *(JF)JY.FE[jfyr,jfgr]|1                                     
 enroll.user                 10 FREE     L  MIS.USER       *(JF)JY.FE[jfyr,jfgr]|0                                 
 Ì     i   2
main
[employee]
$(JF)JY.FX[jy]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 employee                    42 URN      L  PP.PER         jy                                                      
 id                          42 URN      L  PP.PER         VAL=%PP.PER.id.display(V(%PP.PER.id.display("PARSE",@Q  
                                                           VAL=uote(@PP.PER.main))),@Quote(^@PP.PER.main),@Quote(      
                                                           VAL=^@HR.EMP.main))'="  "                                   
 sort.name                   26 FREE     L                 VAL=@PP.PER.sort.name                                       
 Ì   €   i   2
years
[employee,  year]
$(JF)JY.FX[jy]YR[jfyr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 year                         8 FREE     L  PP.FLEX.YR     jfyr                                                    
 as.of.date                   8 DATE     L                 $(JF)JY.FX[jy]YR[jfyr]|8                                    
 cd.screen                   15 FREE     L  MIS.SCREEN     VAL=@PP.FLEX.OPS.cust.def.screen[option]                
 eligible                     1 YN       L                 $(JF)JY.FX[jy]YR[jfyr]|0                                    
 group                        8 FREE     L  PP.FLEX.GRP    $(JF)JY.FX[jy]YR[jfyr]|1                                
 history.date                 8 DATE     L                                                                             
 per.ee.in                    8 MONEY    R                 VAL=%PP.PER.FLEX.per.tots(PP.PER.FLEX.employee,PP.PER.      
                                                           VAL=FLEX.year,4)                                            
 per.ee.net.pre.tax           8 MONEY    R                 VAL=%PP.PER.FLEX.per.tots(PP.PER.FLEX.employee,PP.PER.      
                                                           VAL=FLEX.year,6)                                            
 per.ee.out.aft.tax           8 MONEY    R                 VAL=%PP.PER.FLEX.per.tots(PP.PER.FLEX.employee,PP.PER.      
                                                           VAL=FLEX.year,7)                                            
 per.ee.out.pre.tax           8 MONEY    R                 VAL=%PP.PER.FLEX.per.tots(PP.PER.FLEX.employee,PP.PER.      
                                                           VAL=FLEX.year,5)                                            
 per.er.cr                    8 MONEY    R                 VAL=%PP.PER.FLEX.per.tots(PP.PER.FLEX.employee,PP.PER.      
                                                           VAL=FLEX.year,1)                                            
 per.er.op                    8 MONEY    R                 VAL=%PP.PER.FLEX.per.tots(PP.PER.FLEX.employee,PP.PER.      
                                                           VAL=FLEX.year,2)                                            
 per.er.tot                   8 MONEY    R                 VAL=%PP.PER.FLEX.per.tots(PP.PER.FLEX.employee,PP.PER.      
                                                           VAL=FLEX.year,3)                                            
 print.cd.screen              0 FREE     L                 VAL=IF{@cd.screen %MIS.SCREEN.print(@cd.screen,^@cust.      
                                                           VAL=def.fields,"",3),""}                                    
 print.cd.screen.verbatim     0 FREE     L                 VAL=IF{@cd.screen %MIS.SCREEN.print(@cd.screen,^@cust.      
                                                           VAL=def.fields,1,0),""}                                     
 status                      10 CHOICE   L                 $(JF)JY.FX[jy]YR[jfyr]|9                                    
 status.date                  8 DATE     L                 $(JF)JY.FX[jy]YR[jfyr]|10                                   
 Ì   €   i   2
credits
[employee,year,  credit]
$(JF)JY.FX[jy]YR[jfyr]CR[jfcr]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 credit                       8 FREE     L  PP.FLEX.CR     jfcr                                                    
 credit.annual.amt            8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]CR[jfcr]|0                            
 credit.earning               8 FREE     L                 VAL=@PP.EARN.mnemonic[@PP.FLEX.CR.assoc.earning]            
 credit.period.amt            8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]CR[jfcr]|1                            
 Ì   €   i   2
cust.def.queries
[employee,year,  cd.query]
$(JF)JY.FX[jy]YR[jfyr]CD[ggv]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 cd.query                    10 FREE     L  MIS.QUERY      ggv                                                     
 cd.response                 75 QRY.RESP L                 $(JF)JY.FX[jy]YR[jfyr]CD[ggv]|0                             
 cd.yn.comment               75 FREE     L                 $(JF)JY.FX[jy]YR[jfyr]CD[ggv]|5                             
 Ì   €   i   2
cust.def.mult.queries
[employee,year,cd.query,  cdm.seq.no]
$(JF)JY.FX[jy]YR[jfyr]CD[ggv]M[ggvN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 cdm.seq.no                   3 PINT     R                 ggvN                                                        
 cdm.response                75 QRY.RESP L                 $(JF)JY.FX[jy]YR[jfyr]CD[ggv]M[ggvN]|0                      
 Ì   €   i   2
fsa.types
[employee,year,  fsa.type]
$(JF)JY.FX[jy]YR[jfyr]SA[jfsa]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 fsa.type                     9 FREE     L                 jfsa                                                        
 fsa.ann.contrib              8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]|0                            
 fsa.claims.approved          8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]|2                            
 fsa.claims.paid              8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]|3                            
 fsa.claims.pending           8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]|5                            
 fsa.claims.submitted         8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]|4                            
 fsa.per.contrib              8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]|1                            
 fsa.whold                    8 FREE     L                 VAL=@PP.WHOLD.mnemonic[@PP.FSA.assoc.whold[fsa.type]]       
 Ì   €   i   2
fsa.claims
[employee,year,fsa.type,  fsa.claim.number]
$(JF)JY.FX[jy]YR[jfyr]SA[jfsa]CL[jyfxN]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 fsa.claim.number             3 PINT     R                 jyfxN                                                       
 fsa.claim.amt                8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]CL[jyfxN]|5                   
 fsa.claim.check.number      10 INT      R                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]CL[jyfxN]|7                   
 fsa.claim.desc              30 FREE     L                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]CL[jyfxN]|1                   
 fsa.claim.entry.date         8 DATE     L                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]CL[jyfxN]|8                   
 fsa.claim.reject.reason     10 FREE     L  PP.REASON      $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]CL[jyfxN]|4               
 fsa.claim.service.date       8 DATE     L                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]CL[jyfxN]|0                   
 fsa.claim.status             9 YN       L                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]CL[jyfxN]|2                   
 fsa.claim.status.date        8 DATE     L                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]CL[jyfxN]|3                   
 fsa.claim.submit.date        8 DATE     L                 $(JF)JY.FX[jy]YR[jfyr]SA[jfsa]CL[jyfxN]|6                   
 Ì   €   i   2
void.checks
[employee,year,fsa.type,fsa.claim.number,  void.check.number]
$(JF)JY.FX[jy]YR[jfyr]SA[jfsa]CL[jyfxN]VC[jyfxV]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 void.check.number           10 INT      R                 jyfxV                                                       
 Ì   €   i   2
option.types
[employee,year,  option.type]
$(JF)JY.FX[jy]YR[jfyr]TY[jfty]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 option.type                  8 FREE     L  PP.FLEX.TYPE   jfty                                                    
 annual.cost.ee               8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]TY[jfty]|3                            
 annual.cost.er               8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]TY[jfty]|6                            
 cov.category                 8 FREE     L  PP.FLEX.COV    $(JF)JY.FX[jy]YR[jfyr]TY[jfty]|1                        
 option                       8 FREE     L  PP.FLEX.OPS    $(JF)JY.FX[jy]YR[jfyr]TY[jfty]|0                        
 option.ins.cov              40 FREE     L                 $(JF)JY.FX[jy]YR[jfyr]TY[jfty]|8                            
 option.whold                 8 FREE     L                 VAL=@PP.WHOLD.mnemonic[@PP.FLEX.OPS.assoc.whold[@optio      
                                                           VAL=n]]                                                     
 period.cost.ee               8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]TY[jfty]|4                            
 period.cost.er               8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]TY[jfty]|7                            
 Ì   €   i   2
payrolls
[employee,year,  svac.payroll]
$(JF)JY.FX[jy]YR[jfyr]P[jdp]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 svac.payroll                 8 FREE     L  PP.PAYROLL     jdp                                                     
 sold.vac.ann.amt             8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]P[jdp]|1                              
 sold.vac.earning             8 FREE     L                 VAL=IF{@sold.vac.hours @PP.EARN.mnemonic[@PP.FLEX.SVAC      
                                                           VAL=.assoc.earning]}                                        
 sold.vac.hours               7 PDEC3    R                 $(JF)JY.FX[jy]YR[jfyr]P[jdp]|0                              
 sold.vac.per.amt             8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]P[jdp]|2                              
 sold.vac.proj.hours          7 PDEC3    R                 $(JF)JY.FX[jy]YR[jfyr]P[jdp]|3                              
 Ì   €   i   2
vacation.sales
[employee,year,svac.payroll,  vac.sale.num]
$(JF)JY.FX[jy]YR[jfyr]P[jdp]VS[jyfxQ]

 Field Name                 Len Dat Typ  J  DPM            Offset/Local/VAL
 vac.sale.num                 2 PINT     R                 jyfxQ                                                       
 vac.sale.amt                 8 MONEY    R                 $(JF)JY.FX[jy]YR[jfyr]P[jdp]VS[jyfxQ]|3                     
 vac.sale.date                8 DATE     L                 $(JF)JY.FX[jy]YR[jfyr]P[jdp]VS[jyfxQ]|0                     
 vac.sale.hrs                 7 PDEC3    R                 $(JF)JY.FX[jy]YR[jfyr]P[jdp]VS[jyfxQ]|1                     
 vac.sale.rate                8 RATE     R                 $(JF)JY.FX[jy]YR[jfyr]P[jdp]VS[jyfxQ]|2                     

 Index Files                        Subscripts/Physical Base

 employee.x                         [employee]
                                      ?(JF)JYX[jy]

 gl.approved.x                      [fsa.claim.status.date,year,fsa.type,employee] = fsa.claim.amt
                                      ?(JF)JYF.GLA[jyfxD,jfyr,jfsa,jy]

 gl.vac.sell.x                      [vac.sale.date,year,employee,svac.payroll] = vac.sale.amt
                                      ?(JF)JYF.GLV[jyfxS,jfyr,jy,jdp]

 grp.year.x                         [group,year,employee]
                                      ?(JF)JY.FGY[jfgr,jfyr,jy]

 op.year.x                          [option,year,employee]
                                      ?(JF)JY.FOY[jfop,jfyr,jy]

 year.grp.x                         [year,group,employee]
                                      ?(JF)JY.FYG[jfyr,jfgr,jy]

 year.op.x                          [year,option,employee]
                                      ?(JF)JY.FYO[jfyr,jfop,jy]