|
create or replace package EmailUtils as
procedure SetSender(pSender in varchar2);
function GetSender
return varchar2;
procedure SetRecipient(pRecipient in varchar2);
function GetRecipient
return varchar2;
procedure SetCcRecipient(pCcRecipient in varchar2);
function GetCcRecipient
return varchar2;
procedure SetMailHost(pMailHost in varchar2);
function GetMailHost
return varchar2;
procedure SetSubject(pSubject in varchar2);
function GetSubject
return varchar2;
procedure Send(pMessage in varchar2);
procedure Send(pSender in varchar2,
pRecipient in varchar2,
pMailHost in varchar2,
pCcRecipient in varchar2 := null,
pSubject in varchar2 := null,
pMessage in varchar2 := null);
end EmailUtils;
/ |