IDENTIFICATION DIVISION.
       PROGRAM-ID. BUILD-FIXED.

       ENVIRONMENT DIVISION.
       INPUT-OUTPUT SECTION.
       FILE-CONTROL.
           SELECT INFILE-1  ASSIGN TO "MH-17p.txt"
               ORGANIZATION IS LINE SEQUENTIAL.
           SELECT OUTFILE-1 ASSIGN TO "MH-17p.dat"
               ORGANIZATION IS SEQUENTIAL.

           SELECT INFILE-2  ASSIGN TO "MH-17c.txt"
               ORGANIZATION IS LINE SEQUENTIAL.
           SELECT OUTFILE-2 ASSIGN TO "MH-17c.dat"
               ORGANIZATION IS SEQUENTIAL.

       DATA DIVISION.
       FILE SECTION.

       FD INFILE-1.
       01 IN-REC1        PIC X(256).
       FD INFILE-2.
       01 IN-REC2        PIC X(256).

       FD OUTFILE-1.
       01 OUT-REC1       PIC X(55).
       FD OUTFILE-2.
       01 OUT-REC2       PIC X(85).

       WORKING-STORAGE SECTION.
       01 EOF-SW-1        PIC X VALUE "N".
          88 EOF-1        VALUE "Y".
       01 EOF-SW-2        PIC X VALUE "N".
          88 EOF-2        VALUE "Y".

       01 CLEAN-REC-1     PIC X(85).
       01 CLEAN-REC-2     PIC X(55).

       PROCEDURE DIVISION.
       MAIN-LOGIC.

           OPEN INPUT INFILE-1
                OUTPUT OUTFILE-1.

           PERFORM UNTIL EOF-1
               READ INFILE-1
                   AT END SET EOF-1 TO TRUE
                   NOT AT END
                       MOVE SPACES TO CLEAN-REC-1
                       MOVE IN-REC1 TO CLEAN-REC-1
                       WRITE OUT-REC1 FROM CLEAN-REC-1
               END-READ
           END-PERFORM.

           CLOSE INFILE-1 OUTFILE-1.


           OPEN INPUT INFILE-2
                OUTPUT OUTFILE-2.

           PERFORM UNTIL EOF-2
               READ INFILE-2
                   AT END SET EOF-2 TO TRUE
                   NOT AT END
                       MOVE SPACES TO CLEAN-REC-2
                       MOVE IN-REC2 TO CLEAN-REC-2
                       WRITE OUT-REC2 FROM CLEAN-REC-2
               END-READ
           END-PERFORM.

           STOP RUN.