var _bEnableDRSTimer_ = true;
	var _iTimerMS_        = 200;
	
	function msgbox(msg)
	{
		alert(msg);
	}
	
	function shrinkIFrame(iFrame, internalDiv, resizeOptions)
	{
		var internalDivStr = new String(internalDiv);
		var i = 0;
		var bUseTimer = false;
		var sTimerToken = ":::";
		
		if (_bEnableDRSTimer_)
		{
			//msgbox(internalDivStr);
			i = internalDivStr.indexOf(sTimerToken);
			//msgbox(i);
			bUseTimer = (i >= 0) ? false : true;
			//msgbox(bUseTimer);
		}
		
		if (!bUseTimer)
		{
			internalDivStr = internalDivStr.replace(sTimerToken, "");
			//msgbox(internalDivStr);
		}
		
		//var internal = window.frames["sl6945517"].document.getElementById("internalDiv");
		var internal = window.frames[iFrame].document.getElementById("_ifa_");
		if (internal)
		{
			//msgbox(internal);
		}
		else
		{
			internal = window.frames[iFrame].document.getElementById(internalDivStr);		
			//msgbox(internal);
		}
		
		var internalHeight = 0;
		var internalWidth  = 0;
		//var iMaxWidth      = 500;
		if (internal)
		{
			internalHeight = parseInt(internal.offsetHeight);
			internalWidth  = parseInt(internal.offsetWidth);
		}
		//msgbox("shrinkIFrame() internalHeight   :" + internalHeight);
		//msgbox("shrinkIFrame() internalWidth    :" + internalWidth);
		
		if (!bUseTimer) 
		{
			//msgbox("shrinkIFrame() processing");
			if (internalHeight > 0 && internalWidth > 0)
			{
				//msgbox("shrinkIFrame() setting width and height");
				if (resizeOptions == 'height')
				{
					document.getElementById(iFrame).style.height = internalHeight;
				}
				if (resizeOptions == 'width')
				{
					//document.getElementById(iFrame).style.width = (internalWidth < iMaxWidth) ? internalWidth : iMaxWidth;
					document.getElementById(iFrame).style.width = internalWidth;
				}
			}
		}
		else 
		{ 
			//msgbox("shrinkIFrame() called on timer");
			window.setTimeout(function(){shrinkIFrame(iFrame, internalDiv + sTimerToken, resizeOptions)}, _iTimerMS_);
		}
	}