Dynpro-PAI doesn't recognize actual selections in ALV-Control

Question

Hi Control-Framework-Experts,
I have a Dynpro with an ALV-Grid-Control (cl_salv_table).
You can mark rows.
There is User-ALV-Button (cl_salv_functions_list) and
a event-handler (EVENT added_function OF cl_salv_events),
which find out, what rows are selected and gives a corresponding Info-message.
Example:
The rows 1 and 2 are selected.
User presses the ALV-Button
ALV-Event-Handler Method is proceeded and the following message is shown
"Selected Rows: 1   2".
Everything works fine.
Now the Problem. I want to put this function to a "normal" Dynpro-Standard-Toolbar-Event.
The PAI-Module does the same coding as the ALV-Event-Handler-Method.
But -> The Result is outdated.
Example:
The rows 1 and 2 are selected.
User presses the ALV-Button
ALV-Event-Handler Method is proceeded and the following message is shown
"Selected Rows: 1   2".
Now - Only Row 1 is selected.
+The Dynpro-Standard-Toolbar-Button is pressed. +
The PAI-Module (user_command_0100) tries to find out the selected rows -> Result:
"Selected Rows: 1   2". (wrong)
The PAI-Module only shows the result of the last Event-Handler-Call.
What is the trick to synchronize Control and Dynpro?
Regards
Juergen
Here ist the coding (sorry for some german inline-comments)
program  zschoe01.
data:      ok_code like sy-ucomm.
* Dynpro-CustomControl
data: gr_cont01 type ref to cl_gui_custom_container,
      gr_alv01  type ref to cl_salv_table.
types: begin of ts_fauf,
         aufnr type aufnr,
         text type maktx,
       end of ts_fauf.
data: gt_fauf type table of ts_fauf,
      gs_fauf type ts_fauf.
*       CLASS lcl_event_handler DEFINITION
class lcl_event_handler definition.
  public section.
*   Klassenmethoden
*   Trick, weil man sich so das Erzeugen eines gesonderten Objekts
*   sparen kann
    class-methods:
*     FCODE-Behandlung innerhalb des ALV01
      handle_alv01_user_command
        for event added_function of cl_salv_events
        importing e_salv_function.
endclass.                    "lcl_event_handler DEFINITION
*       CLASS lcl_event_handler IMPLEMENTATION
class lcl_event_handler implementation.
*     FCODE-Behandlung innerhalb des ALV01
  method       handle_alv01_user_command .
    data: lr_selections type ref to cl_salv_selections,
          lt_rows type salv_t_row,
          ls_row like line of lt_rows.
    data: lv_string type string,
          lv_char(6) type c.
* Markierte Zeilen aus ALV-Anzeige ermitteln.
    lr_selections = gr_alv01->get_selections( ).
    lt_rows = lr_selections->get_selected_rows( ).
    if sy-subrc <> 0 or lt_rows[] is initial.
      message i001(00) with 'Nothing selected'.
    else.
      case e_salv_function.
        when 'SAVE'.
          clear lv_string.
          loop at lt_rows into ls_row.
*           Aufzählung aller markierten Zeilen in einen langen String
            write ls_row to lv_char.
            concatenate lv_string lv_char into lv_string separated by space.
          endloop.
          message i001(00) with 'Selected Rows:' lv_string.
      endcase.
    endif.
  endmethod.                    "handle_alv01_user_command
endclass.                    "lcl_event_handler IMPLEMENTATION
start-of-selection.
  gs_fauf-aufnr = '4711'.
  gs_fauf-text  = 'Text1'.
  append gs_fauf to gt_fauf.
  gs_fauf-aufnr = '5616'.
  gs_fauf-text  = 'Another Text'.
  append gs_fauf to gt_fauf.
  call screen 100.
*  MODULE status_0100 OUTPUT
module status_0100 output.
  set pf-status '0100'.
  set titlebar '0100'.
endmodule.                 " STATUS_0100  OUTPUT
*  MODULE init_controls OUTPUT
module init_controls output.
  perform init_controls.
endmodule.                    "init_controls OUTPUT
*&      Module  exit_commands_0100  INPUT
*       text
module exit_commands_0100 input.
*   -> Transaktion verlassen
  leave to screen 0.
endmodule.                 " exit_commands_0100  INPUT
*&      Module  USER_COMMAND_0100  INPUT
*       text
module user_command_0100 input.
  case ok_code.
    when 'SAVE'.
*     (Ctrl-S) gedrückt -> Same Coding as in lcl_event_handler
      data: lr_selections type ref to cl_salv_selections,
            lt_rows type salv_t_row,
            ls_row like line of lt_rows.
      data: lv_string type string,
            lv_char(6) type c.
*     Markierte Zeilen aus ALV-Anzeige ermitteln.
      lr_selections = gr_alv01->get_selections( ).
      lt_rows = lr_selections->get_selected_rows( ).
      if sy-subrc <> 0 or lt_rows[] is initial.
        message i001(00) with 'Nothing selected'.
      else.
        clear lv_string.
        loop at lt_rows into ls_row.
*          Aufzählung aller markierten Zeilen in einen langen String
          write ls_row to lv_char.
          concatenate lv_string lv_char into lv_string separated by space.
        endloop.
        message i001(00) with 'Selected Rows:' lv_string.
      endif.
  endcase.
endmodule.                 " USER_COMMAND_0100  INPUT
*&      Form  init_controls
*       text
form init_controls .
  data: lr_selections type ref to cl_salv_selections.
  data: lr_functions type ref to cl_salv_functions_list.
  data: lr_events type ref to cl_salv_events_table.
  data: lv_text             type string,
        lv_icon type string.
  if gr_cont01 is initial.
    create object gr_cont01
      exporting
*       parent                      =
        container_name              = 'CUSTCTRL01'.
*... §2 create an ALV table
    try.
        cl_salv_table=>factory(
          exporting
            r_container    = gr_cont01
            container_name = 'CUSTCTRL01'
          importing
            r_salv_table   = gr_alv01
          changing
            t_table        = gt_fauf ).
      catch cx_salv_msg.                                "#EC NO_HANDLER
    endtry.
*... §3 Functions
*... §3.1 activate ALV generic Functions
    lr_functions = gr_alv01->get_functions( ).
*  lr_functions->set_default( abap_true ).
    lr_functions->set_all( abap_true ).
    try.
        lv_text = '__Who_is_selected?___'.
        lr_functions->add_function(
          name     = 'SAVE'
          text     = lv_text
          tooltip  = lv_text
          position = if_salv_c_function_position=>left_of_salv_functions ).
      catch cx_salv_wrong_call cx_salv_existing.
    endtry.
*... §4.3 set the selection mode: multiple or single row selection
    lr_selections = gr_alv01->get_selections( ).
    lr_selections->set_selection_mode( if_salv_c_selection_mode=>row_column ).
*... §5 register to the events of cl_salv_table
    lr_events = gr_alv01->get_event( ).
*... §5.1 register to the event USER_COMMAND
**   Eventhandlermethode auch wirklich zuordnen.
**   Achtung: Syntax! Weil Klassenmethode, Aufruf mit =>
**   (vgl. Objekte ->)
    set handler:
      lcl_event_handler=>handle_alv01_user_command for lr_events.
    gr_alv01->display( ).
  endif.
endform.                    " init_controls

Answer 1

Well I figured out why it wasn't performing like I expected.  My logic was wrong.  Seems reasonable.
Was I right about this part though?
My guess is the restore
doesn't show up because the window isn't really maximized, because I
made it smaller to maintain proportions.
My updated VI is attached
Message Edited by elset191 on 09-23-2009 02:50 PM
Tim Elsey
LabVIEW 2010, 2012
Certified LabVIEW Architect
Attachments:
Untitled 1.vi ‏25 KB