Hi Question Related To  ALV'S

Hi  Abapers ,
                         I am having a requirement the which are displayed in the first ALV needed to be selected and to be displayed in the Second ALV , this is code which i have written ....... the check-box is not updating ....
TYPE-POOLS:SLIS.
TABLES:KNA1,VBAK.
PARAMETERS:P_KUNNR TYPE KNA1-kunnr.
TYPES:BEGIN OF TY_VBAK,
      CHECK TYPE C,
      VBELN TYPE VBELN_VA,
      ERDAT TYPE ERDAT,
      ERZET TYPE ERZET,
      ERNAM TYPE ERNAM,
      ANGDT TYPE ANGDT_V,
      BNDDT TYPE BNDDT,
      AUDAT TYPE AUDAT,
      VBTYP TYPE VBTYP,
      END OF TY_VBAK.
TYPES:TY_T_VBAK TYPE STANDARD TABLE OF TY_VBAK.
DATA:T_VBAK TYPE STANDARD TABLE OF TY_VBAK ,
     W_VBAK TYPE  TY_VBAK ,
     T_FIELDCAT TYPE slis_t_fieldcat_alv ,
     W_FIELDCAT TYPE SLIS_FIELDCAT_ALV,
     W_LAYOUT   TYPE SLIS_LAYOUT_ALV,
     T_VBAK1 TYPE STANDARD TABLE OF TY_VBAK.
FORM set_pf_status USING extab TYPE slis_t_extab.
SET PF-STATUS 'Y1VBAK'.
ENDFORM.
FORM USER_COMMAND USING U_COMM TYPE SY-UCOMM CHANGING SEL_FIELD TYPE SLIS_SELFIELD.
CASE U_COMM.
WHEN 'KEY'.
LOOP AT T_VBAK INTO W_VBAK  WHERE  CHECK = 'X'.
APPEND W_VBAK TO T_VBAK1.
CLEAR W_VBAK.
ENDLOOP.
IF T_VBAK1 IS NOT INITIAL.
PERFORM ALVLIST_DISPLAY1.
ENDIF.
WHEN 'BACK'.
LEAVE PROGRAM.
ENDCASE.
ENDFORM.
START-OF-SELECTION.
PERFORM SUB_FIELDCAT.
SELECT VBELN
       ERDAT
       ERZET
       ERNAM
       ANGDT
       BNDDT
       AUDAT
       VBTYP
       FROM
       VBAK INTO CORRESPONDING FIELDS OF
       TABLE T_VBAK WHERE KUNNR = P_KUNNR.
END-OF-SELECTION.
PERFORM ALVLIST_DISPLAY.
***&      Form  SUB_FIELDCAT
      text
-->  p1        text
<--  p2        text
FORM SUB_FIELDCAT .
CLEAR:W_FIELDCAT.
*W_FIELDCAT-col_pos = '1'.
*W_FIELDCAT-fieldname = 'ICON'.
*W_FIELDCAT-seltext_l = 'Status'.
*W_FIELDCAT-icon = 'X'.
*APPEND W_FIELDCAT TO t_fieldcat.
W_FIELDCAT-col_pos = '1' .
W_FIELDCAT-fieldname = 'CHECK'.
W_FIELDCAT-CHECKBOX = 'X'.
W_FIELDCAT-tabname = 'T_VBAK'.
W_FIELDCAT-edit = 'X'.
APPEND W_FIELDCAT TO T_FIELDCAT.
CLEAR:W_FIELDCAT.
W_FIELDCAT-col_pos = '2' .
W_FIELDCAT-fieldname = 'VBELN'.
APPEND W_FIELDCAT TO T_FIELDCAT.
CLEAR:W_FIELDCAT.
W_FIELDCAT-col_pos = '3' .
W_FIELDCAT-fieldname = 'ERDAT'.
W_FIELDCAT-no_out = 'X'.
APPEND W_FIELDCAT TO T_FIELDCAT.
CLEAR:W_FIELDCAT.
W_FIELDCAT-col_pos = '4' .
W_FIELDCAT-fieldname = 'ERZET'.
APPEND W_FIELDCAT TO T_FIELDCAT.
CLEAR:W_FIELDCAT.
W_FIELDCAT-col_pos = '5' .
W_FIELDCAT-fieldname = 'ERNAM'.
APPEND W_FIELDCAT TO T_FIELDCAT.
CLEAR:W_FIELDCAT.
W_FIELDCAT-col_pos = '6' .
W_FIELDCAT-fieldname = 'ANGDT'.
APPEND W_FIELDCAT TO T_FIELDCAT.
CLEAR:W_FIELDCAT.
W_FIELDCAT-col_pos = '7' .
W_FIELDCAT-fieldname = 'BNDDT'.
W_FIELDCAT-edit = 'X'.
APPEND W_FIELDCAT TO T_FIELDCAT.
CLEAR:W_FIELDCAT.
W_FIELDCAT-col_pos = '8' .
W_FIELDCAT-fieldname = 'AUDAT'.
APPEND W_FIELDCAT TO T_FIELDCAT.
CLEAR:W_FIELDCAT.
W_FIELDCAT-col_pos = '9' .
W_FIELDCAT-fieldname = 'VBTYP'.
APPEND W_FIELDCAT TO T_FIELDCAT.
CLEAR:W_FIELDCAT.
W_layout-box_fieldname = 'CHECK'.
*W_LAYOUT-edit  = 'X'.
ENDFORM.                    " SUB_FIELDCAT
FORM ALVLIST_DISPLAY.
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          =  'SET_PF_STATUS'
    I_CALLBACK_USER_COMMAND           = '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                         = W_LAYOUT
    IT_FIELDCAT                       = T_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
  I_HTML_HEIGHT_TOP                 = 0
  I_HTML_HEIGHT_END                 = 0
  IT_ALV_GRAPHICS                   =
  IT_HYPERLINK                      =
  IT_ADD_FIELDCAT                   =
  IT_EXCEPT_QINFO                   =
  IR_SALV_FULLSCREEN_ADAPTER        =
IMPORTING
  E_EXIT_CAUSED_BY_CALLER           =
  ES_EXIT_CAUSED_BY_USER            =
  TABLES
    T_OUTTAB                          = T_VBAK
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.
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
EXPORTING
  I_INTERFACE_CHECK              = ' '
  I_BYPASSING_BUFFER             =
  I_BUFFER_ACTIVE                = ' '
   I_CALLBACK_PROGRAM             = SY-REPID
   I_CALLBACK_PF_STATUS_SET       = 'Y1VBAK'
   I_CALLBACK_USER_COMMAND        = 'USER_COMMAND'
  I_STRUCTURE_NAME               =
  IS_LAYOUT                      =
   IT_FIELDCAT                    =  T_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                       = T_VBAK
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.                    " ALVLIST_DISPLAY
FORM ALVLIST_DISPLAY1.
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          =  'SET_PF_STATUS'
    I_CALLBACK_USER_COMMAND           = '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                         = W_LAYOUT
    IT_FIELDCAT                       = T_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
  I_HTML_HEIGHT_TOP                 = 0
  I_HTML_HEIGHT_END                 = 0
  IT_ALV_GRAPHICS                   =
  IT_HYPERLINK                      =
  IT_ADD_FIELDCAT                   =
  IT_EXCEPT_QINFO                   =
  IR_SALV_FULLSCREEN_ADAPTER        =
IMPORTING
  E_EXIT_CAUSED_BY_CALLER           =
  ES_EXIT_CAUSED_BY_USER            =
  TABLES
    T_OUTTAB                          = T_VBAK1
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.
Thanks & Regards
Bhaskar Rao.M

Hi Bhaskar,
Check the sample code below and compare it with u r code...
Just set the PF-STATUS...
TYPE-POOLS: SLIS.
DATA: FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
       FIELDCAT_LN LIKE LINE OF FIELDCAT,
       SORTCAT          TYPE SLIS_T_SORTINFO_ALV,
       LAYOUT           TYPE SLIS_LAYOUT_ALV,
       SORTCAT_LN       LIKE LINE OF SORTCAT,
       EVENTCAT         TYPE SLIS_T_EVENT,
       EVENTCAT_LN      LIKE LINE OF EVENTCAT,
       COUNT TYPE I,
        COLCELL TYPE SLIS_FIELDNAME VALUE 'MATNR'.
DATA: COL_POS TYPE I,
        W_FNAME TYPE DD03L-FIELDNAME.
******Declare Data Areas for List Viewer (End)**************
******Declare Internal Table to Store Selected Data (Begin)*
DATA LS_CELLCOLOR TYPE SLIS_T_SPECIALCOL_ALV  WITH HEADER LINE.
DATA:  BEGIN OF TSPFLI OCCURS 10 ,
          CHECK TYPE SLIS_FIELDNAME,
          COLOR(3),
          COLCELLS TYPE SLIS_T_SPECIALCOL_ALV.
         INCLUDE STRUCTURE SPFLI.
DATA : END OF TSPFLI.
*Declare Internal Table to Store Selected Data (Begin) For sflight*
DATA:
   W_SPFLI LIKE LINE OF TSPFLI.
DATA : BEGIN OF FS_SFLIGHT,
          CHECK TYPE SLIS_FIELDNAME,
          COLOR(3).
         INCLUDE STRUCTURE SFLIGHT.
DATA : END OF FS_SFLIGHT.
DATA
   T_SFLIGHT LIKE
    STANDARD TABLE
          OF FS_SFLIGHT.
*Declare Internal Table to Store Selected Data (Begin) For sbook*
DATA:
W_SFLIGHT LIKE LINE OF T_SFLIGHT.
DATA : BEGIN OF FS_SBOOK,
          CHECK TYPE SLIS_FIELDNAME.
         INCLUDE STRUCTURE SBOOK.
DATA : END OF FS_SBOOK.
DATA
   T_SBOOK LIKE
    STANDARD TABLE
          OF FS_SBOOK.
******Declare Internal Table to Store Selected Data (End)***
*******Select Data into Internal Table (Begin) ***************
SELECT *
         INTO CORRESPONDING FIELDS OF TSPFLI
        FROM SPFLI.
   APPEND TSPFLI.
   CLEAR TSPFLI.
ENDSELECT.
Select Data into Internal Table (End) ****************
PERFORM BUILD_FIELDCAT4.
PERFORM BUILD_FIELDCAT6.
PERFORM BUILD_FIELDCAT7.
PERFORM BUILD_LISTCAT.
PERFORM BUILD_EVENTCAT.
PERFORM START_LIST_VIEWER.
*&      Form  build_fieldcat4
      text
FORM BUILD_FIELDCAT4.
   FIELDCAT_LN-FIELDNAME = 'CHECK'.
   APPEND FIELDCAT_LN TO FIELDCAT.
   CLEAR FIELDCAT_LN.
ENDFORM.                    "BUILD_FIELDCAT4
*&      Form  build_fieldcat6
      text
FORM BUILD_FIELDCAT6.
   FIELDCAT_LN-FIELDNAME = 'COLOR'.
   FIELDCAT_LN-OUTPUTLEN = 4.
   APPEND FIELDCAT_LN TO FIELDCAT.
   CLEAR FIELDCAT_LN.
ENDFORM.                    "build_fieldcat6
*&      Form  BUILD_FIELDCAT7
      text
FORM BUILD_FIELDCAT7.
   FIELDCAT_LN-FIELDNAME = 'COLCELLS'.
   APPEND FIELDCAT_LN TO FIELDCAT.
   CLEAR FIELDCAT_LN.
ENDFORM.                    "build_fieldcat6
*&      Form  build_listcat
      text
FORM BUILD_LISTCAT.
   LAYOUT-BOX_FIELDNAME    = 'CHECK'.
   LAYOUT-INFO_FIELDNAME   = 'COLOR'.
   LAYOUT-COLTAB_FIELDNAME = 'COLCELLS'.
ENDFORM.                    "build_listcat
*&      Form  BUILD_EVENTCAT
      text
FORM BUILD_EVENTCAT.
   EVENTCAT_LN-NAME = 'PF_STATUS_SET'.
   EVENTCAT_LN-FORM = 'STATUSSET'.
   APPEND EVENTCAT_LN TO EVENTCAT.
   EVENTCAT_LN-NAME = 'USER_COMMAND'.
   EVENTCAT_LN-FORM = 'USERCOMM'.
   APPEND EVENTCAT_LN TO EVENTCAT.
ENDFORM.                    "BUILD_EVENTCAT
*&      Form  STATUSSET
      text
     -->RT_EXTAB   text
FORM STATUSSET
    USING RT_EXTAB TYPE SLIS_T_EXTAB.
   DATA
     W_EXTAB TYPE SLIS_EXTAB.
   CLEAR RT_EXTAB[].
   W_EXTAB-FCODE = 'SBOOK'.
   APPEND W_EXTAB TO RT_EXTAB.
   SET PF-STATUS 'STATUS' EXCLUDING RT_EXTAB.
ENDFORM.                    "STATUSSET
*&      Form  START_LIST_VIEWER
      text
FORM START_LIST_VIEWER.
   DATA: PGM LIKE SY-REPID.
   PGM = SY-REPID.
   CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
       EXPORTING
          I_CALLBACK_PROGRAM       = PGM
          i_callback_pf_status_set = ' '
        I_CALLBACK_USER_COMMAND  = 'USER_COMMAND'
            I_STRUCTURE_NAME         = 'SPFLI'
              IS_LAYOUT                = LAYOUT
          IS_VARIANT               = ' '
            IT_EVENTS                = EVENTCAT
          IT_EVENT_EXIT            =
        TABLES
             T_OUTTAB                 = TSPFLI
        EXCEPTIONS
             PROGRAM_ERROR            = 1
             OTHERS                   = 2.
ENDFORM.                    "START_LIST_VIEWER
*&      Form  USERCOMM
      text
     -->UCOMM      text
     -->SELFIELD   text
FORM USERCOMM USING UCOMM LIKE SY-UCOMM
                     SELFIELD TYPE SLIS_SELFIELD.
   CLEAR FIELDCAT[].
   CASE UCOMM.
     WHEN 'SFLIGHT'.
       CLEAR T_SFLIGHT[].
       LOOP AT TSPFLI INTO W_SPFLI.
         IF W_SPFLI-CHECK EQ 'X'.
           SELECT *
             FROM SFLIGHT
        APPENDING CORRESPONDING FIELDS OF TABLE T_SFLIGHT
            WHERE CARRID = W_SPFLI-CARRID
              AND CONNID = W_SPFLI-CONNID.
           W_SPFLI-CHECK = '1'.
           W_SPFLI-COLOR = 'C21'.
           MODIFY TSPFLI FROM W_SPFLI TRANSPORTING CHECK COLOR.
         ENDIF.
       ENDLOOP.
       PERFORM BUILD_FIELDCAT9.
       PERFORM BUILD_EVENTCAT1.
       PERFORM START_LIST_VIEWER1.
   ENDCASE.
   SELFIELD-REFRESH = 'X'.
ENDFORM.                    "USERCOMM
*&      Form  START_LIST_VIEWER1
      text
FORM START_LIST_VIEWER1.
   DATA: PGM LIKE SY-REPID.
   PGM = SY-REPID.
   CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
    EXPORTING
      I_INTERFACE_CHECK              = ' '
       I_CALLBACK_PROGRAM             = PGM
      I_CALLBACK_PF_STATUS_SET       = ' '
      I_CALLBACK_USER_COMMAND        = ' '
      I_STRUCTURE_NAME               = 'SFLIGHT'
            IS_LAYOUT                = LAYOUT
       IT_FIELDCAT                    = FIELDCAT
      IT_SORT                        =
       IT_EVENTS                      =  EVENTCAT
     TABLES
       T_OUTTAB                       = T_SFLIGHT
    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.                    "START_LIST_VIEWER1
*&      Form  BUILD_EVENTCAT1
      text
FORM BUILD_EVENTCAT1.
   CLEAR EVENTCAT[].
   EVENTCAT_LN-NAME = 'PF_STATUS_SET'.
   EVENTCAT_LN-FORM = 'STATUSSET1'.
   APPEND EVENTCAT_LN TO EVENTCAT.
   CLEAR EVENTCAT_LN.
   EVENTCAT_LN-NAME = 'USER_COMMAND'.
   EVENTCAT_LN-FORM = 'USERCOMM1'.
   APPEND EVENTCAT_LN TO EVENTCAT.
ENDFORM.                    "BUILD_EVENTCAT
*&      Form  STATUSSET1
      text
     -->RT_EXTAB   text
FORM STATUSSET1
    USING RT_EXTAB TYPE SLIS_T_EXTAB.
   DATA
     W_EXTAB TYPE SLIS_EXTAB.
   CLEAR RT_EXTAB[].
   W_EXTAB-FCODE = 'SFLIGHT'.
   APPEND  W_EXTAB TO RT_EXTAB.
   SET PF-STATUS 'STATUS' EXCLUDING RT_EXTAB.
ENDFORM.                    "STATUSSET
*.................................USERCOMM1..................
FORM USERCOMM1 USING UCOMM LIKE SY-UCOMM
                     SELFIELD TYPE SLIS_SELFIELD.
   CLEAR FIELDCAT[].
   CASE UCOMM.
     WHEN 'SBOOK'.
       CLEAR T_SBOOK[].
       LOOP AT T_SFLIGHT INTO W_SFLIGHT.
         IF W_SFLIGHT-CHECK EQ 'X'.
           SELECT *
             FROM SBOOK
        APPENDING CORRESPONDING FIELDS OF TABLE T_SBOOK
            WHERE CARRID = W_SFLIGHT-CARRID
              AND CONNID = W_SFLIGHT-CONNID
           AND FLDATE = W_SFLIGHT-FLDATE.
           W_SFLIGHT-CHECK = '1'.
           W_SFLIGHT-COLOR = 'C81'.
           MODIFY T_SFLIGHT FROM W_SFLIGHT TRANSPORTING CHECK COLOR.
         ENDIF.
       ENDLOOP.
       PERFORM BUILD_FIELDCAT9.
       PERFORM BUILD_EVENTCAT2.
       PERFORM START_LIST_VIEWER2.
   ENDCASE.
   SELFIELD-REFRESH = 'X'.
ENDFORM.                                                   " USERCOMM1
*&      Form  BUILD_FIELDCAT9
      text
FORM BUILD_FIELDCAT9.
   CLEAR FIELDCAT[].
   FIELDCAT_LN-FIELDNAME = 'CHECK'.
   APPEND FIELDCAT_LN TO FIELDCAT.
   CLEAR FIELDCAT_LN.
   LAYOUT-BOX_FIELDNAME    = 'CHECK'.
ENDFORM.                    "BUILD_FIELDCAT8
*&      Form  START_LIST_VIEWER2
      text
FORM START_LIST_VIEWER2.
   DATA: PGM LIKE SY-REPID.
   PGM = SY-REPID.
   CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
    EXPORTING
      I_INTERFACE_CHECK              = ' '
      I_BYPASSING_BUFFER             =
      I_BUFFER_ACTIVE                = ' '
       I_CALLBACK_PROGRAM             = PGM
      I_CALLBACK_PF_STATUS_SET       = ' '
      I_CALLBACK_USER_COMMAND        = ' '
      I_STRUCTURE_NAME               = 'SBOOK'
       IS_LAYOUT                      = LAYOUT
       IT_FIELDCAT                    = FIELDCAT
      IT_SORT                        =
      IT_FILTER                      =
      IS_SEL_HIDE                    =
       IT_EVENTS                      = EVENTCAT
     TABLES
       T_OUTTAB                       = T_SBOOK
    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.                    "START_LIST_VIEWER1
*&      Form  BUILD_EVENTCAT2
      text
FORM BUILD_EVENTCAT2.
   CLEAR EVENTCAT[].
   EVENTCAT_LN-NAME = 'PF_STATUS_SET'.
   EVENTCAT_LN-FORM = 'STATUSSET2'.
   APPEND EVENTCAT_LN TO EVENTCAT.
ENDFORM.                    "BUILD_EVENTCAT
*&      Form  STATUSSET1
      text
     -->RT_EXTAB   text
FORM STATUSSET2
    USING RT_EXTAB TYPE SLIS_T_EXTAB.
   DATA
     W_EXTAB TYPE SLIS_EXTAB.
   CLEAR RT_EXTAB[].
   W_EXTAB-FCODE = 'SFLIGHT'.
   APPEND  W_EXTAB TO RT_EXTAB.
   W_EXTAB-FCODE = 'SBOOK'.
   APPEND  W_EXTAB TO RT_EXTAB.
   SET PF-STATUS 'STATUS' EXCLUDING RT_EXTAB.
ENDFORM.                    "STATUSSET
Reward if it is helpful...
Regards,
Omkar..
Message was edited by:
        Omkaram Yanamala

Similar Messages

  • Can someone plz confirm me that how i can change or update the security questions related to my apple id? as i have been never put them since i create my apple id but now due to some security reasons its asking me again and again the answers. i am unable

    can someone plz confirm me that how i can change or update the security questions related to my apple id? as i have been never put them since i create my apple id but now due to some security reasons its asking me again and again the answers. i am unable to go through the process. thanks.

    Some Solutions for Resetting Forgotten Security Questions: Apple Support Communities

  • Question related to Java Concurrent Program

    Hi Friends,
    I have a basic question related to Java Concurrent Program in the Oracle application. I would like to know the how Java concurrent program is executed in Oracle applications.Also, want to know where can I find the document for the AOL packages for Java concurrent program. Document for packages like oracle.apps.fnd.cp.request.* , oracle.apps.fnd.util.*.
    Please let me know.
    -Thanks,
    Satya

    You may also check:
    Note: 250964.1 - How to Register Sample Java Concurrent Program
    https://metalink.oracle.com/metalink/plsql/ml2_documents.showDocument?p_database_id=NOT&p_id=250964.1
    Note: 186301.1 - How to register and execute Java Concurrent Program ?in Oracle Applications R11i?
    https://metalink.oracle.com/metalink/plsql/ml2_documents.showDocument?p_database_id=NOT&p_id=186301.1

  • Interview Questions related to Warehouse management

    Hi all
    Can u please help me regarding  Interview Questions related to Warehouse management
    Thanks and Regds
    Daniel

    Have you searched in very first thread
    [Warehouse Management?|New to Materials Management / Warehouse Management?;

  • Questions relating to Groupware Integration (Outlook)

    Hello,
    I have few questions relating to groupware integration for Outlook:
    Q1) The "Relate to CRM" option in outlook add-in for end user is available only  in client side integration? Is it not available for server sider integration (i.e. in server side, end user cannot directly assign CRM account or Transaction to object in outlook the way it is done in client side)?
    Q2) Is there any end user interface (like add-on) available in server side?
    Q3)In client side - Can the outlook add-on for SAPCRM be enhanced for different business logic or look n feel?
    Thanks,
    Vicky

    Hello Vicky,
    1) Yes the Relate to SAP CRM function is part of Client-side groupware only.
    2) The Add-in is only available with Client-side groupware.
    3) The Add-in cannot be customized. However the results can be influenced by parameters in transaction GWIPROFILE.
    The information displayed in the Business information Pane can be changed.
    Best Regards,
    Gervase Auden

  • Basic Questions related EHPs for SEM

    Hi Guys,
    I've some basic questions related to EHPs: -
    1. If we don't mean to implement any of the new functionalities does it make any sense to implement EHP? In other words do EHPs also have some general improments other than the functionalities which can be specifically activated?
    2. If we just activate a functionality and don't implement/ use it can there be any negative impact?
    3. In case of a pure technical upgrade from SEM 4.0 to SEM 6.0 which EHP would be recommended?
    4. Is there a quick way to find all relevant notes in EHPn which are related to corrections for EHPn-1?
    Thanks in advance,
    -SSC

    HI,
    If you see some of my older posts I have had many issues with certain features of the EHP2 functionality but that doesn't mean I would recommned against it.
    BCS 6 EHPs 3 & 4  (BCS 6.03 / 6.04) - enhancement packs worth implementing?
    BCS 6 EHP 2 (BCS 6.02) - activation of enhancement pack
    My recommendation is to implement the EHPs but not necesarrily activate the functions (in SFW5) unless you need them - this means that you will only have to test once after EHP implementation and will have the ability to activate the other features as and when required (although testing is required after activation of course) whereas it might be difficult to persuade your client/basis team to implement EHP4 later if you don't do it now.
    In the features of EHP2 (activate FIN_ACC_GROUP_CLOSE) it states that there is a general performance improvement - although I have yet to experience it! From OSS note 1171344 "The functionality which is available in EHP2 consists of...
    ... Performance improvements of status management, reporting and initial start-up of consolidation workbench and monitor.
    Since activating FIN_ACC_GROUP_CLOSE I have had many OSS notes requiring application but i discovered that when the technical team implemented the EHPs (before i joined this client) they somehow forgot the latest SP (support packs) and didn't upgrade to the current level - so make sure that you get the right SPs too (see the links in Greg's link above) to avoid the many OSS notes.
    As for your question - "is there a list of OSS notes to specific to EHP upgrades? - the answer is most definietly "NO" - I already asked OSS in desperation!
    however, you can see the OSS notes that i have applied listed in the above link ( BCS 6 EHP 2 (BCS 6.02) - activation of enhancement pack )

  • Some questions related to SAP XI

    Hello!
    I would like to know the answers for the following questions regarding SAP XI-context (if it possible with Yes/No and a short comment/explanation)
    <b>CAPACITY PLANNING GUIDELINES</b>
    a) Guidelines to size the server(s)?
    b) Guidelines for sizing the over all environment for High-Availability
    <b>ARCHIVING CAPABILITIES</b>
    a) Approach to archiving of obsolete data
    <b>PLATFORM SUPPORT</b>
    a) Software supported on HP-UX 11.i V2 (r6) on Itanium.
    b) software supported on Windows 2003 sp1 (x64) on AMD Opteron 
    c) software support aligned with release roadmaps for future versions of HP-UX and/or Windows Server
    d) Software supported on OS clustered servers  (If mutliple products, please indicate if all are support or list areas where clustering may not be recommended and why)
    <b>RELATIONAL DATABASE </b>
    a) Does your system run native to the Oracle 10g RDBMS (RAC) and database tools?  If not, please explain the databases and tools supported.
    b) database monitoring tools be used to manage impending maintenance needs and potential problems and performance impacts (i.e., tool will monitor and detect prior to real problem occurring)
    c) standard pre-defined SQL queries and related calculations provided for use with industry standard reporting tools
    d) database accept binary-large-objects (BLOBs) and  be referenced via the relational engine.
    Thank you in advance!
    Regards!
    A.Henke

    two questions related to this:
    1. Why Java is designed to only permit single
    inheritence, any stories behind the scene? I think
    some major reasons why "prefer interfaces toabstract
    classes" is accepted is rooted in this limitation.Yes, one of the reasons interfaces are better is that
    you can only extend one class, but implement many
    interfaces. Say you have a concrete class that should
    "implement" two different types. If those types were
    defined as abstract classes, you could only use one
    type. You could implement both types if they were
    interfaces though. So why java is designed to have this limitation? There may be some arguments before this is settled down. I always like to hear this kind of stories:)
    2. Base on the fact that once an interface is outof
    box and widely implemented, it is almostimpossible
    to change it. So how you guys design yourinterfaces?
    Could you share some? In my idea, I would designmy
    interfaces as compact as possible.You could extend the interface and start using that
    if you didn't want to break existing code. You
    couldn't use that implementation as an Interface1
    though, since the new methods only exist in
    Interface2, so that's not an optimal solution.So we may always need to add a new interface when we just want to add a new method.

  • General questions related to Java

    Good evening,I would like to ask you some questions related to Java :
    1) class A {
    public int x=1;
    public int y=5;
    public A() { y=6; }
    public A(int a) { x=a; }
    public A(int a, int b) { x=a; y=b; }
    class B extends A {
    public B() {}
    public B(int a) { super(a); }
    public B(int a, int b) { super(a,b); }
    public B(int a, int b, int c) { x=a+b+c; }
    public B(int a, int b, int c, int d) {
    super(a,b); y=c+d; }
    public class Test {
    public static void main(String[] args) {
    B b4 = new B(1,1,1);
    System.out.println("b4.x: "+b4.x+" b4.y: "+b4.y);
    I cannot understand why y = 6.
    As i see it,i find it more logical that y = 5.
    Could anybody tell me why y becomes 6?
    How did we get into the constructor of A : public A() in order y to be changed?
    2) Well in an exercise i have to handle out we have to find the a,b,c of a program .Unfortunately i dunno about them,Can anybody explain to me what do they mean or attach me a link (e.g. a tutorial) in order to figure out?
    a)pre condition in Java
    b)post condition in Java
    c)invariant condition
    3)
    3) Fraction apple = new Fraction (1, 2);
    Fraction peach = new Fraction (4, 5);
    Fraction pear = apple;
    peach.halve();
    pear.halve();
    System.out.println(apple);
    System.out.println(peach);
    System.out.println(pear);
    It's the first time i see an object as a parameter in System.out.println.
    CAn anybody tell me when i can pass an object as an argument in System.out.println?
    Thanks in advance!

    How did we get into the constructor of A : public A() in order y to be changed?if you don't explicitly call a super constructor, the empty super constructor is called for you. If no empty accessible super constructor is available and no explicit call from subclass is made - compile error.
    CAn anybody tell me when i can pass an object as an argument in System.out.println?Whenever you want. Object.toString() will be called and the resulting String will be used. If the object is null, the String "null" will be used instead.

  • Question related to E-Business Suite (Business Group)

    Dear All,
    I just started my career as an oracle Functional Consultant (HRMS), I have questions related to Business Group
    - Why BG is a part of HRMS? Although we associates different profiles with it like, legal entity, which is used for financial purpose only.
    - Under which conditions we make more then on Business Group?

    Pl do not post duplicates - E-Business Suite queries related to BG

  • Question related to concept of PCK

    Hi All.
    I am quite a newbie to XI and am only learning it thru online help. I have one conceptual question related to PCK.
    My understanding is that PCK is needed by a small business company to communicate to its larger partner which already has XI running. Correct me if I am wrong here itself.
    Now if the larger business partner already has XI, why does the smaller one need a PCK at all? The XI instance on the larger partner will have all the necessary adapters to understand any format send by the partner. So even if the partner(smaller) sends any format- be it IDOC/HTTP/FTP, the XI instance on larger partner will have its adapters ready to perform the conversion.
    Then why is this PCK needed at all?
    Thanks in advance. Hope my query is clear
    Regards.
    Samant

    Hi Samant,
      Your question is a very good one, Though I have not worked on PCK, I can share my ideas based on some brain storming session I had with our collegues & business partners.
      While executing projects, there are technical & operational issues. For example, when you access any HR related data of a UK based organisation then all those who work on that project have to undertake data security pledge. Like wise there are many constraints on data & system accesses, which vary across organisations.
    When you use PCK*, irrespective of different systems what the small vendors have, you communicate with your Big company's XI system only on the XI's msging protocol http(s)/SOAP. This allows a fair amount of ownership of data/access related issues to the small partners.
    -> you go for PCK, when there is no need for small vendors to go for XI.
    Hope this is of some help. As Michal said there might be much more (or even better) reasons.
    Michal, when you say "all of the mappings and transformations have to be on the small company side", what exactly you mean by this. can you please eloborate.
    Thanks & Regards
    Vishnu

  • Question related to Synchronous update

    Hi, all
    I have some question related to synchronous update:
    1. What is the syntax if I want to write synchronous update.
    Do i write as:
    call funcition A in update task
    commit work and wait
    Or just
    call function  A (A declared as update type function )
    commit work and wait
    Or ...
    2.If we use synchronous update, is VBHDR,VBDATA still filled the same way when using asynchronus update?
    Thanks in advance,
    Liming

    Hi,
    Why do we use this " In Update Task " ??
    The main update technique for bundling database changes in a single
    database LUW is to use CALL FUNCTION... IN UPDATE TASK.
    How do we Use ??
    A typical R/3 installation contains dialog work processes and at least one update work process. The update work processes are responsible for updating the database. When an ABAP program reaches a COMMIT WORK statement, any function modules from CALL FUNCTION... IN UPDATE TASK statements are released for processing in an update work process. The dialog process does not wait for the update to finish. This kind of update is called asynchronous update.
    What is the Use... ??
    Asynchronous update is useful when response time from the transaction is critical, and the database updates themselves are so complex that they justify the extra system load

  • Question related to SCJP 6 certification

    Hi Everyone,
    Just have question related to SCJP Exam.
    I have started to prepare for SCJP 6 from yesterday (3-4 hours in a day) and I am planning to take SCJP exam in march last week. can u suggest books, which I need to go through..and also I need to write exam at earliest..Do I need to take more than one month for preparation....or less than that is it possible for good knowledge and score?
    Thanks,
    Naveen

    Hello Naveen,
    I am also goining to write SCJP1.6 exam(hopefully this month end).
    I am referring Kathy Sierra, Bert Bates SCJP1.6. It is an awesome book and it include 350+ mock question excluding the ones you get at end of each chapter.
    I dont know whats the level of your Java knowledge. In my opinion someone who has a fair amount of knowledge of the subject should take atleast 2 month of preparation before taking the exam. Syllabus for SCJP6 is more or less easy(except for few concepts) but you know what makes it a difficult exam is the minor details which we tend to ignore while studying the Java subject.
    Also the questions will contain more than 1 correct answer which you cant answer correctly unless you have pracised a lot of mock exams.
    So my advise to you is :take time to brush up the minor details of the subject and do lot of mock tests. That ways you can ensure good marks.Dont hurry, else you may clear the exam but not with good percentile.
    Thats all knowledge I wish to give you.
    Let me know if you want some more.
    Best of Luck for your exam,
    Best regards,
    Suvojit CHAKRABORTY

  • Question related to the Federated Portal Network.

    Hi All,
    I have a question related to the Federated Portal Network.
    I have to configured FPN between two portals :
    1. BI-portal  (Producer Portal) (EP 7.0)
    2. Portal for other systems (Consumer Portal) (EP 7.0)
    Can anybody help regarding this, I need material or URLs   ...
    Thanks & Regards,
    Jay

    Hi Jay,
    Check out following links for fedrated portals
    http://www.sdn.sap.com/irj/scn/index?rid=/library/uuid/703cfbbd-e85e-2a10-00a3-ecd502c08e82&overridelayout=true
    http://www.sdn.sap.com/irj/scn/index?rid=/library/uuid/70191d1e-2bd1-2a10-d9b7-ba19500da527&overridelayout=true
    Regards,
    Vaishali

  • Question related to dynami calc

    Hi all,
    I have a question related to dynamic calc members, I read in the dbag saying , it is not possible to add more than 100 members as a children under a
    dynamic calc member...is it right even with 9 and 11 versions.. What are the options we have if we really want to add ....????? I am curious to know about this....
    Thanks

    When you set a member to dynamic calculation (for aggreagtion purposes), it has to look at all of the children in order to calculate. If it is on a sparse dimension, it has to bring multiple blocks into memory to do the calculation. If the dimension is dense, it on;y brings in the single block which is much quicker. as for increasing the block size, If you need the summarization, you have not changed the block size at all. You would have the member regardless. If it is dynamic, you will see the block smaller than if it stored data, but the logical block size (the memory it takes) will be the same size regardless because Essbase expands the block in memory to do the calculations.
    This is the same rational as to why we don't want dynamic calculation on sparse dimensions unless it is comfined to one or two children. The reading of multiple blocks can be very time consuming

  • Question related to IDOCs

    Hello,
    I have a question related to IDOC processing.
    Lets assume that I process the following IDOCs collectively in the transaction BD87: -
    1) 100
    2) 140
    3) 150
    Simultaneously, another user using the same user ID as myself, processes the following IDOCs: -
    1) 110
    2) 120
    3) 130
    Is it possible to determine which IDOCs were processed collectively together? I mean is there some sort of an IDOC attribute which would be the same for IDOCs 100, 140 and 150 and for IDOCs 110, 120 and 130?
    I hope that my question is clear. Please try and answer it as quickly as possible.
    Best regards,
    Divyaman Singh Rawat

    Simultaneously, another user using the same user ID
    I dont think SAP has any such provision. May be you can track by UserID but in your case that too is same.

Maybe you are looking for

  • Mirrored RAID drive removal.

    I have 3 drives in my Xserve G5. 1 is 80GB and running as the system drive. the other 2 are 500GB drives which are both mirrored. I want to sacrifice the data redundancy and gain the extra 500GB for storage. I do not have a location to store the 400+

  • Want to make 3d sphere, 3d revolve isn't doing what I want

    So I've got illustrator CC and I'm trying to map a pattern of a golf ball on to a sphere but it isn't doing what I'd like - it's distorting my circles the wrong way. I found a blog post about using a custom plugin, but the plugin looks like it's outd

  • EP 7.4 specific post installation steps

    Hi, Installing EP on NW7.4 SR1 . After the installation, are there any EP 7,4 specific post steps need to be carried out? Any template installer needs to be ran? I will appreciate your help and guidance Thanks in advance

  • IBooks do not show pictures since upgrading to iOS5

    Downloaded 'Steve Jobs' and no pictures were showing. Then checked other iBooks and realised existing books also do not display pictures since loading iOS5

  • WPC indexing problem

    Hi Community, Currently, a WPC index indexes only the webpages; it doesnu2019t index the documents placed in Site Content folder (or for that matter any folder) of WPC. Is there a way for indexing the content in WPC folders; so that all the documents