Error compilacion.
Publicado por dario (4 intervenciones) el 09/05/2022 06:09:26
Hola amigos coboleros tengo este codigo pero me sale error al compilar en la linea de FUNCTION LENGTH (compilo con rm/cobol85.)
Salu2.
Salu2.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
IDENTIFICATION DIVISION.
PROGRAM-ID. LONGITUD.
*
ENVIRONMENT DIVISION.
*
DATA DIVISION.
WORKING-STORAGE SECTION.
01 LONGITUD PIC 99.
01 TEXTO PIC X(36)
VALUE "Sistema de Control de Calificaciones".
*
PROCEDURE DIVISION.
PRINCIPAL.
MOVE FUNCTION LENGTH(TEXTO) TO LONGITUD.
DISPLAY "La longitud de la cadena es:" LONGITUD.
STOP RUN.
Valora esta pregunta


0