如何用SQL将Blob编码为Base64？解决DMS_LOB.SUBSTR字节定位问题

我之前在给BI Publisher传图片的时候也踩过类似的Blob转Base64的坑，你的问题核心是混淆了字节位置和字符位置，加上拆分逻辑没对齐，导致内容缺失。给你几个可行的解决方案：

方案一：直接用PeopleCode的Base64编码函数（最推荐） #

如果你的PeopleTools版本在8.55及以上，直接用PeopleCode内置的EncodeBase64函数就能搞定，完全不用拆分，避免SQL的字节/字符混淆问题：

-- 1. 获取包含Blob的记录
Local Record &imgRec = CreateRecord(Record.YOUR_IMAGE_RECORD);
&imgRec.YOUR_BLOB_FIELD.Value = ...; -- 从数据库或文件加载Blob数据

-- 2. 直接编码成Base64字符串
Local string &fullBase64 = EncodeBase64(&imgRec.YOUR_BLOB_FIELD.Value);

-- 3. 传递给BI Publisher即可，比如放到XML变量里
&xmlData = "<image>" | &fullBase64 | "</image>";

这个方法最省心，PeopleCode会自动处理整个Blob的编码，不用担心拆分和拼接的问题。

方案二：SQL拆分+PeopleCode拼接（兼容旧版本） #

如果必须用SQL拆分，核心是要记住DBMS_LOB.SUBSTR的参数是字节数，不是字符数——Blob是二进制数据，所有操作都要基于字节计算。

步骤1：先获取Blob的总字节长度 #

SELECT DBMS_LOB.GETLENGTH(your_blob_column) AS total_bytes 
FROM your_table 
WHERE your_primary_key = :1;

步骤2：按字节数拆分Blob并编码 #

根据总字节数分成3段，每段的起始位置和长度都用字节计算：

-- 第一段：从第1字节开始，取总字节的1/3
SELECT UTL_ENCODE.BASE64_ENCODE(
    DBMS_LOB.SUBSTR(your_blob_column, FLOOR(total_bytes/3), 1)
) AS part1
FROM your_table, (
    SELECT DBMS_LOB.GETLENGTH(your_blob_column) AS total_bytes 
    FROM your_table 
    WHERE your_primary_key = :1
) len
WHERE your_primary_key = :1;

-- 第二段：从第(total_bytes/3 +1)字节开始，取1/3长度
SELECT UTL_ENCODE.BASE64_ENCODE(
    DBMS_LOB.SUBSTR(your_blob_column, FLOOR(total_bytes/3), FLOOR(total_bytes/3)+1)
) AS part2
FROM your_table, (
    SELECT DBMS_LOB.GETLENGTH(your_blob_column) AS total_bytes 
    FROM your_table 
    WHERE your_primary_key = :1
) len
WHERE your_primary_key = :1;

-- 第三段：取剩下的字节
SELECT UTL_ENCODE.BASE64_ENCODE(
    DBMS_LOB.SUBSTR(your_blob_column, total_bytes - FLOOR(total_bytes/3)*2, FLOOR(total_bytes/3)*2 +1)
) AS part3
FROM your_table, (
    SELECT DBMS_LOB.GETLENGTH(your_blob_column) AS total_bytes 
    FROM your_table 
    WHERE your_primary_key = :1
) len
WHERE your_primary_key = :1;

步骤3：PeopleCode拼接并清理格式 #

注意UTL_ENCODE.BASE64_ENCODE会自动插入换行符，拼接前要去掉：

Local string &part1, &part2, &part3, &fullBase64;

-- 执行上面的三个SQL，获取分段内容
SQLExec("第一段SQL", &key, &part1);
SQLExec("第二段SQL", &key, &part2);
SQLExec("第三段SQL", &key, &part3);

-- 去掉所有换行和回车符
&part1 = Replace(Replace(&part1, Char(10), ""), Char(13), "");
&part2 = Replace(Replace(&part2, Char(10), ""), Char(13), "");
&part3 = Replace(Replace(&part3, Char(10), ""), Char(13), "");

-- 拼接成完整的Base64字符串
&fullBase64 = &part1 | &part2 | &part3;

为什么你之前的查询只返回1/4内容？ #

因为你错误地用字符位置来拆分Blob，但DBMS_LOB.SUBSTR的第三个参数是字节数。Base64编码是每3字节转4字符，所以如果按字符数拆分，实际取到的字节数只有预期的3/4，自然内容只显示1/4。

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