hi all,

any idea,help

i need to fetch for the excell sheet name if found ,get show warning message(found). at this code under.
thanks

SET DEFAULT TO "\\cctfil01\hrd-spdata\SMD\Projects\Customer satisfaction Measurments\1214 Call Center Satisfaction\2005 1214 Servcie II\customer database\Treated data"
=MESSAGEBOX("Pl's Rename The Home Sheet  ")

gcDelimName = ALIAS( ) + '.xls'

gcDelimFile = PUTFILE('excel_file:', gcDelimName, 'xls')

IF EMPTY(gcDelimFile)  
   CANCEL

ENDIF

COPY TO (gcDelimFile) XLS
=MESSAGEBOX("DON")