lcMlist = "JAN FEB MAR APR MAY JUN JUL AUG SEP OCT NOV DEC"
lcStr = "06-2006"
? SUBSTR(lcMlist, (VAL(lcStr)-1)*4+1,3) + RIGHT(lcStr,5)

>
>Field1 has following character type data
>06-2006
>07-2007
>08-2008
>
>I want to fill Field2 with following data
>
>Jun - 2006
>Jul - 2007
>Aug - 2008
>
>May it is conversion of month to cmonth.
>
>Please help