Send email with attachments from oracle procedure

Question

This is my procedure
CREATE OR REPLACE PROCEDURE send_parvo_email IS
v_header varchar2(200);
v_file UTL_FILE.FILE_TYPE;
v_count Number;
v_letter Varchar(50);
req UTL_HTTP.REQ;
req1 UTL_HTTP.REQ;
resp UTL_HTTP.RESP;
resp1 UTL_HTTP.RESP;
url VARCHAR2 (2000);
url1 VARCHAR2 (2000);
val varchar2(4000);
val1 varchar2(4000);
p_start_date DATE;
p_end_date DATE;
v_shipment_id varchar2(30);
--v_start_date  DATE;
--v_end_date DATE;
Cursor C1 is select shipment_id
from ship_hdr
where trunc(create_time) = trunc(sysdate);
BEGIN
v_letter := 'r_parvo_b19_rpt';
select trunc(sysdate-7),trunc(sysdate-2)
into p_start_date,p_end_date
from dual;
Open C1;
Fetch C1 into v_shipment_id;
Close C1;
save_parvo_email;
UTL_HTTP.SET_PROXY (null,null);
url :=
utl_url.ESCAPE
( 'http://hbc-maroon.heartlandbc.org/reports/rwservlet?userid=test/[email protected]&subject="Parvo Testing Report"&destype=mail&FROM=[email protected]&desname=[email protected]&desformat=PDF&ENVID=QA&report='||v_letter||'&start_date='||p_start_date||'&end_date='||p_end_date);
req := UTL_HTTP.BEGIN_REQUEST (url);
UTL_HTTP.SET_HEADER (req, 'User-Agent', 'Mozilla/4.0 Oracle');
resp := UTL_HTTP.GET_RESPONSE (req);
UTL_HTTP.READ_LINE (resp, val, TRUE);
UTL_HTTP.END_RESPONSE (resp);
Update ship_dtl
set shipment_printed = 'Y'
where shipment_printed is null
and trunc(coll_date) between p_start_date and p_end_date;
commit;
END;
This works fine and sends email with the report as attachment. The attachment is report_name.pdf. I want to change this attachment to be named as shipment_id.pdf. Is this possible and how?
If there is any other method to sent email with attachments . ie run the report and attach the report to the email not as report_name.rdf but shipmenmt_id.rdf

Answer 1

This is my procedure
CREATE OR REPLACE PROCEDURE send_parvo_email IS
v_header varchar2(200);
v_file UTL_FILE.FILE_TYPE;
v_count Number;
v_letter Varchar(50);
req UTL_HTTP.REQ;
req1 UTL_HTTP.REQ;
resp UTL_HTTP.RESP;
resp1 UTL_HTTP.RESP;
url VARCHAR2 (2000);
url1 VARCHAR2 (2000);
val varchar2(4000);
val1 varchar2(4000);
p_start_date DATE;
p_end_date DATE;
v_shipment_id varchar2(30);
--v_start_date  DATE;
--v_end_date DATE;
Cursor C1 is select shipment_id
from ship_hdr
where trunc(create_time) = trunc(sysdate);
BEGIN
v_letter := 'r_parvo_b19_rpt';
select trunc(sysdate-7),trunc(sysdate-2)
into p_start_date,p_end_date
from dual;
Open C1;
Fetch C1 into v_shipment_id;
Close C1;
save_parvo_email;
UTL_HTTP.SET_PROXY (null,null);
url :=
utl_url.ESCAPE
( 'http://hbc-maroon.heartlandbc.org/reports/rwservlet?userid=test/[email protected]&subject="Parvo Testing Report"&destype=mail&[email protected]&[email protected]&desformat=PDF&ENVID=QA&report='||v_letter||'&start_date='||p_start_date||'&end_date='||p_end_date);
req := UTL_HTTP.BEGIN_REQUEST (url);
UTL_HTTP.SET_HEADER (req, 'User-Agent', 'Mozilla/4.0 Oracle');
resp := UTL_HTTP.GET_RESPONSE (req);
UTL_HTTP.READ_LINE (resp, val, TRUE);
UTL_HTTP.END_RESPONSE (resp);
Update ship_dtl
set shipment_printed = 'Y'
where shipment_printed is null
and trunc(coll_date) between p_start_date and p_end_date;
commit;
END;
This works fine and sends email with the report as attachment. The attachment is report_name.pdf. I want to change this attachment to be named as shipment_id.pdf. Is this possible and how?
If there is any other method to sent email with attachments . ie run the report and attach the report to the email not as report_name.rdf but shipmenmt_id.rdf