سحب بيانات من قاعدة البيانات الى list item

[ym_yemen]

الأخوة / اعضاء المنتدى الاكارم
السلام عليكم ورحمة الله وبركاته

مشكلتي اني اريد ان اسحب من قاعدة البيانات مجموعة من البيانات الى داخل list item
قمت وعملت record group وكتبت داخلة جملة الاستعلام
ولكن لم يضهر لي شيء داخل list ممكن اعرف ايش الشفرة الصحيحة لاضافة هذه البيانات الى داخل الـlist item وشكرا

[oracle_itself]

الأمر بسيط اخى ..

Declare
Cursor Fetch_Data is
Select Cust_Id Number,Cust_Name Varchar2(50) from customer;
begin
clear_list('list1');
for abc in fetch_data loop
add_list_element('list1',1,abc.cust_name,abc.cust_name);
end loop;
end;

و الله اعلم

[ym_yemen]

ِشكرا اخي oracle itself على الرد ولو اني كنت افضل الشفرة تكون ليست داخل كرسر لكن شكرا على تفاعلك وانشاء الله اجربه وينفع
شكرا مرة اخرى

[أسامة موسى]

اخي oracle_itself
يوجد تعديل بسيط على الكود لأنك تركت ال INDEX قيمتها تساوي واحد لذلك لن يجد الا سطر واحد

Declare
Cursor Fetch_Data is
Select Cust_Id Number,Cust_Name Varchar2(50) from customer;
C NUMBER=0;
begin
clear_list('list1');
for abc in fetch_data loop
C:=C+1;
add_list_element('list1',C,abc.cust_name,abc.cust_name);
end loop;
end;

و الله اعلم

[oracle_itself]

بالفعل اخ admin05 هذا الكود بعد التعديل يصبح صحيح 100%
بالنسبة للأخ الحبيب ym_yemen .. لماذا لا تفضل استخدام الكرزر انة بالفعل من اقوى الأشياء المتداولة فى عالم الدفلوبر و انصحك دائما بأستخدامة هو و ال Ref Cursor
و الى مزيد من التفوق
و الله اعلم

Oracle ITself

تم تعديل 23 أبريل 2006 بواسطة oracle_itself

[ym_yemen]

شكرا للاخوة على التفاعل وجزاكم الله خير

[hamdy2001]

Al Salamo Alikom

I hope that my openion gives u a good solution.

Dynamic List-Item
----------------------

1 - create a group named rg with the following query:
select dname,to_char(deptno) from dept

2 - create a list item called lst

3 - create a form level trigger (when-new-form-instance) with the following code :

4- At many times you need to change the data type of the list item to be char instead of number.

declare
pg number;
begin

pg := populate_group('rg'); /*returns 0 if executed succefully */
populate_list('lst','rg');
end;
------------------------------------------------------------------------------------------------------



Sincerely yours
Hamdy M. Mahmoud
System Development Section Head
Alkan Networks
(Mohamed M. Nosseir)
www.alkannetworks.com
8th Al-Gazayer St., New Maadi, Cairo, Egypt