create or replace PROCEDURE Discount
AS 
	CURSOR c_group_discount
	IS
		select distinct s.course_no, c.description,
		from section s, enrollment e, course c
		where s.section_id = e.section_id
		and c.course_no = s.course_no
		GROUP BY s.course_no, c.description, e.section_id, s.section_id
		HAVING COUNT(*) >= 8;
	
	BEGIN 
		for r_group_discount IN c_group_discount
		LOOP
			UPDATE course
				SET cost = cost * .95
			where course_no = r_group_discount.course_no;
			DBMS_OUTPUT.PUT_LINE
				('A 5% discount has been given to'||
				r_group_discount.course_no ||' '||
				r_group_discount.description
				);
		END LOOP;
	END;
/

SET SERVEROUTPUT ON

SQL> connect scott/tiger@ora10
Connected.

SQL> create or replace procedure prc_will_not_compile
  2  is
  3    l_cnt number;
  4  begin
  5    select count(*)
  6      into l_cnt
  7      from table_scott_doesnt_own;
  8  end;
  9  /

Warning: Procedure created with compilation errors.

SQL> show errors
Errors for PROCEDURE PRC_WILL_NOT_COMPILE:

LINE/COL ERROR
-------- -----------------------------------------------------------------
5/3      PL/SQL: SQL Statement ignored
7/10     PL/SQL: ORA-00942: table or view does not exist
SQL> 
SQL> exec prc_will_not_compile
BEGIN prc_will_not_compile; END;

      *
ERROR at line 1:
ORA-06550: line 1, column 7:
PLS-00905: object SCOTT.PRC_WILL_NOT_COMPILE is invalid
ORA-06550: line 1, column 7:
PL/SQL: Statement ignored


SQL>