Ok, lo probare tambien, gracias

 

 

Saludos 

Paco Medina

Dtor.Informatica

 

 

Exclusivas Camacho, S. Ltd.

Av. J. Ortega y Gasset, 301 (Pol. San Luis)

29006   Málaga, España

Tel.    +34 952 322 900

Fax    +34 952 314 900

www.e-camacho.com

[EMAIL PROTECTED] 

Este mensaje se dirige exclusivamente a su destinatario y puede contener
información privilegiada o confidencial. Si no es vd. el destinatario
indicado, queda notificado de que la utilización, divulgación y/o copia sin
autorización está prohibida en virtud de la legislación vigente. Si ha
recibido este mensaje por error, le rogamos que nos lo comunique
inmediatamente por esta misma vía y proceda a su destrucción. Gracias.

This message is intended exclusively for its addressee and may contain
information that is CONFIDENTIAL and protected by professional privilege. If
you are not the intended recipient you are hereby notified that any
dissemination, copy or disclosure of this communication is strictly
prohibited by law. If this message has been received in error, please
immediately notify us via e-mail and delete it. Thank you.

  _____  

De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] En nombre de Francisco
Rubio Enríquez
Enviado el: sábado, 12 de enero de 2008 21:39
Para: forum.help400
Asunto: Re: ejecucion sql en cls

 

Hola:

 

aparte de lo que te dice Javier Mora, puedes utilizar el mandato STRQMQRY
para ejecutar una/s sentencia/s SQL que previamente has introducido en un
miembreo QMQRY tipo SQL. a través del STRQM.

 

QSQFDE  y QSQFHA son los nombres que deben usar como variables en el miembro
SQL del STRQM. (en este caso estos dos campos son fechas, pero se pueden
parametrizar cualquier parte de una sentencia SQL).

 

Luego los parámetros se ponen en el miembro fuente con el "churrito" (&) y
se ha referencia a ellos con el parámetro SETVAR del mandato STRQMQRY.

 

STRQMQRY QMQRY(NOMBRE) OUTPUT(*OUTFILE) OUTFILE(BIBLIOTECA/FICHERO)
SETVAR((QSQFDE &FDE12) (QSQFHA &FHA12)))

Yo por lo menos, utilizo este sistema para UPDATE, DELETE, INSERT, ...

 

Espero que te valga,

Saludos,

 

Francisco Rubio Enríquez

Analista

Cibernos Consulting, SAU

----- Original Message ----- 

From: Paco <mailto:[EMAIL PROTECTED]>  

To: 'forum.help400' <mailto:[email protected]>  

Sent: Friday, January 11, 2008 5:24 PM

Subject: ejecucion sql en cls

 

Hola compañeros, 

 

Teneis algun ejemplo para ejecutar unas sentencias sql en un cl con
parámetros incluidos

Ejemplo para ejecutar algo asi:

 

Quisiera sustituir esto FERIA0108 por un parm.

 

 delete from sifvbd/fart00f where farusr='FERIA0108'      

 1272 filas suprimidas de FART00F en SIFVBD.              

 delete from sifvbd/FOTO00f where FOTUSR='FERIA0108'      

 1152 filas suprimidas de FOTO00F en SIFVBD.              

 delete from sifvbd/FREP00f where FREUSR='FERIA0108'      

 1226 filas suprimidas de FREP00F en SIFVBD.              

 

Gracias de antemano.

 

Saludos 

Paco Medina

Dtor.Informatica

 

 

Exclusivas Camacho, S. Ltd.

Av. J. Ortega y Gasset, 301 (Pol. San Luis)

29006   Málaga, España

Tel.    +34 952 322 900

Fax    +34 952 314 900

www.e-camacho.com

[EMAIL PROTECTED] 

Este mensaje se dirige exclusivamente a su destinatario y puede contener
información privilegiada o confidencial. Si no es vd. el destinatario
indicado, queda notificado de que la utilización, divulgación y/o copia sin
autorización está prohibida en virtud de la legislación vigente. Si ha
recibido este mensaje por error, le rogamos que nos lo comunique
inmediatamente por esta misma vía y proceda a su destrucción. Gracias.

This message is intended exclusively for its addressee and may contain
information that is CONFIDENTIAL and protected by professional privilege. If
you are not the intended recipient you are hereby notified that any
dissemination, copy or disclosure of this communication is strictly
prohibited by law. If this message has been received in error, please
immediately notify us via e-mail and delete it. Thank you.

 


  _____  


__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
&amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400 


  _____  


No virus found in this incoming message.
Checked by AVG Free Edition. 
Version: 7.5.516 / Virus Database: 269.19.2/1221 - Release Date: 12/01/2008
14:04

__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
&amp;#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400

Responder a