Cita:
|
Empezado por aladelta
al hacer en el evento afterpost del mdodataset un commitretainig y despues un last, funciona de muerte....ya que el registro que se esta insertando debe de estar al final de la lista ordenada...
|
Por favor, no abuses del commitretaining, tiene implicaciones con el desempeño de la base de datos. Es mejor hacer un commit completo siempre que se pueda.
Cita:
|
Empezado por aladelta
solo queda estudiar como hacer para que varios generadores se activen al crear un registro y todo desde delphi
|
No hay forma que yo conozca de que MDO lo maneje automáticamente, sin embargo podes hacer lo vos fácilmente:
Código Delphi
[-]
procedure TForm1.mdoquery1BeforePost(Sender: TDataSet);
begin
if MDOQuery1.state = dsInsert then
with TMDOQuery.Create(nil) do
try
Database := MDODatabase1;
SQL.Text := 'select gen_id(generador, 1) from rdb$database';
Open;
MDOQuery1Campo2.AsInteger := Fields[0].AsInteger;
finally
free;
end;
end;
La idea es esa...
Hasta luego.
