Используя программу 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)
Может кто-нибудь помочь мне в этом.