Hola puedes hacerlo de esta forma:

El programa CL:

PGM                                                               
             RUNSQLSTM  SRCFILE(TEST/QDDSSRC) SRCMBR(DLTDUPREC0) +
                          COMMIT(*NONE) NAMING(*SQL)              
                                                                  
ENDPGM           

El mienbro fuente tipo TXT:

DELETE FROM Libreria.Archivo A                        
   WHERE EXISTS                                     
    (SELECT campo1,campo2,campo3 FROM Libreria.Archivo B
      WHERE B.campo1 = A.campo1                      
      AND   B.campo2 = A.campo2                      
      AND   B.campo3 = A.campo3)     

Espero te sirva.

Saludos !!!       

                                                           


From:  [EMAIL PROTECTED]
Reply-To:  [email protected]
To:  [email protected]
Subject:  SQL en CL
Date:  Mon, 26 Jun 2006 11:32:34 +0200


Puedo ejecutar una consulta SQL en un
CL.

Y como????


=======================================================
 La originalidad no esta en el "HECHO", esta en la"SOLUCIÓN"
       Cualquier cosa que gobierne tu vida te autodestruirá
 Sino dices lo que piensas es que no piensas  - M i  O
T a  O -
=======================================================
  .~.
 /V\   L   I   N   U   X
// \\ >Phear the Penguin<
/(   )\
^^-^^
Pon un Pinguino en TU VIDA.COM
Pere Soria
Dpto. de Informática
Telf.    +34 964343008
E-mail: [EMAIL PROTECTED]
http://www.recordrent.com
Record Rent a Car S.A.
(quitar nospam para responder)(remove nospam to reply me)

pero


Charla con tus amigos en línea mediante MSN Messenger: Haz clic aquí __________________________________________________ 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://coyote.combios.es/mailman/listinfo/forum.help400

Responder a