Oracle Forms：查询无后续数据时如何清除区块关联字段

问题分析 #

翻查至数据集末尾时，Form默认导航逻辑仅清空当前焦点区块的非关联字段，但关联字段因绑定了联动查询逻辑，未被触发清空，导致残留值。

具体解决方法 #

1. 在第二个区块的WHEN-NEW-RECORD-INSTANCE触发器中添加清空逻辑 #

判断当前是否为无数据的空记录状态，手动清除关联字段：

IF :SYSTEM.RECORD_STATUS = 'NEW' AND :BLOCK2.ASSOC_COLUMN IS NOT NULL THEN
  :BLOCK2.ASSOC_COLUMN := NULL;
END IF;

替换BLOCK2为你的第二个区块名称，ASSOC_COLUMN为两表的关联字段名。

2. 利用第一个区块的POST-BLOCK触发器联动清空 #

当离开第一个区块且已到数据末尾时，触发第二个区块的字段清空：

IF :SYSTEM.BLOCK_STATUS = 'QUERY' AND :SYSTEM.LAST_RECORD = 'TRUE' THEN
  GO_BLOCK('BLOCK2');
  :BLOCK2.ASSOC_COLUMN := NULL;
  GO_BLOCK('BLOCK1');
END IF;

3. 调整第二个区块的查询关联条件 #

在Form设计器中修改第二个区块的WHERE子句，让其关联逻辑在第一个区块无数据时自动失效：

BLOCK2.ASSOC_COLUMN = :BLOCK1.ASSOC_COLUMN OR :BLOCK1.ASSOC_COLUMN IS NULL

这样当第一个区块为空时，第二个区块查询结果为空，所有字段（包括关联字段）会被自动清空。

4. 在翻页事件中调用CLEAR_BLOCK强制清空 #

在WHEN-NEXT-RECORD触发器中检测到无后续记录时，强制清空第二个区块：

IF :SYSTEM.LAST_RECORD = 'TRUE' THEN
  CLEAR_BLOCK(NO_VALIDATE);
ELSE
  NEXT_RECORD;
END IF;

NO_VALIDATE参数会跳过字段验证，避免必填字段报错。

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