zoukankan
html css js c++ java
Custom.pll : ZOOM小测试
目标:输入供应商id后,点击zoom按钮,弹出此供应商历史信息。
前期准备:一个forms name:HEK_PO_SPLHIS_TEST
1.启用ZOOM按钮
Code
1
function
zoom_available
return
boolean
is
2
3
form_name
varchar2
(
30
) :
=
name_in(
'
system.current_form
'
);
4
block_name
varchar2
(
30
) :
=
name_in(
'
system.cursor_block
'
);
5
6
begin
7
8
if
9
…
--
[code from previous exercises]
10
11
--
begin add by guozhenbin 2009-11-19
12
elsif (form_name
=
'
HEK_PO_SPLHIS_TEST
'
)
then
13
return
true;
14
--
end add by guozhenbin 2009-11-19
15
16
else
17
return
FALSE;
18
end
if
;
19
2.定义Zoom触发的事件
Code
1
procedure
event(event_name
varchar2
)
is
2
--
------BEGIN ADD BY GUOZHENBIN 2009-11-19
3
l_param_to_pass
number
;
4
--
------END ADD BY GUOZHENBIN 2009-11-19
5
begin
6
if
7
…
--
[code from previous exercises]
8
9
--
-------- begin add by guozhenbin 2009-11-19
10
elsif (event_name
=
'
ZOOM
'
)
then
11
if
(form_name
=
'
HEK_PO_SPLHIS_TEST
'
)
and
(block_name
=
'
HEK_PO_SPLHIS_TEST
'
)
then
12
l_param_to_pass :
=
name_in(
'
HEK_PO_SPLHIS_TEST.VENDOR_ID
'
);
13
14
if
l_param_to_pass
is
null
then
15
fnd_message.debug(
'
vendor id is not null!
'
);
16
elsif fnd_function.test(
'
HEK_PO_SPLHIS
'
)
and
l_param_to_pass
is
not
null
then
17
fnd_function.
execute
(function_name
=>
'
HEK_PO_SPLHIS
'
,
18
open_flag
=>
'
Y
'
,
19
session_flag
=>
'
Y
'
,
20
other_params
=>
'
P_VENDOR_ID =
'
||
l_param_to_pass);
21
else
22
fnd_message.debug(
'
function exception!
'
);
23
end
if
;
24
end
if
;
25
--
---------end add by guozhenbin 2009-11-19
26
end
;
查看全文
相关阅读:
利用模板实现c++智能指针
movit 相关函数(二)
moveit相关函数解释
ros常用函数(1)
Qtcreator中cin函数无法在application output中进行输入的问题的解决
c++速成,适合有c基础的朋友(3)
【重要通知】本博客不再更新,更多教程请访问 makermaker.cc
BBC micro:bit 学习资源汇总(最近更新2019年1月6日....)
[20个项目学会BBC micro:bit编程] 20-无线通信
[20个项目学会BBC micro:bit编程] 19-直流电机控制
原文地址:https://www.cnblogs.com/liuweicong39/p/2534731.html
最新文章
Asciiflow
eclipse ${user}和${date}
Eclipse快捷键
Exception testing
[Junit] 测试方法执行顺序
windows 中 Eclipse 打开当前文件所在文件夹
Guava
消息中间件的技术选型心得-RabbitMQ、ActiveMQ和ZeroMQ
Java Cache
使用Lingo增强JMS
热门文章
Lingo
Asynchronous calls and remote callbacks using Lingo Spring Remoting
Lingo (Spring Remoting) : Passing client credentials to the server
Java Something
Database Designer
Eclipse UML插件
c++ 解决人工智能mc(传教士野人)问题
matlab符号计算实现六自由度机器人运动学正解
c++实现智能指针(加注版,适合对智能指针有了解的朋友)
C++ Complex复数类的实现
Copyright © 2011-2022 走看看