عندي بيانات على شكل tabluer المطلوب انه لمن حقل الكمية مثلا في الريكورد يعمل UPDATE في جدول المخازن الكود الاتي شغال بس التحديث يكون لاول ريكورد فقط و يتجاهل الريكورد الثاني

هذا هو الكود

BEGIN
FOR R IN (SELECT QTY 
FROM STORE 
WHERE ITEM_NO=:PURCHASES_D.ITEM_NO
AND STORE_ID=:PURCHASES_D.STORE_ID)

LOOP
UPDATE STORE
SET QTY=QTY+:PURCHASES_D.P_INV_AMOUNT
WHERE ITEM_NO=:PURCHASES_D.ITEM_NO
AND STORE_ID=:PURCHASES_D.STORE_ID;
NEXT_RECORD;
END LOOP;
COMMIT;
EXCEPTION
WHEN NO_DATA_FOUND THEN
NULL;
END;

تم تعديل 16 أغسطس 20169 سنة بواسطة nan740

BEGIN

go_block('yourblock') ;

first_record ; 

LOOP

UPDATE STORE

SET QTY=QTY+:PURCHASES_D.P_INV_AMOUNT

WHERE ITEM_NO=:PURCHASES_D.ITEM_NO

AND STORE_ID=:PURCHASES_D.STORE_ID;

exit when :system.last_record = 'TRUE'

NEXT_RECORD;

END LOOP;

forms_ddl('commit') ; 

END;

الله يعطيك العافية بان الله حجرب وان شاء الله يشتغل

او ممكن فى post_update  لل  tabular

 

تنادى على procedsure    تكتب فيه  

 

UPDATE STORE
SET QTY=QTY+:PURCHASES_D.P_INV_AMOUNT
WHERE ITEM_NO=:PURCHASES_D.ITEM_NO
AND STORE_ID=:PURCHASES_D.STORE_ID;
NEXT_RECORD;
EXCEPTION
WHEN NO_DATA_FOUND THEN
NULL;

 

وكل ده يتنفذ من زرار حفظ 

لو محتاجه في حالة update بس , فاقتراح الاخ ربيع افضل , لكن

لا يمكن استخدام next_record فى تريجر post-update , وليس لها داعى اطلاقا حتى لو امكن استخدامها ,

ولا داعى ايضا للـ Exception

جربت الطريقة الاولى و لم يحدث اي ريكورد وكان الابيت ما يشتغل

نعم للاستاذ اسلام نشيل جملة next_record

 

شكرا على ملاحظتك وبالتوفيق للعضو

ايوه بس هذا يعمل ابديت لريكور واحد اضن اتلtabulare لازمloop

اقرا عن post-update trigger فى الهيلب

انا ما عندي مشكله وين اركب الكود مشكلتي كود LOOP  ما اشاغل بالكل المطاوب فقط يا اخ اسلام

يا اخى , لو قرأت عنه لفهمت .

post-update ينطلق مع كل ريكورد حدث فيه تغيير , لذا لا حاجة للـ loop .

الكود يتعمل فى ال triger    post_insert   لل tabular

 

تضع جملة update  المرتبطة بمتغير لل tabulare  وبتتنفذ تلقائيا بدون loop