How to use Tree control like a Tree in SAP HANA Live Browser?

Hello SDN!
I need a Tree control such as following:
As I understand, there is no such standard control in SAPUI5 control library. Is it possible to use this control? If yes, how I can embed it in my app?
Regards,
Lev

Hi Sandip!
Thanks for your tip. I've applied this example to my app. Tree is working now, but this is a little problem - on each expand/collapse and click on treeItem the onAfterRendering() method called. It means that the complete rerender of tree executed which looks not good. How I can avoid this?
Lev

Similar Messages

How to use Alias name in OData service in SAP HANA

Hi,
     I need to change one column name with alias of another name in odata service definition or odata url running in rest client. I am trying to give alias name with as key in the service definition like sql query.
ex:
There is one table with column name of PRODUCT_ID. I exporting that table via odata service to SAP UI. In the UI i dont want the product id column as PRODUCT_ID. It should be ike "Prodcut". Like we are using in SQL example
select "PRODUCT_ID" as "Product" from "producttab";
But i can't use as key for alias name. So i am getting syntax error.
I have tried in rest client also ie executing odata file in rest based service. But i got error only.
If anyone knows about this alias name in odata service, Please help me to resolve this issue..

Hi Thomas
     Thanks for your reply.
     Actually in odata service definition i am using attribute and calculation views only. But in some case from the model view itself i need to use some alias names to the UI through odata service.
     For example in attribute view i have some columns with name col1,col2... I am getting those columns in UI using odata service, for particular col2 column i need to change column name as product. And i am using the same view as source of another odata service in that service i need to change that column name as productname.
     In that case i need alias name usage. So that only i am searching alias keyword in odata service.
     Is there any possibility to use alias names in odata service.

How to use print control in Sap script

I would like to use print control in Sap script.Actualy my problem I have security font Troy ECF. Using this font I would like to print amount field in Check printing.
we count download this font with sap .we talked to customer care they told we should hard code in sapscript. pls can any1 help on this how to do and how to use print control for this fonts.

call this funcation. crate_text.
CALL FUNCTION 'CREATE_TEXT'
         EXPORTING
           FID               =
           FLANGUAGE         =
           FNAME             =
           FOBJECT           =
         SAVE_DIRECT       = 'X'
         FFORMAT           = '*'
         TABLES
           FLINES            =
       EXCEPTIONS
         NO_INIT           = 1
         NO_SAVE           = 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.
       ENDIF.

How to use table control in bdc, plz somebody tell me.

Hi Gurus,
Ples tell me
how to use table control in bdc, plz somebody tell me.
And send Sample CODE also. Thnaks in advance.

hi,
Table control / step loop in BDC
Steploop and table contol is inevitable in certain transactions. When we run BDC for such transactions, we will face the situation: how many visible lines of steploop/tablecontrol are on the screen?
Although we can always find certain method to deal with it, such as function code 'NP', 'POPO', considering some extreme situation: there is only one line visible one the screen, our BDC program should display an error message. (See transaction 'ME21', we you resize your screen to let only one row visible, you can not enter mutiple lines on this screen even you use 'NP')
we can determine the number of visible lines on Transaction Screen from our Calling BDC program.
Demo ABAP code has two purposes:
1. how to determine number of visible lines and how to calculte page number;
(the 'calpage' routine has been modify to meet general purpose usage)
2. using field symbol in BDC program, please pay special attention to the difference
in Static ASSIGN and Dynamic ASSIGN.
Step1: go to screen painter to display the screen 121, then we can count the fixed line on this screen, there is 7 lines above the steploop and 2 lines below the steploop, so there are total 9 fixed lines on this screen. This means except these 9 lines, all the other line is for step loop.
Then have a look at steploop itselp, one entry of it will occupy two lines.
(Be careful, for table control, the head and the bottom scroll bar will possess another two fixed lines, and there is a maximum number for table line)
Now we have : FixedLine = 9
LoopLine = 2(for table control, LoopLine is always equal to 1)
Step2: go to transaction itself(ME21) to see how it roll page, in ME21, the first line of new page is always occupied by the last line of last page, so it begin with index '02', but in some other case, fisrt line is empty and ready for input.
Now we have: FirstLine = 0
or FirstLine = 1 ( in our case, FirstLine is 1 because the first line of new page is fulfilled)
Step3: write a subroutine calcalculating number of pages
(here, the name of actual parameter is the same as formal parameter)
global data: FixedLine type i, " number of fixed line on a certain screen
LoopLine type i, " the number of lines occupied by one steploop item
FirstLine type i, " possbile value 0 or 1, 0 stand for the first line of new " scrolling screen is empty, otherwise is 1
Dataline type i, " number of items you will use in BDC, using DESCRIBE to get
pageno type i, " you need to scroll screen how many times.
line type i, " number of lines appears on the screen.
index(2) type N, " the screen index for certain item
begin type i, " from parameter of loop
end type i. " to parameter of loop
*in code sample, the DataTable-linindex stands for the table index number of this line
form calpage using FixedLine type i (see step 1)
LoopLine type i (see step 1)
FirstLine type i (see step 2)
DataLine type i ( this is the item number you will enter in transaction)
changing pageno type i (return the number of page, depends on run-time visible line in table control/ Step Loop)
changing line type i.(visible lines one the screen)
data: midd type i,
vline type i, "visible lines
if DataLine eq 0.
Message eXXX.
endif.
vline = ( sy-srows - FixedLine ) div LoopLine.
*for table control, you should compare vline with maximum line of
*table control, then take the small one that is min(vline, maximum)
*here only illustrate step loop
if FirstLine eq 0.
pageno = DataLine div vline.
if pageno eq 0.
pageno = pageno + 1.
endif.
elseif FirstLine eq 1.
pageno = ( DataLine - 1 ) div ( vline - 1 ) + 1.
midd = ( DataLine - 1 ) mod ( vline - 1).
if midd = 0 and DataLine gt 1.
pageno = pageno - 1.
endif.
endif.
line = vline.
endform.
Step4 write a subroutine to calculate the line index for each item.
form calindex using Line type i (visible lines on the screen)
FirstLine type i(see step 2)
LineIndex type i(item index)
changing Index type n. (index on the screen)
if FirstLine = 0.
index = LineIndex mod Line.
if index = '00'.
index = Line.
endif.
elseif FirstLine = 1.
index = LineIndex mod ( Line - 1 ).
if ( index between 1 and 0 ) and LineIndex gt 1.
index = index + Line - 1.
endif.
if Line = 2.
index = index + Line - 1.
endif.
endif.
endform.
Step5 write a subroutine to calculate the loop range.
form calrange using Line type i ( visible lines on the screen)
DataLine type i
FirstLine type i
loopindex like sy-index
changing begin type i
end type i.
If FirstLine = 0.
if loopindex = 1.
begin = 1.
if DataLine <= Line.
end = DataLine.
else.
end = Line.
endif.
elseif loopindex gt 1.
begin = Line * ( loopindex - 1 ) + 1.
end = Line * loopindex.
if end gt DataLine.
end = DataLine.
endif.
endif.
elseif FirstLine = 1.
if loopindex = 1.
begin = 1.
if DataLine <= Line.
end = DataLine.
else.
end = Line.
endif.
elseif loop index gt 1.
begin = ( Line - 1 ) * ( loopindex - 1 ) + 2.
end = ( Line - 1 ) * ( loopindex - 1 ) + Line.
if end gt DataLine.
end = DataLine.
endif.
endif.
endif.
endform.
Step6
using field sysbol in your BDC, for example: in ME21, but you should calculate each item will correponding to which index in steploop/Table Control
form creat_bdc.
field-symbols: , , .
data: name1(14) value 'EKPO-EMATN(XX)',
name2(14) value 'EKPO-MENGE(XX)',
name3(15) value 'RM06E-SELKZ(XX)'.
assign: name1 to ,
name2 to ,
name3 to .
do pageno times.
if sy-index gt 1
*insert scroll page ok_code"
endif.
perform calrange using Line DataLine FirstLine sy-index
changing begin end.
loop at DataTable from begin to end.
perform calindex using Line FirstLine DataTable-LineIndex changing Index.
name1+11(2) = Index.
name2+11(2) = Index.
name3+12(2) = Index.
perform bdcfield using DataTable-matnr.
perform bdcfield using DataTable-menge.
perform bdcfield using DataTable-indicator.
endloop.
enddo.
example 1
BDC table control is an area on the screen in which you can display data in tabular form. You process it using a loop. Table controls are comparable to step loop tables. While a table control consists of a single definition row, step loop blocks may extend over more than one row. Table controls are more flexible than step loops, and are intended to replace them
When you need to handle a scenario like in sales order,it may contain more than one material,if you have more than one material We have to use table control,it will have number of columns and number of rows.
Table controls allow you to enter, display, and modify tabular data easily on the screen
Check this code,
PARAMETERS: file1 LIKE rlgrap-filename.
*Internal Table Declarations
DATA: BEGIN OF itab OCCURS 0,
matnr(18) TYPE c, "MaterialNumber
werks(4) TYPE c, "Plant
vdatu(10) TYPE c, "Valid From Date
bdatu(10) TYPE c, "Valid To Date
lifnr(10) TYPE c, "Vendor Number
ekorg(4) TYPE c, "Purchasing Organization
feskz TYPE c, "Fixed
autet TYPE c, "MRP Indicator
END OF itab.
DATA: bdcdata LIKE TABLE OF bdcdata WITH HEADER LINE.
*VARIABLES Declarations
DATA: wa1 LIKE LINE OF itab. "Workarea for ITAB
DATA: n TYPE i, "Check
count TYPE i.
DATA: cnt(2), "Counter
wa(15). "Workarea to hold concatenatedvalue
DATA v_msg(100).
DATA: flag.
DATA: file TYPE string.
*Initialization event
INITIALIZATION.
*At-selection-screen event
*To provide Input help for file name
AT SELECTION-SCREEN ON VALUE-REQUEST FOR file1.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
program_name = syst-cprog
dynpro_number = syst-dynnr
IMPORTING
file_name = file1.
*START-OF-SELECTION EVENT
START-OF-SELECTION.
MOVE file1 TO file.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
filename = file
filetype = 'ASC'
has_field_separator = 'X'
TABLES
data_tab = itab
EXCEPTIONS
file_open_error = 1
file_read_error = 2
no_batch = 3
gui_refuse_filetransfer = 4
invalid_type = 5
no_authority = 6
unknown_error = 7
bad_data_format = 8
header_not_allowed = 9
separator_not_allowed = 10
header_too_long = 11
unknown_dp_error = 12
access_denied = 13
dp_out_of_memory = 14
disk_full = 15
dp_timeout = 16
OTHERS = 17.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
*To populate BDCDATA and start data transfer
LOOP AT itab .
To validate Plant range
IF itab-werks = '1000' OR itab-werks = '2000'
OR itab-werks = '1008'.
AT NEW werks.
CLEAR: n.
cnt = 1.
PERFORM bdc_dynpro USING 'SAPLMEOR' '0200'.
PERFORM bdc_field USING 'BDC_CURSOR'
'EORD-MATNR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'EORD-MATNR'
itab-matnr.
PERFORM bdc_field USING 'EORD-WERKS'
itab-werks.
PERFORM bdc_dynpro USING 'SAPLMEOR' '0205'.
CONCATENATE 'EORD-EKORG(' cnt ')' INTO wa.
PERFORM bdc_field USING 'BDC_CURSOR'
wa.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BU'.
ENDAT.
IF n = 12.
READ TABLE bdcdata WITH KEY fval = '=BU'.
bdcdata-fval = '=NS'.
MODIFY bdcdata INDEX sy-tabix TRANSPORTING fval.
PERFORM bdc_dynpro USING 'SAPLMEOR' '0205'.
PERFORM bdc_field USING 'BDC_CURSOR'
'EORD-VDATU(01)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BU'.
cnt = 2.
n = 2.
ENDIF.
CONCATENATE 'EORD-VDATU(' cnt ')' INTO wa.
PERFORM bdc_field USING wa
itab-vdatu.
CONCATENATE 'EORD-BDATU(' cnt ')' INTO wa.
PERFORM bdc_field USING wa
itab-bdatu.
CONCATENATE 'EORD-LIFNR(' cnt ')' INTO wa.
PERFORM bdc_field USING wa
itab-lifnr.
CONCATENATE 'EORD-EKORG(' cnt ')' INTO wa.
PERFORM bdc_field USING wa
itab-ekorg.
CONCATENATE 'RM06W-FESKZ(' cnt ')' INTO wa.
PERFORM bdc_field USING wa
itab-feskz.
CONCATENATE 'EORD-AUTET(' cnt ')' INTO wa.
PERFORM bdc_field USING wa
itab-autet.
IF n <> 12.
n = cnt.
ENDIF.
cnt = cnt + 1.
AT END OF werks.
CALL TRANSACTION 'ME01' USING bdcdata
UPDATE 'S'
MODE 'A'.
CLEAR:bdcdata,bdcdata[].
CALL FUNCTION 'FORMAT_MESSAGE'
EXPORTING
id = sy-msgid
lang = 'EN'
no = sy-msgno
v1 = sy-msgv1
v2 = sy-msgv2
v3 = sy-msgv3
v4 = sy-msgv4
IMPORTING
msg = v_msg.
WRITE:/ v_msg.
CLEAR: bdcdata,bdcdata[],flag.
ENDAT.
ENDIF.
ENDLOOP.
Start new screen *
FORM bdc_dynpro USING program dynpro.
CLEAR bdcdata.
bdcdata-program = program.
bdcdata-dynpro = dynpro.
bdcdata-dynbegin = 'X'.
APPEND bdcdata.
ENDFORM.
Insert field values
FORM bdc_field USING fnam fval.
IF NOT fval IS INITIAL.
CLEAR bdcdata.
bdcdata-fnam = fnam.
bdcdata-fval = fval.
APPEND bdcdata.
ENDIF.
CLEAR wa.
ENDFORM.
Sample code 2
THis is example to upload the Bank details of the Vendor which has the TC.
REPORT zprataptable2
NO STANDARD PAGE HEADING LINE-SIZE 255.
DATA : BEGIN OF itab OCCURS 0,
i1 TYPE i,
lifnr LIKE rf02k-lifnr,
bukrs LIKE rf02k-bukrs,
ekorg LIKE rf02k-ekorg,
ktokk LIKE rf02k-ktokk,
anred LIKE lfa1-anred,
name1 LIKE lfa1-name1,
sortl LIKE lfa1-sortl,
land1 LIKE lfa1-land1,
akont LIKE lfb1-akont,
fdgrv LIKE lfb1-fdgrv,
waers LIKE lfm1-waers,
END OF itab.
DATA : BEGIN OF jtab OCCURS 0,
j1 TYPE i,
banks LIKE lfbk-banks,
bankl LIKE lfbk-bankl,
bankn LIKE lfbk-bankn,
END OF jtab.
DATA : cnt(4) TYPE n.
DATA : fdt(20) TYPE c.
DATA : c TYPE i.
INCLUDE bdcrecx1.
START-OF-SELECTION.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
filename = 'C:\first1.txt'
filetype = 'DAT'
TABLES
data_tab = itab.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
filename = 'C:\second.txt'
filetype = 'DAT'
TABLES
data_tab = jtab.
LOOP AT itab.
PERFORM bdc_dynpro USING 'SAPMF02K' '0100'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF02K-KTOKK'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'RF02K-LIFNR'
itab-lifnr.
PERFORM bdc_field USING 'RF02K-BUKRS'
itab-bukrs.
PERFORM bdc_field USING 'RF02K-EKORG'
itab-ekorg.
PERFORM bdc_field USING 'RF02K-KTOKK'
itab-ktokk.
PERFORM bdc_dynpro USING 'SAPMF02K' '0110'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFA1-LAND1'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'LFA1-ANRED'
itab-anred.
PERFORM bdc_field USING 'LFA1-NAME1'
itab-name1.
PERFORM bdc_field USING 'LFA1-SORTL'
itab-sortl.
PERFORM bdc_field USING 'LFA1-LAND1'
itab-land1.
PERFORM bdc_dynpro USING 'SAPMF02K' '0120'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFA1-KUNNR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_dynpro USING 'SAPMF02K' '0130'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFBK-BANKN(01)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ENTR'.
cnt = 0.
LOOP AT jtab WHERE j1 = itab-i1.
cnt = cnt + 1.
CONCATENATE 'LFBK-BANKS(' cnt ')' INTO fdt.
PERFORM bdc_field USING fdt jtab-banks.
CONCATENATE 'LFBK-BANKL(' cnt ')' INTO fdt.
PERFORM bdc_field USING fdt jtab-bankl.
CONCATENATE 'LFBK-BANKN(' cnt ')' INTO fdt.
PERFORM bdc_field USING fdt jtab-bankn.
IF cnt = 5.
cnt = 0.
PERFORM bdc_dynpro USING 'SAPMF02K' '0130'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFBK-BANKS(01)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=P+'.
PERFORM bdc_dynpro USING 'SAPMF02K' '0130'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFBK-BANKN(02)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ENTR'.
ENDIF.
ENDLOOP.
PERFORM bdc_dynpro USING 'SAPMF02K' '0130'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFBK-BANKS(01)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ENTR'.
PERFORM bdc_dynpro USING 'SAPMF02K' '0210'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFB1-FDGRV'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'LFB1-AKONT'
itab-akont.
PERFORM bdc_field USING 'LFB1-FDGRV'
itab-fdgrv.
PERFORM bdc_dynpro USING 'SAPMF02K' '0215'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFB1-ZTERM'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_dynpro USING 'SAPMF02K' '0220'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFB5-MAHNA'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_dynpro USING 'SAPMF02K' '0310'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFM1-WAERS'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'LFM1-WAERS'
itab-waers.
PERFORM bdc_dynpro USING 'SAPMF02K' '0320'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF02K-LIFNR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ENTR'.
PERFORM bdc_dynpro USING 'SAPLSPO1' '0300'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=YES'.
PERFORM bdc_transaction USING 'XK01'.
ENDLOOP.
PERFORM close_group.
Header file:
1 63190 0001 0001 0001 mr bal188 b in 31000 a1 inr
2 63191 0001 0001 0001 mr bal189 b in 31000 a1 inr
TC file:
1 in sb 11000
1 in sb 12000
1 in sb 13000
1 in sb 14000
1 in sb 15000
1 in sb 16000
1 in sb 17000
1 in sb 18000
1 in sb 19000
1 in sb 20000
1 in sb 21000
1 in sb 22000
2 in sb 21000
2 in sb 22000
Regards

How to use table control in bdc briefly?

how to use table control in bdc briefly in description manner ?

Hi friend,
here i am giving exm. code of table control.see if help full to u.
REPORT zxk_01
       NO STANDARD PAGE HEADING LINE-SIZE 255.
include bdcrecx1.
TYPES : BEGIN OF ty_data,
       line(100) TYPE c,
       END OF ty_data.
PARAMETERS: p_pcfile   LIKE ibipparms-path DEFAULT 'D:\NKS.TXT'.
DATA : g_filename    TYPE string.
TYPES : BEGIN OF ty_file,
        lifnr(16) TYPE c,                             " vendor
        bukrs(4) TYPE c,                             "company code
        ktokk(4)   TYPE c,                             " Acc grp
        anred(15) TYPE c,                             " Title
        name1(35) TYPE c,                             " name
        sortl(10) TYPE c,                             " search term
        stras(35) TYPE c,                             " street
        ort01(35) TYPE c,                             " city
        ort02(35) TYPE c,                             " district
        land1(3) TYPE c,                              " country
        pfach(10) TYPE c,                             " PO BOx
        spras(2) TYPE c,                             " language
        kunnr(10) TYPE c,                             " Customer
        vbund(6) TYPE c,                              " trading partner
        banks(3) TYPE c,                              " BANK COUNTRY
        bankl(15) TYPE c,                             " BANK KEY
        bankn(18) TYPE c,                             " BANK ACC
        koinh(60) TYPE c,                             " ACC HOLDER
        bkont(2) TYPE c,                              " CK
        bvtyp(4) TYPE c,                              " BNKT
        bkref(20) TYPE c,                             " REFERENCE DETAILS
        namev(35)   TYPE c,                                 " first NAME
        name2(35)   TYPE c,                                 " NAME
        telf1(16) TYPE c,                                   " TELEPHONE
        abtnr(4) TYPE c,                                   " DEPTT
        pafkt(2) TYPE c,                                   " FUNCTION
        akont(10) TYPE c,                             " REC ACCOUNT
        zuawa(3) TYPE c,                             " SORT KEY
        lnrze(10) TYPE c,                             "HEAD OFFICE
        fdgrv(10) TYPE c,                             " CASH MGMT GRP,
        frgrp(4) TYPE c,                             " RELEASE GRP
        zterm(4) TYPE c,                             " PAY TERMS
        togru(4) TYPE c,                             " TOLERENCE GRP,
        reprf,                                        "CHECK DOUBLE INV
        zwels(10) TYPE c,                            " PAYMENTS METHODS
        zahls,                                       " PAYMENTS BLOCK
        hbkid(5) TYPE c,                             " house bank
        zgrup(2) TYPE c,                             " grouping key
        mahna(4) TYPE c,                             " dunn procedure
        mansp,                                       " DUNNING BLOCK'
        gmvdt(10) TYPE c,                            " LEGAL DONE PROCEDURE
        lfrma(10) TYPE c,                            " DUNN RECEPIENT
        madat(10) TYPE c,                            " LAST DUNNED
        mahns(1) TYPE c,                         " dunning level
        mgrup(2) TYPE c,                            " grouping key
        busab(2) TYPE c,                             "dunning clerk
       END OF ty_file.
DATA : BEGIN OF it_xk01 OCCURS 0,
       lifnr(16) TYPE c,                             " vendor
       bukrs(4) TYPE c,                             "company code
       ktokk(4)   TYPE c,                             " Acc grp
       anred(15) TYPE c,                             " Title
       name1(35) TYPE c,                             " name
       sortl(10) TYPE c,                             " search term
       stras(35) TYPE c,                             " street
       ort01(35) TYPE c,                             " city
       ort02(35) TYPE c,                             " district
       land1(3) TYPE c,                              " country
       pfach(10) TYPE c,                             " PO BOx
       spras(2) TYPE c,                             " language
       kunnr(10) TYPE c,                             " Customer
       vbund(6) TYPE c,                              " trading partner
       akont(10) TYPE c,                             " REC ACCOUNT
       zuawa(3) TYPE c,                             " SORT KEY
       lnrze(10) TYPE c,                             "HEAD OFFICE
       fdgrv(10) TYPE c,                             " CASH MGMT GRP,
       frgrp(4) TYPE c,                             " RELEASE GRP
       zterm(4) TYPE c,                             " PAY TERMS
       togru(4) TYPE c,                             " TOLERENCE GRP,
       reprf,                                        "CHECK DOUBLE INV
       zwels(10) TYPE c,                            " PAYMENTS METHODS
       zahls,                                       " PAYMENTS BLOCK
       hbkid(5) TYPE c,                             " house bank
       zgrup(2) TYPE c,                             " grouping key
       mahna(4) TYPE c,                             " dunn procedure
       mansp,                                       " DUNNING BLOCK'
       gmvdt(10) TYPE c,                            " LEGAL DONE PROCEDURE
       lfrma(10) TYPE c,                            " DUNN RECEPIENT
       madat(10) TYPE c,                            " LAST DUNNED
       mahns(1) TYPE c,                         " dunning level
       mgrup(2) TYPE c,                            " grouping key
       busab(2) TYPE c,                             "dunning clerk
       END OF it_xk01.
     internal table for bank detaiils
DATA : BEGIN OF it_bank OCCURS 0,
       banks(3) TYPE c,                              " BANK COUNTRY
       bankl(15) TYPE c,                             " BANK KEY
       bankn(18) TYPE c,                             " BANK ACC
       koinh(60) TYPE c,                             " ACC HOLDER
       bkont(2) TYPE c,                              " CK
       bvtyp(4) TYPE c,                              " BNKT
       bkref(20) TYPE c,                             " REFERENCE DETAILS
       lifnr(16) TYPE c,                             " vendor
      xezer,                                        " CHECK
       END OF it_bank.
INTERNAL TABLE FOR CONTACT PERSON
TYPES : BEGIN OF ty_cust,
       lifnr(16) TYPE c,
       namev(35)   TYPE c,                                 " first NAME
       name1(35)   TYPE c,                                 " NAME
       telf1(16) TYPE c,                                   " TELEPHONE
       abtnr(4) TYPE c,                                   " DEPTT
       pafkt(2) TYPE c,                                   " FUNCTION
       END OF ty_cust.
INTERNAL TABLES DECLARATION
DATA : it_bdcdata LIKE bdcdata OCCURS 0 WITH HEADER LINE,
       it_bdcmsgcoll LIKE bdcmsgcoll OCCURS 0 WITH HEADER LINE,
       it_file TYPE TABLE OF ty_file,
       it_data TYPE TABLE OF ty_data,
       it_cust TYPE TABLE OF ty_cust.
   WORK AREAS FOR TYPES
DATA : wa_xk01 LIKE it_xk01,
       wa_data TYPE ty_data,
       wa_file TYPE ty_file,
       wa_bank LIKE it_bank,
       wa_cust TYPE ty_cust.
*CALL METHOD cl_gui_frontend_services=>gui_upload
   EXPORTING
     filename = lt_file
     filetype = 'ASC'
   CHANGING
     data_tab = iT_DATA.
IF sy-subrc <> 0.
ENDIF.
g_filename = p_pcfile.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
    filename                      = g_filename "'D:\TESTDATA1_XK01.txt'
   filetype                      = 'TXT'
    has_field_separator           = 'X'
HEADER_LENGTH                 = 0
   read_by_line                  = 'X'
DAT_MODE                      = ' '
CODEPAGE                      = ' '
IGNORE_CERR                   = ABAP_TRUE
    replacement                   = ' '
CHECK_BOM                     = ' '
VIRUS_SCAN_PROFILE            =
NO_AUTH_CHECK                 = ' '
IMPORTING
FILELENGTH                    =
HEADER                        =
TABLES
    data_tab                      = it_file
EXCEPTIONS
   file_open_error               = 1
   file_read_error               = 2
   no_batch                      = 3
   gui_refuse_filetransfer       = 4
   invalid_type                  = 5
   no_authority                  = 6
   unknown_error                 = 7
   bad_data_format               = 8
   header_not_allowed            = 9
   separator_not_allowed         = 10
   header_too_long               = 11
   unknown_dp_error              = 12
   access_denied                 = 13
   dp_out_of_memory              = 14
   disk_full                     = 15
   dp_timeout                    = 16
   OTHERS                        = 17
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
LOOP AT it_file INTO wa_file .
ON CHANGE OF WA_FILE-LIFNR.
wa_xk01-lifnr =   wa_file-lifnr.
wa_xk01-bukrs =   wa_file-bukrs.
wa_xk01-ktokk =   wa_file-ktokk.
wa_xk01-anred = wa_file-anred.
wa_xk01-name1 = wa_file-name1.
wa_xk01-sortl = wa_file-sortl.
wa_xk01-stras = wa_file-stras.
wa_xk01-ort01 = wa_file-ort01.
wa_xk01-ort02 = wa_file-ort02.
wa_xk01-land1 = wa_file-land1.
wa_xk01-pfach = wa_file-pfach.
wa_xk01-spras = wa_file-spras.
wa_xk01-kunnr = wa_file-kunnr.
wa_xk01-vbund = wa_file-vbund.
wa_xk01-akont = wa_file-akont.
wa_xk01-zuawa = wa_file-zuawa.
wa_xk01-lnrze = wa_file-lnrze.
wa_xk01-fdgrv = wa_file-fdgrv.
wa_xk01-frgrp = wa_file-frgrp.
wa_xk01-zterm = wa_file-zterm.
wa_xk01-togru = wa_file-togru.
wa_xk01-reprf = wa_file-reprf.
wa_xk01-zwels = wa_file-zwels.
wa_xk01-zahls = wa_file-zahls.
wa_xk01-hbkid = wa_file-hbkid.
wa_xk01-zgrup = wa_file-zgrup.
wa_xk01-mahna = wa_file-mahna.
wa_xk01-mansp = wa_file-mansp.
wa_xk01-gmvdt = wa_file-gmvdt.
wa_xk01-lfrma = wa_file-lfrma.
wa_xk01-madat = wa_file-madat.
wa_xk01-mahns = wa_file-mahns.
wa_xk01-mgrup = wa_file-mgrup.
wa_xk01-busab = wa_file-busab.
   APPEND wa_xk01 TO it_xk01.
   CLEAR : WA_XK01.
CONTINUE.
   ENDON.
IF WA_FILE-BANKS NE ''.
wa_bank-lifnr = wa_file-lifnr.
wa_bank-banks = wa_file-banks.
wa_bank-bankl = wa_file-bankl.
wa_bank-bankn = wa_file-bankn.
wa_bank-koinh = wa_file-koinh.
wa_bank-bkont = wa_file-bkont.
wa_bank-bvtyp = wa_file-bvtyp.
wa_bank-bkref = wa_file-bkref.
wa_cust-lifnr = wa_file-lifnr.
wa_cust-namev = wa_file-namev.
wa_cust-name1 = wa_file-name2.
wa_cust-telf1 = wa_file-telf1.
wa_cust-abtnr = wa_file-abtnr.
wa_cust-pafkt = wa_file-pafkt.
APPEND wa_bank TO it_bank.
APPEND wa_cust TO it_cust.
APPEND wa_xk01 TO it_xk01.
CLEAR : wa_bank , wa_cust.
ENDIF.
ENDLOOP.
START-OF-SELECTION.
LOOP AT it_xk01 INTO wa_xk01.
    REFRESH it_bdcdata.
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0100'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'RF02K-KTOKK'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'RF02K-LIFNR'
                                   wa_xk01-lifnr.                                        " vendor
    PERFORM bdc_field       USING 'RF02K-BUKRS'
                                  wa_xk01-bukrs.                                        " company cpode
    PERFORM bdc_field       USING 'RF02K-KTOKK'
                                  wa_xk01-ktokk.                                        " Acc group
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0110'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'LFA1-SPRAS'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'LFA1-ANRED'
                                  wa_xk01-anred.                                          " title
    PERFORM bdc_field       USING 'LFA1-NAME1'
                                  wa_xk01-name1.                                        " name
    PERFORM bdc_field       USING 'LFA1-SORTL'
                                  wa_xk01-sortl.                                       " ' search term'
    PERFORM bdc_field       USING 'LFA1-STRAS'
                                  wa_xk01-stras.                                    "street'
    PERFORM bdc_field       USING 'LFA1-PFACH'
                                  wa_xk01-pfach.                                     " po box
    PERFORM bdc_field       USING 'LFA1-ORT01'
                                  wa_xk01-ort01.                                  " city
    PERFORM bdc_field       USING 'LFA1-ORT02'
                                  wa_xk01-ort02.                                       " district
    PERFORM bdc_field       USING 'LFA1-LAND1'
                                  wa_xk01-land1.                                         " country
    PERFORM bdc_field       USING 'LFA1-SPRAS'
                                  wa_xk01-spras.                                         " language
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0120'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'LFA1-VBUND'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'LFA1-KUNNR'                                   " customer
                                  wa_xk01-kunnr.
    PERFORM bdc_field       USING 'LFA1-VBUND'
                                  wa_xk01-vbund.                                       " trading partner
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0130'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'LFBK-BKREF(01)'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=ENTR'.
    DATA : fnam(20) TYPE c,
           int      TYPE c.
    MOVE 1 TO int.
    CLEAR wa_bank.
    LOOP AT it_bank INTO wa_bank WHERE lifnr = wa_xk01-lifnr.
      CONCATENATE 'LFBK-BANKS(' int ')' INTO fnam.
      PERFORM bdc_field       USING fnam
                                    wa_bank-banks.                                           " city
      CONCATENATE 'LFBK-BANKL(' int ')' INTO fnam.
      PERFORM bdc_field       USING fnam
                                    wa_bank-bankl.
      CONCATENATE 'LFBK-BANKN(' int ')' INTO fnam.
      PERFORM bdc_field       USING fnam
                                    wa_bank-bankn.
      CONCATENATE 'LFBK-KOINH(' int ')' INTO fnam.
      PERFORM bdc_field       USING fnam
                                    wa_bank-koinh.
      CONCATENATE 'LFBK-BKONT(' int ')' INTO fnam.
      PERFORM bdc_field       USING fnam
                                    wa_bank-bkont.
      CONCATENATE 'LFBK-BVTYP(' int ')' INTO fnam.
      PERFORM bdc_field       USING fnam
                                    wa_bank-bvtyp.
      CONCATENATE 'LFBK-BKREF(' int ')' INTO fnam.
      PERFORM bdc_field       USING fnam
                                   wa_bank-bkref.
      int = int + 1.
    ENDLOOP.
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0130'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'LFBK-BANKS(01)'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=ENTR'.
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0380'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'KNVK-PAFKT(05)'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=ENTR'.
    DATA : fnam1(20) TYPE c,
           cnt.
    cnt = 1.
    CLEAR : wa_cust.
    LOOP AT it_cust INTO wa_cust WHERE lifnr = wa_xk01-lifnr.
      CONCATENATE 'KNVK-NAMEV(' cnt ')' INTO fnam1.
      PERFORM bdc_field       USING fnam1
                                    wa_cust-namev.
      CONCATENATE 'KNVK-NAME1(' cnt ')' INTO fnam1.
      PERFORM bdc_field       USING fnam1
                                     wa_cust-name1.
      CONCATENATE 'KNVK-TELF1(' cnt ')' INTO fnam1.
      PERFORM bdc_field       USING fnam1
                                    wa_cust-telf1.
      CONCATENATE 'KNVK-ABTNR(' cnt ')' INTO fnam1.
      PERFORM bdc_field       USING fnam1
                                   wa_cust-abtnr.
      CONCATENATE 'KNVK-PAFKT(' cnt ')' INTO fnam1.
      PERFORM bdc_field       USING fnam1
                                    wa_cust-pafkt.
      cnt = cnt + 1.
    ENDLOOP.
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0380'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'KNVK-NAMEV(01)'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=ENTR'.
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0210'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'LFB1-FRGRP'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'LFB1-AKONT'
                                  wa_xk01-akont.                           " REC aCC
    PERFORM bdc_field       USING 'LFB1-ZUAWA'
                                   wa_xk01-zuawa.                                " SORT KEY
    PERFORM bdc_field       USING 'LFB1-LNRZE'
                                   wa_xk01-lnrze.                            " HEAD OFFICE
    PERFORM bdc_field       USING 'LFB1-FDGRV'
                                  wa_xk01-fdgrv.                              " CASH MGMT GRP
    PERFORM bdc_field       USING 'LFB1-FRGRP'
                                  wa_xk01-frgrp.                          " RELEASE GRP
    PERFORM bdc_field       USING 'LFB1-CERDT'
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0215'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'LFB1-ZGRUP'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'LFB1-ZTERM'
                                  wa_xk01-zterm.                            " PAYMENT TERMS'
    PERFORM bdc_field       USING 'LFB1-TOGRU'
                                   wa_xk01-togru.                            " TOLERENCE GRP
    PERFORM bdc_field       USING 'LFB1-REPRF'
                                   wa_xk01-reprf.                                " CHECK DOUBLE INV
    PERFORM bdc_field       USING 'LFB1-ZWELS'
                                   wa_xk01-zwels.                            " PAYMENT METHOD
    PERFORM bdc_field       USING 'LFB1-ZAHLS'
                                   wa_xk01-zahls.                                " PAYMENT BLOCK
    PERFORM bdc_field       USING 'LFB1-HBKID'
                                   wa_xk01-hbkid.                             " HOUSE BANK
    PERFORM bdc_field       USING 'LFB1-ZGRUP'
                                   wa_xk01-zgrup.                              " GROUPING KEY
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0220'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'LFB5-BUSAB'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'LFB5-MAHNA'
                                   wa_xk01-mahna.                           " DUNN PROCEDURE
    PERFORM bdc_field       USING 'LFB5-MANSP'
                                   wa_xk01-mansp.                              " DUNNING BLOCK
    PERFORM bdc_field       USING 'LFB5-LFRMA'
                                   wa_xk01-lfrma.                        " Dunn representative
    PERFORM bdc_field       USING 'LFB5-GMVDT'
                                   wa_xk01-gmvdt.                      " legal dunn proc
    PERFORM bdc_field       USING 'LFB5-MADAT'
                                   wa_xk01-madat.                      " last dunned
    PERFORM bdc_field       USING 'LFB5-MAHNS'
                                   wa_xk01-mahns.                               " dunn level
    PERFORM bdc_field       USING 'LFB5-BUSAB'
                                   wa_xk01-busab.                             " dunning clerk
    PERFORM bdc_field       USING 'LFB1-MGRUP'
                                   wa_xk01-mgrup.                             " grouping key
    CALL TRANSACTION 'XK01' USING it_bdcdata
                           MODE 'A'.
ENDLOOP.
Start new screen *
FORM bdc_dynpro USING program dynpro.
CLEAR it_bdcdata.
it_bdcdata-program = program.
it_bdcdata-dynpro = dynpro.
it_bdcdata-dynbegin = 'X'.
APPEND it_bdcdata.
ENDFORM.                    "BDC_DYNPRO
Insert field
FORM bdc_field USING fnam fval TYPE any.
CLEAR it_bdcdata.
it_bdcdata-fnam = fnam.
it_bdcdata-fval = fval.
APPEND it_bdcdata.
ENDFORM. "bdc_field
*perform close_group.

How to use custom control.

hi all,
how to use custom controls in screen painter.
can i add image to my screen using custom control.
is there any other way to display image on screen.
give me some notes about custom control.
and sample programs to display image and also the use of custom control.
regards,
bhaskar.

hi vinod,
u can use the class <b>cl_gui_picture</b> to work around with pictures on the screen
just define a custom control on the screen
create an object of custom container.
create another object of cl_gui_picture giving container name as the parent name...
u can check out the class using the transn se24....
pls post if additional info is required...
Regards,
Vs

How to use Print Control in Print List.

Please any body can explain me how to use print control when creating Print list?
Thanks in advance.

Please any body can explain me how to use print control when creating Print list?
Thanks in advance.

How to use table control in LSMW

Hello All,
I have requirement to use LSMW , in my using transaction have table control ,I need to pass values in table control . how to use table control in LSMW .Can any one give me the solution for this.
Best regards,
Satya.

Note: The recording function records a fixed screen sequence. It cannot be used for migrating data containing a variable number of items or for transactions with dynamic screen sequences!
Tip: It is possible to create a recording via SHDB, generate a program out of this recording, and adopt the program to your needs and registrate the program to be able to use it in LSMW.
Thats means, for creation of project and WBS Elements is not possible through
1. LSMW-BDC (For both CJ01 and CJ20n)
2. LSMW-BAPI (Method: Maintain is not listed )
3. LSME-Standard Batch Direct Input.
Its possible through programmatically(SE38.) either using BAPI Or BDC.
Thanks,

How to use the Control lines of a parallel port as Input lines to be read using Labview ?

The details are :
NI Software : LabVIEW
Version : 5.0
OS : Windows 95
NI Hardware : N/A
Drivers : N/A
CPU : Pentium
RAM : 48
Vendor : darcom
Customer Information :
SPEL TESTING
SPEL, INDIA
[email protected]
Ph: (91) 4114 53818
We do not have any DAQ cards within the PC. We have the parallel port which is EPP and ECP compatible having the address 278h on LPT2 and we are trying use this port for reading 8bit data from an external circuit. We developed a vi program in Labview 5.0 to control the parallel port.We tried with the Data lines to send signals from PC to external device through this parallel port with the addr
ess 278h (which
is Data lines) and it works fine. We also tried using reading 4bit data from external
device to PC through this port with the address 279h (which is Status lines) and it
is also working fine.
But it was not possible for us to read through Control lines whose address is 27Ah. Whereas when line printer (dot matrix printer) was
connected, it was possible for us to take print out. Thus printer was working. This
informed us that the control lines are all OK!
Can you please clarify, how to use both control lines and status lines to read 8 bit data through this parallel port using the Labview software.

There are several Knowledge Base entries about this on the NI site, but probably the most detailed document is on the Advanced Measurements (www.advmeas.com) website. Try looking at this page, I think you will find it useful.
http://www.advmeas.com/goodies/parallelport.html

How to use Business Object like Vendor or PurchasingInfo

Hi,
How to use Business Object ( like Vendor or PurchasingInfo ) from my Object?
For example:
CLASS myEntity DEFINITION.
          PUBLIC SECTION.
               METHODS: getVendor EXPORTING pVendor TYPE Vendor.
           PRIVATE SECTION.
           DATA: aVendor TYPE REF TO Vendor.
ENDCLASS.
CLASS myEntity IMPLEMENTATION.
METHOD getVendor
           pVendor = aVendor .
ENDMETHOD.
ENDCLASS

Hi,
I am giving u a demo Program for ur doubt.
REPORT demo_class_counter .
CLASS counter DEFINITION.
PUBLIC SECTION.
    METHODS: set IMPORTING value(set_value) TYPE i,
             increment,
             get EXPORTING value(get_value) TYPE i.
PRIVATE SECTION.
    DATA count TYPE i.
ENDCLASS.
CLASS counter IMPLEMENTATION.
METHOD set.
    count = set_value.
ENDMETHOD.
METHOD increment.
    ADD 1 TO count.
ENDMETHOD.
METHOD get.
    get_value = count.
ENDMETHOD.
ENDCLASS.
DATA number TYPE i VALUE 5.
DATA cnt TYPE REF TO counter.
START-OF-SELECTION.
CREATE OBJECT cnt.
CALL METHOD cnt->set EXPORTING set_value = number.
DO 3 TIMES.
    CALL METHOD cnt->increment.
ENDDO.
CALL METHOD cnt->get IMPORTING get_value = number.
WRITE number.
For more demo programs type 'abapdocu' in the command field
U will be getting some demo programs.
There select the abap objects.
Regards,
Jagadish

Please could someone tell me where I can get info on how to use my controls when watching live sports on sky go on my IPad mini !!!

Could someone please tell me where I can info on how to use the controls I.e live pause,forward,rewind etc when watching live shows on my ipad mini please.

well, i can't really tell if i am only allowed one connection with this isp. basically, whenever i plug in the ethernet cord, all of the information gets filled in in the ethernet section of the network, except for the router info. there is router info filled in on my sister's computer whenever i plug the cord into her computer, though. does that mean i can't also use the modem for my computer? sorry, this is both my first time using a mac and my first time using anything other than dial-up, so i'm pretty lost. thanks for the info you've given me thus far.

How to use tree tables with CRUD operation for begineers ADF 11g

This is Friday night call for help.
This is only few sample ressources on the web for tree table and only one with CRUD operation.
I used this one http://jobinesh.blogspot.com/2010/05/crud-operations-on-tree-table.html because this is the only one that address CRUD.
And it is shaky. Deletion works fine but insertion not very well. This is working using custom code provided below.
Depending if the user selection in the tree, the code insert from the master node to the children node.
Any other options because it is not working well.
Also where Oracle describes how to use the row, rowset, itorator API? This is really hard to understand like almost if we should not use it.
then if not how can I insert in tree with two nodes and insert in the parent or children depending the users selection.
Lately I 'been posting questions on this forum with no response. This hurts. I understand developers cannot spend their time on this but People from Oracle, please help. We pay licenses...
public void createChildren(RowIterator ri, Key selectedNodeKey) {
final String deptViewDefName = "model.DepartmentsView";
final String empViewDefName = "model.EmployeesView";
if (ri != null && selectedNodeKey != null) {
Row last = ri.last();
Key lastRowKey = last.getKey();
// if the select row is not the last row in the row iterator...
Row[] found = ri.findByKey(selectedNodeKey, 1);
if (found != null && found.length == 1) {
Row foundRow = found[0];
String nodeDefname =
foundRow.getStructureDef().getDefFullName();
if (nodeDefname.equals(deptViewDefName)) {
RowSet parents =
(RowSet)foundRow.getAttribute("EmployeesView");
Row childrow = parents.createRow();
parents.insertRow(childrow);
} else {
RowSet parents =
(RowSet)foundRow.getAttribute("EmployeesView");
Row childrow = parents.createRow();
childrow.setAttribute("DepartmentId",
foundRow.getAttribute("DepartmentId"));
parents.insertRow(childrow);
} else {
System.out.println("Node not Found for " + selectedNodeKey);
}

I am looking for a sample that describe how to design a jsf page with a tree table.
So you have Department and employees. In the tree first comes Department and if you click the node you see the employees assigned to this department.
I need to be able to insert a new department or a new employee from the tree table by clicking on a insert button in the panel collection toolbar depending on user selection in the tree.
I got part of it working but not good enough.
By problem is the get insertion working
I have a createChildren method in my AM implementation that get in input a RowIterator and selected node key.
To goal is to create new records depending of the user selection and the input parameters get populated by the binding like this:
#{backing_treeSampleBean.selectedNodeRowIterator} #{backing_TreeSampleBean.selectedNodeRowkey} via method binding with parameters.
Is it the right approach?
First to be able to insert a parent record, I select nothing in the tree and ri and selectedNodeKey comes to null
we run this code
ViewObjectImpl vo = getSchHolidaySchedExceptionsView1();
//ViewObjectImpl vo = getDepartmentsView1();
Row foundRow = vo.first();
Row childrow = vo.createRow();
vo.insertRow(childrow);
A new blank entry appears in the parent node and we enter a value.
The the problem starts when we want to add a child to this parent.
We select the created parent and press the insert button, this code get executed
if (nodeDefname.equals(deptViewDefName))
//list of the children of the parent and create an new row
RowSet childRows = (RowSet)foundRow.getAttribute("SchHolidayExceptionDatesView");
Row childrow = childRows.createRow();
childRows.insertRow(childrow);
But the new entry does not appear, it is almost like it would be created for a different parent because this is a mandatory field that is not feel in yet and the interface complaints of a missing value. It is created somewhere just not a the right place... This is my guess.
Do you see something wrong with the code?
The full code og my create children method is there below
I am using jdeveloper 11.1.1.3.0 any issues with tree table to know about with this version?
Thanks for your help
public void createChildren(RowIterator ri, Key selectedNodeKey) {
final String deptViewDefName = "com.bcferries.app.pdfroutesched.model.SchHolidaySchedExceptionsView";
final String empViewDefName = "com.bcferries.app.pdfroutesched.model.SchHolidayExceptionDatesView";
if (ri != null && selectedNodeKey != null) {
// last row
Row last = ri.last();
Key lastRowKey = last.getKey();
// if the select row is not the last row in the row iterator...
Row[] found = ri.findByKey(selectedNodeKey, 1);
if (found != null && found.length == 1) {
// foundRow is the row selected
Row foundRow = found[0];
// The row selected can be the parent node or the child node
String nodeDefname = foundRow.getStructureDef().getDefFullName();
// if parent row
if (nodeDefname.equals(deptViewDefName))
//list of the children of the parent and create an new row
//works but we try to resolve the creation of a parent
RowSet childRows = (RowSet)foundRow.getAttribute("SchHolidayExceptionDatesView");
Row childrow = childRows.createRow();
//childrow.setAttribute("HolidayDate", new java.util.Date().getDate());
System.out.println("insert child row from master");
childRows.insertRow(childrow);
} else
//RowSet ParentRow = (RowSet)foundRow.getAttribute("SchHolidaySchedExceptionsView");
//RowSet childRows = (RowSet)ParentRow.first().getAttribute("SchHolidayExceptionDatesView");
Row childrow = ri.createRow();
System.out.println("insert child row from child ");
} else {
System.out.println("Node not Found for " + selectedNodeKey);
} else {
System.out.println(" param null try creating for first row : " +
ri + " * " + selectedNodeKey);
ViewObjectImpl vo = getSchHolidaySchedExceptionsView1();
Row foundRow = vo.first();
Row childrow = vo.createRow();
vo.insertRow(childrow);
}

How to Use Tree Structure in Forms (Expand & Collpse)

Hi ,
I need a logic to develop a Custom form which using tree structure fuctionality.It's like same in Indented Bills form (Module Bills of Material).
I have to use the symbol '+' and '-' in column called item_number ( if it has sub componentes, using that symbol i may explode or collopse).
I gone through the base form for that(indented Bill form(Form Name:BOMFQBIN, using BOMFMSTR library function to create Tree Structure)
but i colud not understand the logic.
If any one clarify me then it's fine
Thanks,
Sri

see this thread
Re: Forms 60 Heirarchical Tree..Need Help

Urgent ..How to use Tree component in a web based interface

I want to make a Java web based windows explorer type interface.
For that i want to use tree component .
Is it possible for me to do this.
Can anybody suggest me how to do ?

Hi,
I assume you plan to do this in a browser and you plan to use JTree. When using an applet, you'd have to make sure that the latest Java Plug-In is available on the client.
If you not plan to use JTree, you could use a Tree component which is not based on swing such as the one at http://www.calcom.de/eng/dev/cctree.htm
In this case still the browser would have to be 'Java enabled' by any kind of plug-in
Ulrich

How to use ejb control in jsp

hi,
I created an entity bean and I created an ejb control. Now I would like to
use this ejb control inside of a jsp (no page flow).
When I use the ejb without the control I do the follwing steps :
- get the local home
- call finder methode
- get the local object
- call getMethod() and display content
Can someone please post an example how to use the netui-data tags to do this
steps or do I have to use the controls in a total different way?
Can someone please tell me how to use the ejb control inside a normal java
class?
Michael

Do you want to use taglibs or develop custom tags? Either way take a look at these:
http://java.sun.com/j2ee/tutorial/1_3-fcs/doc/JSPTags.html
http://www.stardeveloper.com/articles/display.html?article=2001081301&page=1
http://www.onjava.com/pub/a/onjava/2000/12/15/jsp_custom_tags.html
http://jakarta.apache.org/taglibs/tutorial.html
http://www.ibm.com/developerworks/edu/j-dw-java-custom-i.html
http://www.herongyang.com/jsp/tag.html

How to use Tree control like a Tree in SAP HANA Live Browser?

Similar Messages

Maybe you are looking for