--		40 	= First Item's Y-Position on the canvas
--		14 	= Height of Items
--		empno	= First Item on the Canvas
--		deptno	= Last Item on the Canvas
--		scanv	= Stack Canvas
declare	
	RecordsDisplayed	number;
	CountHits					number;
	View_X_Pos				number;
	View_Y_Pos				number;
	View_Width				number;
	View_Height				number;
begin
	RecordsDisplayed := Get_Block_Property('emp',records_displayed);
	CountHits := Get_Block_Property('emp',query_hits);
	
	if get_view_property('scanv', visible) = 'true' then
		set_view_property('scanv', visible, property_false);
	end if;

	if CountHits <= RecordsDisplayed then
		View_X_Pos := get_item_property('emp.empno', x_pos);
		View_Y_Pos := 40 + CountHits * 14;
		View_Width := get_item_property('deptno', x_pos)
                            + get_item_property('deptno', width)
                            - get_item_property('empno', x_pos);
		View_Height := (RecordsDisplayed - CountHits) * 14;
	  set_view_property('scanv', display_position, View_X_Pos, View_Y_Pos);

  	set_view_property('scanv', Height,View_Height);
  	set_view_property('scanv', width, View_Width);
	  set_view_property('scanv', visible, property_true);
	end if;	
end;