declare
	st number;
begin
	if
 	:select.pool  is not null then
 	select month_year into :select.date from aas_vac_kount_pool_vu
	where qtr_type=:select.qtr_type and pool=:select.pool;
	 
	select kount_regno into :select.applicant_no from aas_vac_kount_pool_vu
	where qtr_type= :select.qtr_type and pool=:select.pool;	

 else
 	select month_year into :select.date from aas_vac_kount_vu
	where qtr_type=:select.qtr_type;
  
  select kount_regno into :select.applicant_no from aas_vac_kount_vu
	where qtr_type= :select.qtr_type;	
	
 end if; 


if :select.qtr_type is null then
	message('Please select House Type');Message(' ');
		raise form_trigger_failure;
end if;

   if
   :select.order_by is null  and :select.pool is null then
		set_block_property('AAS_PREF_APPL',default_where,'qtr_type=:select.qtr_type order by locality, sector, block, qtrno ');
		go_block('AAS_PREF_APPL');
		clear_block(no_validate);
		execute_query;	
	
	
	
    else if :select.order_by is null  and :select.pool is not null then

  	set_block_property('AAS_PREF_APPL',default_where,'qtr_type=:select.qtr_type and pool=:select.pool order by locality, sector, block, qtrno ');
		go_block('AAS_PREF_APPL');
		clear_block(no_validate);
		execute_query;
		
		
		----------------------------------
	--	if :select.pool is not null then	
		select count(*) no_app into :select.total from AAS_PREF_APPL 
		where qtr_type=:select.qtr_type and pool=:select.pool;
	/*	else
				select count(*) no_app into :select.total from AAS_PREF_APPL 
		where qtr_type=:select.qtr_type;
	end if;
	*/
		----------------------------------------------
		else if
	 :select.order_by='LOCALITY' and :select.pool is not null then
	
	
		set_block_property('AAS_PREF_APPL',default_where,'qtr_type=:select.qtr_type and pool=:select.pool order by locality, sector, block, qtrno ');
		go_block('AAS_PREF_APPL');
		clear_block(no_validate);
		execute_query;	
	
	
		select count(*) no_app into :select.total from AAS_PREF_APPL 
		where qtr_type=:select.qtr_type and pool=:select.pool;
		
	
		else if
	 :select.order_by='LOCALITY' and :select.pool is null then
	
	
		set_block_property('AAS_PREF_APPL',default_where,'qtr_type=:select.qtr_type order by locality, sector, block, qtrno ');
		go_block('AAS_PREF_APPL');
		clear_block(no_validate);
		execute_query;	
	
	
		select count(*) no_app into :select.total from AAS_PREF_APPL 
		where qtr_type=:select.qtr_type;
		
		---------------------------------------------
		
    else if
	
		:select.order_by='NUMBER OF APPLICANT' and :select.pool is not null then
	
	
		set_block_property('AAS_PREF_APPL',default_where,'qtr_type=:select.qtr_type and pool=:select.pool order by no_app desc');
		go_block('AAS_PREF_APPL');
		clear_block(no_validate);
		execute_query;
		
		select count(*) no_app into :select.total from AAS_PREF_APPL 
		where qtr_type=:select.qtr_type and pool=:select.pool;
		
		 else if
	
		:select.order_by='NUMBER OF APPLICANT' and :select.pool is null then
	
	
		set_block_property('AAS_PREF_APPL',default_where,'qtr_type=:select.qtr_type order by no_app desc');
		go_block('AAS_PREF_APPL');
		clear_block(no_validate);
		execute_query;
		
		select count(*) no_app into :select.total from AAS_PREF_APPL 
		where qtr_type=:select.qtr_type;
		
		------------------------
    end if;
    end if;
		end if;
		end if;
		end if;
		end if;



/*
 if
 	:select.pool  is not null then
 	select month_year into :select.date from aas_vac_kount_pool_vu
	where qtr_type=:select.qtr_type;
	 
	select kount_regno into :select.applicant_no from aas_vac_kount_pool_vu
	where qtr_type= :select.qtr_type and pool=:select.pool;	

 else
 	select month_year into :select.date from aas_vac_kount_vu
	where qtr_type=:select.qtr_type;
  
  select kount_regno into :select.applicant_no from aas_vac_kount_vu
	where qtr_type= :select.qtr_type;	
	
 end if; 
*/
end;