Untitled

SET SERVEROUTPUT ON;
DECLARE
CNAME CUSTOMER.CUSTOMERname % TYPE;
CSTREET CUSTOMER.CUSTOMERstreet % TYPE;
CURSOR C IS
SELECT CUSTOMERname,CUSTOMERstreet FROM CUSTOMER WHERE CUSTOMERcity='&c';
BEGIN
OPEN C;
LOOP
FETCH C INTO CNAME,CSTREET;
EXIT WHEN C% NOTFOUND;
dbms_output.put_line(CNAME);
dbms_output.put_line(CSTREET);
END LOOP;
CLOSE C;
END;
/