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

 
begin
if :T_ACCOUNT.acc_type=2 then

set_block_Property('T_ACCOUNT',CURRENT_RECORD,VISUAL_ATTRIBUTE,'VISUAL_ATTRIBUTE4');
else
null;
end if;
end;

السلام عليكم
جرب هذا الكود:

Begin If :T_Account.Acc_Type = 2 Then    
 Set_Item_Instance_Property('T_Account',Current_Record,Visual_Attribute,'Visual_Attribute4');
Else
 Null;
End If;
End;

اختي الكريمة

الاخ أحمد اجاب عن موضوعك باستخداااااااااام Set_Item_Instance_Property

مشكور اخي احمد
والاخ الجبالي للمرة الثانية لم تركز على اسمي (امير)

لا باس عليك
---
نعود لموضوعنا على اي تريجر احط الكود
جربت اغلب التريجر وما نفع

نعود لموضوعنا على اي تريجر احط الكود
جربت اغلب التريجر وما نفع

WHEN-NEW-RECORD-INSTANCE

عفوا اخي نانا

لم يظهر شئ رغم اني حطيته على

WHEN NEW RECORD INSTANCE
على البلك نفسه

عفوا اخي نانا

لم يظهر شئ رغم اني حطيته على

WHEN NEW RECORD INSTANCE
على البلك نفسه

عفوا اخي نانا !!!!!!!!!!!!!!!!!!!!
اختك نانا ...........اوك

طب شوف حضرتك الفورما

_nana_.rar

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

كما ذكر أخي أحمد في أول رد وللايضاح بمثال

لنفرض أن البلوك يشتمل علي مجموعة items كما هو مرفق بالصورة ما عليكي الا عمل كذا visual attribute وحسب كودي تحتاجي أربعة ولوني كل واحد حسب اسمه
yellow mov green red أربعة


Block name is PM_PROJECT_LIST_DETAIL

Items are
PLD_CODE
PLD_DESC
DISP_REQUSTER
DISP_RESPONSIBLE
PLD_PRIORITY_CODE
PLD_START_DATE
PLD_EXPECTED_COMP_DATE
PLD_STATUS_CODE
PLD_REMARKS




then on post change of PLD_STATUS_CODE call the listed procedure

يعني post change علي Item الذي يتغير مع كل تغيير ل record مثل block PK item

PROCEDURE TASK_STATUS IS

v_STS_CODE1 number;

v_STS_CODE2 number:=0;
	v_STS_CODE3 number:=0;
begin


 


 if :PLD_STATUS_CODE =1   then
 set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_CODE',current_record,visual_attribute,'YELLOW');
 set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_DESC',current_record,visual_attribute,'YELLOW');		   
set_item_instance_property('PM_PROJECT_LIST_DETAIL.DISP_REQUSTER',current_record,visual_attribute,'YELLOW');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.DISP_RESPONSIBLE',current_record,visual_attribute,'YELLOW');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_PRIORITY_CODE',current_record,visual_attribute,'YELLOW');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_START_DATE',current_record,visual_attribute,'YELLOW');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_EXPECTED_COMP_DATE',current_record,visual_attribute,'YELLOW');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_STATUS_CODE',current_record,visual_attribute,'YELLOW');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_REMARKS',current_record,visual_attribute,'YELLOW');

ELSif :PLD_STATUS_CODE =2   then
 set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_CODE',current_record,visual_attribute,'MOV');
 set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_DESC',current_record,visual_attribute,'MOV');		   
set_item_instance_property('PM_PROJECT_LIST_DETAIL.DISP_REQUSTER',current_record,visual_attribute,'MOV');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.DISP_RESPONSIBLE',current_record,visual_attribute,'MOV');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_PRIORITY_CODE',current_record,visual_attribute,'MOV');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_START_DATE',current_record,visual_attribute,'MOV');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_EXPECTED_COMP_DATE',current_record,visual_attribute,'MOV');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_STATUS_CODE',current_record,visual_attribute,'MOV');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_REMARKS',current_record,visual_attribute,'MOV');

ELSif :PLD_STATUS_CODE =3  then
 set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_CODE',current_record,visual_attribute,'GREEN');
 set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_DESC',current_record,visual_attribute,'GREEN');		   
set_item_instance_property('PM_PROJECT_LIST_DETAIL.DISP_REQUSTER',current_record,visual_attribute,'GREEN');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.DISP_RESPONSIBLE',current_record,visual_attribute,'GREEN');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_PRIORITY_CODE',current_record,visual_attribute,'GREEN');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_START_DATE',current_record,visual_attribute,'GREEN');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_EXPECTED_COMP_DATE',current_record,visual_attribute,'GREEN');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_STATUS_CODE',current_record,visual_attribute,'GREEN');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_REMARKS',current_record,visual_attribute,'GREEN');

ELSif :PLD_STATUS_CODE =4  then
 set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_CODE',current_record,visual_attribute,'RED');
 set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_DESC',current_record,visual_attribute,'RED');		   
set_item_instance_property('PM_PROJECT_LIST_DETAIL.DISP_REQUSTER',current_record,visual_attribute,'RED');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.DISP_RESPONSIBLE',current_record,visual_attribute,'RED');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_PRIORITY_CODE',current_record,visual_attribute,'RED');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_START_DATE',current_record,visual_attribute,'RED');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_EXPECTED_COMP_DATE',current_record,visual_attribute,'RED');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_STATUS_CODE',current_record,visual_attribute,'RED');
set_item_instance_property('PM_PROJECT_LIST_DETAIL.PLD_REMARKS',current_record,visual_attribute,'RED');

END IF;








END;

ستجدي الخرج كما بالصورة

اذن الفكرة ببساطة هي
set_item_instance_property

تحياتي

تم تعديل 24 أبريل 201016 سنة بواسطة mageed_ahmed

بارك الله فيك يابشمهندس وجعله الله فى ميزان حسناتك

بارك الله فيك اخي احمد
وشكرا اختي نانا على المثال بس انا عندي 6I شكرا لتفاعلك
وبارك الله فيك اخي ماجد .. الا يوجد طريقة على مستوى البلك وليس على مستوى كل ايتم

مشكور لكم جميعا

يا أمير هناك من هم الواحد منهم بملايين ليس بألف وللاسف يعيشوا بين ظهرانينا خذ عندك مهاتير محمد الذي حول ماليزيا من فأر لنمر ورجب طيب أوردغان

http://www.isuez.com/forums/t15582.html

http://shadipal.blogspot.com/2010/01/blog-post_6027.html

عموما لا فرق أن تعمل علي 6 او 10 للكود ويمكن أن يتم العمل علي مستوي البلوك بفضل مجودك وبحثك وكلنا يقين أنك بمليون ليس الف


تحياتي

مشكورين على مناقشة الموضوع

شكر اخي ماجد على الثقة ...والمشوار يبدأ بخطوة...مائة ...الف ...عشرة الف...مائة الف...مليون...عشرة مليون...مائة مليون.....أمة

من الانبياء ابراهيم عليه السلام بأمة
ومن الصحابة....
ومن التابعين:..........
ومن السلف:...........
ومن عصرنا:
دعوة للنقاش في المنتدى العام ودراسة الشخصيات والاقتداء والتفاؤل

نعود لموضوعنا ...ما اقصده الملف الذي ارسلته الاخت نانا معمول ب 10g وانا محمل 6i هذا للتوضيح

وسأحاول ان شاء الله وارجع لكم خبر....
الشكر موصول لك وللشباب