Ther's nothing in your code that would stop it execution at ENDIF. Add RETURN where applicable.

>endif command do not stops.
>
>

>mtxt_snot=thisform.text4.value
>IF EMPTY(mtxt_snot)
>=MESSAGEBOX("Please Write subscriber# in box")
>
>thisform.text4.setfocus 
>endif&& should be stop but stop
>
>
>SELECT * FROM registration WHERE mtxt_snot=sno ORDER BY sno INTO CURSOR hj98890op
>SELECT hj98890op
>IF RECCOUNT() =0
>=MESSAGEBOX("Record in not in list")
>
>RETURN 0
>ENDIF
>