como obtiene el ultimo id de una tabla
 

Ya se que existe el metodo last_insert_id() en mysql pero hay casos en que si falla una transaccion el valor no se restaura.
Por otro lado usa max(idticket) es erroneo porque se puede pisar el valor.
En mi caso tengo la tabla ticket ocn su cabecera y el detalle del ticket en otra tabla venta. Entonces necesito el ultimo id de ticket para la tabla venta que es varios a varios(en venta se guarda el idticket idproducto precio y cantidad).
Me han recomendado tener en el servidor de aplicaciones (ya que estoy trabajando con datasnap) un metodo con un query asociado a una tabla con un solo campo, que sume 1 a este entero y luego seleccione el valor, pero el tema es que tengo que tener un metodo como este para cada tabla.

Es decir la pregunta es como se hace para obtener el ultimo id de ticket a un habiendo transacciones simultaneas (es decir varios users insertando tickets a la vez). Se deberia bloquear el siguiente registro?

Si no he entendido mal, puedes valerte de un bucle al grabar.
En plan muy "rústico":

Código Delphi [-]
boolean ok = true
while ok
  ultimo = select max(id) from tabla
  try
    insert into otratabla values (ultimo, ... )
    ok = false
  except
  end
end

Es que de hecho hice una funcion que obtiene el ultimo id y le suma 1 antes de insertar en la tabla maestro...
Tambien estuve leyendo que FireBird no utiliza campos autoincrementales justamente por este motivo.. en vez de esto es un campo integer pero el valor lo genera el servidor de aplicaciones o el programa, no el motor de base de datos.

Que te parece tener una tabla con un solo campo:

ULTIMO(ultimoidticket)

entonces cada transaccion suma 1 y se queda con el valor.. de esta forma no se pisan los valores, y no hay que esperar a que una transaccion finalize para empezar la otra.

No entiendo, ¿quiéres un incremental, aunque se salten números? ¿o quieres un número consecutivo y que no se salte ninguno?

No entiendo porque la pregunta..
Es que si es un entero de 32 bits tiene millones de posiciones... osea con lo anterior se soluciona el problema de conecurrencia, si hay 2 o mas pc s haciendo ticket.. la verdad no interesa si se saltea un numero..
De hecho si una transaccion falla sobre un autoincremental y el ultimo idticket era 17, el 18 no se ocupa nunca mas.. si la proxima transaccion tiene exito sera el 19...
La funcion last_insert_id() retornara 18 para referenciar el ticket en la tabla detalleticket por lo tanto no sirve...
Y la funcion max(idticket) si falla el 18 la proxima vez sera 18, pero no sirve porque si 2 pc generan esa consulta.. ambos detalles de ticket corresponderan al mismo ticket.. porque devolvera 18 en ambos casos...

Porque no se entiende qué quieres exactamente.
Por lo que dices, lo que buscas en un id "normal y corriente", para eso están los generadores autoincrementales, nunca jamás se repiten. Lo que comentas de bloqueos y repetirse, etc. no ocurre con ellos.

Bueno es que a mi la funcion last_insert_id() me retorna 1.. no se porque.. y la vez pasada insertaba mal el idticket luego de que una transaccion hizo rollback..

Si no pones código o explicas en detalle cómo lo haces, solo podemos adivinar :)

Código Delphi [-]
procedure TServerMethods1.nuevoticket(numero,ids,idcliente:integer;importe,efectivo,vuelto:Double;fechae,horae  ,tipo:string);
var
tr:TDBXTransaction;
begin
       if (SUCURSAL.InTransaction) then
     raise Exception.Create('Hay una transacción pendiente');
     SUCURSAL.Open;
       try
          try
            tr:=SUCURSAL.BeginTransaction();

               begin
                with qticket do
                  begin
                    Close;


                    ParamByName('numero').AsInteger:=numero;
                    ParamByName('importe').AsFloat:=importe;
                    ParamByName('fechae').AsString:=fechae;
                    ParamByName('horae').AsString:=horae;
                    ParamByName('idsucursal').AsInteger:=ids;

                    ParamByName('idcliente').AsInteger:=idcliente;
                    ParamByName('tipo').AsString:=tipo;
                    ParamByName('efectivo').AsFloat:=efectivo;
                    ParamByName('vuelto').AsFloat:=vuelto;
                    ExecSQL();
                  end;

         SUCURSAL.CommitFreeAndNil(tr);
               end;

      except
        SUCURSAL.RollbackFreeAndNil(tr);
        end;
      finally
      SUCURSAL.Close;
       end;
end;

procedure TServerMethods1.nuevodetalleticket(idp:integer;cantidad,preciou:Double);
  var
  tr:TDBXTransaction;
  begin
      if (SUCURSAL.InTransaction) then
     raise Exception.Create('Hay una transacción pendiente');
     SUCURSAL.Open;
       try
          try
            tr:=SUCURSAL.BeginTransaction();
               quticket.Close;
               begin
                with qventa do
                  begin
                    Close;


                 //    ShowMessage(IntToStr(quticket.ExecSQL()));
                    ParamByName('idt').AsInteger:=quticket.ExecSQL();
                    ParamByName('idp').AsInteger:=idp;
                    ParamByName('cantidad').AsFloat:=cantidad;
                    ParamByName('preciou').AsFloat:=preciou;
                    ExecSQL();
                  end;

         SUCURSAL.CommitFreeAndNil(tr);
               end;

      except
        SUCURSAL.RollbackFreeAndNil(tr);
        end;
      finally
      SUCURSAL.Close;
       end;
end;

eso es en DataSnap

y dentro de quticket tengo last_insert_id(), como veras hice un showmessage... y veo un 1..

Se supone que está correcto, ¿no?

http://mysql.conclase.net/curso/?sqlfun=LAST_INSERT_ID

Claro me queda descubrir porque me da 1 el server, probe hacer 2 ticketts y devuelve 1.

Se pueden generar secuencias sin llamar a LAST_INSERT_ID(), pero al utilidad de usar la función de este modo es que el valor ID se mantiene en el servidor como el último valor generado automáticamente (seguro en multiusuario) aparte si tengo 2 sucursales son 2 conexiones distintas entonces no va a tomar el id insertado por otro: hay 17 y una conexion inserta 1 sera 18 pero la otra conexion no lo ve.

Pero yendo al grano: ¿cual seria la solucion correcta entonces(a ver si entiendo)? en lo que negrie arriba dice seguro en multiusuario: osea que es correcta la solucion que te plantie de tener los ids en una tabla aparte.

Perdona mi ignorancia..

Las ventajas de las secuencias (llamadas generadores en Firebird) es que no son transaccionales y es imposible que dos peticiones "Next Value" obtengan el mismo valor. Te recomiendo que tu aplicación cliente, justo al comenzar la captura de un registro, pida a una secuencia/generador de la base de datos su siguiente valor y lo asignes en ese momento desde la propia aplicación al nuevo registro en memoria. Eso te permitirá un mejor control de relaciones entre registros.

Incluso si el registro no termina siendo guardado, no hay problema, las llaves primarias (campos ID) no tienen por qué ser números consecutivos; para eso son otros campos: NUMERO/CLAVE/CODIGO, para los cuales sí puedes hacer Select Max y tener un índice con restricción unique para impedir que se asigne el mismo valor a una lista de datos que deben ir numerados de forma consecutiva.

Saludos.

Muchas gracias Al, la verdad uno aprende mucho en la practica.. queriendo hacer algo a lo grande como es el sistema de cliente servidor..jeje en mi ciudad todavia usan disco compartido..

¿Lo has solucionado?

Estoy en eso... voy a implementar un id no consecutivo osea no autoincremental... de seguro funcionara.. Gracias

hice lo siguiente y funciono:

Código Delphi [-]
function TServerMethods1.nuevoid:integer;
begin

  with quticket do
    begin
      SQL.Clear;
      SQL.Add('update identificadores set ticket=ticket+1');
      ExecSQL();
      SQL.Clear;
      SQL.Add('select ticket from identificadores');
      Open;
      result:=FieldByName('ticket').AsInteger;
    end;

end;

nunca falla..