Problem with field symbol

Former Member — Tue, 25 Jan 2011 15:35:35 GMT

Hi!

I have a problem with a field-symbol like this:

DATA: gt_coep_ext TYPE kaep_t_coep_ext.

field-symbols <gt_data> type table.

ASSIGN gt_coep_ext TO <gt_pos_data>

This field symbol is used in the FM REUSE_ALV_GRID_DISPLAY as output table. I need add two fields in this <gt_data>. Is there any way to add new fields in the <gt_data> structure.

Thanks!!

Re: Problem with field symbol

Former Member — Tue, 25 Jan 2011 16:03:29 GMT

Create your one Fieldcat

Global data declaration ***

TYPE-POOLS: SLIS.

<types: ... . " user definded types>

DATA: GT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.

DATA: G_REPID LIKE SY-REPID.

DATA: GT_OUTTAB TYPE <UD_STRUCT> OCCURS 0 WITH HEADER LINE.

<data: ... . " user specific data>

Initialization field catalog ***

INITIALIZATION.

G_REPID = SY-REPID.

PERFORM FIELDCAT_INIT USING GT_FIELDCAT[].

Data selection ***

START-OF-SELECTION.

PERFORM SELECT_DATA TABLES GT_OUTTAB.

Display list ***

END-OF-SELECTION.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

I_CALLBACK_PROGRAM = G_REPID

IT_FIELDCAT = GT_FIELDCAT[]

TABLES

T_OUTTAB = GT_OUTTAB.

FORMS ***

FORM FIELDCAT_INIT USING RT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.

DATA: LS_FIELDCAT TYPE SLIS_FIELDCAT_ALV.

DATA: POS TYPE I VALUE 1.

Initialize keyfield(s)

CLEAR LS_FIELDCAT.

LS_FIELDCAT-COL_POS = POS.

LS_FIELDCAT-FIELDNAME = <GT_OUTTAB_FIELD_NAME>.

LS_FIELDCAT-REF_FIELDNAME = <DDIC_REF_FIELD_NAME>.

LS_FIELDCAT-REF_TABNAME = <DDIC_REF_TABLE_NAME>.

LS_FIELDCAT-KEY = 'X'. " sets key field

APPEND LS_FIELDCAT TO RT_FIELDCAT.

Initialize normal field(s)

POS = POS + 1.

clear ls_fieldcat.

ls_fieldcat-col_pos = pos.

LS_FIELDCAT-FIELDNAME = <GT_OUTTAB_FIELD_NAME>.

LS_FIELDCAT-REF_FIELDNAME = <DDIC_REF_FIELD_NAME>.

LS_FIELDCAT-REF_TABNAME = <DDIC_REF_TABLE_NAME>.

APPEND LS_FIELDCAT TO RT_FIELDCAT.

Initialize hidden field(s)

POS = POS + 1.

clear ls_fieldcat.

ls_fieldcat-col_pos = pos.

LS_FIELDCAT-FIELDNAME = <GT_OUTTAB_FIELD_NAME>.

LS_FIELDCAT-REF_FIELDNAME = <DDIC_REF_FIELD_NAME>.

LS_FIELDCAT-REF_TABNAME = <DDIC_REF_TABLE_NAME>.

LS_FIELDCAT-NO_OUT = 'X'. " sets hidden field

APPEND LS_FIELDCAT TO RT_FIELDCAT.

ENDFORM. " fieldcat_init

FORM SELECT_DATA TABLES RT_OUTTAB LIKE GT_OUTTAB[].

<user specific data selection>

ENDFORM. " select_data

Re: Problem with field symbol

Former Member — Tue, 25 Jan 2011 16:39:47 GMT

Hi,

Add those two fields to gt_coep_ext.


DATA : BEGIN OF gt_coep_ext OCCURS 0.
       INCLUDE structure kaep_t_coep_ext..
DATA : FLD1,
            FLD2,
           END OF gt_coep_ext.

Thanks,

ANmol.

Re: Problem with field symbol

Former Member — Tue, 25 Jan 2011 17:21:47 GMT

Thanks!!

topic Problem with field symbol in Application Development and Automation Discussions

Problem with field symbol

Re: Problem with field symbol

Re: Problem with field symbol

Re: Problem with field symbol