الإخوة الأعزاء
السلام عليكم

رجاء من عنده حل لمشكلتى هذه الرد فى أسرع وقت ممكن وله جزيل الشكر

المشكلة هي أننى عندى شاشة أصناف فيها خانة تسمي itm_stock أضع فيها رصيد الصنف.صممت شاشة للمبيعات وأخري للمشتريات أريد فكرة سهله بحيث عند إدخال هذا الصنف فى شاشة المبيعات يتم نقص رصيد الصنف فى شاشة الأصناف والعكس فى شاشة المشتريات يتم الزيادة.
وأيضاً أريد عند حذف الصنف من شاشة المبيعات أن يتم زيادة الكمية المحذوفة على رصيد الصنف.

مع خالص التحية

تم تعديل 3 سبتمبر 200619 سنة بواسطة tamora

اخي الكريم
1) يتم كتابة هذا الكود في تريقر pre_update على مستوى البلوك
select invoice_total
into :global.t
from sale
where invoice_no = :sale.invoice_no;
==================================
2) عمل ترايجر اخر pre_delete على مستوى البلوك
select invoice_total
into :global.pre_delete_inv
from sale
where invoice_no =:sale.invoice_no;
=======================================
3) ترايجر pre_insert
select invoice_total
into :global.pre_insert_inv
from sale
where invoice_no =:sale.invoice_no;
======================================
4) ترايجر pre_update
select invoice_total
into :global.pre_update_inv
from sale
where invoice_no =:sale.invoice_no;


begin
select qty
into :global.q
from invoice_sale
where invoice_no =:invoice_sale.invoice_no
and med_code = :med_code;
end;
============================================
5)يتم عمل ترايجر من نوع post_insert على البلوك الموجود فيه عنصر الكمية
UPDATE quantities
SET qty = qty - :qty
where med_code =:med_code;
=========================================
6)يتم عمل ترايجر على نفس البلوك ايضاً من نوع post_update
update quantities
set qty = qty +:global.q
where med_code =:med_code;

update quantities
set qty = qty -:qty
where med_code =:med_code;
============================================
7)ترايجر post_delete
UPDATE quantities
SET qty = qty + :qty
where med_code =:med_code;
======================================
اتمنى ان تكون قد وصلت الفكرة وهذا الايميل وانا في الخدمة ( [email protected] )
اخوك / ابونواف620

تم تعديل 3 سبتمبر 200619 سنة بواسطة ابونواف620

شكراً للأخ أبو نواف على إهتمامه وجارى تجربة الكود

الأخ الكريم أبو نواف رجاء مراجعة الإيميل لبعض الإستفسارات