Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

ALV Grid display

Former Member
0 Likes
760

Hi,

I need to display the Status of a process with in an ALV grid. I have these values stored in a Domain. I am able to populate the key values to the grid, where as i want to display the description of the key in the grid. I am able to display the drop down list box in the gird, but i am unable to assign the correct discription to be displayed based on the key value.

let me know the solution

Thanks in advance

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
726

First get the domain values through VRM_GET_VALUES function module or based on domain GET_DOMAIN_VALUES .There you will get the Domanin key .Use the same key an dvalue to populate the drop down for the field as

DATA lt_ddval TYPE lvc_t_drop .

DATA ls_ddval TYPE lvc_s_drop .

ls_ddval-handle = '1' . this key should be the domain key.

ls_ddval-value = 'JFK-12' .

APPEND ls_ddval TO lt_ddval .

ls_ddval-handle = '1' .

ls_ddval-value = 'JSF-44' .

APPEND ls_ddval TO lt_ddval .

ls_ddval-handle = '1' .

ls_ddval-value = 'KMDA-53' .

APPEND ls_ddval TO lt_ddval .

ls_ddval-handle = '1' .

ls_ddval-value = 'SS3O/N' .

APPEND ls_ddval TO lt_ddval .

CALL METHOD gr_alvgrid->set_drop_down_table

EXPORTING

it_drop_down = lt_ddval .

Please reward if useful.

Hi,

I need to display the Status of a process with in an ALV grid. I have these values stored in a Domain. I am able to populate the key values to the grid, where as i want to display the description of the key in the grid. I am able to display the drop down list box in the gird, but i am unable to assign the correct discription to be displayed based on the key value.

let me know the solution

Thanks in advance

3 REPLIES 3
Read only

Former Member
0 Likes
727

First get the domain values through VRM_GET_VALUES function module or based on domain GET_DOMAIN_VALUES .There you will get the Domanin key .Use the same key an dvalue to populate the drop down for the field as

DATA lt_ddval TYPE lvc_t_drop .

DATA ls_ddval TYPE lvc_s_drop .

ls_ddval-handle = '1' . this key should be the domain key.

ls_ddval-value = 'JFK-12' .

APPEND ls_ddval TO lt_ddval .

ls_ddval-handle = '1' .

ls_ddval-value = 'JSF-44' .

APPEND ls_ddval TO lt_ddval .

ls_ddval-handle = '1' .

ls_ddval-value = 'KMDA-53' .

APPEND ls_ddval TO lt_ddval .

ls_ddval-handle = '1' .

ls_ddval-value = 'SS3O/N' .

APPEND ls_ddval TO lt_ddval .

CALL METHOD gr_alvgrid->set_drop_down_table

EXPORTING

it_drop_down = lt_ddval .

Please reward if useful.

Read only

Former Member
0 Likes
726

Refer this

w_drop_alias-handle = '3'.
w_drop_alias-value = 'SIMPLE'.
w_drop_alias-int_value = 'SIM'.
APPEND w_drop_alias TO i_drop_alias.

w_drop_alias-handle = '3'.
w_drop_alias-value = 'MEDIUM'.
w_drop_alias-int_value = 'MED'.
APPEND w_drop_alias TO i_drop_alias.

w_drop_alias-handle = '3'.
w_drop_alias-value = 'HIGH'.
w_drop_alias-int_value = 'HIG'.
APPEND w_drop_alias TO i_drop_alias.

w_drop_alias-handle = '3'.
w_drop_alias-value = 'EXTREMELY HIGH'.
w_drop_alias-int_value = 'EXT'.
APPEND w_drop_alias TO i_drop_alias.

CALL METHOD o_alvgrid->set_drop_down_table
EXPORTING
* it_drop_down = i_drop[].
it_drop_down_alias = i_drop_alias[].

U have to fetch the value like this: Here i_effest is an output table in an alv grid.
loop at i_effest.
READ TABLE i_drop_alias WITH KEY handle = '3'
value = i_effest-complex
INTO w_drop_alias.
IF sy-subrc EQ 0.
complex = w_drop_alias-int_value.
ENDIF.
endloop.

Read only

p291102
Active Contributor
0 Likes
726

Hi,

Check the sample coding of the ALV GRID DISPLAY report.

REPORT YMS_COLOURALV NO STANDARD PAGE HEADING.

TYPE-POOLS: SLIS, ICON.

DATA: FIELDCAT TYPE SLIS_T_FIELDCAT_ALV.

DATA: BEGIN OF IMARA OCCURS 0,

LIGHT(4) TYPE C,

MATNR TYPE MARA-MATNR,

MTART TYPE MARA-MTART,

MAKTX TYPE MAKT-MAKTX,

COLOR_LINE(4) TYPE C,

TCOLOR TYPE SLIS_T_SPECIALCOL_ALV, "cell

END OF IMARA.

DATA: XCOLOR TYPE SLIS_SPECIALCOL_ALV.

START-OF-SELECTION.

PERFORM GET_DATA.

PERFORM WRITE_REPORT.

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

  • Get_Data

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

FORM GET_DATA.

WRITE ICON_GREEN_LIGHT AS ICON TO IMARA-LIGHT.

IMARA-MATNR = 'ABC'.

IMARA-MTART = 'ZCFG'.

IMARA-MAKTX = 'This is description for ABC'.

APPEND IMARA.

WRITE ICON_YELLOW_LIGHT AS ICON TO IMARA-LIGHT.

IMARA-MATNR = 'DEF'.

IMARA-MTART = 'ZCFG'.

IMARA-MAKTX = 'This is description for DEF'.

APPEND IMARA.

WRITE ICON_RED_LIGHT AS ICON TO IMARA-LIGHT.

IMARA-MATNR = 'GHI'.

IMARA-MTART = 'ZCFG'.

IMARA-MAKTX = 'This is description for GHI'.

APPEND IMARA.

LOOP AT IMARA.

IF SY-TABIX = 1.

IMARA-COLOR_LINE = 'C410'. " color line

ENDIF.

IF SY-TABIX = 2. " color CELL

CLEAR XCOLOR.

XCOLOR-FIELDNAME = 'MTART'.

XCOLOR-COLOR-COL = '3'.

XCOLOR-COLOR-INT = '1'. " Intensified on/off

XCOLOR-COLOR-INV = '0'.

APPEND XCOLOR TO IMARA-TCOLOR.

ENDIF.

MODIFY IMARA.

ENDLOOP.

ENDFORM. "get_data

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

  • WRITE_REPORT

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

FORM WRITE_REPORT.

DATA: LAYOUT TYPE SLIS_LAYOUT_ALV.

LAYOUT-COLTAB_FIELDNAME = 'TCOLOR'.

LAYOUT-INFO_FIELDNAME = 'COLOR_LINE'.

PERFORM BUILD_FIELD_CATALOG.

  • CALL ABAP LIST VIEWER (ALV)

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

EXPORTING

IS_LAYOUT = LAYOUT

IT_FIELDCAT = FIELDCAT

TABLES

T_OUTTAB = IMARA.

ENDFORM. "write_report

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

  • BUILD_FIELD_CATALOG

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

FORM BUILD_FIELD_CATALOG.

DATA: FC_TMP TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE.

CLEAR: FIELDCAT. REFRESH: FIELDCAT.

CLEAR: FC_TMP.

FC_TMP-REPTEXT_DDIC = 'Status'.

FC_TMP-FIELDNAME = 'LIGHT'.

FC_TMP-TABNAME = 'IMARA'.

FC_TMP-OUTPUTLEN = '4'.

FC_TMP-ICON = 'X'.

APPEND FC_TMP TO FIELDCAT.

CLEAR: FC_TMP.

FC_TMP-REPTEXT_DDIC = 'Material Number'.

FC_TMP-FIELDNAME = 'MATNR'.

FC_TMP-TABNAME = 'IMARA'.

FC_TMP-OUTPUTLEN = '18'.

APPEND FC_TMP TO FIELDCAT.

CLEAR: FC_TMP.

FC_TMP-REPTEXT_DDIC = 'Material Type'.

FC_TMP-FIELDNAME = 'MTART'.

FC_TMP-TABNAME = 'IMARA'.

FC_TMP-OUTPUTLEN = '10'.

APPEND FC_TMP TO FIELDCAT.

CLEAR: FC_TMP.

FC_TMP-REPTEXT_DDIC = 'Material'.

FC_TMP-FIELDNAME = 'MAKTX'.

FC_TMP-TABNAME = 'IMARA'.

FC_TMP-OUTPUTLEN = '40'.

FC_TMP-EMPHASIZE = 'C610'. " color column

APPEND FC_TMP TO FIELDCAT.

ENDFORM. "build_field_catalog

Thanks,

Shankar