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

DECLARE

cURSOR allow IS SELECT INS,UPD,DEL,SEL
                  FROM user_privs WHERE userid=:global.userid; 
                          
       INS varchar2(1 byte);
       UPD varchar2(1 byte);
       DEL varchar2(1 byte);
       SEL varchar2(1 byte);

BEGIN OPEN allow ;
       FETCH allow INTO INS,UPD,DEL,SEL; if  INS='y' then
                    
                        SET_block_PROPERTY('CUSTOMERS',INSERT_ALLOWED,PROPERTY_true );
                         
           ELSIF   UPD='y' then
               
                        SET_block_PROPERTY('CUSTOMERS',UPDATE_ALLOWED,PROPERTY_true );
                         
         ELSIF   del='y' then
           
                        SET_block_PROPERTY('CUSTOMERS',DELETE_ALLOWED,PROPERTY_true );

           ELSif   SEL='y' then
                    
                        SET_block_PROPERTY('CUSTOMERS',QUERY_ALLOWED,PROPERTY_true );
                         
           end if;     
              
   CLOSE allow ;

end;

الكود ده موجود عندى فى
Trigger WHEN-NEW-FORM-INSTANCE
لفورمة العملاء والمفروض انه بيعرق اليوزر من خلال
ID
وبيشوف صلاحياته الموجودة فى الجدول
المهم
مطلوب استخدم
FIND_ITEM
انا مش عارف ازاى دورت فى الهلب لقيته جوا
PROCEDURE
ازاى ادمج الكلام ده مع بعضه
يا ريت من الخبراء حد يقولى الطريقة فى اسرع وقت ممكن
ولكم جذيل الشكر

ارجو الرد للاهمية

السلام عليكم ورحمة الله وبركاته
اولا يا أخي لماذا تريد استخدام find item
هذه ال function تستخدم عندما تتعامل مع item غير معروف مثل tree مثلا , لا تعرف تتعمامل مع اي node لذلك تستخدم هذه الفانكشن

الف شكر ليك يا بشمهندس خالد بس انا بتدرب فى شركة والباشمهندس طلب منى كدة وانا حاولت ووصلت لكدة

DECLARE

cURSOR allow IS SELECT INS,UPD,DEL,SEL
			   FROM user_privs
			   WHERE userid=:global.userid; ---CURSOR ALLOW IS CHECK VALIDATION TO USERS---
					   
	INS varchar2(1 byte);
	UPD varchar2(1 byte);
	DEL varchar2(1 byte);
	SEL varchar2(1 byte);
	
	ITEM_ID   ITEM;	  ---

BEGIN
  ITEM_ID:=FIND_ITEM(:SYSTEM.CURSOR_ITEM);  ---FIND_ITEM---

OPEN allow;	 ---CURSOR ALLOW OPEN---
	FETCH allow INTO INS,UPD,DEL,SEL;  ---fetch---
	 
	 	if	 INS='y' then	   ---> if statement check for insert,update,delete,query <---
			 		SET_ITEM_PROPERTY(ITEM_ID,INSERT_ALLOWED,PROPERTY_true );
		elsif  UPD='y' then
		 		  SET_ITEM_PROPERTY(ITEM_ID,UPDATE_ALLOWED,PROPERTY_true );
		elsif  del='y' then		 	
			 		SET_ITEM_PROPERTY(ITEM_ID,DELETE_ALLOWED,PROPERTY_true );	 	
		elsif  SEL='y' then				
			 		SET_ITEM_PROPERTY(ITEM_ID,QUERY_ALLOWED ,PROPERTY_true ); 
		ELSE
			   	SET_ITEM_PROPERTY(ITEM_ID, INSERT_ALLOWED,PROPERTY_FALSE );
			   	SET_ITEM_PROPERTY(ITEM_ID, UPDATE_ALLOWED,PROPERTY_FALSE );
				  SET_ITEM_PROPERTY(ITEM_ID, DELETE_ALLOWED,PROPERTY_FALSE ); 
				SET_ITEM_PROPERTY(ITEM_ID, QUERY_ALLOWED ,PROPERTY_FALSE ); 	
		end if;	 
		   
CLOSE allow;	 --- close cursor---

end;