当前,我正在Oracle Apex 5.0中创建一个应用程序。这样,页面之一包含7个popup lov
(或选择列表),其中包含一些默认值,这些默认值已从1个以上的schemas
的多个表中检索。
现在,我的任务是创建并应用验证,以检查popup lov
的至少一个数据是否已更改(无论是否所有更改),如果没有,则抛出错误。
我已经在包内创建了一个过程,并在包内引发了一个错误(我也创建了一个返回值boolean
的函数),但是它根本不起作用。
我还为每个popup lov
创建了隐藏项,以独立检查它们,但不起作用。
所以,我想也许是因为lov的返回值影响了我的数据。因此,我修改了我的程序包,但它也无法正常工作。
这是我的代码示例:
CREATE OR REPLACE package body KPC_CA is
function find_change ( t_per_id KPCPAY.EMP_INF.per_id%type,
shift1 KPCPAY.EMP_INF.shft1%type,
shift2 KPCPAY.EMP_INF.shft2%type,
shift3 KPCPAY.EMP_INF.shft3%type,
wklyoff KPCPAY.EMP_INF.wklyoff%type,
sup_name KPCPAY.EMP_INF.emp_name%type,
sup_token_no KPCPAY.EMP_INF.r_emp_no%type,
loc_desc KPCPAY.EMP_INF.loc_desc%type,
dept_name KPCPAY.EMP_INF.dept_name%type,
sbu KPCPAY.EMP_INF.sbu_id%type,
effective_date date
) return number as
t_shift1 KPCPAY.EMP_INF.shft1%type;
t_shift2 KPCPAY.EMP_INF.shft2%type;
t_shift3 KPCPAY.EMP_INF.shft3%type;
t_wklyoff KPCPAY.EMP_INF.wklyoff%type;
t_sup_name KPCPAY.EMP_INF.emp_name%type;
t_sup_token_no KPCPAY.EMP_INF.r_emp_no%type;
t_location KPCPAY.EMP_INF.loc_desc%type;
t_dept_name KPCPAY.EMP_INF.dept_name%type;
t_sbu KPCPAY.EMP_INF.sbu_id%type;
flag boolean := false;
begin
begin
select shft1, shft2, shft3, wklyoff, loc_desc, r_emp_no,
dept_name into t_shift1, t_shift2, t_shift3, t_wklyoff,
t_location, t_sup_token_no, t_dept_name
from KPCPAY.EMP_INF
where per_id = t_per_id;
select emp_name into t_sup_name
from KPCPAY.EMP_INF
where emp_no = (select r_emp_no
from KPCPAY.EMP_INF
where per_id = t_per_id);
SELECT distinct(decode ( SUBSTR(ORGANIZATION_CODE, 1, 1),
'1','CORP',
'2','ACD',
'3','TRM',
'4','ACR',
'5','RR',
'6','RRS'
)) "decode" into t_sbu
from apps.org_organization_definitions
where ORGANIZATION_ID= (select sbu_id
from kpcpay.emp_inf
where per_id = t_per_id);
end;
begin
if t_shift1 != shift1 then
flag := true;
end if;
if t_shift2 != shift2 then
flag := true;
end if;
if t_shift3 != shift3 then
flag := true;
end if;
if t_wklyoff != wklyoff then
flag := true;
end if;
if t_sup_token_no != sup_token_no then
flag := true;
end if;
if t_sup_name != sup_name then
flag := true;
end if;
if t_location != loc_desc then
flag := true;
end if;
if t_dept_name != dept_name then
flag := true;
end if;
if t_sbu != sbu then
flag := true;
end if;
end;
if flag = true then
return 1;
else
return 0;
-- or raise_application_error
end if;
end find_change;
end KPC_CA;
答案 0 :(得分:1)
老实说,我要做的是以下事情:
P1_POPUP_1
,等等。P1_POPUP_1_ORIG
的隐藏项,其中“源”为P1_POPUP_x
项。。
:P1_POPUP_1 != :P1_POPUP_1_ORIG AND :P1_POPUP_2 != :P1_POPUP_2_ORIG ...
只要您知道起始值和结束值都不为null,则此方法有效。如果需要处理空值,则表达式会有所变化。
对于每一项,您还可以更改为不同的验证,因此您知道用户没有更改哪一项。
这样,就不需要维护复杂的功能。
修改: 有多种处理空值的方法。在这种情况下,我通常会执行以下操作:
NVL( :P1_POPUP_1, '*' ) != NVL( :P1_POPUP_1_ORIG, '*' ) AND
NVL( :P1_POPUP_2, '*' ) != NVL( :P1_POPUP_2_ORIG, '*' ) AND ...
在这里,我选择了'*'作为一个简单的字符串,我知道它永远不会显示为实际值,但是您可能希望选择更适合您期望值的内容。