Using the Data Convert tool to transform EBCDIC ... - Micro Focus

9) In the current EBCDIC-ASCII-convert.app project, Open the EBCDIClayout.cbl
Search for SEG-RPCMTDTP-CEAC
Select the o1 and 05 levels for this group item and right mouse click,
select copy
Save program as ASCII-layout.cbl.
10) Next, Delete everything on left hand side of the project.
Now, from the right hand side, add ASCII-layout.cbl
Hightlight and drag the ASCII-layout.cbl over to the generic debug
build and build the ASCII-layout.int
Right mouse click on ASCII-layout.cbl and click on build settings
Click on the compile tab and add the following
Charset(ASCII) sign(EBCDIC)
Do Project-> update all dependencies, Project-> Rebuild all.
Now you should have the ASCII-layout.int built correctly.
.
Example of ASCII-layout.cbl.
ASCII-LAYOUT.CBL
program-id. ASCII-layout.
environment division.
data division.
01 SEG-RPCMTDTP-CEAC.
05 CMTDTP-CLE-SEG-RPCMT-CEAC.
10 CMTDTP-EL-NO-GR-COCEAC PIC X(10).
10 CMTDTP-EL-NO-COCEAC PIC X(10).
05 CMTDTP-EL-CLE-SEG-RPCMTCRP-CEA.
10 CMTDTP-EL-CD-TYP-PER-CRP-CEAC PIC X.
* 10 CMTDTP-EL-DT-DEB-PER-CRP-CEAC PIC X(8).
10 CMTDTP-EL-DT-DEB-PER-CRP-CEAC PIC X(6).
05 CMTDTP-EL-CLE-SEG-RPCRPCRG-CEA.
10 CTMDTP-EL-CD-GAR-CRG-COCEAC PIC X(5).
05 EL-NO-SEQ-CLE-DTP-COCEAC.
07 EL-NO-SEQ-CLE-DTP-CO-NUMCEA PIC 9(5).
05 EL-PRI-COUR-APR-DTP-COCEAC PIC S9(7)V99.
05 EL-PRI-AJU-APR-DTP-COCEAC PIC S9(7)V99.
05 EL-CD-RAIS-TX-APR-DTP-COCEAC PIC X.
05 EL-DT-TX-APR-DTP-COCEAC PIC 9(8).
05 EL-PRI-COUR-ENC-DTP-COCEAC PIC S9(7)V99.
05 EL-PRI-AJU-ENC-DTP-COCEAC PIC S9(7)V99.
05 EL-CD-RAIS-TX-ENC-DTP-COCEAC PIC X.
05 EL-DT-TX-ENC-DTP-COCEAC PIC 9(8).
05 EL-MT-TX-PRI-EXO-DTP-COCEAC PIC S9(7)V99.
05 EL-MT-TX-PRI-DIVD-DTP-COCEAC PIC S9(7)V99.
05 EL-MT-ORIG-CHQ-DTP-COCEAC PIC S9(7)V99.
05 EL-DT-RECEP-CHQ-DTP-COCEAC PIC 9(8).
05 EL-PRI-ENC-PRV-NON-GAG-DTP-CEA PIC S9(7)V99.
05 EL-MT-TX-COR-AJU-DTP-COCEAC PIC S9(7)V99.
05 EL-MT-TX-COR-PRI-DTP-COCEAC PIC S9(7)V99.
procedure division.
exit program.