Kbase P185629: How to list the primary index for all tables?
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
4/8/2011 |
|
Status: Unverified
GOAL:
How to list the primary index for all tables?
GOAL:
How to use the 4GL to display the primary index of every table?
FACT(s) (Environment):
All Supported Operating Systems
Progress/OpenEdge Product Family
OpenEdge Category: Language (4GL/ABL)
FIX:
FOR EACH _file WHERE _file._file-number > 0 NO-LOCK.
FIND _index OF _file WHERE RECID(_index) = _file._prime-index NO-LOCK NO-ERROR.
IF AVAILABLE _index THEN
DISPLAY _file._file-name _index._index-name.
END.