// SaibVC - Version Control for JavaScript files
// Copyright (c) The Saudi Investment Bank 2005
// -----------------------------------------------------------
// The version below must be updated on every change
var SaibVCVersion = "SaibVC 0002 24Feb05 Version Control";				// Version of this JS file
// -----------------------------------------------------------
// Modification Log
// 07Jan05 MPC First version produced
// 24Feb05 MPC Make dynamic
// -----------------------------------------------------------

SaibVCModules = new Array();						// Define the array
SaibVCStore(SaibVCVersion);

function SaibVCStore(ModText)						// Store the data
{
	var i = SaibVCModules.length;					// Items so far
	if (i>0)
	{  for (j=0; j<i; j++)
	   { if (SaibVCModules[j] == ModText) return; }
	}
	SaibVCModules[i] = ModText;
}

function SaibVCLastChanged()					// Modification date
{
	var i = SaibVCModules.length;
	var j = 0;
	var k = 7;						// Alert Limit
	var p = Math.ceil(i/k);
	var m = 0;
	var n = 0;
	var d = Date.parse(document.lastModified);
	var x = (d==0) ? "This Page has no change record":"Page last changed on "+document.lastModified;

	if (p==0) { alert(x+"\n(0 files)"); return; }

	for (m=0; m<p; m++)					// Pages
	{
		var z = (m==0) ? x:"";
		for (n=0; n<k; n++)
		{	z = (j<i) ? z+"\n["+(j+1)+"] "+SaibVCModules[j]:z;
			j++;
		}
		z = z+"\nSet "+(m+1)+" of "+p+" ("+i+" files)"
		z+= (j<i) ? " ... continues": "";
		alert(z);
	}
}