PLSQL_通过UTL_MAIL发送并发程式结果报表至用户邮箱（案例）

2014-06-01 Created By BaoXinjian

一、摘要

---

在开发报表时，客户有时候会要求在运行报表后，系统自动会将报表的结果发送至客户邮箱

遇到这种情况，有很多的技术去实现，包括workflow，alert，utl_mail等等

之前做过一个小需求将invoice结果发送给客户如下

做需求必须分析以下几个构建

• 程式的Layout存放在服务器哪个目录下
• 在database directory表中是否建立该路径的虚拟路径
• utl_file如何去读文件
• utl_mail如何去发邮件

 

二、案例

---

需求：将Invoice程式的输出结果自动发送给客户邮箱

    1. 报表默认输出方式

    2. 报表的最终的方式为PDF

    3. 运行报表，查看layout

    4. 其layout显示

    5. 其layout的存放的位置

    6. 建立改路径

    7. 使用测试脚本

    8. 收到email

 

三、案例实现

---

Step1. 报表默认输出方式

    

Step2. 报表的最终的方式为PDF

    

Step3. 运行报表，查看layout

    

Step4. 其layout显示

    

Step5. 其layout的存放的位置

    

Step6. 建立改路径

    

Step7. 使用测试脚本

DECLARE

   p_request_id   VARCHAR2 := '19087352';

   l_output       UTL_FILE .file_type ;

   l_file         RAW (32767);

   l_size         NUMBER;

   BLOCK          NUMBER;

   b              BOOLEAN;

BEGIN

   UTL_FILE.FGETATTR ('C_CONC_REQOUT_DIR' ,'C_AP_SPLITTER_R_' || p_request_id || '_1.PDF',

                                   b,

                                   l_size ,

                                   BLOCK);

 

   l_output :=  UTL_FILE .fopen ('C_CONC_REQOUT_DIR',  'C_AP_SPLITTER_R_' || p_request_id || '_1.PDF',  'r');

 

   UTL_FILE.get_raw (l_output, l_file, l_size);

 

   UTL_FILE.fclose (l_output);

 

   UTL_MAIL.SEND_ATTACH_RAW (sender         => 'bao@motorola.com',

                             recipients     => 'bcrp67@motorola.com',

                             subject        => 'subject',

                             attachment     => l_file,

                             MESSAGE        => 'messge',

                             att_inline     => FALSE,

                             att_filename   => 'C_AP_SPLITTER_R_' || p_request_id || '_1.PDF');

END;

Step8. 收到email

    

 

Thanks and Regards