如何在Oracle Apex中验证弹出式lov的数据是否已更改

时间:2018-12-11 10:12:26

标签: oracle plsql oracle-apex

当前,我正在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;

1 个答案:

答案 0 :(得分:1)

老实说,我要做的是以下事情:

  1. 已创建7个弹出LOV。打电话给他们,例如P1_POPUP_1,等等。
  2. 对于其中的每一个,创建一个名为P1_POPUP_1_ORIG的隐藏项,其中“源”为P1_POPUP_x项。
  3. 然后创建一个PL / SQL Expression类型的验证,表达式为:

: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  ...

在这里,我选择了'*'作为一个简单的字符串,我知道它永远不会显示为实际值,但是您可能希望选择更适合您期望值的内容。