declare
	pl_id paramlist;
	pl_name varchar2(200) := 'Kame';
	
begin 
	pl_id := Get_Parameter_List(pl_name);
	
	IF NOT Id_NULL(pl_id) THEN 
		DESTROY_Parameter_list(pl_name);
	end if;
	
	pl_id := Create_Parameter_List(pl_name);
	
	ADD_PARAMETER(pl_id,'rvno', text_parameter,:gl_receipt.rv_no);
	ADD_PARAMETER(pl_id,'rvdate', text_parameter,:gl_receipt.rv_date);
	ADD_PARAMETER(pl_id,'PARAMFORM', text_parameter,'NO');


		
		RUN_PRODUCT(REPORTS,'rv',ASYNCHRONOUS,RUNTIME,
	      FILESYSTEM,pl_id,NULL);
	      
	
END;