[sara]

if ((modificar.Tag=0)and (controla=true)) then
begin
with query do begin
//tabla.Last;
sql.Clear;
SQL.Add('SELECT MAX(RIG) FROM VER_CABECERAS_AVI_SAT');
open;
rig:=Fields.Fields[0].AsInteger;
//showmessage(inttostr(rig));
sql.Clear;
SQL.Add('insert into ver_cabeceras_avi_sat ');
SQL.Add('(Rig,Fecha,num_serie,cliente,contacto,recepcionado,garantia,su_referencia,tarifa,serie,id_s ,averia,descripcion,observaciones)');
SQL.Add('values(');
sql.Add(inttostr(rig+1)+',');
SQL.Add(chr(39)+formatdatetime('dd.mm.yyyy',txtfecha.DateTime)+chr(39)+',');
SQL.Add(txtnumeroserie.Text+',');
SQL.Add(txtcliente.text+',');
SQL.Add(txtcontactos.Text+',');
sql.Add(txtrecepcionado.Text+',');
sql.Add(chr(39)+txtgarantia.Text+chr(39)+',');
sql.Add(chr(39)+txtsureferencia.Text+chr(39)+',');
sql.Add('2,');
sql.Add('UPPER('+chr(39)+txtserie.Text+chr(39)+'),');
sql.Add('1,');
sql.Add(chr(39)+averia.Text+chr(39)+',');
sql.Add(chr(39)+descripcion.text+chr(39)+',');
sql.Add(chr(39)+observaciones.Text+chr(39)+')');
showmessage(sql.Text);
open;
SQL.Add('commit;');
showmessage('Aviso guardado');
sql.Clear;

end;
Esto es un poco del codigo que tengo en grabar, la tabla en la que quiero ver los cambios es VER_CABECERAS_AVI_SAT y para esto utilizo:
IBDatabase:enlazado con la bd de marathon
IBTable:que conecta con la tabla: VER_CABECERAS_AVI_SAT
IBtransaction
IBQuery:con la que hago las consultas

Para el grid tengo un DataSource enlazado a otra query en la que selecciono los campos que quiero que se vean:
SELECT avi.rig,avi.fecha,avi.cliente,ter.nombre_comercial,avi.num_serie,avi.recepcionado,avi.garantia,avi.s u_referencia,avi.observaciones,avi.descripcion,avi.notas,avi.averia
FROM ver_cabeceras_avi_sat avi, sys_terceros ter
WHERE avi.cliente=ter.tercero;
Esta query a su vez esta enlazada con el IBTable y con IBTransaction
----------------------------------------------------------------------
Si quieres saber algo mas dimelo
es que soy novata en este lenguaje