>How do you convert this kind of date format 01-AUG-99 to 07/01/1999?

Subtract a month?

Kidding aside... something like this:

lparameters tcDate
lnDay=val(getwordnum(tcDate,1,"-/."))
lnYear=val(getwordnum(tcDate,3,"-/."))
lnMonth=int(atc(getwordnum(tcDate,2,"-/."), " JAN FEB MAR APR MAY JUN JUL AUG SEP OCT NOV DEC")/4)+1
return date(lnyear, lnmonth, lnday)

...more or less. The month calculation may nead some tweaking before it works right.