topic Re: Again ALV in Application Development and Automation Discussions

Again ALV

Former Member — Fri, 09 Mar 2007 08:53:16 GMT

Hi guys:

Does anyone know how to refresh a ALV list.

(After you do some changes of the lines,

the changes should be showed after you

click refresh button.)

Thx in advance.Points will be rewarded.

Vincent.

Re: Again ALV

Former Member — Fri, 09 Mar 2007 08:54:59 GMT

Hello,

Make the modification to the internal table

<b> RS_SELFIELD-REFRESH = 'X'.</b>

Vasanth

Re: Again ALV

Former Member — Fri, 09 Mar 2007 08:55:57 GMT

Hi,

In the user command subroutine you can give the field REFRESH = 'X'.

Example

FORM user_command USING ucomm LIKE sy-ucomm

selfield TYPE slis_selfield.

Refresh the ALV

<b>SELDFIELD-REFRESH = 'X'.</b>

ENDFORM.

Regards Rk

Re: Again ALV

Former Member — Fri, 09 Mar 2007 08:56:28 GMT

refresh the internal table

with

RS_SELFIELD-REFRESH = 'X'.

rewards if its helps u

vijay Pawar

Re: Again ALV

Former Member — Fri, 09 Mar 2007 09:00:51 GMT

Hi,

use REFRESH = 'X'.

ST_SELFIELD TYPE SLIS_SELFIELD.

st_selfield-refresh = 'X'.

check this.

Regards,

Sruthi

Re: Again ALV

Former Member — Fri, 09 Mar 2007 09:02:42 GMT

Hi,

REFRESH = 'X'

Regards,

Santosh

Re: Again ALV

Former Member — Fri, 09 Mar 2007 09:03:15 GMT

Or Try this

WHEN 'REFRESH'.
   SUBMIT <REPORT_NAME>.

Re: Again ALV

p291102 — Fri, 09 Mar 2007 09:09:40 GMT

Hi,

Herewith i am sending the sample report for that. Kindly go through it.

&----

*& Report YMS_REFRESHALV *

*& *

&----

*& *

&----

REPORT YMS_REFRESHALV .

TABLES :T247.

TYPE-POOLS SLIS. "Type definitions for alv report

DATA: IT_FIELDCAT TYPE LVC_T_FCAT,

WA_FIELDCAT TYPE LVC_S_FCAT.

DATA: WA_LAYOUT TYPE LVC_S_LAYO.

DATA : BEGIN OF IT_FINAL OCCURS 0,

CHECK(1),

CELLTAB TYPE LVC_T_STYL, " Switch between display/change

MNR LIKE T247-MNR,

LTX LIKE T247-LTX,

END OF IT_FINAL.

DATA : WA_FINAL LIKE IT_FINAL.

DATA : W_REPID LIKE SY-REPID.

W_REPID = SY-REPID.

REFRESH IT_FINAL.

SELECT MNR LTX

FROM T247

INTO CORRESPONDING FIELDS OF TABLE IT_FINAL

WHERE SPRAS EQ 'E'.

WA_FIELDCAT-FIELDNAME = 'CHECK'.

WA_FIELDCAT-TABNAME = 'IT_FINAL'.

WA_FIELDCAT-CHECKBOX = 'X'.

WA_FIELDCAT-EDIT = 'X'..

WA_FIELDCAT-OUTPUTLEN = '3'.

WA_FIELDCAT-COL_POS = '1'.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

WA_FIELDCAT-FIELDNAME = 'MNR'.

WA_FIELDCAT-TABNAME = 'IT_FINAL'.

WA_FIELDCAT-OUTPUTLEN = '8'.

WA_FIELDCAT-COL_POS = '2'.

WA_FIELDCAT-REPTEXT = 'Month'.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

WA_FIELDCAT-FIELDNAME = 'LTX'.

WA_FIELDCAT-TABNAME = 'IT_FINAL'.

WA_FIELDCAT-OUTPUTLEN = '20'.

WA_FIELDCAT-COL_POS = '3'.

WA_FIELDCAT-REPTEXT = 'Month Desc'.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

DATA: WA_CELLTAB TYPE LVC_S_STYL,

IT_CELLTAB TYPE LVC_T_STYL,

L_INDEX TYPE I.

CLEAR : WA_CELLTAB,WA_FINAL,IT_CELLTAB.

REFRESH IT_CELLTAB.

*Initialize the celltab table

LOOP AT IT_FINAL INTO WA_FINAL.

L_INDEX = SY-TABIX.

WA_CELLTAB-FIELDNAME = 'CHECK'.

WA_CELLTAB-STYLE = CL_GUI_ALV_GRID=>MC_STYLE_ENABLED.

INSERT WA_CELLTAB INTO TABLE IT_CELLTAB.

INSERT LINES OF IT_CELLTAB INTO TABLE WA_FINAL-CELLTAB.

MODIFY IT_FINAL FROM WA_FINAL INDEX L_INDEX.

ENDLOOP.

*Make the first five 5 rows as disabled

CLEAR L_INDEX.

LOOP AT IT_FINAL INTO WA_FINAL.

L_INDEX = SY-TABIX.

IF SY-TABIX LE 5.

LOOP AT WA_FINAL-CELLTAB INTO WA_CELLTAB.

IF WA_CELLTAB-FIELDNAME EQ 'CHECK' .

WA_CELLTAB-STYLE = CL_GUI_ALV_GRID=>MC_STYLE_DISABLED.

MODIFY WA_FINAL-CELLTAB FROM WA_CELLTAB.

MODIFY IT_FINAL INDEX L_INDEX FROM WA_FINAL TRANSPORTING CELLTAB.

ENDIF.

ENDLOOP.

ENDIF.

ENDLOOP.

WA_LAYOUT-BOX_FNAME = 'CHECK'.

WA_LAYOUT-NO_ROWMARK = 'X'.

WA_LAYOUT-STYLEFNAME = 'CELLTAB'.

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'

EXPORTING

I_CALLBACK_PROGRAM = W_REPID

I_GRID_TITLE = 'GRID DISPLAY'

IS_LAYOUT_LVC = WA_LAYOUT

IT_FIELDCAT_LVC = IT_FIELDCAT

TABLES

T_OUTTAB = IT_FINAL

EXCEPTIONS

PROGRAM_ERROR = 1

OTHERS = 2.

Thanks,

Shankar