How could i add attachment in this code

i have code when_button_pressed (send email) but i want attach file
how can i do this ?
this is the code
-------only for outlook
--- THIS IS OLE CODE FOR MORE INFO. SEE HELP .
DECLARE
--PROCEDURE SendMail
objOutlook OLE2.OBJ_TYPE;
objMail OLE2.OBJ_TYPE;
objArg OLE2.LIST_TYPE;
vfilename varchar2(300);
BEGIN
objOutlook := OLE2.CREATE_OBJ('OUTLOOK.Application');
objarg := OLE2.CREATE_ARGLIST;
OLE2.ADD_ARG(objarg,0);
objMail := OLE2.INVOKE_OBJ(objOutlook,'CreateItem',objarg);
OLE2.DESTROY_ARGLIST(objarg);
OLE2.SET_PROPERTY(objmail,'To',:TO);
OLE2.SET_PROPERTY(objmail,'Subject',:SUBJECT);
OLE2.SET_PROPERTY(objmail,'Body',:BODY);
OLE2.INVOKE(objmail,'Send');
OLE2.INVOKE(objmail,'Display');
OLE2.RELEASE_OBJ(objmail);
OLE2.RELEASE_OBJ(objOutlook);
Message('Your mail sent successfully..............');
Message('Your mail sent successfully..............');
exception
when others then
message(sqlerrm);message(sqlerrm);
END;
thanks.

Hello,
Try this:
OLE2.SET_PROPERTY(objmail,'Attachments','c:\file.txt');Francois

Similar Messages

  • How could i add actions to this program....

    i am trying to add action events so that the menuItems will do something when selected (with if else statements) such as changing the background color or font text
    yes, i am very new to java
    thanks for any help
    here is what i'm working with
    import java.awt.*;
    import java.awt.event.*;
    import javax.swing.*;
    public class ThemeChanger extends JFrame
    JTextArea output;
    JScrollPane scrollPane;
    public ThemeChanger()
    JMenuBar menuBar;
    JMenu menu;
    JMenuItem blue;
    JMenuItem red;
    JMenuItem green;
    addWindowListener(new WindowAdapter()
    public void windowClosing(WindowEvent e)
    System.exit(0);
    // Add components to window
    Container contentPane = getContentPane();
    output = new JTextArea(5, 20);
    output.setEditable(false);
    scrollPane = new JScrollPane(output);
    contentPane.add(scrollPane, BorderLayout.CENTER);
    //Create the menu bar.
    menuBar = new JMenuBar();
    setJMenuBar(menuBar);
    //Build the first menu.
    menu = new JMenu("Themes");
    menuBar.add(menu);
    //a group of JMenuItems
    blue = new JMenuItem("Blue");
    menu.add(blue);
    red = new JMenuItem("Red");
    menu.add(red);
    green = new JMenuItem("Green");
    menu.add(green);
    public static void main(String args[])
    ThemeChanger window = new ThemeChanger();
    window.setTitle("Theme Changer");
    window.setSize(300, 300);
    window.setVisible(true);

    import java.awt.*;
    import java.awt.event.*;
    import javax.swing.*;
    public class ThemeChanger extends JFrame implements ActionListener{
       JMenuItem blue;
       JMenuItem red;
       JMenuItem green;
       JMenuItem coorier = new JMenuItem("Courier");
       JMenuItem times = new JMenuItem("Times new Roman");
       JMenuItem tahomah = new JMenuItem("Tahoma");;
       JMenuItem comics = new JMenuItem("Verdana");;  
       JMenu mFont;
       JTextArea output;
       JComboBox fontSizes;
       boolean newFont;
       String fontChanged = "Arial";
       int mySize = 12;
       Font startFont = new Font(fontChanged, Font.PLAIN,mySize);
      public ThemeChanger(){
         JMenu menu;
         Container contentPane = getContentPane();
         output = new JTextArea(4, 12);
         output.setFont(startFont);
         JScrollPane scrollPane = new JScrollPane(output);
         contentPane.add(scrollPane, BorderLayout.CENTER);
         JMenuBar menuBar = new JMenuBar();
         setJMenuBar(menuBar);
         menu = new JMenu("Colour");
         menuBar.add(menu);
         blue = new JMenuItem("Blue");
         blue.addActionListener(this);
         menu.add(blue);
         red = new JMenuItem("Red");
         menu.add(red);
         red.addActionListener(this);
         green = new JMenuItem("Green");
         green.addActionListener(this);
         menu.add(green);
         mFont= new JMenu("Font");
          mFont.add(coorier);
          coorier.addActionListener(this);
          mFont.add(times);
          times.addActionListener(this);
          mFont.add(tahomah);
          tahomah.addActionListener(this);
          mFont.add(comics);
          comics.addActionListener(this);
          menuBar.add(mFont);
          mFont.addActionListener(this);
         fontSizes = new JComboBox();
          fontSizes.addItem("Size");
          fontSizes.addItem("8");
          fontSizes.addItem("10");
          fontSizes.addItem("11");
          fontSizes.addItem("12"); 
          fontSizes.addItem("14");
          fontSizes.addItem("18");
          fontSizes.addItem("22");
          fontSizes.addItem("28");
          fontSizes.addItem("36");
          fontSizes.addItem("48");
          fontSizes.addItem("72");
            fontSizes.setMaximumRowCount(5);
          fontSizes.setBackground(Color.white);
          fontSizes.addActionListener(this);
         menuBar.add(fontSizes);
      public void actionPerformed(ActionEvent e){
        if(e.getSource()==blue)  output.setForeground(Color.blue);
        if(e.getSource()==red)   output.setForeground(Color.red);
        if(e.getSource()==green) output.setForeground(Color.green);
        if(e.getSource()==fontSizes) {
           mySize = Integer.parseInt((String)fontSizes.getSelectedItem());
           output.setFont(new Font(fontChanged, Font.PLAIN,mySize));
        if(((e.getSource()==coorier))||((e.getSource()==times)||(e.getSource()==tahomah))||((e.getSource()==comics))) {
           fontChanged = e.getActionCommand();
           output.setFont(new Font(fontChanged, Font.PLAIN,mySize));
      public static void main(String args[]) {
         ThemeChanger window = new ThemeChanger();
         window.setTitle("Theme Changer");
         window.setSize(300, 300);
         window.setDefaultCloseOperation(JFrame.EXIT_ON_CLOSE);
         window.setVisible(true);
    }

  • How can we add attachment in the PO using BAPI

    How can we add attachment in the PO? I am using the BAPI_PO_CREATE1 function module to create the PO. I am getting a file from legacy system, this I need to add as an attachment into the particular PO through programming.
    Note: After creation of PO the attachment should be available in ME23n transaction.

    REPORT  ZBAPI_PO_CRATE.
    data : PO_HEADER like BAPIEKKOC.
    data : PO_HEADER_ADD_DATA like BAPIEKKOA.
    data : PO_ITEMS like BAPIEKPOC occurs 0 with header
    line.
    data : PO_ITEM_SCHEDULES like BAPIEKET occurs 0 with
    header line.
    data : RETURN like BAPIRETURN occurs 0 with header
    line.
    DATA : BEGIN OF TAB OCCURS 0,
           PO_NUMBER like BAPIEKKOC-PO_NUMBER,
           DOC_DATE(10),
           DOC_TYPE like BAPIEKKOC-DOC_TYPE,
           CO_CODE like BAPIEKKOC-CO_CODE,
           PURCH_ORG like BAPIEKKOC-PURCH_ORG,
           PUR_GROUP like BAPIEKKOC-PUR_GROUP,
           VENDOR like BAPIEKKOC-VENDOR,
           PMNTTRMS like BAPIEKKOA-PMNTTRMS,
           INCOTERMS1 like BAPIEKKOA-INCOTERMS1,
           INCOTERMS2 like BAPIEKKOA-INCOTERMS2,
           PO_ITEM like  BAPIEKPOC-PO_ITEM,
           MATERIAL like BAPIEKPOC-MATERIAL,
           PUR_MAT like BAPIEKPOC-PUR_MAT,
           ITEM_CAT like BAPIEKPOC-ITEM_CAT,
           PLANT like BAPIEKPOC-PLANT,
           NET_PRICE like BAPIEKPOC-NET_PRICE,
           TAX_CODE like BAPIEKPOC-TAX_CODE,
           DELIV_DATE(10),
           QUANTITY like BAPIEKET-QUANTITY,
         end of tab.
    data: itab1 like alsmex_tabline occurs 0 with header
    line.
    DATA: gd_currentrow type i.
    data : PURCHASEORDER like ekko-ebeln.
    Data: tot_rec type i,     "Total Records
         gd_update type i,   "Main Table Increement
    Counter
         gd_lines type i,    "Success Table increement
    Counter
         w_textout like t100-text. "VARIABLE TO GET ERROR
    LOG
    data : begin of it_success occurs 0,
            PURCHASEORDER LIKE ekko-ebeln,  "PROJECT
          end of it_success.
    data : begin of it_error occurs 0,
            pono like  ekko-ebeln,
            err_msg(73) TYPE c,    "TO RETREIVE ERROR
    MESSAGES
         end of it_error.
    data : pono like  ekko-ebeln.
    selection-screen begin of block b1 with frame.
    skip 3.
    parameter:p_infile like rlgrap-filename obligatory.
    skip 3.
    selection-screen end  of block b1.
    AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_infile.
      PERFORM value_help.
    start-of-selection.
      call function 'ALSM_EXCEL_TO_INTERNAL_TABLE'
        EXPORTING
          filename                = p_infile
          i_begin_col             = '1'
          i_begin_row             = '2' "Do not require
    headings
          i_end_col               = '22'
          i_end_row               = '10000'
        TABLES
          intern                  = itab1
        EXCEPTIONS
          inconsistent_parameters = 1
          upload_ole              = 2
          others                  = 3.
      if sy-subrc <> 0.
        message e010(zz) with text-001. "Problem uploading
    Excel Spreadsheet
      endif.
    *perform open_group.
      sort itab1 by row col.
    * Get first row retrieved
      read table itab1 index 1.
    * Set first row retrieved to current row
      gd_currentrow = itab1-row.
      loop at itab1.
    * Reset values for next row
        if itab1-row ne gd_currentrow.
          append tab .
          clear tab.
          gd_currentrow = itab1-row.
        endif.
        case itab1-col.
          when '0001'. "PGNAM
            TAB-PO_NUMBER = itab1-value.
          when '0002'. "RONAM
            TAB-DOC_DATE = itab1-value.
          when '0003'. "JVLEVEL
            TAB-DOC_TYPE = itab1-value.
          when '0004'. "FTTYPE
            TAB-CO_CODE = itab1-value.
          when '0005'. "LANG
            TAB-PURCH_ORG =  itab1-value.
          when '0006'. "LTEXT
            TAB-PUR_GROUP = itab1-value.
          when '0007'. "LTEXT
            TAB-VENDOR = itab1-value.
          when '0008'. "LTEXT
            TAB-PMNTTRMS = itab1-value.
          when '0009'. "LTEXT
            TAB-INCOTERMS1 = itab1-value.
          when '0010'. "FTTYPE
            TAB-INCOTERMS2 = itab1-value.
          when '0011'. "FTTYPE
            TAB-PO_ITEM = itab1-value.
          when '0012'. "FTTYPE
            TAB-MATERIAL = itab1-value.
          when '0013'. "FTTYPE
            TAB-PUR_MAT = itab1-value.
          when '0014'. "FTTYPE
            TAB-ITEM_CAT = itab1-value.
          when '0015'. "FTTYPE
            shift itab1-value left deleting leading space.
            TAB-PLANT = itab1-value.
          when '0016'. "FTTYPE
            TAB-NET_PRICE = itab1-value.
          when '0017'. "FTTYPE
            TAB-TAX_CODE = itab1-value.
          when '0018'. "FTTYPE
            TAB-DELIV_DATE = itab1-value.
          when '0019'. "FTTYPE
            TAB-QUANTITY = itab1-value.
        endcase.
      endloop.
      append tab.
      clear tab.
      sort tab by PO_NUMBER.
      DELETE TAB WHERE PO_NUMBER = SPACE.
      loop at tab.
        CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
          EXPORTING
            INPUT  = tab-material
          IMPORTING
            OUTPUT = tab-material.
        CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
          EXPORTING
            INPUT  = tab-PUR_MAT
          IMPORTING
            OUTPUT = tab-PUR_MAT.
        CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
          EXPORTING
            INPUT  = tab-vendor
          IMPORTING
            OUTPUT = tab-vendor.
        concatenate tab-doc_DATE+4(4) tab-doc_DATE+2(2)
    tab-doc_DATE+0(2)
    into tab-doc_DATE.
        concatenate tab-DELIV_DATE+4(4)
    tab-DELIV_DATE+2(2)
    tab-DELIV_DATE+0(2) into tab-DELIV_DATE.
        pono = tab-PO_NUMBER.
        if tab-po_number = pono.
          PO_HEADER-DOC_DATE = tab-DOC_DATE.
          PO_HEADER-DOC_TYPE = tab-DOC_TYPE.
          PO_HEADER-CO_CODE  = tab-CO_CODE.
          PO_HEADER-PURCH_ORG = tab-PURCH_ORG.
          PO_HEADER-PUR_GROUP = tab-PUR_GROUP.
          PO_HEADER-VENDOR = tab-VENDOR.
          PO_HEADER-PO_NUMBER = tab-PO_NUMBER.
          PO_HEADER_ADD_DATA-PMNTTRMS = tab-PMNTTRMS.
          PO_HEADER_ADD_DATA-INCOTERMS1 = tab-INCOTERMS1.
          PO_HEADER_ADD_DATA-INCOTERMS2 = tab-INCOTERMS2.
          PO_ITEMS-PO_ITEM = tab-PO_ITEM.
          PO_ITEMS-MATERIAL = tab-MATERIAL.
          PO_ITEMS-PUR_MAT = tab-PUR_MAT.
          PO_ITEMS-ITEM_CAT = tab-ITEM_CAT.
          PO_ITEMS-PLANT = tab-PLANT.
          PO_ITEMS-NET_PRICE = tab-NET_PRICE.
          PO_ITEMS-TAX_CODE = tab-TAX_CODE.
          append po_items.
          PO_ITEM_SCHEDULES-PO_ITEM = tab-PO_ITEM.
          PO_ITEM_SCHEDULES-DELIV_DATE = tab-DELIV_DATE.
          PO_ITEM_SCHEDULES-QUANTITY =  tab-QUANTITY.
          append PO_ITEM_SCHEDULES.
        endif.
        at end of PO_NUMBER.
          CALL FUNCTION 'BAPI_PO_CREATE'
            EXPORTING
              PO_HEADER                        = PO_HEADER
             PO_HEADER_ADD_DATA               =
    PO_HEADER_ADD_DATA
    *           HEADER_ADD_DATA_RELEVANT         =
    *           PO_ADDRESS                       =
    *           SKIP_ITEMS_WITH_ERROR            = 'X'
    *           ITEM_ADD_DATA_RELEVANT           =
    *           HEADER_TECH_FIELDS               =
           IMPORTING
             PURCHASEORDER                    =
    PURCHASEORDER
            TABLES
              PO_ITEMS                         = PO_ITEMS
    *           PO_ITEM_ADD_DATA                 =
              PO_ITEM_SCHEDULES                =
    PO_ITEM_SCHEDULES
    *           PO_ITEM_ACCOUNT_ASSIGNMENT       =
    *           PO_ITEM_TEXT                     =
             RETURN                            = RETURN
    *           PO_LIMITS                        =
    *           PO_CONTRACT_LIMITS               =
    *           PO_SERVICES                      =
    *           PO_SRV_ACCASS_VALUES             =
    *           PO_SERVICES_TEXT                 =
    *           PO_BUSINESS_PARTNER              =
    *           EXTENSIONIN                      =
    *           POADDRDELIVERY                   =
          if PURCHASEORDER <> space.
            commit work.
            ADD 1 TO gd_update.
            it_success-PURCHASEORDER = PURCHASEORDER.
            append it_success.
    clear:PO_HEADER,PO_HEADER_ADD_DATA,PURCHASEORDER.
            refresh : PO_ITEMS,PO_ITEM_SCHEDULES,RETURN.
          ELSE.
            loop at return.
              it_error-pono = tab-PO_NUMBER.
              it_error-err_msg = return-MESSAGE .
              Append it_error.
            ENDLOOP.
    clear:PO_HEADER,PO_HEADER_ADD_DATA,PURCHASEORDER.
            refresh : PO_ITEMS,PO_ITEM_SCHEDULES,RETURN.
          endif.
        endat.
      endloop.
      DESCRIBE TABLE it_success LINES gd_lines.
      IF gd_lines GT 0.
    *     Display result report column headings
        PERFORM display_column_headings.
    *     Display result report
        PERFORM DISPLAY_SUCESS.
      ENDIF.
    * IF SUCESS FAILS Display Error Report
      DESCRIBE TABLE it_error LINES gd_lines.
      IF gd_lines GT 0.
        PERFORM errorheadings.
        PERFORM errorreport.
      ENDIF.
    *&      Form  display_column_headings
    *       text
    FORM display_column_headings.
      WRITE:2 ' Success Report '(014) COLOR COL_POSITIVE.
      SKIP.
      WRITE:2 'The following records inserted
    successfully:'(013).
      WRITE:/ sy-uline(15).
      FORMAT COLOR COL_HEADING.
      WRITE:/      sy-vline,
               (10) 'Purchase order'(004), sy-vline.
      WRITE:/ sy-uline(15).
    ENDFORM.                    "display_column_headings
    *Subroutine to display SUCESS REPORT
    FORM DISPLAY_SUCESS.
      FORMAT COLOR COL_NORMAL.
      LOOP AT it_success.
        WRITE:/      sy-vline,
            (10)  it_success-PURCHASEORDER, sy-vline.
        CLEAR it_success.
      ENDLOOP.
      WRITE:/ sy-uline(15).
      REFRESH: it_success.
      FORMAT COLOR COL_BACKGROUND.
    ENDFORM.                               "
    DISPLAY_REPORT
    *&      Form  errorreport
    *       text
    FORM errorreport.
      LOOP AT it_error.
        WRITE:/      sy-vline,
                (10) it_error-pono, sy-vline,
                 (40) it_error-err_msg, sy-vline.
      ENDLOOP.
      WRITE:/ sy-uline(104).
      REFRESH: it_error.
    endform.                    "errorreport
    *&      Form  ERRORHEADINGS
    *       text
    FORM ERRORHEADINGS.
      SKIP.
      WRITE:2 ' Error Report '(007) COLOR COL_NEGATIVE.
      SKIP.
      WRITE:2 'The following records failed during
    update:'(008).
      WRITE:/ sy-uline(104).
      FORMAT COLOR COL_HEADING.
      WRITE:/      sy-vline,
              (10) 'ERROR.'(009), sy-vline.
      WRITE:/ sy-uline(104).
      FORMAT COLOR COL_NORMAL.
    ENDFORM.                    "ERRORHEADINGS
    **&      Form  value_help
    **       text
    **  -->  p1        text
    **  <--  p2        text
    FORM value_help .
      CALL FUNCTION 'DSVAS_DOC_WS_FILENAME_GET_50'
        EXPORTING
          DEF_FILENAME     = ' '
          DEF_PATH         = ' '
          MASK             = ',*.*,*.*.'
          MODE             = 'O'
          TITLE            = ' '
        IMPORTING
          FILENAME         = p_infile
        EXCEPTIONS
          INV_WINSYS       = 1
          NO_BATCH         = 2
          SELECTION_CANCEL = 3
          SELECTION_ERROR  = 4
          OTHERS           = 5.
      IF sy-subrc <> 0.
    * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    *         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
    endform.                    "value_help

  • How can I add attachment files – or photos – to my created Adobe reader XI files?

    How can I add attachment files – or photos – to my created Adobe reader XI files?

    Hi adel ghonim,
    You can add images following the instructions in this Help article: Adobe Acrobat X Standard * Paste images as comments.
    You can also add attachments by clicking the paperclip icon in the left column of the Acrobat window...
    Please let me know if you need further assistance.
    Best,
    Sara

  • How to view an attachment (in this forum)?

    http://forums.adobe.com/thread/419236 - the poster inserted a jpg attachment, but I cannot find how to view that attachment. Left-clicking, right-clicking, double-clicking... all does not do anything?
    Does anybody here know how to view an attachment in this new forum?
    P.S. just for fun I am also attaching a jpg file with this post.

    - this one works? I wonder why it doesn't work in the other post; it says QUEUED.

  • Arabic is not listed as a display language in iTunes for Windows 7. How can I add support for this language?

    Arabic is not listed as a display language in iTunes for Windows 7. How can I add support for this language?

    Edit  ---> referance ----->   general    ------> language

  • How to use parrallel cursor in this code

    hi can anyone expalin me how to use parallel cursor for this code ... 
    loop at itabkpf.
          read table ibsegpar_fu with key
                     belnr = itabkpf-belnr
                     gjahr = itabkpf-gjahr
                     bschl = '25' .
    Start insert by Pradeep 20082008
          sort: itabkpf by belnr,
                itabsegpar by belnr.
    End insert by Pradeep 20082008
          if sy-subrc = 0. "Deleted by pradeep 20082008
            select bukrs belnr gjahr bschl koart lifnr wrbtr
                   wskto pswbt zfbdt augbl augdt sgtxt rebzg rebzj
                   into corresponding
                   fields of table ibsegpar_fu_1 from bseg
                   where bukrs = itabkpf-bukrs and
                   belnr = itabkpf-belnr and
                   gjahr = itabkpf-gjahr and
                   augbl <> itabkpf-belnr and
                   rebzg <> space and
                   bschl = '25'.
            loop at ibsegpar_fu_1.
    Start insert by Pradeep 20082008
              sort ibsegpar_fu_1 by belnr.
    End insert by Pradeep 20082008
              move-corresponding ibsegpar_fu_1 to itabseg.
              move ibsegpar_fu_1-belnr to itabseg-augbl.
              move ibsegpar_fu_1-rebzg to itabseg-belnr.
              move ibsegpar_fu_1-rebzj to itabseg-gjahr.
    *********to include code to pick the description for partical payment
              select single * from bseg where
                  bukrs = ibsegpar_fu_1-bukrs and
                  belnr = ibsegpar_fu_1-belnr and
                  gjahr = ibsegpar_fu_1-gjahr and
                  augbl <> ibsegpar_fu_1-belnr and
                  rebzg = space and
                  bschl <> '25'.
              move bseg-sgtxt to itabseg-sgtxt.
              clear bseg.
    *********end of code
              itabseg-wrbtr = itabseg-wrbtr * -1.
              itabseg-pswbt = itabseg-pswbt * -1.
              select single budat into lsdat from
                   bkpf where bukrs = ibsegpar_fu_1-bukrs and
                   belnr = ibsegpar_fu_1-rebzg and
                   gjahr = ibsegpar_fu_1-rebzj.
              if sy-subrc = 0.
                move lsdat to itabseg-zfbdt.
              endif.
              append itabseg.
            endloop.
          endif. "Deleted by Pradeep 20082008
        endloop.
        loop at ibsegpar_fu.
          sort ibsegpar_fu by belnr. " insert by pradeep
          move-corresponding ibsegpar_fu to itabseg.
          select bukrs belnr gjahr bschl koart lifnr wrbtr
                 rebzg rebzj sgtxt into corresponding
                 fields of table ibsegpar_fu_1 from bseg
                 where  bukrs = ibsegpar_fu-bukrs and
                 gjahr = ibsegpar_fu-gjahr and
                 augbl = ibsegpar_fu-belnr and  " Pradeep 20082008 Delete
                augbl <> ibsegpar_fu-belnr and " Pradeep 20082008 Insert
                 rebzg = space and
                 bschl = '25'.
          if sy-subrc = 0.
            loop at ibsegpar_fu_1.
              move ibsegpar_fu_1-rebzg to itabseg-rebzg.
              move ibsegpar_fu_1-rebzj to itabseg-rebzj.
            endloop.
            move ibsegpar_fu-belnr to itabseg-augbl.
            move itabseg-rebzg to itabseg-belnr.
            move itabseg-rebzj to itabseg-gjahr.
            itabseg-wrbtr = itabseg-wrbtr * -1.
            itabseg-pswbt = itabseg-pswbt * -1.
            select single budat into lsdat from
                 bkpf where bukrs = ibsegpar_fu-bukrs and
                 belnr = itabseg-rebzj and
                 gjahr = itabseg-rebzj.
            if sy-subrc = 0.
              move lsdat to itabseg-zfbdt.
            endif.
            append itabseg.
            read table itabseg with key
                 belnr = itabseg-rebzg
                 gjahr = itabseg-rebzj
                 bschl = '31' .
            if sy-subrc = 0.
             delete itabseg index sy-tabix. "Deleted by Pradeep 20082108
            endif.
          endif.
        endloop.
    Start insert by Pradeep 20082008
         loop at itabseg.
          if itabseg-belnr = itabseg-augbl.
            delete itabseg.
          elseif itabseg-belnr = ' '.
            delete itabseg.
          endif.
        endloop.
    End insert by Pradeep 20082008

    hi can anyone expalin me how to use parallel cursor for this code ... 
    loop at itabkpf.
          read table ibsegpar_fu with key
                     belnr = itabkpf-belnr
                     gjahr = itabkpf-gjahr
                     bschl = '25' .
    Start insert by Pradeep 20082008
          sort: itabkpf by belnr,
                itabsegpar by belnr.
    End insert by Pradeep 20082008
          if sy-subrc = 0. "Deleted by pradeep 20082008
            select bukrs belnr gjahr bschl koart lifnr wrbtr
                   wskto pswbt zfbdt augbl augdt sgtxt rebzg rebzj
                   into corresponding
                   fields of table ibsegpar_fu_1 from bseg
                   where bukrs = itabkpf-bukrs and
                   belnr = itabkpf-belnr and
                   gjahr = itabkpf-gjahr and
                   augbl <> itabkpf-belnr and
                   rebzg <> space and
                   bschl = '25'.
            loop at ibsegpar_fu_1.
    Start insert by Pradeep 20082008
              sort ibsegpar_fu_1 by belnr.
    End insert by Pradeep 20082008
              move-corresponding ibsegpar_fu_1 to itabseg.
              move ibsegpar_fu_1-belnr to itabseg-augbl.
              move ibsegpar_fu_1-rebzg to itabseg-belnr.
              move ibsegpar_fu_1-rebzj to itabseg-gjahr.
    *********to include code to pick the description for partical payment
              select single * from bseg where
                  bukrs = ibsegpar_fu_1-bukrs and
                  belnr = ibsegpar_fu_1-belnr and
                  gjahr = ibsegpar_fu_1-gjahr and
                  augbl <> ibsegpar_fu_1-belnr and
                  rebzg = space and
                  bschl <> '25'.
              move bseg-sgtxt to itabseg-sgtxt.
              clear bseg.
    *********end of code
              itabseg-wrbtr = itabseg-wrbtr * -1.
              itabseg-pswbt = itabseg-pswbt * -1.
              select single budat into lsdat from
                   bkpf where bukrs = ibsegpar_fu_1-bukrs and
                   belnr = ibsegpar_fu_1-rebzg and
                   gjahr = ibsegpar_fu_1-rebzj.
              if sy-subrc = 0.
                move lsdat to itabseg-zfbdt.
              endif.
              append itabseg.
            endloop.
          endif. "Deleted by Pradeep 20082008
        endloop.
        loop at ibsegpar_fu.
          sort ibsegpar_fu by belnr. " insert by pradeep
          move-corresponding ibsegpar_fu to itabseg.
          select bukrs belnr gjahr bschl koart lifnr wrbtr
                 rebzg rebzj sgtxt into corresponding
                 fields of table ibsegpar_fu_1 from bseg
                 where  bukrs = ibsegpar_fu-bukrs and
                 gjahr = ibsegpar_fu-gjahr and
                 augbl = ibsegpar_fu-belnr and  " Pradeep 20082008 Delete
                augbl <> ibsegpar_fu-belnr and " Pradeep 20082008 Insert
                 rebzg = space and
                 bschl = '25'.
          if sy-subrc = 0.
            loop at ibsegpar_fu_1.
              move ibsegpar_fu_1-rebzg to itabseg-rebzg.
              move ibsegpar_fu_1-rebzj to itabseg-rebzj.
            endloop.
            move ibsegpar_fu-belnr to itabseg-augbl.
            move itabseg-rebzg to itabseg-belnr.
            move itabseg-rebzj to itabseg-gjahr.
            itabseg-wrbtr = itabseg-wrbtr * -1.
            itabseg-pswbt = itabseg-pswbt * -1.
            select single budat into lsdat from
                 bkpf where bukrs = ibsegpar_fu-bukrs and
                 belnr = itabseg-rebzj and
                 gjahr = itabseg-rebzj.
            if sy-subrc = 0.
              move lsdat to itabseg-zfbdt.
            endif.
            append itabseg.
            read table itabseg with key
                 belnr = itabseg-rebzg
                 gjahr = itabseg-rebzj
                 bschl = '31' .
            if sy-subrc = 0.
             delete itabseg index sy-tabix. "Deleted by Pradeep 20082108
            endif.
          endif.
        endloop.
    Start insert by Pradeep 20082008
         loop at itabseg.
          if itabseg-belnr = itabseg-augbl.
            delete itabseg.
          elseif itabseg-belnr = ' '.
            delete itabseg.
          endif.
        endloop.
    End insert by Pradeep 20082008

  • How could I add a spanish voice from text-to-Speech?

    I like the text-to-speech function. But there is no Spanish Voice. How could I add  a Spanish voice to it? I use Captivate 5.5.
    Your reply will be greatly appreciated.

    Using iPhone, iPad, or iPod with multiple computers - http://support.apple.com/kb/HT1202 - You can manage your iPhone, iPad, or iPod with multiple computers as long as you have set the device to "Manually manage music."  -  E.g., adding music from a second computer to an i-device. Additional information about switching sync mode - https://discussions.apple.com/thread/4435531 and manually adding in iTunes 11 https://discussions.apple.com/thread/4597408

  • How could we add fields in web ui

    Hello Expert,
    Could  any body say that how could I add new field in Web UI... Please revert...
    Thanks
    Satish Lath

    Hi Satish,
    What Silpa has replied is the approach to bring an existing field into webui. If you have a requirement to add a new field then you can do it either through AET or EEWB.
    http://wiki.sdn.sap.com/wiki/display/CRM/EEWB-AddingTableattribute
    /people/vikash.krishna/blog/2009/07/14/crm-70-how-to--4-adding-custom-fields-with-the-new-application-enhancement-tool-aet
    Follow the above blogs to know more about EEWB and AET.
    Thanks,
    Raman

  • How could I add a new pakage to JDK

    I want to import org.appache.fop.apps.*;(fop.jar) in my program, and how could I add these pakages to JDK.
    Thanks for help.

    Remember, when you upgrade JDK you will need to do the copy again. You may want to consider keeping your packages separate from JDK.
    Ron 8)

  • I have a huge amount of my memory used by 'other' than photos and music - to my knowledge, there is nothing there apart from a few songs and photos and 5 podcasts. What could it be? How could I get rid of this 'other' stuff and get the memory back?

    I have a huge amount of my memory used by 'other' than photos and music - to my knowledge, there is nothing there apart from a few songs and photos and 5 podcasts. What could it be? How could I get rid of this 'other' stuff and get the memory back?

    See -> What is "Other" and what can I do about it? by Kappy.
    Clinton

  • Is it possible to add additional features, such as I had in iTunes? What I mean is: how could I add comments for example of an ebook; or the publisher?

    Is it possible to add additional features, such as I had in iTunes? What I mean is: how could I add comments for example of an ebook; or the publisher?

    Many thanks Brett, but probably I wasn't clear enough about my problem.
    I know that I'm able to include some notes, or to highlight paragraph; what I want to know if is it possible to make a summary of the book; or add additional features such as Publisher, if I read or not; language, etc. And show in the information for each book … In the application there's only: title, author, genre … How can add additional features as a reference for the ebook as a whole, and see them at the same level of the author, genre, etc.
    For example
    BOOK A          AUTHOR BRETT L     PHILOSOPHY     ENGLISH     TO READ     iTUNES STORE    
    The first three items are the default items … what I want to include is the others (as an example) … And create a box or something to make a summary of the book.
    Sorry for the bothering … but I was (and I suppose I'm not the only one) very comfortable with iTunes format for Music; but iBooks lost quite everything compared to iTunes; and it looks like a mere Kindle application.
    Many thanks in advance
    Gerardo Garcia Gorostidi

  • I need help, How could I add Aliases to Local Administrator account via terminal commands???

    I need help, How could I add Aliases to Local Administrator account via terminal commands???
    I want to use commands to add alias for existing administrator account remotly by using ARD.
    Thanks.

    Hi,
    a Windows Domain Controller does not have any local user or groups. So you might add the user to the admin group at Domain level.
    B RGDS,
    Gregor
    Edited by: Gregor Gasper on Jan 9, 2009 1:44 PM

  • How could I ADD ITEM by using API

    Hi,
    I have Portal 9.0.3 installed.
    I want to call wwsbr_api from a javascript code (HTML portlet) to add a text item to a region, but I have some problem using this API:
    1; I don't know how could I get the p_caid, the p_folder_id and the region_id
    I found out that p_caid can be find WWSBR_SITES.ID. Is this correct?
    2; when I've tried to call this API from address line I've got a 404 ERROR (but it might have been casued by the wrong attribute values)
    So I need to know:
    - How could I find out the correct IDs?
    - How could I call wwsbr_api.add_item function from a javascript?
    Thanks for your help!
    THE BOOGIE IS OVER

    WWSBR_API is currently not supported in Portal Release 2 (902). Support for this API will return in the next version (9.0.2.6, planned for early 2003).
    Regards,
    Portal Product Manager

  • How to optimize the performance of this code ?

    I've two Movie clips on a flash project. One of them is fixed and the other can be moved by arrow buttons on the keyboard. The two Movie clips have irregular shapes, so HitTestObject and HitTestPoint doesn't work very well. I've a function that detects collision of two movie clips using bitmap. I wanted to update the position of the movable Movie clip so I put the collision detection function under the code of ENTER_FRAME event listener. It works very well, but when I add many fixed movie clips  ( about 10 fixed movie clips in one frame ), the game (.swf file) becomes slower and the performance of the PC becomes slower. I thought that my collision detection function has a negative effect on PC performance so I used the class on this page : https://forums.adobe.com/thread/873737
    but the same thing happens.
    Would you tell me how to speed up the execution of my codes ?
    Here is part of my code :
    stage.addEventListener(Event.ENTER_FRAME, myOnEnterFrame);
    function myOnEnterFrame(event:Event):void
      if (doThisFn) // doThisFn is a variable to allow or prevent the movable movie clip form being moved with keyboard arrows
      if ( left && !right ) {
      player.x -= speed;
      player.rotation = player.rotation - speed ;
      if( right && !left ) {
      player.x += speed;
      player.rotation = player.rotation + speed ;
    if( up && !down ) {
      player.y -= speed;
    if( down && !up ) {
      player.y += speed;
    // The fixed movie clips are wall1 ,wall2 , wall3 , wall4 , ... and so on
    // the following code checks how many walls exists on each frame and pushes them into the wallA  array
      for(var i:int=0;i<1000;i++) // We can put up to 1000 wall object into the wallA array
      if(this['wall'+i]) // If the object wall exists, push it into the wallA array
      wallA.push(this['wall'+i]);
      for(i=0;i<wallA.length;i++)
      if( h.hitF (player , wallA[i] ) || gameOverTest ) // This code checks if the player ( the movable movie clip ) hits the walls or not
      trace ( "second try" ) ;
      gameOver.visible = true ;
      doThisFn = false ;
    //I think the following codes are easy to excite and run. I think the performance issue is due to previous codes.
      if (player.hitTestObject(door))
      win.visible = true ;
      doThisFn = false ;
      if (key) // if there is a key on frame
      if (player.hitTestObject(key))
      key.visible = false ;
      switch( currentFrame )
      case 4:
      wallA[0].visible = false ;
      wallA[0].x = 50000;
      break;
      case 5:
      wall14.play();
      wall8.x = 430 ;
      break;

    it's a simple question that usually has no simple answer.
    here's an excerpt from a book (Flash Game Development: In a Social, Mobile and 3D World)  i wrote.
    Optimization Techniques
    Unfortunately, I know of no completely satisfactory way to organize this information. In what follows, I discuss memory management first with sub-topics listed in alphabetical order. Then I discuss CPU/GPU management with sub-topics listed in alphabetical order.
    That may seem logical but there are, at least, two problems with that organization.
    1. I do not believe it is the most helpful way to organize this information.
    2. Memory management affects CPU/GPU usage, so everything in the Memory Management section could also be listed in the CPU/GPU section.
    Anyway, I am going to also list the information two other ways, from easiest to hardest to implement and from greatest to least benefit.
    Both of those later listings are subjective and are dependent on developer experience and capabilities, as well as, the test situation and test environment. I very much doubt there would be a consensus on ordering of these lists.  Nevertheless, I think they still are worthwhile.
    Easiest to Hardest to Implement
    1.  Do not use Filters.
    2.  Always use reverse for-loops and avoid do-loops and avoid while-loops.
    3.  Explicitly stop Timers to ready them for gc (garbage collection).
    4.  Use weak event listeners and remove listeners.
    5.  Strictly type variables whenever possible.
    6.  Explicitly disable mouse interactivity when mouse interactivity not needed.
    7.  Replace dispatchEvents with callback functions whenever possible.
    8.  Stop Sounds to enable Sounds and SoundChannels to be gc'd.
    9.  Use the most basic DisplayObject needed.
    10. Always use cacheAsBitmap and cacheAsBitmapMatrix with air apps (i.e., mobile devices).
    11. Reuse Objects whenever possible.
    12. Event.ENTER_FRAME loops: Use different listeners and different listener functions applied to as few DisplayObjects as possible.
    13. Pool Objects instead of creating and gc'ing Objects.
    14. Use partial blitting.
    15. Use stage blitting.
    16. Use Stage3D
    Greatest to Least Benefit
    Use stage blitting (if there is enough system memory).
    Use Stage3D.
    Use partial blitting.
    Use cacheAsBitmap and cacheAsBitmapMatrix with mobile devices.
    Explicitly disable mouse interactivity when mouse interactivity not needed.
    Do not use Filters.
    Use the most basic DisplayObject needed.
    Reuse Objects whenever possible.
    Event.ENTER_FRAME loops: Use different listeners and different listener functions applied to as few DisplayObjects as possible.
    Use reverse for-loops and avoid do-loops and while-loops.
    Pool Objects instead of creating and gc'ing Objects.
    Strictly type variables whenever possible.
    Use weak event listeners and remove listeners.
    Replace dispatchEvents with callback functions whenever possible.
    Explicitly stop Timers to ready for gc.
      16. Stop Sounds to enable Sounds and SoundChannels to be gc'd.

Maybe you are looking for

  • Can I transfer apps on an ipad account to another account?

    Okay so on our ipad, the account that was there to download apps and games are my mom's account and I also bought some games since she let me and lets me use her ipad and buy things on it. but i want to make a new account with my own email (well i cu

  • Install for Dr

    Hi i got my Audigy from a friend and theres no install manual and i need help getting the front part of it in(the part that goes under the CD dri've) so can someone link me a good install?

  • Approved purchase did not download.

    My daughter requested/purchased a song from iTunes, I got the notice and approved the purchase, but the song did not download. How do we get a refund, or get the song to download (it did not appear on my computer either).

  • After importing cd can you delete the songs from the computer? PLEASE HELP!

    I have imported 100 cds and my computer memory is about to go! so i need to delete some of the cds. If i delete them from the computer will they still be on my ipod or is there a way I can keep the ipod songs on? Please help!!!!!!

  • SRS-X7 ClearAudio+

    Where is the clearaudio+ feature on the SRS-X7? The SRS-X5 has a button on top of the unit, but I don't see it in pictures for the SRS-X7. I would like to be able to use this device using bluetooth without needing any aditional software, like I can w