SWC_GET_ELEMENT problem in RH_GET_STRUCTURE function

Hi all,
i use RH_GET_STRUCTURE function and it don't work fine because i've a problem with macro SWC_GET_ELEMENT.
My container (table's RH_GET_STRUCTURE function) is :
ELEMENT TAB_INDEX ELEMLENGTH TYPE VALUE
OTYPE 000000 001 C S
OBJID 000000 045 C 50006202
In the code's function there are this line :
SWC_GET_ELEMENT AC_CONTAINER 'OTYPE' OTYPE.
SWC_GET_ELEMENT AC_CONTAINER 'OBJID' OBJID.
For the first line, it's ok, the macro get me 'S' value, but in the second case OBJID is empty, because macro call FORM swc_get_first and the problem occurs on the line 'READ TABLE container WITH KEY swc_cont_key-element BINARY SEARCH.'
subrc = 4 and i don't know why.
Thanks for help.
Regards,

After more tests, function work fine now, but it's strange...
I reversed the line into container like that :
ELEMENT TAB_INDEX ELEMLENGTH TYPE VALUE
OBJID 000000 045 C 50006202
OTYPE 000000 001 C S
The only difference is that the elements are now classified alphabetically...

Similar Messages

Problem in using function module parameters in abap program

i want to use the coding present in on one of the function module 'AS_API_INFOSTRUC_FIND' i got the problem using the function module parameters in my abap program.
these are the parameters inside fm
""Lokale Schnittstelle:
*"       IMPORTING
*"             VALUE(I_FIELDCAT) TYPE AIND_FCAT
*"             VALUE(I_FIELDS) TYPE TABLE OPTIONAL
*"             VALUE(I_OBLIGATORY_FIELDS) TYPE TABLE OPTIONAL
*"       EXPORTING
*"             VALUE(E_INFOSTRUC) TYPE AIND_DESC
*"             REFERENCE(E_ALL_FIELDS) TYPE TABLE
*"             REFERENCE(E_MATCHING_FIELDS) TYPE TABLE
*"       EXCEPTIONS
*"              NO_INFOSTRUC_FOUND
i want to declare     E_ALL_FIELDS parameter    in my abap program,
i have declared as
data: E_ALL_FIELDS TYPE TABLE.
but   the system throws error that
'type of field 'TABLE' is generic .no table line has been specified'.
i want to use it in my abap program how can i declare in my abap program .

You have to declare the table using any specific type.
The type table in the FM is generic so you can pass any type you need.
For instance:
TYPES: BEGIN OF ty_fields,
         fieldname LIKE dfies-fieldname,
       END OF ty_fields,
TYPES: TY_T_GLU1              LIKE GLU1                     OCCURS 0,
       ty_t_fields            type ty_fields                occurs 0.
DATA: lt_info_struct_fields TYPE ty_t_fields WITH HEADER LINE,
        lt_matching_fields    TYPE ty_t_fields WITH HEADER LINE.
    CALL FUNCTION 'AS_API_INFOSTRUC_FIND'
         EXPORTING
              i_fieldcat         = ft_fieldcat-fieldcat
              i_fields           = ft_fields_filled[]
         IMPORTING
              e_infostruc        = lv_info_struct_name
              e_all_fields       = lt_info_struct_fields[]
              e_matching_fields = lt_matching_fields[]
         EXCEPTIONS
              no_infostruc_found = 1.

Error thread java : problem with the function "resume 0x***" (forum sun)

One problem with the function of jdb occured when I tried to use it to
pilot the processor with differents threads. In fact, I use a simple example with 2 threads.
I stop the two threads with two breakpoint, and I want to resume one or the other (with the function "resume 0x****"), the one wich I resumed stop again on the breackpoint and I decide again to resume one or the other. All of that to obtain a tree of execution.
I give you the code of the class and the code of jdb.
CLASS: (it's just a object Room with a variable degre that I increment and decrement with two threads increase and decrease)
public class Test{
     public static void main(String[] args){
          Room r = new Room();
          decrease de = new decrease(r);
          increase in = new increase(r);
          de.start();
          in.start();
class Room {
     private volatile int degre=20;
     public void more(){
     degre += 4;
     public void less(){
     degre -= 3;
class decrease extends Thread{
private Room room;
public decrease(Room r){
          room =r;
public void run(){
try{
     while (!interrupted()){
          room.less();
catch(InterruptedException e) {}
class increase extends Thread{
private Room room;
public increase(Room r){
     room =r;
public void run(){
     try{
          while (!interrupted()){
               room.more();
catch(InterruptedException e) {}
JDB:
Initializing jdb ...
stop at Test:7Deferring breakpoint Test:7.
It will be set after the class is loaded.
runrun Test
Set uncaught java.lang.Throwable
Set deferred uncaught java.lang.Throwable
>
VM Started: Set deferred breakpoint Test:7
Breakpoint hit: "thread=main", Test.main(), line=7 bci=30
7 in.start();
main[1] stop at room:16
Set breakpoint room:16
main[1] stop at room:20
Set breakpoint room:20
main[1] resume
All threads resumed.
>
Breakpoint hit: "thread=Thread-0", room.less(), line=20 bci=0
20 degre -= 3;
Thread-0[1] threads
Group system:
(java.lang.ref.Reference$ReferenceHandler)0x10d Reference Handler cond. waiting
(java.lang.ref.Finalizer$FinalizerThread)0x10c Finalizer cond. waiting
(java.lang.Thread)0x10b Signal Dispatcher running
Group main:
(decrease)0x146 Thread-0 running (at breakpoint)
(increase)0x147 Thread-1 running (at breakpoint)
(java.lang.Thread)0x148 DestroyJavaVM running
Thread-0[1] resume 0x147
Thread-0[1]
Breakpoint hit: "thread=Thread-1", room.more(), line=16 bci=0
16 degre += 4;
Thread-1[1] resume 0x147
Thread-1[1]
Breakpoint hit: "thread=Thread-1", room.more(), line=16 bci=0
16 degre += 4;
Thread-1[1] print degre
degre = 24
Thread-1[1] resume 0x146 //It's here the problem, thread 0x146 have to stop on the //next breakpoint of decrease but nothing happen
Thread-1[1] resume 0x147
Thread-1[1]
Breakpoint hit: "thread=Thread-1", room.more(), line=16 bci=0
16 degre += 4;
Thread-1[1] clear
Breakpoints set:
breakpoint Test:7
breakpoint room:16
breakpoint room:20
PS: I tried many other examples with other class and other kind of breakpoints, but, in any cases, on thread doesn't manage to resume. When I try with general resume (no specification of the thread), It works but it isn't interresting for me because I want to decide wich thread continue his execution.

Hi,
I have read the FAQ of the JMF.
The problem was the jar files of the JMF were not in the JRE\BIN\EXT
folder of the Java runtime!
now it works!
thanks
Reg

Problem using two function based indexes at once!

Hello Oracle!
I've got problems using two function based indexes on geometries at once.
The problem occures, when I use a spatial join between two geometries both using function based indexes.
The test case:
CREATE TABLE quad (centroid NUMBER);
CREATE TABLE points (no NUMBER, point MDSYS.SDO_GEOMETRY);
CREATE OR REPLACE FUNCTION getQuad (centroid NUMBER) RETURN MDSYS.SDO_GEOMETRY DETERMINISTIC IS
BEGIN
RETURN MDSYS.SDO_GEOMETRY(2003, NULL, NULL, MDSYS.SDO_ELEM_INFO_ARRAY(1,1003,1),MDSYS.SDO_ORDINATE_ARRAY(centroid-5,centroid-5,centroid+5,centroid-5,centroid+5,centroid+5,centroid-5,centroid+5,centroid-5,centroid-5));
END;
INSERT INTO USER_SDO_GEOM_METADATA VALUES('quad','tiedge.getQuad(centroid)',MDSYS.SDO_DIM_ARRAY(MDSYS.SDO_DIM_ELEMENT('X', -100, 100, .0000001), MDSYS.SDO_DIM_ELEMENT('Y', -100, 100, .0000001)),NULL);
CREATE INDEX quad_idx on quad(getQuad(centroid)) INDEXTYPE IS MDSYS.SPATIAL_INDEX;
INSERT INTO quad VALUES (0);
INSERT INTO quad VALUES (5);
INSERT INTO quad VALUES (10);
INSERT INTO points VALUES (1, MDSYS.SDO_GEOMETRY(1001,NULL,NULL,MDSYS.SDO_ELEM_INFO_ARRAY(1,1,1),MDSYS.SDO_ORDINATE_ARRAY(4,4)));
ALTER SESSION SET QUERY_REWRITE_INTEGRITY=TRUSTED;
ALTER SESSION SET QUERY_REWRITE_ENA[i]Long postings are being truncated to ~1 kB at this time.

hi there,
For a better audience for this question, I'd look at the database forum.
guys on that will be a lot more familiar with FBIs
thanks
Barry

Problem using LIKE function

Hi Guyz,
I am having small problem using LIKE function . The problem is I am using LIKE function in the WHERE clause
to compare a column to a particular value, which gets this value from the front end. If the user has a single quote in the string he entered then the LIKE function is not working because of the single quote. Is there any way I can escape the single quote like we escape '%' and '_'.
Thankyou.

Mod_plsql supports bind variables, as do almost all front-end tools that deal with Oracle (and most other databases). I do not code mod pl/sql myself, but others here do, and I see bind variables in their code all the time (if I don't, they hear from me :-)).
If you pass a bind variable, the quote problem goes away. As far as I know (which is not very far), you should be able to take the string with the quote directly from your input field, bind it to the variable in your query and have no problems.
I suspect that the reson you are having issues is that you are just gluing strings together to create a sql statement. this is the wrong approach.
The java term for what you are looking for is prepared statement, I'm not sure what the equivalent is i mod plsql, but that should give you a start.
John

Problem with renameTo function

Hello !
I hava got a problem on renameTo function. I can rename the short file name (for example: REPORT.TXT to REPORT.ERR), but I can't rename the long file name (for example: XXX_REPORT_20040125.TXT to XXX_REPORT_20040125.ERR). The following codes I have been used :
File f1 = new File("c:\\sunny\\data\\interfaces\\XXX_REPORT_20040125.TXT");
File f2 = new File("c:\\sunny\\data\\interfaces\\XXX_REPORT_20040125.ERR");
f1.renameTo(f2);
Thanks.

JDK version? 1.1.8? 1.2.2? 1.3.1? 1.4.2? else?
Windows version? 3.11? 95? 98? 98SE? ME? NT 4? 2000? XP? 2003? else?

Problem with 'GetType' Function calling in MSVC++

Hello
I have problem with the function in TestStand API .
When I call the function " GetType " with the following statements in
a DLL called from TestStand (NI) implemented in MS VC ++
, it does not work and this exception is caught by the ONLY ' try catch ' block
to catch exceptions in TestStand API giving the error message
" Unexpected operating system error".
VARIANT_BOOL ok;
VARIANT_BOOL hi;
BSTR Name;
PropertyObject *property = (*step_)->AsPropertyObject();
( *step_ is a STEP Object of type Step* *step_ )
property = property->GetPropertyObject( "TS.SData", 0);
enum TS:ropertyValueTypes i = property->GetType( "" , 0 , &hi , &ok
, &Name);//Problem
Please solve my problem.
You can email me at [email protected]
Thankyou very much.
Best regards
Fahad Ejaz

Hello,
The problem is that the Name is not initialized (the BSTR is defined as OLECHAR*). Thus, replace the
BSTR Name;
declaration with the following lines:
char buf[1024];
BSTR Name = _bstr_t(buf);
This should solve the problem.
Best Regards,
Silvius
Silvius Iancu

Problem with CONTAINS function

Hi all!!
i got a problem with contains function. i'm running oracle 11g.
if i execute this query:
SELECT x.lid as id, x.sztitular as titular, e.szname as proName, x.szresumen as resumen, b.sztitle as catName,
f.szname as secName, d.szname as cliName, x.datecreation as datecreation
FROM CPR_PRACTICAL_CASE x,ctg_category b, CPR_CLIENT d, pro_product e, CAT_SECTOR f, CPR_PCASE_PRODUCT g, CPR_PCASE_SECTOR h,
PRO_PRODUCTCATEGORY i WHERE x.lid = g.lpcaseid and e.lid = g.lproductid and x.lid = h.lpcaseid
and f.lid = h.lsectorid and x.lclientid = d.lid and i.lproductid = e.lid and b.lid = i.lcategoryid
AND x.szlocale = 'es-ES' AND x.bavailable = '1'i get 1 row as result with the column sztitular = "rodillos de medidas"
if i only add one more sentece to that query:
AND CONTAINS( x.sztitular, 'rodillos',1) >0the query returns an empty set.. i really don't understand why because the term "rodillos" is present in the row's column called "sztitular"...
i've put an index on that column:
create index ITXT_TITULAR on CPR_PRACTICAL_CASE(sztitular) INDEXTYPE IS CTXSYS.CONTEXT;any help?
many thanks!!!!
Edited by: ElMazzaX on May 21, 2012 5:51 PM
Edited by: ElMazzaX on May 21, 2012 5:53 PM

How are you synchronising the index?
http://docs.oracle.com/cd/E11882_01/text.112/e24435/ind.htm#i1008452
Also see the Oracle Text forum:
Text

Problem facing in Function module.

Hi friends,
Happy New year to all.
I am facing the problem while crating Function module.
As my requirement:
I need to call this Function module in SAP-BW application area. I am creating this in BW side(SE37).
The intenal table which i am passing to the function module will vary. The structure is not constant.
Data is flowing from one table(source table) to another table(Destination table) . In BW if we want to refer the data in source table in START ROUTINE while loading, we use SOURCE_PACKAGE internal table.
1) I am passing Source_package internal table as ITAB_SOURCE_PACKAGE. (this source_package strucute also not canstant, it will vary)
2) passing second internal table as ITAB1, this structure also vary. I will declare this structure before calling the function module.
In Function module Table tab i given as
PARAMETER       TYPE           Associated Type
ITAB1                   LIKE           ANY
ITAB_SOURCE_PACK   LIKE      ANY
In Import tab:
SOURCEINFOOBJECT           pass value
In source code i written as
DATA: WA_SOURCE_PACK like line of ITAB_SOURCE_PACK.
DATA: WA_ITAB1 like line of ITAB1.
LOOP AT ITAB_SOURCE_PACK INTO WA_SOURCE_PACK.
READ TABLE ITAB1 WITH KEY SOURCEINFOOBJECT = WA_SOURCE_PACK-SOURCEINFOOBJECT
INTO WA_ITAB1.
IF SY-SUBRC NE 0.
    WA_ITAB1-SOURCEINFOOBJECT = WA_SOURCE_PACK-SOURCEINFOOBJECT.
    INSERT WA_ITAB1 INTO TABLE ITAB1.
ENDIF.
ENDLOOP.
(Note: this is piece of code)
While checking i am getting as error
Field "ANY" is unknown. It is neither in one of the specified tablesnor defined by a "DATA" statement. "DATA" statement. "DATA" statement.
For this what i need to do.
As i am not very good in ABAP, pls help me.
Thanks & Regard
MRK

Hi,
u have to do like this..decalre itab1 and ITAB_SOURCE_PACK in the tables parameter...
so change like this
In Function module Table tab do like this
PARAMETER TYPE Associated Type
ITAB1
ITAB_SOURCE_PACK
In Import tab:
SOURCEINFOOBJECT pass value
In source code i written as
DATA: WA_SOURCE_PACK type ITAB_SOURCE_PACK.
DATA: WA_ITAB1 type ITAB1.
LOOP AT ITAB_SOURCE_PACK INTO WA_SOURCE_PACK.
READ TABLE ITAB1 WITH KEY SOURCEINFOOBJECT = WA_SOURCE_PACK-SOURCEINFOOBJECT
INTO WA_ITAB1.
IF SY-SUBRC NE 0.
WA_ITAB1-SOURCEINFOOBJECT = WA_SOURCE_PACK-SOURCEINFOOBJECT.
INSERT WA_ITAB1 INTO TABLE ITAB1.
ENDIF.
ENDLOOP.
Regards,
Nagaraj

Facing Problem in XD01 Function Exit

Hi,
I am facing the problem in XD01 Function Exit EXIT_SAPMF02D_001. whenenver i am going active the include ZXF04U01, it is always creating the Local change request. But It is should be Transportable change request. That is why, the Basic people is enabled to transport the request into Production Server.
So, How can i make the transportable change request for the same.
kindly suggest me the solution for this problem.

Thank for replying,
My problem is not related to Local Object.
Function Exit was already lying in project. Problem occurs while activing the function exit. It gives the request number ( Local changes request number) but the Basis person enable to see the request number in his screen.
So, how should i make local change request to transportable change request.

Problem in executing function module: ERROR_IN_PDO: ERROR_IN_PDO

Hi all,
I am getting an error I can't solve until now.. Who can help?
The Default Trace in the EP 7.0/NWA gives the following information:
Severity: Error
Message: Problem in executing function module:[date]:com.sap.mw.jco.JCO$AbapException: (126) ERROR_IN_PDO: ERROR_IN_PDO
Category: /uwl/service
Location: com.sap.netweaver.bc.uwl.core.connect.abap.FunctionModuleActionHandler
Application: sap.com/tcwddispwda
The UWL connection tests are correct! So, who can help!
There is nothing to find in sap notes or sdn forum
Best regards,
G. Leurs

Hi john,
I am also facing hte same issue.
when the user is trying to approve the Compleated shopping cart from the button availble in the UWL preview , I am getting the below error.
Exception type:com.sap.netweaver.bc.uwl.connect.ConnectorException Message:Wed Aug 25 12:16:52 CEST 2010 (Connector) :com.sap.netweaver.bc.uwl.connect.ConnectorException:Wed Aug 25 12:16:52 CEST 2010 (Connector) :com.sap.mw.jco.JCO$AbapException:ERROR_IN_PDO
we are not passing any ABAP role from teh SRM system.
it would be great if you can share your views regarding this.
Raji

Performance problem with OLE_FLUSH_CALL function module

Hello Everyone,
I am facing problem with OLE_FLUSH_CALL function module (execution is taking long time which is going to be dump error).
Could you please help me in knowing solution for this problem?
Thanking you in advance.
Srinivas

Hi Srinivas,
the OLE_FLUSH_CALL does an RFC from ABAP backend to frontend UI. So high execution time could result from high network time, for example latency between UI and backend server.
How many UI interaction steps did you measure for the trace above? Ideally, there should only be one OLE_FLUSH_CALL per user interaction step. If its more, the application is not written in an optimized way.
Best Regards, Randolf

Problem with the function module SO_DOCUMENT_SEND_API1

Hi Friends,
I am facing the problem wiht the function module SO_DOCUMENT_SEND_API1,
My actull requirement is : - i need to send the sap data to my externa mail id (Like as XYZ@) with out the any attachment , So i have implemented the code with the function module SO_DOCUMENT_SEND_API1.
The mail has successfully sent the sap inbox (SOST) but the mail are not reached to the external mail ID'S( XYZ@GMAIL)
i Have maintained my code lines same as below.
CALL FUNCTION 'SO_DOCUMENT_SEND_API1'
    EXPORTING
      document_data = wa_doc_data
      put_in_outbox = ca_x
      commit_work   = ca_x
    TABLES
      packing_list = tb_packing_list
      contents_txt = tb_mailbody
      receivers     = tb_receiver.
Can you please tell me soultion ,
Thanks
charan.

Hi charan,
                  If u r able to see the mail in sost, then i think ur code has worked fine. if the mail is not going to outside domains from sost u need to do some configurations for that, u can find lots of configuration docs regarding mail setup in sap.
once try to pass below parameter also.
t_receivers1-rec_type = 'U'.
For configuring mail setup u need to sit with ur basis guy.
Moderator message: please do not use SMS speak.
Edited by: Thomas Zloch on Nov 23, 2010 5:51 PM

For users having problems with Mail functionality...

Hello! I have been having problems with Mail functionality as well, so, I took a few steps to see if I could solve the problem on my own.
My problems were:
Mail would freeze when sending mail, or, when I pressed quit, it would freeze.
If I toggled between inboxes too much it would freeze up.
Even after trying the many techniques others offered on this board, Mail still froze up. So.. here's what I did:
1.) Turn off the auto-retrieve mail function in the preferences/general menu. Set it to a manual check. Just check it yourself every once in awhile. It may not be as convenient, but it works, trust me.
2.) Under the fonts and colors menu, set all three fonts to the SAME font (mines Century Schoolbook, but anything works) and turn off fixed-width font. Sometimes mail has a tough time decoding and working with texts, and causes it to freeze.
3.) Clean our your main inbox! Place the emails that you want to keep, but don't need to be in your inbox in a new folder on your inbox bar (mines aptly named 'Saved Messages.' That way, when you open up Mail to your default account, it doesn't have 1,000+ messages to index. Also, try to keep the inboxes from having more than 100-200 messages per. It seems to frown on any more than that.
After trying these three easy, steps, restart mail and see if things run smoother. I have had no problems since these changes, and mail runs a ton better. Plus you don't have to worry about deleting your library/mail folder anymore. Let me know if things work out so I can see if my theory is a universally proven thing. Thanks and good luck!
iMac G5 20" Mac OS X (10.4.5)

Good question. I have worked very little with IMAP other than as a testing device, so, on a daily routine I cannot say how it would function. However, I can only expect that by having the option to download all emails for offline viewing selected, you are right in it being a lag creator. Another suggestion would be, if you are running a single-computer setup, to have the account delete emails from the server after recieving them on your computer. Thus, you reduce the risk of repeat downloads or unnecessary build-up on the server end. DO NOT select this option if you run multiple computer set ups on one AppleMail account system or you will cause some discrepancies and/or data loss from system to system. Or, if you have emails redirected from a seperate server to Mail (i.e. I redirect mail from my university email account into Mail so that I don't have to go to the web-mail site to check it--> just like Gmail or Yahoo etc etc) you won't be able to check them from the web-based email system if you have the system delete them. Ok that sounded confusing. Solution: have the system remove emails from the server after a week (or any period of time, just not immediately) so that, in the off-chance you need to use the online system, you will have access, and will give you a chance to check the emails on other systems without a threat of data corruption (by corruption i mean that frustrating feeling you get when you can't find that super important email that was in your inbox just 10 seconds ago on your desktop etc.)
I will see if I can learn anything more about IMAP Ernie. Its definitley the biggest problem source for Mail, POP and .Mac being simple and functional as long as you don't play with the settings too much. As far as the issue of Offline viewing goes, try turning it off and seeing how Mail functions.
BEFORE you turn it off, however, I recommend saving all of your emails in your inbox as a text file or something so, in case the server burps and has a brain flatuence, you don't lose anything. Been there, done that, thrown the books against the wall in a frustrated rage.
My only reserve about the Offline Viewing is whether or not Mail will, when you click "recieve mail," have to re-download the emails from the server each time. If so, then it may end up taking longer and lagging more. The issue here is obviously minimizing the amount of activity between Mail and the email server without jeapordizing information on the server or multiple Mail programs on the same account. When we can find that balance, I think Mail's potential will be realized. Keep the questions coming.

Problem with BAPI_SALESORDER_CHANGE function module

I know lot of posts have been done about problems with this function module. However I was not able to find the answer to my problem. Hence posting a new thread
I have the following code which changes the reason rejection (if required to 'ZF') and also updates the sales order quantity.
The code works absolutely fine as long as the PGI date of the order item is either today or in the future. However if the PGI date of the order item is in the past. I get an error in the t_return table with error type 'E' saying 'PGI date is in the past hence could not update the item'.
If I try to update the same order quantity in VA02 for the item with PGI date in the past it does so without any problem.
Can someone please suggest what the problem might be. Or if there is some other way I can update the quantity. (I dont want to use BDC)
FORM change_sales_order_item USING value(r_rtb_posnrs) TYPE zpsd_ztsdrtb_ro_track
                             CHANGING r_return TYPE type_t_bapiret2.
DATA: v_order_header_in TYPE bapisdh1,
v_order_header_inx TYPE bapisdh1x,
t_schedule_lines TYPE bapischdl OCCURS 0 WITH HEADER LINE,
t_schedule_linesx TYPE bapischdlx OCCURS 0 WITH HEADER LINE,
v_temp_rtb_vbeln TYPE vbeln,
v_temp_rtb_posnr TYPE posnr,
wa_old_rtb_posnrs TYPE ztsdrtb_ro_track,
t_item_in TYPE bapisditm OCCURS 0 WITH HEADER LINE,
t_item_inx TYPE bapisditmx OCCURS 0 WITH HEADER LINE,
v_rtb_old_vbeln TYPE zrtbvbeln,
v_rtb_old_posnr TYPE zrtbposnr,
v_ro_old_vbeln TYPE zrovbeln,
v_ro_old_posnr TYPE zroposnr,
v_rtb_count TYPE i,
v_next_row_index TYPE i,
v_update_order_flg TYPE char1, "Update the sales order flag
v_rtb_record_counter TYPE i,
v_original_vbeln TYPE vbeln,
t_bapiret TYPE STANDARD TABLE OF bapiret2.
FIELD-SYMBOLS: <wa_r_rtb_posnrs> TYPE ztsdrtb_ro_track,
                 <wa_r_rtb_posnr_next> TYPE ztsdrtb_ro_track.
CONSTANTS: c_updateflag TYPE bapisditmx-updateflag VALUE 'U'.
v_order_header_inx-updateflag = 'U'.
Get rid of the duplicate records for the same RTB order. Just use
the last record quantity in the internal table
LOOP AT r_rtb_posnrs ASSIGNING <wa_r_rtb_posnrs>.
    v_rtb_record_counter = v_rtb_record_counter + 1.
    <wa_r_rtb_posnrs>-seqnr = v_rtb_record_counter.
ENDLOOP.
SORT r_rtb_posnrs DESCENDING BY zrtbvbeln zrtbposnr seqnr zrtbconsumedflg.
DELETE ADJACENT DUPLICATES FROM r_rtb_posnrs COMPARING zrtbvbeln zrtbposnr.
DESCRIBE TABLE r_rtb_posnrs LINES v_rtb_count.
v_rtb_record_counter = 0.
v_update_order_flg = space.
LOOP AT r_rtb_posnrs ASSIGNING <wa_r_rtb_posnrs>.
    v_rtb_record_counter = v_rtb_record_counter + 1.
    v_update_order_flg = space.
Popluate the item quantity update flags for schedule lines
    t_schedule_linesx-itm_number = <wa_r_rtb_posnrs>-zrtbposnr.
    t_schedule_linesx-sched_line = '0001'.
    t_schedule_linesx-updateflag = c_updateflag.
    t_schedule_linesx-req_qty = 'X'.
    APPEND t_schedule_linesx.
    CLEAR t_schedule_linesx.
*Item (Order QQuantity Field to be changed "KWMENG")
    t_schedule_lines-itm_number = <wa_r_rtb_posnrs>-zrtbposnr.
    t_schedule_lines-sched_line = '0001'.
    t_schedule_lines-req_qty = <wa_r_rtb_posnrs>-zrtbchgqty.
    APPEND t_schedule_lines.
    CLEAR t_schedule_lines.
If fully consumed then set the rejection flag
    IF <wa_r_rtb_posnrs>-zrtbconsumedflg = 'X'.
      t_item_inx-itm_number = <wa_r_rtb_posnrs>-zrtbposnr.
      t_item_inx-updateflag = 'X'.
      t_item_inx-reason_rej = 'X'.
      APPEND t_item_inx.
      CLEAR t_item_inx.
      t_item_in-itm_number = <wa_r_rtb_posnrs>-zrtbposnr.
      t_item_in-reason_rej = 'ZF'.
      APPEND t_item_in.
      CLEAR t_item_in.
    ELSE.
      t_item_inx-itm_number = <wa_r_rtb_posnrs>-zrtbposnr.
      t_item_inx-updateflag = 'X'.
      t_item_inx-reason_rej = 'X'.
      APPEND t_item_inx.
      CLEAR t_item_inx.
      t_item_in-itm_number = <wa_r_rtb_posnrs>-zrtbposnr.
      t_item_in-reason_rej = ' '.
      APPEND t_item_in.
      CLEAR t_item_in.
    ENDIF.
If you have reached the last line of the RTB intern table update the sales order
*Index pointing to the next row
    v_next_row_index = v_rtb_record_counter + 1.
    IF v_rtb_record_counter = v_rtb_count.
      v_update_order_flg = 'X'.
    ELSEIF v_rtb_record_counter < v_rtb_count.
Get the next row data
      READ TABLE r_rtb_posnrs INDEX v_next_row_index ASSIGNING <wa_r_rtb_posnr_next>.
      IF sy-subrc = 0.
        IF <wa_r_rtb_posnrs>-zrtbvbeln <> <wa_r_rtb_posnr_next>-zrtbvbeln.
          v_update_order_flg = 'X'.
        ENDIF.
      ENDIF.
    ELSE.
      v_update_order_flg = space.
    ENDIF.
update the rtb orders with quantities and the rejection flag (if required)
    IF v_update_order_flg = 'X'.
      CALL FUNCTION 'BAPI_SALESORDER_CHANGE' STARTING NEW TASK 'SOUPDATE'
        PERFORMING callbk_bapi_salesorder_change ON END OF TASK
        EXPORTING
          salesdocument    = <wa_r_rtb_posnrs>-zrtbvbeln
          order_header_in = v_order_header_in
          order_header_inx = v_order_header_inx
        TABLES
          return           = t_return
          schedule_lines   = t_schedule_lines
          schedule_linesx = t_schedule_linesx
          order_item_in    = t_item_in
          order_item_inx   = t_item_inx.
      WAIT UNTIL t_return[] IS NOT INITIAL.
      READ TABLE t_return INTO wa_return WITH KEY type = 'E'.
      IF sy-subrc <> 0.
      ELSE.
        r_return[] = t_return[].
        MESSAGE ID 'ZSD' TYPE 'E' NUMBER 613.
       RAISE errorinorderupdate.
      ENDIF.
      REFRESH t_schedule_linesx.
      REFRESH t_schedule_lines.
      REFRESH t_item_in.
      REFRESH t_item_inx.
      REFRESH t_return.
    ENDIF.
ENDLOOP.
CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
   IMPORTING
     return = t_bapiret.
ENDFORM.                    "Change_Sales_Order

see the following example and try to do this:
i_hdrx-updateflag = 'U'.
*" Fill required SCHEDULE_LINES data.
i_sched-itm_number = p_posnr.
i_sched-sched_line = p_etenr.
i_sched-req_qty = p_reqqty.
i_schedx-updateflag = 'U'.
i_schedx-itm_number = p_posnr.
i_schedx-sched_line = p_etenr.
i_schedx-req_qty = 'X'.
APPEND i_sched.
APPEND i_schedx.
CALL FUNCTION 'BAPI_SALESORDER_CHANGE'
EXPORTING
salesdocument = p_vbeln
order_header_in = i_hdr
order_header_inx = i_hdrx
TABLES
return = i_ret
schedule_lines = i_sched
schedule_linesx = i_schedx.

SWC_GET_ELEMENT problem in RH_GET_STRUCTURE function

Similar Messages

Maybe you are looking for