Nada mas para complementar:
LOCAL nom1,ruta1
nom1=ALLTRIM(Thisform.grid1.column1.texto1.value)
ruta1="C:\Mi_Carpeta\Archivos_pdf\"
IF FILE(ruta1+nom1+'.pdf')=.t.
WAIT "Abriendo PDF, Espere un momento" WINDOW NOWAIT
DECLARE INTEGER ShellExecute ;
IN SHELL32.DLL ;
INTEGER nWinHandle,;
STRING cOperation,;
STRING cFileName,;
STRING cParameters,;
STRING cDirectory,;
INTEGER nShowWindow
ShellExecute(0,"Open",ruta1+nom1+'.pdf',"","",1)
CLEAR DLLS ShellExecute
ELSE
MESSAGEBOX("El Archivo:" +nom1 +'.pdf'+SPACE(2)+"no existe en esta Pc, verifique",0+16,"Error")
ENDIF
***************************FIN
Suerte►