I want to convert COBOL copybook to below CSV file format to create DDL scripts. is any built-in tool available to convert this?
COBOL Copybook:
01 IX-HIXINV.
*INTERPLANT RELATIONS IX-INVOICE ROOT SEGMENT
U 02 IX-IX-INV-NUM.
03 IX-IX-INV-NUM-A PIC X.
03 IX-IX-INV-NUM-N PIC 9(5).
02 FILLER PIC X(5) VALUE SPACES.
02 IX-IX-INV-PFX PIC X(3).
02 IX-ACCT-SUB-DET-NUM PIC X(3).
02 IX-ACCT-SUB-NUM PIC X(3).
02 IX-ACCT-SUB-ADDL-DATA PIC X(6).
02 IX-AIR-FRGHT-CHRG-AMT PIC S9(7)V99 COMP-3.
02 IX-BNK-NME PIC X(35).
Expected CSV file format,
level,name,position,storage-length,display-length,picture,usage,numeric,value,scale,signed,primary,
01,IX-HIXINV,1,500,500,,,,,,,FALSE,
02,IX-IX-INV-NUM,1,6,6,,,,,,,FALSE,
03,IX-IX-INV-NUM-A,1,1,1,X(1),,,,,,TRUE,
03,IX-IX-INV-NUM-N,2,5,5,9(5),,TRUE,,,,TRUE,
02,FILLER,7,5,5,X(5),,,spaces,,,FALSE,
02,IX-IX-INV-PFX,12,3,3,X(3),,,,,,FALSE,
02,IX-ACCT-SUB-DET-NUM,15,3,3,X(3),,,,,,FALSE,
02,IX-ACCT-SUB-NUM,18,3,3,X(3),,,,,,FALSE,
02,IX-ACCT-SUB-ADDL-DATA,21,6,6,X(6),,,,,,FALSE,
02,IX-AIR-FRGHT-CHRG-AMT,27,5,9,S9(7)V99,computational-3,TRUE,,2,TRUE,FALSE,
02,IX-BNK-NME,32,35,35,X(35),,,,,,FALSE,
You need to sign in to view this answers
Leave feedback about this