Problem with utl_smtp.write_data - immediate help needed

Question

Hi,
I have a sql code that generates a .csv file and sends it as an attachment through utl_smtp.
Everything works fine but the .csv file's header gets broken after certain characters..wondering why this is happening..pls help.
Please find my code below:
SET define off;
DECLARE
--CURSOR VARIABLES
v_meter_count NUMBER := 0;
v_meter_max_count NUMBER := 0;
v_sysdate DATE := TRUNC (SYSDATE);
--MAIL VARIABLES
v_run_date DATE := TRUNC (SYSDATE);
crlf CONSTANT VARCHAR2 (10) := UTL_TCP.crlf;
boundary CONSTANT VARCHAR2 (256)
:= '-----7D81B75CCC90D2974F7A1CBD';
first_boundary CONSTANT VARCHAR2 (256) := '--' || boundary || crlf;
last_boundary CONSTANT VARCHAR2 (256)
:= '--' || boundary || '--' || crlf;
multipart_mime_type CONSTANT VARCHAR2 (256)
:= 'multipart/mixed; boundary="' || boundary || '"';
conn UTL_SMTP.connection;
from_name VARCHAR2 (255) := 'Nielsen Online';
from_address VARCHAR2 (255)
:= '[email protected]';
to_address VARCHAR2 (255)
:= '[email protected]';
subject VARCHAR2 (255) := '';
mime_type VARCHAR2 (255) := 'text/plain';
attachment_file_name VARCHAR2 (255) := NULL;
mailhost VARCHAR2 (255) := '127.0.0.1';
--PANELISTS' DETAILS CURSOR
CURSOR tam_panelists
IS
SELECT a.panel_sys_id, a.panel_site_id, a.login_id,
b.recruit_start_date, c.meter_id, d.affiliate_id,
d.afflt_member_id,
(CASE
WHEN b.last_active_date >= TRUNC (SYSDATE) - 30
THEN 'Active'
ELSE 'Inactive'
END
) hh_status,
(SELECT e.affiliate_description
FROM pfshared3.lkp_affiliates e
WHERE e.partner_id =
NVL (d.affiliate_id, 0)
AND e.pnl_sys_id = a.panel_sys_id) affiliate_description
FROM mgtw.dat_ps_login_info a,
mgtw.dat_ps_install_info b,
mgtw.dat_ps_info c,
mgtw.dat_ps_recruit_info d
WHERE a.login_id LIKE 'tam%@tam%.com'
AND a.panel_site_id = b.panel_site_id
AND a.panel_sys_id = b.panel_sys_id
AND a.panel_site_id = c.panel_site_id
AND a.panel_sys_id = c.panel_sys_id
AND a.panel_site_id = d.panel_site_id
AND a.panel_sys_id = d.panel_sys_id
AND a.active_flag = 1
AND b.first_mtr_install_date IS NOT NULL
AND b.last_active_date IS NOT NULL;
--PANELISTS' PC DETAILS CURSOR
CURSOR pc_activity (p_meter_id IN VARCHAR2)
IS
SELECT cpt_guid, first_active_date, last_active_date,
TO_CHAR(first_install_date,'MM/DD/YYYY HH:MI') first_install_dt,
(TRUNC (SYSDATE) - last_active_date) inactive_days,
(CASE
WHEN last_active_date >= TRUNC (SYSDATE) - 30
THEN 'Active'
ELSE 'Inactive'
END
) status
FROM pfshared3.dat_pnl_computers
WHERE meter_id = p_meter_id
ORDER BY last_active_date DESC;
--RECORD TYPE FOR PANELISTS' DETAILS
TYPE t_panelist_set IS TABLE OF tam_panelists%ROWTYPE;
v_panelist_data t_panelist_set;
--RECORD TYPE FOR PANELISTS' PC DETAILS
TYPE t_pc_set IS TABLE OF pc_activity%ROWTYPE;
v_pc_data t_pc_set;
PROCEDURE send_header (NAME IN VARCHAR2, header IN VARCHAR2)
IS
BEGIN
UTL_SMTP.write_data (conn, NAME || ': ' || header || crlf);
END;
BEGIN
--MAX METER COUNT
BEGIN
SELECT MAX(COUNT (meter_id))
INTO v_meter_max_count
FROM pfshared3.dat_pnl_computers
WHERE last_active_date IS NOT NULL
GROUP BY meter_id;
EXCEPTION
WHEN OTHERS
THEN
v_meter_max_count := 0;
END;
DBMS_OUTPUT.put_line ( 'STARTED - '
|| TO_CHAR (SYSDATE, 'DD-MON-YYYY HH:MI:SS')
conn := UTL_SMTP.open_connection (mailhost);
UTL_SMTP.helo (conn, mailhost);
UTL_SMTP.mail (conn, '< ' || from_address || ' >');
UTL_SMTP.rcpt (conn, '< ' || to_address || ' >');
UTL_SMTP.open_data (conn);
send_header ('From', '"' || from_name || '" <' || from_address || '>');
send_header ('To', '' || to_address || '');
send_header ('Date', TO_CHAR (SYSDATE, 'dd Mon yy hh24:mi:ss'));
subject := 'TW Daily Activity Report' || ' - ' || v_run_date;
send_header ('Subject', subject);
send_header ('Content-Type', multipart_mime_type);
-- Close header section by a crlf on its own
UTL_SMTP.write_data (conn, crlf);
-- mime header
UTL_SMTP.write_data (conn, first_boundary);
send_header ('Content-Type', mime_type);
UTL_SMTP.write_data (conn, crlf);
UTL_SMTP.write_data (conn, crlf);
-- add the attachment
attachment_file_name := 'TW_Daily_Activity_Report_' || v_run_date || '.txt';
UTL_SMTP.write_data (conn, first_boundary);
send_header ('Content-Type', mime_type);
send_header ('Content-Disposition',
'attachment; filename= ' || attachment_file_name
UTL_SMTP.write_data (conn, crlf);
--CREATING HEADERS
UTL_SMTP.write_data (conn,
'Date of Reporting'
|| ','
|| 'Panelist ID'
|| ','
|| 'Meter ID'
|| ','
|| 'Panelist Email(Username)'
|| ','
|| 'Vendor'
|| ','
|| 'Affiliate ID'
|| ','
|| 'UID'
|| ','
|| 'Enrollment Date'
|| ','
|| 'HH Status'
|| ','
|| 'Registered PC in the HH'
|| ','
FOR k IN 1 .. v_meter_max_count
LOOP
UTL_SMTP.write_data (conn,
'Installation Date/Time MM/DD/YYYY HH:MI PC' || k || ',' || 'PC '|| k ||': Status' || ',' || 'PC '|| k ||': Date of First log' || ',' || 'PC '|| k ||': Date of Last log' || ',' || 'PC '|| k ||': Days since Last Activity' || ',' || 'PC '|| k ||': Computer ID' || ','
END LOOP;
UTL_SMTP.write_data (conn, crlf);
--OPENING PANELISTS' DETAILS CURSOR
OPEN tam_panelists;
--FETCHING PANELISTS' DETAILS CURSOR
FETCH tam_panelists
BULK COLLECT INTO v_panelist_data;
FOR i IN v_panelist_data.FIRST .. v_panelist_data.LAST
LOOP
--METER COUNT
BEGIN
SELECT COUNT (meter_id)
INTO v_meter_count
FROM pfshared3.dat_pnl_computers
WHERE meter_id = v_panelist_data (i).meter_id
GROUP BY meter_id;
EXCEPTION
WHEN OTHERS THEN
v_meter_count := 0;
END;
--OPENING PANELISTS' PC DETAILS CURSOR
OPEN pc_activity (v_panelist_data (i).meter_id);
--FETCHING PANELISTS' PC DETAILS CURSOR
FETCH pc_activity
BULK COLLECT INTO v_pc_data;
UTL_SMTP.write_data (conn,
v_sysdate
|| ','
|| v_panelist_data (i).panel_site_id
|| ','
|| v_panelist_data (i).meter_id
|| ','
|| v_panelist_data (i).login_id
|| ','
|| v_panelist_data (i).affiliate_description
|| ','
|| v_panelist_data (i).affiliate_id
|| ','
|| v_panelist_data (i).afflt_member_id
|| ','
|| v_panelist_data (i).recruit_start_date
|| ','
|| v_panelist_data (i).hh_status
|| ','
|| v_meter_count
|| ','
FOR j IN v_pc_data.FIRST .. v_pc_data.LAST
LOOP
UTL_SMTP.write_data (conn,
v_pc_data (j).first_install_dt
|| ','
|| v_pc_data (j).status
|| ','
|| v_pc_data (j).first_active_date
|| ','
|| v_pc_data (j).last_active_date
|| ','
|| v_pc_data (j).inactive_days
|| ','
|| v_pc_data (j).cpt_guid
|| ','
END LOOP;
UTL_SMTP.write_data (conn, crlf);
CLOSE pc_activity;
END LOOP;
CLOSE tam_panelists;
-- CLOSE THE MESSAGE
UTL_SMTP.write_data (conn, last_boundary);
-- CLOSE CONNECTION
UTL_SMTP.close_data (conn);
UTL_SMTP.quit (conn);
DBMS_OUTPUT.put_line ( 'ENDED - '
|| TO_CHAR (SYSDATE, 'DD-MON-YYYY HH:MI:SS')
RETURN;
EXCEPTION
WHEN UTL_SMTP.transient_error OR UTL_SMTP.permanent_error
THEN
UTL_SMTP.quit (conn);
raise_application_error
(-20000,
'Failed to send mail due to the following error: '
|| SQLERRM
WHEN OTHERS
THEN
raise_application_error
(-20000,
'Script failed due to the following error: '
|| SQLERRM
RETURN;
END;
Please find below the header of the .csv file generated:
Date of Reporting     Panelist ID     Meter ID     Panelist Email(Username)     Vendor     Affiliate ID     UID     Enrollment Date     HH Status     Registered PC in the HH     Installation Date/Time MM/DD/YYYY HH:MI PC1     PC 1: Status     PC 1: Date of First log     PC 1: Date of Last log     PC 1: Days since Last Activity     PC 1: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC2     PC 2: Status     PC 2: Date of First log     PC 2: Date of Last log     PC 2: Days since Last Activity     PC 2: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC3     PC 3: Status     PC 3: Date of First log     PC 3: Date of Last log     PC 3: Days since Last Activity     PC 3: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC4     PC 4: Status     PC 4: Date of First log     PC 4: Date of Last log     PC 4: Days since Last Activity     PC 4: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC5     PC 5: Status     PC 5: Date of First log     PC 5: Date of Last log     PC 5: Days since Last Activity     PC 5: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC6     PC 6: Status     PC 6: Date of First log     PC 6: Date of Last log     PC 6: Days since Last Activity     PC 6: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC7     PC 7: Status     PC 7: Date of First log     PC 7: Date of Last log     PC 7: Days since Last Activity     PC 7: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC8     PC 8: Status     PC 8: Date of First log     PC 8: Date of Last log     PC 8: Days since Last Activity     PC 8: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC9     PC 9: Status     PC 9: Date of First log     PC 9: Date of Last log     PC 9: Days since Last Activity     PC 9: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC10     PC 10: Status     PC 10: Date of First log     PC 10: Date of Last log     PC 10: Days since Last Activity     PC 10: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC11     PC 11: Status     PC 11: Date of First log     PC 11: Date of Last log     PC 11: Days since Last Activity     PC 11: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC12     PC 12: Status     PC 12: Date of First log     PC 12: Date of Last log     PC 12: Days since Last Activity     PC 12: Computer ID     Installation Date/Time MM/DD/YYYY HH:MI PC13     PC!
*13: Sta                                                                                                                                                                                                                                                                                                                                                                                                                               *
tus     PC 13: Date of First log     PC 13: Date of Last log     PC 13: Days since Last Activity     PC 13: Computer ID                                                                                                                                                                     
The one highlighted in bold is the broken header.
Please provide a solution to this.
Thanks
Monika
Edited by: 953348 on Aug 18, 2012 8:00 AM

Answer 1

I can't provide a solution but maybe a little help. With the header line you posted here it seems to me that a new line starts after 2048 = 2^11 characters. This might be a limitation or a length of any variable in the package.
Maybe you can change this value or shorten the texts in the header to stay below this limit.
A few more things:
- the code, that you posted here became destroyed in lines like UTL_SMTP.mail (conn, '< ' .... because the forum software tried to find html-code between the "<" and ">" signs.
- you can mark code in your postings with (see FAQ). It makes code better readable but it does not help with the "<" and ">" signs.
- you left your e-mail-address in the header of the code. I guess this was not your intention. You can edit it and remove the address even after posting a message.