بسم الله الرحمن الرحيم

اخوانى فى الله طلب منى اخ فى الله طريقة تعبئة ليست من ليس اخرى
والان اليكم خطوات الانشاء:
1. هنا المثال سوف يكون على جدول الدول وجدول البلاد ومرفق لكم أوامر أنشاء الجداول كما يلى :

  CREATE TABLE SCOTT.t_country (
coun_no	NUMBER(2)	NOT NULL,
coun_adesc	VARCHAR2(100),
coun_edesc	VARCHAR2(100),
 CONSTRAINT PK_t_country PRIMARY KEY ( coun_no )
);

CREATE TABLE SCOTT.t_city (
city_no	NUMBER(3)	NOT NULL,
coun_no	NUMBER(3)	NOT NULL,
city_adesc	VARCHAR2(100),
city_edesc	VARCHAR2(100),	
 CONSTRAINT PK_t_city PRIMARY KEY ( city_no )
);

ALTER TABLE SCOTT.T_COUNTRY ADD CONSTRAINT T_CITY_COUN_NO
 FOREIGN KEY (
COUN_NO
)
REFERENCES SCOTT.T_COUNTRY
(
COUN_NO
) ; 

2. فتح فورم جديدة وادراج عدد 2 list item
3. اظهار خصائص list item1 وتغير اسمها الى list_coun
4. الذهاب الى خاصية Elements in list كما فى الصورة المرفقة

5. ومسح القيمة list11 من list elements ومن list item value
6. اظهار خصائص list item2 وتغير اسمها الى list_city
7. كرر نفس الخطوة رقم 3 و4
8. اولا نقوم بأنشاء عدد 2 Record Groups
9. الاول نقوم بأنشائة تحت اسم REC_COUNTRY ونتكب بداخلة الكود التالى :

 select coun_adesc,to_char(coun_no)
from t_country 

10. الثانى نقوم بأنشائة تحت اسم REC_CITY ونتكب بداخلة الكود التالى :

  SELECT city_adesc,to_char(city_no)
 FROM t_city 
 where coun_no=:list_coun 

وهنا نضع أسم الـ list_coun حيث اننى اطلب كل المدن عند تساوى الدولة فى جدول المدن
11. الان نريد تعبئة الـ list_coun
12. يتم كتابة الكود التالى فى الحدث WHEN-NEW-FORM-INSTANCE

 declare
v_add_country number;
begin
v_add_country:=populate_group('REC_COUNTRY');
populate_list('LIST_COUN','REC_COUNTRY');
end;   

وهكذا نكون قد قمنا بتعبئة الدول فى LIST_COUN
1. والان نريد ان نقوم بتعبئة المدن
2. نذهب الى LIST_COUN ونقوم بأنشاء حدث WHEN-LIST-CHANGED
3. ونقوم بكتابة الكود التالى كما يلى

 declare
v_add_city number;
begin
v_add_city:=populate_group('REC_city');
populate_list('LIST_city','REC_city');
end;  

اتمنى من الله سبحانة وتعالى ان اكون قد وفقت فى هذا الشرح نسألكم الدعاء لوالدى بالشفاء والرحمة

add list.rar

تم تعديل 11 يناير 201115 سنة بواسطة ramy_orcl

بارك الله فيك
اخي الكريم على هذا العمل الرائع
سيتم التجرب
يالتوفيق

جزاك الله كل خير على الشرح الرائع
ولكن اسمح لى بسؤالك ما هى هذه الرموز '

('REC_city');