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