Ì € i 2
pp.nur.ior.payroll.tc.date (ior.payroll.tc.date)
[ior.database, ior.payroll,ior.tc.date]
:JZ.NR[nurDB]PT[ja,jzD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ior.payroll 8 FREE L PP.PAYROLL ja
ior.tc.date 8 DATE L jzD
Ì i 2
pp.nur.locks (locks)
[ee.employee]
:JZ.MSG[jy]
Field Name Len Dat Typ J DPM Offset/Local/VAL
ee.employee 42 URN L PP.PER jy
ee.lock 20 FREE L VAL="E/E NUR "_@nur.employee's.ss.number
ee.lockname 65 FREE L VAL="Editing in the Nursing module of "_@nur.employee'
VAL=s.number_" "_@nur.employee's.name$65
ee.nur.message 30 FREE L :JZ.MSG[jy]MSG
Ì i 2
pp.nur.file (main)
[nur.payroll.database]
!JZ.N[iaD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
nur.payroll.database 12 FREE L MIS.APPL iaD
Ì € i 2
pp.nur.payrolls (nur.payrolls)
[nur.payroll.database, nur.payroll]
!JZ.N[iaD]P[ja]
Field Name Len Dat Typ J DPM Offset/Local/VAL
nur.payroll 8 FREE L PP.PAYROLL ja
Ì € i 2
pp.nur.dates (nur.dates)
[nur.payroll.database,nur.payroll, nur.date]
!JZ.N[iaD]P[ja]D[jzD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
nur.date 8 DATE L jzD
Ì € i 2
pp.nur.employees (nur.employees)
[nur.payroll.database,nur.payroll,nur.date, nur.employee,nur.initials]
!JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]
Field Name Len Dat Typ J DPM Offset/Local/VAL
nur.employee 42 URN L PP.PER jy
nur.initials 10 FREE L NUR.NURSE gu
att.data.did.exist 1 YN L !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]|6
dft.dept 15 FREE L MIS.GL.DEPT !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]|3
dft.jc 10 FREE L PP.JOB !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]|1
dft.sft 1 FREE L !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]|2
emp.num 14 FREE L !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]|5
initials 10 FREE L NUR.NURSE !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]|4
nur.status 10 FREE L !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]|0
prev.status 10 FREE L !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]|7
Ì € i 2
pp.nur.rejection.reasons (nur.rejection.reasons)
[nur.payroll.database,nur.payroll,nur.date,nur.employee,nur.initials, rj.line.num]
!JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]RJ[eln]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rj.line.num 3 PINT R eln
rj.line 92 FREE L !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]RJ[eln]
Ì € i 2
pp.nur.workdates (nur.workdates)
[nur.payroll.database,nur.payroll,nur.date,nur.employee,nur.initials, nur.workdate]
!JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
nur.workdate 8 DATE L jtxT
Ì € i 2
pp.nur.retrieved.data (nur.retrieved.data)
[nur.payroll.database,nur.payroll,nur.date,nur.employee,nur.initials,nur.workdate, nur.counter]
!JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]
Field Name Len Dat Typ J DPM Offset/Local/VAL
nur.counter 2 INT R retC
code 3 FREE L NUR.SCHED.CODES!JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|9
earn.mnemonic 8 FREE L !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|11
edit 1 YN L !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|10
location 10 FREE L MIS.LOCN.DICT !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|8
nur.dept 15 FREE L MIS.GL.DEPT !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|4
nur.earning 8 PDEC L PP.EARN !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|0
nur.hours 6 SDEC3 R !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|1
nur.job 10 FREE L PP.JOB !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|3
nur.pay.date 8 DATE L
nur.shift 1 PINT R !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|2
nur.tc.date 8 DATE L !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|5
nur.tc.line 2 INT R !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|7
nur.tc.pointer 8 URN L PP.PAY !JZ.N[iaD]P[ja]D[jzD]Z[jy,gu]T[jtxT]E[retC]|6
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
pp.nur.rejections.index [location,initials,nur.tc.date,nur.payroll.database,nur.payroll,nur.employee]
rejections.x !JZ.NRI[ggn,gu,jzD,iaD,ja,jy]
|
|
| | | | | | | |