开源俱乐部

procedure

begin
  BEGIN   
    SELECT attribute5
           INTO l_list_name
    FROM   qp_list_headers_all
    WHERE list_header_id = p_list_header_id ;
  exception
    when others then
      raise targetListNameError;
  end;
exception

    WHEN targetListNameError THEN
      -- fnd_file.put_line(fnd_file.output , rpad(upload_list.item_number,20,' ')
      --                                      ||'Start date should later than the current latest effective start data of the target price list.');      --此信息输出到EBS平台中View Output中。fnd_file.log:  输出到Log中
      dbms_output.put_line('Target List is Null!');            --注意: 此信息用于输出到PL/SQL Developer控制台中。
END;