>>SELECT 1 >>SELECT MAX(billno) from mstr INTO ARRAY laAarray >>IF _TALLY > 0 >>thisform.text1.value=(RIGHT(STR(YEAR(DATE()),4),2) + '_'+RIGHT(STR(10000+laAarray+1,5),4))+1 >>ELSE >> THISFORM.TEXT1.VALUE = (RIGHT(STR(YEAR(DATE()),4),2) + '_'+RIGHT(STR(10000+laAarray+1,5),4)) >> ENDIF >>>>THANKS.
laAarray[number1[,number2,...]
>laAarray has one element>and you can write
>thisform.text1.value=(RIGHT(STR(YEAR(DATE()),4),2) + '_'+RIGHT(STR(10000+laAarray[1]+1,5),4))+"_1" >>- IF _TALLY = 0 that is while mstr.dbf hasn't records