[DELPHI] - autoincrement

[cla80]

DBMS: Sybase Central

Funzione attuale per proporre in automatico il key value:

function GetAutoIncVal(aDbName,aTabName: string): integer;
begin
	result:=-1;
  try
     with TQuery.Create(nil) do
     begin
        DatabaseName:=ADbName;
        SQL.Text:='select Get_Identity('+QuotedStr(aTabName)+') as id';
        Active:=true;
        if not(IsEmpty) then
           result:=FieldByName('id').AsInteger;
        Free;
     end;
  except
	   result:=-1;
  end;
end;

Problema:

Supponiamo che sulla tabella dispongo di un solo campo con il precedente key value = 1, l'autoincrement mi da 47 - e cosi via.
ossia parte da 47.

Potete darmi una funzione collaudate e ottimale per ottenere l'autoincrement valido.

[alka]

Originariamente inviato da cla80
DBMS: Sybase Central

Purtroppo non lo conosco...

Originariamente inviato da cla80
Problema:
Supponiamo che sulla tabella dispongo di un solo campo con il precedente key value = 1, l'autoincrement mi da 47 - e cosi via.
ossia parte da 47.

Il problema è che vorresti la restituzione del valore "2" al posto di "47"?

Originariamente inviato da cla80
Potete darmi una funzione collaudate e ottimale per ottenere l'autoincrement valido.

Non so se ho compreso bene la problematica, ma perchè 47 non dovrebbe essere valido?

Ciao!