Versions Compared

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

* --------------------------------------------------------------------------------
* Handle the save button

...

* -------------------------------------------------------------------------------

...

Evtroutine Handling(#SAVE_BUTTON.Click)

...

* Call the Save method

...

Invoke Method(#Com_Owner.Save)

...

Endroutine

...

* --------------------------------------------------------------------------------
* Handle Save
* --------------------------------------------------------------------------------

...

Mthroutine Name(Save)

...

* Update data base

...

Invoke Method(#myscreen_wrapper.MakeRampAvailable) Foraction(UpdateDetails)

...

* If update completed okay

...

Endroutine

...

* --------------------------------------------------------------------------------
* Handle Termination
* --------------------------------------------------------------------------------

...

Mthroutine Name(uTerminate) Options(*REDEFINE)

...

* Clean up the colelction of fields on the panel

...

Invoke Method(#PanelFields.RemoveAll)

...

* Do any termination defined in the ancestor

...

Invoke Method(#Com_Ancestor.uTerminate)

...

Endroutine

...

End_Com

...