时间戳

首页 > 解决方案 > 在 RPGLE 程序中使用 SYSTOOLS.BASE64DECODE 时出现问题

base64 - 在 RPGLE 程序中使用 SYSTOOLS.BASE64DECODE 时出现问题

问题描述

我正在尝试使用 SYSTOOLS.BASE64DECODE 函数解码 SQLRPGLE 中的 base64 字符串。结果是一个空白字符串。base64 字符串也有 CRLF 字符。当我从 base64 字符串中省略 CRLF 时，解码工作正常。看起来与字符集有关。任何帮助表示赞赏

示例 base64 字符串： XlhBCl5GWCoqKioqKipBUEMgTG9nbyoqKioqKioqXkZTCl5GTzU4MCw

SQLRPGLE

Dcl-S VarcharField1 Varchar(4096) ;                          
Dcl-S VarcharField2 varchar(13096) inz(' ') ccsid(819);  
    
VarcharField1 = 'XlhBCl5GWCoqKioqKipBU';                     
                                                             
EXEC SQL SET :VarcharField2 =                                
              SYSTOOLS.BASE64DECODE(:VarcharField1);         
                             
*InLr = *On;

标签： base64ibm-midrangerpgle

解决方案

SQLSTATE在 RPG 中检查或SQLCODE运行 SQL 语句之后总是一个好主意。

如果您这样做了，您会看到，
SQLSTATE==38000-->Java™ 例程已退出并出现异常。

查看工作日志，还有更多信息

Java stored procedure or user-defined function SYSTOOLS.BASE64DECODE,   
  specific name BASE600002 aborted with an exception "incomplete base64 
  string: XlhBCl5GWCoqKioqKipBU".

我记得，base64 编码的字符串应该是 4 的倍数，必要时必须用 '=' 填充。

但是，您给出的字符串长度为 21 个字符，这意味着 3 个无效的填充字符，您永远不需要超过 2 个。

如果您填充完整的字符串，而不是子字符串，它应该可以工作。

VarcharField1 = 'XlhBCl5GWCoqKioqKipBUEMgTG9nbyoqKioqKioqXkZTCl5GTzU4MCw=';

编辑
好它工作，因为没有抛出异常。觉得还是 CCSID 的问题，我一般不使用 SYSTOOLS.BASE64DECODE。

推荐阅读