// DK -- 090702 contains the functions to roll the flashreports appearing within the iframe
// on the home page.  My version loads all flashreports at the same time into different
// iframes, then uses the setTimeout() function to switch the display="none" to 
// display="block" on one iframe at a time.

var reportlist=new Array();
var count = 0;
var iframeNbr = 0;
var rollingspeed=5000   		// the time in milliseconds that each report stays
var iframeId = "myIframeName";  // ID of the iframe will be rolled.
var prev_iframeName;
var loop_count = 0;
var ptrTimerEvent = null;

// list of report will be loaded.
reportlist[reportlist.length]=new Array("http://www.cta-info.com/flashcta2.php?id=2&report=22");
reportlist[reportlist.length]=new Array("http://www.cta-info.com/flashcta2.php?id=2&report=50");
reportlist[reportlist.length]=new Array("http://www.cta-info.com/flashcta2.php?id=2&report=51");
//reportlist[reportlist.length]=new Array("http://www.cta-info.com/flashcta2.php?id=2&report=52");
function reportrolling_old()
{
  // DK -- 090620 Kiet's original function to rotate the flashreports loaded into the
  // iframe on www.cta_info.com; causes a page reload each time the report is
  // changed.

	if (reportlist.length > 0)
	{
		document.getElementById('myRollingIframe').src = reportlist[count];
		count++;
		if (count == reportlist.length)
			count = 0;
	}
	//alert(document.getElementById('myRollingIframe').src);
	//setTimeout('reportrolling()',rollingspeed)
}

   // DK -- 090625 the functions below are mine

function init_reportrolling()
{
 for (i = 0; i < reportlist.length; i++)
   {
    var iframeName = "myRollingIframe" + (i+1);
    if (i == 0)
      prev_iframeName = iframeName;

    var object = document.getElementById(iframeName);
    //document.getElementById(iframeName).src = reportlist[i];
    object.src = reportlist[i];

    var position = GetPosition(object);
    //alert(iframeName + " Left: " + position[0] + " Top: " + position[1]);
   }

 ptrTimerEvent = setTimeout('reportrolling()',rollingspeed);
 //document.onclick = disableTimeout;
}

function reportrolling()
{
 if (reportlist.length > 0)
   {
    iframeNbr = (count+1) % reportlist.length + 1;
    var iframeName = "myRollingIframe" + iframeNbr;
    //alert(iframeName);

    //document.getElementById(iframeName).src = reportlist[count];
    if (prev_iframeName)
      document.getElementById(prev_iframeName).style.display = "none";
    document.getElementById(iframeName).style.display = "block";
    prev_iframeName = iframeName;

    count++; loop_count++
    if (count == reportlist.length)
      count = 0;
    /* if (loop_count > 6)
      return; */
   }
	//alert(document.getElementById('myRollingIframe').src);
 ptrTimerEvent = setTimeout('reportrolling()',rollingspeed);
}

function prevIframe()
{
 disableTimeout();
 if (iframeNbr == 1)
   iframeNbr = reportlist.length;
 else
   iframeNbr--;
 var iframeName = "myRollingIframe" + iframeNbr;
 if (prev_iframeName)
   document.getElementById(prev_iframeName).style.display = "none";
 document.getElementById(iframeName).style.display = "block";
 prev_iframeName = iframeName;
}

function nextIframe()
{
 disableTimeout();
 if (iframeNbr == reportlist.length)
   iframeNbr = 1;
 else
   iframeNbr++;
 var iframeName = "myRollingIframe" + iframeNbr;
 if (prev_iframeName)
   document.getElementById(prev_iframeName).style.display = "none";
 document.getElementById(iframeName).style.display = "block";
 prev_iframeName = iframeName;
}

function disableTimeout()
{
 clearTimeout(ptrTimerEvent);
 //alert ("timer canceled");
}

function GetPosition(theElement)
{
 // 090625 this function is taken from _The Javascript Anthology_, p. 247

 var positionX = 0;
 var positionY = 0;

 while (theElement != null)
   {
    positionX += theElement.offsetLeft;
    positionY += theElement.offsetTop;
    theElement = theElement.offsetParent;
   }

 return [positionX, positionY];
}