Reuse_alv_hierseq_list_display不显示标题之间的行

1楼 · 2020-09-06 02:05.采纳回答

Sreekanth，您好

请传递以下参数

layout-no_vline ='1'。 " <-没有垂直线
layout-no_hline ='2'。" <-没有水平线

 TYPE-POOLS：slis。

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

 类型：开始于ty_vbrk，

          vbeln TYPE vbeln，

          kunag TYPE kunag，

        ty_vbrk结束。

 类型：开始于ty_vbrp，

          vbeln TYPE vbeln，

          matnr TYPE matnr，

          fkimg TYPE fkimg，

          netwr TYPE netwr，

        ty_vbrp结束。

 数据：w_vbrk类型ty_vbrk。

 数据：ty_vbrk的t_vbrk类型标准表。



 数据：w_vbrp类型ty_vbrp。

 数据：ty_vbrp的t_vbrp类型标准表。

 数据：布局类型slis_layout_alv。

 数据：w_fcat类型slis_fieldcat_alv。

 数据：t_fcat类型slis_t_fieldcat_alv。


 常量：c_vbrk类型slis_tabname值'W_VBRK'。

 常量：c_vbrp类型slis_tabname值'W_VBRP'。

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



 数据：w_keyinfo类型slis_keyinfo_alv。



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

 *开始选择

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

 选择开始。



   执行get_data。

   执行build_fieldcat。

   执行display_alv。

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

 *＆表格DISPLAY_ALV

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

 *文字

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

 FORM display_alv。



   通话功能'REUSE_ALV_HIERSEQ_LIST_DISPLAY'

     出口

       it_fieldcat = t_fcat

       i_tabname_header = c_vbrk

       i_tabname_item = c_vbrp

       is_keyinfo = w_keyinfo

       is_layout =布局

     桌子

       t_outtab_header = t_vbrk

       t_outtab_item = t_vbrp。

 ENDFORM。  " DISPLAY_ALV

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

 *＆表格GET_DATA

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

 *文字

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

 *-> p1文字

 * <-p2文字

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

 FORM get_data。

 *＆-------- SELEC标头数据和排序------------------------------- *

   刷新t_vbrk。

   SELECT vbeln

           库纳

                 来自vbrk

                 表t_vbrk的对应字段

                 最多10行。



   通过vbeln排序t_vbrk。



 *＆-------- SELEC项目数据和排序------------------------------- *

   不要检查t_vbrk是否为INITIAL。

   刷新t_vbrp。

   选择

           vbeln

           物质

           ki

           网络

                 来自vbrp

                 表t_vbrp的相应字段

                 对于t_vbrk中的所有条目

                 其中vbeln = t_vbrk-vbeln。



   通过vbeln排序t_vbrp。

 ENDFORM。  GET_DATA

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

 *＆表格BUILD_FIELDCAT

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

 *文字

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

 *-> p1文字

 * <-p2文字

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

 表格build_fieldcat。

   w_keyinfo-header01 ='VBELN'。

   w_keyinfo-item01 ='VBELN'。

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



   w_fcat-col_pos = 1。



   w_fcat-fieldname ='VBELN'。

   w_fcat-seltext_m ='订单编号'。

   w_fcat-tabname ='W_VBRK'。

   将w_fcat附加到t_fcat。



   w_fcat-col_pos = 2。

   w_fcat-fieldname ='KUNAG'。

   w_fcat-seltext_m ='客户编号'。

   w_fcat-tabname ='W_VBRK'。

   将w_fcat附加到t_fcat。



   w_fcat-col_pos = 3。

   w_fcat-fieldname ='MATNR'。

   w_fcat-seltext_m ='材料编号'。

   w_fcat-tabname ='W_VBRP'。

   将w_fcat附加到t_fcat。



   w_fcat-col_pos = 4。

   w_fcat-fieldname ='FKIMG'。

   w_fcat-seltext_l ='QUANTITY'。

   w_fcat-tabname ='W_VBRP'。

   将w_fcat附加到t_fcat。



   w_fcat-col_pos = 5。

   w_fcat-fieldname ='NETWR'。

   w_fcat-seltext_m ='订单价值'。

   w_fcat-tabname ='W_VBRP'。

   将w_fcat附加到t_fcat。



 layout-no_vline ='1'。  " <-没有竖线

 layout-no_hline ='2'。  " <-没有水平线

 ENDFORM。  " BUILD_FIELDCAT