function addEvent(obj, evType, fn){ 
 if (obj.addEventListener){ 
   obj.addEventListener(evType, fn, false); 
   return true; 
 } else if (obj.attachEvent){ 
   var r = obj.attachEvent("on"+evType, fn); 
   return r; 
 } else { 
   return false; 
 } 
}

function writeCurDate()
{
var now = new Date();
var yyyy = now.getFullYear();
var mn = now.getMonth();
if( 10>mn) mn='0' + mn;
var dd = now.getDate();
if( 10>dd) dd='0' + dd;
document.write(dd + '-' + mn + '-' + yyyy);
}

//-- Doesn't work as calling function
function checkVarExists(what)
{
    if( typeof what == 'undefined')
        return false;
    else
        return true;
    //--return Boolean(typeof what != 'undefined' && what);
}

function isdefined(object, variable)
{
return (typeof(eval(object)[variable]) != 'undefined');
}



//-- a more compact version
function isArray(obj) {
    return (obj.constructor.toString().indexOf("Array") != -1);
}






function showImage(objId) {

	if (document.getElementById) {
		obj = document.getElementById(objId);
		obj.style.visibility="visible";
	}
}


//--------- Global Functions

function ssGlobal_FindObj(id) {

//--	return eval(pre + id + post);

	if (document.getElementById) {
  		return document.getElementById(id);
	} else if (document.all){
		return document.all[id];
	} else if (document.layers) {
		return document.all[id];
	}
	
	return null;
}

function ssGlobal_FindObjStyle(id) {

	return eval(pre + id + post);

	if (document.getElementById) {
		return document.getElementById(id).style;
	} else if (document.all) {
		return document.all[id].style;
	} else if (document.layers) {
		return document.all[id];
	}

	return null;
	//--	return eval(doc + "['" + id + "']" + sty);
}

function ssGlobal_ObjSetVisibility(object, attrib) {
    if (document.getElementById && document.getElementById(object) != null)
         document.getElementById(object).style.visibility=attrib;
    else if (document.all)
        document.all[object].style.visibility = attrib;
    else if (document.layers && document.layers[object] != null)
        document.layers[object].visibility = attrib;
}

function ssGlobal_ObjGetVisibility(object) {
    if (document.getElementById && document.getElementById(object) != null)
         return document.getElementById(object).style.visibility;
    else if (document.all)
        return document.all[object].style.visibility;
    else if (document.layers && document.layers[object] != null)
        return document.layers[object].visibility;
}

function ssGlobal_ObjSetDisplay(object, attrib) {
    if (document.getElementById && document.getElementById(object) != null)
         document.getElementById(object).style.display=attrib;
    else if (document.all)
        document.all[object].style.display = attrib;
    else if (document.layers && document.layers[object] != null)
        document.layers[object].display = attrib;
}

function ssGlobal_ObjGetDisplay(object) {
    if (document.getElementById && document.getElementById(object) != null)
         return document.getElementById(object).style.display;
    else if (document.all)
        return document.all[object].style.display;
    else if (document.layers && document.layers[object] != null)
        return document.layers[object].display;
}

function ssGlobal_ObjInerHTML(text,id)
{
	if (document.getElementById)
	{
		x = document.getElementById(id);
		x.innerHTML = '';
		x.innerHTML = text;
	}
	else if (document.all)
	{
		x = document.all[id];
		x.innerHTML = text;
	}
	else if (document.layers)
	{
		x = document.layers[id];
		text2 = '<P CLASS="testclass">' + text + '</P>';
		x.document.open();
		x.document.write(text2);
		x.document.close();
	}
}