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
;
查看全文
相关阅读:
SQL 通配符
正则表达式
与运算(&)、或运算(|)、异或运算(^)、右移运算符(>>>)本质介绍
博客园博客目录自动生成(页面目录)
Linux查看并杀死被占用的端口
Eclipse的环境配置
L-Rui
Web页面弹出窗口代码大全
linux-用户
linux-网络
原文地址:https://www.cnblogs.com/liuweicong39/p/2534731.html
最新文章
【洛谷 3379】最近公共祖先
【洛谷 4287】双倍回文
【洛谷 3802】小魔女帕琪
【洛谷 2911】牛骨头
【洛谷 2850】虫洞
【洛谷 1220】关路灯
【11.8 测试】天空龙
【XJOI 训练1】友好数对
第十九章、Maven基础
第十八章、JDBC操作
热门文章
第十七章、GUI编程
第十六章、网络编程
第十五章、多线程
第十四章、IO流
第十三章、文件操作File类
JavaScript基础
CSS初识
HTML初始
HTTP 状态消息
LIKE 运算符
Copyright © 2011-2022 走看看