request for alv

[sreelatha_gullapalli]

hi

<b>this is my code</b>

&----

---

*& Report ZALV1_15398

*&

&----

---

*&

*&

&----

---

REPORT zalv1_15398.

TYPE-POOLS: slis.

DATA: d_empid TYPE empid.

TYPES: BEGIN OF ty_itab,

id TYPE mandt,

no TYPE empid,

END OF ty_itab.

TYPES: tt_itab TYPE STANDARD TABLE OF ty_itab.

DATA: itab TYPE tt_itab,

wa_itab TYPE ty_itab.

SELECTION-SCREEN: BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.

SELECT-OPTIONS: s_id FOR d_empid.

SELECTION-SCREEN: END OF BLOCK b1.

SELECT

mandt

empid

FROM zemployee_info INTO TABLE itab

WHERE empid IN s_id.

PERFORM list_display.

&----

---

*& Form list_display

&----

---

• text

----

---

• --> p1 text

• <-- p2 text

----

---

FORM list_display .

DATA: it_fieldcat TYPE slis_t_fieldcat_alv,

wa_fieldcat TYPE slis_fieldcat_alv.

wa_fieldcat-tabname = 'ZEMPLOYEE_INFO'.

wa_fieldcat-fieldname = 'MANDT'.

wa_fieldcat-seltext_m = 'MANDT'.

APPEND wa_fieldcat TO it_fieldcat.

CLEAR wa_fieldcat.

wa_fieldcat-tabname = 'ZEMPLOYEE_INFO'.

wa_fieldcat-fieldname = 'EMPID'.

wa_fieldcat-seltext_m = 'EMP ID'.

APPEND wa_fieldcat TO it_fieldcat.

CLEAR wa_fieldcat.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

• I_INTERFACE_CHECK = ' '

• I_BYPASSING_BUFFER =

• I_BUFFER_ACTIVE = ' '

• I_CALLBACK_PROGRAM = ' '

• I_CALLBACK_PF_STATUS_SET = ' '

• I_CALLBACK_USER_COMMAND = ' '

• I_STRUCTURE_NAME =

• IS_LAYOUT =

it_fieldcat = it_fieldcat

• 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

• IR_SALV_LIST_ADAPTER =

• IT_EXCEPT_QINFO =

• I_SUPPRESS_EMPTY_DATA = ABAP_FALSE

• 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.

ENDFORM. " list_display

<u><b>the dump i am getting is:</b></u>

Short text

Field symbol has not yet been assigned.

Error analysis

You attempted to access an unassigned field symbol

(data segment 92).

This error may occur if

- You address a typed field symbol before it has been set with

ASSIGN

- You address a field symbol that pointed to the line of an

internal table that was deleted

- You address a field symbol that was previously reset using

UNASSIGN or that pointed to a local field that no

longer exists

- You address a global function interface, although the

respective function module is not active - that is, is

not in the list of active calls. The list of active calls

can be taken from this short dump.

can u please tell me the solution

regards,

Sreelatha Gullapalli

[former_member386202]

Hi,

while passing internal table of fieldcatalog pass it wih body.

it_fieldcat = it_fieldcat[]

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'

EXPORTING

• I_INTERFACE_CHECK = ' '

• I_BYPASSING_BUFFER =

• I_BUFFER_ACTIVE = ' '

• I_CALLBACK_PROGRAM = ' '

• I_CALLBACK_PF_STATUS_SET = ' '

• I_CALLBACK_USER_COMMAND = ' '

• I_STRUCTURE_NAME =

• IS_LAYOUT =

it_fieldcat = it_fieldcat[] try Like this

• 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

• IR_SALV_LIST_ADAPTER =

• IT_EXCEPT_QINFO =

• I_SUPPRESS_EMPTY_DATA = ABAP_FALSE

• 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.

Reagrds,

PRashant

[Former Member]

ONCE TRY THIS

TYPE-POOLS: slis.

DATA: d_empid TYPE empid.

TYPES: BEGIN OF ty_itab,
id TYPE mandt,
no TYPE empid,
END OF ty_itab.



*TYPES: tt_itab TYPE STANDARD TABLE OF ty_itab.


DATA: itab TYPE STANDARD TABLE OF tY_itab,
wa_itab TYPE ty_itab.


DATA: it_fieldcat TYPE slis_t_fieldcat_alv,
wa_fieldcat TYPE slis_fieldcat_alv,
gd_repid like sy-repid.


SELECTION-SCREEN: BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS: s_id FOR d_empid.
SELECTION-SCREEN: END OF BLOCK b1.

SELECT
mandt
empid
FROM zemployee_info INTO TABLE itab
WHERE empid IN s_id.


PERFORM list_display.

*&---------------------------------------------------------------------*
*& Form list_display
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
* --> p1 text
* <-- p2 text
*----------------------------------------------------------------------*
FORM list_display .


wa_fieldcat-tabname = 'ZEMPLOYEE_INFO'.
wa_fieldcat-fieldname = 'MANDT'.
wa_fieldcat-seltext_m = 'MANDT'.
APPEND wa_fieldcat TO it_fieldcat.
CLEAR wa_fieldcat.

wa_fieldcat-tabname = 'ZEMPLOYEE_INFO'.
wa_fieldcat-fieldname = 'EMPID'.
wa_fieldcat-seltext_m = 'EMP ID'.
APPEND wa_fieldcat TO it_fieldcat.
CLEAR wa_fieldcat.

CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
* I_INTERFACE_CHECK = ' '
* I_BYPASSING_BUFFER =
* I_BUFFER_ACTIVE = ' '
 I_CALLBACK_PROGRAM = 'gd_repid'
* I_CALLBACK_PF_STATUS_SET = ' '
* I_CALLBACK_USER_COMMAND = ' '
* I_STRUCTURE_NAME =
* IS_LAYOUT =
it_fieldcat = it_fieldcat
* 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
* IR_SALV_LIST_ADAPTER =
* IT_EXCEPT_QINFO =
* I_SUPPRESS_EMPTY_DATA = ABAP_FALSE
* 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.

ENDFORM. " list_display

[Former Member]

hi

REFER THIS LINK FOR DEVELOPING A ALV REPORT

http://www.sapdev.co.uk/reporting/alv/alvgrid_basic.htm