[oracle] 데이터 좌/우 reverse 시키키

CREATE OR REPLACE FUNCTION EFRC.REVERSE_BIT
(
    S_OLD_HEXACHAR  IN   VARCHAR2   -- 입력값
) RETURN VARCHAR2 IS
   I                                  INT          := 0;
   CNT                            INT          := LENGTH(S_OLD_HEXACHAR);
   S_NEW_HEXACHAR      VARCHAR2(32) := '';
   S_TEMP                      VARCHAR2(32) := '';
BEGIN

    WHILE I < CNT LOOP
        
        S_NEW_HEXACHAR := SUBSTRB(S_OLD_HEXACHAR, I+1, 1) || S_NEW_HEXACHAR;
        I := I + 1;
       
    END LOOP;

    RETURN S_NEW_HEXACHAR;
 
EXCEPTION
 WHEN OTHERS THEN
        RETURN SQLERRM;
END REVERSE_BIT;
/