Begoguay, el INSPECT no permite sustituciones de cadenas de caracteres de diferentes tamaños. Es decir, la longitud del texto a reemplazar debe coincidir con la longitud del texto nuevo. En este caso si haces
Código COBOL:
INSPECT TEXTO REPLACING
ALL X"0D0A" BY "- "
Te va a funcionar.
Si no quieres 2 caracteres, ya debes hacer un bucle:
Código COBOL:
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 IDX-1 PIC 9(4) COMP-5.
01 WS-CAMPO PIC X(8192).
PROCEDURE DIVISION.
MOVE "Text" OF CmText1 TO WS-CAMPO
MOVE 1 TO IDX-1
PERFORM UNTIL (IDX-1 + 2) > LENGTH OF WS-CAMPO
IF WS-CAMPO(IDX-1:2) = X"0D0A"
MOVE SPACES TO WS-CAMPO(IDX-1:1)
MOVE WS-CAMPO(IDX-1 + 2:) TO WS-CAMPO(IDX-1 + 1:)
END-IF
ADD 1 TO IDX-1
END-PERFORM
MOVE WS-CAMPO TO ...