假设第一个或最后一个字符符合一定条件,则可用 SHIFT 语句将字段向左或向右移动。为此,请使用以下语法: SHIFT <c> LEFT DELETING LEADING <str>. SHIFT <c> RIGHT DELETING TRAILING <str>. 假设左边的第一个字符或右边的最后一个字符出现在 <str> 中,该语句将字段 <c> 向左或向右移动。字段右边或左边用...
LEFT:从左边截断 RIGHT:从右边截断zchar ='00AABBCCDD00'.SHIFTzcharBY3PLACES RIGHT."去掉右边三位*语法:SHIFT {c} UP TO {str} {mode} 把字符串中在str以前的字符都去掉,同样可以指定modezchar ='00AABBCCDD00'.SHIFTzchar UPTOzcharstu RIGHT."去掉指定字符串zcharstu右边的字符 输出00AABBCCDDzchar ...
方法三: 使用 SHIFT LEFT DELETING LEADING * 删除前导零 SHIFT <yourField> LEFT DELETING LEADING '0'. 例子: DATA(lv_order_number) = CONV aufnr( |{ '12345' ALPHA = IN }| ). WRITE |{ lv_order_number }|. "Output: 000000012345 SHIFT lv_order_number LEFT DELETING LEADING '0'. ...
2... shift_right([val =]text [places = places]|[circular = places]|[sub = substring]) ... Effect The functionsshift_leftandshift_rightshift the character stringtextto the left or to the right and return the result. The shift depends on the parameter pass as follows: If...
LEFT:从左边截断 RIGHT:从右边截断 CIRCULAR:把左边的字符放到右边。 SHIFT {c} UP TO {str} {mode}.: 作用:把字符串中在str以前的字符都去掉,同样可以指定mode,原理同上。 SHIFT {c} LEFT DELETING LEADING {str}. SHIFT {c} RIGHT DELETING TRAILING {str}.: ...
LEFT:从左边截断 RIGHT:从右边截断 CIRCULAR：把左边的字符放到右边。SHIFT {c} UP TO {str} {mode}.：作⽤：把字符串中在str以前的字符都去掉，同样可以指定mode，原理同上。SHIFT {c} LEFT DELETING LEADING {str}.SHIFT {c} RIGHT DELETING TRAILING {str}.：作⽤：这两个语句就是把字符串c中前的...
" 如果字符串长度小于4,则重复拼接字符串直到长度足够 DO. CONCATENATE lv_string lv_string INTO lv_extended. IF strlen( lv_extended ) >= 4. EXIT. ENDIF. ENDDO. " 使用SHIFT函数将字符串左移,直到最后4个字符移到开头 SHIFT lv_extended LEFT DELETING LEADING SPACE. " 截取前4个字符即为原字符...
SHIFT <c> [BY <n> PLACES] [<modes>] <modes>: (1)空白,字符串往左移一位 (2)LEFT,字符串往左移 n 位 (3)RIGHT, 字符串往右移n位 (4)CIRCULAR,字符串往左以环状方式移位 Example :DATA STRING(10) TYPE C VALUE 'ABCDEFGHIJ'.
SHIFT str LEFT DELETING LEADING '0'. 如果要在 layout 显示不出前面的 0 格式: &字段(zc)& 如果要在 layout 显示不出小数点后面的 0 格式: &字段(.0)& 关于 shift 1 .Shift a structure by a given number of postions SHIFT <c> [BY <n> PLACES] [<mode>]. This statement shifts the ...
5.去前导0 (Remove leading zero) SHIFT dobj LEFT DELETING LEADING '0'. FM : CONVERSION_EXIT_ALPHA_OUTPUT 增前导0 (Add leading zero) DATA v_s(5). UNPACK '123' to v_s. ==> v_s = '00123' FM: CONVERSION_EXIT_ALPHA_INPUT