Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Informix » Verificar Existencia de un Archivo

Informix - Verificar Existencia de un Archivo

Volver
Nuevo Tema
<<>>
 
Vista:

Verificar Existencia de un Archivo

Publicado por Claudia Krings (2 intervenciones) el 26/10/2018 20:30:23
Saludos,


Necesito verificar si algunos archivos .zip existen en la ruta especificada, mediante un programa de informix 4gl .


Gracias de antemano
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 12
Ha mantenido su posición en Informix (en relación al último mes)
Gráfica de Informix

Verificar Existencia de un Archivo

Publicado por Favian (9 intervenciones) el 30/10/2018 18:19:26
Hola ...

Te comento que yo no he usado 4GL, pero te mando una solución que podrías aplicar usando un shell, una tabla y un procedimiento .. ya donde tu puedes hacer las adecuaciones según tus necesidades ...

Tabla: findZip

1
2
3
4
5
6
7
create table findZip
(
id varchar(20),
archivo varchar(200),
status varchar(2),
primary key (id)
);

Donde:
id: puede ser algún identificador; consecutivo o date yyyymmddhhmmss para identificar el proceso y posteriormente puedas consultar el resultado...
archivo: opcional donde guardes el archivo buscado
status: OK o NO segun el resultado.


Shell: findZip.sh
* Es un shell que recibira dos parametros
1: el ID
2: El archivo con su ruta ...
NOTA: Ya esto es de acuerdo a tus necesidades

1
2
3
4
5
6
7
8
9
10
11
12
if test `ls $2`
then
   dbaccess ejemplo <<!
        insert into findzip(id, archivo, status) values
         ("$1", "$2", "OK");
!
else
   dbaccess ejemplo <<!
        insert into findzip(id, archivo, status) values
         ("$1", "$2", "NO");
!
fi



Procedure: findZip

1
2
3
4
5
6
7
8
create procedure findzip (
                           id varchar(10),
                           archivo varchar(200)
                         )
 
  system 'sh /home/usuario/shell/findZip.sh ' || id || ' ' || archivo || '&';
 
end procedure;



Ejecucion

1
execute procedure findzip("20181030101544","/home/usuario/archivo/miarchivo.zip")

NOTA: El procedure hace el llamdo al shell y segun el resultado insertara en la table el status ... Ya posteriormente leeras la tabla haciendo referencia por medio del ID

Saludos y espero haber podido aydar.

Favian.-
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
2
Comentar

Verificar Existencia de un Archivo

Publicado por CKrings (2 intervenciones) el 30/10/2018 18:28:09
Muchísimas gracias !!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar