الكود التالي لا يعمل ولا أعلم ما السبب ..
الكود واضح ولا يحتاج الى شرح , لكن ما الخطأ ..؟
الكود يعمل على احضار اسم المستخدم وتاريخ التعديل في حالة التغيير على الفورم سواء كان بالاضافة أو بتغيير أي قيمة فيه ولكن لا يعمل ...؟
هذا هو الكود

IF GET_BLOCK_PROPERTY('WORKERS',STATUS)IN('CHANGED','INSERT') THEN
     :WORKERS.update_user  := Get_Application_Property(UserName);
     :WORKERS.update_date:=get_sysdate;
 END IF;

فأرجوكم أن تفيدوني بالسبب الذي يمنعه من العمل ,,
أو أن تعطوني كود بديل يؤدي نفس الغرض ...
تحياتي
أخوكم
بريزون بريك

هل يظهر خطأ معين عند تنفيذ العملية ؟؟ ام انه لا يعمل فقط ؟؟

لا يظهر خطأ ...
هو لا يعمل فقط ..

1- ممكن نعرف ايه التريجر الي انت حاطط فيه الالكود ده

ممكن نعرف الGet_Application_Property(UserName); و get_sysdate مكتوب تحتها ايه او اتاكد ان هما شغالين تمام
وجرب كده

IF GET_BLOCK_PROPERTY('WORKERS',STATUS)
='CHANGED' or IF GET_BLOCK_PROPERTY('WORKERS',STATUS)
'='INSERt

THEN
:WORKERS.update_user := Get_Application_Property(UserName);
:WORKERS.update_date:=get_sysdate;
END IF;

اسف الكود المفروض يكون كده

IF GET_BLOCK_PROPERTY('WORKERS',STATUS)
='CHANGED' or GET_BLOCK_PROPERTY('WORKERS',STATUS)
'='INSERt

THEN
:WORKERS.update_user := Get_Application_Property(UserName);
:WORKERS.update_date:=get_sysdate;
END IF;

1- ممكن نعرف ايه التريجر الي انت حاطط فيه الالكود ده

ممكن نعرف الGet_Application_Property(UserName); و get_sysdate مكتوب تحتها ايه او اتاكد ان هما شغالين تمام
وجرب كده

IF GET_BLOCK_PROPERTY('WORKERS',STATUS)
='CHANGED' or IF GET_BLOCK_PROPERTY('WORKERS',STATUS)
'='INSERt

THEN
:WORKERS.update_user := Get_Application_Property(UserName);
:WORKERS.update_date:=get_sysdate;
END IF;

الكود أخي موجود في تريجر pre-update ..
وأعتقد ان المشكلة في التريجر ..
لكن أين المكان الصحيح لهذا الكود ..؟

جرب حط الكود في key_commit
بس ماتنسى تعمل commit_form

جرب حط الكود في key_commit
بس ماتنسى تعمل commit_form

للأسف أخي لم ينجح الكود ..
ألا يوجد ما يساعدني في هذه المشكلة ..؟

Try To Write Just This @ Pre-Update

:WORKERS.update_user := Get_Application_Property(UserName);
:WORKERS.update_date:=get_sysdate;

تم تعديل 1 فبراير 201016 سنة بواسطة PALI.ORACLE

Try To Write Just This @ Pre-Update

:WORKERS.update_user := Get_Application_Property(UserName);
:WORKERS.update_date:=get_sysdate;

أخي أحمد
هذا الكود هو تجريبي فقط ..
الذي أريد ادراجه في هذا الكود هو جملة insert ..
ولو قمت بادراج جملة insert هذه في تريجر pre-update فانه يعمل على اضافة سجل جديد في الهيستوري حتى لو لم أقم بعمل تعديل على الداتا الموجودة في البلوك ..
أي أنني بمجرد فتح فورم التعديل وعمل حفظ حتى بدون تغيير في الداتا فانه يعمل على اضافة سجل جديد في الهيستوري ..وهذه هي المشكلة ..
لهذا قمت باستخدام هذا الكود ,ليقوم في حالة التعديل على الداتا الموجودة في الفورم وعمل حفظ يقوم بادراج سجل جديد في الهيستوري وعمل حفظ على السجل الرئيسي الموجود في الجدول الرئيسي..
ووضعت فيه جملة insert في داخل الكود ..
الكود بالتفصيل هو كالآتي , فلماذا لا يعمل ..؟

IF GET_BLOCK_PROPERTY('WORKERS',STATUS)IN('CHANGED','INSERT') THEN
insert into workers ( idc , fullname , address , region ) values ( :workers.idc , :workers.fullname , :workers.address , :workers.region);
END IF;

تم تعديل 1 فبراير 201016 سنة بواسطة PrisonBreak