السلام عليكم و رحمة الله و بركلته
عندى سؤال فى الpackage محيرنى جدا
هو فى الحقيقة مثال فى كتاب الاوركال يونيفرسيتى بس صعب جدا لا اقدر على فهمه
المثال هو:
Package Specification
CREATE OR REPLACE PACKAGE comm_pkg IS
std_comm NUMBER := 0.10; --initialized to 0.10
PROCEDURE reset_comm(new_comm NUMBER);
END comm_pkg;
Package Body
CREATE OR REPLACE PACKAGE BODY comm_pkg IS
FUNCTION validate(comm NUMBER) RETURN BOOLEAN IS
max_comm employees.commission_pct%type;
BEGIN
SELECT MAX(commission_pct) INTO max_comm
FROM employees;
RETURN (comm BETWEEN 0.0 AND max_comm);
END validate;
PROCEDURE reset_comm (new_comm NUMBER) IS BEGIN
IF validate(new_comm) THEN
std_comm := new_comm; -- reset public var
ELSE RAISE_APPLICATION_ERROR(
-20210, 'Bad Commission');
END IF;
END reset_comm;
END comm_pkg;
و المثال موجود فى المرفقات ايضا لمن يريده
أرجو من اصحاب الخبرة شرح هذا المثال لانى لا استطيع فهمه و جزاكم الله خيرا