1. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

[SQL] ay tool available to covert Cobol copybook to CSV file

Discussão em 'Outras Linguagens' iniciado por Stack, Outubro 25, 2024 às 10:43.

  1. Stack

    Stack Membro Participativo

    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,

    Continue reading...

Compartilhe esta Página