如何读取 ALV 列表中保存的布局元数据？

我有一个 ALV 列表作为程序的输出，并且需要能够动态获取/提取列及其位置。

用户还可以将列/位置保存为布局以供将来使用，我希望获取已保存布局的相关信息。

我希望以内部表格的形式获取 ALV 列表的列及其位置，以便进一步使用，例如，生成 .xls 文件。

获取和保存 ALV 列表列信息

以下是获取、保存和使用 ALV 列表列信息的方法：

1. 获取 ALV 列表的列信息：

可以使用 GET_COLUMNS 方法从 ALV 网格实例中检索列信息。这将返回一个表，其中包含有关 ALV 网格中所有列的信息，例如：

• COLUMNNAME ：列名
• TABNAME ：列所属的内部表名称
• FIELDNAME ：列对应的字段名称
• COL_POS ：列的位置
• VISIBLE ：列是否可见

DATA: lo_alv_grid TYPE REF TO cl_gui_alv_grid,
      lt_columns TYPE lvc_t_scol.

" 假设 lo_alv_grid 是的 ALV 网格实例

" 获取所有列信息
CALL METHOD lo_alv_grid->get_columns
  RECEIVING
    et_columns = lt_columns.

2. 保存列信息为布局：

可以使用 SAVE_VARIANT 方法将当前 ALV 网格布局（包括列信息）保存为变式。

DATA: ls_variant TYPE disvariant.

" 设置变式属性
ls_variant-report  = sy-repid.
ls_variant-username = sy-uname.
ls_variant-variant  = 'MY_VARIANT'. " 使用自定义名称

" 保存变式
CALL METHOD lo_alv_grid->save_variant
  EXPORTING
    is_variant = ls_variant
  EXCEPTIONS
    OTHERS      = 1.

3. 加载已保存的布局：

可以使用 SET_VARIANT 方法加载以前保存的布局，这将恢复 ALV 网格的列信息和其他设置。

DATA: ls_variant TYPE disvariant.

" 设置变式属性
ls_variant-report  = sy-repid.
ls_variant-username = sy-uname.
ls_variant-variant  = 'MY_VARIANT'. " 使用保存的变式名称

" 加载变式
CALL METHOD lo_alv_grid->set_variant
  EXPORTING
    is_variant = ls_variant
  EXCEPTIONS
    OTHERS      = 1.

4. 将列信息用于其他用途：

获取 lt_columns 表后，可以使用它来执行其他操作，例如生成 .xls 文件：

" 使用 lt_columns 表中的信息生成 .xls 文件
LOOP AT lt_columns ASSIGNING FIELD-SYMBOL(<ls_column>).
  " 使用 <ls_column>-columnname、<ls_column>-col_pos 等信息
  " 将数据写入 .xls 文件
ENDLOOP.

其他注意事项：

• 可以使用 lt_columns 表中的 tech_name 字段（而不是 columnname ）来获取列的技术名称，这在处理动态列时可能很有用。
• 可以使用 VARIANT 参数在 REFRESH_TABLE_DISPLAY 方法中指定要加载的布局。

通过遵循这些步骤，可以轻松地获取、保存和使用 ALV 列表列信息，从而实现更灵活和用户友好的报表。