PL-SQL条件块

Question

我在插入if语句时遇到错误，即如果B列为NULL，我需要忽略特定行，因为某些数据是预期的并且处理下一个其他记录

CREATE OR REPLACE PROCEDURE Sample(
A       IN DATE,
B       IN VARCHAR2,
C       IN NUMBER,
D       IN NUMBER)
IS
A1      DATE;
B1      VARCHAR2(10);
C1      NUMBER(28,12);
D1      NUMBER(28,12);

BEGIN
A1      := A;
B1      := B;
C1      := C;
D1      := D;
INSERT
INTO Sample1 VALUES
(
  A1,
  B1,
  C1,
  D1
);
END;

Answer 1

假设如果B列为NULL，我需要忽略特定行，因为一些数据是预期的并且处理下一个其他记录

您可以使用以下方式。 检查B是否为空，然后仅插入记录。

 CREATE OR REPLACE PROCEDURE SAMPLE (
    a   IN   DATE
    ,b  IN   VARCHAR2
    ,c  IN   NUMBER
    ,d  IN   NUMBER
    )
    IS

  abc EXCEPTION;
  PRAGMA EXCEPTION_INIT(abc,-20001);

BEGIN
    IF b IS NOT NULL
    THEN
    INSERT INTO sample1
         VALUES (a
                ,b
                ,c
                ,d
                );
    ELSE
     Raise abc;
    END IF;
    commit;

   Exception
       ---If you want to show some user defined error you can raise here. 
       WHEN abc then 
        dbms_output.put_line('Ora:'||sqlcode||', B is Null.');

      When others then
      dbms_output.put_line('Error');           

  END;

Answer 2

当你说你想“忽略特定行”时，你的意思是对b为空的过程的任何调用？ 如果是这样，只需检查if条件：

create or replace procedure demo
    ( a in date
    , b in varchar2
    , c in number
    , d in number )
as
begin
    if b is null then
        your_logging_package.msg('Ignored insert request for a='||a||', b=null, c='||c||', d='||d);
    else
        insert into sample1 (col_a, col_b, col_c, col_d)
        values (a, b, c, d);
    end if;    
end demo;

否则（因为提到了异常处理），您可以尝试插入，如果失败则处理异常：

create or replace procedure demo
    ( a in date
    , b in varchar2
    , c in number
    , d in number )
as
    mandatory_value_missing exception;
    pragma exception_init(mandatory_value_missing, -1400);
begin
    insert into sample1 (col_a, col_b, col_c, col_d)
    values (a, b, c, d);
exception
    when mandatory_value_missing then
        if sqlerrm like '%"SAMPLE1"."COL_B"%' then
            your_logging_package.msg('Ignored insert request for a='||a||', b='||b||', c='||c||', d='||d);
        end if;    
end demo;

然而，

1. 如果您已经知道要跳过b为null的行，那么这可能过于复杂了
2. 您必须检查错误消息的文本以确保它仅适用于B列，如果这是您的业务规则，那么这有点乱。 （请记住，错误消息可能不是英文，具体取决于呼叫者的语言设置。）

Answer 3

我认为你可以使用更简单的insert子句（Yo甚至可以只使用insert而不是调用一个过程）：

CREATE OR REPLACE FUNCTION SAMPLE ( --I Changed from procedure to function to manage exceptions and it is useful if you want to monitor the job
                                   A   IN DATE,
                                   B   IN VARCHAR2,
                                   C   IN NUMBER,
                                   D   IN NUMBER
                                  )
   RETURN NUMBER
IS
BEGIN
   INSERT INTO AAA
      SELECT A, B, C, D
        FROM DUAL
       WHERE B IS NOT NULL;

   RETURN SQL%ROWCOUNT;--1 is for OK and 0 is when b is NULL
EXCEPTION
   WHEN OTHERS --it is only if you have problems in destination table(space, constraints & etc.)
   THEN
      RETURN -1;
END;