Skip to Content
0
Apr 26, 2014 at 03:31 PM

MULTIPANE

31 Views

hi sir i am learning webdynpro by using NET files so i got an issue with multipane then i searched in forums but i didn't found i want to know all the properties of multipane i did one scenario on multipane but output is improper.

*****COMPONENT CONTROLLER*********

method GET_SALES .

DATA:LO_ND_NODE TYPE REF TO IF_WD_CONTEXT_NODE,

LO_ND_REC_NODE TYPE REF TO IF_WD_CONTEXT_NODE,

LO_EL_ELEMENT TYPE REF TO IF_WD_CONTEXT_ELEMENT,

IT_SALES TYPE ZNET312_T_VBAK,

WA_SALES LIKE LINE OF IT_SALES,

WA LIKE LINE OF IT_SALES,

LS_SALES TYPE WD_THIS->ELEMENT_SALES,

LS_SALES_TXT TYPE WD_THIS->ELEMENT_SALES_TXT,

LT_SALES TYPE WD_THIS->ELEMENTS_SALES,

LV_KUNNR TYPE WD_THIS->ELEMENT_INPUT-KUNNR,

V1 TYPE STRING.

LO_ND_NODE = WD_CONTEXT->GET_CHILD_NODE( NAME = WD_THIS->WDCTX_SALES_TXT ).

CALL METHOD ZCL_NET312_SALESORDERS=>GET_DATA

EXPORTING

I_KUNNR = LV_KUNNR

IMPORTING

ITAB = IT_SALES.

LOOP AT IT_SALES INTO WA_SALES.

WA = WA_SALES.

AT NEW VBELN.

CONCATENATE WA-VBELN WA-AUDAT INTO V1 SEPARATED BY space.

LS_SALES_TXT-TEXT = V1.

CLEAR V1.

LO_EL_ELEMENT = LO_ND_NODE->BIND_STRUCTURE( NEW_ITEM = LS_SALES_TXT SET_INITIAL_ELEMENTS = ABAP_FALSE ).

LO_ND_REC_NODE = LO_EL_ELEMENT->GET_CHILD_NODE( NAME = 'SALES_REC_TXT' ).

ENDAT.

CONCATENATE WA-POSNR WA-MEINS WA-CURR INTO V1 SEPARATED BY space.

LS_SALES_TXT-TEXT = V1.

LS_SALES_TXT-ENABLE = ABAP_TRUE.

CLEAR V1.

LO_ND_REC_NODE->BIND_STRUCTURE( NEW_ITEM = LS_SALES_TXT SET_INITIAL_ELEMENTS = ABAP_FALSE ).

ENDLOOP.

endmethod.

****************MAIN VIEW NORMAL METHOD FOR MULTIPANE PROPERTIES*******

method MULTIPANE .

DATA:LO_ND_NODE TYPE REF TO IF_WD_CONTEXT_NODE,

LO_EL_NODE TYPE REF TO IF_WD_CONTEXT_ELEMENT,

LS_MULTIPANE TYPE WD_THIS->ELEMENT_MULTIPANE_PROPERTIES.

LO_ND_NODE = WD_CONTEXT->GET_CHILD_NODE( NAME = WD_THIS->WDCTX_MULTIPANE_PROPERTIES ).

LS_MULTIPANE-COL_COUNT = '5'.

LS_MULTIPANE-ENABLED = ABAP_TRUE.

LS_MULTIPANE-FIRST_ACTUAL_PANE = '1'.

LS_MULTIPANE-FIRST_VISIBLE_PANE = '1'.

LS_MULTIPANE-FOOTER_VISIBLE = ABAP_TRUE.

LS_MULTIPANE-HEIGHT = '100%'.

LS_MULTIPANE-PANE_COUNT = '27'.

LS_MULTIPANE-ROW_COUNT = '-1'.

LS_MULTIPANE-WIDTH = '100%'.

LO_ND_NODE->BIND_STRUCTURE(

NEW_ITEM = LS_MULTIPANE

SET_INITIAL_ELEMENTS = ABAP_FALSE ).

endmethod.

**********************************MAIN VIEW METHOD ONDISPLAY**********

method ONACTIONDISPLAY .

DATA lo_COMPONENTCONTROLLER TYPE REF TO IG_COMPONENTCONTROLLER .

lo_COMPONENTCONTROLLER = wd_this->get_componentcontroller_ctr( ).

lo_componentcontroller->get_sales(

).

endmethod.

******************MAIN VIEW HOOK METHOD********************

method WDDOINIT .

wd_this->multipane(

).

endmethod.

Attachments

pastedImage_0.png (172.8 kB)
pastedImage_2.png (50.1 kB)
pastedImage_3.png (53.8 kB)