Hola Alberto.
Lo ideal sería hacerte un procedimiento almacenado al efecto pero no conozco la sintáxis de SqlServer. Desde Delphi podrías hacer algo como:
Código Delphi
[-]
function TForm1.ProxNroComprobante: string;
begin
with TuQuery do
begin
Close;
SQL.Clear;
SQL.Add('SELECT NRO_COMPROBANTE FROM TABLA_SERIE'); Open;
Result:= 'A0100100101' +
StringOfChar('0', 8 - Length(FieldByName('NRO_COMPROBANTE').AsString)) +
IntToStr(FieldByName('NRO_COMPROBANTE').AsInteger + 1 );
Close;
end;
end;
Donde NRO_COMPROBANTE sería el campo de la tabla (TABLA_SERIE) de donde se tóma el número de comprobante fiscal.
Ejemplo de uso:
Código Delphi
[-]
NuevaFactura.AsString:= ProxNroComprobante;
Saludos.