在开发Form表单中的三种查询方法

1、使用:parameter.G_query_find参数；

IF (NAME_IN('PO_HEADERS.PO_HEADER_ID') IS NOT NULL) THEN
   :parameter.G_query_find := 'TRUE';
   app_find.find('CUX_PO_HEADERS_ADD_MESSAGE');
   go_block('CUX_PO_HEADERS_ADD_MESSAGE');
   :parameter.G_query_find := 'FALSE';
ELSE
   FND_MESSAGE.DEBUG('请先保存订单头');
END IF;

在CUX_PO_HEADERS_ADD_MESSAGE的PRE-BLOCK中处理
  copy(name_in('PO_HEADERS.PO_HEADER_ID'),'CUX_PO_HEADERS_ADD_MESSAGE.PO_HEADER_ID');

2、使用Default_where属性处理
declare
  lv_default varchar2(2000);
begin
  lv_default:='.....';
  go_block('CUX_PO_HEADERS_ADD_MESSAGE');
  set_block_property('CUX_PO_HEADERS_ADD_MESSAGE',DEFAULT_WHERE,lv_default);
  execute_query;
end;

3、使用app_find.query_range()来处理：
begin
   ....
   app_find.query_range(:find_date_from,
                        :find_date_to,
                        'CUX_PO_HEADERS_ADD_MESSAGE.REATE_DATE');
   :parameter.Q_query_find:='false';
end;

本文来自CSDN博客，转载请标明出处：http://blog.csdn.net/long_li/archive/2005/11/17/531307.aspx