cobol - 在 COBOL 中操作变量的 HEX 值
问题描述
使用常量确实有效:MOVE X "41" TO HEXSTRING-WRK.
HEXSTRING-WRK 的值 = 'A
但是十六进制值“41”应该是可变的,这如何实现MOVE
?
我的尝试没有成功:
01 TEST-VAR PIC X(28) VALUE "41".
01 HEXSTRING-WRK PIC X(28).
01 HEXSTRING-WRK2 PIC X(30).
STRING '"X"' DELIMITED BY SIZE
TEST-VAR DELIMITED BY SIZE
INTO HEXSTRING-WRK2
END STRING.
MOVE HEXSTRING-WRK2 TO HEXSTRING-WRK.
HEXSTRING 的十六进制值 -> 2258223431
AS400 上的 IBM COBOL
解决方案
推荐阅读
- javascript - Tone JS - Transport.stop(); 不适用于预定事件
- python - 对于不和谐的python,如何每x秒打印一条带有任务的消息?
- c++ - 我们如何在 CS50 ide 上编译和运行程序?
- regex - 正则表达式匹配由“。”分隔的两位数字集
- android - 从 Firebase 云消息传递 OnMessageReceived 时是否可以打开 ContentPage?
- android - 当 height="wrap_content" 不起作用时如何修复约束布局?
- dataframe - 数组列中所有元素的总和
- sql-server - SQL Server:如何在字符串中查询?
- mysql - 如何在依赖于 IN 运算符的分组查询中实现 LIKE 功能?
- c# - 从依赖注入获取记录器和配置?