Consultor Eletrônico



Kbase P103599: how to apply entry to an object from a function or a procedure?
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   16/10/2008
Status: Unverified

GOAL:

how to apply entry to an object from a function or a procedure?

GOAL:

How to get the handle of a FILL-IN?

FACT(s) (Environment):

Progress 8.x
Progress 9.x
OpenEdge 10.x

FIX:

1 - Pass the handle of the FILL-IN to the function or procedure:
IF FILL_IN-1:SCREEN-VALUE <> "OK" THEN verify = myfunc(FILL-IN-1:HANDLE,"FILL-IN-1 is not OK").
2 - Add the following code to the function "myfunc":
FUNCTION myfunc RETURNS LOGICAL
( p_objname as HANDLE,p_message as character ) :
APPLY "entry" TO p_objname.
RETURN FALSE. /* Function return value. */
END FUNCTION.