How to supress pop-up while using fm ALSM_EXCEL_TO_INTERNAL_TABLE ?

Hi,
I am using function module ALSM_EXCEL_TO_INTERNAL_TABLE to upload data form excel sheet, i am getting pop up like Do you want to save the changes you made to '<filename.xls>". how to supress this pop up

check this thread
Excel Upload.

Similar Messages

How to get default values while using the transaction "BP"

Hi Group,
I have a query on how to get default values while using the transaction <b>BP</b>?
The thing is:
when I enter into the transaction "BP", I need to see some default values to some of the input fields in the screen.
how can I achieve this?
So please kindly let me know the procedure to achieve this.
Thanks & Regards,
Vishnu.

Hi,
The events of BDT can be used to default some fields on creating a partner.
For this create a function module for ISDAT. attach that event in BUS7.
In the ISDAT funtion modulethe following code should be used.
For example to set the nationality:
I_BUSDEFAULT-NATIO = 'DE.
CALL FUNCTION 'BUP_BUPA_FIELDVALUES_SET'
EXPORTING
i_busdefault = I_BUSDEFAULT
Regards, Smita.

How to handle user exits while using BAPI

HI experts can any one help me on how to handle user exits while using BAPI. Do we need to handle it explicitly or standard BAPI will take care of it??.
Regards,
Hari Krishna

If you have added some fields using append structures for screen enhancements, then you have to use appropriate user exits to fill these data while calling BAPI. Some BAPIs have EXTENSION structures to fill the custom data which can be processed using user exists or enhancements.
Regards
Vinod

How to avoid Print pop-up while using a Adobe form.

Hi Experts,
I am calling a adobe form from a BAPI.I am using the following function modules FP_FUNCTION_MODULE_NAME and CALL FUNCTION fun_name. But when I try to execute the BAPI a print preview pop-up appears.Please let me know the steps to avoid the print preview pop-up while execution of the BAPI.
Thanks in Advance.
Warm Regards,
Arun.

Hello
I don´t understand the connection between BAPI and the printing program. I guess - at least that is what I have done - is to generate the form when creating and invoice or something, then I could understand.
When you ask for GETPDF = 'X' then you always get the PDF data back and not the popup.
Or if you would like to display the print preview without a print settings popup. Or variants...
FUNCTION ZPDF_SET_OUTPUT_MODE.
*"*"Lokální rozhraní:
*" CHANGING
*" VALUE(FP_OUTPUTPARAMS) TYPE SFPOUTPUTPARAMS
fp_outputparams-dest = 'ZPDF'.
fp_outputparams-nodialog = 'X'.
fp_outputparams-preview = 'X'.
ENDFUNCTION.
regards Otto

How to trigger New page while using ALV with classes/oops?

Hi All
I am trying to print a report which has to show the data in two pages.
I am using ALV with classes/oops.
Though I am able to print the report but a new page is not coming. Whole of the data is coming in one single page.
Please tell me as to how to trigger a NEW PAGE while using ALV with classes/oops.
Please send some code samples also if available.
Thanks in advance.
Jerry

using sort option you can do it. in case of grid/oo alv class ALV you can view that only in print mode/preview mode.
in case of list you can view that directly.
sort-fieldname = 'FIELDNAME'.
sort-group = '*' "triggers new page
sort-up = 'X'.
append sort to it_sort.

Pop up while using firefox "URL type file is not compatible"

This box appears to me now and then, with an "ok" button to dismiss it while using my firefox. It does not crash but it´s surely very annoying. Never happened until Lion was installed. Anyone with the same problem? Solutions?

Yes, I've had the same message popping up randomly since the upgrade. Can't trace it though, I've tried matching it with "Little Snitch" network monitor lists, but no luck. I'd be really pleased to find a solution to it as it is highly annoying, though I haven't found anything that doesn't work because of it.

How to format body message while using SO_DOCUMENT_SEND_API1?

hi,
           i am having some data in internal table that i want to format as text message and mail through SO_DOCUMENT_SEND_API1 function module but not as a attachement. i am using contents in body message. but i am not able to do formating , is there any way ?
internal table:
claimid claimdate    expensetype amount
0001     01.06.2008 FUMD          20000
0002     02.06.2008 SUND              500
0003     05.06.2008 ENTM             1500
i want to print this in message body part and send it throgh mail, while using write statement , it takes lot time.
plz suggest me.
Saurin Shah

Hi
Take a table as mentioned below.
GT_OBJTXT LIKE SOLISTI1
       OCCURS 0 WITH HEADER LINE,      " Mail Text options
and populate the data that you want to print as body in this table line by line.
Formating/allignment only can be done while populating the table. U have to check the mail and keep adjusting the allignment.
And after populating send the table to one table parameter in funciton module that is...
            CONTENTS_TXT               = LT_OBJTXT.
This will populate the mail body.
<REMOVED BY MODERATOR>
Venkat.
Edited by: Alvaro Tejada Galindo on Jun 12, 2008 2:17 PM

Receiving pop ups while using mozilla firefox

I primarily use Mozilla Firefox on my MacBook Air. I have been receiving many pop ups when searching the internet. In addition to that I noticed something called, "Mackeeper" installed on my computer, which I don't remember being their previously.

Helpful Links Regarding Malware Problems
If you are having an immediate problem with ads popping up see The Safe Mac » Adware Removal Guide and AdwareMedic.
Open Safari, select Preferences from the Safari menu. Click on Extensions icon in the toolbar. Disable all Extensions. If this stops your problem, then re-enable them one by one until the problem returns. Now remove that extension as it is causing the problem.
The following comes from user stevejobsfan0123. I have made minor changes to adapt to this presentation.
Fix Some Browser Pop-ups That Take Over Safari.
Common pop-ups include a message saying the government has seized your computer and you must pay to have it released (often called "Moneypak"), or a phony message saying that your computer has been infected, and you need to call a tech support number (sometimes claiming to be Apple) to get it resolved. First, understand that these pop-ups are not caused by a virus and your computer has not been affected. This "hijack" is limited to your web browser. Also understand that these messages are scams, so do not pay any money, call the listed number, or provide any personal information. This article will outline the solution to dismiss the pop-up.
Quit Safari
Usually, these pop-ups will not go away by either clicking "OK" or "Cancel." Furthermore, several menus in the menu bar may become disabled and show in gray, including the option to quit Safari. You will likely have to force quit Safari. To do this, press Command + option + esc, select Safari, and press Force Quit.
Relaunch Safari
If you relaunch Safari, the page will reopen. To prevent this from happening, hold down the 'Shift' key while opening Safari. This will prevent windows from the last time Safari was running from reopening.
This will not work in all cases. The shift key must be held at the right time, and in some cases, even if done correctly, the window reappears. In these circumstances, after force quitting Safari, turn off Wi-Fi or disconnect Ethernet, depending on how you connect to the Internet. Then relaunch Safari normally. It will try to reload the malicious webpage, but without a connection, it won't be able to. Navigate away from that page by entering a different URL, i.e. www.apple.com, and trying to load it. Now you can reconnect to the Internet, and the page you entered will appear rather than the malicious one.
An excellent link to read is Tom Reed's Mac Malware Guide.
Also, visit The XLab FAQs and read Detecting and avoiding malware and spyware.
See these Apple articles:
Mac OS X Snow Leopard and malware detection
OS X Lion- Protect your Mac from malware
OS X Mountain Lion- Protect your Mac from malware
OS X Mavericks- Protect your Mac from malware
About file quarantine in OS X
If you require anti-virus protection Thomas Reed recommends using ClamXAV. (Thank you to Thomas Reed for this recommendation.)
From user Joe Bailey comes this equally useful advice:
The facts are:
1. There is no anti-malware software that can detect 100% of the malware out there.
2. There is no anti-malware that can detect everything targeting the Mac.
3. The very best way to prevent the most attacks is for you as the user to be aware that
     the most successful malware attacks rely on very sophisticated social engineering
     techniques preying on human avarice, ****, and fear.
4. Internet popups saying the FBI, NSA, Microsoft, your ISP has detected malware on
    your computer is intended to entice you to install their malware thinking it is a
    protection against malware.
5. Some of the anti-malware products on the market are worse than the malware
    from which they purport to protect you.
6. Be cautious where you go on the internet.
7. Only download anything from sites you know are safe.
8. Avoid links you receive in email, always be suspicious even if you get something
    you think is from a friend, but you were not expecting.
9. If there is any question in your mind, then assume it is malware.
I would guess the above should apply to Mozilla-based browsers as well.

How to resolve the error while using user defined function.

EPN Assembly file
<?xml version="1.0" encoding="UTF-8"?>
<beans xmlns="http://www.springframework.org/schema/beans"
xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
xmlns:osgi="http://www.springframework.org/schema/osgi"
xmlns:wlevs="http://www.bea.com/ns/wlevs/spring"
xmlns:jdbc="http://www.oracle.com/ns/ocep/jdbc"
xmlns:spatial="http://www.oracle.com/ns/ocep/spatial"
xsi:schemaLocation="
http://www.springframework.org/schema/beans
http://www.springframework.org/schema/beans/spring-beans.xsd
http://www.springframework.org/schema/osgi
http://www.springframework.org/schema/osgi/spring-osgi.xsd
http://www.bea.com/ns/wlevs/spring
http://www.bea.com/ns/wlevs/spring/spring-wlevs-v11_1_1_3.xsd
http://www.oracle.com/ns/ocep/jdbc
http://www.oracle.com/ns/ocep/jdbc/ocep-jdbc.xsd
http://www.oracle.com/ns/ocep/spatial
http://www.oracle.com/ns/ocep/spatial/ocep-spatial.xsd">
     <wlevs:event-type-repository>
          <wlevs:event-type type-name="TestEvent">
               <wlevs:class>com.bea.wlevs.event.example.FunctionCEP.TestEvent</wlevs:class>
          </wlevs:event-type>
     </wlevs:event-type-repository>
     <wlevs:adapter id="InputAdapter"
          class="com.bea.wlevs.adapter.example.FunctionCEP.InputAdapter">
          <wlevs:listener ref="inputStream" />
     </wlevs:adapter>
     <wlevs:channel id="inputStream" event-type="TestEvent">
          <wlevs:listener ref="processor" />
     </wlevs:channel>
     <wlevs:processor id="processor">
          <wlevs:listener ref="outputStream" />
          <wlevs:function function-name="sum_fxn" exec-method="execute">
          <bean>com.bea.wlevs.example.FunctionCEP.TestFunction</bean>
          </wlevs:function>
     </wlevs:processor>
     <wlevs:channel id="outputStream" event-type="TestEvent">
          <wlevs:listener ref="bean" />
     </wlevs:channel>
     <bean id="bean" class="com.bea.wlevs.example.FunctionCEP.OutputBean">
     </bean>
</beans>
Event class
package com.bea.wlevs.event.example.FunctionCEP;
public class TestEvent {
     private int num_1;
     private int num_2;
     private int sum_num;
     public int getSum_num() {
          return sum_num;
     public void setSum_num(int sumNum) {
          sum_num = sumNum;
     public int getNum_1() {
          return num_1;
     public void setNum_1(int num_1) {
          this.num_1 = num_1;
     public int getNum_2() {
          return num_2;
     public void setNum_2(int num_2) {
          this.num_2 = num_2;
Adapter class
package com.bea.wlevs.adapter.example.FunctionCEP;
import com.bea.wlevs.ede.api.RunnableBean;
import com.bea.wlevs.ede.api.StreamSender;
import com.bea.wlevs.ede.api.StreamSource;
import com.bea.wlevs.event.example.FunctionCEP.TestEvent;
public class InputAdapter implements RunnableBean, StreamSource {
private StreamSender eventSender;
public InputAdapter() {
super();
public void run() {
     generateMessage();
private void generateMessage() {
     TestEvent event = new TestEvent();
     event.setNum_1(10);
     event.setNum_2(20);
     eventSender.sendInsertEvent(event);
public void setEventSender(StreamSender sender) {
eventSender = sender;
public synchronized void suspend() {
Output Bean class
package com.bea.wlevs.example.FunctionCEP;
import com.bea.wlevs.ede.api.StreamSink;
import com.bea.wlevs.event.example.FunctionCEP.TestEvent;
import com.bea.wlevs.util.Service;
public class OutputBean implements StreamSink {
     public void onInsertEvent(Object event) {
          System.out.println("In Output Bean");
          TestEvent event1 = new TestEvent();
          System.out.println("Num_1 is :: " + event1.getNum_1());
          System.out.println("Num_2 is :: " +event1.getNum_2());
          System.out.println("Sum of the numbers is :: " +event1.getSum_num());
Function Class
package com.bea.wlevs.example.FunctionCEP;
public class TestFunction {
     public Object execute(int num_1, int num_2)
          return (num_1 + num_2);
config.xml file
<?xml version="1.0" encoding="UTF-8"?>
<wlevs:config xmlns:wlevs="http://www.bea.com/ns/wlevs/config/application"
xmlns:jdbc="http://www.oracle.com/ns/ocep/config/jdbc">
     <processor>
          <name>processor</name>
               <rules>
               <view id="v1" schema="num_1 num_2">
                    <![CDATA[
                         select num_1, num_2 from inputStream
                    ]]>
               </view>
               <view id="v2" schema="num_1 num_2">
               <![CDATA[
               select sum_fxn(num_1,num_2), num_2 from inputStream // I am getting error when i am trying to call this function
               ]]>
               </view>
               <query id="q1">
                    <![CDATA[
                         select from v2[now] as num_2*     // Showing error while accessing the view also               ]]>
               </query>
          </rules>
     </processor>
</wlevs:config>
Error I am getting is :
Invalid statement: "select >>sum_fxn<<(num_1,num_2),age from inputStream"
Description: Invalid call to function or constructor: sum_fxn
Cause: Probable causes are: Function name sum_fxn(int,int) provided is invalid, or arguments are of
the wrong type., or Error while handling member access to complex type. Constructor sum_fxn of type
sum_fxn not found. or Probable causes are: Function name sum_fxn(int,int) provided is invalid, or
arguments are of the wrong type., or Error while handling member access to complex type.
Constructor sum_fxn of type sum_fxn not found.
Action: Verify function or constructor for complex type exists, is not ambiguous, and has the correct
number of parameters.
I have made a user defined function in a java class and configured this function in the EPN assembly file under the processor tag.
But when i am trying to access the function in the config.xml file , it is giving me an error in the query.
Please provide urgent help that how to write the exact query.

Hi,
In the EPN Assembly file use
<bean class="com.bea.wlevs.example.FunctionCEP.TestFunction"/>
instead of
<bean>com.bea.wlevs.example.FunctionCEP.TestFunction</bean>
Best Regards,
Sandeep

I got a "pop up" while using my ipod 4th gen saying that the camera was hacked.

While I was using a reddit app on my ipod I got a "pop-up" (not sure what else to call them, but it looked like the pop-up you get when you get an imessage or something else ipod related) saying that my ipod camera has been hacked and that the hacker now has access to my photos, camera, etc. It said to click the "ok" button at the bottom to update your camera to fix the problem, which I did, but nothing happened. When I got back on the app later there was another pop-up similar to that one asking if I wanted to open the link using the reddit app (not sure if it was part of the hacking pop-up or something else, so I didn't open it). I've never seen something like this happen before and when I tried to google the problem I didn't find anything! My ipod isn't jailbroken and no one but me has had access to it. Has anyone else had this happen before? Do you think it was legitimate? What do I do to fix it?

I would not be concerned with you iPod being comprised.since that really can' be done on a non-jailbroken iPod. I suspect it was a popup associated with Reddit. Someone is trying to get you to do something via social engineering. Apple wold not allow you to "update" the Apple camera app.
I would go to Reddit support and see if it has been reported by other

How to add warning message while using 'print' function in Adobe LiveCycle Designer

I am trying to make pdf document for my company which requires adding a warning message while anyone use 'print' function from the page...
Does anyone know how to add warning message on LiveCycle Designer
Also my supervisor mentioned something using 'nag' if that rings any bell

No you shoudl never go into the XML source unless uinstricted to do so.
You can open the script editor (under the window menu). It will appear above the drawing area but below the toolbars. You can resize it if there is not enough room. When you click on an object in the form you can choose an event to script against in the Show dropdown. In your case you will want to choose the prePrint event. A line will show up that indicates the object that is associated with the script as well as the event and other information. Add your script below this line. Once that is done you are finished and your form is ready for testing.
Paul

How to get SPOOL ID while using NEW-PAGE statement

Hi Experts
I am using "NEW-PAGE PRINT ON......PRINT OFF" statement to write directly in to the spool. while in this processing i want to get the SPOOL ID under which data is written. Is it possible? if yes, how ?
Thanks in Advance
Mukundhan

Hi
Check the system field
<b>sy-spono</b>
for Spool ID at that place of code
Reward points if useful
Regards
Anji

How to create service PO while using BAPI

Dear Experts
I am getting error while creating Service PO using BAPI
E 518
No account assignment exists for service line 0000000010
E 518
No account assignment exists for service line 0000000010
TYPES : BEGIN OF ty_header,
        po_no(10)   TYPE n,
        purch_org   TYPE bapimepoheader-purch_org,
        pur_group   TYPE bapimepoheader-pur_group,
        doc_type    TYPE bapimepoheader-doc_type,
        vendor      TYPE bapimepoheader-vendor,
        doc_date    TYPE bapimepoheader-doc_date,
        currency    TYPE bapimepoheader-currency,
        comp_code   TYPE bapimepoheader-comp_code,
        END OF ty_header,
        BEGIN OF ty_item,
        po_no(10)   TYPE n,                             " Internal Use
        po_item     TYPE bapimepoitem-po_item,
        acctasscat TYPE bapimepoitem-acctasscat,
        short_text TYPE bapimepoitem-short_text,
        plant       TYPE bapimepoitem-plant,
        pckg_no     TYPE bapimepoitem-pckg_no,
        stge_loc    TYPE bapimepoitem-stge_loc,
        quantity    TYPE bapimepoitem-quantity,
        po_unit     TYPE bapimepoitem-po_unit,
        po_price    TYPE bapimepoitem-po_price,
        net_price   TYPE bapimepoitem-net_price,
        price_unit TYPE bapimepoitem-price_unit,
        orderpr_un TYPE bapimepoitem-orderpr_un,
        delivery_date TYPE bapimeposchedule-delivery_date,              " bapimeposchedule
        matl_group TYPE bapimepoitem-matl_group,
        tax_code    TYPE bapimepoitem-tax_code,
        END OF ty_item,
        BEGIN OF ty_service,
        po_no(10)   TYPE n,                            " Internal Use
        po_item     TYPE bapimepoitem-po_item,         " Internal Use
        pckg_no     TYPE bapiesllc-pckg_no,
        line_no     TYPE bapiesllc-line_no,
        ext_line    TYPE bapiesllc-ext_line,
        outl_ind    TYPE bapiesllc-outl_ind,
        subpckg_no TYPE bapiesllc-subpckg_no,
        serial_no   TYPE bapiesklc-serial_no,           " bapiesklc
        short_text TYPE bapiesllc-short_text,
        quantity    TYPE bapiesllc-quantity,
        base_uom    TYPE bapiesllc-base_uom,
        gr_price    TYPE bapiesllc-gr_price,
        matl_group TYPE bapiesllc-matl_group,
        END OF ty_service,
        BEGIN OF ty_poaccount,
        po_no(10)   TYPE n,                             " Internal Use
        po_item      TYPE bapimepoaccount-po_item,
        serial_no    TYPE bapimepoaccount-serial_no,
        gl_account   TYPE bapimepoaccount-gl_account,
        costcenter   TYPE bapimepoaccount-costcenter,
        asset_no     TYPE bapimepoaccount-asset_no,
        orderid      TYPE bapimepoaccount-orderid,
        END OF ty_poaccount.
DATA : it_header TYPE TABLE OF ty_header,
       wa_header TYPE ty_header,
       it_item   TYPE TABLE OF ty_item,
       wa_item   TYPE ty_item,
       it_service TYPE TABLE OF ty_service,
       wa_service TYPE ty_service,
       it_account TYPE TABLE OF ty_poaccount,
       wa_account TYPE ty_poaccount.
DATA : it_excel1 TYPE TABLE OF alsmex_tabline,
       wa_excel1 TYPE alsmex_tabline,
       it_excel2 TYPE TABLE OF alsmex_tabline,
       wa_excel2 TYPE alsmex_tabline,
       it_excel3 TYPE TABLE OF alsmex_tabline,
       wa_excel3 TYPE alsmex_tabline,
       it_excel4 TYPE TABLE OF alsmex_tabline,
       wa_excel4 TYPE alsmex_tabline.
DATA : number TYPE string,
       number1 TYPE string.
********** BAPI**************
CONSTANTS : c_x VALUE 'X'.
*Structures to hold PO header data
DATA : header LIKE bapimepoheader ,
       headerx LIKE bapimepoheaderx .
*Internal Tables to hold PO ITEM DATA
DATA : item LIKE bapimepoitem OCCURS 0 WITH HEADER LINE,
       itemx LIKE bapimepoitemx OCCURS 0 WITH HEADER LINE.
*Structures to hold PO schedule data
DATA : itemschedule LIKE bapimeposchedule OCCURS 0 WITH HEADER LINE ,
       itemschedulex LIKE bapimeposchedulx OCCURS 0 WITH HEADER LINE .
*Structures to hold PO services data
DATA : services LIKE bapiesllc OCCURS 0 WITH HEADER LINE .
*Structures to hold PO (distrib.imputac.lín.servicios) data
DATA : posrvaccessvalues LIKE bapiesklc OCCURS 0 WITH HEADER LINE .
*Structures to hold PO account data
DATA : account LIKE bapimepoaccount OCCURS 0 WITH HEADER LINE ,
       accountx LIKE bapimepoaccountx OCCURS 0 WITH HEADER LINE .
*Internal table to hold messages from BAPI call
DATA : return LIKE bapiret2 OCCURS 0 WITH HEADER LINE,
       purchaseorder LIKE bapimepoheader-po_number.
SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS : p_file1 TYPE rlgrap-filename OBLIGATORY,
             p_brow1 TYPE i,
             p_erow1 TYPE i.
SELECTION-SCREEN : END OF BLOCK b1.
SELECTION-SCREEN : BEGIN OF BLOCK b2 WITH FRAME TITLE text-002.
PARAMETERS : p_file2 TYPE rlgrap-filename OBLIGATORY,
             p_brow2 TYPE i,
             p_erow2 TYPE i.
SELECTION-SCREEN : END OF BLOCK b2.
SELECTION-SCREEN : BEGIN OF BLOCK b3 WITH FRAME TITLE text-003.
PARAMETERS : p_file3 TYPE rlgrap-filename OBLIGATORY,
             p_brow3 TYPE i,
             p_erow3 TYPE i.
SELECTION-SCREEN : END OF BLOCK b3.
SELECTION-SCREEN : BEGIN OF BLOCK b4 WITH FRAME TITLE text-004.
PARAMETERS : p_file4 TYPE rlgrap-filename OBLIGATORY,
             p_brow4 TYPE i,
             p_erow4 TYPE i.
SELECTION-SCREEN : END OF BLOCK b4.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file1.
CALL FUNCTION 'F4_FILENAME'
    EXPORTING
      program_name = syst-cprog
      dynpro_number = syst-dynnr
      field_name    = ' '
    IMPORTING
      file_name     = p_file1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file2.
CALL FUNCTION 'F4_FILENAME'
    EXPORTING
      program_name = syst-cprog
      dynpro_number = syst-dynnr
      field_name    = ' '
    IMPORTING
      file_name     = p_file2.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file3.
CALL FUNCTION 'F4_FILENAME'
    EXPORTING
      program_name = syst-cprog
      dynpro_number = syst-dynnr
      field_name    = ' '
    IMPORTING
      file_name     = p_file3.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file4.
CALL FUNCTION 'F4_FILENAME'
    EXPORTING
      program_name = syst-cprog
      dynpro_number = syst-dynnr
      field_name    = ' '
    IMPORTING
      file_name     = p_file4.
START-OF-SELECTION.
PERFORM excel_to_itab.
PERFORM get_final.
*&      Form excel_to_itab
*       text
* --> p1        text
* <-- p2        text
FORM excel_to_itab .
************** Excel 1
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
    EXPORTING
      filename                      = p_file1
      i_begin_col                   = '1'
      i_begin_row                   = p_brow1
      i_end_col                     = '08'
      i_end_row                     = p_erow1
    TABLES
      intern                        = it_excel1
* EXCEPTIONS
*   INCONSISTENT_PARAMETERS       = 1
*   UPLOAD_OLE                    = 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.
LOOP AT it_excel1 INTO wa_excel1.
    CASE wa_excel1-col.
      WHEN '0001'.
        wa_header-po_no = wa_excel1-value.
      WHEN '0002'.
        wa_header-purch_org = wa_excel1-value.
      WHEN '0003'.
        wa_header-pur_group = wa_excel1-value.
      WHEN '0004'.
        wa_header-doc_type = wa_excel1-value.
      WHEN '0005'.
        wa_header-vendor = wa_excel1-value.
      WHEN '0006'.
        wa_header-doc_date = wa_excel1-value.
      WHEN '0007'.
        wa_header-currency = wa_excel1-value.
      WHEN '0008'.
        wa_header-comp_code = wa_excel1-value.
    ENDCASE.
    AT END OF row.
      APPEND wa_header TO it_header.
      CLEAR wa_header.
    ENDAT.
ENDLOOP.
************** Excel 2
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
      EXPORTING
        filename                      = p_file2
        i_begin_col                   = '1'
        i_begin_row                   = p_brow2
        i_end_col                     = '16'
        i_end_row                     = p_erow2
      TABLES
        intern                        = it_excel2
* EXCEPTIONS
*   INCONSISTENT_PARAMETERS       = 1
*   UPLOAD_OLE                    = 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.
LOOP AT it_excel2 INTO wa_excel2.
    CASE wa_excel2-col.
      WHEN '0001'.
        wa_item-po_no = wa_excel2-value.
      WHEN '0002'.
        wa_item-po_item = wa_excel2-value.
      WHEN '0003'.
        wa_item-acctasscat = wa_excel2-value.
      WHEN '0004'.
        wa_item-short_text = wa_excel2-value.
      WHEN '0005'.
        wa_item-plant = wa_excel2-value.
      WHEN '0006'.
        wa_item-pckg_no = wa_excel2-value.
      WHEN '0007'.
        wa_item-stge_loc = wa_excel2-value.
      WHEN '0008'.
        wa_item-quantity = wa_excel2-value.
      WHEN '0009'.
        wa_item-po_unit = wa_excel2-value.
      WHEN '0010'.
        wa_item-po_price = wa_excel2-value.
      WHEN '0011'.
        wa_item-net_price = wa_excel2-value.
      WHEN '0012'.
        wa_item-price_unit = wa_excel2-value.
      WHEN '0013'.
        wa_item-orderpr_un = wa_excel2-value.
      WHEN '0014'.
        wa_item-delivery_date = wa_excel2-value.
      WHEN '0015'.
        wa_item-matl_group = wa_excel2-value.
      WHEN '0016'.
        wa_item-tax_code = wa_excel2-value.
    ENDCASE.
    AT END OF row.
      APPEND wa_item TO it_item.
      CLEAR wa_item.
    ENDAT.
ENDLOOP.
************** Excel 3
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
      EXPORTING
        filename                      = p_file3
        i_begin_col                   = '1'
        i_begin_row                   = p_brow3
        i_end_col                     = '13'
        i_end_row                     = p_erow3
      TABLES
        intern                        = it_excel3
* EXCEPTIONS
*   INCONSISTENT_PARAMETERS       = 1
*   UPLOAD_OLE                    = 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.
LOOP AT it_excel3 INTO wa_excel3.
    CASE wa_excel3-col.
      WHEN '0001'.
        wa_service-po_no = wa_excel3-value.
      WHEN '0002'.
        wa_service-po_item = wa_excel3-value.
      WHEN '0003'.
        wa_service-pckg_no = wa_excel3-value.
      WHEN '0004'.
        wa_service-line_no = wa_excel3-value.
      WHEN '0005'.
        wa_service-ext_line = wa_excel3-value.
      WHEN '0006'.
        wa_service-outl_ind = wa_excel3-value.
      WHEN '0007'.
        wa_service-subpckg_no = wa_excel3-value.
      WHEN '0008'.
        wa_service-serial_no = wa_excel3-value.
      WHEN '0009'.
        wa_service-short_text = wa_excel3-value.
      WHEN '0010'.
        wa_service-quantity = wa_excel3-value.
      WHEN '0011'.
        wa_service-base_uom = wa_excel3-value.
      WHEN '0012'.
        wa_service-gr_price = wa_excel3-value.
      WHEN '0013'.
        wa_service-matl_group = wa_excel3-value.
    ENDCASE.
    AT END OF row.
      APPEND wa_service TO it_service.
      CLEAR wa_service.
    ENDAT.
ENDLOOP.
************** Excel 3
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
      EXPORTING
        filename                      = p_file4
        i_begin_col                   = '1'
        i_begin_row                   = p_brow4
        i_end_col                     = '07'
        i_end_row                     = p_erow4
      TABLES
        intern                        = it_excel4
* EXCEPTIONS
*   INCONSISTENT_PARAMETERS       = 1
*   UPLOAD_OLE                    = 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.
LOOP AT it_excel4 INTO wa_excel4.
    CASE wa_excel4-col.
      WHEN '0001'.
        wa_account-po_no = wa_excel4-value.
      WHEN '0002'.
        wa_account-po_item = wa_excel4-value.
      WHEN '0003'.
        wa_account-serial_no = wa_excel4-value.
      WHEN '0004'.
        wa_account-gl_account = wa_excel4-value.
      WHEN '0005'.
        wa_account-costcenter = wa_excel4-value.
      WHEN '0006'.
        wa_account-asset_no = wa_excel4-value.
      WHEN '0007'.
        wa_account-orderid = wa_excel4-value.
    ENDCASE.
    AT END OF row.
      APPEND wa_account TO it_account.
      CLEAR wa_account.
    ENDAT.
ENDLOOP.
ENDFORM.                    " excel_to_itab
*&      Form GET_FINAL
*       text
* --> p1        text
* <-- p2        text
FORM get_final .
LOOP AT it_header INTO wa_header.
* BAPI HEADER
    header-purch_org = wa_header-purch_org.
    header-pur_group = wa_header-pur_group.
    header-doc_type   = wa_header-doc_type.
    header-vendor     = wa_header-vendor.
    header-doc_date   = wa_header-doc_date.
    header-currency   = wa_header-currency.
    header-comp_code = wa_header-comp_code.
* BAPI HEADERX
    headerx-comp_code = c_x.
    headerx-doc_type = c_x.
    headerx-vendor = c_x.
    headerx-creat_date = c_x.
    headerx-created_by = c_x.
    headerx-purch_org = c_x.
    headerx-pur_group = c_x.
    headerx-langu = c_x.
    headerx-sales_pers = c_x.
    headerx-currency = c_x.
    headerx-doc_date = c_x.           " Added
    LOOP AT it_item INTO wa_item WHERE po_no = wa_header-po_no.
      CALL FUNCTION 'NUMBER_GET_NEXT'
         EXPORTING
           nr_range_nr                   = '01'
           object                        = 'SERVICE'
*   quantity                      = '1'
*   SUBOBJECT                     = ' '
*   TOYEAR                        = '0000'
*   IGNORE_BUFFER                 = ' '
          IMPORTING
          number                        =    number
*   QUANTITY                      =
*   RETURNCODE                    =
* EXCEPTIONS
*   INTERVAL_NOT_FOUND            = 1
*   NUMBER_RANGE_NOT_INTERN       = 2
*   OBJECT_NOT_FOUND              = 3
*   QUANTITY_IS_0                 = 4
*   QUANTITY_IS_NOT_1             = 5
*   INTERVAL_OVERFLOW             = 6
*   BUFFER_OVERFLOW               = 7
*   OTHERS                        = 8
      IF sy-subrc <> 0.
* Implement suitable error handling here
      ENDIF.
      item-po_item        =     wa_item-po_item.
      item-acctasscat     =     wa_item-acctasscat.
      item-item_cat       =     '9'.
      item-short_text     =     wa_item-short_text.
      item-plant          =     wa_item-plant.
      item-pckg_no        =     number.
      item-stge_loc       =     wa_item-stge_loc.
      item-quantity       =     wa_item-quantity.
      item-po_unit        =     wa_item-po_unit.
      item-po_price       =     wa_item-po_price.
      item-net_price      =     wa_item-net_price.
      item-price_unit     =     wa_item-price_unit.
      item-orderpr_un     =     wa_item-orderpr_un.
      item-matl_group     =     wa_item-matl_group.
      item-tax_code       =     wa_item-tax_code.
      APPEND item.
      CLEAR item.
      itemx-po_item = wa_item-po_item.
      itemx-item_cat = c_x.
      itemx-po_itemx = c_x.
      itemx-short_text = c_x.
      itemx-quantity = c_x.
      itemx-tax_code = c_x.
      itemx-acctasscat = c_x.
      itemx-item_cat = c_x.
      itemx-matl_group = c_x.
      itemx-plant = c_x.
      itemx-trackingno = c_x.
      itemx-agreement = c_x.
      itemx-agmt_item = c_x.
      itemx-stge_loc = c_x.
      itemx-quantity = c_x.
      itemx-po_unit = c_x.
      itemx-conv_num1 = c_x.
      itemx-conv_den1 = c_x.
      itemx-net_price = c_x.
      itemx-price_unit = c_x.
      itemx-gr_pr_time = c_x.
      itemx-prnt_price = c_x.
      itemx-unlimited_dlv = c_x.
      itemx-gr_ind = c_x .
      itemx-ir_ind = c_x .
      itemx-gr_basediv = c_x .
      itemx-pckg_no = c_x.
      itemx-po_price = c_x.         " Added
      itemx-orderpr_un = c_x.         " Added
      APPEND itemx.
      CLEAR itemx.
      itemschedule-po_item = wa_item-po_item.
      itemschedule-del_datcat_ext = 'D'.
      itemschedule-delivery_date = wa_item-delivery_date.
      APPEND itemschedule.
      CLEAR itemschedule.
      itemschedulex-po_item = wa_item-po_item.
      itemschedulex-po_itemx = c_x .
      itemschedulex-del_datcat_ext = c_x.
      itemschedulex-delivery_date = c_x .
      APPEND itemschedulex.
      CLEAR itemschedulex.
      LOOP AT it_service INTO wa_service WHERE po_no = wa_item-po_no AND po_item = wa_item-po_item.
        IF wa_service-outl_ind IS INITIAL.
IF number1 IS INITIAL.
          CALL FUNCTION 'NUMBER_GET_NEXT'
            EXPORTING
              nr_range_nr                   = '01'
              object                        = 'SERVICE'
*   quantity                      = '1'
*   SUBOBJECT                     = ' '
*   TOYEAR                        = '0000'
*   IGNORE_BUFFER                 = ' '
             IMPORTING
             number                        =    number1
*   QUANTITY                      =
*   RETURNCODE                    =
* EXCEPTIONS
*   INTERVAL_NOT_FOUND            = 1
*   NUMBER_RANGE_NOT_INTERN       = 2
*   OBJECT_NOT_FOUND              = 3
*   QUANTITY_IS_0                 = 4
*   QUANTITY_IS_NOT_1             = 5
*   INTERVAL_OVERFLOW             = 6
*   BUFFER_OVERFLOW               = 7
*   OTHERS                        = 8
          IF sy-subrc <> 0.
* Implement suitable error handling here
          ENDIF.
          services-pckg_no      = number.
          services-line_no      = '1'.
          services-ext_line     = '0'.
          services-outl_ind     = 'X'.
          services-subpckg_no   = number1.
*          services-short_text   = wa_service-short_text.
*          services-quantity     = wa_service-quantity.
*          services-base_uom     = wa_service-base_uom.
*          services-gr_price     = wa_service-gr_price.
*          services-matl_group   = wa_service-matl_group.
          APPEND services.
          CLEAR services.
ENDIF.
*        ELSE.
          services-pckg_no      = number1.
          services-line_no      = wa_service-line_no.
          services-ext_line     = wa_service-ext_line.
*          services-outl_ind     = wa_service-outl_ind.
          services-subpckg_no   = '0'.
          services-short_text   = wa_service-short_text.
          services-quantity     = wa_service-quantity.
          services-base_uom     = wa_service-base_uom.
          services-gr_price     = wa_service-gr_price.
          services-matl_group   = wa_service-matl_group.
          APPEND services.
          CLEAR services.
        ENDIF.
        IF wa_service-outl_ind IS INITIAL.
          posrvaccessvalues-pckg_no = number1.
          posrvaccessvalues-line_no = wa_service-line_no.
          posrvaccessvalues-serno_line = '01'.
          posrvaccessvalues-serial_no = wa_service-serial_no.
*          posrvaccessvalues-percentage = '100'.
          APPEND posrvaccessvalues . CLEAR posrvaccessvalues.
        ENDIF.
      ENDLOOP.
      LOOP AT it_account INTO wa_account WHERE po_no = wa_item-po_no AND po_item = wa_item-po_item.
        account-po_item         =       wa_account-po_item.
        account-serial_no       =       wa_account-serial_no.
        account-gl_account      =       wa_account-gl_account.
        account-costcenter      =       wa_account-costcenter.
        account-asset_no        =       wa_account-asset_no.
        account-orderid         =       wa_account-orderid.
        APPEND account.
        CLEAR account.
        accountx-po_item = wa_account-po_item.
        accountx-po_itemx = c_x .
        accountx-serial_no = wa_account-serial_no.
        accountx-serial_nox = c_x .
*        accountx-creat_date = c_x .
        accountx-costcenter = c_x .
        accountx-gl_account = c_x .
*        accountx-co_area = c_x .
*        accountx-tax_code = c_x .
*        accountx-asset_no        = c_x .   " Added
*        accountx-orderid         = c_x .   " Added
        APPEND accountx. CLEAR accountx.
      ENDLOOP.
    ENDLOOP.
    CALL FUNCTION 'BAPI_PO_CREATE1'
      EXPORTING
        poheader          = header
        poheaderx         = headerx
*       POADDRVENDOR      =
*       TESTRUN           =
      IMPORTING
        exppurchaseorder = purchaseorder
*       EXPHEADER         =
*       EXPPOEXPIMPHEADER =
      TABLES
        return            = return
        poitem            = item
        poitemx           = itemx
        poschedule        = itemschedule
        poschedulex       = itemschedulex
        poaccount         = account
        poaccountx        = accountx
        poservices        = services.
    posrvaccessvalues = posrvaccessvalues.
    IF purchaseorder IS NOT INITIAL.
      CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
        EXPORTING
          wait = 'X'.
    ENDIF.
    LOOP AT return.
      WRITE : / return-type, return-number, return-message.
    ENDLOOP.
ENDLOOP.
ENDFORM.                    " GET_FINAL

Hi ganesh,
Please look at the SAP note 376424 - BAPI_PO_CREATE1: Error messages for parked POs.
Sap recommends to install the support service pack. Take a look at the note for detailed understanding.
Also take a look at SAP NOte
767284 - SE518 occurs although account assignment is supplied to BAPI (this requires Note 552114 must be applied as a prerequisite)
Consider contacting basis team after your analysis about the issue.
Regards,
Sivaganesh

How to write processed XML while using XML DOM

How can I write a Document Node type element in a file i.e. if I have a document and I loaded in memory using DOM then I processed it.Now I need to write it back to file.how can I do that

Use a Transformer whose input is a DOMSource and whose output is some kind of Result which points at wherever you want to write the XML.

How to bring Pop up while opening any transaction

Hi All,
I need to give Pop up when any one open some transaction.
Please advice.
Thanks,
Gaurav Mittal

Hi ,
Try the Function Module -- POPUP_TO_CONFIRM_STEP before CALL TRANSACTION.
Check the bellow code -
DATA : w_return TYPE c.
CALL FUNCTION 'POPUP_TO_CONFIRM_STEP'
EXPORTING
    textline1      = 'Do you want to continue ?'
    titel          = 'Confirmation'
    cancel_display = 'X'
IMPORTING
    answer         = w_return.
IF w_return EQ 'J'. " When YES is clicked
CALL TRANSACTION 'SE11'.
ENDIF.
Note : In the W_RETURN variable will hold the return value like -
when the YES will be selected the value will be J and
when the NO will be selected the value will be N .
You can also use FM POPUP_TO_CONFIRM .
Regards
Pinaki

How to supress pop-up while using fm ALSM_EXCEL_TO_INTERNAL_TABLE ?

Similar Messages

Maybe you are looking for