الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

ارجوا مساعده فى كود

بدأه EL-SAYED في 15 يوليو 2008 · 1 رد · 1,176 مشاهدة · في قسم لغةالاجرائات Pl/sql
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

--كود لأظهار اسم وراتب الموظفين فى قسم ما

--بينما عند ادخال رقم قسم خطأ تعمل البرنامج بشكل صحيح وعند ادخال رقم قسم صح يظهر الخطا

--المشكله انه بيظهر رساله الخطأ فى الحالتين

declare

cursor cur_emp is select last_name,salary

from employees

where department_id=&DEPT;

v_emp cur_emp%rowtype;

ERROR_DEPT EXCEPTION;

begin

open cur_emp;

loop

fetch cur_emp into v_emp;

exit when cur_emp%notfound;

dbms_output.put_line(v_emp.last_name||' get '||v_emp.salary) ;

end loop;

IF CUR_EMP%NOTFOUND

THEN

RAISE ERROR_DEPT;

END IF ;

close cur_emp;

EXCEPTION

WHEN ERROR_DEPT

THEN

DBMS_OUTPUT.PUT_LINE('WRONGE DEPTNO TRY AGAIN.......');

end ;

بمعنى اخر عاوز اعالج الخطأ والذى قد يحدث من جمله الكرسور

#2

--كود لأظهار اسم وراتب الموظفين فى قسم ما

--بينما عند ادخال رقم قسم خطأ تعمل البرنامج بشكل صحيح وعند ادخال رقم قسم صح يظهر الخطا

--المشكله انه بيظهر رساله الخطأ فى الحالتين 

declare 
cursor cur_emp is select last_name,salary 
				  from employees 
				  where department_id=&DEPT;
v_emp cur_emp%rowtype;
ERROR_DEPT EXCEPTION;

begin 
 open cur_emp;
  loop
	fetch cur_emp into v_emp;

	exit when cur_emp%notfound;
	dbms_output.put_line(v_emp.last_name||' get '||v_emp.salary);
 end loop;

  IF CUR_EMP%NOTFOUND 
  THEN 
	 RAISE ERROR_DEPT;
  END IF;

 close cur_emp;

EXCEPTION
  WHEN ERROR_DEPT
  THEN 
  DBMS_OUTPUT.PUT_LINE('WRONGE DEPTNO  TRY AGAIN.......');


end;

بمعنى اخر عاوز اعالج الخطأ والذى قد يحدث من جمله الكرسور

مواضيع مشابهة