Sending failed idocs through Mail adapter or Alerts

Hi Friends,
I am working on File to IDoc scenario ,where we have some 35 interfaces.
My requirement is to send only failed idocs thru email to concerned users and IT Head immeditely.
Could anyone suggest or let me know how to achieve this requirement.
Can it be done thru alert config .. Pl suggest.
Thanks & Regards,
Suman

Hi
If it is failed in Adapter engine or in Integration engine u can raise an alert by using Transaction codes ALRTCATDEF and by configuring in RWB Alert configuration.
Go through Michael blogs you will get good idea.
The specified item was not found.
The specified item was not found.
You can call alerts using Function module also. Go through Stefan grube blog
Regards.
G.Jayaram
Edited by: jayaram garikapati on Jul 27, 2008 2:01 PM

Similar Messages

Sending Text File through Mail Adapter

Hi Group,
I need to send my Target as Mail attachment in the Text File?Can any body Suggest

Hi swabap,
You need to use PayloadSwapBean module in the Mail receiver adapter. This module will send the payload as an attchment to the mail server.
Check the following link
<a href="/people/prasad.ulagappan2/blog/2005/06/07/mail-adapter-scenarios-150-sap-exchange-infrastructure:///people/prasad.ulagappan2/blog/2005/06/07/mail-adapter-scenarios-150-sap-exchange-infrastructure
Regards,
Akshay

How to send file with original name through Mail adapter

I have to send file with original name as attachment through Mail Adapter. I am picking the file from FTP server through File Adapter. I am not using message mapping because files do not have any standard format.

Hi,
Have you solve your problem ?...
I have exactly the same scenario : pik up a file (file adapter) and send it in attachment by mail adapter without mapping (no IR)...
I activated Adapter specific paramters properties in the File adapter sender and i can see the FileName tag in DynamicConfiguration section of SoapHeader in SXMB_MONI...
I want to use MessageTransformationBean... BUT, how can i 'access' to FileName tag ???...
Thanks...
I setup modules like this :
AF_Modules/DynamicConfigurationBean 1
AF_Modules/MessageTransformBean rename
sap.com/com.sap.aii.adapter.mail.app/XIMailAdapterBean mail
1 key.0 write http://sap.com/xi/XI/System/File FileName
1 value.0 message.FileName
rename Transform.ContentDisposition attachment;filename=message.FileName
rename Transform.ContentDescription message.FileName
rename Transform.ContentType application/csv-tab-delimited-table;name=message.FileName
But my file name attachment is message.FileName....
Edited by: Emmanuel JORAND on Sep 29, 2008 9:23 PM
Edited by: Emmanuel JORAND on Sep 29, 2008 10:25 PM

Error while sending PO output through mail in PDF format - Urgent

Dear friends,
Developed program to send sapscript output through mail in pdf format, the program running properly, even function module SO_NEW_DOCUMENT_ATT_SEND_API1 returning sy-subrc 0. But the external mail is not going to user lying in SAP outbox with message <b>"Wait for communications service"</b> . SCOT is properly configured, tested mails sending through SAP office.
Find below the source code:
REPORT zmm_porder_gm
            NO STANDARD PAGE HEADING.
TABLES: ekko, ekpa, t161t, t052, komv, j_1imocomp, t001, esll.
Internal Tables
DATA : txt LIKE tline-tdline, "HEADER LINE
       your_ref LIKE ekko-ihrez, "your ref
       our_ref LIKE ekko-unsez, "our ref
       mcompname LIKE t001-butxt,
       itemname   LIKE ekpo-txz01,
       del_text LIKE tline-tdline, "delivery text
       mat_po_text LIKE tline-tdline. "material po text
DATA: g_ind TYPE i.
DATA: it_esll LIKE esll OCCURS 0 WITH HEADER LINE.
DATA: sub_packno LIKE esll-sub_packno.
DATA : po_flag(1) TYPE c.
DATA : it_erev LIKE erev OCCURS 0 WITH HEADER LINE.
DATA : nmebeln LIKE thead-tdname,
       obj LIKE thead-tdname.
DATA : tline LIKE tline OCCURS 0 WITH HEADER LINE. "HEADER TEXT
DATA : it_ekko LIKE ekko OCCURS 0 WITH HEADER LINE.
DATA : it_ekpo LIKE ekpo OCCURS 0 WITH HEADER LINE.
DATA : it_zmm_porder LIKE zmm_porder OCCURS 0 WITH HEADER LINE.
DATA : it_konv        LIKE konv OCCURS 0 WITH HEADER LINE.
DATA : it_konv_ftr    LIKE konv OCCURS 0 WITH HEADER LINE.
DATA : it_konv_rate   LIKE konv OCCURS 0 WITH HEADER LINE.
DATA : it_komv_tax    LIKE komv OCCURS 0 WITH HEADER LINE.           " For Tax Calculation
DATA : it_zmm_house_bank LIKE zmm_house_bank OCCURS 0 WITH HEADER LINE.
*DATA : mrate TYPE konv-kbetr VALUE 0, mrate1(15). rmoved by ganes and added following logic
DATA : mrate TYPE p VALUE 0 DECIMALS 2, mrate1(15).
DATA : mrate_gm TYPE p DECIMALS 2.
DATA : BEGIN OF it_konv1 OCCURS 0,
              knumv LIKE konv-knumv,
              kschl LIKE konv-kschl,
END OF it_konv1.
DATA : BEGIN OF it_t052u OCCURS 0.
        INCLUDE STRUCTURE t052u.
DATA : END OF it_t052u.
DATA : mpay_terms LIKE t052u-text1.
DATA : mwaers     LIKE konv-waers.
DATA : BEGIN OF xt052 OCCURS 0.
        INCLUDE STRUCTURE t052.
DATA : END OF xt052.
DATA : it_t16ct LIKE t16ct OCCURS 0 WITH HEADER LINE.
DATA : BEGIN OF ztext OCCURS 0.
        INCLUDE STRUCTURE ttext.
DATA : END OF ztext.
DATA : it_t001      LIKE t001 OCCURS 0 WITH HEADER LINE.
DATA : mtext(15)    TYPE c.
DATA : it_adrc      LIKE adrc OCCURS 0 WITH HEADER LINE.
DATA : it_adrc_ven LIKE adrc OCCURS 0 WITH HEADER LINE.
DATA : it_adrc_plt LIKE adrc OCCURS 0 WITH HEADER LINE.
DATA : it_makt      LIKE makt OCCURS 0 WITH HEADER LINE.
DATA : it_eket      LIKE eket OCCURS 0 WITH HEADER LINE.               " Schedulling
DATA : it_eikp      LIKE eikp OCCURS 0 WITH HEADER LINE.               " Export
DATA : it_t001w     LIKE t001w OCCURS 0 WITH HEADER LINE.
DATA : it_t685t     LIKE t685t OCCURS 0 WITH HEADER LINE.
DATA : it_t618t     LIKE t618t OCCURS 0 WITH HEADER LINE.
DATA : it_t685t_ftr LIKE t685t OCCURS 0 WITH HEADER LINE.
DATA : it_lfa1 LIKE lfa1 OCCURS 0 WITH HEADER LINE.
DATA : it_bapi_mltx_ga LIKE bapi_mltx_ga OCCURS 0 WITH HEADER LINE. "Material long text
DATA : mfirst   TYPE i VALUE 0,
       mpay_flag(1) TYPE c VALUE 'X',
       mwerks   LIKE    t001w-werks,
       msr      TYPE i VALUE 0,
       l_rate   TYPE p DECIMALS 2 VALUE 0,
       l_amt    TYPE p DECIMALS 2 VALUE 0,
       mflag(1) TYPE c,
       mlctr    TYPE i VALUE 0,
       mfamt    TYPE p DECIMALS 2 VALUE 0,
       mcfamt(15) TYPE c,
       mfword(100) TYPE c,
       mkschl   LIKE konv-kschl,
       mchgamt TYPE p DECIMALS 2 VALUE 0,
       mkbetr   TYPE p DECIMALS 2 VALUE 0,
       mkwert   TYPE p DECIMALS 2 VALUE 0.
DATA : j_1iexcd     TYPE j_1imocomp-j_1iexcd,
       j_1icstno    TYPE j_1imocomp-j_1icstno,
       j_1ilstno    TYPE j_1imocomp-j_1ilstno.
DATA : mjmop_r    TYPE p DECIMALS 2 VALUE 0,
       mjmoq_r    TYPE p DECIMALS 2 VALUE 0,
       mjecs_r    TYPE p DECIMALS 2 VALUE 0,
       mjvcs_r    TYPE p DECIMALS 2 VALUE 0,
       mjvrd_r    TYPE p DECIMALS 2 VALUE 0,
       mjsep_r    TYPE p DECIMALS 2 VALUE 0.
DATA : mjmop_a    TYPE p DECIMALS 2 VALUE 0,
       mjmoq_a    TYPE p DECIMALS 2 VALUE 0,
       mjecs_a    TYPE p DECIMALS 2 VALUE 0,
       mjvcs_a    TYPE p DECIMALS 2 VALUE 0,
       mjvrd_a    TYPE p DECIMALS 2 VALUE 0,
       mjsep_a    TYPE p DECIMALS 2 VALUE 0.
DATA : mtitle   LIKE t161t-batxt.
DATA :         no_ammend(10),request_by(50),ver_txt(100),ver_reason(100),stext(200).
begin of Email data declarations**************
DATA: BEGIN OF otf OCCURS 0.
        INCLUDE STRUCTURE itcoo .
DATA: END OF otf.
DATA: itcpo LIKE itcpo.
DATA: itcpp LIKE itcpp.
DATA: it_docs TYPE STANDARD TABLE OF docs,
      v_bin_filesize          TYPE i,
      it_lines TYPE STANDARD TABLE OF tline,
      wa_lines TYPE tline.
DATA : i_pdf LIKE tline OCCURS 1000 WITH HEADER LINE,
v_pdf_bytecount TYPE i,
v_pdf_spoolid TYPE tsp01-rqident,
v_otf_pagecount TYPE i,
v_btc_jobname TYPE tbtcjob-jobname,
v_btc_jobcount TYPE tbtcjob-jobcount.
DATA: objpack LIKE sopcklsti1 OCCURS 0 WITH HEADER LINE.
DATA: objhead LIKE solisti1 OCCURS 1 WITH HEADER LINE.
DATA: objbin LIKE solisti1 OCCURS 0 WITH HEADER LINE.
DATA: objtxt LIKE solisti1 OCCURS 10 WITH HEADER LINE.
DATA: reclist LIKE somlreci1 OCCURS 0 WITH HEADER LINE.
DATA: doc_chng LIKE sodocchgi1.
DATA: tab_lines LIKE sy-tabix.
DATA: vafilename(100) VALUE 'po_output.pdf'.
DATA: jobdata TYPE sxjobdata.
DATA arc_params TYPE arc_params.
DATA print_params TYPE pri_params.
DATA g_send_prog TYPE syrepid VALUE 'ZVF03_TEST_PROG'.
DATA immediate TYPE btcchar1.
DATA: i_jobname TYPE tbtcp-jobname,
i_jobcount TYPE tbtcp-jobcount,
i_jobstepcount TYPE tbtcp-stepcount.
DATA recipient_obj LIKE swotobjid.
CONSTANTS: sx_true TYPE sx_boolean VALUE 'X'.
TABLES: tbtcp.
end of Email data declarations**************
SELECTION-SCREEN : BEGIN OF BLOCK block1 WITH FRAME TITLE text-001.
SELECT-OPTIONS   : mebeln FOR ekko-ebeln OBLIGATORY .               " 75
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN POSITION 12.
SELECTION-SCREEN COMMENT (20) text-b01.
PARAMETERS: b1 AS CHECKBOX DEFAULT 'X'.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN : END OF BLOCK block1.
SELECTION-SCREEN: BEGIN OF SCREEN 200 TITLE text-001 AS WINDOW.
PARAMETERS : p_email TYPE ad_smtpadr.     "E-Mail Address
SELECTION-SCREEN: END OF SCREEN 200.
INITIALIZATION.
SET PF-STATUS 'ZMMPORD_STAT'.
AT SELECTION-SCREEN.
CASE sy-ucomm.
    WHEN 'EMAIL'.
      PERFORM zemail.
    WHEN '&IC1'.
      PERFORM load_data.
      PERFORM process.
      IF NOT p_email IS INITIAL.
        PERFORM send_mail.
      ENDIF.
ENDCASE.
*START-OF-SELECTION.
PERFORM load_data.
PERFORM process.
FORM load_data .
DATA : gindex LIKE sy-tabix.
SELECT * FROM t16ct INTO TABLE it_t16ct WHERE spras = 'EN'.
SELECT * FROM ekko INTO TABLE it_ekko WHERE ebeln IN mebeln.
IF sy-subrc EQ 0.
    SELECT * FROM erev INTO CORRESPONDING FIELDS OF TABLE it_erev FOR ALL ENTRIES IN it_ekko
    WHERE edokn = it_ekko-ebeln AND rscod <> '' .
    SORT it_erev BY edokn revno DESCENDING.
    LOOP AT it_ekko.
      IF NOT ( it_ekko-frgke EQ 'O' OR it_ekko-frgke EQ '0' ) .
        MESSAGE e000(zsd) WITH 'Purchase Order is not Realeased'.
      ENDIF.
    ENDLOOP.
    SELECT * FROM ekpo INTO TABLE it_ekpo WHERE ebeln IN mebeln.
    IF sy-subrc EQ 0.
      SELECT * INTO TABLE it_makt
      FROM   makt
      FOR    ALL ENTRIES IN it_ekpo
      WHERE matnr EQ it_ekpo-matnr.
      SELECT * INTO TABLE it_lfa1
      FROM   lfa1
      FOR    ALL ENTRIES IN it_ekko
      WHERE lifnr EQ it_ekko-lifnr.
    ENDIF.
    SELECT *
      INTO TABLE it_t052u
      FROM t052u
       FOR ALL ENTRIES IN it_ekko
     WHERE zterm EQ it_ekko-zterm
      AND spras EQ 'EN'.
    IF sy-subrc EQ 0.
      SORT it_t052u BY zterm.
    ENDIF.
    SELECT * FROM eket INTO TABLE it_eket WHERE ebeln IN mebeln.
    IF sy-subrc EQ 0.
      SORT it_eket BY ebeln ebelp.
    ENDIF.
    SELECT *
      INTO TABLE it_eikp
      FROM eikp
       FOR ALL ENTRIES IN it_ekko
     WHERE exnum EQ it_ekko-exnum.
    IF sy-subrc EQ 0.
      SORT it_eikp BY exnum.
      SELECT *
        INTO TABLE it_t618t
        FROM t618t
         FOR ALL ENTRIES IN it_eikp
       WHERE expvz EQ it_eikp-expvz
         AND spras EQ 'E'
         AND land1 EQ 'IN'.
      IF sy-subrc EQ 0.
        SORT it_t618t BY expvz.
      ENDIF.
    ENDIF.
    REFRESH : it_zmm_porder.
    CLEAR   : it_zmm_porder.
    SELECT * INTO TABLE it_zmm_porder
      FROM zmm_porder
     WHERE flag EQ 'L'.
    IF sy-subrc EQ 0.
      SORT it_zmm_porder BY kschl.
    ENDIF.
    SELECT * FROM konv INTO TABLE it_konv
    FOR ALL ENTRIES IN it_ekko
    WHERE knumv = it_ekko-knumv
      AND kwert NE 0.
    LOOP AT it_konv.
      gindex = sy-tabix.
      READ TABLE it_zmm_porder WITH KEY kschl = it_konv-kschl BINARY SEARCH.
      IF sy-subrc NE 0.
        DELETE it_konv INDEX gindex.
      ENDIF.
    ENDLOOP.
    IF sy-subrc EQ 0.
      SORT it_konv BY knumv kherk kschl.
    ENDIF.
    REFRESH : it_zmm_porder.
    CLEAR   : it_zmm_porder.
    SELECT * INTO TABLE it_zmm_porder
      FROM zmm_porder
     WHERE flag EQ 'F'.
    IF sy-subrc EQ 0.
      SORT it_zmm_porder BY kschl.
    ENDIF.
   SELECT * INTO TABLE IT_KONV_FTR FROM KONV
      FOR ALL ENTRIES IN IT_EKKO
     WHERE KNUMV = IT_EKKO-KNUMV
       AND ( KSCHL = 'ZIN1'
          OR KSCHL = 'ZIN2'
          OR KSCHL = 'ZINS'
          OR KSCHL = 'ZPF1'
          OR KSCHL = 'ZPF2'
          OR KSCHL = 'ZPF3'
          OR KSCHL = 'ZPKG'
          OR KSCHL = 'ZPKF'
          OR KSCHL = 'FRA1'
          OR KSCHL = 'FRB1'
          OR KSCHL = 'FRC1'
          OR KSCHL = 'FRD1'
          OR KSCHL = 'FRD2'
          OR KSCHL = 'FRD3'
          OR KSCHL = 'FRD4'
          OR KSCHL = 'FRD5'
*****Added one condition type below ZFBC as on 05.06.2007 :Rajiv as per mail of Sadiq via mathew sir(RTDK906646)
          OR KSCHL = 'ZFBC' )
       AND KWERT NE 0
       AND KPOSN GT '000000'.
      AND ( KRECH = 'B'                       " RTDK906167
       OR KRECH = 'A' ).
    SELECT * INTO TABLE it_konv_ftr FROM konv
       FOR ALL ENTRIES IN it_ekko
      WHERE knumv = it_ekko-knumv
        AND kwert NE 0
        AND kposn GT '000000'.
    LOOP AT it_konv_ftr.
      gindex = sy-tabix.
      READ TABLE it_zmm_porder WITH KEY kschl = it_konv_ftr-kschl BINARY SEARCH.
      IF sy-subrc NE 0.
        DELETE it_konv_ftr INDEX gindex.
      ENDIF.
    ENDLOOP.
    IF it_konv_ftr[] IS NOT INITIAL.
      SORT it_konv_ftr BY knumv kschl.
    ENDIF.
   SELECT KNUMV KSCHL INTO CORRESPONDING FIELDS OF TABLE IT_KONV1 FROM KONV
   FOR ALL ENTRIES IN IT_EKKO
   WHERE KNUMV = IT_EKKO-KNUMV
       and kherk = 'D'
     AND ( KSCHL = 'ZIN1'
        OR KSCHL = 'ZIN2'
        OR KSCHL = 'ZINS'
        OR KSCHL = 'ZPF1'
        OR KSCHL = 'ZPF2'
        OR KSCHL = 'ZPF3'
        OR KSCHL = 'ZPKG'
        OR KSCHL = 'ZPKF'
        OR KSCHL = 'FRA1'
        OR KSCHL = 'FRB1'
        OR KSCHL = 'FRC1'
        OR KSCHL = 'FRD1'
        OR KSCHL = 'FRD2'
        OR KSCHL = 'FRD3'
        OR KSCHL = 'FRD4'
        OR KSCHL = 'FRD5'
*****Added one condition type below ZFBC as on 05.06.2007 :Rajiv as per mail of Sadiq via mathew sir(RTDK906646)
        OR KSCHL = 'ZFBC' )
     AND KWERT NE 0.
       AND ( KRECH = 'B'                       RTDK906167
        OR KRECH = 'A' ).
    SELECT knumv kschl INTO CORRESPONDING FIELDS OF TABLE it_konv1 FROM konv
    FOR ALL ENTRIES IN it_ekko
    WHERE knumv = it_ekko-knumv
      AND kwert NE 0.
    DELETE ADJACENT DUPLICATES FROM it_konv1 COMPARING knumv kschl.
    LOOP AT it_konv1.
      gindex = sy-tabix.
      READ TABLE it_zmm_porder WITH KEY kschl = it_konv1-kschl BINARY SEARCH.
      IF sy-subrc NE 0.
        DELETE it_konv1 INDEX gindex.
      ENDIF.
    ENDLOOP.
    IF sy-subrc EQ 0.
      SORT it_konv1 BY knumv kschl.
    ENDIF.
    SELECT * INTO TABLE it_t685t
    FROM   t685t
    FOR    ALL ENTRIES IN it_konv
    WHERE kschl EQ it_konv-kschl
      AND kappl EQ it_konv-kappl
      AND spras EQ 'E'.
    SELECT * INTO TABLE it_t685t_ftr
    FROM   t685t
    FOR    ALL ENTRIES IN it_konv_ftr
    WHERE kschl EQ it_konv_ftr-kschl
      AND kappl EQ it_konv_ftr-kappl
      AND spras EQ 'E'.
    it_t685t_ftr-kschl = 'JVCS'.
    it_t685t_ftr-vtext = 'IN CST in vat'.
    APPEND it_t685t_ftr.
    SELECT * INTO TABLE it_zmm_house_bank
      FROM zmm_house_bank
     WHERE ebeln IN mebeln.
ELSE.
    MESSAGE e899(mm) WITH 'Data not found for selection criteria...'.
ENDIF.
ENDFORM.                    " Load_data
FORM process .
DATA : mctr   TYPE i VALUE 1.
DATA : gindex LIKE sy-tabix.
DATA : mline(75) TYPE c.
DATA : mlifn2    LIKE ekpa-lifn2.
DATA : mv_name LIKE lfa1-name1,
         madrnr LIKE lfa1-adrnr.
CLEAR itcpo.
itcpo-tdgetotf = 'X'.
CALL FUNCTION 'OPEN_FORM'
    EXPORTING
      form     = 'ZMM_PORDER'
      language = sy-langu
      OPTIONS = itcpo
      dialog   = ' '
    EXCEPTIONS
      OTHERS   = 1.
LOOP AT it_ekko.
    CALL FUNCTION 'START_FORM'
      EXPORTING
        form = 'ZMM_PORDER'.
    SELECT SINGLE *
     FROM t001
     INTO it_t001
    WHERE bukrs EQ it_ekko-bukrs.
    mcompname = it_t001-butxt.
    TRANSLATE mcompname TO UPPER CASE.
    Document Type
    SELECT SINGLE batxt
      INTO mtitle
      FROM t161t
     WHERE bstyp EQ 'F'
     AND   spras EQ 'E'
     AND   bsart EQ it_ekko-bsart.
    REFRESH it_adrc.
    SELECT SINGLE werks
      INTO mwerks
      FROM ekpo
     WHERE ebeln EQ it_ekko-ebeln.
    SELECT SINGLE *
      INTO it_t001w
      FROM t001w
     WHERE werks EQ mwerks.
    REFRESH it_adrc.
    SELECT SINGLE *
      INTO it_adrc_plt
      FROM adrc
     WHERE addrnumber EQ it_t001w-adrnr.
    REFRESH : xt052.
    mfamt = 0.
    msr    = 0.
in 500c this statement failed.
   SELECT SINGLE * FROM T052 INTO XT052 WHERE ZTERM = IT_EKKO-ZTERM.
   CALL FUNCTION 'FI_TEXT_ZTERM'
     EXPORTING
       I_T052 = XT052
     TABLES
       T_ZTEXT = ZTEXT.
    As per Preeti... Shipment address should be shown on top as purchase order company address. 27.04.
    PERFORM writeform USING 'PLANT' 'PLANT'.
    SELECT SINGLE name1 adrnr
      INTO (mv_name,madrnr)
      FROM lfa1
     WHERE lifnr EQ it_ekko-lifnr.
    REFRESH it_adrc[].
    CLEAR   it_adrc[].
    FREE it_adrc[].
    SELECT SINGLE *
      INTO it_adrc_ven
      FROM adrc
     WHERE addrnumber EQ madrnr.
    READ TABLE it_lfa1 WITH KEY lifnr = it_ekko-lifnr.
    PERFORM writeform USING 'VENDOR' 'VENDOR'.
     Shipment
    SELECT SINGLE werks
      INTO mwerks
      FROM ekpo
     WHERE ebeln EQ it_ekko-ebeln.
       up to 1 rows.
    SELECT SINGLE *
      INTO it_t001w
      FROM t001w
     WHERE werks EQ mwerks.
    SELECT SINGLE j_1iexcd j_1icstno j_1ilstno
             INTO (j_1iexcd,j_1icstno,j_1ilstno)
           FROM    j_1imocomp
            WHERE werks = mwerks.
    REFRESH it_adrc.
    SELECT SINGLE *
      INTO it_adrc
      FROM adrc
     WHERE addrnumber EQ it_t001w-adrnr.
    PERFORM writeform USING 'SHIPMNT' 'SHIPMNT'.
    READ TABLE it_eikp WITH KEY exnum = it_ekko-exnum.
    IF sy-subrc EQ 0.
      READ TABLE it_t618t WITH KEY expvz = it_eikp-expvz.
    ENDIF.
    your_ref = it_ekko-ihrez.
    our_ref = it_ekko-unsez.
    READ TABLE it_erev WITH KEY edokn = it_ekko-ebeln.
    IF sy-subrc = 0.
      no_ammend = it_erev-revno.
      request_by = it_erev-crnam.
      ver_txt    = it_erev-txz01.
      READ TABLE it_t16ct WITH KEY rscod = it_erev-rscod.
      IF sy-subrc = 0.
        ver_reason = it_t16ct-rstxt.
      ELSE.
        ver_reason = ''.
      ENDIF.
    ELSE.
      no_ammend = ''.
      request_by = ''.
      ver_txt    = ''.
      ver_reason = ''.
    ENDIF.
    PERFORM writeform USING 'PO_INFO' 'PO_INFO'.
    IF it_zmm_house_bank[] IS NOT INITIAL.
      READ TABLE it_zmm_house_bank INDEX 1.
      PERFORM writeform USING 'BANKDTL' 'BANKDTL'.
    ENDIF.
    PERFORM writeform USING 'HDR_INFO' 'HDR_INFO'.
    PERFORM writeform USING 'BRK_TTL' 'MAIN'.
    msr     = 1.
    mlctr   = 1.
*added by ganesh to prevent deleted items to appear in print out
   LOOP AT IT_EKPO WHERE EBELN EQ IT_EKKO-EBELN.
    LOOP AT it_ekpo WHERE ebeln EQ it_ekko-ebeln AND loekz NE 'L'.
*end of change
      CLEAR: mrate, mrate1.
      SELECT * FROM konv INTO TABLE it_konv_rate
               WHERE knumv EQ it_ekko-knumv
               AND   kposn EQ it_ekpo-ebelp
               AND ( kschl EQ 'PBXX' OR kschl EQ 'PB00' OR kschl EQ 'P001' ).
      LOOP AT it_konv_rate.
       IF it_konv_rate-kpein > 0.             " added by ganesh as per sudhir 12.10.2007
         mrate_gm = it_konv_rate-kbetr / it_konv_rate-kpein.
         mrate = mrate + mrate_gm. " added by ganesh as per sudhir 12.10.2007
       ELSE.
        mrate = mrate + it_konv_rate-kbetr.
       ENDIF.
        IF it_konv_rate-waers IS NOT INITIAL.
          mwaers = it_konv_rate-waers.
        ENDIF.
      ENDLOOP.
    For Japanies Yen   "RTDK906759
      IF it_ekko-waers = 'JPY'.
        mrate = mrate * 100.
      ENDIF.
    End for japanies Yen
      mrate1 = mrate.
           End rate
      mfirst = 0.
            MFAMT = MFAMT + ( IT_EKPO-NETPR * IT_EKPO-MENGE ).
      mfamt = mfamt + ( mrate * it_ekpo-menge ).
      PERFORM get_mat_long_text.
      DATA: lt_ctr TYPE i VALUE 0,lt_ctr1 TYPE i, lt_count TYPE i VALUE 0. " Long text counter
      DESCRIBE TABLE it_bapi_mltx_ga LINES lt_count.
      CLEAR it_bapi_mltx_ga.
*Added by Rajiv 10.05.2007 Read and if condition RTDK906165
      READ TABLE it_konv WITH KEY knumv = it_ekko-knumv
                                  kposn = it_ekpo-ebelp.
      mkbetr = 0.
      mkwert = 0.
      IF sy-subrc EQ 0.
        LOOP AT it_konv WHERE knumv EQ it_ekko-knumv
                           AND kposn EQ it_ekpo-ebelp.
          IF it_konv-krech EQ 'A'.
            mkbetr = it_konv-kbetr / 10.
          ELSE.
            mkbetr = it_konv-kbetr.
          ENDIF.
        For Japanies Yen "RTDK906759
          IF it_ekko-waers = 'JPY'.
            mkbetr = mkbetr * 100.
          ENDIF.
        End for japaies Yen
          IF mkbetr LT '0'.
            mkbetr = mkbetr * ( -1 ).
          ENDIF.
          mkwert   = it_konv-kwert.
        For Japanies Yen "RTDK906759
          IF it_ekko-waers = 'JPY'.
            mkwert = mkwert * 100.
          ENDIF.
        End for japaies Yen
          mfamt = mfamt + mkwert.
          IF mkwert LT '0'.
            mkwert = mkwert * ( -1 ).
          ENDIF.
          IF it_ekpo-matnr IS INITIAL.
            itemname = it_ekpo-txz01.
          ELSE.
            READ TABLE it_makt WITH KEY matnr = it_ekpo-matnr.
            itemname = it_makt-maktx.
          ENDIF.
          READ TABLE it_t685t WITH KEY kschl = it_konv-kschl BINARY SEARCH.
          READ TABLE it_eket WITH KEY ebeln = it_ekpo-ebeln
                                       ebelp = it_ekpo-ebelp BINARY SEARCH.
          IF mfirst EQ 0.
            PERFORM writeform USING 'BRK_INFO' 'MAIN'.
            mfirst = 1.
          ELSE.
            ADD 1 TO lt_ctr.
            CLEAR it_bapi_mltx_ga.
            READ TABLE it_bapi_mltx_ga INDEX lt_ctr. "For long text
            IF sy-subrc NE 0.
              CLEAR it_bapi_mltx_ga.
            ENDIF.
            PERFORM writeform USING 'BRK_INFO1' 'MAIN'.
          ENDIF.
          mlctr = mlctr + 1.
        ENDLOOP.               "   it_konv.
      ELSE.
        IF it_ekpo-matnr IS INITIAL.
          itemname = it_ekpo-txz01.
        ELSE.
          READ TABLE it_makt WITH KEY matnr = it_ekpo-matnr.
          itemname = it_makt-maktx.
        ENDIF.
                    READ TABLE IT_T685T WITH KEY KSCHL = IT_KONV-KSCHL BINARY SEARCH.
        READ TABLE it_eket WITH KEY ebeln = it_ekpo-ebeln
                                     ebelp = it_ekpo-ebelp BINARY SEARCH.
        mfirst = 0.
        IF mfirst EQ 0.
          PERFORM writeform USING 'BRK_INFO' 'MAIN'.
          mfirst = 1.
        ELSE.
          ADD 1 TO lt_ctr.
          CLEAR it_bapi_mltx_ga.
          READ TABLE it_bapi_mltx_ga INDEX lt_ctr. "For long text
          IF sy-subrc NE 0.CLEAR it_bapi_mltx_ga.ENDIF.
          PERFORM writeform USING 'BRK_INFO1' 'MAIN'.
        ENDIF.
      ENDIF.
*Commented by rajiv 10.05.2007 used this code in above condition.
added by ganesh on 260407 to print record
            if it_konv is initial.
                    READ TABLE IT_MAKT WITH KEY MATNR = IT_EKPO-MATNR.
                    READ TABLE IT_T685T WITH KEY KSCHL = IT_KONV-KSCHL BINARY SEARCH.
                    READ TABLE IT_EKET WITH KEY EBELN = IT_EKPO-EBELN
                                                 EBELP = IT_EKPO-EBELP BINARY SEARCH.
                    mFirst = 0.
                    if mFirst eq 0.
                         PERFORM WRITEFORM USING 'BRK_INFO' 'MAIN'.
                         mFirst = 1.
                    else.
                         add 1 to lt_ctr.
                         clear it_bapi_mltx_ga.
                         read table IT_BAPI_MLTX_GA index lt_ctr. "For long text
                         if sy-subrc ne 0.clear it_bapi_mltx_ga.endif.
                         PERFORM WRITEFORM USING 'BRK_INFO1' 'MAIN'.
                    Endif.
            endif.
end of change
      REFRESH it_komv_tax.
      PERFORM get_tax_cal USING it_ekpo-ebeln
                                it_ekpo-ebelp.
                             Changing it_komv_tax.
      REFRESH : it_zmm_porder.
      CLEAR   : it_zmm_porder.
      SELECT * INTO TABLE it_zmm_porder
        FROM zmm_porder
       WHERE flag EQ 'T'.
      IF sy-subrc EQ 0.
        SORT it_zmm_porder BY kschl.
      ENDIF.
      LOOP AT it_komv_tax.
        gindex = sy-tabix.
        READ TABLE it_zmm_porder WITH KEY kschl = it_komv_tax-kschl BINARY SEARCH.
        IF sy-subrc NE 0.
          DELETE it_komv_tax INDEX gindex.
        ENDIF.
      ENDLOOP.
      LOOP AT it_komv_tax WHERE kwert IS NOT INITIAL.
       IF ( IT_KOMV_TAX-KSCHL EQ 'JMOP' OR
            IT_KOMV_TAX-KSCHL EQ 'JECS' OR
            IT_KOMV_TAX-KSCHL EQ 'JSEP' OR
            IT_KOMV_TAX-KSCHL EQ 'JMOQ' OR
            IT_KOMV_TAX-KSCHL EQ 'JVCS' OR
            IT_KOMV_TAX-KSCHL EQ 'JVRD' OR
            IT_KOMV_TAX-KSCHL EQ 'JMIP' OR
*             IT_KOMV_TAX-KSCHL EQ 'JEIP' OR
            IT_KOMV_TAX-KSCHL EQ 'JSEI' OR
            IT_KOMV_TAX-KSCHL EQ 'JSRT' OR
            IT_KOMV_TAX-KSCHL EQ 'JEC3' OR
            IT_KOMV_TAX-KSCHL EQ 'JVRN' )
            AND IT_KOMV_TAX-KWERT IS NOT INITIAL.
        SELECT SINGLE vtext
               INTO   mtext
               FROM   t685t
              WHERE   kschl EQ it_komv_tax-kschl
                AND   spras EQ 'E'.
        l_rate    = it_komv_tax-kbetr / 10.
        l_amt     = it_komv_tax-kwert.
        For Japanies Yen "RTDK906759
        IF it_ekko-waers = 'JPY'.
          l_amt = l_amt * 100.
        ENDIF.
        End for japaies Yen
        ADD l_amt TO mfamt.
        IF lt_ctr LT lt_count. "Long text
          ADD 1 TO lt_ctr.
          READ TABLE it_bapi_mltx_ga INDEX lt_ctr.
        ELSE.
          CLEAR it_bapi_mltx_ga.
        ENDIF.
        IF l_rate EQ 0 OR l_amt EQ 0.
          l_rate = ''.
          l_amt = ''.
        ENDIF.
        PERFORM writeform USING 'TAX_LINE_ITEM' 'MAIN'.
       ENDIF.
      ENDLOOP.
      IF lt_ctr LT lt_count.
        DATA mbal_line TYPE i.
        mbal_line = ( lt_count - lt_ctr ).
        DO mbal_line TIMES.
          ADD 1 TO lt_ctr.
          READ TABLE it_bapi_mltx_ga INDEX lt_ctr.
          IF sy-subrc = 0.
            PERFORM writeform USING 'LTEXT' 'MAIN'.
          ENDIF.
        ENDDO.
      ENDIF.
      CONCATENATE it_ekko-ebeln it_ekpo-ebelp INTO nmebeln.
      REFRESH tline.
      CALL FUNCTION 'READ_TEXT'
        EXPORTING
          id                      = 'F04'
          language                = sy-langu
          name                    = nmebeln
          object                  = 'EKPO'
        TABLES
          lines                   = tline
        EXCEPTIONS
          id                      = 1
          language                = 2
          name                    = 3
          not_found               = 4
          object                  = 5
          reference_check         = 6
          wrong_access_to_archive = 7
          OTHERS                  = 8.
      IF sy-subrc <> 0.
      ENDIF.
      LOOP AT tline.
        IF tline-tdline IS NOT INITIAL.
          del_text = tline-tdline.
        ENDIF.
        CONDENSE del_text.
      ENDLOOP.
      CONCATENATE it_ekko-ebeln it_ekpo-ebelp INTO nmebeln.
      REFRESH tline.
      CALL FUNCTION 'READ_TEXT'
        EXPORTING
          id                      = 'F03'
          language                = sy-langu
          name                    = nmebeln
          object                  = 'EKPO'
        TABLES
          lines                   = tline
        EXCEPTIONS
          id                      = 1
          language                = 2
          name                    = 3
          not_found               = 4
          object                  = 5
          reference_check         = 6
          wrong_access_to_archive = 7
          OTHERS                  = 8.
      IF sy-subrc <> 0.
             MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
             WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
      ENDIF.
           refresh.
      CLEAR : po_flag, mat_po_text.
      LOOP AT tline.
        IF tline-tdline IS NOT INITIAL.
          MOVE tline-tdline TO mat_po_text.
          CONDENSE mat_po_text.
          PERFORM writeform USING 'MTRL_PO_TEXT' 'MAIN'.
          po_flag = 'X'.
          CLEAR : mat_po_text.
        ENDIF.
      ENDLOOP.
*Added lines below for Schedule delivery for line item on 09.05.2007:Rajiv
      CLEAR g_ind.
      READ TABLE it_eket WITH KEY ebeln = it_ekpo-ebeln
                                   ebelp = it_ekpo-ebelp BINARY SEARCH.
      g_ind = sy-tabix.
      LOOP AT it_eket FROM g_ind.
        IF it_eket-ebeln EQ it_ekpo-ebeln AND it_eket-ebelp = it_ekpo-ebelp.
          PERFORM writeform USING 'SCHEDULE' 'MAIN'.
        ELSE.
          EXIT.
        ENDIF.
      ENDLOOP.
*End Addition:Rajiv
      PERFORM writeform USING 'REQSLP' 'MAIN'.
      mlctr = mlctr + 1.
      msr = msr + 1.
      CLEAR: lt_ctr, lt_ctr1.
following lines added by ganesh to add service po details as per Mr. sadiq 21.08.2007
      IF it_ekpo-packno IS NOT INITIAL.
        CLEAR sub_packno.
        SELECT SINGLE sub_packno INTO sub_packno FROM esll WHERE packno = it_ekpo-packno.
        IF sub_packno IS NOT INITIAL.
          CLEAR it_esll.
          REFRESH it_esll.
          SELECT * FROM esll INTO CORRESPONDING FIELDS OF TABLE it_esll
          WHERE packno = sub_packno.
          IF sy-subrc = 0.
            PERFORM writeform USING 'SERVICE_PO_TEXT' 'MAIN'.
          ENDIF.
          LOOP AT it_esll.
            CONCATENATE sub_packno it_esll-introw INTO obj.
            CALL FUNCTION 'READ_TEXT'   "4500002446 C300
              EXPORTING
                id       = 'LTXT'
                language = sy-langu
                name     = obj
                object   = 'ESLL'
              TABLES
                lines    = tline
              EXCEPTIONS
                id                      = 1
                language                = 2
                name                    = 3
                not_found               = 4
                object                  = 5
                reference_check         = 6
                wrong_access_to_archive = 7
                OTHERS                  = 8.
            IF sy-subrc <> 0.
            ENDIF.
            CLEAR stext.
            LOOP AT tline.
              CONCATENATE stext tline-tdline INTO stext SEPARATED BY space.
            ENDLOOP.
            FREE tline.
            CLEAR tline.
            REFRESH tline.
            PERFORM writeform USING 'SERVICE_PO' 'MAIN'.
            PERFORM writeform USING 'SERVICE_TEXT' 'MAIN'.
          ENDLOOP.
        ENDIF.
      ENDIF.
    end of change
    ENDLOOP.             " it_ekpo.
    IF mlctr < 15.
      DO 5 TIMES.
        PERFORM writeform USING 'LINEFEED' 'MAIN'.
      ENDDO.
    ENDIF.
    added by ganesh for allding line before ECC No.
    IF it_ekko-bsart NE 'ZIM'.               " IF EXPORT NO NEED TO PRINT ECC.
      PERFORM writeform USING 'LIN' 'MAIN'.
      PERFORM writeform USING 'WERKS_TAX_DETAIL' 'MAIN'.
    ENDIF.
    end of change
     MFLAG = 'Y'.
    PERFORM writeform USING 'TERMS_VAL' 'MAIN'.
    LOOP AT it_konv1 WHERE knumv EQ it_ekko-knumv.
      mkschl = it_konv1-kschl.
      mchgamt = 0.
      LOOP AT it_konv_ftr WHERE knumv EQ it_konv1-knumv
                           AND kschl EQ mkschl.
        mchgamt = mchgamt + it_konv_ftr-kwert.
      ENDLOOP.
        For Japanies Yen "RTDK906759
      IF it_ekko-waers = 'JPY'.
        mchgamt = mchgamt * 100.
      ENDIF.
        End for japaies Yen
      mfamt = mfamt + mchgamt.
      IF mchgamt LT '0'.
        mchgamt = mchgamt * ( -1 ).
      ENDIF.
      READ TABLE it_t685t_ftr WITH KEY kschl = mkschl.
      PERFORM writeform USING 'TERMS_FTR_VAL' 'MAIN'.
      mlctr = mlctr + 1.
    ENDLOOP.
    mflag = 'T'.
    CALL FUNCTION 'HR_IN_CHG_INR_WRDS'
      EXPORTING
        amt_in_num         = mfamt
      IMPORTING
        amt_in_words       = mfword
      EXCEPTIONS
        data_type_mismatch = 1
        OTHERS             = 2.
    CONDENSE mebeln.
    nmebeln = it_ekko-ebeln.
    REFRESH tline.
    CALL FUNCTION 'READ_TEXT'
      EXPORTING
        id                      = 'F01'
        language                = sy-langu
        name                    = nmebeln
        object                  = 'EKKO'
      TABLES
        lines                   = tline
      EXCEPTIONS
        id                      = 1
        language                = 2
        name                    = 3
        not_found               = 4
        object                  = 5
        reference_check         = 6
        wrong_access_to_archive = 7
        OTHERS                  = 8.
    IF sy-subrc <> 0.
    ENDIF.
*---- CHANGED BY MATHEW BECAUSE THIS STATMENT WORKING FINE IN 300 BUT NOT IN 500C.
   LOOP AT ZTEXT.
     IF ZTEXT-TEXT1 IS NOT INITIAL.
       PERFORM WRITEFORM USING 'TERMS_COND_VAL_PAY' 'MAIN'.
     ENDIF.
     MPAY_FLAG = 'Y'.
   ENDLOOP.
    READ TABLE it_t052u WITH KEY zterm = it_ekko-zterm.
    LOOP AT it_t052u WHERE zterm EQ it_ekko-zterm.
      IF it_t052u-text1 IS NOT INITIAL.
        PERFORM writeform USING 'TERMS_COND_VAL_PAY' 'MAIN'.
      ENDIF.
      mpay_flag = 'Y'.
    ENDLOOP.
    PERFORM writeform USING 'TERMS_COND_VAL' 'MAIN'.
    LOOP AT tline.
      IF tline-tdline IS NOT INITIAL.
        PERFORM writeform USING 'TERMS_COND_VAL_HDR' 'MAIN'.
      ENDIF.
      CONDENSE txt.
    ENDLOOP.
    PERFORM writeform USING 'FTR' 'FTR_LIN3'.
    PERFORM writeform USING 'FTR_LIN1' 'FTR_LIN1'.
    CALL FUNCTION 'END_FORM'.
ENDLOOP.                    "   It_ekko.
CALL FUNCTION 'CLOSE_FORM'
   IMPORTING
   RESULT                         = itcpp
RDI_RESULT                     =
   TABLES
     otfdata                        = otf
   EXCEPTIONS
     unopened                       = 1
     bad_pageformat_for_print       = 2
     send_error                     = 3
     spool_error                    = 4
     codepage                       = 5
     OTHERS                         = 6.
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.                    " Process
*&      Form WRITEFORM
      text
     -->P_0150   text
     -->P_0151   text
FORM writeform USING    value(p_0150)
                         value(p_0151).
CALL FUNCTION 'WRITE_FORM'

Hi
I think some basis related configuartions to be done
Try like this and inform me
A cyclic job runs, which processes the messages seen in the SOST queue.
Are you sure it's not the frequency of the cyclic job, rather than the
number of messages in the queue, that you are observing? In messages
that are queued and before the cyclic job runs, "wait for comm. service"
is the normal status.
If you mean that there are always 4 items queued in SOST regardless of
the cyclic send job, then I have no ideas. I would have thought there
was no way to do that.
when the send job runs it just never
picks them up & sends them, while it picks up many others. The send job
is somehow blind to these; no error message occurs. In this case, I
'delete' them from the queue (in SOST) and then 'undelete' (drop down
menu -> /Go to /Deleted Items) them and then re-queue them. THEN they
actually get picked up & sent when the next cyclic send job executes.
Regards
Pavan

How to send image file through mail without any attachment

Plz tell me how to send image file through mail without any attachment ( i mean not converting that image into pdf or any format ) i want to send that text or image through mail .

Hi Sandeep,
I think you can setup the type of email in Shared office Settings in transaction S016.
There is an option called <Preset document classes>
You choose this pushbutton to branch to the maintenance screen for the document classes that are directly displayed to users in the Business Workplace for selection when they use the Create function. The name under which the documents are displayed can also be maintained.
http://help.sap.com/saphelp_nw70/helpdata/en/6c/69c30f418d11d1896e0000e8322d00/content.htm
Haven't tried it though.
Regards,
Siddhesh

Option sends Purchase Order through mail

Dear All,
My client wants Option sends Purchase Order through mail.
Please tell me what the process for above scenario is.
Thanks in advance,
Nagi Reddy

Hi,
For sending PO via mail, first check if output determintation in properly set in customization settings. Also If you are using customized program for printing, check if code is maintained in program for sending ouput via mails.
If all is maintained in customizing, in PO select output medium as "Mail" and take print. This can also done by using condition records in MN04. Then try sending the output via mail.
Thanks
Alex

How to send original filename as the attachment name through mail adapter?

Hi,
I have a File to Mail scenario where the file is picked up from a folder in R/3 system and is sent as an attachment through mail. The requirement is to send the file unconverted and with the same file name.
When tried without creating any ESR objects, it was sending the file with the name Untitled.xml.
Since the filename has to be picked dynamically, I am not able to configure it through module parameters also (where we can set it through Content_Disposition)
I tried configuring it as mentioned in the following link: [http://wiki.sdn.sap.com/wiki/pages/viewpage.action?pageId=138084630]
But still it is going as Untitled.xml with the whole mail package as the content of the attachment.
Any pointers to solve this issue will be of great help.
Thanks
Justin

there is no standard way so you will have to write module beans.
in other way:
XI Mail Adapter: An approach for sending emails with attachment with help of Java mapping - XI Mail Adapter: An approach for sending emails with attachment with help of Java mapping
Dynamic name in the mail attachment - pseudo "variable substitution" :
XI: Dynamic name in the mail attachment - pseudo "variable substitution"
Dynamic attachment name in receiver mail adapter

How To Send A Text Attachment Through MAIL Adapter

Hi Experts,
   I Did A Scenario that is By using file adapter at the sender side and PI as a middle ware i have sent one text file to database
Now here my question is
I have to send the same text file which i have sent database... my using Mail Adapter
Simply File to Mail Scenario
FILE         PI                MAIL
But I have to send the same text file which i sent to database... by using mail adapter... Here all the configuration are done ... And the channels are working properly... only thing here is..to send same text file using mail adapter..
It will be good if any one can explain step by step..
Regards
aravindh

Hi Rajendra,
   Tanq for connecting me ... This Blog helped me a lot ....And it is a useful answer to me..
For this file to mail scenario we have got .txt as an attachment ... Its fine ... But her my Client is asking me to add CONTENT in the mail... Content in the sense..
Example of content...
Hi,
Please find the attachment
Regards,
sap pi,
They need in the form of like this... To add content in the mail What i have to do...DO i need to add more configurations if it is what are they...
Please solve the issue.. It is appreciated some one can explain me step by step or .. By sending me screen charts..
Thanks in advance....
Regards
vinay

Looking for .XSD for mail for sending the mail through mail adapter

Hi Experts,
                  I am looking for .XSD file for sending mail.I am using Mail adapter to send mail to report error occur on creating PO document in my scenario to a specified department's email id.I searched for many blogs but not get any .XSD file for email.Looking for a suugesstion.
Thanks
Deepak

Do you have S -user name and password? If not then never mind, Copy the below XSD, I took it from the link which I gave to you.
<?xml version="1.0" encoding="utf-8" ?>
<xs:schema targetNamespace="http://sap.com/xi/XI/Mail/30"
xmlns:xi="http://sap.com/xi/XI/Mail/30"
xmlns:xs="http://www.w3.org/2001/XMLSchema">
<xs:element name="Mail">
    <xs:annotation>
      <xs:documentation>Mail package for XI - Mail Adapter</xs:documentation>
    </xs:annotation>
    <xs:complexType>
      <xs:sequence>
        <xs:element name="Subject" type="xs:string" minOccurs="0"/>
        <xs:element name="From" type="xs:string" minOccurs="0"/>
        <xs:element name="To" type="xs:string" minOccurs="0"/>
        <xs:element name="Reply_To" type="xs:string" minOccurs="0"/>
        <xs:element name="Content_Type" type="xs:string" minOccurs="0"/>
        <xs:element name="Date" type="xs:dateTime" minOccurs="0"/>
        <xs:element name="Message_ID" type="xs:string" minOccurs="0"/>
        <xs:element name="X_Mailer" type="xs:string" minOccurs="0"/>
        <xs:element name="Content" minOccurs="0">
          <xs:annotation>
            <xs:documentation>any type</xs:documentation>
          </xs:annotation>
        </xs:element>
      </xs:sequence>
      <xs:attribute name="encoding" type="xs:string"/>
    </xs:complexType>
</xs:element>
<xs:element name="MailReceipt">
    <xs:annotation>
      <xs:documentation>Mail Receipt for XI - Mail Adaper</xs:documentation>
    </xs:annotation>
    <xs:complexType>
      <xs:sequence>
        <xs:element name="Server" type="xs:string"/>
        <xs:element name="Format" type="xs:string"/>
        <xs:element name="UseMailPackage" type="xs:boolean"/>
        <xs:element name="Encoding" type="xs:string"/>
        <xs:element name="Subject" type="xs:string" minOccurs="0"/>
        <xs:element name="From" type="xs:dateTime" minOccurs="0"/>
        <xs:element name="To" type="xs:string" minOccurs="0"/>
        <xs:element name="Date" type="xs:dateTime" minOccurs="0"/>
      </xs:sequence>
    </xs:complexType>
</xs:element>
</xs:schema>

How to send meeting request by mail adapter

Hi,
I'm doing scenario from file to mail. I have a sender file adapter to pick up the meeting request standard format file(*.ics) from file system. On the other side I have a receiver mail adapter to send mail. What I want to do is the sent mail by mail adapter should be a meeting request instead of a normal email with meeting request as its attachment.
I use localejbs/AF_Modules/MessageTransformBean as first module in mail adapter, but the sent mail is also a normal with meeting request as its attachment. This is not what I expected.
I also created own module for mail adapter to realize it. Do I need to change the format of meeting reqeust information in payload? Actually I have chance to do it in module. But what should I do? Thanks.

Hi, Krishna:
Thanks for your reply.
Actually the content of ics file is like:
BEGIN:VCALENDAR
PRODID:-//Microsoft Corporation//Outlook 11.0 MIMEDIR//EN
VERSION:2.0
METHOD:REQUEST
BEGIN:VEVENT
ATTENDEE;CN="Wu, Oscar";ROLE=REQ-PARTICIPANT;RSVP=TRUE:MAILTO:[email protected]
ORGANIZER:MAILTO:[email protected]
DTSTART:20070626T130000Z
DTEND:20070626T150000Z
LOCATION:Shanghai
TRANSP:OPAQUE
SEQUENCE:0
UID:040000008200E00074C5B7101A82E00800000000F067E9BB0DB8C7010000000000000000100
00000C7423D530FE8744687B0C7C08D4CAA58
DTSTAMP:20070626T104913Z
DESCRIPTION:Meeting request without attachment\n
SUMMARY:Test appointment
PRIORITY:5
X-MICROSOFT-CDO-IMPORTANCE:1
CLASS:PUBLIC
BEGIN:VALARM
TRIGGER:-PT15M
ACTION:DISPLAY
DESCRIPTION:Reminder
END:VALARM
END:VEVENT
END:VCALENDAR
this content is content of meeting request based on RFC 822, what I want is not get the content itself in mail, I want the mail adapter send a meeting request out automatically when it get this content.
Thanks

How to send the acknowledgement via mail adapter

Hi Experts,
I have a async scenario file to webservice here we are getting an acknowledgment from the webservice side.
My requirement is - to capture the acknowledgement (application ack) which is coming to PI and then send this acknowledgment to some user mail ID using the mail adapter.
here we are not using the proxies and the acknowlodgement is application ack (not transport ack) and we are avoiding the BPM.
Please help me in this regard.
Thanks
Sugata

Hi Stefan,
Thanks for quick reply.
can you please let me know if application ack can be handled by BPM or not? if it is possible thru BPM please provide me the guidelines for the same ( blog etc.).
I am here to capture the Application Acknowledgment that is coming into PI sxmb_moni from webservice
Thanks
Sugata

Sending Interactive PDF through mail - as INLINE item

Hi All,
I have a requirement, wherein I have to send an Interactive PDF form through mail, as INLINE (i.e. displayed in the body of the message item),and not as ATTACHMENT.
i.e. The Interactive PDF content should be seen in the body page of the mail itself.
I have to send the PDF from a java application. I was able to do it with an image(as INLINE) using the HTML tag <img>.
For PDF, I tried using the HTML tags <iframe> and <embed>. i even tried javascript embeded within HTML code. But no use.
IMPORTANT : Please note that, it is an Interactive PDF form, there will be editable Input fields in the PDF file.
Any one please help me to solve this....
Thanks,
Prabhakar.

You can set the main content of your message to be the PDF content with MIME
type application/pdf, but I doubt that you can convince most mailers to display this
content as you intend. As far as I know, this is not a commonly supported feature.
If you can use some other program to create a message that displays the way you
want, you can copy the structure of that message with your JavaMail program.

How To Edit Failed IDocs Through Report ?

Hi
I have the requirement of editing (Modifying) IDocs through a report program..
( My program displays the content of a specified segment of failed IDocs in the ALV format..
Then the changes made to those fields in ALV have to be updated in those failed IDocs.. So that i can reprocess the IDocs.. )
Is there any BAPI or BADI or Any other solution to edit IDocs through a report....??
I dont want to use BDC as the report program is meant for editing huge number of failed IDocs..
Please help me..
Thanks a lot,
Raj

There is a similar POST open in DATA TRANSFER FORUM...

ALE Error while sending PO IDOC through EDI

Hi Experts,
                  I am sending one PO IDOC through EDI but I am getting the following error:-
                  Message no. B1130.
                  "Too many recipients found for message type ORDERS in the ALE model"
                  How can I solve this error ? Please guide me in this regards as this is an
                  important issue with urgency.
Thanks & Regards
Jitendra Gujarathi

Please check this discussion thread
Re: Too many recipients found for message type in the ALE model

Reg: How to send Xcelsius dashboard through mail

Hi all,
I want to Email the Xcelsius dashboard. Whenever the backend data changes ,notification have to send through mail like scheduling the report.
Is it possible to schedule the Xcelsius dashboard?
Thanks & Regards,
Hemalatha J

Hemalatha,
Unfortunately that is not possible.
Below is what we did for the similar requirement...
--> Developed dashboards in Xcelsius.
--> Published dashboard on the portal.
--> When ever data is loaded in SAP BI, using "Information Broadcasting" an email is triggered to the end users, like "Data is now available for 06/2009"
--> Users access dashboards logging into portal.
Hope this helps...
-Anil

Sending failed idocs through Mail adapter or Alerts

Similar Messages

Maybe you are looking for