Gracias Rui Pinto (Rapinto)
COBOL Foro
Foro dedicado a COBOL, a la Programación y a la Informática.
Retroceder   COBOL Foro > IDE-s y compiladores COBOL > Fujitsu COBOL > PowerCOBOL (ActiveX, v4 - v11)
PowerCOBOL (ActiveX, v4 - v11) Versiones del IDE basadas en ActiveX
Comunicados
Otros temas que te pueden interesar
Tema Autor Foro Respuestas Último post
[Sintaxis] Renombrar fichero con fecha dhitar JCL y utilidades 1 5 de marzo de 2019 20:16
Respuesta
 
Herramientas

  #1
Antiguo 25 de marzo de 2021, 11:04
IDENTIFICATION DIVISION
JuanJuan77
Novato Junior
ENVIRONMENT DIVISION
Avatar de JuanJuan77
DATA DIVISION
Forero desde (Registrado)octubre 2015
Argentina
Ubicación Empalme Villa Constitución
Última Actividad25.03.2021 13:30
PROCEDURE DIVISION
PostsPosts: 37
Ha dicho GraciasEnviado: 1
Ha recibido agradecimientosRecibido: 1
Mejores respuestasSoluiones: 0
ReputaciónReputación: 0
JuanJuan77 is on a distinguished road
Predeterminado Como renombrar archivo

hola, tengo un directorio con unas imagenes jpg, necesito saber si se puede desde powercobol renombrarlas según nuevo nombre que tengo en la base de datos

gracias
JuanJuan77 no ha iniciado sesión   Responder Con Cita
Mejores respuestas Soluciones: 1
  #2
Antiguo 25 de marzo de 2021, 12:35
IDENTIFICATION DIVISION
Josber
Super Moderador
Activista del Foro: Activista del Foro - Razón: Por aportar manuales y enriquecer   Agradecimientos: Por muchos agradecimientos de parte de los Foreros - Razón: Por muchos agradecimientos 
ENVIRONMENT DIVISION
Avatar de Josber
DATA DIVISION
Forero desde (Registrado)febrero 2015
Reino Unido
Ubicación Alicante
Última Actividad13.05.2021 12:00
PROCEDURE DIVISION
PostsPosts: 577
Ha dicho GraciasEnviado: 266
Ha recibido agradecimientosRecibido: 282
Mejores respuestasSoluiones: 37
ReputaciónReputación: 28
Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road Josber is on a distinguished road
Predeterminado
1 usuarios han marcado este post como "Solución"

A ver, extraído del manual que escribí y que subí al foro en Éste enlace

​ CBL_RENAME_FILE/CBL_RENAME_FILE2

Cambia el nombre de un fichero. Si el nuevo nombre ya existe, nos devolverá error. (-1).

Código COBOL:
  1.  DATA            DIVISION.
  2.  WORKING-STORAGE SECTION.
  3.  01  FICHERO            PIC X(255).
  4.  01  FICHERO2           PIC X(255).
  5.  01  ESTADO             PIC S9(4) COMP-5.
  6.  PROCEDURE       DIVISION.
  7. *
  8. * FICHERO = Nombre antiguo del fichero
  9. * FICHERO2 = Nombre nuevo del fichero
  10. * ESTADO = Código de retorno de la función:
  11. *            0  - Sin error
  12. *           -1  - Algún error
  13. *
  14.  INICIO.
  15.      MOVE SPACES TO FICHERO FICHERO2
  16.      MOVE "C:\Articulos\Datos\PRUEBA.TXT" & X"00" TO FICHERO.
  17.      MOVE "C:\Articulos\Datos\Nueva PRUEBA.TXT" & X"00" TO FICHERO2.
  18.      CALL "CBL_RENAME_FILE2"
  19.           USING FICHERO
  20.                 FICHERO2
  21.           RETURNING ESTADO
  22.      END-CALL.
  23. *
  24.      IF ESTADO NOT = 0
  25.         INVOKE POW-SELF "DisplayMessage"
  26.                USING "Error en la llamada a la rutina CBL..."
  27.                      ESTADO
  28.                      POW-DMICONERROR
  29.         END-INVOKE
  30.         INVOKE POW-SELF "CloseForm"
  31.         EXIT PROGRAM
  32.      END-IF.
  33. *

Ahí lo tienes, bájate el manual porque para utilizar esa función, has de incluir una librería y en él, indico como se hace.

En el manual, verás funciones y utilidades, para eso y mucho más

Un salu2.-
Josber 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 07:30.
Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2021, Jelsoft Enterprises Ltd.