Consultor Eletrônico



Kbase P62736: Dyn: How to always re-open the database query for a sdo afte
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   22/01/2004
Status: Unverified

GOAL:

How to always re-open the database query for a sdo after update or delete?

FACT(s) (Environment):

Dynamics 2.1A

FIX:

The following code (to be implemented in a procedure) called from updateRecord and deleteRecord has been reported to work fine to achieve this goal:
DEF VAR hDataSource AS HANDLE NO-UNDO.
DEF VAR cRowIdent AS CHARACTER NO-UNDO.

{get dataSource hDataSource}.
IF VALID-HANDLE(hDataSource) THEN
DO:
{get rowident cRowIdent hDataSource}.
IF cRowIdent > "" THEN
DO:
DYNAMIC-FUNCTION("closeQuery":U IN hDataSource).
DYNAMIC-FUNCTION("fetchRowident":U IN hDataSource,cRowident,'').
END.
END.