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 
  To: 'forum.help400' 
  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ás de NEWS/400.
  © 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ás de NEWS/400.
© 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