Buffer Handle – Progress 4gl

30Nov08

Exemplo simples de utilizacao do Buffer Handle.

DEFINE VARIABLE bhandle AS HANDLE.
DEFINE VARIABLE icont   AS INT.

CREATE BUFFER bhandle FOR TABLE “isofitrib”.

DO icont = 1 To bhandle:Num-fields:
…MESSAGE bhandle:Buffer-field(icont):NAME VIEW-AS ALERT-BOX.
END.

vlw

Filed under: Progress   |  Leave a Comment
Tags: 4gl, buffer, Buffer-field, Codigo, exemplo, handle, Num-fields, Progress