Question

我想将我的代码分成一个工作区，并将其附加到内部表中以供以后执行。

但是有时文本包含3个以上的数字，例如3; 5; 3; 6; 2; 5，但始终是3,6,9,12 ...数字。我该如何解决我要循环3次，然后再循环3个数字等等的问题？

DATA: text(100) type c,
it_1 TYPE STANDART TABLE LIKE text,
it_2 TYPE STANDART TABLE LIKE text,
it_3 TYPE STANDART TABLE LIKE text,
string(100) TYPE c.


text = '123;2;2'.

SPLIT text AT ';' INTO  wa_1-c1 wa_1-c2 wa_1-c3.

APPEND wa_1-c1 to it_1.
APPEND wa_1-c2 to it_2.
APPEND wa_1-c3 to it_3.

LOOP at it_1 INTO string.
PERFORM task using string.
ENDLOOP.

Answer 1

您应该在split关键字上加上INTO TABLE，而不是对字段进行硬编码。

DATA: text_s TYPE string.

text_s = '123;2;2'.

DATA: text_tab TYPE TABLE OF string.

SPLIT text_s AT ';' INTO TABLE text_tab.

LOOP AT text_tab ASSIGNING FIELD-SYMBOL(<line>).

  "do whatever on each token here

ENDLOOP.

Answer 2

这会将字符串分成3-er块，同时用其余部分覆盖它：

WHILE text IS NOT INITIAL.
  SPLIT AT ';'
        INTO wa_1-c1
             wa_1-c2
             wa_1-c3
             text.
  APPEND: wa_1-c1 to it_1,
          wa_1-c2 to it_2,
          wa_1-c3 to it_3.
ENDWHILE.

请注意，如果仍需要原始值，则字符串变量 text 将是结尾变量，然后您可以定义另一个字符串，复制该值并将其用于拆分。

Answer 3

如果要控制迭代三次，并且要将文本值保存在3个不同的内部表中，则可以尝试使用Sy-tabix。

DATA: text(100) type c,
it_1 TYPE STANDARD TABLE OF text,
it_2 TYPE STANDARD TABLE OF text,
it_3 TYPE STANDARD TABLE OF text,
string(100) TYPE c.

text = '123;2;2'.

SPLIT text AT ';' INTO  TABLE it_1.

LOOP at it_1 INTO string WHERE sy-tabix = 3.
WRITE : string.
ENDLOOP.
 if sy-tabix = 3.
   LOOP AT it_2 INTO string WHERE sy-tabix = sy-tabix+3.
     "do the next loop    
     ENDLOOP.
   ENDIF.

如何在aap中拆分多次？

3 个答案: