Your return value is numeric not character
That may not be your intent
>i am using these codes(by fabian) call with reply prg. But i always face data type mismatch. i set nmonth vlaue numaric.
>SELECT test1
>scan
>c3 = ALLTRIM(LEFT(examcode ,3))
>DO rep1 WITH c3
>replace nmonth WITH cRes
>ENDSCAN
>Where rep1.prg would be:
>
>
>PARAMETERS cMes
>PUBLIC cRes
>DO case
>CASE cMes = "nov02"
>cRes = 11
>CASE cMes = "Oct02"
>cRes = 10
>ENDCASE
>RETURN cRes
>
>what is my mistake
Edgar L. Bolton, B.S. B.B.A.