How to write dynamic pl/sql in oracle8.0.5

Question

In oracle8.0.5
I write the following dynamic pl/sql:
PROCEDURE "DELETESOMEYEARALLRECORDS" (tablename IN VARCHAR2,someyear IN VARCHAR2,commitcount IN INTEGER) IS
     stmt VARCHAR2(500);
     mid_stmt VARCHAR2(200);
     end_stmt VARCHAR2(200);
     count1 INTEGER:=0;
     cursor_handle INTEGER;
BEGIN
/* Create a cursor to use for the dynamic SQL */
cursor_handle := DBMS_SQL.OPEN_CURSOR;
stmt:='SELECT COUNT(*) INTO count1 FROM ';
IF UPPER(tablename)='EOP_PRICE_REPORT' OR UPPER(tablename)='EOP_MCTO'
OR UPPER(tablename)='EOP_EXCHANGERATE' THEN
end_stmt:=' WHERE year =:v1 ';
ELSE
end_stmt:=' WHERE opyear =:v1 ';
END IF;
stmt:=stmt||UPPER(tablename)||end_stmt;
-- EXECUTE IMMEDIATE stmt INTO count1 USING someyear;
DBMS_SQL.PARSE(cursor_handle,stmt,DBMS_SQL.NATIVE);
-- DBMS_SQL.BIND_VARIABLE(cursor_handle, 'v0', tablename);
DBMS_SQL.BIND_VARIABLE(cursor_handle, 'v1', someyear);
DBMS_SQL.EXECUTE(cursor_handle);
The message is :
Error at line** ,column**
PLS-00221:'EXECUTE' is not a procedure or is undefined
How to solve this problem,
Anyone helps me ,Thanks

Answer 1

PROCEDURE "DELETESOMEYEARALLRECORDS"
    (tablename IN VARCHAR2,
     someyear IN VARCHAR2,
     commitcount IN INTEGER) IS
stmt            VARCHAR2(500);
mid_stmt        VARCHAR2(200);
end_stmt        VARCHAR2(200);
count1          INTEGER:=0;
--  how I would define and open the cursor
Cursor_Handle    integer default dbms_sql.open_cursor;
BEGIN
/* Create a cursor to use for the dynamic SQL */
-- You do NOT select INTO when using dynamic Sql
  stmt:='SELECT COUNT(*) FROM ' || TableName ;
  IF UPPER(tablename)='EOP_PRICE_REPORT'
        OR UPPER(tablename)='EOP_MCTO'
        OR UPPER(tablename)='EOP_EXCHANGERATE' THEN
     end_stmt:=' WHERE year =:v1 ';
  ELSE
     end_stmt:=' WHERE opyear =:v1 ';
  END IF;
  stmt:=stmt || end_stmt;
  DBMS_SQL.PARSE(Cursor_Handle,stmt,DBMS_SQL.NATIVE);
-- BIND to exactly the same variable
  DBMS_SQL.BIND_VARIABLE(Cursor_Handle, ':v1', someyear);
-- you need to define the into column
  dbms_sql.define_column( Cursor_Handle, 1, Count1 );
  DBMS_SQL.EXECUTE(Cursor_Handle);
-- after executing you need to fetch the row
-- and do not forget to close the cursor
  if ( dbms_sql.fetch_rows(Cursor_Handle) > 0 ) then
     dbms_sql.column_value(Cursor_Handle, 1, Count1 );
  end if;
  dbms_sql.close_cursor(Cursor_Handle);
...