Ver Mensaje Individual
  #2
Antiguo 27 de octubre de 2023, 10:51
Paulo
Forero Senior
Última Actividad 16.10.2026 14:05
Posts Posts: 101
Likes enviados Enviados: 25
Likes recibidos Recibidos: 33

Ás vezes só precisamos de tomar um café e repensar...
Já encontrei o erro.
Tem que copiar o ficheiro "COBF-INF.cbl" que está na pasta do Fujitsu Cobol para onde está o programa.

Código COBOL:
  1.  WORKING-STORAGE SECTION.
  2.  COPY COBF-INF.
  3.  
  4. PROCEDURE DIVISION
  5.  
  6.      MOVE LOW-VALUE    TO COBF-INF.
  7.      MOVE WFILENAME    TO COBF-INPUT-FILENAME.
  8.      MOVE WFILENAMEOUT TO COBF-OUTPUT-FILENAME.
  9.      CALL "COB_FILE_REORGANIZE" USING BY REFERENCE COBF-INF.

Saludos
Paulo is offline   Responder Con Cita