I/O Field in a Docking Container

Hii Experts,
I have created a Docking Container, which i have splitted into two containers. First one should contain ALV, second one should have a couple of i/o fields and pushbuttons placed on it. I have placed the Pushbuttons using Toolbar Class (cl_gui_toolbar). I want to know how to place an i/o field in this container.
Thanks in Advance,
rama

Hi all,
i have the same problem. I have to create a closing cockpit for FI and i use 4 docking containers, in the upper container (header) i like to place dynamicaly some input fields.
While sitting in the bathroom i had the idea to load a 2 column (or more) editable ALV into the container.
In the first line and the first (non editable) column is the field label, in second (editable) column the data can be entered. The changed values i get back via events.
If i need more paramters, i append more lines in the ALV tables.
if i need more parameters as i can place in one colum in the upper container, i use 1. col for field label, 2. col for input, 3. col as colored filler, 4. col as field label, 5. col as input value and so on.
  col 1       col 2       col 3  col 4  col 5
  label       value      filler   label   value
BUKRS
DE19
KORKS
DE01
PERIO
005.2009
RLDNR
I0
I will give feetback if my bathroom solution is useabel.
Kind regards,
Wolfgang
Edited by: Wolfgang Boehm on May 15, 2009 11:53 PM

Similar Messages

  • Creating Input Field inside Docking Container bar

    Hello.
    Does anyone know how I can put an input field inside a docking container object ? Just like it appears in SE80.
    I have created a docking container bar, and in one of those bars i want to put a text field.
    Anyone please ?
    Thank you
    EDIT----
    I found how to do this with cl_gui_container_bar_2 and with dynamic documents.
    Edited by: Ricardo Monteiro on Aug 25, 2010 1:30 PM

    Hi,
    Check Program SAPSIMPLE_TREE_CONTEXT_MEN_DEM and check event node_context_menu_request
    Hope this helps you.
    Thanks,
    Prashanth
    Edited by: Prashanth KR on Jun 2, 2009 7:50 AM

  • I/p parameter field in docking container

    How to get the field parameters in a docking container that shud be able to fetch data from Database ? for eg., in se80 tcode(in left container) we have an i/p field for program/class and another i/p field for their name.....

    Hi,
       You can use the following class cl_gui_textedit, and an object for the same can be created in the docking container.
    data : text type ref to cl_gui_textedit.
    * create the docking container
        CREATE OBJECT docking
                      EXPORTING repid     = repid
                                dynnr     = dynnr
                                side      = docking->dock_at_left
                                extension = 180.
    * create the text container
        CREATE OBJECT text
                      EXPORTING parent = docking.
    for further options look for the class CL_GUI_TEXTEDIT.
    also for reference you can see the BC example RSDEMO_DOCKING_CONTROL.
    Hope this helps.
    Regards,
    Kinshuk

  • How to set background color in a docking container?

    Hi guys!
    Is it possible to set a background color for a docking container?
    I don't find any appropriate method to do that.
    Is there actually a way?

    Hi,
    Please refer the below program as a reference for Color using Docking Container Concept.
    REPORT zcuitest_alv_07.
    * Use of colours in ALV grid (cell, line and column)            *
    * Table
    TABLES : mara.
    * Type
    TYPES : BEGIN OF ty_mara,
              matnr         LIKE mara-matnr,
              matkl         LIKE mara-matkl,
              counter(4)    TYPE n,
              free_text(15) TYPE c,
              color_line(4) TYPE c,           " Line color
              color_cell    TYPE lvc_t_scol,  " Cell color
    END OF ty_mara.
    * Structures
    DATA  : wa_mara     TYPE ty_mara,
            wa_fieldcat TYPE lvc_s_fcat,
            is_layout   TYPE lvc_s_layo,
            wa_color    TYPE lvc_s_scol.
    * Internal table
    DATA : it_mara     TYPE STANDARD TABLE OF ty_mara,
           it_fieldcat TYPE STANDARD TABLE OF lvc_s_fcat,
           it_color    TYPE TABLE          OF lvc_s_scol.
    * Variables
    DATA : okcode LIKE sy-ucomm,
           w_alv_grid          TYPE REF TO cl_gui_alv_grid,
           w_docking_container TYPE REF TO cl_gui_docking_container.
    PARAMETERS : p_column AS CHECKBOX,
                 p_line   AS CHECKBOX,
                 p_cell   AS CHECKBOX.
    START-OF-SELECTION.
      PERFORM get_data.
    END-OF-SELECTION.
      PERFORM fill_catalog.
      PERFORM fill_layout.
      CALL SCREEN 2000.
    *&      Module  status_2000  OUTPUT
    *       text
    MODULE status_2000 OUTPUT.
      SET PF-STATUS '2000'.
    ENDMODULE.                 " status_2000  OUTPUT
    *&      Module  user_command_2000  INPUT
    *       text
    MODULE user_command_2000 INPUT.
      DATA : w_okcode LIKE sy-ucomm.
      MOVE okcode TO w_okcode.
      CLEAR okcode.
      CASE w_okcode.
        WHEN 'BACK'.
          LEAVE TO SCREEN 0.
      ENDCASE.
    ENDMODULE.                 " user_command_2000  INPUT
    *&      Module  alv_grid  OUTPUT
    *       text
    MODULE alv_grid OUTPUT.
      IF w_docking_container IS INITIAL.
        PERFORM create_objects.
        PERFORM display_alv_grid.
      ENDIF.
    ENDMODULE.                 " alv_grid  OUTPUT
    *&      Form  create_objects
    *       text
    *  -->  p1        text
    *  <--  p2        text
    FORM create_objects.
    * Ratio must be included in [5..95]
      CREATE OBJECT w_docking_container
        EXPORTING
          ratio                       = 95
        EXCEPTIONS
          cntl_error                  = 1
          cntl_system_error           = 2
          create_error                = 3
          lifetime_error              = 4
          lifetime_dynpro_dynpro_link = 5
          others                      = 6.
      CREATE OBJECT w_alv_grid
        EXPORTING
          i_parent          = w_docking_container.
    ENDFORM.                    " create_objects
    *&      Form  display_alv_grid
    *       text
    *  -->  p1        text
    *  <--  p2        text
    FORM display_alv_grid.
      CALL METHOD w_alv_grid->set_table_for_first_display
        EXPORTING
          is_layout                     = is_layout
        CHANGING
          it_outtab                     = it_mara
          it_fieldcatalog               = it_fieldcat
        EXCEPTIONS
          invalid_parameter_combination = 1
          program_error                 = 2
          too_many_lines                = 3
          OTHERS                        = 4.
    ENDFORM.                    " display_alv_grid
    *&      Form  get_data
    *       text
    *  -->  p1        text
    *  <--  p2        text
    FORM get_data.
      SELECT * FROM mara UP TO 5 ROWS.
        CLEAR : wa_mara-color_line, wa_mara-color_cell.
        MOVE-CORRESPONDING mara TO wa_mara.
        ADD 1                   TO wa_mara-counter.
        MOVE 'Blabla'           TO wa_mara-free_text.
        IF wa_mara-counter = '0002'
        AND p_line = 'X'.
    * Color line
          MOVE 'C410' TO wa_mara-color_line.
        ELSEIF wa_mara-counter = '0004'
        AND p_cell = 'X'.
    * Color cell
          MOVE 'FREE_TEXT' TO wa_color-fname.
          MOVE '5'         TO wa_color-color-col.
          MOVE '1'         TO wa_color-color-int.
          MOVE '1'         TO wa_color-color-inv.
          APPEND wa_color TO it_color.
          wa_mara-color_cell[] = it_color[].
        ENDIF.
        APPEND wa_mara TO it_mara.
      ENDSELECT.
    ENDFORM.                    " get_data
    *&      Form  fill_catalog
    *       text
    *  -->  p1        text
    *  <--  p2        text
    FORM fill_catalog.
    * Colour code :                                                 *
    * Colour is a 4-char field where :                              *
    *              - 1st char = C (color property)                  *
    *              - 2nd char = color code (from 0 to 7)            *
    *                                  0 = background color         *
    *                                  1 = blue                     *
    *                                  2 = gray                     *
    *                                  3 = yellow                   *
    *                                  4 = blue/gray                *
    *                                  5 = green                    *
    *                                  6 = red                      *
    *                                  7 = orange                   *
    *              - 3rd char = intensified (0=off, 1=on)           *
    *              - 4th char = inverse display (0=off, 1=on)       *
    * Colour overwriting priority :                                 *
    *   1. Line                                                     *
    *   2. Cell                                                     *
    *   3. Column                                                   *
      DATA : w_position TYPE i VALUE '1'.
      CLEAR wa_fieldcat.
      MOVE w_position TO wa_fieldcat-col_pos.
      MOVE 'MATNR'    TO wa_fieldcat-fieldname.
      MOVE 'MARA'     TO wa_fieldcat-ref_table.
      MOVE 'MATNR'    TO wa_fieldcat-ref_field.
      APPEND wa_fieldcat TO it_fieldcat.
      ADD 1 TO w_position.
      CLEAR wa_fieldcat.
      MOVE w_position TO wa_fieldcat-col_pos.
      MOVE 'MATKL'    TO wa_fieldcat-fieldname.
      MOVE 'MARA'     TO wa_fieldcat-ref_table.
      MOVE 'MATKL'    TO wa_fieldcat-ref_field.
    * Color column
      IF p_column = 'X'.
        MOVE 'C610'     TO wa_fieldcat-emphasize.
      ENDIF.
      APPEND wa_fieldcat TO it_fieldcat.
      ADD 1 TO w_position.
      CLEAR wa_fieldcat.
      MOVE w_position TO wa_fieldcat-col_pos.
      MOVE 'COUNTER'  TO wa_fieldcat-fieldname.
      MOVE 'N'        TO wa_fieldcat-inttype.
      MOVE '4'        TO wa_fieldcat-intlen.
      MOVE 'Counter'  TO wa_fieldcat-coltext.
      APPEND wa_fieldcat TO it_fieldcat.
      ADD 1 TO w_position.
      CLEAR wa_fieldcat.
      MOVE w_position  TO wa_fieldcat-col_pos.
      MOVE 'FREE_TEXT' TO wa_fieldcat-fieldname.
      MOVE 'C'         TO wa_fieldcat-inttype.
      MOVE '20'        TO wa_fieldcat-intlen.
      MOVE 'Text'      TO wa_fieldcat-coltext.
      APPEND wa_fieldcat TO it_fieldcat.
    ENDFORM.                    " fill_catalog
    *&      Form  fill_layout
    *       text
    *  -->  p1        text
    *  <--  p2        text
    FORM fill_layout.
    * Field that identify color line in internal table
      MOVE 'COLOR_LINE' TO is_layout-info_fname.
    * Field that identify cell color in inetrnal table
      MOVE 'COLOR_CELL' TO is_layout-ctab_fname.
    ENDFORM.                    " fill_layout

  • Embedding a screen in a docking container - Is it possible at all??

    I am working on a screen design similar to SE80, where I will be required to display a tree structure in screen say '0100' to the left of the screen and upon node_double_click event, I should be able to bring up another screen '0200' on to the right side with out navigating away from the screen 0100.
    I have a custom control in my initial screen 0100, covering the full area, and I am instantiating the docking container object in the node_double_click handler method of the tree control. I have passed sy-repid and dynpro number '0200' but to no avail.
    The following is the code sample.
          IF docking_right IS INITIAL.
            CREATE OBJECT docking_right
              EXPORTING
                repid     = g_repid
                dynnr     = '0200'
                side      = cl_gui_docking_container=>dock_at_right
                extension = 900.
          ENDIF.
    I have gone through many posts in this forum but none of them have a definitive indication if that can be possible, that is why I had to create this new thread. I will be glad if any of you could let me know if there is way accomplishing this.
    Thanks in advance,
    Raghu.

    Hi Raghu,
    I was specifically interested in exploring the option (if any) of combining conventional controls and the new GUI controls because I am trying to get to a scenario where I should be able create conventional controls like list boxes and buttons dynamically based on user actions. .
    For GUI controls you always need some container which is a "bridge" b/w control created in program and the screen. For standard dialogs you don't need such container. You just place them on the screen. Therefore you can combine these techniques by simply placing a container (which you already have and will use for tree control). The rest of the screen area can be used by standard controls (listoboxes, i/o fields etc). This way standard controls would be statically set, whereas container would store GUI control assinged dynamically in program.
    If, on the other hand, you want both controls and GUI controls be dynamically determined, just keep you container (for GUI control) and create a subscreen area where you dynamically swap different screens. These screen must be set as subscreens and must have statically defined layout, thus only determination of the screen to be displayed is dynamic here.
    Anyhow, there is no way to dynamically set standard controls on the screen. You could, however in turn switch them on/off in PBO (based on certain conditions) but this would require placing all the possible controls and just hiding/showing them. No replacment is then possible, so image empty gaps which this approach would produce.
    Ironically the constructor of docking container supports repid and dynpro for no apparent utility.
    As I said, container is used only to place some GUI control in it and then send this entire package (container+ GUI control) to appropriate place on the screen. That's why in container's constructor there is both repid and dynpro. These only determine where this container should be attached.
    Regards
    Marcin

  • Selection screen elements in docking container

    Hi fellow abapers
    Is there any way to create pushbutton, input fields (Parameters or select-options ) in a docking container.
    Plz help.
    Regards
    Prabumanoharan

    Abhi,
    I can understand what are you trying to do. But that is not possbile with a DOCKING container.
    Here is a work around. Have two screens, one with the fields that you want to display and other one empty. Whenever you want to decrease the size, just replace the actual screen with fields with the dummy empty screen.
    There is NO other way of doing this.
    Regards,
    Ravi
    Note : Please mark the helpful answers

  • Dock container

    what is dock container in a class?how to create it in a report.

    hi, plz check the following code.wht i have to give in the exporting parameter parent in the below dock container o_docking?and to display the values of this sample internal table?urgent plz.thanx in advance
    code:
    tables:mara.
    DATA:pav1 TYPE REF TO cl_gui_alv_grid.
    data : o_docking type ref to cl_gui_docking_container.
    DATA:BEGIN OF itab OCCURS 0,
         matnr LIKE mara-matnr,
         mtart LIKE mara-mtart,
         matkl LIKE mara-matkl,
    END OF itab.
    PARAMETERS: s_matnr LIKE mara-matnr.
    SELECT matnr mtart matkl FROM mara INTO CORRESPONDING FIELDS OF TABLE
    itab WHERE matnr = s_matnr.
    CREATE OBJECT o_docking
    EXPORTING
       PARENT                      =
       REPID                       =
       DYNNR                       =
       SIDE                        = DOCK_AT_LEFT
       EXTENSION                   = 50
       STYLE                       =
       LIFETIME                    = lifetime_default
       CAPTION                     =
       METRIC                      = 0
       RATIO                       =
       NO_AUTODEF_PROGID_DYNNR     =
       NAME                        =
    EXCEPTIONS
       CNTL_ERROR                  = 1
       CNTL_SYSTEM_ERROR           = 2
       CREATE_ERROR                = 3
       LIFETIME_ERROR              = 4
       LIFETIME_DYNPRO_DYNPRO_LINK = 5
       others                      = 6
    IF sy-subrc <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
               WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    create object pav1 exporting i_parent = o_docking.
    CALL METHOD pav1->set_table_for_first_display
      EXPORTING
       I_BUFFER_ACTIVE               =
       I_BYPASSING_BUFFER            =
       I_CONSISTENCY_CHECK           =
        I_STRUCTURE_NAME               = 'mara'
       IS_VARIANT                    =
       I_SAVE                        =
       I_DEFAULT                     = 'X'
       IS_LAYOUT                     =
       IS_PRINT                      =
       IT_SPECIAL_GROUPS             =
       IT_TOOLBAR_EXCLUDING          =
       IT_HYPERLINK                  =
       IT_ALV_GRAPHICS               =
       IT_EXCEPT_QINFO               =
      CHANGING
        it_outtab                     =  itab[]
       IT_FIELDCATALOG               =
       IT_SORT                       =
       IT_FILTER                     =
    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.

  • Docking Container and CL_SALV_TREE

    Hi,
    i get problems with this code.
    i'm using docking container, not customer container.
      CREATE OBJECT GR_DCONTAINER
        EXPORTING
          PARENT = CL_GUI_CONTAINER=>SCREEN0
          SIDE   = CL_GUI_DOCKING_CONTAINER=>DOCK_AT_LEFT
          RATIO  = 90.
      PERFORM DYNP_SPLITTEN.
      CREATE OBJECT GR_ALVGRID_RIGHT
        EXPORTING
          I_PARENT = O_PARENT_GRID_RIGHT.
      TRY.
          CL_SALV_TREE=>FACTORY(
            EXPORTING
              R_CONTAINER  = O_PARENT_GRID_RIGHT
            IMPORTING
              R_SALV_TREE  = GR_TREE
            CHANGING
              T_TABLE      = ITAB ).
    <b>    CATCH CX_SALV_NO_NEW_DATA_ALLOWED CX_SALV_ERROR.
          EXIT.</b>
      ENDTRY.
    i get the catch-event and the report ends.
    Question: Does the ALV-TREE need customer container or can
    i use docking container (how??).
    thanks for help.
    Regards Dieter

    Sure,  in this case, it is impelmented in a docking container hanging from a selection screen, but it is pretty much the same as hanging off a dynpro.
    REPORT zrich_0001.
    DATA: gt_outtab1 TYPE TABLE OF sflight,
          gt_outtab2 TYPE TABLE OF sflight.
    DATA: ls_outtab TYPE sflight.
    DATA: gr_tree  TYPE REF TO cl_salv_tree.
    DATA: nodes TYPE REF TO cl_salv_nodes,
          node TYPE REF TO cl_salv_node.
    DATA: docking TYPE REF TO cl_gui_docking_container.
    PARAMETERS: p_check.
    AT SELECTION-SCREEN OUTPUT.
      CREATE OBJECT docking
          EXPORTING
    *         PARENT = CL_GUI_CONTAINER=>SCREEN0
               side = cl_gui_docking_container=>dock_at_left
              ratio = 90.
    *... Select Data
      SELECT * FROM sflight INTO CORRESPONDING FIELDS OF TABLE gt_outtab1 UP TO 5 ROWS.
    *... Create Instance with an Empty Table
      CALL METHOD cl_salv_tree=>factory
        EXPORTING
          r_container = docking
        IMPORTING
          r_salv_tree = gr_tree
        CHANGING
          t_table     = gt_outtab2.
    *... Add the Nodes to the Tree
      nodes = gr_tree->get_nodes( ).
      LOOP AT gt_outtab1 INTO ls_outtab.
        TRY.
            node = nodes->add_node( related_node = ' '
                                    relationship = cl_gui_column_tree=>relat_first_child ).
            node->set_data_row( ls_outtab ).
          CATCH cx_salv_msg.
        ENDTRY.
      ENDLOOP.
    *... Display Table
      gr_tree->display( ).
    Regards,
    RIch Heilman

  • Docking container in splitter container?

    Hi forum,
    i would like to generate a view (dynpro) with is seperated in 3 vertical (resizable) areas. I have solved this with the splitter container.
    Now i would like to fill the 3 areas with dynamic content, i. e. different table views. These different contents should be nested in containers, so i can push my predefined containers into the splitter areas. (just the contents the user would like to see...)
    In my opinion, the docking container is the right choise, because i have not to carry about positioning the container at all.
    Now theres a problem in adapting the docking container to the splitter container and i am not sure if it is possible at all?!?
    I try to create the docking object with the splitter object as parent, but the debugger calls a run time error?!?
    CREATE OBJECT docking_container
      EXPORTING
        parent                      = splitter_container
    *    repid                       =
    *    dynnr                       =
    *    side                        = docking_container->dock_at_left
    *    extension                   = 50
    *    style                       =
    *    lifetime                    = lifetime_default
        caption                     = 'MyDock'
    *    metric                      = 0
    *    ratio                       =
    *    no_autodef_progid_dynnr     =
    *    name                        =
      EXCEPTIONS
        cntl_error                  = 1
        cntl_system_error           = 2
        create_error                = 3
        lifetime_error              = 4
        lifetime_dynpro_dynpro_link = 5
        others.
    Can anyone help? Different solutions are also welcome...
    Thanks in advance,
    Dennis

    Jose, thank you.
    Here is my complete code and I cannot find any differences to your example...
    DATA: custom_container TYPE REF TO CL_GUI_CUSTOM_CONTAINER,
            splitter_container TYPE REF TO CL_GUI_SPLITTER_CONTAINER,
            splitter_cont1 type ref to cl_gui_container,
            dock_container TYPE REF TO CL_GUI_DOCKING_CONTAINER.
    * custom container
    * the name 'CUSTOM_CONTROL_BASE' references to the
    * custom control on the main dynpro 100!!!
      CREATE OBJECT custom_container
        EXPORTING
          container_name              = 'CUSTOM_CONTROL_BASE'
        EXCEPTIONS
          cntl_error                  = 1
          cntl_system_error           = 2
          create_error                = 3
          lifetime_error              = 4
          lifetime_dynpro_dynpro_link = 5
          others                      = 6
      IF sy-subrc <> 0.
    *   MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    *              WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
        exit.
      ENDIF.
    * set splitscreen container
      CREATE OBJECT splitter_container
        EXPORTING
          parent            = custom_container
          rows              = 1
          columns           = 3
        EXCEPTIONS
          cntl_error        = 1
          cntl_system_error = 2
          others            = 3.
      IF sy-subrc <> 0.
    *    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    *               WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
        exit.
      ENDIF.
      CALL METHOD splitter_container->GET_CONTAINER
        EXPORTING
          ROW       = 1
          COLUMN    = 1
        RECEIVING
          CONTAINER = splitter_cont1.
    CREATE OBJECT dock_container
      EXPORTING
        parent                      = splitter_cont1
      EXCEPTIONS
        cntl_error                  = 1
        cntl_system_error           = 2
        create_error                = 3
        lifetime_error              = 4
        lifetime_dynpro_dynpro_link = 5
        others                      = 6
    IF sy-subrc <> 0.
    * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    *            WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    In debug - mode I can see, that 'splitter_cont' is initalized... The code only breakes when a parent is set to dock_container.
    The error comes from CL_GUI_CONTAINER->GET_FRAME_CONTAINER where the compiler runs into 'RAISE CNTL_ERROR'...
    METHOD GET_FRAME_CONTAINER.
        DATA: PARENTID TYPE I.
    *    CALL 'DY_GET_MODAL_LEVEL' ID 'MOD_LEV' FIELD PARENTID.
    *    CALL 'DY_GET_MODAL_LEVEL' ID 'MOD_LEV_UI' FIELD PARENTID.
    *    CALL 'DY_GET_MODAL_LEVEL' ID 'ACT_UI_MOD_LEV' FIELD PARENTID.
        IF CONTAINER IS INITIAL.
            CALL 'DY_GET_MODAL_LEVEL' ID 'ACT_UI_MOD_LEV' FIELD PARENTID.
        ELSEIF CONTAINER->H_CONTROL-SHELLID = -1.
            CALL 'DY_GET_MODAL_LEVEL' ID 'ACT_UI_MOD_LEV' FIELD PARENTID.
        ELSE.
            PARENTID = CONTAINER->H_CONTROL-SHELLID.
        ENDIF.
        IF PARENTID BETWEEN 10 AND 19.    " this are the dynpro areas
            PARENTID = PARENTID - 10.     " now its the corresponding frame
        ENDIF.
        data: new_dummy_parent_container type ref to CL_GUI_CONTAINER.
        IF PARENTID BETWEEN 0 AND 9.
        "    CREATE OBJECT DUMMY_PARENT_CONTAINER
        "        EXPORTING CLSID = SPACE.
        "    DUMMY_PARENT_CONTAINER->H_CONTROL-SHELLID = PARENTID.
        "    FRAME_CONTAINER = DUMMY_PARENT_CONTAINER.
            CREATE OBJECT NEW_DUMMY_PARENT_CONTAINER
                EXPORTING CLSID = SPACE.
            NEW_DUMMY_PARENT_CONTAINER->H_CONTROL-SHELLID = PARENTID.
            FRAME_CONTAINER = NEW_DUMMY_PARENT_CONTAINER.
        ELSEIF PARENTID = 99.
            FRAME_CONTAINER = CONTAINER.
        ELSE.
            IF CONTAINER_MUST_BE_TOPLEVEL = 0.
                FRAME_CONTAINER = CONTAINER.
            ELSE.
                RAISE CNTL_ERROR.
            ENDIF.
        ENDIF.
    ENDMETHOD.
    I have found further solutions like yours on the web, so it seems to be right. I cannot understand why the compiler runs into error?!?
    Thanks a lot!

  • How can I pass a docking container to a program in a non-simple context?

    Dear colleagues,
    I want to pass a docking container like the one in SE80 to another program.
    The following code works fine:
    REPORT z_moving_dock.
    DATA: cl_docker type REF TO cl_gui_docking_container.
    PARAMETERS: test.
    INITIALIZATION.
      CREATE OBJECT cl_docker EXPORTING no_autodef_progid_dynnr = 'X'.
    END-OF-SELECTION.
      WRITE:/ test.
    But I cannot extend this to my current program. There I sourced out anything related to the GUI into a function group to obey the MVC paradigma. (That's maybe the error in reasoning, but I'm following the book Design Patterns in Object-Oriented ABAP from SAP Press and -- of course -- good and healthy programming style.)
    So it's a function group which knows the dynpros and controls, the main program knows only the data.
    Now I have a docking container like the one in SE80. We have many working older programs and I want to switch to them carrying the docking container with me. I have searched the Demos in SAP, the Online Help, the SAP Library, Books, the Web, this Forum, but none of them goes beyond the simpler examples that always work.
    I tried the LINK method on the docking container. I tried it before calling the new program (btw. by SUBMIT). I tried it afterwards from the called program (via a function module from the aforementioned group -- but the group is tied to the old program context and therefore I am in a new "instance" of it). I tried different values for REPID and DYNNR in LINK. I debugged SE80 -- too complicated!
    If it works well I get the container back when I return to the calling program. If it works badly the container is completely lost.
    Perhaps I should export something to memory?
    But I strongly would prefer not to alter the called programs: In the future I might also want to call a SAP standard program.
    I also didn't find some documentation explaining what is going on in the background so I could figure out in which direction to "think".
    I also tested the following code on SAP R/3 4.7 and SAP ERP 2005 with the same results.
    In the meantime I also created a minimal example. First the triggering report:
    REPORT z_moving_docking_container.
    DATA: g_example TYPE REF TO zcl_moving_docking_container.
    CREATE OBJECT g_example.
    This obviously calls the main class ZCL_MOVING_DOCKING_CONTAINER which has only this constructor:
    METHOD constructor.
      CALL FUNCTION 'Z_SHOW_DYNPRO'.
    ENDMETHOD.
    Normally this class should handle the business logic. Here it only calls this function module. In the appropriate function group, say Z_MOVING_DOCKING_CONTAINER, I have these declarations in the TOP-Include:
    FUNCTION-POOL z_moving_docking_container.
    DATA:
      gv_okcode TYPE ui_func,
      go_docker TYPE REF TO cl_gui_docking_container.
    The function group also contains a dynpro 9000 with this flow logic:
    PROCESS BEFORE OUTPUT.
      MODULE status_9000.
    PROCESS AFTER INPUT.
      MODULE user_command_9000.
    The modules are straightforward:
    MODULE status_9000 OUTPUT.
      SET PF-STATUS '9000'.
      IF go_docker IS INITIAL.
        CREATE OBJECT go_docker
               EXPORTING no_autodef_progid_dynnr = 'X'.
      ENDIF.
    ENDMODULE.
    with at least the function code ONLI defined in PF-status 9000 and
    MODULE user_command_9000 INPUT.
      IF gv_okcode = 'ONLI'.
        SUBMIT z_sample_report AND RETURN.
      ELSE.
        LEAVE PROGRAM.
      ENDIF.
    ENDMODULE.
    The report Z_SAMPLE_REPORT can be any report you like.
    At last the function module contains the following code:
    FUNCTION z_show_dynpro.
    *"*"Lokale Schnittstelle:
      CALL SCREEN 9000.
    ENDFUNCTION.
    As I see this, this is a straightforward application of the working example at the top and the principles of MVC and encapsulation of the dynpro logic (to "avoid" global variables as best as possible).
    Clearly in some sense this is an academic question, but I have built a fairly big application like that up to now ...
    </edit>
    Thanks for reading and contemplating,
    Thomas
    Edited by: Thomas Geiß on Feb 4, 2009 11:03 AM
    Edited by: Thomas Geiß on Feb 4, 2009 11:59 AM
    Edited by: Thomas Geiß on Feb 4, 2009 12:01 PM

    You'll either have to pass the data in as parameters in the applet tags or create a JavaScript tag and have the JavaScript pass it in. If the array is very large then you open a connection between the Applet and a servlet and pass the data that way.

  • Refresh cl_salv_table= factory attached to a Docking Container

    Hi Gurus!!
    I have a issue with a cl_salv_table=>factory attached to a Docking Container.
    Here is my code set up, which might be wrong actually:
    I've created a simple report, with a TOP and some include for PBO, PAI and routines. In the Report, I call a Screen, here 2000.
    The TOP contains
    DATA: docking_container     TYPE REF TO cl_gui_docking_container,
          gc_table_alv          TYPE REF TO cl_salv_table.
    The Screen Flow is basic:
    PROCESS BEFORE OUTPUT.
      MODULE status_2000.
    PROCESS AFTER INPUT.
      MODULE user_command_2000.
    With status_2000:
    MODULE status_2000 OUTPUT.
      SET PF-STATUS 'STATUS'.
    *  SET TITLEBAR 'xxx'.
    * Initialization of docking container
      IF docking_container IS INITIAL.
        CREATE OBJECT docking_container
          EXPORTING
            side   = cl_gui_docking_container=>dock_at_bottom
          EXCEPTIONS
            OTHERS = 1.
        IF sy-subrc <> 0. MESSAGE a500. ENDIF.
        CALL METHOD docking_container->set_height
          EXPORTING
            height = 170.
      ENDIF.
    ENDMODULE.                 " STATUS_2000  OUTPUT
    Then the Screen PAI looks dumb, but in this example, I have drastically made the code simpler

    I think you are not releasing proxy object with method FREE of docking container.
    Check the below code. It first displays SFLIGHT table, then after another dialog step is concluded, it shows SPFLI table.
    DATA: r_dock_container TYPE REF TO cl_gui_docking_container,
          r_salv_table     TYPE REF TO cl_salv_table.
    DATA: it_sflight TYPE sflight OCCURS 0,
          it_spfli   TYPE spfli   OCCURS 0.
    DATA: count TYPE i.
    START-OF-SELECTION.
      SELECT * FROM sflight INTO TABLE it_sflight UP TO 10 ROWS.
      SELECT * FROM spfli INTO TABLE it_spfli UP TO 10 ROWS.
      CALL SCREEN 0200.
    MODULE pbo OUTPUT.
      SET PF-STATUS space.
      IF count IS INITIAL.
        CREATE OBJECT r_dock_container
          EXPORTING
            side   = cl_gui_docking_container=>dock_at_bottom
          EXCEPTIONS
            OTHERS = 1.
        CALL METHOD r_dock_container->set_height
          EXPORTING
            height = 170.
        CALL METHOD cl_salv_table=>factory
          EXPORTING
            r_container  = r_dock_container
          IMPORTING
            r_salv_table = r_salv_table
          CHANGING
            t_table      = it_sflight.
    *  ALV Display
        r_salv_table->display( ).
      ELSE.
        r_dock_container->free( ).   "this is crucial to release proxy object of docking container
        CLEAR r_dock_container.   "and clear a reference variable (with these two statements your control will disapear from screen)
        "now you can create a new one and bound a new ALV to it
        CREATE OBJECT r_dock_container
           EXPORTING
             side   = cl_gui_docking_container=>dock_at_bottom
           EXCEPTIONS
             OTHERS = 1.
        CALL METHOD r_dock_container->set_height
          EXPORTING
            height = 170.
        CALL METHOD cl_salv_table=>factory
          EXPORTING
            r_container  = r_dock_container
          IMPORTING
            r_salv_table = r_salv_table
          CHANGING
            t_table      = it_spfli.
    *  ALV Display
        r_salv_table->display( ).
      ENDIF.
      ADD 1 TO count .
    ENDMODULE.                  
    Of course you have to adjust it with your tables and data, but this works fine
    Regards
    Marcin
    Edited by: Marcin Pciak on Jun 16, 2009 12:57 PM

  • Background Execution Problem-Docking Container with 2 ALV Grids in one scre

    Hi Friends,
    I have created 2 ALV Grids in one screen - one below another using DOCKING CONTAINER.
    The objects are 'g_dock_cont' and 'g_dock_cont1'.
    I am getting the foreground output as expected with 2 ALV Grids.
    While executing in background (F9), I am getting only output of first ALV grid. Second ALV is not getting displayed in BACKGROUND(F9) mode.
    How to solve this.
    FORM create_objects.
    * Materials with data
      IF   g_dock_cont IS INITIAL.
       IF sy-batch NE 'X'.
    *CREATE THE OBJECT FOR DOCKING CONTAINER
        CREATE OBJECT g_dock_cont
          EXPORTING
            side                  = cl_gui_docking_container=>dock_at_top
            extension             = 300.
        ENDIF.
    *CREATE THE OBJECT FOR ALV GRID
        CREATE OBJECT g_alvgrid
               EXPORTING i_parent = g_dock_cont.
        wa_layout-grid_title =
              'Materials with Data'.
      ENDIF.
    IF NOT I_DETAIL[] IS INITIAL.
    CALL METHOD g_alvgrid->set_table_for_first_display
      EXPORTING
        IS_VARIANT                    = WA_VARIANT_STX
        IS_LAYOUT                     = wa_layout
      CHANGING
        it_outtab                     = I_DETAIL
        IT_FIELDCATALOG               = LIT_FIELDCATALOG[]
      EXCEPTIONS
        INVALID_PARAMETER_COMBINATION = 1
        PROGRAM_ERROR                 = 2
        TOO_MANY_LINES                = 3
        others                        = 4
    IF sy-subrc <> 0.
    ENDIF.
    ENDIF.
    *MATERIALS WITHOUT DATA
      IF   g_dock_cont1 IS INITIAL.
       IF sy-batch NE 'X'.
    *CREATE THE OBJECT FOR DOCKING CONTAINER
        CREATE OBJECT g_dock_cont1
          EXPORTING
            side                  = cl_gui_docking_container=>dock_at_bottom
            extension             = 300.
       ENDIF.
    *CREATE THE OBJECT FOR ALV GRID
        CREATE OBJECT g_alvgrid1
               EXPORTING i_parent = g_dock_cont1.
        wa_layout1-grid_title =
              'Materials without Data'.
      ENDIF.
    IF NOT I_MARA[] IS INITIAL.
    CALL METHOD g_alvgrid1->set_table_for_first_display
      EXPORTING
        IS_LAYOUT                     = wa_layout1
      CHANGING
        it_outtab                     = I_MARA
        IT_FIELDCATALOG               = i_fieldcat[]
      EXCEPTIONS
        INVALID_PARAMETER_COMBINATION = 1
        PROGRAM_ERROR                 = 2
        TOO_MANY_LINES                = 3
        others                        = 4
    IF sy-subrc <> 0.
    ENDIF.
    ENDIF.
    ENDFORM.                    " create_objects
    Regards,
    Viji.

    Hi,
    What i was saying is that you need to code again for background mode of execution.
    AT END OF SELECTION.
    IF SY-BATCH EQ 'X'.
      PERFORM DISPLAY1.
      PERFORM DISPLAY2.
    In DISPLAY1 use REUSE_ALV_LIST_DISPLAY to display data from outtab1.
    In DISPLAY2 use REUSE_ALV_LIST_DISPLAY to display data from outtab2.
    For example : execute this report in background mode.this will not execute in online mode.
    After execution you will get two spools one for KNA1 and one for LFA1 data. Spool can be controlled via IS_PRINT structure.
    report  zrbackground.
    data gt_lfa1 type standard table of lfa1.
    data gt_kna1 type standard table of kna1.
    start-of-selection.
      select * from lfa1 into table gt_lfa1 up to 10 rows.
      select * from kna1 into table gt_kna1 up to 20 rows.
    end-of-selection.
      if sy-batch eq 'X'.
        perform display_lfa1.
        perform display_kna1.
      endif.
    *&      Form  DISPLAY_LFA1
          text
    -->  p1        text
    <--  p2        text
    form display_lfa1 .
      call function 'REUSE_ALV_LIST_DISPLAY'
        exporting
          i_callback_program = sy-repid
          i_structure_name   = 'LFA1'
        tables
          t_outtab           = gt_lfa1
        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_LFA1
    *&      Form  DISPLAY_KNA1
          text
    -->  p1        text
    <--  p2        text
    form display_kna1 .
      call function 'REUSE_ALV_LIST_DISPLAY'
        exporting
          i_callback_program = sy-repid
          i_structure_name   = 'KNA1'
        tables
          t_outtab           = gt_kna1
        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_KNA1
    Please let me know if its not clear or you need more info.
    Thanks,
    Abhishek
    Edited by: abhishek sinha on May 8, 2009 7:42 PM
    Edited by: abhishek sinha on May 8, 2009 8:45 PM

  • ALV tree in docking container

    i am trying to call a docking container (on hotspot click of ALV.-> Reuse_alv_grid_display).
    And a alv tree is to be displayed in docking container.
    I have wrote the entire code and there is no error is thrown by the system, but docking container displayed.
    I am posting entire code .Please let me know where i am mistaken.
    check r_ucomm eq '&IC1'."when user double click on any cell of ALV.
       CASE rs_selfield-SEL_TAB_FIELD.
         WHEN 'I_MKPF-WERKS'.
           perform create_dock.
           perform create_alv_tree.
    *           WHEN .
    *           WHEN OTHERS.
       ENDCASE.
    FORM CREATE_DOCK ."docking container is created
       check obj1 is initial.
       CREATE OBJECT OBJ1
         EXPORTING
    *    PARENT                      =
         REPID                       = sy-repid
         DYNNR                       = sy-dynnr
           SIDE                        = obj1->DOCK_AT_bottom
         EXTENSION                   = 500
         EXCEPTIONS
           CNTL_ERROR                  = 1
           CNTL_SYSTEM_ERROR           = 2
           CREATE_ERROR                = 3
           LIFETIME_ERROR              = 4
           LIFETIME_DYNPRO_DYNPRO_LINK = 5
           others                      = 6
       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.         
    FORM CREATE_ALV_TREE . "alv Tree
    create object tree
         exporting
             parent              = obj1
             node_selection_mode = cl_gui_column_tree=>node_sel_mode_single
             item_selection      = 'X'
             no_html_header      = 'X'
             no_toolbar          = ''
         exceptions
             cntl_error                   = 1
             cntl_system_error            = 2
             create_error                 = 3
             lifetime_error               = 4
             illegal_node_selection_mode  = 5
             failed                       = 6
             illegal_column_name          = 7.
       if sy-subrc <> 0.
         message x208(00) with 'ERROR'.                          "#EC NOTEXT
       endif.
       data l_hierarchy_header type treev_hhdr.
       perform build_hierarchy_header changing l_hierarchy_header.
       IF gt_fieldcatalog[] is   initial.
         perform buildfield_cat using 'TRNTYP' 'TRNTYP' .
         perform buildfield_cat using 'EXDAT' 'Excise Doc' .
         perform buildfield_cat using 'WERKS' 'Excise Doc' .
         perform buildfield_cat using 'EXNUM' 'Excise Doc' .
         perform buildfield_cat using 'EXYEAR' 'Excise Doc' .
         perform buildfield_cat using 'MATNR' 'Excise Doc' .
         perform buildfield_cat using 'RITEM1' 'Excise Doc' .
         perform buildfield_cat using 'RITEM2' 'Excise Doc' .
         perform buildfield_cat using 'MAKTX' 'Excise Doc' .
         perform buildfield_cat using 'REMOVAL' 'Excise Doc' .
         perform buildfield_cat using 'MEINS' 'Excise Doc' .
         perform buildfield_cat using 'EXBAS' 'Excise Doc' .
         perform buildfield_cat using 'EXBED' 'Excise Doc' .
       endif.
    call method tree->set_table_for_first_display
         EXPORTING
    *      i_structure_name    = 'SFLIGHT'
           is_hierarchy_header = l_hierarchy_header
         CHANGING
           it_outtab           = t_J_1IEXCDTL[] "table must be empty !
           it_fieldcatalog     = gt_fieldcatalog.
    perform create_hierarchy.
    call method tree->frontend_update.
    FORM CREATE_HIERARCHY .
    sort IJ_1IEXCDTL by chapid matnr.
       LOOP AT IJ_1IEXCDTL into WJ_1IEXCDTL.
         on change of WJ_1IEXCDTL-chapid.
           perform add_carrid_line using    WJ_1IEXCDTL
                                        changing l_carrid_key.
         endon.
         on change of WJ_1IEXCDTL-matnr.
           perform add_complete_line using  WJ_1IEXCDTL"last complete line.
                                            l_carrid_key
                                   changing l_last_key.
         endon.
       ENDLOOP.
    endform.
    form add_carrid_line using     WJ_1IEXCDTL1 type J_1IEXCDTL
                                    p_relat_key type lvc_nkey
                          changing  p_node_key type lvc_nkey.
       data: l_node_text type lvc_value.
       l_node_text =   WJ_1IEXCDTL1-chapid.
       call method tree->add_node
         EXPORTING
           i_relat_node_key = p_relat_key
           i_relationship   = cl_gui_column_tree=>relat_last_child
           i_node_text      = l_node_text
           is_outtab_line   = WJ_1IEXCDTL
         IMPORTING
           e_new_node_key   = p_node_key.
    endform.                    "add_carrid_line
    form add_complete_line using   WJ_1IEXCDTL2 type J_1IEXCDTL
                                  p_relat_key type lvc_nkey
                        changing  p_node_key type lvc_nkey.
       data: l_node_text type lvc_value.
       write WJ_1IEXCDTL2-matnr to l_node_text .
       call method tree->add_node
         EXPORTING
           i_relat_node_key = p_relat_key
           i_relationship   = cl_gui_column_tree=>relat_last_child
           is_outtab_line   = WJ_1IEXCDTL2
           i_node_text      = l_node_text
         IMPORTING
           e_new_node_key   = p_node_key.
    endform.                    "add_complete_line

    This is the ALV and i want docking container containing alv tree to be displayed with the details of this alv
    at bottom of screen.

  • Docking container

    Hello,
    Could you please tell me what is wrong either in the code below or in my logic:
      DATA: d_container TYPE REF TO cl_gui_docking_container,
            e_control TYPE REF TO cl_gui_abapedit.
      CALL SCREEN 200.
      CREATE OBJECT d_container
        EXPORTING
    *      repid                       = sy-cprog
    *      dynnr                       = sy-dynnr
          side                        = cl_gui_docking_container=>dock_at_left.
      check sy-subrc = 0.
      CREATE OBJECT e_control
        EXPORTING
          parent = d_container.
    Logic
    - create empty screen 0200
    - create docking container docking it to the left part of screen
    - embedding abap editor control to this docking container
    My question is: why when running program I don't see anything, as the docking container with the control inside wouldn't be there?
    Thank you for help in advance.
    Marcin

    Hi Jonathan,
    The problem was obvious. The code simply should be included in PBO module of the screen.
    There is no need to pass neither sy-repid nor sy-dynnr unless it displayed in other screen/program.
    Gr8 thanks for your help:)
    Regards,
    Marcin

  • Docking container in a subscreeen

    hy gurus, got an issue on the putting a docking container in a subscreen.
    the subscreen doesn't display.
    I've created a dynpro 202 as subscreen ,
    i've  created a custom container( GO_CONTAINER_OBJECT)  in the dynpro 202.
    in the main dynpro (200)
    i have in the pbo and pai
    pbo
    CALL SUBSCREEN sub_202 INCLUDING 'SAPMZPMCMO' '0202'.
    pai.
    CALL SUBSCREEN sub_202.
    in the pbo of 202 i have.
      MODULE  tree_and_docking.
      MODULE alv_display.
    module tree_and_docking.
    * container for alv-tree
      CREATE OBJECT:
       go_container_object
        EXPORTING
          side      = cl_gui_docking_container=>dock_at_bottom
          repid     = sy-repid
          ratio = '40'
          extension = 250
          dynnr     = '0202',
       go_splitter
          EXPORTING parent = go_container_object
                rows = 1
              columns = 2.
      CALL METHOD:
      go_splitter->set_border
      EXPORTING border = space,
      go_splitter->get_container
      EXPORTING row = 1
      column = 1
      RECEIVING container = dock_sub_cont1,
      go_splitter->set_row_height
      EXPORTING id = 1
      height = '30',
    go_splitter->set_column_width
      EXPORTING id = 1
        width = '20',
      go_splitter->get_container
          EXPORTING row = 1
                column = 2
      RECEIVING container = dock_sub_cont2,
      go_splitter->set_column_width
      EXPORTING id = 2
        width = '100'.
    etc...
    but nothing is displaying when i call the screen.
    Did i miss something?
    Edited by: EBONGUE ANDRE on Oct 5, 2010 5:59 PM

    I guess you can't mix docking container with subscreen. How would that look like (docked at bottom of subscreen's?). No this can't be used like that. Use custom container instead.
    @Uwe
    I got used to this little yellow sign next to your name. How that happens that their take it away from you? I thought SAP Mentor honor is granted forever.
    Regards
    Marcin

Maybe you are looking for

  • Problems with new ipod touch gen3

    Hi, I just got a new ipod touch and i have problems connecting it with my WRT54GX ver 2 wirelles router. It shows that is connected but when i check the IP it has the default 169.254.202.45  one which means that the AP did not assign an IP. I tried w

  • I LOST MY IPHONE 5S, still trackable and has an ORANGE LOCK SYMBOL.

    Hi people, NEED URGENT HELP! Firstly, I have to say this information : I live in Indonesia and I cannot count on Indonesian police here. However, here, in MOST CASES you can solve everything with money. Two days ago I lost my Iphone 5s at a KTV place

  • Remove page break

    How do I remove a page break in a PDF using Acrobat Pro?  My document has two cropped pages and I want it all on one page. Is my only option to convert the file to Word and do it there?

  • Critical Scenario - Help Needed

    Hi Gurus, Scenario: 1) I have a table control with 2 radio buttons, 7 columns and 1 column of push buttons. 2) On click of radio button 2, the push button gets enabled and on click of the push button, a pop-up screen comes up. 3) After entering data

  • Photoshop cc is hanging when opening a file after I updated software a few days ago

    I updated PS CC a few days ago, and now whenever I open a file to work on, it hangs and takes ages to load. The file appears but looks blurred in places then gradually loads completely and the blurring disappears, but takes at least three minutes to