Home » Developer & Programmer » Forms » Record Group In clause
Record Group In clause [message #236910] Fri, 11 May 2007 05:24 Go to next message
u263066
Messages: 47
Registered: March 2007
Member
Hello Gurus,


I have to replace a procedure with selective submission, it means user can first review the record and then submit the procedure.

The way it currently working is
 package (param1,param2,param3)
   Procedure A (param1, param2, param3)
   	Procedure B (Param1,param2)
   	Procedure C (Param1, param3)
   		Procedure D(param1, param2,param3)
   end;


The cursor would be drived by param1, param2,param3.

Now, I have to use a form from where i want to display record and then user can select and then call the main package to perfom the way its working with additional param4.

To make selective , I am passing param4 by adding in a group and then want to make a clause in cursor query.

Can any one assist how to make

 1.pass param4 in the query as IN clause
    like suppose someone select emp1, emp4,emp5 then 
    my query replaced like
    select * from emp
    where deptId =<param1> 
    ...
    and empid in (param4);
    
2. How to map the data into in clause
   BEGIN
     	 rec_grp_id := FIND_GROUP(group_name);
     	 grp_col_id := FIND_COLUMN(group_name||'.'||coll_name);
     	 ln_update := 0;
   	
   	
   	 IF ID_NULL(FIND_GROUP(group_name)) THEN		--B
   				message('Select transactions to reprocess');	
     	 	  		
   	 ELSE
   		 IF GET_GROUP_ROW_COUNT(rec_grp_id) > 0 THEN
   					for i in 1..GET_GROUP_ROW_COUNT(rec_grp_id) loop --A
   						
     	 	  		  tpp_id_tbl(i) := GET_GROUP_NUMBER_CELL(grp_col_id ,i);
    	 	  		 	package(param1,param2,param3,param4)
     	 	  	end loop; --A
      	   		    	 	  		
      	 ELSE
     	 	message('Select transactions to reprocess');	
     	 	  
      	 END IF;
   
      END IF;		--B
   		 
   END REPROCESS;


any input would be highly apprecaited.
Re: Record Group In clause [message #237275 is a reply to message #236910] Mon, 14 May 2007 01:21 Go to previous message
djmartin
Messages: 10181
Registered: March 2005
Location: Surges Bay TAS Australia
Senior Member
Account Moderator
Is this a student or work exercise? If a student exercise, work with someone in your group to come up with solutions. If a work exercise, then ask around your team for some ideas.

If all else fails consider using dynamic SQL (exec_sql).

David
Previous Topic: General
Next Topic: help in record group
Goto Forum:
  


Current Time: Sat Feb 08 23:49:59 CST 2025