_Field表正在进行4GL数据库

Question

这个表中的字段是_field所属字段所属的表的信息.例如,假设_Field有一个_field-name ='XYZ'的记录,我该如何识别这个XYZ字段属于哪个表？

Answer 1

_file表的RecordID(RECID)存储在_filed表的字段中.

FOR EACH _file NO-LOCK, EACH _field NO-LOCK WHERE _field._file-recid = RECID(_file):

    DISPLAY _file._file-name _field._field-name.
END.

或者使用"OF"运算符在查询中使用主索引:

FOR EACH _file NO-LOCK, EACH _field NO-LOCK OF _file:

    DISPLAY _file._file-name _field._field-name.
END.