码迷,mamicode.com
首页 > Windows程序 > 详细

Find Query Window的运作(手电筒)

时间:2014-06-27 14:53:02      阅读:343      评论:0      收藏:0      [点我收藏+]

标签:strong   代码   for   window   c   res   

Find Query Window的運作?(手电筒)

 

提示: 在點選 Toolbar的 Find鈕時,系統會觸發 Query_Find此 Trigger。

     執行 App_Find.Query_Find此 Procedure時,系統自動將 :Parameter.G_Query_Find設定為 TRUE。

 

步驟一、点击手电筒按钮,弹出查询窗口

在Query Block的QUERY_FIND Trigger (override) 写入以下代码:

App_Find.Query_Find( ‘<Result Window>’,’<Query Window>’,’<Query Block>’ );

--

app_find.query_find(‘XXWIP_WAFERLOT_V‘, ‘XXWAFER_FIND‘, ‘XXWAFER_FIND‘);

 

步驟二、指定被查询的Block,执行查询

在查询窗口Find Button的 WHEN-BUTTON-PRESSED Trigger中,寫入以下代码:

app_find.find(‘<Result Block>‘);

相当于 go_block(‘<Result Block>‘);  execute_query;

--

:parameter.G_query_find := ‘TRUE‘;

app_find.find(‘XXWIP_WAFERLOT_V‘);

:parameter.G_query_find := ‘FALSE‘;

 

步驟三、编辑查询条件

步驟 3、在 Result Block中的 PRE-QUERY此 Block Trigger (Before),程式碼如下:

if :Parameter.G_Query_Find = ‘TRUE’ then

<Result Block Item> := :<Query Block Item>;

:Parameter.G_Query_Find := ‘FALSE’;

end if;

--

if (:parameter.g_query_find = ‘TRUE‘) then

              if (:XXWAFER_FIND.CUSTOMER is not null) then

                :XXWIP_WAFERLOT_V.CUSTOMER := :XXWAFER_FIND.CUSTOMER;

              end if;

              ...

              :parameter.g_query_find := ‘FALSE‘;

end if;

 

Find Query Window的运作(手电筒),布布扣,bubuko.com

Find Query Window的运作(手电筒)

标签:strong   代码   for   window   c   res   

原文地址:http://www.cnblogs.com/bruce_zhao/p/3810250.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!