>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

It looks like cRes may be returning a logical value if cMes is not "nov02" or "oct02". INsert a line in the rep1.prg that says:

cRes = ''

before the do case