topic Re: Splitter_container Abap-Object in Application Development and Automation Discussions

Splitter_container Abap-Object

Former Member — Wed, 21 Mar 2007 17:25:15 GMT

Hi,

i try to split a container in 3 element, but i can get only 2 or 4.

I do it like this (for 2):

FORM DYNP_SPLITTEN.

Create TOP-Document

CREATE OBJECT O_DYNDOC_ID

EXPORTING STYLE = 'ALV_GRID'.

Create Splitter for custom_container
hier 2 Zeilen, 1 Spalte

CREATE OBJECT O_SPLITTER

EXPORTING PARENT = GR_CCONTAINER

ROWS = 2

COLUMNS = 1.

setze die 1. Zeile, 1. Spalte zu O_PARENT_TOP

CALL METHOD O_SPLITTER->GET_CONTAINER

EXPORTING

ROW = 1

COLUMN = 1

RECEIVING

CONTAINER = O_PARENT_TOP.

CALL METHOD O_SPLITTER->SET_ROW_HEIGHT

EXPORTING

ID = 1

HEIGHT = 22.

setze die 2. Zeile, 1. Spalte zu O_PARENT_GRID_LEFT

CALL METHOD O_SPLITTER->GET_CONTAINER

EXPORTING

ROW = 2

COLUMN = 1

RECEIVING

CONTAINER = O_PARENT_GRID_LEFT.

ENDFORM. "dyn_splitten

Can i split the container O_PARENT_GRID into O_PARENT_GRID_LEFT

and O_PARENT_GRID_RIGHT?

I will have one Header-container, and two outputcontainer.

Thanks for help.

Regards, Dieter

Re: Splitter_container Abap-Object

Former Member — Thu, 22 Mar 2007 04:39:47 GMT

try this

data : w_container TYPE REF TO cl_gui_custom_container.

CREATE OBJECT w_container

EXPORTING

container_name = 'CONTAINER'

EXCEPTIONS

cntl_error = 1

cntl_system_error = 2

create_error = 3

lifetime_error = 4

lifetime_dynpro_dynpro_link = 5

others = 6.

data : w_split TYPE REF TO cl_gui_easy_splitter_container.

CREATE OBJECT w_split

EXPORTING

parent = w_container

orientation = 0

sash_position = 0

with_border = 0

EXCEPTIONS

cntl_error = 1

cntl_system_error = 2

others = 3.

IF sy-subrc NE 0.

ENDIF.

data : w_contnr_top TYPE REF TO cl_gui_container,

w_contnr_bot TYPE REF TO cl_gui_container.

w_contnr_top = w_split->top_left_container.

w_contnr_bot = w_split->bottom_right_container.

CREATE OBJECT w_split

EXPORTING

parent = w_container_top

orientation = 0

sash_position = 0

with_border = 0

EXCEPTIONS

cntl_error = 1

cntl_system_error = 2

others = 3.

IF sy-subrc NE 0.

ENDIF.

w_contnr_top1 = w_split->top_left_container.

w_contnr_top2 = w_split->bottom_right_container.

Re: Splitter_container Abap-Object

Former Member — Thu, 22 Mar 2007 04:42:37 GMT

Hi Dieter ,

you can also create 3 sections using splitter

Please check the change made :

CREATE OBJECT O_SPLITTER

EXPORTING PARENT = GR_CCONTAINER

ROWS = 3 " <b>Change Made</b>

COLUMNS = 1.

In case you have any further queries please do revert back.

Regards

Arun

Re: Splitter_container Abap-Object

Former Member — Thu, 22 Mar 2007 04:48:06 GMT

Dieter,

Check the program it may help you.

" RSDEMO_SPLITTER_CONTROL "

Pls. reward if useful

Re: Splitter_container Abap-Object

Former Member — Thu, 22 Mar 2007 08:36:20 GMT

Hi,

thanks for answers. I solve it in splitting

a splitting container like this:

Create Splitter from custom_container

CREATE OBJECT O_SPLITTER

EXPORTING PARENT = GR_CCONTAINER

ROWS = 2

COLUMNS = 1.

set 1 row and 1 col to O_PARENT_TOP

CALL METHOD O_SPLITTER->GET_CONTAINER

EXPORTING

ROW = 1

COLUMN = 1

RECEIVING

CONTAINER = O_PARENT_TOP.

CALL METHOD O_SPLITTER->SET_ROW_HEIGHT

EXPORTING

ID = 1

HEIGHT = 22.

set 2 row and 1 col to O_PARENT_GRID

CALL METHOD O_SPLITTER->GET_CONTAINER

EXPORTING

ROW = 2

COLUMN = 1

RECEIVING

CONTAINER = O_PARENT_GRID.

Create Splitter from O_PARENT_GRID

<b> CREATE OBJECT O_SPLITTER

EXPORTING PARENT = O_PARENT_GRID

ROWS = 1

COLUMNS = 2.</b>

set 2 row and 1 col to O_PARENT_GRID_LEFT

CALL METHOD O_SPLITTER->GET_CONTAINER

EXPORTING

ROW = 1

COLUMN = 1

RECEIVING

CONTAINER = O_PARENT_GRID_LEFT.

set 2 row and 1 col to O_PARENT_GRID_RIGHT

CALL METHOD O_SPLITTER->GET_CONTAINER

EXPORTING

ROW = 1

COLUMN = 2

RECEIVING

CONTAINER = O_PARENT_GRID_RIGHT.

Regards, Dieter