Oracle 函数Blob_to_Clob,将数字转成日期,将字符串转换成数字

CREATE OR REPLACE FUNCTION blob_to_clob (blob_in IN BLOB)
RETURN CLOB
AS
     v_clob    CLOB;
     v_varchar VARCHAR2(32767);
     v_start      PLS_INTEGER := 1;
     v_buffer  PLS_INTEGER := 32767;
BEGIN
     DBMS_LOB.CREATETEMPORARY(v_clob, TRUE);

     FOR i IN 1..CEIL(DBMS_LOB.GETLENGTH(blob_in) / v_buffer)
     LOOP

        v_varchar := UTL_RAW.CAST_TO_VARCHAR2(DBMS_LOB.SUBSTR(blob_in, v_buffer, v_start));

           DBMS_LOB.WRITEAPPEND(v_clob, LENGTH(v_varchar), v_varchar);

          v_start := v_start + v_buffer;
     END LOOP;

   RETURN v_clob;

END blob_to_clob;
/

CREATE OR REPLACE FUNCTION IS_DATE(PARAMETER VARCHAR2) RETURN DATE IS
  VAL DATE;
BEGIN
  IF PARAMETER IS NULL
  THEN
    RETURN NULL;
  ELSE
    BEGIN
      VAL := TO_DATE(NVL(PARAMETER,
                         '