文章介绍了三种方法来处理字符串中的前导0和后缀0：1)通过移位操作删除；2)使用特定功能模块CONVERSION_EXIT_ALPHA_OUTPUT进行格式化；3)利用数值变量转换和CONDENSE、SHIFTRIGHT函数组合去除0。这些技术适用于数据清理和格式规范化场景。
1.通过移位删除前导0或后缀0.
data:
str type char10 value '0010000000'.
shift str left deleting leading '0'.
shift str right deleting trailing '0'.
2.通过内外书式去除前导0.
如:
功能模块'CONVERSION_EXIT_ALPHA_OUTPUT'.
3.通过数值变量转换也可以去除前导0.
data:
int type i,
str type char10 value '0010000000'.
int = str.
str = int.
DATA CV_INT TYPE INT4.
DATA CV_STR TYPE STRING.
CV_INT = '199.00666'.
CV_STR = CV_INT.
CONDENSE CV_STR."BREAK-POINT.
SHIFT CV_STR RIGHT DELETING TRAILING '0'.
CONDENSE CV_STR.
SHIFT CV_STR RIGHT DELETING TRAILING '.'.
CONDENSE CV_STR.
WRITE : CV_STR.
扫一扫
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
