Ver Mensaje Individual
  #2
Antiguo 29 de octubre de 2022, 23:15
JCantero
El Foro es mi casa
Activista del Foro: Activista del Foro - Issue reason: Por participación activa Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Issue reason: Por muchos agradecimientos de parte de los Foreros 
Última Actividad 02.09.2026 00:15
Posts Posts: 442
Likes enviados Enviados: 167
Likes recibidos Recibidos: 269

@vortal, agrega el código como fuente de cobol (cbl) porque así es imposible ayudarte.

Hazlo asi
Código COBOL:
  1. IDENTIFICATION DIVISION.
  2. PROGRAM-ID. AGENCIA-DE-TOURS.
  3. ENVIRONMENT DIVISION.
  4. INPUT-OUTPUT SECTION.
  5. FILE-CONTROL.
  6. SELECT UNIDAD-TRANSPORTE
  7. ASSIGN TO "TRANSPT.DAT"
  8. ORGANIZATION IS INDEXED
  9. ACCESS MODE IS DYNAMIC
  10. RECORD KEY IS UNIDADTRANSPT-ID
  11. FILE STATUS IS ESTUNDTRAN.
  12.  
  13.  
  14. SELECT DE TOURS
  15. SELECT TOURS
  16. ASSIGN TO "TOURS.DAT"
  17. ORGANIZATION IS INDEXED
  18. ACCESS MODE IS DYNAMIC
  19. RECORD KEY IS

Lo mas seguro es que sea un problema de no respetar los margenes.
JCantero is offline   Responder Con Cita