var MODULE;
var idPost;

//---Segue l'id nei menu sdopppiati....
idPost = "__2";
idDiv = "__TXT";


//---Chiede il logout
function Logout(force) {
if (!force) {
  if (window.confirm("Do you really want logout from console?"))
//    document.location = "default.asp";	
  window.close();
	} else {
//    document.location = "default.asp";			
  window.close();	
	}
}


//---Visualizza un errore
function ShowError(Form,Nome,strErrore) {
window.alert("Error:\n" + strErrore);
try
{
	if (Form != "")
	{
		if (Nome != "")
		{
			document.forms[Form].elements[Nome].focus();
		}
	}
}
catch(e)
{
}
return false
}

//---Verifica se una select contiene almeno x selezioni
function CheckSelect(Form, Nome, Min, ForceDifferent, strErrore) {   
var i,Tot;
Tot=0;
for(i=0;i<document.forms[Form].elements[Nome].options.length;i++)
  if (document.forms[Form].elements[Nome].options[i].selected)
     if (document.forms[Form].elements[Nome].options[i].value != ForceDifferent)
    	 Tot++;
if (Tot < Min)   
   return ShowError(Form,Nome,strErrore);     
return true;   
}	


//---Verifica se una selezione é stata eseguita
function CheckSelect1(Form, Nome, strErrore) {  
if (document.forms[Form].elements[Nome].selectedIndex > 0)
   return true; 
return ShowError(Form,Nome,strErrore);
}


//---Verifica se un campo radio e' stato selezionato
function CheckRadio(Form, Nome, ForceDifferent, strErrore) {   
var sw;
var i;
var x;
var Lunghezza;
x = document.forms[Form].elements[Nome];
Lunghezza = x.length;
sw = false;
for (i=0;i < Lunghezza; i++) {
  if (x[i].value != ForceDifferent)
  if (x[i].checked) sw = true;
                         }
  
if (sw) return true; 
window.alert("Error:\n" + strErrore);
return false;
}	

//---Verifica se un CheckBox e' flaggato
function CheckCheckBox(Form, Nome, NeededWhat, strErrore) {  
if (NeededWhat) {
   if (document.forms[Form].elements[Nome].checked)
       return true; 
   } else {
   if (!document.forms[Form].elements[Nome].checked)
       return true;    
   }	   
return ShowError(Form,Nome,strErrore);
}	

//---Verifica se un campo di testo non e' vuoto
function CheckString(Form, Nome, strErrore) {  
if (document.forms[Form].elements[Nome].value != '')
   return true; 
return ShowError(Form,Nome,strErrore);
}	   

//---Verifica se un campo di testo non e' vuoto
function CheckMaxLengthString(Form, Nome, maxlength, strErrore) {  
if (document.forms[Form].elements[Nome].value.length < maxlength)
   return true; 
return ShowError(Form,Nome,strErrore);
}

//---Verifica se un campo di testo continene un numero
function CheckNumber(Form, Nome, strErrore, Needed, LimitedMin, Min,LimitedMax, Max) {   
var n;
var err;
if (document.forms[Form].elements[Nome].value != '') {
    n = parseInt(document.forms[Form].elements[Nome].value);
   if (!isNaN(n)) {
     err = false;
     if (LimitedMin)
	     if (n < Min) err = true;
     if (LimitedMax)
	     if (n > Max) err = true;		 		 
	 if (!err)		 
        return true; 	 
	   else
    	return ShowError(Form,Nome,strErrore);	  		   	
	 }
	else {
	 return ShowError(Form,Nome,strErrore);	  	     
	 }
  } 
  if (!Needed) 
     return true;
	else 
     return ShowError(Form,Nome,strErrore);
}	   

//---Verifica se un campo di testo contiene un indirizzo di email valido
function CheckEMail(Form,Nome, strErrore) {
var p,p2;
var NewP;
var OldP;
p=document.forms[Form].elements[Nome].value.indexOf(' ');
if (p>0) return ShowError(Form,Nome,strErrore);
p=document.forms[Form].elements[Nome].value.indexOf('@');
if (p<1) return ShowError(Form,Nome,strErrore);
p2=document.forms[Form].elements[Nome].value.indexOf('@',p+1);
if (p2>0) return ShowError(Form,Nome,strErrore);

if (p>(document.forms[Form].elements[Nome].value.length-5)) 
   return ShowError(Form,Nome,strErrore);
   
OldP = -1;
NewP =document.forms[Form].elements[Nome].value.indexOf('.',p+1);   
if (NewP == (p+1)) return ShowError(Form,Nome,strErrore);
while (NewP > 0) {    
  OldP = NewP; 
  NewP = document.forms[Form].elements[Nome].value.indexOf('.',NewP+1);  	        
}

if (OldP < 0) 
   return ShowError(Form,Nome,strErrore);
if (OldP < (document.forms[Form].elements[Nome].value.length-4))
   return ShowError(Form,Nome,strErrore);
if (OldP > (document.forms[Form].elements[Nome].value.length-3))
   return ShowError(Form,Nome,strErrore); 

return true;   
}

//---Riposiziona il menu laterale destro
function RiposizionaMenuRight() {
var h;
h = document.body.clientHeight - menu.offsetHeight - 10 - 20;
if (h > 0) document.all['MenuRight'].style.height = h;
document.all['MenuRight'].style.top = 3 + document.all['outerDiv'].scrollTop;
}

//---Apre una pagina di un modulo
function OpenPage(pagina) {
  document.location ="Modules/" + MODULE + "/" + pagina;
};

//---Abilita un menu principale
function EnableMenu(id) {
  if (document.all[id])
  document.all[id].className =  document.all[id].title;  
  if (document.all[id + idPost])
  document.all[id + idPost].className = document.all[id + idPost].title;    
  
}

//---Disabilita un menu
function DisableMenu(id) {
  if (document.all[id])
  document.all[id].className = "menudisabled";  
  if (document.all[id + idPost])
  document.all[id + idPost].className = "menudisabled";    
}

//---Setta il testo di un menu
function SetMenu(id,Text) {
  if (document.all[id])
  if (document.all[id].className != "root2") {
     if (document.all[id + idDiv])
        document.all[id + idDiv].innerHTML = Text; 
     if (document.all[id + idDiv+ idPost])
        document.all[id + idDiv + idPost].innerHTML = Text;
	} else {
     if (document.all[id])
        document.all[id].innerHTML = Text; 
     if (document.all[id + idPost])
        document.all[id + idPost].innerHTML = Text;	
	}
		
}

//---Cambia il colore di una riga ON
function SwapMenuOn(el,i) {
if (i==0)
  el.style.background = "#FFEFEF";
 else
  el.style.background = "#F8DEDE";  
}

//---Cambia il colore di una riga OFF
function SwapMenuOff(el,i) {
if (i==0)
  el.style.background = "#FEFEFE";
 else
  el.style.background = "#E8E8E8";  
}

//---Svuota un campo di testo
function ClearText(Form,Nome) {
  document.forms[Form].elements[Nome].value = "";
}

//---Svuota una CheckBox
function ClearCheckBox(Form,Nome) {
  document.forms[Form].elements[Nome].checked = false;
}

//---Svuota una RadioButton
function ClearRadio(Form,Nome) {
var i;
for (i=0;i < document.forms[Form].elements[Nome].length; i++) 
    document.forms[Form].elements[Nome][i].checked = false;
}

//---Svuota una RadioButton
function ClearSelect(Form,Nome) {
var i;
if (document.forms[Form].elements[Nome].type == "select-multiple") {
for (i=0;i < document.forms[Form].elements[Nome].options.length; i++) 
    document.forms[Form].elements[Nome].options[i].selected = false;
	} else {
	document.forms[Form].elements[Nome].selectedIndex = 0;
	}
}

//---Svuota un form
function ClearForm(Form) {
var i;
for (i=0;i<document.forms[Form].elements.length;i++) {
  switch(document.forms[Form].elements[i].type) {
  case "text":
    ClearText(Form,document.forms[Form].elements[i].name);
	break;
  case "password":
    ClearText(Form,document.forms[Form].elements[i].name);
	break;
  case "checkbox":
    ClearCheckBox(Form,document.forms[Form].elements[i].name);
	break;	
  case "radio":
    ClearRadio(Form,document.forms[Form].elements[i].name);
	break;		
  case "select-multiple":
    ClearSelect(Form,document.forms[Form].elements[i].name);
	break;			
  case "select-one":
    ClearSelect(Form,document.forms[Form].elements[i].name);
	break;		
  }
 }
}

// ---Setta il colore di un oggetto
function SetBackground(id,colore) {
  document.all[id].style.background = colore;
} 

//---Apre e chiude una DS
function openDS(id) {
if (document.all["DSTABLE_" + id].style.display != "none") {
	document.all["DSTABLE_" + id].style.display = "none";
	document.all["DSNAME_" + id].vecchio = document.all["DSNAME_" + id].innerHTML;
	document.all["DSNAME_" + id].innerHTML= document.all["DSNAME_" + id].vecchio + "&nbsp(click to expand)";
	
   } else {
	document.all["DSTABLE_" + id].style.display = "inline";   	
	document.all["DSNAME_" + id].innerHTML= document.all["DSNAME_" + id].vecchio;
   }	
}


function SwFocusCheck(x) {
window.onunload = CheckFinestrella;
if (x) {
  window.onfocus = CheckFinestrella;
 } else {
  window.onfocus = stopError;
 } 
}

function FocusCheck() {
SwFocusCheck(false);
window.setTimeout("SwFocusCheck(true)",500);
}

//---Apre una finestra di dettaglio
function OpenDetail(TableName,URL) {
var str;
var w,h;
var PosX;
var PosY;
w = 770;
//h = 440;
h = 660;
window.document.TableName = TableName;
str = "width=" + w;
str = str + ",height=" + h;
PosX = (screen.width - w) / 2;
PosY = (screen.height - h) / 2;
str = str + ",left=" + PosX;
str = str + ",top=" + PosY;
//str = str + ",status=1";
CheckFinestrella();
window.document.Finestrella = window.open(URL,"_blank",str);
FocusCheck();
}


//---Apre una finestra di dettaglio
function OpenDetail2(TableName,URL,w,h,Nome) {
var str;
var w,h;
var PosX;
var PosY;
window.document.TableName = TableName;
str = "width=" + w;
str = str + ",height=" + h;
PosX = (screen.width - w) / 2;
PosY = (screen.height - h) / 2;
str = str + ",left=" + PosX;
str = str + ",top=" + PosY;
CheckFinestrella();
window.document.Finestrella = window.open(URL,Nome,str);
FocusCheck();
}


//---Apre una finestra di dettaglio modale
function OpenModalDetail(myUrl, width, height) 
{
	var hborder = 6;
	var vborder = 30;
	vborder += 18;
	return window.showModalDialog(myUrl,"","dialogHeight:" + (height + vborder) + "px; dialogWidth:" + (width + hborder) +"px; resizable:no; help:no; scroll:no; status:no; center:no");	
}

function OpenModalDetail2(myUrl) 
{
	return OpenModalDetail(myUrl, 770, 660);
}



//---Chiude una finestra di dettaglio e va all'ultima pagina di una lista
function CloseDetail(GoToLastPage) {
if (window.opener)
if (window.opener.document)
if (window.opener.document.TableName)
{
	var TableName;
	TableName = window.opener.document.TableName;
	if (GoToLastPage) 
	{
	     window.opener.document.forms[TableName].elements[TableName + "_Page"].value = "-1";   
	     window.opener.document.forms[TableName].elements[TableName + "_Order"].value = ""; 	 
	     window.opener.document.forms[TableName].elements[TableName + "_OrderDir"].value = ""; 		 
	     eval("window.opener." + TableName + "_TabSwap(1);");  
	} 
	window.document.Finestrella = 0;	 
	SwFocusCheck(false);
	if (window.opener.document.forms[TableName])
	{
		window.opener.document.forms[TableName].submit();	 
	}
	window.close();	 
	return;
}

// Finestra modale
window.top.close();

}


//---Chiude una finestra di dettaglio e va all'ultima pagina di una lista
function CloseDetail2(GoToLastPage) {
var TableName;
TableName = window.opener.document.TableName;
  if (GoToLastPage) {
     window.opener.document.forms[TableName].elements[TableName + "_Page"].value = "1";   
     window.opener.document.forms[TableName].elements[TableName + "_Order"].value = ""; 	 
     window.opener.document.forms[TableName].elements[TableName + "_OrderDir"].value = ""; 		 
     eval("window.opener." + TableName + "_TabSwap(1);");  
     } 
window.document.Finestrella = 0;	 
SwFocusCheck(false);
if (window.opener.document.forms[TableName])
   window.opener.document.forms[TableName].submit();	 
window.close();	 
}

//---Verifica se e' aperta la finestrella e la chiude
function CheckFinestrella() {
if (window.document.Finestrella){
if (window.document.Finestrella != 0){
//     window.setTimeout("CloseFinestrella()",2000);
     CloseFinestrella();
     SwFocusCheck(false);	 
	 }
  }	 
}

//---Verifica se e' aperta la finestrella e la chiude
function CloseFinestrella() {
if (window.document.Finestrella){
if (window.document.Finestrella != 0){
     window.document.Finestrella.close();
	 window.document.Finestrella = 0; 
	 }
  }	 
}

//---Chiede se procedere
function Conferma(str,url) {
  if (window.confirm(str))
     document.location = url;
    else
	 return false;	 
}

//---Elimina un record
function DeleteRecord(TableName, id) {
if (window.confirm("Sicuro di voler cancellare definitivamente il record ?\n")) {
   window.document.forms[TableName].elements[TableName + "_Azione"].value = "DELETE";
   window.document.forms[TableName].elements[TableName + "_IdRecord"].value = id;
   window.document.forms[TableName].submit();
   }
  else
   return false;    
}

//---Pubblica un record
function SetPubblication(TableName, id, param) {
   window.document.forms[TableName].elements[TableName + "_Azione"].value = "PUBLISH";
   window.document.forms[TableName].elements[TableName + "_IdRecord"].value = id;
   window.document.forms[TableName].elements[TableName + "_AzioneParams"].value = param;   
   window.document.forms[TableName].submit();
}

//---Sposta un record
function MoveRecord(TableName, id, param) {
   window.document.forms[TableName].elements[TableName + "_Azione"].value = "MOVE";
   window.document.forms[TableName].elements[TableName + "_IdRecord"].value = id;
   window.document.forms[TableName].elements[TableName + "_AzioneParams"].value = param;   
   window.document.forms[TableName].submit();
}

//---Imposta tutti gli elementi di una select multipa
function SelectSetAll(Form,Nome,Valore) {
var i;
for(i=0;i<document.forms[Form].elements[Nome].options.length;i++)
  document.forms[Form].elements[Nome].options[i].selected = Valore;
}

//---Disattiva tutti gli input di un form
function DisableForm(Form,eccezioni) {
var i,x,vett,trovat;
vett = eccezioni.split(",");
for (i=0;i<document.forms[Form].elements.length;i++) {   
    trovato = false
    for (x=0;x<vett.length;x++) 
	  if (vett[x] == document.forms[Form].elements[i].name) trovato = true;
    if (!trovato)
      document.forms[Form].elements[i].disabled = true;
  }
}

//---Attiva tutti gli input di un form
function EnableForm(Form,eccezioni) {
var i,x,vett,trovat;
vett = eccezioni.split(",");
for (i=0;i<document.forms[Form].elements.length;i++) {   
    trovato = false
    for (x=0;x<vett.length;x++) 
	  if (vett[x] == document.forms[Form].elements[i].name) trovato = true;
    if (!trovato)
      document.forms[Form].elements[i].disabled = false;
  }
}


//---Torna il numero di selezioni in una select
function SelectTot(Form,Nome) {
var i,Tot;
Tot = 0;
for (i=0;i<document.forms[Form].elements[Nome].options.length;i++)
  if (document.forms[Form].elements[Nome].options[i].selected)
    Tot ++;
return Tot;	
}

function DoubleSelect_Change1(Form,Nome) {
var n;
n = SelectTot(Form,Nome + "_1");
if (n > 0) 
  document.forms[Form].elements[Nome + "_To2"].disabled = false;
 else 
  document.forms[Form].elements[Nome + "_To2"].disabled = true;  
if (n==0) 
  document.forms[Form].elements[Nome + "_1_Nessuno"].disabled = true;
 else
  document.forms[Form].elements[Nome + "_1_Nessuno"].disabled = false;  
if (n==document.forms[Form].elements[Nome + "_1"].options.length) 
  document.forms[Form].elements[Nome + "_1_Tutti"].disabled = true;
 else
  document.forms[Form].elements[Nome + "_1_Tutti"].disabled = false;   
  
}

function DoubleSelect_Change2(Form,Nome) {
var n;
n = SelectTot(Form,Nome + "_2");
if (n > 0) 
  document.forms[Form].elements[Nome + "_To1"].disabled = false;
 else 
  document.forms[Form].elements[Nome + "_To1"].disabled = true;  
if (n==0) 
  document.forms[Form].elements[Nome + "_2_Nessuno"].disabled = true;
 else
  document.forms[Form].elements[Nome + "_2_Nessuno"].disabled = false;  
if (n==document.forms[Form].elements[Nome + "_2"].options.length) 
  document.forms[Form].elements[Nome + "_2_Tutti"].disabled = true;
 else
  document.forms[Form].elements[Nome + "_2_Tutti"].disabled = false;   
  
}

//---Verifica se un certo valore e' in una form
function CheckInSelect(Form,Nome,Valore) {
var i;
for (i=0;i<document.forms[Form].elements[Nome].options.length;i++)
  if (document.forms[Form].elements[Nome].options[i].value == Valore)
    return true;
return false;
}

function DoubleSelect_Select1(Form,Nome) {
var i;
document.forms[Form].elements[Nome + "_1"].options.length = 0;
for (i=0;i<document.forms[Form].elements[Nome + "_0"].options.length;i++)
  if (! CheckInSelect(Form,Nome + "_2",document.forms[Form].elements[Nome + "_0"].options[i].value)) {
    document.forms[Form].elements[Nome + "_1"].options[document.forms[Form].elements[Nome + "_1"].options.length] = new Option(document.forms[Form].elements[Nome + "_0"].options[i].text,document.forms[Form].elements[Nome + "_0"].options[i].value);
	}
DoubleSelect_Change1(Form,Nome);	
DoubleSelect_Change2(Form,Nome);	
}

function DoubleSelect_Select2(Form,Nome) {
var i;
document.forms[Form].elements[Nome + "_2"].options.length = 0;
for (i=0;i<document.forms[Form].elements[Nome + "_0"].options.length;i++)
  if (! CheckInSelect(Form,Nome + "_1",document.forms[Form].elements[Nome + "_0"].options[i].value)) {
    document.forms[Form].elements[Nome + "_2"].options[document.forms[Form].elements[Nome + "_2"].options.length] = new Option(document.forms[Form].elements[Nome + "_0"].options[i].text,document.forms[Form].elements[Nome + "_0"].options[i].value);
	}
DoubleSelect_Change1(Form,Nome);	
DoubleSelect_Change2(Form,Nome);	
}

function DoubleSelect_UpdateRealSelect(Form,Nome) {
var i,str;
str = "";
for (i=0;i<document.forms[Form].elements[Nome + "_2"].options.length;i++) {
  if (str != "") str += ", ";
  str += document.forms[Form].elements[Nome + "_2"].options[i].value;
  }
document.forms[Form].elements[Nome].value = str;
}

function DoubleSelect_ToSelect2(Form,Nome) {
var i;
for (i=0;i<document.forms[Form].elements[Nome + "_1"].options.length;i++)
  if (document.forms[Form].elements[Nome + "_1"].options[i].selected)
    document.forms[Form].elements[Nome + "_2"].options[document.forms[Form].elements[Nome + "_2"].options.length] = new Option(document.forms[Form].elements[Nome + "_1"].options[i].text,document.forms[Form].elements[Nome + "_1"].options[i].value);    
DoubleSelect_Select1(Form,Nome);

DoubleSelect_UpdateRealSelect(Form,Nome);
}


function DoubleSelect_ToSelect1(Form,Nome) {
var i,str;
for (i=0;i<document.forms[Form].elements[Nome + "_2"].options.length;i++)
  if (document.forms[Form].elements[Nome + "_2"].options[i].selected)
    document.forms[Form].elements[Nome + "_1"].options[document.forms[Form].elements[Nome + "_1"].options.length] = new Option(document.forms[Form].elements[Nome + "_2"].options[i].text,document.forms[Form].elements[Nome + "_2"].options[i].value);    
DoubleSelect_Select2(Form,Nome);

DoubleSelect_UpdateRealSelect(Form,Nome);
}





function SelectGetID(Form,Nome,ID) {
var i;
for (i=0;i<document.forms[Form].elements[Nome].options.length;i++)
  if (document.forms[Form].elements[Nome].options[i].value == ID)
    return i;
return -1;	
}

function DoubleSelect_Init(Form,Nome) {
var i,vettore,n;

if (document.forms[Form].elements[Nome].value != "") {
vettore = document.forms[Form].elements[Nome].value.split(", ");
document.forms[Form].elements[Nome + "_2"].options.length = 0;
for (i=0;i<vettore.length;i++) {
  n = SelectGetID(Form,Nome + "_0",vettore[i]);
  if (n != -1)
  document.forms[Form].elements[Nome + "_2"].options[document.forms[Form].elements[Nome + "_2"].options.length] = new Option(document.forms[Form].elements[Nome + "_0"].options[n].text,document.forms[Form].elements[Nome + "_0"].options[n].value);  
  }
}
  
DoubleSelect_Select1(Form,Nome);  
DoubleSelect_Change1(Form,Nome);  
DoubleSelect_Change2(Form,Nome);  
}

function stopError() {
  return true;
}

window.onError = stopError;

function ShowAbout() {
//OpenDetail2('','http://cms.sapio.it/About.asp',550,350,'About');
alert("R-Machine 1.1 - Copyright © 2004 by SevenLab\r\n                       www.sevenlab.it");
}

function ShowHelp() {
OpenDetail2('','http://cms.sapio.it/Help/index.htm',770,520,'Helpme');
}