>lnSticket = Val(SubStr(csrMyCursor.sticket, 4)) >lnEticket = Val(SubStr(csrMyCursor.eticket, 4)) >replace noofticket with lnSticket-lnEticket >