如何解决OpenEdge动态缓冲区查询的7328字段歧义错误？

问题原因 #

动态查询中直接使用表名（如_File、_Field）引用字段时，查询引擎无法区分你指向的是动态创建的缓冲区还是系统默认的静态缓冲区（系统表本身存在默认缓冲区），导致字段引用歧义，触发7328错误。静态查询能正常运行是因为静态上下文里表名直接对应默认缓冲区，不存在歧义。

解决方案 #

给动态创建的缓冲区指定唯一别名，在查询字符串中使用别名替代表名来引用字段，明确关联到你创建的动态缓冲区。

修改后的代码 #

DEFINE VARIABLE hFileBuffer AS WIDGET-HANDLE.
DEFINE VARIABLE hFieldBuffer AS WIDGET-HANDLE.

DEFINE VARIABLE cWhere AS CHARACTER.
DEFINE VARIABLE hQuery AS HANDLE.

-- 创建缓冲区时指定别名
CREATE BUFFER hFileBuffer FOR TABLE "_File" ALIAS "fileBuf".
CREATE BUFFER hFieldBuffer FOR TABLE "_Field" ALIAS "fieldBuf".

CREATE QUERY hQuery.
-- 一次性设置所有关联缓冲区
hQuery:SET-BUFFERS(hFileBuffer, hFieldBuffer).

-- 查询字符串中使用别名引用字段
cWhere = SUBSTITUTE(
   "FOR EACH fileBuf NO-LOCK, " +
   "    EACH fieldBuf " +
   "    WHERE fieldBuf.File-recid = fileBuf._File-recid " +
   "          NO-LOCK"
   ).

message cWhere.
pause.

hQuery:Query-PREPARE(cWhere).
hQuery:Query-OPEN().

-- 清理资源
DELETE OBJECT hQuery. 
DELETE OBJECT hFileBuffer.
DELETE OBJECT hFieldBuffer.

ASSIGN hQuery = ?
       hFileBuffer = ?
       hFieldBuffer = ?.

关键说明 #

• 创建动态缓冲区时通过ALIAS关键字指定别名，确保每个缓冲区有唯一标识；
• 查询字符串的FOR EACH子句和WHERE子句都使用别名引用字段，彻底消除歧义；
• 可以用SET-BUFFERS一次性传入所有关联缓冲区，替代分开调用SET-BUFFERS和ADD-BUFFER，代码更简洁。

内容的提问来源于stack exchange，提问作者Allan Green