` Printed Icetips Article

Icetips Article



Par2: Passing parameters to forms using standard templates
1998-09-18 -- Viggo Kleven
 
You should find reference to the updateproc in the ThisWindow.run method of
the browse window.  Just skip the original code by OMIT() and add your own
code for calling the update:

ThisWindow.Run PROCEDURE(USHORT Number,BYTE Request)
ReturnValue          BYTE,AUTO
! Start of "WindowManager Method Data Section"
! [Priority 5000]
! End of "WindowManager Method Data Section"
  CODE
  ! Start of "WindowManager Method Executable Code Section"
  ! [Priority 2500]
  ReturnValue = PARENT.Run(Number,Request)
  ! [Priority 6000]
  OMIT('***')  ! Skip the original code
  GlobalRequest = Request
  UpdateSITE
  ReturnValue = GlobalResponse
  ! [Priority 8500]
  !***  Here comes the new code to call the update with parameters..
  GlobalRequest = Request
  UpdateSITE (parameters)
  ReturnValue = GlobalResponse
  ! End of "WindowManager Method Executable Code Section"
  RETURN ReturnValue



Printed May 10, 2024, 3:52 am
This article has been viewed/printed 35120 times.