1:abap 调用代码块。
*&---------------------------------------------------------------------* *& Report ZHANSEN31 *&---------------------------------------------------------------------* *& *&---------------------------------------------------------------------* REPORT ZHANSEN31. data lv_text1(10) TYPE c VALUE 'basic list'. data lv_text2(20) type c VALUE 'list2'. START-OF-SELECTION. " event block. DO 5 TIMES. PERFORM lf_output_line using sy-index. "执行事件块 ENDDO. form lf_output_line USING p_index. write: / p_index. ENDFORM.