Discussion :

[Lanfear]

Bonjour,

Je cherche a mettre en place une procédure stockée qui me permettrait d'envoyer des mails automatiquement avec plusieurs pièces jointes générées par la procédure et non pas stockée physiquement dans un répertoire.

J'ai repris le package mail_demo trouvé ici, j'ai bien compris le principe de création d'un pièce jointe et l'envoie de celle-ci mais je n'arrive pas a envoyer 2 pièces jointes différentes dans mon mail.

Je ne vais pas remettre tout le code mais juste la procédure d'envoi que j'ai faite

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
 
PROCEDURE mail_bl(v_bl        IN  VARCHAR2
                  , v_dest      IN VARCHAR2) IS
 
      conn              utl_smtp.connection;
      req               utl_http.req;  
      resp              utl_http.resp;
      data              RAW(200);
      v_html_head       LONG; /* HEADER HTML */
      v_html_style      LONG; /* DEFINI LA FEUILLE DE STYLE HTLM */
      v_html_body       LONG;  /* BODY HTML */
      v_data            LONG; /* COPRS DE LA PIECE JOINTE */
      v_corps           LONG; /* CORPS DU MESSAGE */
 
    BEGIN
 
    v_html_head := TEIS_MAIL_PKG.html_header(v_bl);
 
    v_html_body := TEIS_MAIL_PKG.html_body(v_bl); -- LE NUMERO DE BL PERMETTRA LA CREATION DU CORPS DU FICHIER AVEC LES INFORMATIONS LIEES AU BL
 
    v_data := v_html_head || v_html_body;
    v_data1 := v_html_head || v_html_body;
 
    v_corps := '___________________ <br />
                &nbsp;&nbsp;Societe<br />
                &nbsp;&nbsp;Fin de pr&eacute;paration <br />
                ___________________ <br />   
                 <br /><br />
                + Ci-joint le Bon de Livraison N&deg; ' || v_bl || ' <br /> 
                |____________________________________________________________ <br />
                <br /><br />';
 
    /* ----------------------------------------------------------------
        INFOS MAIL
    ------------------------------------------------------------------- */
 
      conn := TEIS_MAIL_PKG.begin_mail(
        sender     => 'BL_MAC <TSC_BLMAC@ma_societe.com>', 
        recipients => 'TSC_BLMAC@ma_societe.com', 
        subject    => v_dest,                               
        mime_type  => TEIS_MAIL_PKG.MULTIPART_MIME_TYPE);
 
    /* ----------------------------------------------------------------
        CORPS DU MESSAGE
    ------------------------------------------------------------------- */
 
      TEIS_MAIL_PKG.attach_text(
        conn      => conn,
        data      => v_corps,
        mime_type => 'text/html');
 
    /* ----------------------------------------------------------------
        PIECES JOINTE
    ------------------------------------------------------------------- */
 
      TEIS_MAIL_PKG.attach_text(
        conn      => conn,
        data      => v_data,
        mime_type => 'text/html',
        inline    => FALSE,
        filename  => 'BL_' || v_bl ||'.html',
        last      => TRUE); 
 
      TEIS_MAIL_PKG.end_mail( conn => conn );
 
    END;

J'appel don la procédure attach_text du package pour ajouter la pièce jointe généré mais si je fais 2 fois cet appel, je n'envoie que le premier fichier généré avec une taille égale à la somme des 2 fichiers ....

Quelqu'un peut il m'aider please.

[Lanfear]

rooh bah c'etait facile en fait :p

Lorsque j'appelle la procédure attach_text pour l'ajout de pièces jointe, le dernier paramètre était a TRUE ce qui correspond a "est ce la derniere piece a ajouter?" ... du coup avec ce qui suit ca marche

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
 
PROCEDURE mail_bl(v_bl        IN  VARCHAR2
                  , v_dest      IN VARCHAR2) IS
 
      conn              utl_smtp.connection;
      req               utl_http.req;  
      resp              utl_http.resp;
      DATA              RAW(200);
      v_html_head       LONG; /* HEADER HTML */
      v_html_style      LONG; /* DEFINI LA FEUILLE DE STYLE HTLM */
      v_html_body       LONG;  /* BODY HTML */
      v_data            LONG; /* COPRS DE LA PIECE JOINTE */
      v_corps           LONG; /* CORPS DU MESSAGE */
 
    BEGIN
 
    v_html_head := TEIS_MAIL_PKG.html_header(v_bl);
 
    v_html_body := TEIS_MAIL_PKG.html_body(v_bl); -- LE NUMERO DE BL PERMETTRA LA CREATION DU CORPS DU FICHIER AVEC LES INFORMATIONS LIEES AU BL
 
    v_data := v_html_head || v_html_body;
    v_data1 := v_html_head || v_html_body;
 
    v_corps := '___________________ <br />
                &nbsp;&nbsp;Societe<br />
                &nbsp;&nbsp;Fin de pr&eacute;paration <br />
                ___________________ <br />   
                 <br /><br />
                + Ci-joint le Bon de Livraison N&deg; ' || v_bl || ' <br /> 
                |____________________________________________________________ <br />
                <br /><br />';
 
    /* ----------------------------------------------------------------
        INFOS MAIL
    ------------------------------------------------------------------- */
 
      conn := TEIS_MAIL_PKG.begin_mail(
        sender     => 'BL_MAC <TSC_BLMAC@ma_societe.com>', 
        recipients => 'TSC_BLMAC@ma_societe.com', 
        subject    => v_dest,                               
        mime_type  => TEIS_MAIL_PKG.MULTIPART_MIME_TYPE);
 
    /* ----------------------------------------------------------------
        CORPS DU MESSAGE
    ------------------------------------------------------------------- */
 
      TEIS_MAIL_PKG.attach_text(
        conn      => conn,
        DATA      => v_corps,
        mime_type => 'text/html');
 
    /* ----------------------------------------------------------------
        PIECES JOINTE
    ------------------------------------------------------------------- */
 
      TEIS_MAIL_PKG.attach_text(
        conn      => conn,
        DATA      => v_data,
        mime_type => 'text/html',
        inline    => FALSE,
        filename  => 'BL_' || v_bl ||'.html',
        last      => FALSE); 
 
      TEIS_MAIL_PKG.attach_text(
        conn      => conn,
        DATA      => v_data,
        mime_type => 'text/html',
        inline    => FALSE,
        filename  => 'BL_' || v_bl ||'.doc',
        last      => TRUE);  
 
      TEIS_MAIL_PKG.end_mail( conn => conn );
 
    END;