Kbase P5385: How to refresh data in a non-smart window from another objec
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  25/11/2003 |
|
Status: Unverified
GOAL:
How to refresh data in a non-smart window from another object?
FIX:
/*** another-object.w ***/
DEFINE VARIABLE vhWindow AS HANDLE NO-UNDO.
ON CHOOSE OF button-1
DO:
IF NOT VALID-HANDLE(vhWindow) THEN
RUN <non-smart windowname>.w PERSISTENT SET vhWindow.
ELSE
RUN refreshData IN vhWindow(ROWID(table-name)).
END.
/*** <non-smart windowname>.w ***/
PROCEDURE refreshData:
DEFINE INPUT PARAMETER prTableName AS ROWID NO-UNDO.
FIND table-name NO-LOCK WHERE ROWID(table-name) = prTableName NO-ERROR.
IF AVAILABLE table-name THEN
DISPLAY table-name-displayed-fields WITH FRAME default-frame.
END PROCEDURE.