Hi Frank,
Try this:
gcHomeDirectory = JUSTPATH(SYS(16,0))
SET DEFAULT TO (gcHomeDirectory)
gcAppName = GETFILE("EXE","","",0,"Select Application")
lcName = JUSTFNAME(gcAppName)
gcAppName = "'" + gcAppName + "'"
COPY FILE &gcAppName TO &lcName
Goodluck,
Adrian.