cmd="select MAX(vou_no)as max_sno from arrival" if sqlexec(con,cmd,'table1')<0 aerror(laerror) messagebox(laerror[1,2]) return.f. else select table1 thisform.text1.value=nvl(max_sno,0)+1 endifThese code work fine on every event but not on INIT of Form.