使用Easytrieve程序正在尝试从DB2获取详细信息。但是列之外的一种具有整数数据类型,并且正在将数据移动到二进制变量。 我需要对该变量执行算术运算,结果将移至输出文件。
当我尝试将二进制值移动到字母数字时,前导零。
不确定如何删除这些领先价值。
例如:
DB2 column name (Period_value) = 240
Easytrieve :
FILE TEMP1
TEMP-PERIOD 1 5 A
WS-VAL1 W 4 B 0
WS-TEMP W 4 N
....
....
使用光标从Db2获取值
WS-VAL1保持值为240
DISPLAY WS-VAL1 => OUTPUT : 240
* CALCULATION
WS-VAL1 = WS-VAL1 + 1
WS-TEMP = WS-VAL1
DISPLAY WS-TEMP -> OUTPUT : 0241
MOVE WS-TEMP to TEMP-PERIOD
PUT TEMP1
但是输出文件包含
0241
Expected output
241
242 (without leading zero)
有人可以帮我这个忙吗?