Send mail trough a FORM in IAS

Hi all,
I have a form that sends a mail and in the mail there will be some global variables. I can get it to work when testing with developer, but in production under AS Portal it doesn´t work.
Can someone provide help for this?
Best,
João Rico

I understand...
This is the code of the package SEND_NOTIFICATION:
PROCEDURE send_notification IS
objOutlook OLE2.OBJ_TYPE;
objMail OLE2.OBJ_TYPE;
objArg OLE2.LIST_TYPE;
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',:global.to_msg);
OLE2.SET_PROPERTY(objmail,'Subject',:global.subj_msg);
OLE2.SET_PROPERTY(objmail,'Body',:global.body_msg||:global.body_msg1);
OLE2.INVOKE(objmail,'Send');
OLE2.INVOKE(objmail,'Display');
OLE2.RELEASE_OBJ(objmail);
OLE2.RELEASE_OBJ(objOutlook);
END;
and this is the trigger that invoques it:
DECLARE
     msgnum NUMBER := MESSAGE_CODE;
     msgtxt VARCHAR2(80) := MESSAGE_TEXT;
     msgtyp VARCHAR2(3) := MESSAGE_TYPE;
BEGIN
     IF msgnum =40400 THEN
     :global.to_msg:='[email protected]';
     :global.subj_msg:='Requisição de viatura Nº '||:gcorr_n_int_doc||'/'||:gcorr_n_int_ano||'-'||:d_sigla;
--     :global.body_msg:='O Departamento/Sector '||:d_deporig||' requisita à D.G.F.A.G. uma viatura para o itinerário entre a Sede e '||:gcorr_int_assunto||' no dia '||:gcorr_int_dtdesloc||'e será conduzida pelo funcionário '||:d_emitente||'. Tempo previsível de utilização '||:gcorr_int_ndias||' dia(s) '||:gcorr_int_horas||' hora(s).';
-- :global.body_msg1:='Natureza do Serviço: '||:gcorr_int_obs||'.';
     send_notification;          
Message('O pedido foi gravado e enviado.');          
Message(' ');
     END IF;
END;
Best,
João Rico
Message was edited by:
[email protected]

Similar Messages

  • Sending Mail from Oracle forms or reports

    Hi
    I have to send mail from forms or reports . Is there any way or builtin to do this.
    If anybody have experience in this please give the
    detailed example on this.
    Regards
    Arun

    Look at http://www.oracle.com/technology/sample_code/tech/pl_sql/htdocs/maildemo_sql.txt
    It creates a package in the database for sending mail.
    If you want to send mail from the local machine using Outlook, you'll have to use OLE, but it's not something I've tried.

  • Sending mail from forms

    My requirement is to send mail/intimation from forms in case of promotion/appraisal of employee is done.
    Plz tell how to do this.
    Regards,
    Alok

    you can send emails in forms through various techniques. External programs like qmail.exe or something else.
    In the newer databases you have the functionality to send emails in the db.
    Search this forum for utl_smtp. There are many postings with sourcecode

  • Sending mail in Oracle 8i

    Hi,
    I am trying to send an email in Oracle 8i Personnel edition, but have encountered problems with the UTL_SMTP package. I have a stored procedure to send mail, but when I run this procedure, I get the following error messages:
    ORA-20001: 421 Service not available
    ORA-06512: at "SYSTEM.UTL_SMTP", line 83
    ORA-06512: at "SYSTEM.UTL_SMTP", line 121
    ORA-06512: at "SYSTEM.DEMO_MAIL", line 257
    ORA-06512: at "SYSTEM.DEMO_MAIL", line 118
    ORA-06512: at "SYSTEM.DEMO_MAIL", line 104
    ORA-06512: at line 2.
    Can anyone help??

    If you can't access the utl_smtp package (you can also look from Oracle Developper by opening the Database node followed by the SYS node which will list the database packages), here is a quick example using OLE2:
    DECLARE
    objOutlook OLE2.OBJ_TYPE;
    objArg OLE2.LIST_TYPE;
    objMail OLE2.OBJ_TYPE;
    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','<emailaddress>');
    OLE2.SET_PROPERTY(objmail,'Subject','Test email from Oracle Forms');
    OLE2.SET_PROPERTY(objmail,'Body','This is a test sending mail from Oracle forms');
    OLE2.INVOKE(objmail,'Display');  to display before sending
    OLE2.INVOKE(objmail,'Send');
    OLE2.RELEASE_OBJ(objmail);
    OLE2.RELEASE_OBJ(objOutlook);
    END;

  • Dll for sending mail

    Hello,
    i feel a need for "mailtest.dll" file that using when send mail through Oracle Forms. If you have it or know the location, please send it to me.
    Thank you very much in advance.
    Anita.

    I am also looking for the same , anyone is sending the dll to her , please send it to me also.
    --regards.                                                                                                                                                                                                                   

  • Can't use the "send by e-mail" button on forms created in Acrobat Pro 9 with Firefox

    I created a form in Acrobat Pro 9.5.2 with a "send by e-mail" button as usual (not using LiveCycle Designer). Since a few months, users cannot send forms using that button USING FIREFOX works fine in Explorer. I've been creating and using those forms since 2 years whitout any problems but now this is A BIG PROBLEM for our office as all our reservation forms uses this technology.
    Steps to reproduce bug:
    1. create a form using Acrobat Pro. add an action button " send a form". send the Entire PDF form not just FDF. go in advance tool to give all rights to end-users (in French it's "étendre les fonctions d'adobe reader" I think it’s enable the usage rights for Reader ion English.)
    2.publishing the form on my website (or send by e-mail to someone who use reader)
    3. filling the form
    Results:
    when the user fill the form he can't send it by e-mail using the button. Nothing happens when hitting that button. It is not possible to save the document as well. Nothing can be done, not even printing or saving it. I've tried almost all browsers I know and nothing works.
    Expected results:
    the form should be send by e-mail (as an attachment in general) like before. please help me! this is really important, our office have a lot of calls and we are just 2 people here (non-profit organization). should we buy Acrobat Pro X ?
    I can send you the form, my e-mail is rgelinas at canadianclub-montreal dot ca
    thanks all!

    When your customers opened the PDF form (which was as an email attachment) on iPads, it is highly likely that Apple Mail (not Adobe Reader for iOS) was displaying the preview of the PDF form.   Please note that Apple products on iPad/iPhone (e.g. Apple Mail, iBooks, Safari) do not render field contents or annotations (sticky notes, highlight, underline, strikeout, freehand drawing, etc.) in PDF documents.
    The Mail sections of the following FAQ documents describe how to open PDF attachments in Adobe Reader for iOS.
    For iPad, see How to get PDF documents into Adobe Reader for iOS (iPad on iOS 7 version)
    For iPhone, see How to open PDF documents in Adobe Reader for iOS (iPhone on iOS 7 version)
    Please let us know if you have additional questions.

  • Convertion of Smart form to pdf and sending mail to vendor for PO

    Hello all,
    I have modified a standard PO Smartform and running it through ME23N.
    In this i have to convert it to a pdf file and then send it through mail to the vendor.
    I have found out FMs'CONVERT_OTF'and
    'SO_NEW_DOCUMENT_ATT_SEND_API1'
    to convert it and send mail. But can u tell me how to go about using it.
    As i am using a standard program do i have to copy this prog to zprog and then call the fm out there. I am not sure.
    Thanks
    Salil

    Hi,
    Here is the sample code.If you find this as useful,kindly reward points by clicking the star on the left of reply.
    Internal Table declarations
    DATA: i_otf TYPE itcoo OCCURS 0 WITH HEADER LINE,
          i_tline TYPE TABLE OF tline WITH HEADER LINE,
          i_receivers TYPE TABLE OF somlreci1 WITH HEADER LINE,
          i_record LIKE solisti1 OCCURS 0 WITH HEADER LINE,
    Objects to send mail.
          i_objpack LIKE sopcklsti1 OCCURS 0 WITH HEADER LINE,
          i_objtxt LIKE solisti1 OCCURS 0 WITH HEADER LINE,
          i_objbin LIKE solisti1 OCCURS 0 WITH HEADER LINE,
          i_reclist LIKE somlreci1 OCCURS 0 WITH HEADER LINE,
    Work Area declarations
          w_objhead TYPE soli_tab,
          w_ctrlop TYPE ssfctrlop,
          w_compop TYPE ssfcompop,
          w_return TYPE ssfcrescl,
          w_doc_chng typE sodocchgi1,
          w_data TYPE sodocchgi1,
          w_buffer TYPE string,"To convert from 132 to 255
    Variables declarations
          v_form_name TYPE rs38l_fnam,
          v_len_in LIKE sood-objlen,
          v_len_out LIKE sood-objlen,
          v_len_outn TYPE i,
          v_lines_txt TYPE i,
          v_lines_bin TYPE i.
    call function 'SSF_FUNCTION_MODULE_NAME'
         exporting
              formname           = 'ZZZ_TEST2'
         importing
              fm_name            = v_form_name
         exceptions
              no_form            = 1
              no_function_module = 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.
    w_ctrlop-getotf = 'X'.
    w_ctrlop-no_dialog = 'X'.
    w_compop-tdnoprev = 'X'.
    CALL FUNCTION v_form_name
         EXPORTING
              control_parameters = w_ctrlop
              output_options     = w_compop
              user_settings      = 'X'
         IMPORTING
              job_output_info    = w_return
         EXCEPTIONS
              formatting_error   = 1
              internal_error     = 2
              send_error         = 3
              user_canceled      = 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.
    i_otf[] = w_return-otfdata[].
    CALL FUNCTION 'CONVERT_OTF'
         EXPORTING
              format                = 'PDF'
              max_linewidth         = 132
         IMPORTING
              bin_filesize          = v_len_in
         TABLES
              otf                   = i_otf
              lines                 = i_tline
         EXCEPTIONS
              err_max_linewidth     = 1
              err_format            = 2
              err_conv_not_possible = 3
              OTHERS                = 4.
    IF sy-subrc <> 0.
      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
      WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
    Convert PDF from 132 to 255.
    LOOP AT i_tline.
    Replacing space by ~
      TRANSLATE i_tline USING ' ~'.
      CONCATENATE w_buffer i_tline INTO w_buffer.
    ENDLOOP.
    Replacing ~ by space
    TRANSLATE w_buffer USING '~ '.
    DO.
      i_record = w_buffer.
    Appending 255 characters as a record
      APPEND i_record.
      SHIFT w_buffer LEFT BY 255 PLACES.
      IF w_buffer IS INITIAL.
        EXIT.
      ENDIF.
    ENDDO.
    Refresh: i_reclist,
             i_objtxt,
             i_objbin,
             i_objpack.
    clear    w_objhead.
    Object with PDF.
    i_objbin[] = i_record[].
    DESCRIBE TABLE i_objbin LINES v_lines_bin.
    Object with main text of the mail.
    i_objtxt = 'Find attached the output of the smart form.'.
    APPEND i_objtxt.
    i_objtxt = 'Regards,'.
    APPEND i_objtxt.
    i_objtxt = 'J.Jayanthi'.
    APPEND i_objtxt.
    DESCRIBE TABLE i_objtxt LINES v_lines_txt.
    Document information.
    w_doc_chng-obj_name = 'Smartform'.
    w_doc_chng-expiry_dat = sy-datum + 10.
    w_doc_chng-obj_descr = 'Smart form output'.
    w_doc_chng-sensitivty = 'F'. "Functional object
    w_doc_chng-doc_size = v_lines_txt * 255.
    Pack to main body as RAW.
    Obj. to be transported not in binary form
    CLEAR i_objpack-transf_bin.
    Start line of object header in transport packet
    i_objpack-head_start = 1.
    Number of lines of an object header in object packet
    i_objpack-head_num = 0.
    Start line of object contents in an object packet
    i_objpack-body_start = 1.
    Number of lines of the object contents in an object packet
    i_objpack-body_num = v_lines_txt.
    Code for document class
    i_objpack-doc_type = 'RAW'.
    APPEND i_objpack.
    Packing as PDF.
    i_objpack-transf_bin = 'X'.
    i_objpack-head_start = 1.
    i_objpack-head_num = 1.
    i_objpack-body_start = 1.
    i_objpack-body_num = v_lines_bin.
    i_objpack-doc_type = 'PDF'.
    i_objpack-obj_name = 'Smartform'.
    CONCATENATE 'Smartform_output' '.pdf'
    INTO i_objpack-obj_descr.
    i_objpack-doc_size = v_lines_bin * 255.
    APPEND i_objpack.
    Document information.
    CLEAR i_reclist.
    e-mail receivers.
    i_reclist-receiver = '[email protected]'.
    i_reclist-express = 'X'.
    i_reclist-rec_type = 'U'. "Internet address
    APPEND i_reclist.
    Sending mail.
    CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
         EXPORTING
              document_data              = w_doc_chng
              put_in_outbox              = 'X'
         TABLES
              packing_list               = i_objpack
              object_header              = w_objhead
              contents_hex               = i_objbin
              contents_txt               = i_objtxt
              receivers                  = i_reclist
         EXCEPTIONS
              too_many_receivers         = 1
              document_not_sent          = 2
              document_type_not_exist    = 3
              operation_no_authorization = 4
              parameter_error            = 5
              x_error                    = 6
              enqueue_error              = 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.

  • Convertion of Smart form to pdf and sending mail to vendor for Invoice

    Hi All...
    now I am getting the output form of Invoice by the T-code  VF02
    here Im using Zreport & Zform...
    my requirment is to convert smartform output to PDF and send as an e-mail attachment on my Existing report
    where I  use the FM - CONVERT_OTF_2_PDF ..
    here my code
    REPORT  yinvoice_is.
    TABLES: vbrk,vbrp, vbak, vbap, vbkd .
    DATA : it_vbap TYPE STANDARD TABLE OF vbap WITH HEADER LINE ,
           it_vbrk LIKE STANDARD TABLE OF vbrk with header line,
           it_vbkd TYPE STANDARD TABLE OF vbkd WITH HEADER LINE ,
           it_vbrp TYPE STANDARD TABLE OF vbrp WITH HEADER LINE ,
           it_vbrp1 TYPE STANDARD TABLE OF vbrp WITH HEADER LINE ,
           it_vbfa TYPE STANDARD TABLE OF vbfa WITH HEADER LINE ,
           it_adrc1 TYPE STANDARD TABLE OF adrc WITH HEADER LINE,
           it_adrc2 TYPE STANDARD TABLE OF adrc WITH HEADER LINE.
    DATA: sum TYPE vbrp-kzwi5.
    DATA: v_vkbur  TYPE vkbur,
          v_adrnr1 TYPE adrnr,
          v_adrnr2 TYPE adrnr,
          v_vbelv  TYPE vbelv,
          v_delch  TYPE vbeln,
          v_bstkd  TYPE bstkd,
          v_kdmat  TYPE kdmat,
          v_kwert  TYPE kwert.
    DATA : fm_name TYPE rs38l_fnam.
    PARAMETER p_inv_no LIKE vbrk-vbeln OBLIGATORY  .
    Selecting Data
    SELECT VBELN
            ERDAT
            VKORG
            KUNRG
            STCEG
            NETWR
            MWSBK
            KNUMV
            KUNAG
            REGIO
      FROM vbrk
      INTO CORRESPONDING FIELDS OF TABLE it_vbrk
      WHERE vbeln = p_inv_no .
    SELECT matnr
           kzwi1
           kzwi2
           kzwi3
           kzwi4
           kzwi5
           netwr
           mwsbp
           meins
           fklmg
           arktx
           FROM vbrp
      INTO CORRESPONDING FIELDS OF TABLE it_vbrp
      WHERE vbeln = p_inv_no .
    Selecting Sales Order No.
    SELECT  SINGLE vbelv
      FROM  vbfa
      INTO  v_vbelv
      WHERE vbeln = p_inv_no
      AND   vbtyp_v = 'C'.
    IF sy-subrc = 0.
    Selecting Delivery Challan...
      SELECT  SINGLE vbeln
        FROM  vbfa
        INTO  v_delch
        WHERE vbelv = v_vbelv
        AND   vbtyp_n = 'J'.
      SELECT SINGLE bstkd
        FROM vbkd
        INTO v_bstkd
        WHERE vbeln = v_vbelv .
      SELECT matnr kdmat
        FROM vbap
        INTO CORRESPONDING FIELDS OF TABLE it_vbap
        WHERE vbeln = v_vbelv.
    ENDIF.
    READ TABLE it_vbrk INDEX 1.
    IF sy-subrc = 0.
      SELECT SINGLE kwert
        FROM konv
        INTO v_kwert
        WHERE knumv = iT_vbrk-knumv
        AND   kschl = 'HD00'.
    ENDIF.
    Selecting From Address
    SELECT SINGLE vkbur
      FROM vbak
      INTO v_vkbur
      WHERE vbeln = v_vbelv.
    IF sy-subrc = 0.
      SELECT SINGLE adrnr
        FROM tvbur
        INTO v_adrnr1
        WHERE vkbur = v_vkbur.
      IF sy-subrc = 0.
        SELECT SINGLE *
          FROM adrc
          INTO CORRESPONDING FIELDS OF it_adrc1
          WHERE addrnumber = v_adrnr1.
          APPEND it_adrc1.
      ENDIF.
    ENDIF.
    APPEND it_adrc.
    Selecting TO Address
    SELECT SINGLE adrnr
      FROM vbpa
      INTO v_adrnr2
      WHERE vbeln = p_inv_no
      AND   parvw = 'RE'.
    IF sy-subrc = 0.
      SELECT SINGLE *
        FROM adrc
        INTO CORRESPONDING FIELDS OF it_adrc2
        WHERE addrnumber = v_adrnr2.
        APPEND it_adrc2.
    ENDIF.
    Calling Function Module
    CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME'
      EXPORTING
        formname                 = 'YINVOICE_IS'
      VARIANT                  = ' '
      DIRECT_CALL              = ' '
    IMPORTING
       fm_name                  = fm_name
    EXCEPTIONS
      NO_FORM                  = 1
      NO_FUNCTION_MODULE       = 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.
    Calling Function Module
    CALL FUNCTION fm_name
    *'/1BCDWB/SF00000496'
      EXPORTING
      ARCHIVE_INDEX              =
      ARCHIVE_INDEX_TAB          =
      ARCHIVE_PARAMETERS         =
      CONTROL_PARAMETERS         =
      MAIL_APPL_OBJ              =
      MAIL_RECIPIENT             =
      MAIL_SENDER                =
      OUTPUT_OPTIONS             =
      USER_SETTINGS              = 'X'
        i_vbelv                    = v_vbelv
        i_bstkd                    = v_bstkd
        i_kdmat                    = v_kdmat
        i_kwert                    = v_kwert
        i_delch                    = v_delch
    IMPORTING
      DOCUMENT_OUTPUT_INFO       =
      JOB_OUTPUT_INFO            =
      JOB_OUTPUT_OPTIONS         =
      TABLES
        it_vbrk                    = it_vbrk
        it_vbrp                    = it_vbrp
        it_vbap                    = it_vbap
        it_adrc1                   = it_adrc1
        it_adrc2                   = it_adrc2
    EXCEPTIONS
      FORMATTING_ERROR           = 1
      INTERNAL_ERROR             = 2
      SEND_ERROR                 = 3
      USER_CANCELED              = 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.                    "ENTRY

    hi,
    use this code..
    DATA: i_otf    TYPE itcoo OCCURS 0 WITH HEADER LINE,
          i_tline  TYPE TABLE OF tline WITH HEADER LINE,
          i_record LIKE solisti1 OCCURS 0 WITH HEADER LINE,
    Objects to send mail.
          i_objpack LIKE sopcklsti1 OCCURS 0 WITH HEADER LINE,
          i_objtxt  LIKE solisti1 OCCURS 0 WITH HEADER LINE,
          i_objbin  LIKE solisti1 OCCURS 0 WITH HEADER LINE,
          i_reclist LIKE somlreci1 OCCURS 0 WITH HEADER LINE,
    Variables declarations
          v_len_in LIKE sood-objlen,                            "#EC NEEDED
          v_lines_txt TYPE i,
          v_lines_bin TYPE i,
    Work Area declarations
          w_ctrlop    TYPE ssfctrlop,
          w_return    TYPE ssfcrescl,
          w_compop    TYPE ssfcompop,
          wa_objhead  TYPE soli_tab,
          wa_doc_chng TYPE sodocchgi1,
          wa_buffer   TYPE string.            "To convert from 132 to 255
    Put a IF ELSE condition whether u want form output or E-mail output..
    if it is a E-mail.. then call a small Sub-routine within your program..
    FORM f_email .
      w_ctrlop-getotf    = 'X'.
      w_ctrlop-no_dialog = 'X'.
      w_compop-tdnoprev  = 'X'.
      CALL FUNCTION fnam
        EXPORTING
          control_parameters = w_ctrlop
          output_options     = w_compop
          nast               = nast
          v_tcode            = v_tcode
        IMPORTING
          job_output_info    = w_return
        TABLES
          it_vbdkr           = it_tvbdkr[]
          it_vbdpr           = tvbdpr[]
          it_zglentitycode   = it_zglentitycode[]
          it_vttk            = it_vttk[]
          it_kna1            = it_kna1[]
          it_t005            = it_t005[]
          it_adrc            = it_adrc[]
          it_ekpo            = it_ekpo[]
          it_ekko            = it_ekko[]
          it_vbrp            = it_vbrp[]
          it_mara            = it_mara[]
          it_vbrk            = it_vbrk[]
          it_likp            = it_likp[]
          it_vttp            = it_vttp[]
          it_t001            = it_t001[]
          it_zlogdely        = it_zlogdely[]
          it_prod            = it_prod[]
          it_lineitems       = it_lineitems[]
          it_tvzbt           = it_tvzbt[]
          it_t173t           = it_t173t[]
          it_t005t           = it_t005t[]
          it_zplant          = it_zplant[]
          it_stxbitmaps      = it_stxbitmaps[]
          it_prod_desc       = it_prod_desc[].
      IF sy-subrc <> 0.
        MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
      ENDIF.
      i_otf[] = w_return-otfdata[].
    *Converting the  OFT format data  to  PDf format
      CALL FUNCTION 'CONVERT_OTF'
        EXPORTING
          format        = 'PDF'
          max_linewidth = 132
        IMPORTING
          bin_filesize  = v_len_in
        TABLES
          otf           = i_otf
          lines         = i_tline.
      LOOP AT i_tline.
        TRANSLATE i_tline USING '~'.
        CONCATENATE wa_buffer i_tline INTO wa_buffer.
      ENDLOOP.
      TRANSLATE wa_buffer USING '~'.
      DO.
        i_record = wa_buffer.
        APPEND i_record.
        SHIFT wa_buffer LEFT BY 255 PLACES.
        IF wa_buffer IS INITIAL.
          EXIT.
        ENDIF.
      ENDDO.
    Attachment
      REFRESH:
        i_reclist,
        i_objtxt,
        i_objbin,
        i_objpack.
      CLEAR wa_objhead.
      i_objbin[] = i_record[].
    Create Message Body
    Title and Description
      i_objtxt = 'COMMERCIAL INVOICE'.
      APPEND i_objtxt.
      DESCRIBE TABLE i_objtxt LINES v_lines_txt.
      READ TABLE i_objtxt INDEX v_lines_txt.
      wa_doc_chng-obj_name   = 'COMMERCIAL INVOICE'.
      wa_doc_chng-expiry_dat = sy-datum + 10.
      wa_doc_chng-obj_descr  = 'COMMERCIAL INVOICE'.
      wa_doc_chng-sensitivty = 'F'.
      wa_doc_chng-doc_size   = v_lines_txt * 255.
      CLEAR i_objpack-transf_bin.
      i_objpack-head_start = 1.
      i_objpack-head_num   = 0.
      i_objpack-body_start = 1.
      i_objpack-body_num   = v_lines_txt.
      i_objpack-doc_type   = 'RAW'.
      APPEND i_objpack.
    Attachment
    (pdf-Attachment)
      i_objpack-transf_bin = 'X'.
      i_objpack-head_start = 1.
      i_objpack-head_num   = 0.
      i_objpack-body_start = 1.
      DESCRIBE TABLE i_objbin LINES v_lines_bin.
      READ TABLE i_objbin INDEX v_lines_bin.
      i_objpack-doc_size =  v_lines_bin * 255 .
      i_objpack-body_num  = v_lines_bin.
      i_objpack-doc_type  = 'PDF'.
      i_objpack-obj_name  = 'COMMERCIAL INVOICE'.
      i_objpack-obj_descr = 'COMMERCIAL INVOICE'.
      APPEND i_objpack.
      IF it_adr6[] IS NOT INITIAL.
        LOOP AT it_adr6 INTO wa_adr6.
          CLEAR i_reclist.
          i_reclist-receiver = wa_adr6-smtp_addr.
          i_reclist-rec_type = 'U'.
          i_reclist-com_type = 'INT'.
          APPEND i_reclist.
        ENDLOOP.
        CALL FUNCTION 'SO_NEW_DOCUMENT_ATT_SEND_API1'
          EXPORTING
            document_data = wa_doc_chng
            put_in_outbox = 'X'
          TABLES
            packing_list  = i_objpack
            object_header = wa_objhead
            contents_bin  = i_objbin
            contents_txt  = i_objtxt
            receivers     = i_reclist.
      ENDIF.
    ENDFORM.                    " f_email
    regards
    vijay

  • NEED TO SEND MAIL FROM FORMS...

    DEAR ALL,
    I NEED TO SEND MAIL FROM FORMS WHEN I PRESS THE MAIL BUTTON.
    I HAVE NO IDEA FOR THIS CRITERIA. IF ANY ONE EXPERIENCED WITH
    THIS CRITERIA, PLS HELP ME AND GIVE ME THE CODING FOR THAT.
    AND ALSO PLS EXPLAIN EACH LINE OF CODING, WHICH U POST.
    THANKS IN ADVANCE
    S.BERNANDAS

    Your requirement can be done in forms. Good amounts of advice here. There 244 messages this year alone that fit the search criteria in the Oracle Forms forum.

  • How to create job to run daily based on form values entered and send mail.

    Hi,
    In DB we have 3 columns: creation_date, name, approved_or_not. Default for approved_or_not is 'No'.
    In the application form page suppose I fill in sysdate for creation_date and leave default for approved_or_not and click [create] button.
    Now a job should run everyday and check for where (approved_or_not='No' & creation_date = 'sysdate - 1') and send mail to the person in 'name' field mentioning: 'Approval pending. click on link <some_link> for details on approval'.
    Could anyone give me pointers to example on such job? (Working on APEX 3.0)
    Thanks,
    Priyanka

    create a DBMS JOB
    check out this forum link.
    dbms_job

  • Sending e-mail through oracle form.

    Hi Guys,
    I am using forms6i to develop forms and have deploy them on web using 9iAS.
    Now in one of my form, i need to send the information on that form to a couple of people through e-mail.
    what is the easiest and the best way to send e-mail?
    Can i use any built-in package of oracle on web?
    If someone can help through code, it will be appriciated as i really have no idea how to do it.
    I just want to add a send button on my form... and the formatted inofrmation will be send on a couple of e-mail address.
    Please help me,
    Imran

    You could send it from the database (depending on what version you are running against), check out the UTL_SMTP package. Or look for some package written on top of it since it's no joy to use if you aren't familiar with the low level stuff. Not sure if it handles attachments, something written against the JavaMail API is probably more flexible for that

  • How to send mail from adobe interactive form without opening the outlook

    Hello all,
    When the end user press the submit button i want it to send the XML data without opening the outlook or other mail application.
    Is there a way to do this?
    I tried javascript codes to send mail with UI = false but it did not work.
    Thank you all in advance,
    Eran

    mailForm
    Parameters: bUI, cTo, [cCc], [cBcc], [cSubject], [cMsgBody]
    Returns: nothing
    This method exports the form data and mails the resulting FDF file as an attachment to all recipients,
    with or without user interaction depending on the value of  bUI.
    If it is set to true then the rest of the parameters are used to seed the compose new message window that is displayed to the user.
    If bUI is set to false, the cTo parameter is required and all others are optional.
    You must use a semicolon u201C;u201D to separate multiple recipients in cTo, cCc, cBcc parameters.
    The length limit for cSubject and cMsgBody is 64k bytes.
    Example:
    /* This will pop up the compose new message window */
    this.mailForm(true);
    /* This will send out the mail with the attached FDF file to fun1 @ fun . com and fun2 @ fun . com */
    this.mailForm(false, "fun1 @ fun . com; fun2 @ fun . com", "", "", "This is the subject", "This is the body of the mail.");
    Note:
    This is a Windows-only feature. In addition, the client machine must have its
    default mail program configured to be MAPI enabled in order to use this method.
    I had to change the code:
    instead of this.mailDoc :
    var myDoc = event.target;
    myDoc.mailDoc(false, "fun1 @ fun . com; fun2 @ fun . com", "", "", "This is the subject", "This is the body of the mail." );       
    But the outlook new message window still opens...
    Any Idea's?
    Eran

  • Who send mail from Forms 6i Builder?????

    I need send mail from Forms 6i Builder
    Please help me.
    Write me to [email protected]
    thanks.

    I need send mail from Forms 6i Builder
    Please help me.
    Write me to [email protected]
    thanks.

  • Sending mail via forms no longer working

    Recently, on one of our servers (XServe G4 - 10.3.9) was running both web and mail. Mail was moved off of the server 2 days ago onto a newer server (10.4.7)
    The web server has: php4.3.11 and is ONLY running AFP/OD/Web
    Since the transfer of the mail server to the new machine, all web sites can no longer send mail via their scripts (either by sendmail, php's mail(), or by connecting to SMTP server via php).
    The web logs do not show errors when it attempts to send the mail...
    A look at mail.log shows
    "relay=cyrus, delay=2558, status=deferred (temporary failure. Command output: couldn't connect to lmtpd: Connection refused_ 421 4.3.0 deliver: couldn't connect to lmtpd_)
    As far as I'm aware, the web server/sendmail shouldn't be attempting to use cyrus at all. For the record, Cyrus master is not running.
    All users can access the mail server without any difficulty. DNS entries have been checked and double checked.
    Does anyone know why sendmail and php mail functions stopped working? I really need to get these web forms functioning again. Is the problem with apache, php, sendmail or something else?

    Hi Camelot,
    Thanks for the quick reply and useful suggestion. I did as you mentioned and fired up the mail server.
    The mail "delivered" however, I notice a couple issues in the logs (mail.log)
    issue #1: I have to start cyrus master manually via > sudo /usr/bin/cyrus/bin/master SA and command line start/stop of mail does not start master. Also, when starting master from command line as mentioned, terminal hangs.
    issue #2 (from mail.log) - still getting the same lmtpd error (but messages do finally get delivered):
    Jan 14 03:58:24 www postfix/pipe[2914]: 3503858502D: to=<[email protected]>, relay=cyrus, delay=5327, status=deferred (temporary failure. Command output: couldn't connect to lmtpd: Connection refused_ 421 4.3.0 deliver: couldn't connect to lmptd_ )
    Jan 14 03:59:39 www postfix/cleanup[2906]: B60AE58572B: to=<[email protected]>, relay 123.123.123.123[123.123.123.123], delay=0, status=sent (250 Ok: queued as 9FBF41BCBCA)
    Do you think these are "issues" to contend with or are they "normal" occurances?

  • Send mail from forms 6i

    Do you know how to send mail from forms?
    Thank you

    UTL_SMTP
    UTL_SMTP is designed for sending e-mail over Simple Mail Transfer Protocol (SMTP). It does not have the functionality to implement an SMTP server for mail clients to send e-mail using SMTP.
    http://download-west.oracle.com/docs/cd/B10501_01/appdev.920/a96612/u_smtp.htm#ARPLS074
    Joel Pérez

Maybe you are looking for