... function BuscoPersona ( aParams ) *===================== LOCAL xDlg , oGet4:='' , oGet3:='' , lRet:=.T. , xSave:=.F. , Nombre:='' , Profe:='' , oSay , IdBien LOCAL cvar:=space(8) LOCAL cnue:=space(8) LOCAL AGRI , TPAS , TPER:=abro('TPERSONA',5) ...