كود لاحتساب ايام التأخير

[tamer14]

الاخوة الاعزاء انا اقوم بعمل برنامج لتسجيل المهام للموظفين وقد قمت بكتابة هذا البروسيجر ووضعته في JOB وهو يعتمد على انا ايام التأخير يتم تحدثيها تلقائيا ، فارجو افادتي عن صحة الكود اما لا واذا كان هناك نقص فارجو الافادة عنه ولكم جزيل الشكر
CREATE OR REPLACE PROCEDURE TASK_DELAY IS
V_DELAY NUMBER;
BEGIN
SELECT DELAY_DAYS
INTO V_DELAY
FROM TASK_EMP
WHERE delay_days = trunc(sysdate - task_end,0);
IF V_DELAY >0
THEN
UPDATE TASK_EMP
SET DELAY_DAYS = V_DELAY;
END IF;
END;
/

[ahmed el kilany]

SELECT DELAY_DAYS
INTO V_DELAY
FROM TASK_EMP
WHERE
:delay_days = nvl( sysdate - task_end, 0 ) +1 ;
IF V_DELAY >0
THEN
UPDATE TASK_EMP
SET DELAY_DAYS = V_DELAY;
END IF;
END;

إذا واجهت شيئ اخر ارجو مراسلتى وأن شاء الله نجد الحل
وللعم + 1 الى فى اخر عملية الطرح هنا لآنه عند طرح تاريخ من تاريخ يكون الناتج تلقائيأ - 1
وأرجو التوفيق