>Hi,
it is possible to add 1 to this code under,becuse i get error message
(data type missmatch).
i use it via inti at myform

thisform.text1.value=RIGHT(STR(YEAR(billinfo.billdate),4),2) + '_'+RIGHT(STR(10000+billinfo.billno,5),4)+1

thanks
m.qasem
>
>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.