Kbase P156688: How to find what tables are in an area?
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
30/11/2009 |
|
Status: Unverified
GOAL:
How to find what tables are in an area?
GOAL:
ABL Code to find what tables are in an area?
FACT(s) (Environment):
Progress 9.x
OpenEdge 10.x
All Supported Operating Systems
FIX:
DEFINE VARIABLE myAreaNumber as INT NO-UNDO.
UPDATE myAreaNumber Label "What Area to list tables for?" format "99999".
for each _file where _file._file-num > 0 and _file._file-num < 32767 no-lock,
each _storageobject where _object-number = _file-number no-lock,
each _area of _storageobject where _storageobject._object-type = 1
and _area._area-num = myAreaNumber no-lock.
disp _file._file-name _storageobject._area-number.
end.