1.传递一个内表到另一个form中
data: begin of i_tab occurs 0,
c1(10) type c,
c2(10) type c,
end of i_tab.
data: itb like i_tab,
itae like i_tab occurs 0 with header line.
start-of-selection.
data itae2 like i_tab occurs 0 with header line.
itb-c1 = '我是中国人'.
itb-c2 = '我是美国人'.
append itb to itae.
itb-c1 = '1'.
itb-c2 = '2'.
append itb to itae.
write: / '这是新的'.
loop at itae.
write:/ itae-c1,itae-c2.
endloop.
itb-c1 = '2'.
itb-c2 = '2'.
append itb to itae2.
skip.
data: p1 type String value '只是字符串',
p2 type string value '还是字符串'.
perform f_disdata tables itae[] itae2[] using p1 p2.
perform f_ds tables itae[].
*&---------------------------------------------------------------------*
*& Form f_disdata
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* -->ITABLE text
*----------------------------------------------------------------------*
form f_disdata tables fb like i_tab[] pb like i_tab[] using p1 p2.
data p_t like i_tab occurs 0 with header line.
uline at /(146).
write:/ '第一个内表的值'.
loop at fb.
write: / fb-c1,fb-c2.
endloop.
uline at /(146).
write:/ '第二个内表的值'.
loop at pb.
modify pb.
write: / pb-c1,pb-c2.
endloop.
uline at /(146).
write:/ p1,p2.
endform. "f_disdata
form f_ds tables es like i_tab[].
skip.
uline at /(146).
write: / '另一个方法中的显示'.
loop at es.
write:/ es-c1,es-c2.
endloop.
endform.