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