يا شباب لو سمحتم عندي سؤالين


أولا انا عندي فورم وفيها عدد النسخ اريد عندما تصل عدد النسخ مثلا الى 3 تأتي رسالة تحذيرية

تقول تبقى 3 نسخ في فلم رقم كذا


السؤال الثاني اريد عمل sequence لعمود في الفورم هل اعمل له من الداتا بيس او في طريقة تعمل له من الفورم


ومشكوريييييييييييييين على هذه الجهود الجبارة

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


ياشباب اللي يعرف الرد للسؤال السابق يعطني هو ضروري

عندي سؤال اخر عندي text item اريد اخفائه في الرن تايم عندما اضعه visable :yes

عندما اشغل الفورم تختفي بنفسها ما هو الحل لاخفاء فقط ال text item

بالنسبة لأخفاء الtext في run time يمكن عن طريق الproperties او عن طريق الكود
اما بالنسبة لحساب عدد النسخ ممكن تستخدم :
if text_item > 3 then
message
end if;

بالنسبة لعمل الsequence لعمود يجب ان تستخدم الcursor لان البيانات التى ستعود من الاستعلام ستكون كبيره وتخزنها في cursor محدد ثم تعرضها في list_item او غيره ..

يا أخي لو سمحت تقدر تعطيني طريقة كل سؤال


اذا تكرمت

السلام عليك اخي الصوفي بداية اود ان استوضح منك امرين اولهما في سؤالك الاول اريد ان اعرف هل عدد النسخ عمود في قاعدة باناتك ام فقط عنصر في الفورم؟ اما الامر الثاني فاريد ان اعرف بالنسبة لسؤالك الثاني اسم الجدول والحقل الذي تود فيه انشاء المتسلسلة وسوف اعطيك لها حلا جيدا انشاء الله اما بالنسبة لسؤالك الثالث فيمكنك ان تقوم باخفاء العنصر بطريقتين:
1- عن طريق خصائص العنصر اجعل visible بالقيمة no
2- انشاء تريجر على مستوى فتح الفورم وتكتب فيه الكود التالي:
set_item_property ('b1.t1',visible,property_false);
على اعتبار ان اسم العنصر t1 واسم البلك b1
أتمنى ان تحل المشكلة وان تخبرني بما طلبته منك لكي اتمكن باذن الله من مساعدتك.
اخوك....

شكرا يا اخي على ردك الجميل

بالنسبة للسؤال الاول هذا الحقل هو اسم عمود في الجدول بمعنى اخر نعم هو عمود في قاعدة بياناتي

السؤال الثاني اسم الجدول customer والحقل هو cus_id

السؤال الثالث عندما اضع ل text item في الخصائص visable:no عند التشغيل لا يظهر الفورم لا أدري مال المشكلة

وعندي مشكلة اخرى عندي مجموعة فورمات مرتبطة ببعضها البعض ب call بس المشكلة عندما اضغ زر الexit

يقوم بالخروج من الفورم الى فورم ثاني وهكذا حتى يخرج من البرنامج اريد عندما اضغط على زر exit يخرج من البرنامج كاملا

بالنسبة للسؤال الاول الذي تريد فيه اظهار شاشه تحذيرية، إليك الطريقة:
بافتراض ان لديك الجدول اسمه film والمحتوي على العنصرين film_no و copy
والموجود في الفورم في البلوك film واردت ان تظهر رساله بعدد النسخ المتبقيه وعدد النسخ في الفيلم لا يتجاوز 36 نسخه.
- من ال object naviagator اختر alert واضغط عليها دبل كليك وسمي التحذير ب alt1
من خصائص alt1:
قم بكتابة الرساله التي تود في خانة message
الغي cancle الموجوده في الخاصية button 2 label
- اعمل ازرار في الفورم عند الضغط عليه يقوم بالتالي:
Commit;
Declare
x film.copy%type;
y number;
i number;
begin
Select copy
into x
from film
where copy = (select max(copy) from film);
i := 36 - x;
set_alert_property('alt1',alert_message_text,'عدد النسخ المتبقية'||i);
y := show_alert('alt1');
end;

بالنسبه للسؤال الثاني:
1- تقوم بعمل تريجر عند الدخول على الفورم وتكتب فيه الكود:
Declare
x customer.cus_id%type;
begin
Select cus_id
Into x
From customer
Where cus_id = (select max(cus_id) from customer);
:customer.cus_id := x + 1;
Exception
When no_data_foun then
:customer.cus_id := 1;
End;
2- اعمل ازرار للاضافه مثلا وقم بكتابه الكود التالي
Commit;
Create_record;
Declare
x customer.cus_id%type;
begin
Select cus_id
Into x
From customer
Where cus_id = (select max(cus_id) from customer);
:customer.cus_id := x + 1;


بالنسبه للسؤال الثالث اخي الكريم:
لا اعلم مالمشكلة التي لديك بالضبط ولكن حاول ان تجعل الخاصية visible ب yes
ومن ثم اكتب في التريجر عند فتح النموذج
set_item_property('film.copy', visible, property_false);
وانشاء الله بتزبط معاك

بالنسبه لسؤالك الذي قمت بطرحه سابقا
يمكن ان تضيف في الفورمز الفرعيه تريجر على مستوى الفورم
when-window-deactivated وتكتب فيه
exit_form (no_validate);
وانشاء الله تمشي معاك
اتمنى ان اكون قد افتدك وان كانت حلولي صحيحه فالحمد لله وان اخطأت فالسماح من الاخوه الكرام جميعا وبالاخص منك اخي الصوفي.
اخوك...