SELECT gen_id(GMGeneral,1) AS CODIGO
FROM RDB$DATABASE
Aumenta generador en uno
SELECT gen_id(GMGeneral,0) AS CODIGO
FROM RDB$DATABASE
Valor Generador
if DataSet.State = dsInsert Then
Begin
try
QueryCodigo.Open;
QClientesNum_Cliente.AsInteger := QueryCodigoCodigo.AsInteger;
finally
QueryCodigo.Close;
end;
end;