Hi,

once again I ask you PLEASE to turn auto quote on, it is a pain when I only see your last message, it means that I have to go back in the thread to see what you have written earlier. Under Message view setup select Enable auto quote. Please, please, please.....!

lcBillNo=thisform.text1.value && 04-0001 in this case, 0001-04 does not look logical to me, so I use 04-0001
lnYear=int(2000+val(left(lcBillNo,2)))
lnBillNo=int(val(substr(lcBillNo,4)))
select * from billdata where year(invdate)=lnYear and billno=lnBillNo into cursor curBilldata

Your billdata need an index tag on invdate and an index tag on billno.



>hi,
>but the customer want to insert bills numbers as what i ask before,
>
>and when he want to fetch for any bill he want do that as
>
>thisform.text1.value=0001-04.if found get all data etc..
>
>any idea,
>
>thanks.