Kbase P18912: How to walk through the fields of a frame?
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
2/6/2003 |
|
Status: Unverified
GOAL:
How to walk through the fields of a frame?
FACT(s) (Environment):
The following code will walk through all the fields in a frame having available only the frame handle:
DEF VAR hFrame AS HANDLE.
DEF VAR hField AS HANDLE.
hFrame = FRAME {&FRAME-NAME}:HANDLE.
hField = hFrame:FIRST-CHILD.
REPEAT WHILE( VALID-HANDLE( hField ) ):
IF hField:TYPE = "FIELD-GROUP" THEN
hField = hField:FIRST-CHILD.
MESSAGE hField:NAME hField:TYPE.
hField = hField:NEXT-SIBLING .
END.