Hi Yossi,

IF RIGHT(SYS(16,1),4) = ".APP"
  QUIT
ELSE
  RETURN
ENDIF

Regards,
Armin

>Hi all:
>
>My client uses an .APP file that I have compiled from a PRG file. I do my testing on the PRG file.
>
>How do I code the following?:
>
>IF this is an APP file &&being used by the client
> QUIT
>ELSE &&testing, I don't want to be thrown out of VFP
> RETURN
>ENDIF
>
>Thanks for the help,
>
>Yossi