Sample CA-IDMS Report
IDMSRPTS 14.1 ------- INPUT PARAMETER LISTING ------- DATE TIME PAGE
DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 1
SCHEMA=EMPSCHM VERSION=HIGH
RECDES
***************************************************************************************************
SCHEMA VERSION SUBSCHEMA REPORTS
EMPSCHM HIGHEST RECDES
IDMSRPTS 14.1 -- SCHEMA RECORD DESCRIPTION LISTING --- DATE TIME PAGE
RECDES DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 1
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ COVERAGE RLGTH= 40
RECORD VERSION..... 0100 DLGTH= 20
RECORD ID.......... 0400 KLGTH= 20
RECORD LENGTH...... FIXED DSTRT= 20
LOCATION MODE...... VIA SET EMP-COVERAGE DISPLACEMENT 0000 PAGES
WITHIN............. INS-DEMO-REGION OFFSET 5 PGS FOR 45 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
EMP-COVERAGE MEMBER 1 2 3
COVERAGE-CLAIMS OWNER 4 5
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 SELECTION-DATE-0400 DISPLAY 1 8
03 SELECTION-YEAR-0400 DISPLAY 9(4) 1 4
03 SELECTION-MONTH-0400 DISPLAY 9(2) 5 2
03 SELECTION-DAY-0400 DISPLAY 9(2) 7 2
02 TERMINATION-DATE-0400 DISPLAY 9 8
03 TERMINATION-YEAR-0400 DISPLAY 9(4) 9 4
03 TERMINATION-MONTH-0400 DISPLAY 9(2) 13 2
03 TERMINATION-DAY-0400 DISPLAY 9(2) 15 2
02 TYPE-0400 DISPLAY X 17 1
88 MASTER-0400 COND 'M' 17
88 FAMILY-0400 COND 'F' 17
88 DEPENDENT-0400 COND 'D' 17
02 INS-PLAN-CODE-0400 DISPLAY X(3) 18 3
88 GROUP-LIFE-0400 COND '001' 18
88 HMO-0400 COND '002' 18
88 GROUP-HEALTH-0400 COND '003' 18
88 GROUP-DENTAL-0400 COND '004' 18
***** *****
REC SYNONYM NAME... COVERGE COVERAGE RLGTH= 40
REC SYNONYM VER.... 0100 DLGTH= 20
LANGUAGE(S)........ ASSEMBLER
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 COVSELDT DISPLAY 1 8
03 COVSELYR DISPLAY 9(4) 1 4
03 COVSELMO DISPLAY 9(2) 5 2
03 COVSELDA DISPLAY 9(2) 7 2
02 COVTRMDT DISPLAY 9 8
03 COVTRMYR DISPLAY 9(4) 9 4
03 COVTRMMO DISPLAY 9(2) 13 2
03 COVTRMDA DISPLAY 9(2) 15 2
02 COVTYPE DISPLAY X 17 1
88 COVMASTR COND 'M' 17
88 COVFAMLY COND 'F' 17
88 COVDPNDT COND 'D' 17
IDMSRPTS 14.1 -- SCHEMA RECORD DESCRIPTION LISTING --- DATE TIME PAGE
RECDES DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 2
SCHEMA EMPSCHM VERSION 100
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 COVPLNCD DISPLAY X(3) 18 3
88 GROUP-LIFE COND '001' 18
88 HMO COND '002' 18
88 GROUP-HEALTH COND '003' 18
88 GROUP-DENTAL COND '004' 18
***** *****
REC SYNONYM NAME... COVRGE COVERAGE RLGTH= 40
REC SYNONYM VER.... 0100 DLGTH= 20
LANGUAGE(S)........ FORTRAN
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 CVSLDT DISPLAY 1 8
03 CVSLYR DISPLAY 9(4) 1 4
03 CVSLMO DISPLAY 9(2) 5 2
03 CVSLDA DISPLAY 9(2) 7 2
02 CVTMDT DISPLAY 9 8
03 CVTMYR DISPLAY 9(4) 9 4
03 CVTMMO DISPLAY 9(2) 13 2
03 CVTMDA DISPLAY 9(2) 15 2
02 CVTYPE DISPLAY X 17 1
88 CVMSTR COND 'M' 17
88 CVFMLY COND 'F' 17
88 CVDPND COND 'D' 17
02 CVPLCD DISPLAY X(3) 18 3
88 GROUP-LIFE COND '001' 18
88 HMO COND '002' 18
88 GROUP-HEALTH COND '003' 18
88 GROUP-DENTAL COND '004' 18
IDMSRPTS 14.1 -- SCHEMA RECORD DESCRIPTION LISTING --- DATE TIME PAGE
RECDES DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 3
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ DENTAL-CLAIM RLGTH= 948
RECORD VERSION..... 0100 DLGTH= 936
RECORD ID.......... 0405 KLGTH= 12
RECORD LENGTH...... VARIABLE DSTRT= 16
MINIMUM ROOT....... 132 CHARACTERS
MINIMUM FRAGMENT... 932 CHARACTERS
LOCATION MODE...... VIA SET COVERAGE-CLAIMS DISPLACEMENT 0000 PAGES
WITHIN............. INS-DEMO-REGION OFFSET 5 PGS FOR 45 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
COVERAGE-CLAIMS MEMBER 1 2
(FRAGMENT CHAIN) INTRNL 3
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 CLAIM-DATE-0405 DISPLAY 1 8
03 CLAIM-YEAR-0405 DISPLAY 9(4) 1 4
03 CLAIM-MONTH-0405 DISPLAY 9(2) 5 2
03 CLAIM-DAY-0405 DISPLAY 9(2) 7 2
02 PATIENT-NAME-0405 DISPLAY 9 25
03 PATIENT-FIRST-NAME-0405 DISPLAY X(10) 9 10
03 PATIENT-LAST-NAME-0405 DISPLAY X(15) 19 15
02 PATIENT-BIRTH-DATE-0405 DISPLAY 34 8
03 PATIENT-BIRTH-YEAR-0405 DISPLAY 9(4) 34 4
03 PATIENT-BIRTH-MONTH-0405 DISPLAY 9(2) 38 2
03 PATIENT-BIRTH-DAY-0405 DISPLAY 9(2) 40 2
02 PATIENT-SEX-0405 DISPLAY X 42 1
02 RELATION-TO-EMPLOYEE-0405 DISPLAY X(10) 43 10
02 DENTIST-NAME-0405 DISPLAY 53 25
03 DENTIST-FIRST-NAME-0405 DISPLAY X(10) 53 10
03 DENTIST-LAST-NAME-0405 DISPLAY X(15) 63 15
02 DENTIST-ADDRESS-0405 DISPLAY 78 46
03 DENTIST-STREET-0405 DISPLAY X(20) 78 20
03 DENTIST-CITY-0405 DISPLAY X(15) 98 15
03 DENTIST-STATE-0405 DISPLAY X(2) 113 2
03 DENTIST-ZIP-0405 DISPLAY 115 9
04 DENTIST-ZIP-FIRST-FIVE-0405 DISPLAY X(5) 115 5
04 DENTIST-ZIP-LAST-FOUR-0405 DISPLAY X(4) 120 4
02 DENTIST-LICENSE-NUMBER-0405 DISPLAY 9(6) 124 6
02 NUMBER-OF-PROCEDURES-0405 COMP 9(2) 130 2
02 FILLER DISPLAY X 132 1
02 DENTIST-CHARGES-0405 DISPLAY OCCURS 0 TO 10 133 800
DEPENDING ON -------- NUMBER-OF-PROCEDURES-0405
03 TOOTH-NUMBER-0405 DISPLAY 9(2) 1 2
03 SERVICE-DATE-0405 DISPLAY 3 8
04 SERVICE-YEAR-0405 DISPLAY 9(4) 3 4
04 SERVICE-MONTH-0405 DISPLAY 9(2) 7 2
04 SERVICE-DAY-0405 DISPLAY 9(2) 9 2
03 PROCEDURE-CODE-0405 DISPLAY 9(4) 11 4
03 DESCRIPTION-OF-SERVICE-0405 DISPLAY X(60) 15 60
03 FEE-0405 COMP-3 S9(7)V99 75 5
03 FILLER DISPLAY X 80 1
IDMSRPTS 14.1 -- SCHEMA RECORD DESCRIPTION LISTING --- DATE TIME PAGE
RECDES DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 4
SCHEMA EMPSCHM VERSION 100
REC SYNONYM NAME... DENTCLM DENTAL-CLAIM RLGTH= 948
REC SYNONYM VER.... 0100 DLGTH= 936
LANGUAGE(S)........ ASSEMBLER
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 DCCLMDT DISPLAY 1 8
03 DCCLMYR DISPLAY 9(4) 1 4
03 DCCLMMO DISPLAY 9(2) 5 2
03 DCCLMDA DISPLAY 9(2) 7 2
02 DCPNAME DISPLAY 9 25
03 DCPFNAME DISPLAY X(10) 9 10
03 DCPLNAME DISPLAY X(15) 19 15
02 DCPBIRDT DISPLAY 34 8
03 DCPBIRYR DISPLAY 9(4) 34 4
03 DCPBIRMO DISPLAY 9(2) 38 2
03 DCPBIRDA DISPLAY 9(2) 40 2
02 DCPSEX DISPLAY X 42 1
02 DCRELEMP DISPLAY X(10) 43 10
02 DCDNNAME DISPLAY 53 25
03 DCDNFNAM DISPLAY X(10) 53 10
03 DCDNLNAM DISPLAY X(15) 63 15
02 DCDNADDR DISPLAY 78 46
03 DCDNSTR DISPLAY X(20) 78 20
03 DCDNCITY DISPLAY X(15) 98 15
03 DCDNSTAT DISPLAY X(2) 113 2
03 DCDNZIP DISPLAY 115 9
04 DCDNZPF5 DISPLAY X(5) 115 5
04 DCDNZPL4 DISPLAY X(4) 120 4
02 DCDNLICN DISPLAY 9(6) 124 6
02 DCNOPROC COMP 9(2) 130 2
02 FILLER DISPLAY X 132 1
02 DCDNCHGS DISPLAY OCCURS 0 TO 10 133 800
DEPENDING ON -------- DCNOPROC
03 DCTOTHNO DISPLAY 9(2) 1 2
03 DCSERVDT DISPLAY 3 8
04 DCSERVYR DISPLAY 9(4) 3 4
04 DCSERVMO DISPLAY 9(2) 7 2
04 DCSERVDA DISPLAY 9(2) 9 2
03 DCPROCCD DISPLAY 9(4) 11 4
03 DCDESCSV DISPLAY X(60) 15 60
03 DCFEE COMP-3 S9(7)V99 75 5
03 FILLER DISPLAY X 80 1
IDMSRPTS 14.1 -- SCHEMA RECORD DESCRIPTION LISTING --- DATE TIME PAGE
RECDES DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 5
SCHEMA EMPSCHM VERSION 100
REC SYNONYM NAME... DNTCLM DENTAL-CLAIM RLGTH= 948
REC SYNONYM VER.... 0100 DLGTH= 936
LANGUAGE(S)........ FORTRAN
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 DCCLDT DISPLAY 1 8
03 DCCLYR DISPLAY 9(4) 1 4
03 DCCLMO DISPLAY 9(2) 5 2
03 DCCLDA DISPLAY 9(2) 7 2
02 DCPNAM DISPLAY 9 25
03 DCPFNM DISPLAY X(10) 9 10
03 DCPLNM DISPLAY X(15) 19 15
02 DCPBDT DISPLAY 34 8
03 DCPBYR DISPLAY 9(4) 34 4
03 DCPBMO DISPLAY 9(2) 38 2
03 DCPBDA DISPLAY 9(2) 40 2
02 DCPSEX DISPLAY X 42 1
02 DCRLEMP DISPLAY X(10) 43 10
02 DCDNNM DISPLAY 53 25
03 DCDNFN DISPLAY X(10) 53 10
03 DCDNLN DISPLAY X(15) 63 15
02 DCDNAD DISPLAY 78 46
03 DCDNST DISPLAY X(20) 78 20
03 DCDNCY DISPLAY X(15) 98 15
03 DCDNS DISPLAY X(2) 113 2
03 DCDNZP DISPLAY 115 9
04 DCDNZ5 DISPLAY X(5) 115 5
04 DCDNZ4 DISPLAY X(4) 120 4
02 DCLICN DISPLAY 9(6) 124 6
02 DCNOPR COMP 9(2) 130 2
02 FILLER DISPLAY X 132 1
02 DCDNCH DISPLAY OCCURS 0 TO 10 133 800
DEPENDING ON -------- DCNOPR
03 DCTTHN DISPLAY 9(2) 1 2
03 DCSVDT DISPLAY 3 8
04 DCSVYR DISPLAY 9(4) 3 4
04 DCSVMO DISPLAY 9(2) 7 2
04 DCSVDA DISPLAY 9(2) 9 2
03 DCPRCD DISPLAY 9(4) 11 4
03 DCDSCS DISPLAY X(60) 15 60
03 DCFEE COMP-3 S9(7)V99 75 5
03 FILLER DISPLAY X 80 1
IDMSRPTS 14.1 -- SCHEMA RECORD DESCRIPTION LISTING --- DATE TIME PAGE
RECDES DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 6
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ DEPARTMENT RLGTH= 72
RECORD VERSION..... 0100 DLGTH= 56
RECORD ID.......... 0410 KLGTH= 16
RECORD LENGTH...... FIXED DSTRT= 16
LOCATION MODE...... CALC USING DEPT-ID-0410 DUPLICATES NOT ALLOWED
WITHIN............. ORG-DEMO-REGION OFFSET 5 PGS FOR 45 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
CALC MEMBER 1 2
DEPT-EMPLOYEE OWNER 3 4
DATA ITEM.......... REDEFINES....... USAGE....... VALUE............................. PICTURE..... STRT LGTH
02 DEPT-ID-0410 DISPLAY 9(4) 1 4
SET CONTROL ITEM FOR -------- CALC ASC DUP NOT ALLOWED
02 DEPT-NAME-0410 DISPLAY X(45) 5 45
02 DEPT-HEAD-ID-0410 DISPLAY 9(4) 50 4
02 FILLER DISPLAY XXX 54 3
***** *****
REC SYNONYM NAME... DEPARTMT DEPARTMENT RLGTH= 72
REC SYNONYM VER.... 0100 DLGTH= 56
LANGUAGE(S)........ ASSEMBLER
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 DEPTID DISPLAY 9(4) 1 4
02 DEPTNAME DISPLAY X(45) 5 45
02 DEPTHDID DISPLAY 9(4) 50 4
02 FILLER DISPLAY XXX 54 3
***** *****
REC SYNONYM NAME... DEPT DEPARTMENT RLGTH= 72
REC SYNONYM VER.... 0100 DLGTH= 56
LANGUAGE(S)........ FORTRAN
DATA ITEM.......... REDEFINES....... USAGE....... VALUE. ............... PICTURE..... STRT LGTH
02 DPID DISPLAY 9(4) 1 4
02 DPNAME DISPLAY X(45) 5 45
02 DPHDID DISPLAY 9(4) 50 4
02 FILLER DISPLAY XXX 54 3
IDMSRPTS 14.1 -- SCHEMA RECORD DESCRIPTION LISTING --- DATE TIME PAGE
RECDES DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 7
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ EMPLOYEE RLGTH= 192
RECORD VERSION..... 0100 DLGTH= 120
RECORD ID.......... 0415 KLGTH= 72
RECORD LENGTH...... FIXED DSTRT= 72
LOCATION MODE...... CALC USING EMP-ID-0415 DUPLICATES NOT ALLOWED
WITHIN............. EMP-DEMO-REGION OFFSET 5 PGS FOR 95 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
CALC MEMBER 1 2
DEPT-EMPLOYEE MEMBER 3 4 5
EMP-NAME-NDX INDEX MEMBER 6
OFFICE-EMPLOYEE INDEX MEMBER 7 8
EMP-COVERAGE OWNER 9 10
EMP-EMPOSITION OWNER 11 12
EMP-EXPERTISE OWNER 13 14
MANAGES OWNER 15 16
REPORTS-TO OWNER 17 18
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 EMP-ID-0415 DISPLAY 9(4) 1 4
SET CONTROL ITEM FOR -------- CALC ASC DUP NOT ALLOWED
02 EMP-NAME-0415 DISPLAY 5 25
03 EMP-FIRST-NAME-0415 DISPLAY X(10) 5 10
SET CONTROL ITEM FOR -------- DEPT-EMPLOYEE ASC DUP LAST
SET CONTROL ITEM FOR -------- EMP-NAME-NDX ASC DUP LAST
SET CONTROL ITEM FOR -------- OFFICE-EMPLOYEE ASC DUP LAST
03 EMP-LAST-NAME-0415 DISPLAY X(15) 15 15
SET CONTROL ITEM FOR -------- DEPT-EMPLOYEE ASC DUP LAST
SET CONTROL ITEM FOR -------- EMP-NAME-NDX ASC DUP LAST
SET CONTROL ITEM FOR -------- OFFICE-EMPLOYEE ASC DUP LAST
02 EMP-ADDRESS-0415 DISPLAY 30 46
03 EMP-STREET-0415 DISPLAY X(20) 30 20
03 EMP-CITY-0415 DISPLAY X(15) 50 15
03 EMP-STATE-0415 DISPLAY X(2) 65 2
03 EMP-ZIP-0415 DISPLAY 67 9
04 EMP-ZIP-FIRST-FIVE-0415 DISPLAY X(5) 67 5
04 EMP-ZIP-LAST-FOUR-0415 DISPLAY X(4) 72 4
02 EMP-PHONE-0415 DISPLAY 9(10) 76 10
02 STATUS-0415 DISPLAY X(2) 86 2
88 ACTIVE-0415 COND '01' 86
88 ST-DISABIL-0415 COND '02' 86
88 LT-DISABIL-0415 COND '03' 86
88 LEAVE-OF-ABSENCE-0415 COND '04' 86
88 TERMINATED-0415 COND '05' 86
02 SS-NUMBER-0415 DISPLAY 9(9) 88 9
02 START-DATE-0415 DISPLAY 97 8
03 START-YEAR-0415 DISPLAY 9(4) 97 4
03 START-MONTH-0415 DISPLAY 9(2) 101 2
03 START-DAY-0415 DISPLAY 9(2) 103 2
02 TERMINATION-DATE-0415 DISPLAY 105 8
03 TERMINATION-YEAR-0415 DISPLAY 9(4) 105 4
03 TERMINATION-MONTH-0415 DISPLAY 9(2) 109 2
IDMSRPTS 14.1 -- SCHEMA RECORD DESCRIPTION LISTING --- DATE TIME PAGE
RECDES DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 8
SCHEMA EMPSCHM VERSION 100
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
03 TERMINATION-DAY-0415 DISPLAY 9(2) 111 2
02 BIRTH-DATE-0415 DISPLAY 113 8
03 BIRTH-YEAR-0415 DISPLAY 9(4) 113 4
03 BIRTH-MONTH-0415 DISPLAY 9(2) 117 2
03 BIRTH-DAY-0415 DISPLAY 9(2) 119 2
***** *****
REC SYNONYM NAME... EMPLOYE EMPLOYEE RLGTH= 192
REC SYNONYM VER.... 0100 DLGTH= 120
LANGUAGE(S)........ ASSEMBLER
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 EMPID DISPLAY 9(4) 1 4
02 EMPNAME DISPLAY 5 25
03 EMPFNAME DISPLAY X(10) 5 10
03 EMPLNAME DISPLAY X(15) 15 15
02 EMPADDR DISPLAY 30 46
03 EMPSTRET DISPLAY X(20) 30 20
03 EMPCITY DISPLAY X(15) 50 15
03 EMPSTATE DISPLAY X(2) 65 2
03 EMPZIP DISPLAY 67 9
04 EMPZIPF5 DISPLAY X(5) 67 5
04 EMPZIPL4 DISPLAY X(4) 72 4
02 EMPPHONE DISPLAY 9(10) 76 10
02 EMPSTATU DISPLAY X(2) 86 2
88 ACTIVE COND '01' 86
88 STDSBL COND '02' 86
88 LTDSBL COND '03' 86
88 LVOFAB COND '04' 86
88 TRMINATD COND '05' 86
02 EMPSSNUM DISPLAY 9(9) 88 9
02 EMPSTDT DISPLAY 97 8
03 EMPSTYR DISPLAY 9(4) 97 4
03 EMPSTMO DISPLAY 9(2) 101 2
03 EMPSTDA DISPLAY 9(2) 103 2
02 EMPTRMDT DISPLAY 105 8
03 EMPTRMYR DISPLAY 9(4) 105 4
03 EMPTRMMO DISPLAY 9(2) 109 2
03 EMPTRMDA DISPLAY 9(2) 111 2
02 EMPBIRDT DISPLAY 113 8
03 EMPBIRYR DISPLAY 9(4) 113 4
03 EMPBIRMO DISPLAY 9(2) 117 2
03 EMPBIRDA DISPLAY 9(2) 119 2
IDMSRPTS 14.1 -- SCHEMA RECORD DESCRIPTION LISTING --- DATE TIME PAGE
RECDES DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 9
SCHEMA EMPSCHM VERSION 100
REC SYNONYM NAME... EMPLOY EMPLOYEE RLGTH= 192
REC SYNONYM VER.... 0100 DLGTH= 120
LANGUAGE(S)........ FORTRAN
DATA ITEM.......... REDEFINES....... USAGE....... VALUE............................. PICTURE..... STRT LGTH
02 EMPID DISPLAY 9(4) 1 4
02 EMPNAM DISPLAY 5 25
03 EMPFNM DISPLAY X(10) 5 10
03 EMPLNM DISPLAY X(15) 15 15
02 EMPADR DISPLAY 30 46
03 EMPST DISPLAY X(20) 30 20
03 EMPCTY DISPLAY X(15) 50 15
03 EMPSTE DISPLAY X(2) 65 2
03 EMPZIP DISPLAY 67 9
04 EMPZF5 DISPLAY X(5) 67 5
04 EMPZL4 DISPLAY X(4) 72 4
02 EMPPHN DISPLAY 9(10) 76 10
02 EMPSTA DISPLAY X(2) 86 2
88 ACTIVE COND '01' 86
88 STDSBL COND '02' 86
88 LTDSBL COND '03' 86
88 LVOFAB COND '04' 86
88 TRMNTD COND '05' 86
02 EMPSS DISPLAY 9(9) 88 9
02 EMPSDT DISPLAY 97 8
03 EMPSYR DISPLAY 9(4) 97 4
03 EMPSMO DISPLAY 9(2) 101 2
03 EMPSDA DISPLAY 9(2) 103 2
02 EMPTDT DISPLAY 105 8
03 EMPTYR DISPLAY 9(4) 105 4
03 EMPTMO DISPLAY 9(2) 109 2
03 EMPTDA DISPLAY 9(2) 111 2
02 EMPBDT DISPLAY 113 8
03 EMPBYR DISPLAY 9(4) 113 4
03 EMPBMO DISPLAY 9(2) 117 2
03 EMPBDA DISPLAY 9(2) 119 2
IDMSRPTS 14.1 -- SCHEMA RECORD DESCRIPTION LISTING --- DATE TIME PAGE
RECDES DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 10
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ EMPOSITION RLGTH= 56
RECORD VERSION..... 0100 DLGTH= 32
RECORD ID.......... 0420 KLGTH= 24
RECORD LENGTH...... FIXED DSTRT= 24
LOCATION MODE...... VIA SET EMP-EMPOSITION DISPLACEMENT 0000 PAGES
WITHIN............. EMP-DEMO-REGION OFFSET 5 PGS FOR 95 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
EMP-EMPOSITION MEMBER 1 2 3
JOB-EMPOSITION MEMBER 4 5 6
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 START-DATE-0420 DISPLAY 1 8
03 START-YEAR-0420 DISPLAY 9(4) 1 4
03 START-MONTH-0420 DISPLAY 9(2) 5 2
03 START-DAY-0420 DISPLAY 9(2) 7 2
02 FINISH-DATE-0420 DISPLAY 9 8
03 FINISH-YEAR-0420 DISPLAY 9(4) 9 4
03 FINISH-MONTH-0420 DISPLAY 9(2) 13 2
03 FINISH-DAY-0420 DISPLAY 9(2) 15 2
02 SALARY-GRADE-0420 DISPLAY 9(2) 17 2
02 SALARY-AMOUNT-0420 COMP-3 S9(7)V99 19 5
02 BONUS-PERCENT-0420 COMP-3 SV999 24 2
02 COMMISSION-PERCENT-0420 COMP-3 SV999 26 2
02 OVERTIME-RATE-0420 COMP-3 S9V99 28 2
02 FILLER DISPLAY XXX 30 3
***** *****
REC SYNONYM NAME... EMPOSITN EMPOSITION RLGTH= 56
REC SYNONYM VER.... 0100 DLGTH= 32
LANGUAGE(S)........ ASSEMBLER
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 EPSTRTDT DISPLAY 1 8
03 EPSTRTYR DISPLAY 9(4) 1 4
03 EPSTRTMO DISPLAY 9(2) 5 2
03 EPSTRTDA DISPLAY 9(2) 7 2
02 EPFINIDT DISPLAY 9 8
03 EPFINIYR DISPLAY 9(4) 9 4
03 EPFINIMO DISPLAY 9(2) 13 2
03 EPFINIDA DISPLAY 9(2) 15 2
02 EPSALGRD DISPLAY 9(2) 17 2
02 EPSALAMT COMP-3 S9(7)V99 19 5
02 EPBONPCT COMP-3 SV999 24 2
02 EPCMMPCT COMP-3 SV999 26 2
02 EPOTRATE COMP-3 S9V99 28 2
02 FILLER DISPLAY XXX 30 3
IDMSRPTS 14.1 -- SCHEMA RECORD DESCRIPTION LISTING --- DATE TIME PAGE
RECDES DICTIONARY DEFAULT OF NODE DEFAULT 02/13/01 142430 11
SCHEMA EMPSCHM VERSION 100
REC SYNONYM NAME... EMPOST EMPOSITION RLGTH= 56
REC SYNONYM VER.... 0100 DLGTH= 32
LANGUAGE(S)........ FORTRAN
DATA ITEM.......... REDEFINES....... USAGE....... VALUE................. PICTURE..... STRT LGTH
02 EPSTDT DISPLAY 1 8
03 EPSTYR
%%