Resultados 1 al 9 de 9

Tema: Problemas con los *.SE/*.FD

  1. #1
      Junior
    S

    Registrado
    febrero de 2015
    Ubicación
    Esplugues De Llobregat (b
    Edad
    79
    Mensajes
    58
    Última visita
    25.11.2022

    Agradecimientos
     
    Recibidos
    15
    Enviados
    53

    Citaciones y menciones
     
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    9

    Exclamation Problemas con los *.SE/*.FD

    Nunca he tenido problemas con la definición de los File-Control / File, pero ultimamente, al compilar el programa "falla" porque según la compilación los valores declarados los declara como 'undefined' y no se me ocurre como puedo resolver éste problema. por lo que solicito ayuda del foro.

    He realizado diferentes pruebas, con el mismo resultado, los ficheros son los siguientes:

    COBOL Código:
    1.  FD  PTREGIO LABEL RECORD STANDARD.
    2.  01  REGPTRE.
    3.        02 PTRECOD  PIC X(5).  
    4.        02 PTRENOM  PIC X(25).
    5.        02 PTREPOB  PIC 9(8) OCCURS 3 TIMES.
    6.        02 PTRESUP  PIC 9(6).
    COBOL Código:
    1.      SELECT OPTIONAL PTREGIO
    2.               ASSIGN TO ARXIU-REGION
    3.      ORGANIZATION INDEXED ACCESS MODE IS DYNAMIC
    4.      RECORD KEY PTRECOD
    5.      LOCK MODE AUTOMATIC
    6.      FILE STATUS STAPTRE.

    Trabajo con PW9 en Windows10-64

    0 Not allowed!

  2. #2
      Administrador
    Avatar de Kuk

    Registrado
    enero de 2015
    Ubicación
    Madrid
    Edad
    37
    Mensajes
    2,087
    Última visita
    Hoy a las 10:24

    Agradecimientos
     
    Recibidos
    908
    Enviados
    784

    Citaciones y menciones
     
    Mentioned
    39 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    12 Post(s)
    Poder de Reputación
    10

    Predeterminado

    @Socavi, hola compañero.

    Pásanos el log completo de la compilación a ver

    0 Not allowed!
    ¿Te han ayudado? NO TE OLVIDES de darle al botón
    ¿Quieres dirigirte a alguien en tu post? Notifícale con una mención, tienes 2 opciones:
    1. Haciendo clic en el icono al lado de su nick
    2. Haciendo clic en el botón en el editor y escribiendo su nick.

  3. #3
      Junior
    S

    Registrado
    febrero de 2015
    Ubicación
    Esplugues De Llobregat (b
    Edad
    79
    Mensajes
    58
    Última visita
    25.11.2022

    Agradecimientos
     
    Recibidos
    15
    Enviados
    53

    Citaciones y menciones
     
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    9

    Predeterminado

    Buenas tardes Kuk,
    COBOL Código:
    1. ahora mísmo
    CODE Código:
    1. Create C:\Spain\Portugal\Debug\PTNUTS.cob...
    2. STATISTICS: HIGHEST SEVERITY CODE=I
    3.  
    4. Revise line information into C:\Spain\Portugal\Debug\PTNUTS.cob ...
    5. STATISTICS: HIGHEST SEVERITY CODE=I
    6.  
    7. Compile C:\Spain\Portugal\Debug\PTNUTS.cob...
    8. ** DIAGNOSTIC MESSAGE ** (PTNUTS)
    9. PTNUTS PTNUTS-Opened(15) :  JMN2503I-S  User word 'PTREGIO' is undefined.
    10. PTNUTS PTNUTS-Opened(15) :  JMN2557I-S  The format of the OPEN statement is incomplete.
    11. PTNUTS PTNUTS-Opened(16) :  JMN2503I-S  User word 'PTREGIO' is undefined.
    12. PTNUTS PTNUTS-Opened(16) :  JMN2557I-S  The format of the CLOSE statement is incomplete.
    13. PTNUTS PTNUTS-Opened(18) :  JMN2503I-S  User word 'PTREGIO' is undefined.
    14. PTNUTS PTNUTS-Opened(18) :  JMN2557I-S  The format of the OPEN statement is incomplete.
    15. PTNUTS PTRE-COD-Return(6) :  JMN2503I-S  User word 'PTRECOD' is undefined.
    16. PTNUTS PTRE-COD-Return(6) :  JMN2557I-S  The format of the MOVE statement is incomplete.
    17. PTNUTS PTRE-COD-Return(7) :  JMN2503I-S  User word 'PTREGIO' is undefined.
    18. PTNUTS PTRE-COD-Return(9) :  JMN2510I-S  'NOT INVALID KEY' does not correspond. 'NOT INVALID KEY' is ignored.
    19. PTNUTS Bo-Gravar(6) :  JMN2503I-S  User word 'PTREGIO' is undefined.
    20. PTNUTS Bo-Gravar(6) :  JMN2557I-S  The format of the CLOSE statement is incomplete.
    21. PTNUTS Bo-Gravar(6) :  JMN2503I-S  User word 'PTREGIO' is undefined.
    22. PTNUTS Bo-Gravar(6) :  JMN2557I-S  The format of the OPEN statement is incomplete.
    23. PTNUTS Bo-Gravar(10) :  JMN2503I-S  User word 'REGPTRE' is undefined.
    24. PTNUTS Bo-Gravar(13) :  JMN2510I-S  'END-WRITE' does not correspond. 'END-WRITE' is ignored.
    25. PTNUTS Bo-Gravar(14) :  JMN2503I-S  User word 'REGPTRE' is undefined.
    26. PTNUTS Bo-Gravar(18) :  JMN2510I-S  'END-REWRITE' does not correspond. 'END-REWRITE' is ignored.
    27. PTNUTS Bo-Gravar(19) :  JMN2503I-S  User word 'PTREGIO' is undefined.
    28. PTNUTS Bo-Gravar(23) :  JMN2510I-S  'END-DELETE' does not correspond. 'END-DELETE' is ignored.
    29. PTNUTS Bo-Gravar(27) :  JMN2503I-S  User word 'PTREGIO' is undefined.
    30. PTNUTS Bo-Gravar(27) :  JMN2557I-S  The format of the CLOSE statement is incomplete.
    31. PTNUTS Bo-Gravar(28) :  JMN2503I-S  User word 'PTREGIO' is undefined.
    32. PTNUTS Bo-Gravar(28) :  JMN2557I-S  The format of the OPEN statement is incomplete.
    33. PTNUTS Bo-Mostrar(6) :  JMN2503I-S  User word 'PTRECOD' is undefined.
    34. PTNUTS Bo-Mostrar(7) :  JMN2503I-S  User word 'PTRENOM' is undefined.
    35. PTNUTS Bo-Mostrar(8) :  JMN2503I-S  User word 'PTREPOB' is undefined.
    36. PTNUTS Bo-Mostrar(9) :  JMN2503I-S  User word 'PTREPOB' is undefined.
    37. PTNUTS Bo-Mostrar(10) :  JMN2503I-S  User word 'PTREPOB' is undefined.
    38. PTNUTS Bo-Mostrar(11) :  JMN2503I-S  User word 'PTRESUP' is undefined.
    39. STATISTICS: HIGHEST SEVERITY CODE=S, PROGRAM UNIT=1
    40.  
    41. ** The build has failed **

    0 Not allowed!

  4. #4
      Administrador
    Avatar de Kuk

    Registrado
    enero de 2015
    Ubicación
    Madrid
    Edad
    37
    Mensajes
    2,087
    Última visita
    Hoy a las 10:24

    Agradecimientos
     
    Recibidos
    908
    Enviados
    784

    Citaciones y menciones
     
    Mentioned
    39 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    12 Post(s)
    Poder de Reputación
    10

    Predeterminado

    @Socavi, has cambiado los nombres últimamente?

    Al hacer build del proyecto, se guarda cosas en una caché.

    Te sugiero que hagas un REBUILD ALL y no BUILD, o REBUILD para que recompile todo por completo. Me da que podría ser un fallo en esa caché, de la que hablaba. A veces pasa.

    A las malas, si falla lo anterior, suprime la carpeta Debug o Release (según la que tengas definida como directorio de salida) y vuelve a hacer REBUILD ALL

    0 Not allowed!
    ¿Te han ayudado? NO TE OLVIDES de darle al botón
    ¿Quieres dirigirte a alguien en tu post? Notifícale con una mención, tienes 2 opciones:
    1. Haciendo clic en el icono al lado de su nick
    2. Haciendo clic en el botón en el editor y escribiendo su nick.

  5. #5
      Super Moderador
    Avatar de Josber

    Registrado
    febrero de 2015
    Ubicación
    Alicante
    Mensajes
    691
    Última visita
    Hoy a las 10:20

    Agradecimientos
     
    Recibidos
    385
    Enviados
    314

    Citaciones y menciones
     
    Mentioned
    32 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    6 Post(s)
    Poder de Reputación
    35
    Activista del Foro / Point Value: 0 Agradecimientos / Point Value: 0

    Predeterminado
    2 members found this post helpful.

    Te está indicando que el fichero PTREGIO, no existe, aunque, parece que está bien definido, ¿No tendrás una variable con ese nombre definida en la WORKING, no?

    Por otro lado, puedes probar a añadirle a la sentencia FD, la cláusula GLOBAL, debería de quedarte así

    COBOL Código:
    1. FD  PTREGIO
    2.        GLOBAL
    3.        LABEL RECORD STANDARD.
    Un salu2.-

    0 Not allowed!

  6. #6
      Guardián del Foro
    Avatar de Fito

    Registrado
    febrero de 2015
    Ubicación
    Córdoba, Villa María
    Edad
    51
    Mensajes
    349
    Última visita
    Hoy a las 00:22

    Agradecimientos
     
    Recibidos
    184
    Enviados
    186

    Citaciones y menciones
     
    Mentioned
    16 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    24
    Agradecimientos / Point Value: 0 Guardián del Foro / Point Value: 0 Activista del Foro / Point Value: 0

    Predeterminado

    Holaaa:

    Estoy de acuerdo con Josber. Te falta la cláusula GLOBAL en la File Description.

    Saludos..

    Fito...

    0 Not allowed!

  7. #7
      Administrador
    Avatar de Kuk

    Registrado
    enero de 2015
    Ubicación
    Madrid
    Edad
    37
    Mensajes
    2,087
    Última visita
    Hoy a las 10:24

    Agradecimientos
     
    Recibidos
    908
    Enviados
    784

    Citaciones y menciones
     
    Mentioned
    39 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    12 Post(s)
    Poder de Reputación
    10

    Predeterminado

    Cita Iniciado por Josber Ver Mensaje
    No tendrás una variable con ese nombre definida en la WORKING
    En este caso diría que hay múltiples con el mismo nombre.


    Cita Iniciado por Josber Ver Mensaje
    probar a añadirle a la sentencia FD, la cláusula GLOBAL
    En esto estoy completamente de acuerdo. Posiblemente @Socavi haya movido el código a otro sitio, o usa la estructura en sitios nuevos. Lo que está claro es que le da errores en diferentes rutinas de eventos.

    0 Not allowed!
    ¿Te han ayudado? NO TE OLVIDES de darle al botón
    ¿Quieres dirigirte a alguien en tu post? Notifícale con una mención, tienes 2 opciones:
    1. Haciendo clic en el icono al lado de su nick
    2. Haciendo clic en el botón en el editor y escribiendo su nick.

  8. #8
      Junior
    S

    Registrado
    febrero de 2015
    Ubicación
    Esplugues De Llobregat (b
    Edad
    79
    Mensajes
    58
    Última visita
    25.11.2022

    Agradecimientos
     
    Recibidos
    15
    Enviados
    53

    Citaciones y menciones
     
    Mentioned
    2 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    0 Post(s)
    Poder de Reputación
    9

    Predeterminado

    Amigos muchas gracias por vuestra ayuda, a veces uno mira y mira, pero no ve, por la costumbre. Efectivamente el problema, la cláusula GLOBAL era la que no permitía la compilación habitual.

    Hoy podré dormir tranquilo, serán cosas de la edad, jajaja, sinceramente muchas gracias.

    0 Not allowed!

  9. #9
      Administrador
    Avatar de Kuk

    Registrado
    enero de 2015
    Ubicación
    Madrid
    Edad
    37
    Mensajes
    2,087
    Última visita
    Hoy a las 10:24

    Agradecimientos
     
    Recibidos
    908
    Enviados
    784

    Citaciones y menciones
     
    Mentioned
    39 Post(s)
    Tagged
    0 Thread(s)
    Quoted
    12 Post(s)
    Poder de Reputación
    10

    Predeterminado

    @Socavi, uno para todos, y todos para uno

    0 Not allowed!
    ¿Te han ayudado? NO TE OLVIDES de darle al botón
    ¿Quieres dirigirte a alguien en tu post? Notifícale con una mención, tienes 2 opciones:
    1. Haciendo clic en el icono al lado de su nick
    2. Haciendo clic en el botón en el editor y escribiendo su nick.

Información de Tema

Usuarios Viendo este Tema

Actualmente hay 1 usuarios viendo este tema. (0 miembros y 1 visitantes)

Temas Similares

  1. problemas con windows 10 a 64 bits
    Por Roger en el foro Sistemas operativos
    Respuestas: 12
    Último Mensaje: 26.07.2022, 03:07
  2. [Sintaxis] Problemas con archivo .chm
    Por Josber en el foro PowerCOBOL (ActiveX, v4 - v11)
    Respuestas: 3
    Último Mensaje: 12.10.2019, 23:04
  3. [Sintaxis] Problemas con Excel 2013
    Por Hrmcobol en el foro PowerCOBOL (ActiveX, v4 - v11)
    Respuestas: 11
    Último Mensaje: 19.01.2018, 21:53
  4. [Compilador] Problemas con ASCII extendido
    Por Fernandofc en el foro Visual Cobol
    Respuestas: 11
    Último Mensaje: 25.11.2016, 23:27
  5. [Compilador] Problemas con el DEBUG
    Por Josber en el foro PowerCOBOL (ActiveX, v4 - v11)
    Respuestas: 3
    Último Mensaje: 12.04.2015, 22:16

Marcadores

Marcadores

Permisos de Publicación

  • No puedes crear nuevos temas
  • No puedes responder temas
  • No puedes subir archivos adjuntos
  • No puedes editar tus mensajes
  •