HP System Dictionary/XL COBOL Definition Extractor (32257-90001)

4- 40
> GENERATE STORE; ENTITY-TYPE=IMAGE-DATABASE.
Define all data sets in one module (Y/N) > N
Module name for IMAGE-DATASET CUSTOMER > CUSTMOD
Element prefix > CUST-
000100
000200 01 CUSTOMER-DATA.
000300 05 CUST-ACCOUNT PIC S9(9) COMP.
000400 05 CUST-LAST-NAME PIC X(16).
000500 05 CUST-FIRST-NAME PIC X(10).
000600 05 CUST-MID-INITIAL PIC X(2).
000700 05 CUST-STREET-ADDRESS PIC X(26).
000800 05 CUST-CITY PIC X(12).
000900 05 CUST-STATE PIC X(2).
001000 05 CUST-ZIP PIC X(6).
001100 05 CUST-CREDIT-RATING PIC S9(9) COMP.
001200
001300
Module name for IMAGE-DATASET DATE-MASTER > DATEMOD
Element prefix > DATE-
000100
000200 01 DATE-MASTER-DATA.
000300 05 DATE-DATE-INFO PIC X(6).
000400
000500
Module name for IMAGE-DATASET PRODUCT > PRODMOD
Element prefix > PRODUCT-
000100
000200 01 PRODUCT-DATA.
000300 05 PRODUCT-STOCK-NO PIC X(8).
000400 05 PRODUCT-DESCRIPTION PIC X(20).
000500
000600
Module name for IMAGE-DATASET SALES > SALESMOD
Element prefix > SALES-