首页 > 解决方案 > 将值插入记录类型表

问题描述

我正在创建一个过程,我想将多个值存储到记录类型的表中,我试图通过光标插入值,但我得到了这个错误:

错误(14,7):PL/SQL:语句被忽略

错误(14,12):PLS-00306:调用“+”时参数的数量或类型错误

错误(15,7):PL/SQL:语句被忽略

错误(15,12):PLS-00382:表达式类型错误

错误中提到的行是这两行:

n := n+1;
          ulaz(n) := bank_id_rec(tmp_row.bank_id);

create or replace PROCEDURE BULK_STATUS_JOB
    IS
      CURSOR tmp_cursor
      IS
        SELECT bank_id FROM mdm_tbank_customer;
      n INTEGER :=0;
      ulaz bank_id_tab;
      izlaz bank_service_status_tab;
      rec itf_return_rec;
    BEGIN
      OPEN tmp_cursor;
      LOOP
        FOR n in tmp_cursor LOOP
          n := n+1;
          ulaz(n) := bank_id_rec(tmp_row.bank_id);
       END LOOP;
        EXIT
      WHEN tmp_cursor%notfound;
      END LOOP;  
        rec := mdm_tbank_itf_sb.get_tbank_service_status_bulk(ulaz, izlaz);
        FOR i IN izlaz.first..izlaz.last
        LOOP
          DBMS_OUTPUT.PUT_LINE(ulaz(i).bank_id);
          DBMS_OUTPUT.PUT_LINE(izlaz(i).bank_id || ': '||izlaz(i).service_status);
        END LOOP;
    EXCEPTION
    WHEN OTHERS THEN
      dbms_output.put_line(SQLERRM);
      IF tmp_cursor%ISOPEN THEN
        CLOSE tmp_cursor;
      END IF;
    END BULK_STATUS_JOB;

标签: sqloracleplsql

解决方案


你有一个问题

FOR n in tmp_cursor LOOP
          n := n+1;

您为循环标识符和局部变量使用了相同的名称,但是当它在循环范围内使用时,n 代表 tmp_cursor。so n := n+1表示tmp_cursor := tmp_cursor + 1;哪个无效。

因此,请将标识符更改为其他名称(假设为 nn)并在整个循环中使用它,如下所示。

FOR nn in tmp_cursor LOOP -- nn represents loop identifier
              n := n+1; -- n represents your local variable declared by you

此外,还有一些其他似乎不必要的问题,请参阅以下最终代码中的注释

create or replace PROCEDURE BULK_STATUS_JOB
    IS
      CURSOR tmp_cursor
      IS
        SELECT bank_id FROM mdm_tbank_customer;
      n INTEGER :=0;
      ulaz bank_id_tab;
      izlaz bank_service_status_tab;
      rec itf_return_rec;
    BEGIN
      --OPEN tmp_cursor; -- not needed
      --LOOP -- not needed
        FOR nn in tmp_cursor LOOP -- changed loop variable name to nn
          n := n+1;
          ulaz(n) := bank_id_rec(nn.bank_id); --- used nn.bank_id
       END LOOP;
        --EXIT -- not needed
      --WHEN tmp_cursor%notfound; -- not needed
      --END LOOP;  -- not needed
        rec := mdm_tbank_itf_sb.get_tbank_service_status_bulk(ulaz, izlaz);
        FOR i IN izlaz.first..izlaz.last
        LOOP
          DBMS_OUTPUT.PUT_LINE(ulaz(i).bank_id);
          DBMS_OUTPUT.PUT_LINE(izlaz(i).bank_id || ': '||izlaz(i).service_status);
        END LOOP;
    EXCEPTION
    WHEN OTHERS THEN
      dbms_output.put_line(SQLERRM);
      IF tmp_cursor%ISOPEN THEN
        CLOSE tmp_cursor;
      END IF;
    END BULK_STATUS_JOB;

干杯!!


推荐阅读