*&---------------------------------------------------------------------*
*& Form get_fieldcat
*&---------------------------------------------------------------------*
FORM get_fieldcat USING P_FIELDCAT TYPE slis_t_fieldcat_alv.
data: fieldcat TYPE slis_fieldcat_alv.
DATA: BEGIN OF STRUCT,
fieldname(6),
ref_tabname(5),
ref_fieldname(6),
seltext_s(10),
COL_POS(3),
END OF STRUCT.
DEFINE MAKE.
clear: FIELDCAT,STRUCT.
STRUCT = &1.
FIELDCAT-fieldname = STRUCT-fieldname.
fieldcat-REF_tabname = STRUCT-ref_tabname.
FIELDCAT-REF_fieldname = STRUCT-REF_fieldname.
FIELDCAT-seltext_s = STRUCT-seltext_s.
FIELDCAT-col_pos = STRUCT-col_pos.
append FIELDCAT TO p_fieldcat.
END-OF-DEFINITION.
MAKE 'MATNR 物料
*& Form get_fieldcat
*&---------------------------------------------------------------------*
FORM get_fieldcat USING P_FIELDCAT TYPE slis_t_fieldcat_alv.
data: fieldcat TYPE slis_fieldcat_alv.
DATA: BEGIN OF STRUCT,
fieldname(6),
ref_tabname(5),
ref_fieldname(6),
seltext_s(10),
COL_POS(3),
END OF STRUCT.
DEFINE MAKE.
clear: FIELDCAT,STRUCT.
STRUCT = &1.
FIELDCAT-fieldname = STRUCT-fieldname.
fieldcat-REF_tabname = STRUCT-ref_tabname.
FIELDCAT-REF_fieldname = STRUCT-REF_fieldname.
FIELDCAT-seltext_s = STRUCT-seltext_s.
FIELDCAT-col_pos = STRUCT-col_pos.
append FIELDCAT TO p_fieldcat.
END-OF-DEFINITION.
MAKE 'MATNR 物料