السلام عليكم ورحمة الله وبركاته
يا اخوانا أنا عندي list item للسنين

كيف أخلي lest item كل سنة يتحدث لوحده ويضيف السنة على list

وبارك الله فيكم

الاخ الحبيب
أنشأ مثلا list اسمها a
ادخل على خصائصها element in list اضغط عليها ثم موافق
اكتب هذا الكود البسيط في أي مكان تحب وضعه فيه

clear_lis('a');
add_list_element('a',1,to_char(sysdate,'yyyy',to_char(sysdate,'yyyy');

الأخ مصطفى بارك الله فيك

لكن يا ريت تقولي وين بالضبط أضع الكود

ثانيا ممكن توضح لي الكود بارك الله فيك
أنا ما بدي اياه يمسح كل الليست ويضع آخر سنة
انا list بتبدأ من سنة 1990 إلى 2009
سامحنا

تم تعديل 17 مايو 200916 سنة بواسطة م.بلال

أهلا أخي بلال
لم أفهم سؤلك جيدا
هل تقصد كل سنة جديدة يزود السنة دي في الليست مع الاحتفاظ بالسنوات الماضية
مثلا البرنامج يعمل من سنة 2000 فيكون في هذه السنة يوجد فقط 2000 وبعد كل سنة جديدة يتم زيادة السنة الجديدة مع الاحتفاظ بالقديمة وهكذا
طيب وهل هذه الليست مرتبطة بقاعدة البيانات أم أنها non database item

list بتبدأ من سنة 1990 إلى 2009

هل انت الذي ادخلت بيديك أم ماذا
صف موضوعك بشكل اوضح

صحيح أخي مصطفى هذا ما أقصد إني كل سنة أضيفها على list
مع الاحتفاظ بالقديمة
أنا قاعد بأطلب كيف أعمل هذا الشي
يعني أنا بدي الليست تبدا من سنة 1995 وبعد ذلك يضيف كل سنة
على الليست
أنا حاليا ما عندي ليست لكن أنا بدي أعملها وهي ضروري فكيف ؟؟؟

وهل يلزم لعمل ذلك إني أربطها بقاعدة بيانات ؟ إذا نعم فلا مشكلة
بس هي ضروري وبارك الله فيكم

سامحنا

تم تعديل 17 مايو 200916 سنة بواسطة م.بلال

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

رضي الله عنك أخي مصطفى وبارك الله فيك وربنا يحفظك من كل سوء

أنا فكرت زي هيك لكن ما بأعرف كيف أعملها
فيا ريت تخدمنا فيها, وسامحنا إنو غلبناك معانا

وبارك الله فيكم وفي جميع أعضاء هذا المنتدى الرائع

السلام عليكم
اتبع الاتي
1- أنشيء هذا الجدول

create table years
(year  number);

2- في شاشة الدخول للبرنامج نفسه
ممكن تكتب هذا الكود مثلا في تريجر when new form instance أو لحظة اليوزر مايدخل على البرنامج بعد مايكتب اليوزرنام والباسور اي شيء
اكتب هذا

declare
x  number;
begin select count(*) into x from years where year=to_char(sysdate,'yyyy');
if x=0 then 
insert into years values(to_char(sysdate,'yyyy'));
commit;
else
null;
end if;
end;

بعد كده هتنشيء ال اليست مبنية على هذا الجدول وتضعها في اي فورم وفي اي مكان وستجد بها القيم
كالاتي
فرضا عندك ليست اسمها years
اكتب هذا الكود لتعبئتها

declare
cursor sub is select year from years ;
ind number;
begin ind:=1;
clear_list('years');
for i in sub loop
add_list_element('years',ind,i.year,i.year);
ind:=ind+1;
end loop;
end;

طبعا لكي ترى التعبئة اضع هذا الكود عند فتح الفورم كي يتم التعبئة

ودمتم بخير

بارك الله فيك أخي مصطفى وما قصرت صراحة
وجزاك الله عنا خير الجزاء

تم تعديل 17 مايو 200916 سنة بواسطة م.بلال