wed579 بتاريخ: 27 ديسمبر 2009 تقديم بلاغ مشاركة بتاريخ: 27 ديسمبر 2009 product table(prodid,dec) حقلين رقم المنتج ووصفه1- انشىء روتين باسم add لإدراج منتج جديد في جدول المنتجات product استخدم رقم المنتج والوصف كبارميتر للروتين2- انشىءروتين باسم upp لتعديل وصف منتج لمنتج ما في جدول المنتجات(product) وزود هذا الروتين ببراميتر يمثل رقم النتج وآخر يمثل الوصف الجديد. أضف جزءا خاصا بمعالجة استثناء عدم وجود منتج للتعديل.3- انشىء روتين باسم del لحذف منتج ما في جدول المنتجات (product) وزود هذا الروتين ببراميتر يمثل رقم النتج المراد حذفه،اضف جزاء خاص بمعالجة استثناء عدم وجود المنتج للحذف...*****************************************function1- اكتب وظيفة اسمها prod_dec تستقبل بارميتر مدخل يمثل رقم المنتج ولها مخرج واحد يمثل وصف المنتج من جدول المنتجات2- اكتب وظيفة اسمها ann تستقبل بارميتر يمثل رقم الموظف ولها قيمة مرتجعة واحدة هي الدخل السنوي للموظف،علما ان الدخل السنوي للموظف يحسب بالعلاقة(sal*12)+comm مع الاخذ بالاعتبار ان قيمة comm يمكن تكون null اقتباس رابط هذا التعليق شارك المزيد من خيارات المشاركة
@nana@ بتاريخ: 27 ديسمبر 2009 تقديم بلاغ مشاركة بتاريخ: 27 ديسمبر 2009 product table(prodid,dec) حقلين رقم المنتج ووصفه1- انشىء روتين باسم add لإدراج منتج جديد في جدول المنتجات product استخدم رقم المنتج والوصف كبارميتر للروتين2- انشىءروتين باسم upp لتعديل وصف منتج لمنتج ما في جدول المنتجات(product) وزود هذا الروتين ببراميتر يمثل رقم النتج وآخر يمثل الوصف الجديد. أضف جزءا خاصا بمعالجة استثناء عدم وجود منتج للتعديل.3- انشىء روتين باسم del لحذف منتج ما في جدول المنتجات (product) وزود هذا الروتين ببراميتر يمثل رقم النتج المراد حذفه،اضف جزاء خاص بمعالجة استثناء عدم وجود المنتج للحذف...***************************************** 1create or replace procedure add_product (id IN product.p_id%type, pdesc IN product.p_desc%type) is begin insert into product(p_id,p_desc) values(id,pdesc); end add_product; ----------------------------------------------------2 create or replace procedure upd_product (id IN product.p_id%type, pdesc IN product.p_desc%type) is err exception; begin update product set p_desc=pdesc where p_id=id; if sql%notfound then raise err; end if; exception when err then dbms_output.put_line('this product not found '); end upd_product; -----------------------------------------------3 create or replace procedure del_product (id IN product.p_id%type) is err exception; begin delete from product where p_id=id; if sql%notfound then raise err; end if; exception when err then dbms_output.put_line('this product not found '); end del_product; اقتباس رابط هذا التعليق شارك المزيد من خيارات المشاركة
@nana@ بتاريخ: 27 ديسمبر 2009 تقديم بلاغ مشاركة بتاريخ: 27 ديسمبر 2009 function1- اكتب وظيفة اسمها prod_dec تستقبل بارميتر مدخل يمثل رقم المنتج ولها مخرج واحد يمثل وصف المنتج من جدول المنتجات2- اكتب وظيفة اسمها ann تستقبل بارميتر يمثل رقم الموظف ولها قيمة مرتجعة واحدة هي الدخل السنوي للموظف،علما ان الدخل السنوي للموظف يحسب بالعلاقة(sal*12)+comm مع الاخذ بالاعتبار ان قيمة comm يمكن تكون null 1-----------------------create or replace function product_desc(id product.p_id%type) return varchar2 IS pr_desc product.p_desc%type; err exception; begin select p_desc into pr_desc from product where p_id=id; if sql%notfound then pr_desc:='not found'; else return pr_desc; end if; exception when others then raise_application_error(-20001,'An error was encountered - '||SQLCODE||' -ERROR- '||SQLERRM); end product_desc; ------------------------------------------2 create or replace function annual(emp_id employees.employee_id%type) return number IS sal employees.salary%type; comm employees.commission_pct%type; begin select salary,nvl(commission_pct,0) into sal,comm from employees where employee_id=emp_id; return (sal*12)+comm; end annual; اقتباس رابط هذا التعليق شارك المزيد من خيارات المشاركة
Recommended Posts
انضم إلى المناقشة
يمكنك المشاركة الآن والتسجيل لاحقاً. إذا كان لديك حساب, سجل دخولك الآن لتقوم بالمشاركة من خلال حسابك.