防止无主记录操作(Prevent Masterless Operations)

发现自己做的Form的bug：（有三个数据块，1头、2行、3子行）

操作：进入第二个数据块，按Ctrl + F11，可以查询出税票。

解决方法：

1.可以想办法禁用Ctrl + F11组合键，我还不知道怎么弄...

2.设置数据块1和数据块2的关系属性，属性中有一个是防止无主记录操作，选择为“是”，即解决此问题。

3.可以设置查询条件。

1)设置第二个数据块的pre-query:

 

 1 BEGIN
 2         IF :parameter.G_query_find = 'TRUE' THEN   --原有设置的where子句
 3             copy(:query_find.tax_receipt,'hek_ar_reciept_headers.tax_reciept_num');
 4             set_block_property('hek_ar_reciept_headers',DEFAULT_WHERE,' nvl(match_flag,''N'') = ''N'' ');
 5             :parameter.G_query_find := 'FALSE'; 
 6             --fnd_message.debug(get_block_property('hek_ar_reciept_headers',default_where)); 
 7         ELSIF :hek_ar_reciept_v.h_header_id is not null THEN  --如果有头记录，什么都不做
 8             NULL;
 9         else  --如果没有头记录或其他情况，不能查询此数据块
10             set_block_property('hek_ar_reciept_headers',DEFAULT_WHERE,' 1 <> 1 ');
11             --fnd_message.debug(get_block_property('hek_ar_reciept_headers',default_where)); 
12         END IF;
13 END;

 

 2)设置第三个数据块的pre-query:

 

 BEGIN
2     IF :hek_ar_reciept_headers.header_id is null then  --如果没有行记录，则不能查询
3         set_block_property('hek_ar_reciept_LINEs_V',DEFAULT_WHERE,' 1 <> 1 ');
4         --fnd_message.debug(get_block_property('hek_ar_reciept_LINEs_V',default_where)); 
5     end if;
6 end;