嗨

有关FM REUSE_ALV_GRID_DISPLAY_LVC，请参见下面的示例报告。

报告ZDEMO2。



类型库：SLIS。

类型：TY_FINAL的开始，
VBELN类型VBAK-VBELN，
KUNNR类型 VBAK-KUNNR，
TY_FINAL的结尾，
TY_FINAL的TT_FINAL类型标准表。


DATA：GT_FINAL TYPE TT_FINAL，
GS_FINAL类型TY_FINAL。


< br> DATA：GS_LAYOUT类型LVC_S_LAYO。

DATA：GT_FIELDCAT类型LVC_T_FCAT，
GS_FIELDCAT类型LVC_S_FCAT。










>
选择开始。

从VBAK中选择VBELN KUNNR到表GT_FINAL中，最多10个行。






END-OF -SELECTION。




清除GS_FIELDCAT。
GS_FIELDCAT-FIELDNAME ='VBELN'。
GS_FIELDCAT-SCRTEXT_L ='SO NUMBER'。
将GS_FIELDCAT附加到GT_FIELDCAT。 br>
清除GS_FIELDCAT。
GS_FIELDCAT-FIELDNAME ='KUNNR'。
GS_FIELDCAT-SCRTEXT_L ='客户代码'。
将GS_FIELDCAT附加到GT_FIELDCAT。



>

通话功能'REUSE_ALV_GRID_DISPLAY_LVC'
导出
I_CALLBACK_PROGRAM = SY-CPROG
I_CALLBACK_USER_COMMAND ='USER_COMMAND'
IS_LAYOUT_LVC = GS_LAYOUT
IT_FIELDCAT_LVC = GT_FIELDCAT
表格
T_OUTTAB = GT_FINAL
例外情况 = 2 =程序错误



IF 1 =4。

ENDIF。



************* ***********



使用类似于SY-UCOMM的R_UCOMM形式USER_COMMAND
RS_SELFIELD类型SLIS_SELFIELD。

如果R_UCOMM ='＆IC1'。
R_UCOMM ='＆ETA'。
ENDIF。


ENDFORM。