at myform procedure activate SELECT 1 SELECT MAX(BILLNO) FROM (mstr()) INTO ARRAY laArray IF _TALLY > 0 THISFORM.TEXT1.VALUE = laArray + 1 ENDIF