在 PL/SQL 中将 BASE64 转换为 BLOB

Question

我有这个功能

create or replace PACKAGE BODY UOM_UTIL_RENAMED AS
FUNCTION BASE64_TO_BLOB_(P_BASE64_CLOB CLOB)
RETURN BLOB IS
V_BLOB BLOB;
V_CHUNK_SIZE PLS_INTEGER := 24000;
V_CHUNK VARCHAR2(24000);
V_CHUNK CLOB;
BEGIN DBMS_LOB.CREATETEMPORARY(V_BLOB, FALSE, DBMS_LOB.CALL);
FOR V_I IN 0..TRUNC(
  (
    DBMS_LOB.GETLENGTH(P_BASE64_CLOB) -1
  ) / V_CHUNK_SIZE
) LOOP DBMS_LOB.APPEND(
  V_BLOB, 
  TO_BLOB(
    UTL_ENCODE.BASE64_DECODE(
      UTL_RAW.CAST_TO_RAW(
        DBMS_LOB.SUBSTR(
          P_BASE64_CLOB, V_CHUNK_SIZE, V_I * V_CHUNK_SIZE + 1
        )
      )
    )
  )
);
END LOOP;
RETURN V_BLOB;
END BASE64_TO_BLOB_;

但它不适用于长度超过 24000 的输入，即使我将其设置为接受块。

但我认为这不是问题，因为错误如下

*错误报告 - ORA-06502: PL/SQL: 数字或值错误 ORA-06512: 在第 1 行 06502. 00000 - “PL/SQL：数字或值错误%s” *原因：算术、数字、字符串、转换或约束错误 发生。例如，如果尝试执行以下操作，则会出现此错误 将值 NULL 赋给声明为 NOT NULL 的变量，或者如果 尝试将大于 99 的整数分配给变量 声明为 NUMBER(2)。 操作：更改数据、数据的操作方式或声明方式 该值不违反约束。

是不是说明这条线有问题 函数 BASE64_TO_BLOB_(P_BASE64_CLOB CLOB)

输入参数超过33000字符有问题吗？

Answer 1

我用的就是这个；看看是否有帮助。

FUNCTION base64decode (p_clob CLOB)
  RETURN BLOB
IS
  l_blob    BLOB;
  l_raw     RAW (32767);
  l_amt     NUMBER := 7700;
  l_offset  NUMBER := 1;
  l_temp    VARCHAR2 (32767);
BEGIN
  BEGIN
     DBMS_LOB.createtemporary (l_blob, FALSE, DBMS_LOB.CALL);

     LOOP
        DBMS_LOB.read (p_clob,
                       l_amt,
                       l_offset,
                       l_temp);
        l_offset := l_offset + l_amt;
        l_raw := UTL_ENCODE.base64_decode (UTL_RAW.cast_to_raw (l_temp));
        DBMS_LOB.append (l_blob, TO_BLOB (l_raw));
     END LOOP;
  EXCEPTION
     WHEN NO_DATA_FOUND
     THEN
        NULL;
  END;

  RETURN l_blob;
END;