Estimados estoy haciendo mis primeras armas con FB y Firedac.
Tengo un procedimiento para limpiar las tablas que voy generando ya que voy importando datos desde otra BD.
Mi script para limpiar las tablas es el siguiente.
Código Delphi
[-]
FDScript.SQLScripts.Clear;
FDScript.SQLScripts.Add.SQL.Add( 'Delete from Articulos;' );
FDScript.SQLScripts.Add.SQL.Add( 'Delete from Cabezal;' );
FDScript.SQLScripts.Add.SQL.Add( 'Delete from Proveedores;');
FDScript.SQLScripts.Add.SQL.Add( 'Delete from Stock;');
FDScript.ValidateAll;
FDScript.ExecuteAll;
FDConnection.Commit;
Antes lo hacia de esta manera por cada tabla y si me borraba los registros.
Código Delphi
[-]
FD_QueryFB.SQL.Text := 'Delete from Articulos';
FD_QueryFB.ExecSQL;
pero me parecia muy largo el procedimiento dato que voy a tener mas de 50 tablas.
El asunto es que no me borra los registros. De que manera podria ejecutar un script para ir borrando los registros de cada tabla y asi seguir probando la migracion ?
Gracias.