Do not let any software impress you!

Only let it convince your intellect.
Slider img 1
Do not look for a business paradise!

It is a waste of time.
Slider img 2
Only yourself can push you uphill.

There is no easy road to prizes.
Slider img 3
Productivity is the name of the game.

And you have to conquer it.
Slider img 4
As long as you understand it,

you will start to build your know-how.
Slider img 5
We can help with that.

We have the tools and the method.
Slider img 6

How do we use Form_AfterStay



When you are in a form and click the button “save,” the form closes.
If you want your form to stay open after you save your data, you must use the procedure named Form_AfterStay.
See the example below.

lib

proc Form_AfterStay()
     f = TopForm()

     pnl = PByName(f;“CUSTOMER“)
     tbl = TByName(pnl;“CUSTOMER“)

     {you must clear the form’s fields }
     call TEdit(tbl)
     call TSetFld(tbl;“FIRST_NAME“““)
     call TSetFld(tbl;“LAST_NAME“““)
     call TSetFld(tbl;“ADDRESS“””)
     call TSetFld(tbl;“PHONE“““)
     call TSetFld(tbl;“CITY“““)
     call TPost(tbl)

    call ReLoadEditFields(f)
end