RPG程序SQL调用UPS OAuth2.0接口报‘授权头无效/缺失’问题排查

Postman测试可正常获取UPS API的Access Token，但SQLRPG程序执行SQL调用UPS OAuth2.0令牌接口时，触发“Invalid/Missing Authorization Header”错误。调试发现W_RSP为空，W_RSPHDR包含乱码；使用ACS SQL Scripter测试也报相同授权头错误。参考UPS官方文档转换curl请求为SQL，但未找到可用SQL调用示例，需排查错误原因。

用到的SQL语句 #

SELECT CAST(RESPONSEMSG AS CLOB(1000000)),
       CAST(responseHttpHeader  AS CLOB(1000000))
INTO :W_RSP, :W_RSPHDR
FROM TABLE( SYSTOOLS.HTTPPOSTCLOBVerbose(
          CAST(:W_URL AS VARCHAR(255)),
          CAST (:HEADER AS CLOB(1K)),
          CAST (:PAYLOAD AS CLOB(20K)))
         ) AS LOGIN; 

W_URL = 'https://wwwcie.ups.com/security/v1/oauth/token';

HEADER ='<httpHeader>
<header name="Authorization" value="Basic '+ W_BS64 +'"/><header name="accept" value="application/json"/>
<header name="Content-Type" value="application/x-www-form-urlencoded"/>
<header name="x-merchant-id" value="xp1g0NaY2hAqDZbkoNAeDs8X3R1bH72KCdmNUeV5DYOMlfiU"/></httpHeader>'; 
PAYLOAD = 'grant_type=client_credentials';

BASE64编码逻辑 #

W_Client = '{xxxxclientIDxxxx}:{xxxxxclientsecretxxxxx}'
Values QSYS2.BASE64_ENCODE(:W_Client) Into :W_BS64;  

排查方向 #

• 校验BASE64编码结果：把QSYS2.BASE64_ENCODE生成的W_BS64和Postman中自动生成的Basic Auth编码对比，确认是否一致（注意是否存在换行、空格或字符集差异）。
• 检查HTTP头格式：确认SYSTOOLS要求的XML头格式是否正确，比如<header>标签的引号转义、拼接后的Authorization头是否完整无语法错误。
• 排查字符集问题：UPS API要求UTF-8编码，检查RPG程序中W_BS64、HEADER等变量的字符集设置，避免编码转换导致授权头内容损坏。
• 简化请求头测试：暂时去掉x-merchant-id头，只保留Authorization、Content-Type和accept，测试是否能正常获取令牌，排除多余头的干扰。
• 抓包对比请求：若条件允许，抓包查看SQLRPG发出的原始HTTP请求，和Postman的请求头做对比，确认Authorization头是否存在、格式是否正确。

内容的提问来源于stack exchange，提问作者baphomet