首页 > 解决方案 > WHEN-BUTTON-PRESSED 触发器引发未处理的异常 ORA-01407

问题描述

我是新手,PL SQL我正在尝试解决将数据从 .CVS 文件复制到数据库的问题,我创建了一个小型应用程序,它将从数据库中获取数据.CVS并将其传递到数据库。我创建了一个方法,但是在编译后它被编写成功编译但是当我运行表单时出现错误

WHEN-BUTTON-PRESSED trigger raise unhendled exception ORA-01407

有谁知道这意味着什么,因为我用谷歌搜索并找不到任何东西?我会非常感激

declare 
    import_file text_io.file_type; 
  import_file_name varchar2(1000);

  import_log_file text_io.file_type;
  import_log_file_name varchar2(1000);

  vec_importovano number;
  brojac number;
  brojac_redova number;
  linebuf varchar2(5000);

  p_rbr varchar2(4);
  p_polica varchar2(20);
  p_banka varchar2 (20);
  p_kontakt varchar2(20);

  kraj_fajla number;

begin
    import_file_name := :Global.Lokacija_prenosa||:import.naziv_fajla||:Global.Ekstenzija_prenosa;
    import_file := text_io.fopen(import_file_name,'r');
    --p_rbr := 100000;

    delete from zivot_trajni_nalog_ponude where banka is not null;
    commit;

    kraj_fajla := 0;  
    while kraj_fajla = 0 loop
        begin   
    text_io.get_line(import_file, linebuf);

     if brojac_redova>=2 then
         if length(linebuf)>100 then 

            p_rbr:=substr(linebuf, 1, instr(linebuf,';',1,1)-1);
            p_polica:=substr(linebuf, instr(linebuf,';',1,1)+1, instr(linebuf,';',1,2) - instr(linebuf,';',1,1)-1);
            p_banka:=substr(linebuf, instr(linebuf,';',1,2)+1, instr(linebuf,';',1,3) - instr(linebuf,';',1,2)-1);
            p_kontakt:=substr(linebuf, instr(linebuf,';',1,3)+1, instr(linebuf,';',1,4) - instr(linebuf,';',1,3)-1);

        select count(*) 
      into vec_importovano 
      from ZIVOT_TRAJNI_NALOG_PONUDE
      where broj_police=p_polica and p_rbr=redni_broj;

        if vec_importovano=0 then
        insert into ZIVOT_TRAJNI_NALOG_PONUDE values(p_rbr, p_polica, p_banka, p_kontakt);          
        commit;
         end if;
         end if;
     end if;

     EXCEPTION WHEN NO_DATA_FOUND THEN kraj_fajla := 1;
     end;

        end loop;  
        update zivot_trajni_nalog_ponude set redni_broj = p_rbr;
            commit;

    text_io.fclose(import_file);
        message('Zavrseno prepisivanje fajla');

end;

标签: oracleplsqlruntime-errororacleforms

解决方案


您收到的错误 ( ORA-01407) 表示您正在尝试使用值更新列(设置为NOT NULLNULL。那是行不通的。例如:

SQL> create table test (id number not null);

Table created.

SQL> insert into test (id) values (100);

1 row created.

SQL> update test set id = null;
update test set id = null
                *
ERROR at line 1:
ORA-01407: cannot update ("SCOTT"."TEST"."ID") to NULL


SQL>

UPDATE您的代码中唯一的是:

UPDATE zivot_trajni_nalog_ponude SET redni_broj = p_rbr;

显然,p_rbris NULLredni_broj不会接受它,你得到了错误。

该怎么办?调试你的代码,看看为什么p_rbr没有值。一个简单的“解决方案”可能是

   IF p_rbr IS NOT NULL
   THEN
      UPDATE zivot_trajni_nalog_ponude
         SET redni_broj = p_rbr;
   END IF;

此外,虽然与您的问题无关:不要COMMIT在循环中。


推荐阅读