Implicit cursor and exception

INSERT ALL
INTO STUDENT VALUES (1,'AHMED',3.5)
INTO STUDENT VALUES (2,'ALI',4.5)
INTO STUDENT VALUES (3,'SALEH',4.0)
SELECT * FROM DUAL;
/*

)INSERT, UPDATE OR DELETE ( DML جملة تنفيذ عند تلقائيا انشاءها يتم: Implicit cursor

بعد انشاء جدول للطالب واضافة بيانات 3 طالب، سيتم التعديل على معدالت الطالب الذين معدالتهم اكبر من او تساوي
4 ،وباستخدام خصائص الكورسر الضمني )attributes cursor implicit )سيتم التحقق من ان هناك طالب تم تغيير
معدالتهم ومن ثم طباعة عددهم او طباعه رسالة انه ال يوجد أي تعديل تم

*/


DECLARE
STD_NO NUMBER;
BEGIN
UPDATE STUDENT
SET GRADE = GRADE+0.1
WHERE GRADE >=4;
IF SQL%FOUND THEN
STD_NO := SQL%ROWCOUNT;
DBMS_OUTPUT.PUT_LINE('THERE ARE '||STD_NO||' STUDENT WHOES GARDES HAVE
CHANGED' );
ELSIF SQL%NOTFOUND THEN
DBMS_OUTPUT.PUT_LINE('THERE IS NO CHANGE HAPPEN ');
END IF;
END;
--############################


/*
help in Exception
*/

DECLARE
 Declaration section
BEGIN
 EXCEPTION section
EXCEPTION
WHEN NO_DATA_FOUND THEN
 -Error handling statements
WHEN DUP_VAL_ON_INDEX THEN
 -Error handling statements
 WHEN TOO_MANY_ROWS THEN
 -Error handling statements
WHEN OTHERS THEN
 -Error handling statements
END;

--ex

DECLARE
N EMPLOYEES.LAST_NAME%TYPE;
S EMPLOYEES.SALARY%TYPE;
I EMPLOYEES.EMPLOYEE_ID%TYPE:=:EMPLOYEE_ID;
BEGIN
SELECT LAST_NAME, SALARY INTO N,S
FROM EMPLOYEES
WHERE EMPLOYEE_ID = I;
DBMS_OUTPUT.PUT_LINE('NAME: '||N);
DBMS_OUTPUT.PUT_LINE('SALARY: '||S);
EXCEPTION
WHEN NO_DATA_FOUND THEN
DBMS_OUTPUT.PUT_LINE(' EMPLOYEE ID IS NOT CORRECT');
END;


--############################

--unamed excption


DECLARE
parent_key_not_found EXCEPTION;
PRAGMA EXCEPTION_INIT (parent_key_not_found,-02291);
BEGIN
INSERT INTO std VALUES (112,'ahmed',2);
EXCEPTION
WHEN parent_key_not_found THEN
DBMS_OUTPUT.put_line('department not found');
WHEN DUP_VAL_ON_INDEX THEN
DBMS_OUTPUT.put_line('student id is already used');
WHEN OTHERS THEN
DBMS_OUTPUT.put_line('ERROR...');

END;

--############################
-- User defined exception


DECLARE
M STDD.MARK%TYPE:=:MARK;
MARK_CHECK EXCEPTION;
BEGIN
IF M NOT BETWEEN 0 AND 100 THEN
RAISE MARK_CHECK;
END IF;
UPDATE STDD SET MARK = M
WHERE SID =111;
EXCEPTION
WHEN MARK_CHECK THEN
DBMS_OUTPUT.put_line('MARK MUST BE BETWEEN 0 AND 100');
END;


--################################