Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
  COBOL Foro > IDE-s y compiladores COBOL > COBOL - General
COBOL - General Discusiones de temática general sobre el lenguaje COBOL y todo lo relacionado con él.
Comunicados
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Sintaxis] Ayuda con libreria epson InterfaceEpsonNF.dll drvedia1981 PowerCOBOL (ActiveX, v4 - v11) 3 1 de febrero de 2022 12:34
[Información] Errores en la V10.1 Dasije PowerCOBOL (ActiveX, v4 - v11) 3 10 de agosto de 2016 20:14
[Noticia] Principiante en RMCobol SENBEI2019 RM/COBOL 1 12 de marzo de 2016 12:11
[Sintaxis] Ayuda para interactuar con base de Datos Breew PowerCOBOL (ActiveX, v4 - v11) 19 28 de enero de 2016 21:46
[Sintaxis] Ayuda con DISPLAYMESSAGE Juanes PowerCOBOL (ActiveX, v4 - v11) 3 5 de octubre de 2015 16:42
Respuesta
 
Herramientas

  #1
Antiguo 23 de enero de 2017, 20:49
IDENTIFICATION DIVISION
Hipromark
 Acabo de llegar...
ENVIRONMENT DIVISION
Avatar de Hipromark
DATA DIVISION
enero 2017
Caracas
51 años
23.01.2017 20:49
PROCEDURE DIVISION
Posts: 1
Enviado: 0
Recibido: 0
Soluciones: 0
Reputación: 0
Hipromark is an unknown quantity at this point
Bell Ayuda a principiante con unos errores

Hola. Estoy iniciándome en COBOL y estoy haciendo ejercicios de un libro "Sams Teach Yourself Cobol". Les solicito su ayuda con unos errores que me salieron.

Tengo instalado en Windows 7 el compilador OpenCobolIDE. Cuando compilo el programa que hice siguiendo las instrucciones del libro, me da estos errores:

Código:
PROGRAM-ID header missing.
PROCEDURE DIVISION Header missing.
syntax error, unexpected Exponentiation operator.
Todos en la línea 1 supuestamente, según marca el compilador.

El programa es este:

Código COBOL:
  1.        IDENTIFICATION DIVISION.
  2.        PROGRAM-ID.Chapt04a.
  3.        DATA DIVISION.
  4.        WORKING-STORAGE SECTION.
  5.        01 Dollar-Amount    Pic 9(5)v99 Value 12.99.
  6.        01 Item-Description Pic X(10) Value "Gold coins".
  7.        SCREEN SECTION.
  8.        01 My-Main-Screen Blank Screen,
  9.            Auto, Required,
  10.            Foreground-Color is 7,
  11.            BACKGROUND-COLOR is 1.
  12.            03 Line 1 Column 35 Value "Item Entry".
  13.            03 Line 3 Column 5 Value "Item Value" Highlight Bell.
  14.            03 Line 3 Column 16 Pic $$,$$$.99 From Dollar-Amount.
  15.            03 Line 5 Column 5 Value "Item Description" Highlight.
  16.            03 Line 5 Column 22 Pic x(10) From Item-Description.
  17.            03 Line 6 Column 4 Value "Short Description" Highlight.
  18.            03 Line 6 Column 22 Pic x(5) From Item-Description
  19.                                            Justified Right.
  20.        PROCEDURE DIVISION.
  21.        Chapt04a-Start.
  22.            Display My-Main-Screen.
  23.            STOP RUN.
  24.        END PROGRAM Chapt04a.

Gracias por su ayuda.
Hipromark no ha iniciado sesión   Responder Con Cita
  #2
Antiguo 23 de enero de 2017, 21:42
IDENTIFICATION DIVISION
Hrmcobol
 Guardián del Foro
Guardián del Foro: Guardián del espíritu y clima del Foro - Razón: Por implicación en la vida del Foro 
ENVIRONMENT DIVISION
Avatar de Hrmcobol
DATA DIVISION
febrero 2015
Puerto Madryn
70 años
01.03.2022 01:59
PROCEDURE DIVISION
Posts: 327
Enviado: 107
Recibido: 118
Soluciones: 10
Reputación: 19
Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light Hrmcobol is a glorious beacon of light
Predeterminado

Hola Amigo, me parece que te falta la ENVIRONMENT DIVISION.

Código COBOL:
  1. ENVIRONMENT DIVISION.
  2. DATA DIVISION.
  3. PROCEDURE DIVISION.
  4. END PROGRAM.
Hrmcobol no ha iniciado sesión   Responder Con Cita
  #3
Antiguo 24 de enero de 2017, 00:00
IDENTIFICATION DIVISION
Kuk
 Administrador
ENVIRONMENT DIVISION
Avatar de Kuk
DATA DIVISION
diciembre 2014
Madrid
37 años
29.06.2022 13:02
PROCEDURE DIVISION
Posts: 1.998
Enviado: 701
Recibido: 852
Soluciones: 100
Reputación: 10
Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road Kuk is on a distinguished road
Predeterminado

Hipromark,
  1. En modo de código fuente estándar de COBOL, toda sentencia debe comenzar a partir de la columna 8 y no la 7 como lo tienes tu. En la 7 poniendo * o / convierte la línea en comentario.
  2. "PROGRAM-ID." y "Chapt04a." como cualquier comando o sentencia en COBOL deben estar separados por al menos un espacio.

Hrmcobol, la ENVIRONMENT DIVISION no es obligatoria



NORMAS DEL FORO - para garantizar el buen funcionamiento del Foro.
¿Te han ayudado? NO TE OLVIDES de darle a
¿Quieres dirigirte a alguien en tu post? Notifícale haciendo clic en su Nick
Kuk no ha iniciado sesión   Responder Con Cita
  #4
Antiguo 4 de mayo de 2018, 18:26
IDENTIFICATION DIVISION
GabrielACE
 Junior
ENVIRONMENT DIVISION
Avatar de GabrielACE
DATA DIVISION
abril 2018
11.04.2019 13:16
PROCEDURE DIVISION
Posts: 32
Enviado: 0
Recibido: 4
Soluciones: 0
Reputación: 0
GabrielACE is an unknown quantity at this point
Predeterminado

pues a mi me compilo perfecto tal cual esta escrito en el post :p
GabrielACE no ha iniciado sesión   Responder Con Cita
Respuesta


Usuarios activos actualmente viendo este tema: 1 (0 miembros y 1 visitantes)
 
Herramientas

Derechos de Publicación
No puedes publicar nuevos temas
No puedes publicar posts/responder
No puedes adjuntar archivos
No puedes editar tus posts

BB code is habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado



La franja horaria es GMT +1. Ahora son las 13:24.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2022, Jelsoft Enterprises Ltd.