عملت فورم لصلاحيات المستخدمين

الفورمة الاولى فيها بلوكين
البلوك الاول
فيه اسم المستخدم وكلمة المرور واربع Check box الاولى للسماح بالادخال والثانية للتعديل والثالثة للحذف والرابعة لاسترجاع البيانات
وكتبت في زر الحفظ ما يلي

begin commit;

:global.user_insert := :user_insert;
:global.user_update := :user_update;
:global.user_delete := :user_delete;
:global.user_query := :user_query; 


end;

حيث user_insert الـ check box الاول الخاص بالادخال وهكذا ..........

البلوك الثاني 
يدخل المستخدم لاسم وكلمة المرور عن طريق 2 Text item
وبعد ذلك يضغط على زر دخول الذي فيه الكود التالي
declare
v_counter number(2):=1;
v_count1 number(2);
v_count2 number(2);
v_insert varchar2(2);
v_update varchar2(2);
v_delete varchar2(2);
v_query varchar2(2);

BEGIN select count(user_id),count(user_password) INTO v_count1,v_count2 from user_password
		 where upper(user_id) = upper(:connected.user_name) and upper(user_password) = upper(:connected.user_password);


if (v_count1=1 and v_count2=1) then 
	 open_form('employees');
	 go_block('emp');
	 :global.user_name := :user_name;
	 v_insert :=:global.user_insert;
	 v_update :=:global.user_update;
	 v_delete :=:global.user_delete;
	 v_query :=:global.user_query;
	 
	 
	 
	 if v_insert = 'n' then  
	  	set_block_property('emp',insert_allowed,property_false);
	 end if;
	 
	 if v_update = 'n' then
	    set_block_property('emp',update_allowed,property_false);
	 end if;
	 
	 if v_delete = 'n' then
	  	set_block_property('emp',delete_allowed,property_false);
	 end if;
	 
	 if v_query = 'n' then 	
	 set_block_property('emp',query_allowed,property_false);
	 end if;
	  		



else
	loop
	 if show_alert('alert_error')=alert_button1 then
	 
	 v_counter :=v_counter+1;
	  raise form_trigger_failure;
	  clear_block(no_commit);
	 go_block('connected');
	   
	 exit when v_counter>3;
	 end if;
	end loop;
	
	if v_counter>3 then 
		exit_form;
	end if;
	
			 
end if;

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

السلام عليكم
ضع الاكواد الخاصة بتعريف الجلوبال داخل جملة declare
بالتوفيق

أخي الكريم شكرا على ردك ولكن لا يوجد تغيير
يظهر خطأ في التنفيذ
ارجو من الاخوة الرد سريعا لأن الموضوع مستعجل... جزاكم الله خيرا

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

اخي الكريم
الشاشة الاولى شاشة ادخال بيانات المستخدم وفيها
user_id
user_password
و 4 Check box لصلاحية الادخال والتعديل والحذف والاستعلام

وعندما اقوم بعملية الحفظ يأخذ قيمة 4check box في 4 متغيرات جلوبال

الشاشة الثانية هي شاشة الدخول فيها
user_name
password
وليسو من قاعدة البيانات
وفيها زر دخول الذي فيه الكود المكتوب في الرسالة

السلام عليكم



في بداية البلوك بشرط الا يتم استخدام الجلوبل قبل ذلك

declare
user_insert varchar2(2);
user_update varchar2(2);
user_delete varchar2(2);
user_query varchar2(2);
begin
:global.user_insert := :user_insert;
:global.user_update := :user_update;
:global.user_delete := :user_delete;
:global.user_query := :user_query;

end;



ملحظة يجب أن يوجد قيمة حتي لايكون قيمته
null;

أخي الكريم

ضع في حدث

PREE_FORM في الفورم التانية
الكود التالي

DEFULTE_VALUE(0,:GLOBAL.CHECKBOX)

وأقصد ب CHECK BOX الإسم الإفتراضي له

الاخوة الافاضل
الفورمة مرفقة مع الرسالة

ارجو المساعدة

_________.rar

ممكن حد يرد علي من فضلكم

السلام عليكم

أخي الفاضل ليوجد معني لهذا الجلوبل

v_insert:=:global.user_insert;
	 v_update:=:global.user_update;
	 v_delete:=:global.user_delete;
	 v_query :=:global.user_query;

يجب عند الدخول بالمستخدم كل مرة عمل استعلام عن الصلاحيات المتاحه له

select  user_id , user_password , user_insert , user_update , user_delete , user_query
into v_insert, v_insert ,  v_delete , v_query 
from user_password where upper(user_id)  =  upper(:connected.user_name