كيفية التعامل مع الـ Trigger

[Delphi4Us]

مرحبا

الترايققير هو بريمجيات صغيرة يتم تضمينها بداخل قاعدة البيانات وتنفيدها وقت الضرورة .
مثلا يمكنك حذف بيانات من جدول الابناء تتبع سجل بجدول الاباء بدون اللجوء الى الكود من برنامجك

وفي الحدث Before Delete لجدول الاباء نكتب الامر التالي

كود :

Delete * From Table2 where Table2.Index=Table1.ID

لاحظ ان Table2 جدول الابناء والاخر جدول الاباء ويتم ربط السجلات ببعضها عن طريق المفتاح الفريد ID بالحق Index

وسوف نكمل مع عمليات الاضافة والتعديل
وهذا مثلا في قواعد البيانات مثل SQLITE او FIREBIRD او SQLSERVER وغيرها
يستخدم عبارة New وايضا Old للاشارة الى القيمة الجديدة او القديمة انظر للمثال التالي

كود :

UPDATE orders SET address = new.address WHERE customer_name = old.name;

new.address تعني قيمة الحقل الجديدة
old.name تعني القيمة القديمة للحقل Name
ونتيجة التنفيذ ستكون شئ مثل

كود :

UPDATE customers SET address = '[color=Red]1 Main St.[/color]' WHERE name = '[color=Red]Jack Jones[/color]';

انظر لمثال الاضافة هذا

كود :

INSERT INTO AUDIT(EMP_ID, ENTRY_DATE) VALUES (new.ID, datetime('now'));

لاحظ يتم اخذ قيمة الـ ID وتعني الرقم الجديد الذي نشاء من عملية الاضافة لادراجه في الحقل EMP_ID