Consultor Eletrônico



Kbase 13734: Sample program to view contents of library
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   5/10/1998
Sample program to view contents of library

This sample procedure will show you how you can view the contents of
the Report Library.

DEF VAR rl AS CHAR.
DEF VAR rc AS INT.
DEF VAR rp AS CHAR VIEW-AS SELECTION-LIST INNER-LINES 10
INNER-CHARS 32.

FORM "Number of Reports" rc "Reports: select one: " SKIP
rp WITH FRAME x NO-LABELS.

RUN aderb/_getname.p ("c:\rb\reports.prl",OUTPUTT rl,
OUTPUT rc).

rp = ?.
rp:LIST-ITEMS = rl.
DISPLAY rc WITH FRAME x.
UPDATE rp WITH FRAME x.

Progress Software Technical Support Note # 13734