Invalid Cursor Error when executing a form

Question

I am getting the following error
"Error Executing Cursor
ORA-01001: invalid cursor"
when I try to "Submit" information in a form based on the procedure below. What's the problem?! The procedure compiles fine.
create or replace procedure MARKETING_FORM_2_7
(ToAdd in Varchar2,
FromAdd in Varchar2,
Subject in Varchar2,
SenderName in Varchar2,
Branch in Varchar2,
Phone in Varchar2,
Address in Varchar2,
Suggestion in Varchar2,
SalesPromo in Varchar2,
TradeshowPrep in Varchar2,
SalesMaterials in Varchar2,
DirectMail in Varchar2,
CounterDays in Varchar2,
BranchCustData in Varchar2,
Other in Varchar2,
ProjectName in Varchar2,
Purpose in Varchar2,
Audience in Varchar2,
WhoPay in Varchar2,
Deadline in Varchar2,
Progress in Varchar2,
EmployeeUpdate in Varchar2,
WESCOWin in Varchar2,
DescribeWin in Varchar2,
PotentialValue in Varchar2,
PartBranches in Varchar2,
SignifPeople in Varchar2,
SpecialFactors in Varchar2)
is
mailhost Varchar2(15) :='CLAPTON';
mail_conn utl_smtp.connection;
crlf varchar2(2):=chr( 13 )||chr( 10 );
mesg varchar2(5000);
begin
mail_conn := utl_smtp.open_connection(mailhost,25);
mesg:= 'From: <'||FromAdd||'>' ||crlf ||
'To: '||ToAdd || crlf ||
'Subject: '||Subject || crlf ||
'' ||crlf||
'Name: '||SenderName || crlf ||
'Branch: '||Branch || crlf ||
'Phone: '||Phone || crlf ||
'Address: '||Address || crlf ||
'Comment or Suggestion: ' || Suggestion || crlf ||
'Sales Promotion Assistance: '|| SalesPromo || crlf ||
'Tradeshow Assistance: '|| TradeshowPrep || crlf ||
'Sales Materials or Presentations Assistance: '|| SalesMaterials || crlf ||
'Direct Mail Assistance: '|| DirectMail || crlf ||
'Counter Days Assistance: '|| CounterDays || crlf ||
'Customer Database Assistance: '|| BranchCustData || crlf ||
'Other: '|| Other || crlf ||
'Project Name: '|| ProjectName|| crlf ||
'Purpose: '|| Purpose || crlf ||
'Indended Audience: '|| Audience || crlf ||
'Who Will Pay?: ' || WhoPay || crlf ||
'Deadline: '|| Deadline || crlf ||
'Progress Made: ' || Progress || crlf ||
'Mailing List Update: ' || EmployeeUpdate || crlf ||
'WESCO Win: '|| WESCOWin || crlf ||
'Win Description: ' || DescribeWin || crlf ||
'Contract Value/Potential Sales: '|| PotentialValue || crlf ||
'Participating Branches: '|| PartBranches || crlf ||
'Significant Contributors: '|| SignifPeople || crlf ||
'Special Factors: '|| SpecialFactors;
utl_smtp.helo(mail_conn, mailhost);
utl_smtp.mail(mail_conn, FromAdd);
utl_smtp.rcpt(mail_conn, ToAdd);
utl_smtp.data(mail_conn, mesg);
utl_smtp.quit(mail_conn);
end;

Answer 1

Try executing the procedure independently (say from sqlplus) to see whether the procedure works fine.
Alternatively, try commenting out the calls to the utl_smtp packages to see whether the procedure works.