Usa un campo cmtext pero con la opcion marcada de style multilineas y en multiline marcar las opciones horizontal scrollbar , vertical scrollbar y envias a grabar de esta manera.
Donde DATOS-HIS puede ser una variable de tu archivo.
Código COBOL:
FD HISTORIA GLOBAL EXTERNAL LABEL RECORD STANDARD.
01 HISTORIA-REC.
05 HISTORIA-KEY.
10 COD-P-HIS PIC 9(6).
10 COD-M-HIS PIC 9(6).
10 ANO-HIS PIC 9999.
10 MES-HIS PIC 99.
10 DIA-HIS PIC 99.
05 TEMPERATURA-HIS PIC 9(6)V99.
05 PESO-HIS PIC 9(6)V99.
05 USUARIO-HIS PIC X(35).
05 DATOS-HIS PIC X(5000).
Código COBOL:
MOVE POW-MULTITEXT8 OF CMText1 TO DATOS-HIS
Para impresión en COBVIEW
envias
Código COBOL:
01 RENGLON0.
02 FILLER PIC X(08) VALUE "<COL #1>".
02 GLOSA-S PIC X(2000).
PROCEDURE DIVISION.
move DATOS-HIS TO GLOSA-S
WRITE RENGLON0.