Ì i 2
future.changes
[fut.payroll,fut.date,fut.employee]
*(J)JVR[jdp,jvDD,jy]
Field Name Len Dat Typ J DPM Offset/Local/VAL
fut.payroll 8 FREE L PP.PAYROLL jdp
fut.date 8 DATE L jvDD
fut.employee 42 URN L PP.PER jy
fut.dept 15 FREE L MIS.GL.DEPT *(J)JVR[jdp,jvDD,jy]|8
fut.empl.name 20 FREE L VAL=@PP.PER.name:20T
fut.job.code 10 FREE L PP.JOB *(J)JVR[jdp,jvDD,jy]|7
fut.position 18 FREE L PP.POS *(J)JVR[jdp,jvDD,jy]|6
fut.position.date 8 DATE L *(J)JVR[jdp,jvDD,jy]|9
fut.rate 8 RATE R *(J)JVR[jdp,jvDD,jy]|0
fut.rate.date 8 DATE L *(J)JVR[jdp,jvDD,jy]|1
fut.rate.reason 10 FREE L PP.REASON *(J)JVR[jdp,jvDD,jy]|2
fut.status 7 CHOICE L *(J)JVR[jdp,jvDD,jy]|3
fut.status.date 8 DATE L *(J)JVR[jdp,jvDD,jy]|4
fut.status.reason 10 FREE L PP.REASON *(J)JVR[jdp,jvDD,jy]|5
Ì i 2
main
[employee]
*(J)JV[jy]
Field Name Len Dat Typ J DPM Offset/Local/VAL
employee 42 URN L PP.PER jy
Ì € i 2
reminder.dates
[employee, date]
*(J)JV[jy,jvD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
date 8 DATE L jvD
Ì € i 2
reminders
[employee,date, code]
*(J)JV[jy,jvD,jerm]
Field Name Len Dat Typ J DPM Offset/Local/VAL
code 10 FREE L PP.REMINDER jerm
comment 54 FREE L *(J)JV[jy,jvD,jerm]|0
Index Files Subscripts/Physical Base
code.x [code,date,employee]
?(J)JVA[jerm,jvD,jy]
|
|
| | |