ALV REUSE_ALV_GRID_DISPLAY in new screen.

Hello Friends,
I have a small problem and would appreciate any input.
I have an ALV grid, where I click a button and another ALV grid pops up.
My problem is the GUI status. When I leave the screen of the second ALV, the first ALV shows the same GUI status. How do I get the first gui_status not to be changed when I return??
best regards B

REPORT  ZALV_SECONDSCREEN.
DEFINE m_fieldcat.
  add 1 to ls_fieldcat-col_pos.
  ls_fieldcat-fieldname   = &1.
  ls_fieldcat-ref_tabname = &2.
  ls_fieldcat-cfieldname  = &3.
  ls_fieldcat-qfieldname  = &4.
  append ls_fieldcat to lt_fieldcat.
END-OF-DEFINITION.
TYPE-POOLS: slis.                      " ALV Global types
TYPES:
  BEGIN OF ty_vbak,
    vkorg TYPE vbak-vkorg,             " Sales organization
    kunnr TYPE vbak-kunnr,             " Sold-to party
    vbeln TYPE vbak-vbeln,             " Sales document
    netwr TYPE vbak-netwr,             " Net Value of the Sales Order
    waerk TYPE vbak-waerk,             " Currency
  END OF ty_vbak,
  BEGIN OF ty_vbap,
    vbeln  TYPE vbap-vbeln,            " Sales document
    posnr  TYPE vbap-posnr,            " Sales document item
    matnr  TYPE vbap-matnr,            " Material number
    arktx  TYPE vbap-arktx,            " Short text for sales order item
    kwmeng TYPE vbap-kwmeng,           " Order quantity
    vrkme  TYPE vbap-vrkme,            " Quantity Unit
    netwr  TYPE vbap-netwr,            " Net value of the order item
    waerk  TYPE vbap-waerk,            " Currency
  END OF ty_vbap.
DATA :
  gs_vbak TYPE ty_vbak,
Data displayed in the first list
  gt_vbak TYPE TABLE OF ty_vbak,
Data displayed in the second list
  gt_vbap TYPE TABLE OF ty_vbap.
SELECT-OPTIONS :
  s_vkorg FOR gs_vbak-vkorg,           " Sales organization
  s_kunnr FOR gs_vbak-kunnr,           " Sold-to party
  s_vbeln FOR gs_vbak-vbeln.           " Sales document
SELECTION-SCREEN :
  SKIP, BEGIN OF LINE,COMMENT 5(27) v_1 FOR FIELD p_max.    "#EC NEEDED
PARAMETERS p_max(2) TYPE n DEFAULT '20' OBLIGATORY.
SELECTION-SCREEN END OF LINE.
INITIALIZATION.
  v_1 = 'Maximum of records to read'.
START-OF-SELECTION.
  PERFORM f_read_data_vbak.
  PERFORM f_display_data_vbak.
     Form  f_read_data_vbak
FORM f_read_data_vbak.
  SELECT vkorg kunnr vbeln netwr waerk
    INTO CORRESPONDING FIELDS OF TABLE gt_vbak
      UP TO p_max ROWS
    FROM vbak
   WHERE kunnr IN s_kunnr
     AND vbeln IN s_vbeln
     AND vkorg IN s_vkorg
     and vbtyp = 'C'.                  " C = Sales Orders.
ENDFORM.                               " F_READ_DATA_VBAK
     Form  f_display_data_vbak
FORM f_display_data_vbak.
  DATA:
    ls_fieldcat TYPE slis_fieldcat_alv,
    lt_fieldcat TYPE slis_t_fieldcat_alv.
Build the field catalog
  m_fieldcat 'VKORG' 'VBAK' '' ''.
  m_fieldcat 'KUNNR' 'VBAK' '' ''.
  m_fieldcat 'VBELN' 'VBAK' ''  ''.
  m_fieldcat 'NETWR' 'VBAK' 'WAERK' ''.
  m_fieldcat 'WAERK' 'VBAK' ''  ''.
Display the first list
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_callback_program      = sy-cprog
      i_callback_user_command = 'USER_COMMAND'
      it_fieldcat             = lt_fieldcat
    TABLES
      t_outtab                = gt_vbak.
ENDFORM.                               " F_DISPLAY_DATA_VBAK
      FORM USER_COMMAND                                             *
FORM user_command USING u_ucomm     TYPE syucomm
                        us_selfield TYPE slis_selfield.     "#EC CALLED
  CASE u_ucomm.
    WHEN '&IC1'.
      READ TABLE gt_vbak INDEX us_selfield-tabindex INTO gs_vbak.
      CHECK sy-subrc EQ 0.
      PERFORM f_read_data_vbap.        " Read data from VBAP
      PERFORM f_display_data_vbap.
  ENDCASE.
ENDFORM.                               " USER_COMMAND
     Form  f_read_data_vbap
FORM f_read_data_vbap.
  SELECT vbeln posnr matnr arktx kwmeng vrkme netwr waerk
    INTO CORRESPONDING FIELDS OF TABLE gt_vbap
    FROM vbap
   WHERE vbeln = gs_vbak-vbeln.
ENDFORM.                               " F_READ_DATA_VBAP
     Form  f_display_data_vbap
FORM f_display_data_vbap.
  DATA:
    ls_fieldcat TYPE slis_fieldcat_alv,
    lt_fieldcat TYPE slis_t_fieldcat_alv.
Build the field catalog
  m_fieldcat 'VBELN'  'VBAP' '' ''.
  m_fieldcat 'POSNR'  'VBAP' '' ''.
  m_fieldcat 'MATNR'  'VBAP' '' ''.
  m_fieldcat 'ARKTX'  'VBAP' '' ''.
  m_fieldcat 'KWMENG' 'VBAP' '' 'VRKME'.
  m_fieldcat 'VRKME'  'VBAP' '' ''.
  m_fieldcat 'NETWR'  'VBAP' 'WAERK' ''.
  m_fieldcat 'WAERK'  'VBAP' '' ''.
Display the second list
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      it_fieldcat = lt_fieldcat
    TABLES
      t_outtab    = gt_vbap.
ENDFORM.                               " F_DISPLAY_DATA_VBAP

Similar Messages

  • How to Open new screen for single click on ALV icon.

    Hi All,
    Can any body help me regarding the below ALV requirement.
    I need to create a executable program ZPROGRAM with a table having field to store long text.The ALV report should display records according to the selection screen parameters with a icon in each record when clicked should open a new screen with present data in the field and must be able to save the entered long text.
    Can any body give me the idea after displaying the simple ALV in the output,
    How to open new screen(not the Pop-up’s) after single click on the icon,
    in that I should be able to modify & save the long text in my ZTABLE and
    able to retrieve the same text for single clicked icon record.
    which function modules/Classes/Methods can we use for this requirement.
    And how retrieve the same text for this record.
    Thanks in advance.
    Regards,
    Kalam A.

    *& Report  ZTEST_ALV
    REPORT  ZTEST_ALV.
    TYPE-POOLS slis.
    DATA: gt_fieldcat TYPE TABLE OF slis_fieldcat_alv .
    DATA: gs_layout  TYPE slis_layout_alv.
    DATA: gt_list_top_of_page TYPE slis_t_listheader.
    DATA: gt_sortinfo_alv   TYPE  slis_t_sortinfo_alv.
    DATA: gs_print_alv TYPE slis_print_alv.
    DATA: gs_grid TYPE lvc_s_glay.
    DATA: gt_event TYPE slis_t_event.
    DATA: gs_event TYPE slis_alv_event.
    DATA: BEGIN OF GT_DISPLAY OCCURS 100.
       INCLUDE STRUCTURE MARA.
       DATA: BOX.
    DATA: END OF GT_DISPLAY.
    START-OF-SELECTION.
    SELECT * FROM MARA UP TO 50 ROWS
      INTO CORRESPONDING FIELDS OF TABLE GT_DISPLAY.
    End-of-Selection.
      PERFORM build_alv.
      PERFORM display_screen .
    FORM build_alv .
      DATA: ls_fieldcat LIKE LINE OF gt_fieldcat.
      DATA: ls_top TYPE LINE OF slis_t_listheader.
      DATA: ls_sort TYPE slis_sortinfo_alv.
      CLEAR: ls_fieldcat, gt_fieldcat[], ls_top,gt_list_top_of_page[],
             ls_sort,gs_grid,gs_print_alv,gt_sortinfo_alv[].
    *&-----gs_layout definition.
    gs_layout-zebra = 'X'.
    gs_layout-detail_popup = 'X'.          "ÊÇ·ñµ¯³öÏêϸÐÅÏ¢´°¿Ú
    gs_layout-f2code = '&ETA'.             "ÉèÖô¥·¢µ¯³öÏêϸÐÅÏ¢´°¿ÚµÄ¹¦ÄÜÂë,ÕâÀïÊÇË«»÷
      gs_layout-no_vline = ' '.              "ÉèÖÃÁмä¸ôÏß
      gs_layout-colwidth_optimize = 'X'.     "ÓÅ»¯Áпí
      gs_layout-detail_initial_lines = 'X'.
    gs_layout-coltab_fieldname = 'LINE_COLOR'. "Line_colorΪgt_displayµÄÒ»¸ö×Ö¶Î,¾ßÌåÑÕÉ«ÉèÖüûÏÂÃæ˵Ã÷.
      gs_layout-hotspot_fieldname = 'MATNR'.
    gs_layout-detail_titlebar = 'ÏêϸÄÚÈÝ'. "ÉèÖõ¯³ö´°¿ÚµÄ±êÌâÀ¸
    gs_layout-group_change_edit = 'X'.
    *&-----gs_grid definition.
      gs_grid-top_p_only = 'X'.
    *&-----gs_print_alv definition.
      gs_print_alv-prnt_title = 'X'.
      gs_print_alv-prnt_info = 'X'.
    *&-----gt_sortinfo_alv definition. С¼Æ
      ls_sort-fieldname = 'MTART'.
      ls_sort-tabname =  'GT_DISPLAY'.
      ls_sort-subtot = 'X'.
      ls_sort-spos      = 1.
      ls_sort-up        = 'X'.
    ls_sort-group = 'UL'.
      APPEND ls_sort TO gt_sortinfo_alv.
      ls_sort-fieldname = 'AENAM'.
      ls_sort-tabname =  'GT_DISPLAY'.
      ls_sort-subtot = 'X'.
      ls_sort-spos      = 1.
      ls_sort-up        = 'X'.
    ls_sort-group = 'UL'.
      APPEND ls_sort TO gt_sortinfo_alv.
    *&-----slis_t_listheader definition. title.
      CLEAR  ls_top.
      ls_top-key  = 'µ±Ç°ÈÕÆÚ:'.
      ls_top-typ  = 'S'.  " H = Header, S = Selection, A = Action
      CONCATENATE  sy-datum0(4)   '-' sy-datum4(2) '-' sy-datum+6(2) INTO ls_top-info .
      APPEND ls_top TO gt_list_top_of_page.
      CLEAR  ls_top.
      ls_top-key  = 'title'.
      ls_top-typ  = 'S'.  " H = Header, S = Selection, A = Action
      ls_top-info = space.
      APPEND ls_top TO gt_list_top_of_page.
    *&-----gs_print_alv definition.
      gs_print_alv-prnt_title = 'X'.
      gs_print_alv-prnt_info = 'X'.
    *&-----gt_fieldcat definition.
    CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
       EXPORTING
         i_program_name     = sy-repid
         i_internal_tabname = 'GT_DISPLAY'
          i_structure_name = 'MARA'
          I_CLIENT_NEVER_DISPLAY = 'X'
         i_inclname         = sy-repid
       CHANGING
         ct_fieldcat        = gt_fieldcat[]
       EXCEPTIONS
         inconsistent_interface = 1
         program_error          = 2
         OTHERS                 = 3.
      ls_fieldcat-hotspot = 'X'.
      MODIFY gt_fieldcat FROM ls_fieldcat INDEX 2.
    **-1. definition with macro.
      DEFINE macro.
       col_pos = col_pos + 1.
       ls_fieldcat-tabname   = 'it_typ_data'.
        ls_fieldcat-fieldname = '&1'.
        ls_fieldcat-seltext_l =  &2.
       ls_fieldcat-col_pos   =  col_pos.
        ls_fieldcat-outputlen =  '&3'.
       ls_fieldcat-datatype  =  '&4'.
       ls_fieldcat-do_sum    =  &5.
       ls_fieldcat-edit    =   &6.
       ls_fieldcat-checkbox  =   &7.
       ls_fieldcat-key   =   &9.
       ls_fieldcat-fix_column =  &10.
       ls_fieldcat-no_out =  &11.
        ls_fieldcat-ref_fieldname = &4.    " System F4 Effect.
        ls_fieldcat-ref_tabname   =  &5.   " System F4 Effect.
        ls_fieldcat-hotspot   =   &6.
        append ls_fieldcat to gt_fieldcat.
        clear ls_fieldcat.
      END-OF-DEFINITION.
      macro matnr     'matnr'            18   'MATNR'   'MARA'  'X'.
      macro MTART     'MTART'            18      'MTART' 'MARA'  ''.
      macro  AENAM    'AENAM'            18       'MAENAM'  'MARA'   ''.
    **-2. definition one-by-one.
    CLEAR ls_fieldcat.
    ls_fieldcat-fieldname = 'MATNR'.
    ls_fieldcat-seltext_s = 'ÎïÁÏ'.
    ls_fieldcat-ref_fieldname = 'ROLLNAME'.
    ls_fieldcat-ref_tabname   =  'DD03L'.
    APPEND ls_fieldcat TO gt_fieldcat.
    ENDFORM.                    "build_alv
    FORM display_screen .
    CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
       EXPORTING
         i_list_type     = 0
       IMPORTING
         et_events       = gt_event
       EXCEPTIONS
         list_type_wrong = 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.
    READ TABLE gt_event INTO gs_event WITH KEY name = 'TOP_OF_PAGE'.
    IF sy-subrc EQ 0.
       gs_event-form = 'TOP_OF_PAGE'.
       MODIFY gt_event FROM gs_event INDEX sy-tabix.
    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          = 'PF_STATUS_SET '
         i_callback_user_command           = 'USER_COMMAND'
        i_callback_top_of_page            = 'TOP_OF_PAGE'
       I_CALLBACK_HTML_TOP_OF_PAGE       = 'HTML_TOP_OF_PAGE'
      I_CALLBACK_HTML_END_OF_LIST       = ' '
      I_STRUCTURE_NAME                  =
        I_BACKGROUND_ID                   = 'ALV_BACKGROUND'    "When top-of-page is initial.
      I_GRID_TITLE                      =
      I_GRID_SETTINGS                   =
         is_layout                         = gs_layout
         it_fieldcat                       = gt_fieldcat[]
      IT_EXCLUDING                      =
      IT_SPECIAL_GROUPS                 =
        it_sort                           =  gt_sortinfo_alv[]
      IT_FILTER                         =
      IS_SEL_HIDE                       =
      I_DEFAULT                         = 'X'
       I_SAVE                            = 'A'
      IS_VARIANT                        =
      IT_EVENTS                         = gt_event
      IT_EVENT_EXIT                     =
       IS_PRINT                          = gs_print_alv
      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                          = gt_display
    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.                    "display_screen
    FORM user_command          USING ucomm LIKE sy-ucomm
                               selfield TYPE slis_selfield.
    Data ref1 type ref to cl_gui_alv_grid.
      CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR' "Check Box need fieldcat-checkbox, input and edit.
         IMPORTING
           E_GRID = ref1.
      CASE ucomm.
        WHEN '&IC1'. " SAP standard code for double-clicking
    READ TABLE gt_display INTO gs_display INDEX  slis_selfield-tabindex.
    CHECK sy-subrc = 0.
         CASE  selfield-fieldname  .
           WHEN 'PLNUM'.
             SET PARAMETER ID 'PAF' FIELD gs_display-plnum.
             CALL TRANSACTION 'MD12' AND SKIP FIRST SCREEN.
           WHEN  'POSNR'.
           SUBMIT  rvscd100 USING SELECTION-SCREEN '1000' WITH vbeln = gs_display-vbeln
                                                          WITH posnr = gs_display-posnr
                                                          WITH zinfo = 'X'
                                                          AND RETURN.
         ENDCASE.
       IF selfield-sel_tab_field = 'OUT_ITAB-PI_SL'. " Line detail.
           READ TABLE i_output INTO pisl_itab INDEX selfield-tabindex.
           IF sy-subrc EQ 0.
       ENDIF.
        WHEN 'CHANGE'.
         CALL METHOD ref1->check_changed_data.
         CALL METHOD ref1->refresh_table_display.
    *5´Ë´¦´úÂë×èÖ¹'REUSE_ALV_GRID_DISPLAY´´½¨ÐµÄÆÁÄ»£¬Ôì³ÉÆÁÄ»¶à²ã
         selfield-refresh = 'X'.
        WHEN 'SWITCH'.
         PERFORM switch_edit_mode.
        WHEN OTHERS.
      ENDCASE.
    ENDFORM.                    "user_command
    Add your code in user_command form.
    WHEN you click matnr ucomm eq '&IC1'.
    Message was edited by:
            Chunhai Hu

  • How to get selected rows in a new screen in alv.

    Hi everybody,
    I have a alv report in oops concept when i select a row all the details of that particular row should come in new screen.
    can anybody help me regarding this if possible with example.
    thanks in advance.
    regards,
    venu.

    Hi,
    Check this.
    select several rows in alv
    It will be helpful.
    Regards,
    J.Jayanthi

  • Reg: ALV (REUSE_ALV_GRID_DISPLAY)

    Hi Experts,
    I need to know how to give drop down list in one of the field in my ALV.
    I found some posting in sdn, but that are related to OOPS concepts.
    But i am using REUSE function module.
    Can you please provide me the solution how to achecive drop down list in ALV using REUSE_ALV_GRID_DISPLAY.
    Thanks
    Vijay.R

    Hi Vijayendran,
       There is only oops method available to create drop down list in ALV.
    Go through the program below and modify your program accordingly.
    Only thing that you have to do is to create container for your alv and use this container for displaying drop down list.
    This program displays a dropdown list in one of the fields of the ALV.
    *& Report  Z_LISTBOX_ALV
    *& Program to display a dropdown list in ALV.
    REPORT  z_listbox_alv.
    TYPE-POOLS: slis.
    TYPES: BEGIN OF ty_rating,
             task(20) TYPE c,
             rating TYPE i,
             weightage(2) TYPE c,
             comments(40) TYPE c,
           END OF ty_rating.
    DATA: g_alvgrid TYPE REF TO cl_gui_alv_grid,
          g_alv_container TYPE REF TO cl_gui_custom_container,
          int_fieldcat TYPE lvc_t_fcat,
          ok_code TYPE sy-ucomm.
    DATA: int_outputdata TYPE TABLE OF ty_rating.
    INITIALIZATION.
    START-OF-SELECTION.
    * call new screen for displaying the oop alv
      CALL SCREEN 1100.
    * Double click on the screen, it takes you the screen painter (SE51). Create
    * Custom Container on the screen and name is as u2018CONTAINERu2019. Set the Ok-Code
    * the screen as u2018OK_CODEu2019. Also create a GUI status named 'STANDARD' and
    * in set Ok-code '&F03' for the back button.
    * The screen 1100 thus gets created to hold the grid ALV.
    * In the PBO of the screen, call the modules to set pf-status, title and
    * to display the ALV list.
    * In case we have an interactive ALV or for additional functionalities we can
    * create OK-CODES and based on the user command we do the coding in the PAI.
    *&      Module  STATUS_0600  OUTPUT
    *       set the PF status of the screen. Called in PBO of screen.
    MODULE status_0600 OUTPUT.
      SET PF-STATUS 'STANDARD'.
    ENDMODULE.                 " STATUS_0600  OUTPUT
    *&      Module  DISPLAY_ALV  OUTPUT
    *       Displays the alv list. Called in PBO of screen.
    MODULE display_alv OUTPUT.
    *  get the data.
      PERFORM retrieve_data.
    *  prepare fieldcatalog for displaying the alv
      PERFORM prepare_fieldcatalog.
    *  create a container to display the list
      CREATE OBJECT g_alv_container
        EXPORTING
          container_name = 'CONTAINER'.
    *  create a reference for the alv
      CREATE OBJECT g_alvgrid
        EXPORTING
          i_parent = g_alv_container.
    *  prepare a listbox for the rating column
      PERFORM fill_dropdown.
    *  call the method to display the list
      CALL METHOD g_alvgrid->set_table_for_first_display
        EXPORTING
          i_bypassing_buffer            = 'X'
          i_save                        = 'X'
        CHANGING
          it_outtab                     = int_outputdata
          it_fieldcatalog               = int_fieldcat
        EXCEPTIONS
          invalid_parameter_combination = 1
          program_error                 = 2
          too_many_lines                = 3
          others                        = 4
      IF sy-subrc <> 0.
       MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
                  WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
    ENDMODULE.                    "DISPLAY_ALV OUTPUT
    *&      Form  PREPARE_FIELDCATALOG
    *       prepares fieldcatalog
    FORM prepare_fieldcatalog .
      DATA: lws_fieldcat TYPE lvc_s_fcat.
      CLEAR int_fieldcat.
      CLEAR lws_fieldcat.
      lws_fieldcat-col_pos   = 1.
      lws_fieldcat-fieldname = 'TASK'.
      lws_fieldcat-scrtext_m = 'TASK'.
      APPEND lws_fieldcat TO int_fieldcat.
      CLEAR lws_fieldcat.
      lws_fieldcat-col_pos   = 2.
      lws_fieldcat-fieldname = 'RATING'.
      lws_fieldcat-edit = 'X'.
      lws_fieldcat-scrtext_m = 'RATING'.
      lws_fieldcat-just = 'L'.
      lws_fieldcat-outputlen = '6'.
      lws_fieldcat-drdn_hndl = '1'.        "handle for listbox
      APPEND lws_fieldcat TO int_fieldcat.
      CLEAR lws_fieldcat.
      lws_fieldcat-col_pos   = 3.
      lws_fieldcat-fieldname = 'WEIGHTAGE'.
      lws_fieldcat-scrtext_m = 'WEIGHTAGE'.
      lws_fieldcat-outputlen = '9'.
      APPEND lws_fieldcat TO int_fieldcat.
      CLEAR lws_fieldcat.
      lws_fieldcat-col_pos   = 4.
      lws_fieldcat-fieldname = 'COMMENTS'.
      lws_fieldcat-scrtext_m = 'COMMENTS'.
      lws_fieldcat-edit = 'X'.
      APPEND lws_fieldcat TO int_fieldcat.
    ENDFORM.                    " PREPARE_FIELDCATALOG
    *&      Form  RETRIEVE_DATA
    *       retreives the data to be displayed
    FORM retrieve_data .
      DATA: lws_outputdata TYPE ty_rating.
      CLEAR int_outputdata.
      CLEAR lws_outputdata.
      lws_outputdata-task = 'proj. related'.
      lws_outputdata-weightage = '20'.
      APPEND lws_outputdata TO int_outputdata.
      CLEAR lws_outputdata.
      lws_outputdata-task = 'process. related'.
      lws_outputdata-weightage = '10'.
      APPEND lws_outputdata TO int_outputdata.
      CLEAR lws_outputdata.
      lws_outputdata-task = 'knowledge mgnt.'.
      lws_outputdata-weightage = '30'.
      APPEND lws_outputdata TO int_outputdata.
    ENDFORM.                    " RETRIEVE_DATA
    *&      Form  FILL_DROPDOWN
    *       prepares the listbox to be displayed and assigns it to the alv
    FORM fill_dropdown .
      DATA: lint_dropdown TYPE lvc_t_drop,
            lws_dropdown TYPE lvc_s_drop.
      CLEAR lint_dropdown.
      CLEAR lws_dropdown.
      lws_dropdown-handle = '1'.
      lws_dropdown-value = '5'.
      APPEND lws_dropdown TO lint_dropdown.
      CLEAR lws_dropdown.
      lws_dropdown-handle = '1'.
      lws_dropdown-value = '4'.
      APPEND lws_dropdown TO lint_dropdown.
      CLEAR lws_dropdown.
      lws_dropdown-handle = '1'.
      lws_dropdown-value = '3'.
      APPEND lws_dropdown TO lint_dropdown.
      CLEAR lws_dropdown.
      lws_dropdown-handle = '1'.
      lws_dropdown-value = '2'.
      APPEND lws_dropdown TO lint_dropdown.
      CLEAR lws_dropdown.
      lws_dropdown-handle = '1'.
      lws_dropdown-value = '1'.
      APPEND lws_dropdown TO lint_dropdown.
      CALL METHOD g_alvgrid->set_drop_down_table
        EXPORTING
          it_drop_down = lint_dropdown.
    ENDFORM.                    " FILL_DROPDOWN
    *&      Module  HANDLE_GOBACK  INPUT
    *       handles 'back' button. Called in PAI of the screen.
    MODULE handle_goback INPUT.
      IF ok_code EQ '&F03'.
        LEAVE PROGRAM.
      ENDIF.
    ENDMODULE.
    Get back to me for any clarification.
    Regards,
    Bhavesh

  • I just got  new screen put on my 13in macbook pro when i opend it up there is no data on it? how do i get my data back

    I just got to school after getting a new screen put on my 13in macbook pro. when i opend up my macbook there was only a apple simble and the loading sing with a bar at the botton it took fovere to load, one it loaded and opend up there was a few options to pic from saying i could get all my datata back, i got confused and called the tec support where they wanted me to spend 90$ to back up my data, i feel as if they fixed my screen my data should be there when i go on it. I am a broke colage studend and need to get my work done. To sum it all up How do i get all my data back that happend to get lost while my screen was being repaird at the apple store?

    Apple has a 90 warranty warranty on all of their repairs.  You should take your computer back to the repair shop.  Or call Apple Customer Relations (800) 767-2775.  Wait for a human to come on the line and ask politely and firmly that you want to be transferred over to the Customer Relations department.  Tell them your issue.
    pakoning wrote:
    I am a broke colage studend
    Hard to believe with all the typos in your post!

  • Need Help to create new screen for RF Sapconsole

    Hi Guru's
    I'm new on RF (but some years in ABAP) since last week.
    I need help to create new screens for RF (SAPLLMOB).
    Can someone explain me the procedure to create screen (with ABAP code after) or perhaps someone have an exemple (simple or not) ?
    I have to develop 2 new screens with really few time.
    And, another subsidiary question :
    how SAP can transfert information between the flash gun and the screen i have developped.
    Is there some code to add to enable this functionality or it is include in SAPLLMOB on standard fields ????
    It's a new strange world for me today...
    Many thanks to everyone who can explain me
    Alain

    hi,
    I am facing this problem as well. Is there any reference to create the new screen?
    Hope someone can help! Thanks!
    Regards,
    Darren

  • TS1398 I recently got a new screen for my iPhone 4s and now no wifi networks are showing up when I turn the wifi on.

    I tried resetting my networks and turning my phone on and off with the wifi turned on, but neither of it worked. I don't know what to do and I really need wifi on my phone for tomorrow.

    Did Apple install the new screen?  Or an Authorized Apple Service Provider?  If so, you should return to the location that replaced your screen to see if they didn't hook something up properly.
    If it wasn't an Authorized Apple Service Provider, or an Apple Retail store, You should take it back to them and discuss it with them.  In this case, Apple will likely not offer any replacement service as it was opened by an unauthorized third party.

  • Jump from alv report to qa03 screen based on PRUEFLOS field

    Hi experts,
    I developed one alv report ,in that one field name is PRUEFLOS (inspection lot number).I want to jump from alv report
    to QA03 screen based on PRUEFLOS field.I wrote in this way but i didn't get.
    FORM USER_COMMAND USING UCOMM LIKE SY-UCOMM SELFIELD TYPE SLIS_SELFIELD.
      CASE SELFIELD-FIELDNAME.
        WHEN 'PRUEFLOS'.
          READ TABLE T_FINAL INDEX SELFIELD-TABINDEX.
          SET PARAMETER ID  'QLS' FIELD T_FINAL-PRUEFLOS.
          CALL TRANSACTION 'QA03'   AND SKIP FIRST SCREEN.
      ENDCASE.
    ENDFORM.
    what is the problem ?pls help me in this.

    Hi Ram,
    Recheck:
    1) You have passed 'FORM USER_COMMAND' in 'I_CALLBACK_USER_COMMAND' while calling f.m. for ALV displa, and
    2) You have checked the value of user command, i.e.
    FORM USER_COMMAND USING UCOMM LIKE SY-UCOMM SELFIELD TYPE SLIS_SELFIELD.
    CASE SY-UCOMM.
    WHEN '&IC1'.
    CASE SELFIELD-FIELDNAME.
    WHEN 'PRUEFLOS'.
    READ TABLE T_FINAL INDEX SELFIELD-TABINDEX.
    SET PARAMETER ID 'QLS' FIELD T_FINAL-PRUEFLOS.
    CALL TRANSACTION 'QA03' AND SKIP FIRST SCREEN.
    ENDCASE.
    ENDCASE.
    ENDFORM.
    Regards,
    Birendra

  • Jump from alv report to cor2 screen

    Hi experts,
    I develop one alv report ..i want to jump from alv report to COR2 screen when click on order number(field name is AUFNR).
    i wrote code in this way.
    FORM USER_COMMAND USING UCOMM LIKE SY-UCOMM SELFIELD TYPE SLIS_SELFIELD
      CASE SELFIELD-FIELDNAME.
        WHEN 'AUFNR'.
          READ TABLE T_FINAL INDEX SELFIELD-TABINDEX.
          SET PARAMETER ID  'AUF' FIELD T_FINAL-AUFNR.
          CALL TRANSACTION 'COR2'   AND SKIP FIRST SCREEN.
      ENDCASE.
    ENDFORM.
    but it is not working properly,when u click on any order number it is going only the same order number(in cor2 screen).
    what is the problem? set par id (AUF) EXIST IN TPARA table compulsalory or it is created automatically?
    pls help me in this . If possible pls send the code.

    Hi,
    I have already mentioned both ways, but ok, once again.
    A. how I found parameter ID ANR:
    1.) run transaction COR2
    2.) set cursor to field "Process order"
    3.) press F1 button
    4.) performance assistant displays
    5.) press "Technical Information"
    6.) technical information displays
    7.) in field "Parameter ID" you can see parameter ID assigned to a screen field
    B. how I found parameter ID BR1:
    1.) switch on debugger
    2.) run transaction COR2
    3.) put a breakpoint on "GET PARAMETER" statement
    4.) debugger stops on every GET PARAMETER statement in PBO of COR2
    5.) there you can see that BR1 is used for field AUFNR
    Basically first mentioned way is sufficient, because system gets parameter value from parameter ID assigned to a screen element automatically. But in this case a value is overwritten by coding in PBO of COR2.
    Hope it helps.
    Regrds,
    Adrian

  • Return from ALV  Grid to Selection screen

    hi,
    I want to go back from ALV grid to selection screen.
    I am using the following code:
    WHEN 'BACK'.
    CALL METHOD grid1->refresh_table_display.
    CALL METHOD grid1->free.
    CALL METHOD custom_container1->free.
    CALL SELECTION-SCREEN 1000.
    it is working,but when i press BACK button from selection screen to program it is showing ERROR IN FLUSH 4 Error.
    Also I tried with method FLUSH
    WHEN 'BACK'.
    CALL METHOD grid1->refresh_table_display.
    CALL METHOD grid1->free.
    CALL METHOD custom_container1->free.
    CALL METHOD cl_gui_cfw=>flush.
    it's still showing same Error.
    Please help on this.
    Regards,
    Sankar

    Hi,
    My grid name is grid1.
    I tried with :
    DATA grid1 TYPE REF TO cl_gui_alv_grid.
    CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
    IMPORTING
    e_grid = grid1.
    CALL METHOD grid1->check_changed_data.
    CALL METHOD grid1->refresh_table_display.
    LEAVE TO SCREEN 0.
    Even, I tried with declaring another grid : grid2
    DATA grid1 TYPE REF TO cl_gui_alv_grid.
    CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
    IMPORTING
    e_grid = grid1.
    CALL METHOD grid1->check_changed_data.
    CALL METHOD grid1->refresh_table_display.
    LEAVE TO SCREEN 0.
    In both cases, I am getting the following Error : OBJECTS_OBJREF_NOT_ASSIGNED

  • My IPhone 5 will not turn on, I had a new screen I stalled, all working great, the next day I was flying so turn off the phone and since trying to turn back in again,,, I receive many lines of white text stating incorrect shutdown please help

    hhello, please help if you can,,,
    i had a new screen installed, everything working fine, as was using the phone, the next day I was flying so turn off the phone in the usual way...
    oon arrival turned the phone on, received a slow acting black background with the apple sign visual, but never moved from that......... So tried a reset still the same just left looking at the apple sing in the middle if the screen,makes it there for 5 mins but still never turn on completely,,,,,
    again I tried,,,,,, again I tried a reset, then started to received lines of white writing, about 4-5 lines slowly like it was being typed, which stateed INCORRECT SHUTDOWN, ????????? then took out my MacBook air, to connect to ITunes to see whaypt I could do,
    i tunes did not find the phone as would normally so opened ITunes manually, still did not find the Iphone,,,,,
    Any Ideas please, as it is useless stuck in the drawer, I am an apple user, an quite knowledgable having other Iphine 5, IPad air and Mac,,,,, I am stuck,,,,
    PLease Help,my hank you in advance

    SharmFarm wrote:
    Good ev Ning Mario49    firstly I would like to say a great thank you for your attention to trying to help me,,,,,    i have looked at the links and will try everything stated first thing…
    Hi Mario,,,,
    I tried everything in your reply,,, thank you again,, I had done that once before and all was working great,,
    I have just now tried the Reinstall via iTunes, about 20 into the download, the iTunes logo on the phone disappeared, and the Apple Logo appeared again,,, I waited until the iTunes stated that the download had finished, and the install was in progress,,,
    Nothing happened, still the Apple Logo was visual on the screen, iTunes never recognised the phone which it was on my iTunes account previously,,,
    Still just a bunch of lines, maybe 5 or 6 so small writing,, I personally can not read what it is telling me, someone said it reads, incorrect shutdown,,,????????
    Please advise,???
    I am now at a loss,,, I really became excited when I saw the iTunes icon after putting the phone into restore,,,???
    Thank you again
    D

  • I was trying to make a new screen recording using quicktimeplay, but when I watched the video after recording it all I could hear was me talking while the video was showing on the screen. How do I turn off that recording and turn the right one on? thanks

    I was trying to make a new screen recording using quicktimeplay, but when I watched the video after recording it all I could hear was me talking while the video was showing on the screen. How do I turn off that recording and turn the right one on? thanks

    Hi j2399123,
    It sounds like your screen recording is doing what it was designed to do, capture what is happening on your screen, with optional voice over with the microphone.
    Screen recording is for recording what you see on the screen, it is not a "video capture" option, like for capturing a movie with sound that is playing on your screen.
    For the QuickTime recording options, check out "Recording with QuickTime Player" in
    Mac Basics: QuickTime Player creates, plays, edits, and shares video and audio files
    http://support.apple.com/kb/ht4024
    And for screen recording specifically, there's
    QuickTime Player 10.x: Record your computer’s screen
    http://support.apple.com/kb/PH5882
    Thank you for thinking of Apple Support Communities for your support needs.
    Nubz

  • My ipod touch 5 is frozen on the lockscreen and i cant do anything except restart it and that doesnt hekp. will getting a new screen help? or is there another, less exspensive way? also, it is not connected to wifi.

    I need to fix my ipod and i don't know how, i am hoping that if i leave it alone over night that it will fix itself,
    its on the lock screen and i cant do anything with the screen, i tried restarting it and it didnt work, so because i restarted it, it is not connected to wifi.
    please help.
    will getting a new screen help? or is there an easier, less expensive way?

    Try:                                               
    - iOS: Not responding or does not turn on           
    - Also try DFU mode after try recovery mode
    How to put iPod touch / iPhone into DFU mode « Karthik's scribblings
    - If not successful and you can't fully turn the iOS device fully off, let the battery fully drain. After charging for an least an hour try the above again.
    - Try another cable                                                       
    - Try on another computer                                                       
    - If still not successful that usually indicates a hardware problem and an appointment at the Genius Bar of an Apple store is in order.
      Apple Retail Store - Genius Bar              

  • My iphone 5 has a black screen keeps vibrating when goes on charger i think lcd is broke and screen will me getting a new screen fix it everytime i plug it to the computer mu picture  and music pops up and ny new screen is coming tomorrow

    my iphone 5 is making me cry everytime i put it on the charger it vibrates like every 2 seconds my phone isnt water damaged so i dont have to worry about that and when i plug it to the computer itunes recognizes my phone i think the lcd is broken so i went and orderd a new screen from amazon do you think it would work if i place a new screen on it HELLLLLLLLLLLLLLLLLLLLLLLPPPPPPP PLEASE

    **called applecare.
    Did the tests and they ended uo recommending i go to the apple store..
    Not sure if it was a soft/hardware prob but they replaced my phone
    fo free

  • How do I get my widgets to come up on my desktop not on a new screen

    how do I get my widgets to come up on my desktop not another screen

    System preferences > mission control > uncheck "show dashboard on a new screen"

Maybe you are looking for

  • Problem Login to Weblogic Server and Enterprise Manager Page

    Hi master and guru, I have installed WebLogic 10.3.5, SOA 11.1.1.5.0 and OIM 11.1.1.5.0 in production server. But when trying to login to Weblogic Server page (http:\\<host>:7001\console), failed without error. And when trying to login to Enterprise

  • First record is not an IDOC control record - Error

    When I am trying to import orders in my test system through RSEINB00 , it is giving me this error "First record is not an IDOC control record" But if I manually do it through test tool , it post successfully. I tried different files which have been p

  • How to get subclass method in an inheritance?

    Hi guys, I got the following classes: public abstract class Animal {      private Long id;      private String name;      public Long getId() {return id;}      public void setId(Long id) {this.id = id;}      public String getName() {return name;}    

  • Finder doesn't show files that Terminal shows

    Running 10.4.4. I have a zip file that expands into a folder containing many subfolders. Finder tells me that the majority of these folders are empty despite the zip file being several MB in size. Opening some, but not all, of the folders forces Find

  • Paint different color for different group

    Hello guys, I want to make the report colorful, the color should be same for same group, the color should be change for every other group. Kind of did some research but cannot figure out yet, I will appreciate all your helps. Thank you in advance! -B