at myform procedure activate

SELECT 1
SELECT MAX(BILLNO) FROM (mstr()) INTO ARRAY laArray

IF _TALLY > 0
  THISFORM.TEXT1.VALUE = laArray + 1
ENDIF