es bien cierto q si dejas de programar te olvidas las cosas
ya esta solucionado
quiza a alguien le pueda servir
todo esta en la declaracion del procedimiento debio ser asi
Código Delphi
[-]Function BuscarNumeroFactura (TipoDoc : string; Serie:string; VAR Documento :String ) :string;
gracias de todas maneras