PDA

Ver la Versión Completa : [Compilador] RainCode COBOL - Error en Screen Section


dariodr
29 de abril de 2022, 08:00
Hola amigos, requiero su ayuda para solucionar esto.
Tengo un codigo COBOL algo simple, la cuestion es que cuando compilo (con RainCode COBOL) me aparecen errores en la SCREEN SECTION no se que puede estar pasando.
El error es este:
cobrc hola.cob
1:hola.cob
hola.cob:21:20:Error:Not resolved: LIMPIA-PANTALLA
hola.cob:24:20:Error:Not resolved: LIMPIA-PANTALLA

El codigo es este:

IDENTIFICATION DIVISION.
PROGRAM-ID. HOLA.
*
ENVIRONMENT DIVISION.
*
DATA DIVISION.
WORKING-STORAGE SECTION.
01 TABLA.
03 AGENDA OCCURS 5 TIMES.
05 NOMBRE PIC X(20).
05 APELLIDO PIC X(30).
05 DIRECCION PIC X(40).
01 CONTA PIC 9.
SCREEN SECTION.
01 LIMPIA-PANTALLA.
05 BLANK SCREEN.
*
PROCEDURE DIVISION.
PRINCIPAL.
MOVE 1 TO CONTA.
DISPLAY LIMPIA-PANTALLA.
PERFORM INGRESO-DATOS 5 TIMES.
MOVE 1 TO CONTA.
DISPLAY LIMPIA-PANTALLA.
PERFORM MUESTRA-DATOS 5 TIMES.
STOP RUN.

INGRESO-DATOS.
DISPLAY "Persona Nro " CONTA.
DISPLAY "Nombre: " NO ADVANCING.
ACCEPT NOMBRE(CONTA).
DISPLAY "Apellido: " NO ADVANCING.
ACCEPT APELLIDO(CONTA).
DISPLAY "Direccion: " NO ADVANCING.
ACCEPT DIRECCION(CONTA).
ADD 1 TO CONTA.
display " ".

MUESTRA-DATOS.
DISPLAY "Nombre: " NOMBRE(CONTA).
DISPLAY "Apellido: " APELLIDO(CONTA).
DISPLAY "Direccion: " DIRECCION(CONTA).
ADD 1 TO CONTA.

Kuk
29 de abril de 2022, 09:51
@dariodr, has mirado la documentación de RainCode? Puede que la sintaxis sea algo diferente en este compilador o incluso no acepte para nada la SCREEN SECTION.