how can I allow this procedure to attach to email(pdf file in the directory), pdf file that is > 32000 bytes?

From: Mzwanele Ngubane <ngubanemj_at_gmail.com>
Date: Tue, 19 Feb 2019 21:04:34 -0800 (PST)
Message-ID: <db5f734a-c2e4-432d-9453-3ca1675fca9f_at_googlegroups.com>

The base procedure mail_attach_binary(created below) to e-mail binary files from a directory location on the database (/home/alert)

My Question is from here how can at
how can I allow this procedure to attach to email(pdf file in the directory), pdf file that is > 32000 bytes?

--SPEC

PROCEDURE mail_attach_binary

    (recipients VARCHAR2,

     cc VARCHAR2 DEFAULT NULL,
     subject VARCHAR2,
     message VARCHAR2 DEFAULT NULL,
     att_filename VARCHAR2 DEFAULT NULL,
     att_file_loc  VARCHAR2);     

END SPP_EMAIL;
--BODY

PROCEDURE mail_attach_binary

    (recipients     VARCHAR2,
     cc             VARCHAR2,
     subject        VARCHAR2,
     message        VARCHAR2,
     att_filename   VARCHAR2,
     att_file_loc   VARCHAR2) AS


--file attachment paramaters     


    v_bfile         BFILE;
    v_clob          CLOB;
    destOffset      INTEGER:=1;
    srcOffset       INTEGER := 1;

    lang_context INTEGER := DBMS_LOB.default_lang_ctx;     warning INTEGER;     

• v_mime_type VARCHAR2(30) := 'application/pdf';

  BEGIN        setup_smtp_server;
--Get the file to attach to the e-mail

    v_bfile := BFILENAME (att_file_loc, att_filename);

    DBMS_LOB.OPEN (v_bfile); 
    DBMS_LOB.CREATETEMPORARY(v_clob, TRUE, DBMS_LOB.SESSION);   
    DBMS_LOB.LOADCLOBFROMFILE(
        dest_lob => v_clob, 
        src_bfile => v_bfile, 
        amount => DBMS_LOB.GETLENGTH(v_bfile), 
        dest_offset => destOffset, 
        src_offset => srcOffset,
        bfile_csid => DBMS_LOB.default_csid,
        lang_context => lang_context,
        warning => warning); 
    DBMS_LOB.CLOSE(v_bfile);     
    
    EXCEPTION WHEN
      INVALID_ARGUMENT THEN
      alert('EMAIL',1000,'Invalid argument passed to e-mail attachment from utl_mail.send_attach_varchar2');

  END mail_attach_binary;    Received on Wed Feb 20 2019 - 06:04:34 CET