create or replace procedure test_cjsql(in_sqlnr      in clob,
                                       in_bzhjsjkdms in varchar2,
                                       in_dxlxdm     in varchar2,
                                       out_code      in out varchar2,
                                       out_mess      in out varchar2) Authid Current_User IS
  /*???? ????sql?????? ???? ?? ????????????*/
  PRAGMA AUTONOMOUS_TRANSACTION; /*????????????????*/
  c_sqlnr  clob;
  V_SQLERR VARCHAR2(255);
  jb_err EXCEPTION;

BEGIN
  --c_sqlnr := replace(in_sqlnr, chr(10), chr(32)); /*????????*/
  --c_sqlnr := replace(c_sqlnr, chr(13), chr(32)); /*????????*/
  --c_sqlnr := trim(trailing ';' from c_sqlnr); /*????????????*/
  c_sqlnr := trim(trailing ';' from in_sqlnr); /*????????????*/

  BEGIN
    /*??????????????????????ddl????
      1????????????????
      2??????????????????????????????????????????????
    */
    /*mysql&&oracle*/
    /*if in_dxlxdm <> '03' or
       in_dxlxdm = '03' and
       (in_bzhjsjkdms is null or instr(in_bzhjsjkdms, 'SJBSHX001') > 0 or
       instr(in_bzhjsjkdms, 'YYZC001') > 0 or
       instr(in_bzhjsjkdms, 'YYZC002') > 0) then
        if instr(c_sqlnr,'mysql')>0 then--mysql只记录不执行
          null;
        else 
         EXECUTE IMMEDIATE c_sqlnr; --???????? 
        end if;              
    end if;*/
    /*oracle*/
    if in_dxlxdm <> '03'  or
       in_dxlxdm = '03'  and
       (in_bzhjsjkdms is null or instr(in_bzhjsjkdms, 'SJBSHX001') > 0 or
       instr(in_bzhjsjkdms, 'YYZC001') > 0 or
       instr(in_bzhjsjkdms, 'YYZC002') > 0) then
         EXECUTE IMMEDIATE c_sqlnr; --????????              
    end if;
    
  EXCEPTION
    WHEN OTHERS THEN
      /*?????????? ????*/
      V_SQLERR := SUBSTR(SQLERRM, 1, 255);
      out_code := '2';
      out_mess := substrb(V_SQLERR, 1, 1000);
      RAISE jb_err;
  END;
     
  /*????????  ????*/
  out_code := '1';
  out_mess := '执行成功!';
  commit;

EXCEPTION
  when jb_err then
    ROLLBACK; --????????
  when others then
    --????????
    V_SQLERR := SUBSTR(SQLERRM, 1, 255);
    out_code := '3';
    out_mess := V_SQLERR;
    ROLLBACK; --????????
END test_cjsql;
有人能告诉我这段代码是什么意思么   求大神指点