如何将十六进制数据字符串转换为字符串db2 sql

Question

如何使用select语句解码十六进制字符串以获取文本格式的值？

例如，我的十六进制数据是：

4f004e004c005900200046004f00520020004200410043004b002d005500500020004f004e0020004c004500560045004c0020004f004e004500200046004f00520020004300520041004e004500530020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020000000

我想解码它以使用select语句获取字符串值。以上的价值是“仅用于起重机的一级备份”

我试过的是：

    SELECT CAST('4f004e004c005900200046004f00520020004200410043004b002d005500500020004f004e0020004c004500560045004c0020004f004e004500200046004f00520020004300520041004e004500530020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020002000200020000000' 
    AS VARCHAR(30000) CCSID 37) from myschema.atable

上面的sql返回完全相同的十六进制字符串，而不是我所期望的解码文本字符串“仅用于起重机级别的备份”。

有没有可能与演员这样做？如果是语法是什么？

我的问题是系统将文本数据存储在blob字段中，我想使用select语句来查看blob字段中的文本数据。

Db：Ibm上的Db2

编辑：

我已设法通过使用以下方法将字符串转换为十六进制值：

    select hex(cast('ONLY FOR BACK-UP ON LEVEL ONE FOR CRANES' as varchar(100) ccsid 1208))
FROM myschema.atable

这给了我十六进制的字符串：

4F4E4C5920464F52204241434B2D5550204F4E204C4556454C204F4E4520464F52204352414E4553

现在不知怎的，我需要做反向并得到价值。

谢谢。

编辑

使用Daniel Lema的答案，我尝试使用unhex函数，但我得到的结果是：

|+<ßã|êâ ä.í&|+<áîá<|+áã|êäê +áë

这与CSS ID有关吗？或者我应该如何将上面的内容转换为可读的字符串？

这是表字段定义，如果它将帮助我的数据字段是GDTXFT BLOB：

Answer 1

我能够将缩短的十六进制字符串转换为有效的EBCDIC字符串。我遇到的问题是你收到的原始十六进制代码是UTF-16LE（感谢Tom Blodget）。 IBM的CCSID系统没有UTF-16BE和UTF-16LE之间的区别，因此我对如何正确转换它感到茫然。

如果您之后生成的是UTF-8，则以下内容适合您。这不是最漂亮但是把它放在几个函数中它会起作用。

Create or replace function unpivothex (in_ varchar(30000))
    returns table (Hex_ char(2), Position_ int)
    return
    with returnstring (ST , POS )
    as 
    (Select substring(STR,1,2), 1
    from table(values in_) as A(STR)
    union all
    Select nullif(substring(STR,POS+2,2),'00'), POS+2
    from returnstring, table(values in_) as A(STR)
    where POS+2 <= length(in_)
    )
    Select ST, POS 
    from returnstring
    ;

Create or replace function converthextostring
   (in_string char(30000))
   returns varchar(30000)
   return
   (select listagg(char(varbinary_format(B.Hex_),1)) within group(order by In_table.Position_)
   from table(unpivothex(upper(in_string))) in_table
   join table(unpivothex(hex(cast('ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz ' as char(53) CCSID 1208)))) A on In_table.Hex_ = A.Hex_
   join table(unpivothex(hex(cast('ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz ' as char(53) CCSID 37)))) B on A.Position_ = B.Position_
   );

如果您没有使用至少V7R2 TR6或V7R3 TR2，这是一个版本。

Create or replace function converthextostring
   (in_string char(30000))
   returns varchar(30000)
   return
   (select xmlserialize(
             xmlagg(
               xmltext(cast(char(varbinary_format(B.Hex_),1) as char(1) CCSID 37)) 
             order by In_table.Position_) 
           as varchar(30000))
   from table(unpivothex(upper(in_string))) in_table
   join table(unpivothex(hex(cast('ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz ' as char(53) CCSID 1208)))) A on In_table.Hex_ = A.Hex_
   join table(unpivothex(hex(cast('ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz ' as char(53) CCSID 37)))) B on A.Position_ = B.Position_
   );

Answer 2

我尝试了以下解决方案，我发现由Marcin Rudzki在Convert HEX value to CHAR on DB2发布，在我自己的Db2中测试LUW v11并进行了一些小修改。

正如Marcin建议的那样，解决方案就是创建一个函数：

CREATE FUNCTION unhex(in VARCHAR(32000) FOR BIT DATA)
RETURNS VARCHAR(32000) 
LANGUAGE SQL
CONTAINS SQL
DETERMINISTIC NO EXTERNAL ACTION
BEGIN ATOMIC
RETURN in;
END

要测试解决方案，让我们创建一个HEXSAMPLE表，其中HEXSTRING列加载了HEX序列的字符串表示：

INSERT INTO HEXSAMPLE (HEXSTRING) VALUES ('4F4E4C5920464F52204241434B2D5550204F4E204C4556454C204F4E4520464F52204352414E4553')

然后执行以下查询（这里它与原始提案不同）：

SELECT UNHEX(CAST(HEXTORAW(HEXSTRING) AS VARCHAR(2000) FOR BIT DATA)) as TEXT, HEXSTRING FROM HEXSAMPLE

结果如下：

 TEXT                                           HEXSTRING
 ----------------------------------------   --------------------------------------------------------------------------------
 ONLY FOR BACK-UP ON LEVEL ONE FOR CRANES   4F4E4C5920464F52204241434B2D5550204F4E204C4556454C204F4E4520464F52204352414E4553

我希望其他人能找到更直接的解决方案。此外，如果有人可以解释它为什么有效，那将非常有趣。

Answer 3

我怀疑为什么你需要这样做......

有正当理由将十六进制字符串转换回它的字符等效...例如某人发送一个32字节的字符串UUID，你希望它返回它的16字节二进制形式。

但是没有理由将ONLY FOR BACK-UP ON LEVEL ONE FOR CRANES转换为十六进制。

我怀疑你需要发一个新问题，问你为什么一开始就没有获得可读的字符串。

但是，在回答这个问题时...... IBM我有一个MI函数Convert Character to Hex (CVTCH)，很容易从任何ILE语言调用。您可以将该函数调用包装到用户定义的函数中，以便从SQL中使用它。

请注意，您需要知道十六进制字符串表示的内容，EBCDIC，ASCII或Unicode，因为您需要能够告诉系统您已经开始使用的内容。从那里有方法在编码之间进行转换。

这是一篇文章，展示了如何从RPG调用MI函数。 Utilizing MI Functions in RPG Programs

一个更现代的自由形式版本的原型，利用CCSID关键字的增强功能可能看起来像

dcl-pr FromHex extproc('cvtch');
  charString char(32767) ccsid(*UTF8) options(*varsize);
  hexString  char(65534) ccsid(*HEX) const options(*varsize);
  hexStringLen int(10) value;
end-pr;

使用上面的原型，系统会将返回的字符串视为UTF8（ccsid 1208）。但我所做的就是告诉系统如何解释返回的字节。如果字符串实际上是EBCDIC，我将变得垃圾。

我认为您甚至可以将cvtch函数直接定义为外部UDF而无需ILE包装器。我不得不玩弄那个......

无视这个想法...... cvtch只有参数，而不是返回值。使用ILE包装器是将输出参数移动到返回值以用作UDF的最佳方法。

Answer 4

问题是您的原始字符串是ASCII格式（实际上每个字母后面都有x'00'字节），您必须将其转换为EBCDIC。 以下是拉丁大写字母的解决方案：

select cast(translate(replace(mycol, x'00', x'')  
, x'C1C2C3C4C5C6C7C8C9D1D2D3D4D5D6D7D8D9E2E3E4E5E6E7E8E940'  
, x'4142434445464748494A4B4C4D4E4F505152535455565758595A20'
) as varchar(500) ccsid 37)
from mytab;

每个ASCII字符都被转换为相应的EBCDIC字符。 x'00'符号被删除。