1 respuesta en este tema

[Nikolas]

Hola, les dejo este SP que encontre, permite borrar una fila/s de cualquier tabla de nuestra base de datos.

Bastante util asi nos evitamos programar a lo loco.

php

SET TERM ^ ;
 
CREATE OR ALTER PROCEDURE BORRA_FILA (
    tabla varchar(32),
    condicion varchar(1024))
as
declare variable comando varchar(1024);
begin
   Comando = 'DELETE FROM ' || Tabla || IIF(CHAR_LENGTH(TRIM(Condicion)) > 0,
   ' WHERE ' || '' || Condicion || '', '');
 
   EXECUTE STATEMENT :Comando;
end^
 
SET TERM ; ^

asi se ejecuta:

 

 

          with modulo.borrar do
              begin
              close;
              sql.Clear;
              sql.Text:= 'EXECUTE PROCEDURE BORRA_FILA(:tabla,:condicion)';
              parambyname('tabla').AsString := 'COMPRASCOMPROBANTES';
              parambyname('condicion').AsString := 'id = '+dbgrid1.DataSource.DataSet.FieldByName('id').AsString;
              ExecSql;
              end;

 

 

¡Espero les sirva!

Editado por Nikolas, 26 mayo 2015 - 04:51 .

[cram]

Una vez oí la expresión SQL parser, por aquí, no recuerdo el hilo ni quien lo empezó.

Estas rutinas son cómodas y combiene hacerlas completas, es decir, no solo el DELETE.

Sé que lleva mucho trabajo, pero hay algunas empresas (conozco una) que tiene parsers para diferentes motores y lo eligen en un alto nivel, luego pasan parámetros a funciones, como tu ejemplo y lo hacen como si no utilizaran SQL.

Supongo que habrán detractores, como debe ser, pero un marco de trabajo bien hecho puede ahorrar tiempo.

 

Gracias,

Saludos.