标签:操作 copy 导航 comm 复制 设置 nbsp 类信息 http
查考Oracle EBS客户化练习手册——p15:partD.实现查询
先打开APPSTAND.fmb
复制APPSTAND.fmb数据块中的QUERY-FIND到目标表单中
按照上一步操作将APPSTAND.fmb画布和窗口中的QUERY-FIND分别复制到目标表单中,按照你的命名方式重新命名,并分别继承对应的子类信息
修改目标表单中QUERY-FIND数据块下new项的触发器WHEN-BUTTON-PRESSED
修改目标表单中QUERY-FIND数据块下find项的触发器WHEN-BUTTON-PRESSED
修改新建的数据块(即复制的QUERY_FIND)的触发器KEY-NXTBLK
新建的数据块(即复制的QUERY_FIND)下面增加查询条件的项,用来存放查询条件的信息
此处可更改查询项的输入方式(LOV输入,日期输入)
在目标数据块中创建触发器PRE-QUERY,触发器代码如下(其执行模式为”BEFORE”)
IF :parameter.G_query_find = ‘TRUE‘ THEN
COPY(NAME_IN(‘DOC_QF.HEADER_ID‘ ),‘ORDER_HEADERS.HEADER_ID ‘ ) ;
APP_FIND.QUERY_RANGE( :DOC_QF.COMMIT_DATE_FROM, :DOC_QF.COMMIT_DATE_TO , ‘ORDER_HEADERS.ORDER_DATE ‘ ) ;
:parameter.G_query_find := ‘FALSE‘;
END IF;
在目标数据块中创建触发器QUERY-FIND(自己命名),触发器代码如下(其执行模式为” OVERRIDE”)
APP_FIND.QUERY_FIND( ‘MAIN‘ , ‘DOC_QF_WINDOW‘ , ‘DOC_QF‘ ) ;
给新建的数据库(复制的QUERY-FIND)设置前一导航数据块,前一导航数据块设置回被查询的数据库
标签:操作 copy 导航 comm 复制 设置 nbsp 类信息 http
原文地址:http://www.cnblogs.com/akami/p/6932606.html