>thanks boris your reply with sample, when i appling to my codes error:"nOt a character expraction"
>

>Select * From syllabus ,IIF(nmonth>3,0,1) as ttmonth Where  ;
>	lcode >=  ;
>	thisform.lcodefm.Value  ;
>	AND lcode <=  ;
>	thisform.lcodeto.Value  ;
>	 	  AND subject=thisform.codefm.value;
>		ORDER By nmonth,ttmonth Into  ;
>	CURSOR ptpaperr

Select *,;
       IIF(nmonth>3,0,1) as ttmonth;
From syllabus;
Where  lcode >= thisform.lcodefm.Value  ;
   AND lcode <= thisform.lcodeto.Value  ;
   AND subject=thisform.codefm.value;
ORDER By ttmonth, nmonth;
Into  CURSOR ptpaperr