Z_TESTQ_SHIFT 

 1 *&---------------------------------------------------------------------*
 2 *& Report  Z_TEST_SHIFT
 3 *&
 4 *&---------------------------------------------------------------------*
 5 *&
 6 *&
 7 *&---------------------------------------------------------------------*
 8 
 9 REPORT  Z_TESTQ_SHIFT.
10 
11 DATA text TYPE string VALUE `I know you know `.
12 
13 SHIFT text RIGHT DELETING TRAILING 'no kw'.
14 *SHIFT text RIGHT DELETING TRAILING 'kw'.
15 WRITE text.
16 
17 DATA: t(16) TYPE c VALUE '    abcdefkghijl',
18        string LIKE t,
19        str(6) VALUE 'ghijkl'.
20 
21 string = t.
22  WRITE / string.
23 
24 SHIFT string LEFT DELETING LEADING space.
25  WRITE / string.
26 
27 string = t.
28 SHIFT string RIGHT DELETING TRAILING str.
29  WRITE / string.

一个关于shift的练习~

结果如下

---------------------------------------

      I know you

    abcdefkghijl

abcdefkghijl

          abcdef

posted @ 2019-05-08 09:24  Mordred  阅读(144)  评论(0)  编辑  收藏  举报