مشكلة في الform

[nn_oracle]

السلام عليكم ورحمة الله وبركاته
عندي form فيه block عبارة عن tabular فيه item هوsereial (تسلسلي)
اريد ان اعبئه تلقائيا بحيث انه عندما اكون على اول recored يعطي قيمة 1
ثم علي ثاني recored تظهر قيمة 2
علي اي trigger اكتب الكود
وشكرا

[عبدالله ندا]

هلا اخي تستطيع اداء ما تريد عن طريقين
اولا انشئ متغير عام علي زناد when_new_form_instans

global.seial := 1 ;

الطريتين
اولا علي تريجير when_new_record_instance

:seial := :global.seial;
:global.seial := :global.serial + 1 ;

او علي تريجر post_change علي العمود التالي ل serial و يكون عمود المسلسل ديسبلاي ايتم

if get_record_property ('emp',statuse) = 'NEW' then
:seial := :global.seial;
:global.seial := :global.serial + 1 ;
end if;

الطريقة الثانيه هي الافضل الكود مش مظبوط اعتقد بس دي فكرته يعني
مع تمنياتي بالتوفيق

[mahmoud20107]

اخي nn_oracle

الف شكر لمشرفنا وفكرة حلوة

طريقة احلى استخدم طريقة الcount
وضع الكود على مستوى الداتا بلوك

بمستويين من التريجرات وهما pre_insert ويفيدك هذا التريجر في حالة العمل الجماعي لاشخاص
يعني اكثر من شخص يضيف في نفس الوقت
والتريجر الاخر when_create_record


ضع فيهم الكود التالي

declare x  number;
begin select count(*) into x from emp ;
if x>0 then
select (max(emp.id )+1) into :emp.id from emp; else 
	 select 1 into :emp.id from dual; end if;
end;
IF :emp.id IS NOT NULL THEN
SET_ITEM_PROPERTY('emp.id',ENABLED,PROPERTY_FALSE);
		END IF;

مع تغير مسميات الحقول الي ما يناسبك


اخوك
محمود

لا تنسونا من دعاء صالح

[عمرو]

هذا كود لحل نفس المشكله

IF :CASE.ID IS NULL THEN
select nvl(max(CASE.ID),0)+1
into :CASE.ID from CASE; END IF;

[nn_oracle]

مشكورين على الرد
وجزاكم الله كل خير

[مختار دياب]

[mody]

Dear :
Try this code in when-create-record trigger:

:serial_no:=:system.cursor_record;

and you can disable key-clrec trigger

[phsoft]

أخي العزيز يمكن إضافة حقل ليس من الـ Database
مثلا SMax
وجعله Sumrized Item
Max
للعنصر المراد عده مثلا Serial
ومن ثم في الـ Trigger When-Create-Record
:Serial := NVL(SMax,0) + 1;

[mustafa76]

عزيزي الافضل ان تستخدم
ال
:t:=system.trigger_record
رعاك الله