This appendix contains the IDMSRPTS utility and the data structure diagram for the EMPLOYEE database from which most of the examples in this manual are taken. Both of the sample programs listed earlier in this manual access this database.
Note: For more information about the IDMSRPTS utility, see the CA IDMS Utilities Guide.
This section contains the following topics:
IDMSRPTS Utility Report Listings
EMPLOYEE Database Structure Diagram
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 1
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ COVERAGE RLGTH= 36
RECORD VERSION..... 0100 DLGTH= 20
RECORD ID.......... 0400 KLGTH= 16
RECORD LENGTH...... FIXED DSTRT= 16
LOCATION MODE...... VIA SET EMP-COVERAGE DISPLACEMENT 0000 PAGES
WITHIN............. INS-DEMO-REGION OFFSET 5 PGS FOR 20 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
EMP-COVERAGE MEMBER 1 2 3
COVERAGE-CLAIMS OWNER 4
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
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 3
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ DENTAL-CLAIM RLGTH= 944
RECORD VERSION..... 0100 DLGTH= 936
RECORD ID.......... 0405 KLGTH= 8
RECORD LENGTH...... VARIABLE DSTRT= 12
MINIMUM ROOT....... 132 CHARACTERS
MINIMUM FRAGMENT... 932 CHARACTERS
LOCATION MODE...... VIA SET COVERAGE-CLAIMS DISPLACEMENT 0000 PAGES
WITHIN............. INS-DEMO-REGION OFFSE 5 PGS FOR 20 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
COVERAGE-CLAIMS MEMBER 1
(FRAGMENT CHAIN) INTRNL 2
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 nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 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 20 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
CALC MEMBER 1 2
DEPT-EMPLOYEE INDEX OWNER 3 4
DATA ITEM.......... REDEFINES... USAGE....... VALUE..... PICTURE. STRT LGTH
02 DEPT-ID-0410 DISPLAY 9(4) 1 4
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
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 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 45 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
CALC MEMBER 1 2
DEPT-EMPLOYEE INDEX MEMBER 3 4
EMP-NAME-NDX INDEX MEMBER 5
EMP-SSN-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
02 EMP-NAME-0415 DISPLAY 5 25
03 EMP-FIRST-NAME-0415 DISPLAY X(10) 5 10
03 EMP-LAST-NAME-0415 DISPLAY X(15) 15 15
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
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
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 8
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 45 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
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 10
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ EXPERTISE RLGTH= 32
RECORD VERSION..... 0100 DLGTH= 12
RECORD ID.......... 0425 KLGTH= 20
RECORD LENGTH...... FIXED DSTRT= 20
LOCATION MODE...... VIA SET EMP-EXPERTIS DISPLACEMENT 0000 PAGES
WITHIN............. EMP-DEMO-REGION OFFSET 5 PGS FOR 45 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
EMP-EXPERTISE MEMBER 1 2 3
SKILL-EXPERTISE INDEX MEMBER 4 5
DATA ITEM.......... REDEFINES... USAGE....... VALUE..... PICTURE. STRT LGTH
02 SKILL-LEVEL-0425 DISPLAY XX 1 2
88 EXPERT-0425 COND '04' 1
88 PROFICIENT-0425 COND '03' 1
88 COMPETENT-0425 COND '02' 1
88 ELEMENTARY-0425 COND '01' 1
02 EXPERTISE-DATE-0425 DISPLAY 3 8
03 EXPERTISE-YEAR-0425 DISPLAY 9(4) 3 4
03 EXPERTISE-MONTH-0425 DISPLAY 9(2) 7 2
03 EXPERTISE-DAY-0425 DISPLAY 9(2) 9 2
02 FILLER DISPLAY XX 11 2
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 10
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ HOSPITAL-CLAIM RLGTH= 304
RECORD VERSION..... 0100 DLGTH= 300
RECORD ID.......... 0430 KLGTH= 4
RECORD LENGTH...... FIXED DSTRT= 4
LOCATION MODE...... VIA SET COVERAGE-CLAIMS DISPLACEMENT 0000 PAGES
WITHIN............. INS-DEMO-REGION OFFSET 5 PGS FOR 20 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
COVERAGE-CLAIMS MEMBER 1
DATA ITEM.......... REDEFINES... USAGE....... VALUE..... PICTURE. STRT LGTH
02 CLAIM-DATE-0430 DISPLAY 1 8
03 CLAIM-YEAR-0430 DISPLAY 9(4) 1 4
03 CLAIM-MONTH-0430 DISPLAY 9(2) 5 2
03 CLAIM-DAY-0430 DISPLAY 9(2) 7 2
02 PATIENT-NAME-0430 DISPLAY 9 25
03 PATIENT-FIRST-NAME-0430 DISPLAY X(10) 9 10
03 PATIENT-LAST-NAME-0430 DISPLAY X(15) 19 15
02 PATIENT-BIRTH-DATE-0430 DISPLAY 34 8
03 PATIENT-BIRTH-YEAR-0430 DISPLAY 9(4) 34 4
03 PATIENT-BIRTH-MONTH-0430 DISPLAY 9(2) 38 2
03 PATIENT-BIRTH-DAY-0430 DISPLAY 9(2) 40 2
02 PATIENT-SEX-0430 DISPLAY X 42 1
02 RELATION-TO-EMPLOYEE-0430 DISPLAY X(10) 43 10
02 HOSPITAL-NAME-0430 DISPLAY X(25) 53 25
02 HOSP-ADDRESS-0430 DISPLAY 78 46
03 HOSP-STREET-0430 DISPLAY X(20) 78 20
03 HOSP-CITY-0430 DISPLAY X(15) 98 15
03 HOSP-STATE-0430 DISPLAY X(2) 113 2
03 HOSP-ZIP-0430 DISPLAY 115 9
04 HOSP-ZIP-FIRST-FIVE-0430 DISPLAY X(5) 115 5
04 HOSP-ZIP-LAST-FOUR-0430 DISPLAY X(4) 120 4
02 ADMIT-DATE-0430 DISPLAY 124 8
03 ADMIT-YEAR-0430 DISPLAY 9(4) 124 4
03 ADMIT-MONTH-0430 DISPLAY 9(2) 128 2
03 ADMIT-DAY-0430 DISPLAY 9(2) 130 2
02 DISCHARGE-DATE-0430 DISPLAY 132 8
03 DISCHARGE-YEAR-0430 DISPLAY 9(4) 132 4
03 DISCHARGE-MONTH-0430 DISPLAY 9(2) 136 2
03 DISCHARGE-DAY-0430 DISPLAY 9(2) 138 2
02 DIAGNOSIS-0430 DISPLAY OCCURS 2 X(60) 140 120
02 HOSPITAL-CHARGES-0430 DISPLAY 260 41
03 ROOM-AND-BOARD-0430 DISPLAY 260 26
04 WARD-0430 DISPLAY 260 13
05 WARD-DAYS-0430 COMP-3 S9(5) 260 3
05 WARD-RATE-0430 COMP-3 S9(7)V99 263 5
05 WARD-TOTAL-0430 COMP-3 S9(7)V99 268 5
04 SEMI-PRIVATE-0430 DISPLAY 273 13
05 SEMI-DAYS-0430 COMP-3 S9(5) 273 3
05 SEMI-RATE-0430 COMP-3 S9(7)V99 276 5
05 SEMI-TOTAL-0430 COMP-3 S9(7)V99 281 5
03 OTHER-CHARGES-0430 DISPLAY 286 15
04 DELIVERY-COST-0430 COMP-3 S9(7)V99 286 5
04 ANESTHESIA-COST-0430 COMP-3 S9(7)V99 291 5
04 LAB-COST-0430 COMP-3 S9(7)V99 296 5
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 12
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ INSURANCE-PLAN RLGTH= 140
RECORD VERSION..... 0100 DLGTH= 132
RECORD ID.......... 0435 KLGTH= 8
RECORD LENGTH...... FIXED DSTRT= 8
LOCATION MODE...... CALC USING INS-PLAN-CODE-0435 DUPLICATES NOT ALLOWED
WITHIN............. INS-DEMO-REGION OFFSET 1 PGS FOR 4 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
CALC MEMBER 1 2
DATA ITEM.......... REDEFINES... USAGE....... VALUE..... PICTURE. STRT LGTH
02 INS-PLAN-CODE-0435 DISPLAY X(3) 1 3
88 GROUP-LIFE-0435 COND '001' 1
88 HMO-0435 COND '002' 1
88 GROUP-HEALTH-0435 COND '003' 1
88 GROUP-DENTAL-0435 COND '004' 1
02 INS-CO-NAME-0435 DISPLAY X(45) 4 45
02 INS-CO-ADDRESS-0435 DISPLAY 49 46
03 INS-CO-STREET-0435 DISPLAY X(20) 49 20
03 INS-CO-CITY-0435 DISPLAY X(15) 69 15
03 INS-CO-STATE-0435 DISPLAY X(2) 84 2
03 INS-CO-ZIP-0435 DISPLAY 86 9
04 INS-CO-ZIP-FIRST-FIVE-0435 DISPLAY X(5) 86 5
04 INS-CO-ZIP-LAST-FOUR-0435 DISPLAY X(4) 91 4
02 INS-CO-PHONE-0435 DISPLAY 9(10) 95 10
02 GROUP-NUMBER-0435 DISPLAY 9(6) 105 6
02 PLAN-DESCRIPTION-0435 DISPLAY 111 20
03 DEDUCT-0435 COMP-3 S9(7)V99 111 5
03 MAXIMUM-LIFE-COST-0435 COMP-3 S9(7)V99 116 5
03 FAMILY-COST-0435 COMP-3 S9(7)V99 121 5
03 DEP-COST-0435 COMP-3 S9(7)V99 126 5
02 FILLER DISPLAY XX 131 2
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 14
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ JOB RLGTH= 324
RECORD VERSION..... 0100 DLGTH= 300
RECORD ID.......... 0440 KLGTH= 24
RECORD LENGTH...... FIXED (INTERNALLY VARIABLE) DSTRT= 28
MINIMUM ROOT....... 24 CHARACTERS
MINIMUM FRAGMENT... 296 CHARACTERS
LOCATION MODE...... CALC USING JOB-ID-0440 DUPLICATES NOT ALLOWED
WITHIN............. ORG-DEMO-REGION OFFSET 5 PGS FOR 20 PGS
CALL PROCEDURES.... NAME.... WHEN.. FUNCTION
IDMSCOMP BEFORE STORE
IDMSCOMP BEFORE MODIFY
IDMSDCOM AFTER GET
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
CALC MEMBER 1 2
JOB-TITLE-NDX INDEX MEMBER 3
JOB-EMPOSITION OWNER 4 5
(FRAGMENT CHAIN) INTRNL 6
DATA ITEM.......... REDEFINES... USAGE....... VALUE..... PICTURE. STRT LGTH
02 JOB-ID-0440 DISPLAY 9(4) 1 4
02 TITLE-0440 DISPLAY X(20) 5 20
02 DESCRIPTION-0440 DISPLAY 25 120
03 DESCRIPTION-LINE-0440 DISPLAY OCCURS 2 X(60) 25 120
02 REQUIREMENTS-0440 DISPLAY 145 120
03 REQUIREMENT-LINE-0440 DISPLAY OCCURS 2 X(60) 145 120
02 MINIMUM-SALARY-0440 DISPLAY S9(6)V99 265 8
02 MAXIMUM-SALARY-0440 DISPLAY S9(6)V99 273 8
02 SALARY-GRADES-0440 DISPLAY OCCURS 4 9(2) 281 8
02 NUMBER-OF-POSITIONS-0440 DISPLAY 9(3) 289 3
02 NUMBER-OPEN-0440 DISPLAY 9(3) 292 3
02 FILLER DISPLAY XX 295 2
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 15
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ NON-HOSP-CLAIM RLGTH= 1064
RECORD VERSION..... 0100 DLGTH= 1056
RECORD ID.......... 0445 KLGTH= 8
RECORD LENGTH...... VARIABLE DSTRT= 12
MINIMUM ROOT....... 248 CHARACTERS
MINIMUM FRAGMENT... 1052 CHARACTERS
LOCATION MODE...... VIA SET COVERAGE-CLAIMS DISPLACEMENT 0000 PAGES
WITHIN............. INS-DEMO-REGION OFFSET 5 PGS FOR 20 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
COVERAGE-CLAIMS MEMBER 1
(FRAGMENT CHAIN) INTRNL 2
DATA ITEM.......... REDEFINES... USAGE....... VALUE..... PICTURE. STRT LGTH
02 CLAIM-DATE-0445 DISPLAY 1 8
03 CLAIM-YEAR-0445 DISPLAY 9(4) 1 4
03 CLAIM-MONTH-0445 DISPLAY 9(2) 5 2
03 CLAIM-DAY-0445 DISPLAY 9(2) 7 2
02 PATIENT-NAME-0445 DISPLAY 9 25
03 PATIENT-FIRST-NAME-0445 DISPLAY X(10) 9 10
03 PATIENT-LAST-NAME-0445 DISPLAY X(15) 19 15
02 PATIENT-BIRTH-DATE-0445 DISPLAY 34 8
03 PATIENT-BIRTH-YEAR-0445 DISPLAY 9(4) 34 4
03 PATIENT-BIRTH-MONTH-0445 DISPLAY 9(2) 38 2
03 PATIENT-BIRTH-DAY-0445 DISPLAY 9(2) 40 2
02 PATIENT-SEX-0445 DISPLAY X 42 1
02 RELATION-TO-EMPLOYEE-0445 DISPLAY X(10) 43 10
02 PHYSICIAN-NAME-0445 DISPLAY 53 25
03 PHYSICIAN-FIRST-NAME-0445 DISPLAY X(10) 53 10
03 PHYSICIAN-LAST-NAME-0445 DISPLAY X(15) 63 15
02 PHYSICIAN-ADDRESS-0445 DISPLAY 78 46
03 PHYSICIAN-STREET-0445 DISPLAY X(20) 78 20
03 PHYSICIAN-CITY-0445 DISPLAY X(15) 98 15
03 PHYSICIAN-STATE-0445 DISPLAY X(2) 113 2
03 PHYSICIAN-ZIP-0445 DISPLAY 115 9
04 PHYSICIAN-ZIP-FIRST-FIVE-0445 DISPLAY X(5) 115 5
04 PHYSICIAN-ZIP-LAST-FOUR-0445 DISPLAY X(4) 120 4
02 PHYSICIAN-ID-0445 DISPLAY 9(6) 124 6
02 DIAGNOSIS-0445 DISPLAY OCCURS 2 X(60) 130 120
02 NUMBER-OF-PROCEDURES-0445 COMP 9(2) 250 2
02 FILLER DISPLAY X 252 1
02 PHYSICIAN-CHARGES-0445 DISPLAY OCCURS 0 TO 10 253 800
DEPENDING ON -- NUMBER-OF-PROCEDURES-0445
03 SERVICE-DATE-0445 DISPLAY 1 8
04 SERVICE-YEAR-0445 DISPLAY 9(4) 1 4
04 SERVICE-MONTH-0445 DISPLAY 9(2) 5 2
04 SERVICE-DAY-0445 DISPLAY 9(2) 7 2
03 PROCEDURE-CODE-0445 DISPLAY 9(4) 9 4
03 DESCRIPTION-OF-SERVICE-0445 DISPLAY X(60) 13 60
03 FEE-0445 COMP-3 S9(7)V99 73 5
03 FILLER DISPLAY XXX 78 3
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 18
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ OFFICE RLGTH= 92
RECORD VERSION..... 0100 DLGTH= 76
RECORD ID.......... 0450 KLGTH= 16
RECORD LENGTH...... FIXED DSTRT= 16
LOCATION MODE...... CALC USING OFFICE-CODE-0450 DUPLICATES NOT ALLOWED
WITHIN............. ORG-DEMO-REGION OFFSET 5 PGS FOR 20 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
CALC MEMBER 1 2
OFFICE-EMPLOYEE INDEX OWNER 3 4
DATA ITEM.......... REDEFINES... USAGE....... VALUE..... PICTURE. STRT LGTH
02 OFFICE-CODE-0450 DISPLAY X(3) 1 3
02 OFFICE-ADDRESS-0450 DISPLAY 4 46
03 OFFICE-STREET-0450 DISPLAY X(20) 4 20
03 OFFICE-CITY-0450 DISPLAY X(15) 24 15
03 OFFICE-STATE-0450 DISPLAY X(2) 39 2
03 OFFICE-ZIP-0450 DISPLAY 41 9
04 OFFICE-ZIP-FIRST-FIVE-0450 DISPLAY X(5) 41 5
04 OFFICE-ZIP-LAST-FOUR-0450 DISPLAY X(4) 46 4
02 OFFICE-PHONE-0450 DISPLAY OCCURS 3 9(7) 50 21
02 OFFICE-AREA-CODE-0450 DISPLAY X(3) 71 3
02 SPEED-DIAL-0450 DISPLAY X(3) 74 3
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 20
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ SKILL RLGTH= 96
RECORD VERSION..... 0100 DLGTH= 76
RECORD ID.......... 0455 KLGTH= 20
RECORD LENGTH...... FIXED DSTRT= 20
LOCATION MODE...... CALC USING SKILL-ID-0455 DUPLICATES NOT ALLOWED
WITHIN............. ORG-DEMO-REGION OFFSET 5 PGS FOR 20 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
CALC MEMBER 1 2
SKILL-NAME-NDX INDEX MEMBER 3
SKILL-EXPERTISE INDEX OWNER 4 5
DATA ITEM.......... REDEFINES... USAGE....... VALUE..... PICTURE. STRT LGTH
02 SKILL-ID-0455 DISPLAY 9(4) 1 4
02 SKILL-NAME-0455 DISPLAY X(12) 5 12
02 SKILL-DESCRIPTION-0455 DISPLAY X(60) 17 60
IDMSRPTS nn.n ── SCHEMA RECORD DESCRIPTION LISTING ─── DATE TIME PAGE
RECDES DICTIONARY APPLDICT OF NODE DEFAULT mm/dd/yy hhmmss 22
SCHEMA EMPSCHM VERSION 100
RECORD NAME........ STRUCTURE RLGTH= 36
RECORD VERSION..... 0100 DLGTH= 12
RECORD ID.......... 0460 KLGTH= 24
RECORD LENGTH...... FIXED DSTRT= 24
LOCATION MODE...... VIA SET MANAGES DISPLACEMENT 0000 PAGES
WITHIN............. EMP-DEMO-REGION OFFSET 5 PGS FOR 45 PGS
DBKEY POSITIONS.... SET............. TYPE........ NEXT PRIOR OWNER
MANAGES MEMBER 1 2 3
REPORTS-TO MEMBER 4 5 6
DATA ITEM.......... REDEFINES... USAGE....... VALUE..... PICTURE. STRT LGTH
02 STRUCTURE-CODE-0460 DISPLAY X(2) 1 2
88 ADMIN-0460 COND 'A' 1
88 PROJECT-0460 COND 'P1' THRU 'P9' 1
02 STRUCTURE-DATE-0460 DISPLAY 3 8
03 STRUCTURE-YEAR-0460 DISPLAY 9(4) 3 4
03 STRUCTURE-MONTH-0460 DISPLAY 9(2) 7 2
03 STRUCTURE-DAY-0460 DISPLAY 9(2) 9 2
02 FILLER DISPLAY XX 11 2
The data structure diagram illustrates record relationships in the EMPLOYEE database.

|
Copyright © 2014 CA.
All rights reserved.
|
|