Select Left(AllT(dwgno),6) As dwgno From relhist WHere reldate = CTOD("04/16/04") InTo Cursor myRelDwg Order By dwgnointo
ldDate=CTOD("04/16/04") Select Left(AllT(dwgno),6) As dwgno From relhist WHere reldate = ldDate InTo Cursor myRelDwg Order By dwgnoWithout this change, the server must evaluate CTOD("04/16/04") for every record!