The example of code:
REPORT ztest_delete_zeros NO STANDARD PAGE HEADING.
PARAMETERS: str TYPE char10.
START-OF-SELECTION.
DATA: str2 TYPE char20.
" Variant 1.
str2 = str.
SHIFT str2 LEFT DELETING LEADING '0'.
WRITE: / 'Before deleting:', str.
WRITE: / 'After deleting:', str2.
" Variant 2.
str2 = str.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
EXPORTING
input = str2
IMPORTING
output = str2.
WRITE: / 'Before deleting:', str.
WRITE: / 'After deleting:', str2.
" Difference between the two variants:
" variant 1: '00000' --> '';
" variant 2: '00000' --> '0'.
REPORT ztest_delete_zeros NO STANDARD PAGE HEADING.
PARAMETERS: str TYPE char10.
START-OF-SELECTION.
DATA: str2 TYPE char20.
" Variant 1.
str2 = str.
SHIFT str2 LEFT DELETING LEADING '0'.
WRITE: / 'Before deleting:', str.
WRITE: / 'After deleting:', str2.
" Variant 2.
str2 = str.
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
EXPORTING
input = str2
IMPORTING
output = str2.
WRITE: / 'Before deleting:', str.
WRITE: / 'After deleting:', str2.
" Difference between the two variants:
" variant 1: '00000' --> '';
" variant 2: '00000' --> '0'.
Комментариев нет:
Отправить комментарий