嗨

您能详细说明一下并行处理的含义吗？ 或者，也许最好告诉您所面临的确切问题是程序运行缓慢吗？ 还是SQL需要花很多时间才能获取记录

我认为存在SQL性能问题是因为没有" WHERE"语句。尤其是在使用HANA时，基本SQL会进行精益处理（仅选择所需的内容，以及仅选择所需的字段） ，但也只会提取您需要的记录）。 您的SQL将为所选表中的所有记录获取一组列。添加WHERE语句可能会大大降低性能问题

kr

您

有人可以告诉我如何从上述代码的选择屏幕中选择多个表，因为我在这里只处理单个表。

表格：dd02l。

 数据：ls_fieldcat TYPE slis_fieldcat_alv，

  lt_fieldcat类型slis_t_fieldcat_alv，

  ls_fieldcatlog类型slis_fieldcat_alv，

  lt_fieldcatlog类型slis_t_fieldcat_alv，

  lt_layout类型slis_layout_alv。

 

 数据：w_dref TYPE REF TO数据。

 FIELD-SYMBOLS： TYPE STANDARD TABLE，"用于从数据库读取数据的动态内部表

   TYPE任意。

 

 数据：w_dref1类型参考数据。

 FIELD-SYMBOLS： TYPE STANDARD TABLE，"表，用于从t_itab加载1000条记录

   TYPE任意。

 

 类型：开始于ty_header，"以在xlsx文件中创建字段标题。

  fname（100）TYPE c，

  结束于ty_header。

 

 数据：ty_header的it_header类型表，

  wa_header TYPE ty_header。

 

 数据：inttab OCCURS 100的开头。"表读取给定表的文件

  包含结构dfies。

 数据：选中类型复选框。  "用于检查所选字段条件的附加字段

 数据：inttab的结尾。

 

 数据：wa_tab与inttab类似。

 

 类型：BEGIN OF ty_int1，"用于在选择屏幕上选择字段的结构

  字段名TYPE字段名，

  结束于ty_int1。

 

 数据：inttab1类型表ty_int1，"以加载给定数据库表的字段名称。

  wa_tab1与inttab1类似。

 

 数据：d TYPE字符串。  "以创建excel e.x的多个文件。export1 export2 .... 

 

 参数：p_table类型dd02l-tabname强制默认'MARA'。

 参数：计数TYPE i默认值" 1000"。

 参数：p_file像rlgrap-文件名。

 参数：p_enable AS CHECKBOX DEFAULT''USER-COMMAND uc1。

 

 

 在p_file值请求的选择屏幕上。

  数据：gt_file_table TYPE文件表，

  gwa_file_table TYPE文件表，

  gv_rc TYPE i。

  呼叫方法cl_gui_frontend_services => file_open_dialog 

  出口

  window_title ='选择文件'

  改变

  file_table = gt_file_table 

  rc = gv_rc。

  如果sy-subrc =0。

  读取表gt_file_table INTO gwa_file_table索引1。

  p_file = gwa_file_table-filename。

  ENDIF。

 

 在选择屏幕输出时。

 

 

  IF p_enable ='X'。

  CALL FUNCTION'DDIF_FIELDINFO_GET'"以获取表字段信息

  出口

  tabname = p_table 

  langu = sy-langu 

  表格

  dfies_tab = inttab 

  例外情况

  not_found = 1 

  internal_error = 2 

  其他=3。

 

 

  执行popup_display。

 

  ENDIF。

 

 *＆------------------------------------------------  --------------------- * 

 * *＆FORM popup_display 

 * *＆-----------------------------------------------  ---------------------- * 

 * *文字

 * * ------------------------------------------------  ---------------------- * 

 FORM popup_display。

 

 *用于弹出选择的字段目录

  清除ls_fieldcat。

  ls_fieldcat-row_pos ='1'。

  ls_fieldcat-col_pos ='1'。

  ls_fieldcat-fieldname ='CHECK'。

  ls_fieldcat-tabname ='INTTAB'。

  ls_fieldcat-seltext_m ='SELECT'。

  追加ls_fieldcat至lt_fieldcat。

  清除ls_fieldcat。

 

 

  ls_fieldcat-row_pos ='1'。

  ls_fieldcat-col_pos ='2'。

  ls_fieldcat-fieldname ='FIELDNAME'。

  ls_fieldcat-tabname ='INTTAB'。

  ls_fieldcat-seltext_m ='FIELDNAME'。

  ls_fieldcat-outputlen =50。

  追加ls_fieldcat至lt_fieldcat。

 

  ls_fieldcat-row_pos ='1'。

  ls_fieldcat-col_pos ='3'。

  ls_fieldcat-fieldname ='FIELDTEXT'。

  ls_fieldcat-tabname ='INTTAB'。

  ls_fieldcat-seltext_m ='DESCRIPTION'。

  追加ls_fieldcat至lt_fieldcat。

  清除ls_fieldcat。

 

 *在用于选择字段的弹出窗口中显示数据

  通话功能'REUSE_ALV_POPUP_TO_SELECT'

  出口

  i_zebra ='X'

  it_fieldcat = lt_fieldcat 

  i_tabname ='INTTAB'

  i_checkbox_fieldname ='CHECK'

  表格

  t_outtab = inttab。

  清除p_enable。

 

 ENDFORM。  " popup_display 

 

 选择开始。

 

  执行选择

  进行下载。

 

 *＆------------------------------------------------  --------------------- * 

 *＆FORM selec 

 *＆------------------------------------------------  --------------------- * 

 *文字

 * -------------------------------------------------  --------------------- * 

 *-> p1文字

 * * <-p2文字

 * * ------------------------------------------------  ---------------------- * 

 表格选择

 

  DATA C1 TYPE光标。

 

  创建数据w_dref类型标准表（p_table）。  " 指向数据库表的结构

  ASSIGN w_dref-> *至。

 

  创建数据w_dref1类型标准表（p_table）。  " 指向数据库表的结构

  ASSIGN w_dref1-> *至。

 

 

  IF sy-subrc EQ0。

  数据：lv_temp TYPE字符串。

  LOOP AT inttab INTO wa_tab WHERE检查='X'。  "从inttab到inttab1选择字段名称

 

  合并lv_temp wa_tab字段名INTO lv_temp按空格分隔。

 

  将wa_tab-fieldname移动到wa_header。

  将wa_header附加到it_header。

  清除：wa_tab，wa_header。

  ENDLOOP。

 

 

  打开光标@ c1以从（p_table）选择（lv_temp）到@count行。

  做。

  在表@ 的对应字段中获取下一个光标@ c1。

  IF sy-subrc NE0。

  退出。

  ELSE。

  进行下载。

  ENDIF。

 

  ENDDO。

 

  关闭光标@ c1。

 * LOOP AT inttab1 INTO wa_tab1。

 * 

 * ENDLOOP。

  ENDIF。

 

 

 ENDFORM。

 *＆------------------------------------------------  --------------------- * 

 *＆表格下载

 *＆------------------------------------------------  --------------------- * 

 *文字

 * -------------------------------------------------  --------------------- * 

 *-> p1文字

 * <-p2文字

 * -------------------------------------------------  --------------------- * 

 表格下载。

  数据：cnt TYPE字符串。  "以将n个记录加载到fi_itab 

 * DATA：d TYPE字符串。  "以创建excel e.x的多个文件。export1 export2 .... 

  数据：文件类型字符串。  "将p_file转换为字符串

  文件= p_file。

 * cnt =0。

 

  d = d + 1. 

  数据：lv_string1 TYPE字符串，lv_string2 TYPE字符串。

 * 

  文件= p_file。

  分割p_file AT'。  INTO lv_string1 lv_string2。

  CONCATENATE lv_string1'_'d'。'  lv_string2 INTO文件。

  通话功能'GUI_DOWNLOAD'

  出口

  文件名=文件

  文件类型='DAT'

  append ='X'

  write_field_separator ='X'

  表格

  data_tab =  

  字段名称= it_header。

  如果sy-subrc <> 0. 

 

  ENDIF。

 

 ENDFORM。

Alve 请不要混淆几个不同的问题 ，再问一个问题。

嗨，

感谢响应。由于我正在处理大量数据，因此运行时/执行时间应在限制。要克服这一点，我们使用并行处理方法。 正如您在我的代码中看到的那样，我正在使用多个循环，执行时间更多，并且我想避免这种情况并立即下载数据。