How do i include this 'select' stmt in a 'procedure'.

Question

create or replace procedure proc1
AS
BEGIN
select table1.name,table1.symbol,table1.quantity,table2.price,(table1.quantity*table2.price) AS Total
from table1,table2
where table2.date=(select date from
table2,table1,table3
where table1.date=table3.date
AND table1symbol=table2.symbol)
END;
here, name and symbol are varchar2
and quantity and price are number
date is date
the main problem is tht select in a procedure requires an INTO clause
The normal select query is running but i am unable to transform it into a procedure using variables and cursors
can u solve this prob for me...??

Answer 1

> The normal select query is running but i am unable to
transform it into a procedure using variables and cursors
There are a couple of ways to define cursors - even a plain SQL as what you have posted is a cursor.
The details:
Oracle® Database PL/SQL User's Guide and Reference
Chapter 6. Performing SQL Operations from PL/SQL
http://download-east.oracle.com/docs/cd/B19306_01/appdev.102/b14261/toc.htm
The basics - for an explicit cursor you want to use bulk collection 99% of the time in order for performance and scalability. So (assuming the SQL has been analysed and optimised):
create or replace procedure proc1 as
-- define an explicit cursor
cursor myCursor is
select
table1.name,table1.symbol,table1.quantity,
table2.price,(table1.quantity*table2.price) AS Total
from table1,table2
where table2.date=(
select
date
from table2,table1,table3
where table1.date=table3.date
and table1.symbol=table2.symbol
-- define an array type for fetching the rows into
type TBuffer is table of myCursor%ROWTYPE;
-- define an array for fetching the rows into
buffer TBuffer;
begin
open myCursor;
loop
-- fetch a max of 1000 rows at a time
fetch myCursor bulk collect into buffer limit 1000;
-- process these rows
for i in 1..buffer.Count
loop
-- buffer needs to be subscripted to get to the row,
-- and buffer contains the columns that were selected
-- from the tables, e.g.
DBMS_OUTPUT.put_line( 'Processing '||buffer(i).name );
Proc2( buffer(i) );
end loop;
exit when myCursor%NOTFOUND;
end loop;
close myCursor;
end;
All the details of bulk processing and cursors are in the PL/SQL User Guide - with examples.