Ver Mensaje Individual
  #1  
Antiguo 25-02-2011
webmasterplc webmasterplc is offline
Miembro
 
Registrado: mar 2008
Posts: 277
Reputación: 19
webmasterplc Va por buen camino
Numeracion de factura repetido

Buenas estoy generando un numero de orden lo hago consultando el ultimo registro de una tabla y le sumo uno, pero el problema es que a veces me repite el numero mas que todo cuando se hace una orden desde otra estación el sistema funciona en 10 maquinas. aca el codigo que uso para calcular el numero.
Código Delphi [-]
procedure Todespacho.BitBtn1Click(Sender: TObject);
        var
        AccExclusivo:Boolean;
        proximonumero:Integer;
        numero:Integer;
        tord:Real;
        tpart:Real;
   begin

    Data.sqcaval.Close;
         Data.sqcaval.SQL.Clear;
         Data.sqcaval.SQL.Add('SELECT idorden ');
     Data.sqcaval.SQL.Add('from cartaavaleulalia');
     Data.sqcaval.SQL.Add('ORDER BY idorden ASC');
     Data.sqcaval.Open;
         Data.sqcaval.Last;
         proximonumero:= Data.sqcaval.FieldByname('idorden').Value + 1;
         numero:=0;
Responder Con Cita