Send sms

[admin]

DB 10g
procedure is as....
Create or Replace Procedure SEND_SMS
( p_sender in varchar2,
p_recipient in varchar2,
p_message in varchar2)
as
mailcon utl_smtp.connection;
begin
mailcon :=utl_smtp.open_connection('mail.thxis..com');
utl_smtp.helo(mailcon,'mail.thxis..com');
utl_smtp.mail(mailcon,p_sender);
utl_smtp.rcpt(mailcon,p_recipient );
utl_smtp.data(mailcon,'From: ' ||p_sender|| utl_tcp.crlf||
'To: ' || p_recipient ||utl_tcp.crlf ||
'Subject: SMS From Database' || utl_tcp.crlf ||
p_message);
utl_smtp.quit(mailcon);
end;


executing as
exec SEND_SMS('test@thxis.com', '9921182989@ideacellular.net','This is my first SMS');

getting error as
ORA-30678: too many open connections
ORA-06512: at "SYS.UTL_TCP", line 17
ORA-06512: at "SYS.UTL_TCP", line 246
ORA-06512: at "SYS.UTL_SMTP", line 115
ORA-06512: at "SYS.UTL_SMTP", line 138
ORA-06512: at "APPS.SEND_SMS", line 8
ORA-06512: at line 1


at which position i get wrong....
by using same process mail going correctly but sms is not going it throwing error