problema al llamar a la funcion en TURBO PASCAL

[fesero]

Buenas! haber si alguien me puede ayudar con este codigo...

yo tengo esta funcion

Código:

function fTitulo(titulo:string):integer;
	Begin
		gotoxy(Trunc((80/2)-(length(titulo)/2)),1);
		Write(titulo);
	end;

y asi la llamo

Código:

GotoXY(29,2);
g:= 'Menu de Herramientas';
fTitulo('yp');
Writeln('');

pero me tira el siguiente error

ERROR 122: Invalid variable reference

La llamada a la funcion esta por debajo de la declaracion de la funcion.

[fesero]

gracias a todas las ideas y ayudas que me dieron.. ¬¬

ya lo solucione.