بسم الله الرحمن الرحيم
الاخوة الافاضل

عندى  برنامج لتسيجيل بيانات اورنيك 17 به المشاكل التالية :
لدى فورم به 2 نموزج ماستر وتفاصيل  ..التفاصيل بها حقل no database  ياخذ مجموعة الحقول fees الموجود ع نموزج التفاصيل ....لدى جدول اخر باسم tot_acc  اريد عند حفظ المعلومات عند نموزج الماستر والتفاصيل  يتم نقل حقول محدد والحقل الصافى المستحق (tot)   

nondatabase item

 

 

مرفق صور توضيحية

اورنيك 17 مالى.doc

السلام عليكم ورحمة الله وبركاته

 

اخي الكريم

 

استخدم تريجر   PRE-INSERT على مستوى البلوك كما في الكود التالي

 

 

PRE-INSERT

declare

aid integer ;

seq integer ;     

begin

IF  :INV_SAL.TOT2 < 0  THEN

MESSAGE('يجب إدخال قيمة الخصم');

 

ELSE

select nvl(max(d_id),0)+1 , :INV_SAL.TOT2, :INV_SAL.DISC ,:INV_SAL.TAX 

into   _ent.d_id , _ent.d_vd , _ent.d_disc , _ent.d_tax

from   d_ent

WHERE  TO_NUMBER(TO_CHAR(D_DATE,'YYYY')) = TO_NUMBER(TO_CHAR(SYSDATE,'YYYY')) ;

select SEQ_ENT.NEXTVAL

into   _seq

from   dual ;

 

select nvl(max(a_ent.a_id),1)+1 into aid from a_ent

WHERE  TO_NUMBER(TO_CHAR(A_DATE,'YYYY')) = TO_NUMBER(TO_CHAR(SYSDATE,'YYYY'));

select SEQ_ENT.NEXTVAL into seq from dual ;

 

insert into a_ent (a_seq,a_id,a_date,a_vd,ad_num,ac_num,a_exp)

values (seq,aid,_date,:tax,2200001,2300001,'ضريبة المبيعات للفاتورة النقدية رقم '||_ent.d_id) ;

END IF ;

END ;

راجع شاشة inv_cash الموجودة في الرابط التالي

 

 

مشريع الاعضاء / برنامج محاسبي بسيط

 

جزاك الله كل خير