George,

Thanks for the suggestions.

I looked up the foxtouch() function and added it to the prg file below but I get an error message foxtouch.prg does not exist?

I'm using vfp6.0 and the documentation says you don't have to set library to with this version. Even with that added I still get an error.

Any ideas?

Jim

***MIXEDCOMBINE.PRG
SET SAFETY OFF
close all
clear all
set talk on
set exact off
use mixed order hip_no in 0
use ahorse in 0
select mixed
scan
mname = name
select ahorse
locate for name = trim(mname)
if ! found()
IF EOF()
LOOP
ENDIF
SKIP
loop
endif
store alltrim(name) to cname
store "c:\pedigrees\mixedcombined\pedigrees\" to cdestination
if ! file(cname)
wait 'not found'
else
***cname is the name of a word perfect document
***I tried this just to see if it would work
=FOXTOUCH( "cname", 1984, 2, 10, 13, 20, 6)
copy file (cname) to cdestination + (cname)
endif
endscan
close data
return