IUTIL200I HEIRLOOM COMPUTING INC - JOB UTILITIES IUTIL201I DBDGEN UTILITY PROGRAM DBDGEN Heirloom Computing DBDGEN Utility 7/15/16 8:55 AM DBDGEN INPUT: PRINT GEN DBDGEN INPUT: * DBDGEN INPUT: * DBD contains 3 segments: LIBSEG, BOOKSEG, MAGSEG DBDGEN INPUT: * DBDGEN INPUT: L DBD NAME=LIBRARY,ACCESS=HIDAM DBDGEN INPUT: A DATASET DD1=LIB,DEVICE=3380 DBDGEN INPUT: B SEGM NAME=LIBSEG,PARENT=SYSTEM,BYTES=30 DBDGEN INPUT: E FIELD NAME=(LIBRARY,SEQ,U),BYTES=10,START=1,TYPE=C DBDGEN INPUT: L FIELD NAME=ADDRESS,BYTES=20,START=11,TYPE=C DBDGEN INPUT: * DBDGEN INPUT: SEGM NAME=BOOKSEG,PARENT=LIBSEG,BYTES=50 DBDGEN INPUT: FIELD NAME=(BOOK,SEQ,U),BYTES=20,START=1,TYPE=C DBDGEN INPUT: FIELD NAME=AUTHOR,BYTES=30,START=21,TYPE=C DBDGEN INPUT: * DBDGEN INPUT: SEGM NAME=MAGSEG,PARENT=LIBSEG,BYTES=35 DBDGEN INPUT: FIELD NAME=(MAGAZINE,SEQ,U),BYTES=15,START=1,TYPE=C DBDGEN INPUT: FIELD NAME=PUBLISHR,BYTES=20,START=16,TYPE=C DBDGEN INPUT: * DBDGEN INPUT: DBDGEN DBDGEN INPUT: FINISH DBDGEN INPUT: * finished with Library DBD DBDGEN INPUT: END DBDGEN ANALYSIS PHASE DBDGEN ANALYSIS PHASE 0 WARNINGS DETECTED DBDGEN DATABASE SCHEMA RECORD SIZE: (62 MINIMUM; 82 MAXIMUM) KEY: (0 START; 32 LENGTH) ROOT SEGMENT: '0' LIBSEG (30 TOTAL BYTES; 10 KEY BYTES) CHILD SEGMENT: '1' BOOKSEG (PARENT LIBSEG; 50 TOTAL BYTES; 20 KEY BYTES) CHILD SEGMENT: '2' MAGSEG (PARENT LIBSEG; 35 TOTAL BYTES; 15 KEY BYTES) KEYS: DUPLICATES NOT ALLOWED DBDGEN DATABASE CREATED DBDGEN CLUSTER: LIBRARY DBDGEN CLUSTER: /data/LIBRARY DBDGEN DMB : LIBRARY.DMB DBDGEN DMB : /data/LIBRARY.DMB DEFINE CLUSTER (NAME(LIBRARY) - INDEXED - RECORDSIZE(62 82) - KEYS(32 0) - ) DBDGEN Heirloom Computing DBDGEN Utility 7/15/16 8:55 AM IUTIL224I DBDGEN UTILITY PROGRAM COMPLETED WITH CC 0