Ì i 2
main
[position.number]
&(J)JDR[jdr]
Field Name Len Dat Typ J DPM Offset/Local/VAL
position.number 18 FREE L jdr
active 1 YN L &(J)JDR[jdr]|0
approved.hrs.per.period 8 DEC R &(J)JDR[jdr]|4
authorized.to.fill 1 YN L &(J)JDR[jdr]|10
comment 35 FREE L &(J)JDR[jdr]|9
dept 15 FREE L MIS.GL.DEPT &(J)JDR[jdr]|2
effective.date 8 DATE L &(J)JDR[jdr]|6
expiration.date 8 DATE L &(J)JDR[jdr]|7
job.code 10 FREE L PP.JOB &(J)JDR[jdr]|3
payroll 8 FREE L PP.PAYROLL &(J)JDR[jdr]|11
shift 1 PINT L &(J)JDR[jdr]|5
title 35 FREE L &(J)JDR[jdr]|1
Ì € i 2
approved.hours
[position.number, app.hrs.ending.date]
&(J)JDR[jdr]A[jdq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
app.hrs.ending.date 8 DATE L jdq
app.hrs.hours 8 DEC R &(J)JDR[jdr]A[jdq]|0
Ì i 2
patterns
[pattern]
&(J)JDRP[jdrP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pattern 8 FREE L jdrP
pat.active 1 YN L &(J)JDRP[jdrP]|0
pat.desc 30 FREE L &(J)JDRP[jdrP]|1
Ì € i 2
pattern.elements
[pattern, pat.element]
&(J)JDRP[jdrP]E[jdrPE]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pat.element 1 PINT R jdrPE
pat.ele.all 1 YN L &(J)JDRP[jdrP]E[jdrPE]|3
pat.ele.constant 5 FREE L &(J)JDRP[jdrP]E[jdrPE]|1
pat.ele.from.pos 2 PINT R &(J)JDRP[jdrP]E[jdrPE]|4
pat.ele.length 2 PINT R VAL=%PP.POS.pat.ele.length(pattern,pat.element,1)
pat.ele.length.temp 2 PINT R VAL=%PP.POS.pat.ele.length(pattern,pat.element)
pat.ele.spaces 1 PINT R &(J)JDRP[jdrP]E[jdrPE]|6
pat.ele.thru.pos 2 PINT R &(J)JDRP[jdrP]E[jdrPE]|5
pat.ele.type 1 CHOICE L &(J)JDRP[jdrP]E[jdrPE]|0
pat.ele.variable 3 CHOICE L &(J)JDRP[jdrP]E[jdrPE]|2
Index Files Subscripts/Physical Base
dept.x [dept,position.number]
&(J)JDRD[gd,jdr]
job.x [job.code,position.number]
&(J)JDRJ[jdj,jdr]
|
|
| | |