ALV Declaration

[former_member611983]

Dear gurus,

I need ur help in declaration of WORKAREA in alv.

am trying but its throwing error(slis_t_fieldcat_alv is unknown

and its either one of the specified tables not defined by the data)

am writng the program below..

(type-pools slis .

tables : kna1.

types : gitab type table of zguru.

data : itab type gitab.

data : wa type itab .

data : head like slis_t_fieldcat_alv.

select

kunnr

land1

name1

from kna1 into table itab up to 100 rows.

*

CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'

EXPORTING

I_PROGRAM_NAME = sy-repid

I_INTERNAL_TABNAME = ITAB

• I_STRUCTURE_NAME =

• I_CLIENT_NEVER_DISPLAY = 'X'

I_INCLNAME = sy-redid

• I_BYPASSING_BUFFER =

• I_BUFFER_ACTIVE =

CHANGING

CT_FIELDCAT = head

• EXCEPTIONS

• INCONSISTENT_INTERFACE = 1

• PROGRAM_ERROR = 2

• OTHERS = 3

.

IF SY-SUBRC <> 0.

• MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

• WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.

*

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

• I_INTERFACE_CHECK = ' '

• I_BYPASSING_BUFFER = ' '

• I_BUFFER_ACTIVE = ' '

I_CALLBACK_PROGRAM = sy-repid

• I_CALLBACK_PF_STATUS_SET = ' '

• I_CALLBACK_USER_COMMAND = ' '

• I_CALLBACK_TOP_OF_PAGE = ' '

• I_CALLBACK_HTML_TOP_OF_PAGE = ' '

• I_CALLBACK_HTML_END_OF_LIST = ' '

• I_STRUCTURE_NAME =

• I_BACKGROUND_ID = ' '

• I_GRID_TITLE =

• I_GRID_SETTINGS =

• IS_LAYOUT =

• IT_FIELDCAT = head

• IT_EXCLUDING =

• IT_SPECIAL_GROUPS =

• IT_SORT =

• IT_FILTER =

• IS_SEL_HIDE =

• I_DEFAULT = 'X'

• I_SAVE = ' '

• IS_VARIANT =

• IT_EVENTS =

• IT_EVENT_EXIT =

• IS_PRINT =

• IS_REPREP_ID =

• I_SCREEN_START_COLUMN = 0

• I_SCREEN_START_LINE = 0

• I_SCREEN_END_COLUMN = 0

• I_SCREEN_END_LINE = 0

• IT_ALV_GRAPHICS =

• IT_HYPERLINK =

• IT_ADD_FIELDCAT =

• IT_EXCEPT_QINFO =

• I_HTML_HEIGHT_TOP =

• I_HTML_HEIGHT_END =

• IMPORTING

• E_EXIT_CAUSED_BY_CALLER =

• ES_EXIT_CAUSED_BY_USER =

TABLES

T_OUTTAB = ITAB

• EXCEPTIONS

• PROGRAM_ERROR = 1

• OTHERS = 2

.

IF SY-SUBRC <> 0.

• MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO

• WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.

ENDIF.)

[GauthamV]

hi,

use type instead of like.

data : head type slis_t_fieldcat_alv.

[former_member182426]

hi,

u should not delcare like this...

data : head like slis_t_fieldcat_alv.

u should declare like this

data: head TYPE slis_t_fieldcat_alv,
wa_head LIKE LINE OF it_fieldcat.

Regards,

Shankar.

[Former Member]

Hi,

Use this code.....

type-pools slis .
tables : kna1.
types : gitab type table of zguru.
data : itab type gitab.
data : wa type itab .
data : head type slis_t_fieldcat_alv.

select
kunnr
land1
name1
from kna1 into table itab up to 100 rows.

CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
  EXPORTING
    I_PROGRAM_NAME         = sy-repid
    I_INTERNAL_TABNAME     = ITAB
    I_CLIENT_NEVER_DISPLAY = 'X'
    I_INCLNAME             = sy-redid
    I_BYPASSING_BUFFER     = CHANGING
    CT_FIELDCAT            = head
  EXCEPTIONS
    INCONSISTENT_INTERFACE = 1
    PROGRAM_ERROR          = 2
    OTHERS                 = 3.

IF SY-SUBRC <> 0.
  MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
  WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
  EXPORTING
    I_INTERFACE_CHECK           = ' '
    I_BYPASSING_BUFFER          = ' '
    I_BUFFER_ACTIVE             = ' '
    I_CALLBACK_PROGRAM          = sy-repid
    I_CALLBACK_PF_STATUS_SET    = ' '
    I_CALLBACK_USER_COMMAND     = ' '
    I_CALLBACK_TOP_OF_PAGE      = ' '
    I_CALLBACK_HTML_TOP_OF_PAGE = ' '
    I_CALLBACK_HTML_END_OF_LIST = ' '
    I_BACKGROUND_ID             = ' '
    IT_FIELDCAT                 = head
    I_DEFAULT                   = 'X'
    I_SAVE                      = ' '
    I_SCREEN_START_COLUMN       = 0
    I_SCREEN_START_LINE         = 0
    I_SCREEN_END_COLUMN         = 0
    I_SCREEN_END_LINE           = 0
  TABLES
    T_OUTTAB                    = ITAB
  EXCEPTIONS
    PROGRAM_ERROR               = 1
    OTHERS                      = 2.

IF SY-SUBRC <> 0.
  MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
  WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.

Hope it will helps

[former_member611983]

thankx guys