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

4-:4
000100
000200 01 SALES-DATA.
000300 05 SALES-ACCOUNT PIC S9(9) COMP.
000400 05 SALES-STOCK-NO PIC X(8).
000500 05 SALES-QUANTITY PIC S9(4) COMP.
000600 05 SALES-PRICE PIC S9(9) COMP.
000700 05 SALES-TAX PIC S9(9) COMP.
000800 05 SALES-TOTAL PIC S9(9) COMP.
000900 05 SALES-PURCH-DATE PIC X(6).
001000 05 SALES-DELIV-DATE PIC X(6).
001100
001200
Module name for IMAGE-DATASET SUP-MASTER > SUPMOD
Element prefix > SUPPLY-
000100
000200 01 SUP-MASTER-DATA.
000300 05 SUPPLY-SUPPLIER PIC X(16).
000400 05 SUPPLY-STREET-ADDRESS PIC X(26).
000500 05 SUPPLY-CITY PIC X(12).
000600 05 SUPPLY-STATE PIC X(2).
000700 05 SUPPLY-ZIP PIC X(6).
000800
000900
Module name for IMAGE-DATASET INVENTORY > INVMOD
Element prefix > INVENT-
000100
000200 01 INVENTORY-DATA.
000300 05 INVENT-STOCK-NO PIC X(8).
000400 05 INVENT-ONHANDQTY PIC S9(9) COMP.
000500 05 INVENT-SUPPLIER PIC X(16).
000600 05 INVENT-UNIT-COST PIC S9(7) COMP-3.
000700 05 INVENT-LASTSHIPDAT PIC X(6).
000800 05 INVENT-BINNUM PIC S9(2).
000900