在PL / SQL中用字符串中的ASCII代码替换每个字母

我认为您可能正在寻找这样的东西：

CREATE OR REPLACe FUNCTION FUBAR_STR(in_str VARCHAR2) RETURN VARCHAR2 AS  out_str VARCHAr2(4000) := '';BEGIN  FOR i IN 1..LENGTH(in_str) LOOP    out_str := out_str || TO_CHAr(ASCIi(SUBSTr(in_str,i,1)) - 55);  END LOOP;  RETURN out_str;END FUBAR_STR;

因此，当您运行时：

select fubar_str('abcd') from dual;

您会收到：42434445。

这是可逆的，更安全的一种。

CREATE OR REPLACe FUNCTION FUBAR_STR(in_str VARCHAR2) RETURN VARCHAR2 AS  out_str VARCHAr2(32676) := '';BEGIN  FOR i IN 1..LEAST(LENGTH(in_str),10892) LOOP    out_str := out_str || LPAd(TO_CHAr(ASCIi(SUBSTr(in_str,i,1)) - 55),3,'0');  END LOOP;  RETURN out_str;END FUBAR_STR;

因此，当您运行时：

select fubar_str('abcd') from dual;

您会得到：042043044045。

而且因为今晚我真的很无聊：

CREATE OR REPLACe FUNCTION UNFUBAR_STR(in_str VARCHAR2) RETURN VARCHAR2 AS  out_str VARCHAr2(10892) := '';BEGIN  FOR i IN 0..(((LENGTH(in_str) - MOD(LENGTH(in_str),3))/3) - 1) LOOP    out_str := out_str || CHR(TO_NUMBER(LTRIm(SUBSTr(in_str,(i * 3) + 1,3),'0')) + 55);  END LOOP;  RETURN out_str;END UNFUBAR_STR;

因此，当您运行时：

select unfubar_str('042043044045') from dual;

您得到：abcd。