function azmodsingol(operaz){percorso=percorso+"azmodsingol; ";   /*clearTimeout(timeraz);*/ wsaz=datiaccredv[1]; wssetaz=datiaccredv[2]; azsezsel=""; 
if(wsprcreginit==""&&wsprcreg!=""){wsprcreginit=wsprcreg;} if(wsprcreginit!=""&&wsprcreg==""){wsprcreg=wsprcreginit;} /*alert(operaz+"\n"+wsprcreg);*/
i/*f(wssect.indexOf("gestione_comunicazioni")>-1){}*/
/*alert("azmodsingol\n"+operaz+"\n"+azprcreg+"\n"+wsprcreg+"\n"+datiaccredv+"\n"+wsaz+"\n"+wssetaz+"\n"+wssectab+"\n"+wssect+"\n"+tipop);*/
var p1=0; p1=wsprcreg.indexOf(".xml");if(p1>-1){p1=wsprcreg.lastIndexOf("/"); wsprcreg=wsprcreg.slice(0,p1);}
var prov="azmodsingol",str=sect="",i=j=k=0,indcart="../"+wsprcreg+"/"; 
var rifasp="gestserver1/generalistafile.asp?pos="+indcart+"&indreg="+indcart+"&operaz=registri"; window.open(rifasp,"popup"); 
/*ckxml=wsprcreg+"/listafile.xml";*/ ckxml=wsprcreg+"/listacontent.xml";  var aa=leggireg(ckxml); var listkey=nvarxml.getElementsByTagName("key"); 
var modextern=document.getElementById("modextern"); 
if(operaz=="newreg"){frmph="[a-z]{1}[a-zA-Z0-9_]{3,50}[.]{1}(xml)"; str="<input type='text' id='operaz' value='"+operaz+"' style='display:none' /><input id='prcreg' style='display:none' value='"+wsprcreg+"' /> <input id='sect' style='display:none' value='"+wssect+"' /> <input id='sectab' style='display:none' value='"+wssectab+"' /> <input id='sectop' style='display:none' value='"+azsectop+"' /> Nome del registro da generare: <input type='text' id='sel0' title='da 4 a 50 caratteri con estensione .xml' pattern='"+frmph+"' onchange='centroctrldata(this,\"text\");'><button id='prcd1' onclick='generamodkeygest(\""+operaz+"\",document.getElementById(\"sel0\").value);' > procedi</button> <div id='modextern01'></div><span id='modextern1_1'></span><div id='modextern1'></div><div id='modextern2'></div>"; document.getElementById("modextern").innerHTML=str; return;}
if(operaz!="visdocregaz"){ 
str=str+"<input type='text' id='operaz' value='"+operaz+"' style='display:none' /><input id='prcreg' style='display:none' value='"+wsprcreg+"' /> <input id='sect' style='display:none' value='"+wssect+"' /> <input id='sectab' style='display:none' value='"+wssectab+"' /> <input id='sectop' style='display:none' value='"+azsectop+"' />";

if(wssect.indexOf("gestione_comunicazioni")>-1){var subcartcomunicazioni=new Array();
ckxml=wsprcreg+"/listacontent.xml"; var aa=leggireg(ckxml);  var presdoc=""; var lskrif=nvarxml.getElementsByTagName("keyrif"); 
for(i=0;i<lskrif.length;i++){if(lskrif[i].attributes[0].value=="cartelle"){var lskey=lskrif[i].getElementsByTagName("key"); break;} } 
if(lskey.length>0){ for(i=0;i<lskey.length;i++){subcartcomunicazioni[i]=lskey[i].attributes[0].value; } }
modextern.innerHTML=str+"<!--<center>--><div id='modextern01'></div><span id='modextern1_1'></span><div id='modextern1'></div><div id='modextern2'></div>"; 
var str="<centera>seleziona il tipo di comunicazione che intendi consultare: <select id='sel0' onchange='aggiungisubcartcom(\""+operaz+"\",this.value)'><option value=''></option>";
var i=0; for(i=0;i<subcartcomunicazioni.length;i++){str=str+"<option value='"+subcartcomunicazioni[i]+"'>"+subcartcomunicazioni[i]+"</option>"; }str=str+"</select>";
document.getElementById("modextern01").innerHTML=str; return;
 }
str=str+" Seleziona il <b>registro</b> su cui operare: <select id='sel0' onchange='azmodsingol2(\""+operaz+"\",this.value)'><option value=''></option>"; 
for(i=0;i<listkey.length;i++){var val=listkey[i].attributes[0].value;  str=str+"<option value='"+val+"'>"+val+"</option>";} str=str+"</select>";
modextern.innerHTML=str+"<!--<center>--><div id='modextern01'></div><span id='modextern1_1'></span><div id='modextern1'></div><div id='modextern2'></div>";
} 
else{str=str+"<input type='text' name='azienda' value='"+wsaz+"' style='display:none' /><input name='sectorap' style='display:none' value='"+sectorap+"'>  <input name='regsel' id='regsel' style='display:none' value='sito_doc_azienda.xml'> visualizzazione del fyle system aziendale</b>";
modextern.innerHTML=str+"<div id='modextern2' > </div><!--<center>--><div id='modextern01'></div><span id='modextern1_1'></span><div id='modextern1'></div><div id='modextern2'></div>"; 
timeraz=setTimeout(function(){ azmodsingol1(operaz,"sito_doc_azienda.xml"); }, 1000);}  
document.getElementById("rifset").innerHTML="<mark>"+document.getElementById("prcreg").value+"</mark>"; 
}




function aggiungisubcartcom(operaz,subcartcom){percorso=percorso+"aggiungisubcartcom; "; 
var indregcom=subcartcom+"/"+subcartcom+".xml"; /*alert(operaz+"\n"+wssect+"\n"+indregcom); */
azmodsingol2(operaz,indregcom);
}

function wsfcostruiscicapitolato0(val){percorso=percorso+"wsfcostruiscicapitolato0; "; var indreg="",p1=0; /*alert("wsfcostruiscicapitolato\n"+val);*/
p1=val.lastIndexOf("/"); indreg=val.slice(0,(p1+1)); /*alert(http_request.responseText); */
var lskeyreg=nvarxml.getElementsByTagName("capitolato.xml");
for(i=0;i<azdatireg.length;i++){azdatiregv[i]=lskeyreg[0].attributes.getNamedItem(azdatireg[i]).value; } 
azdtsectab=azdatiregv[0].slice(1);azdtnumliv=azdatiregv[1];azdtstrut=azdatiregv[2].slice(1);azdtnomesezliv=azdatiregv[3].slice(1);azdtkeyrif=azdatiregv[4].slice(1);azdtletmod=azdatiregv[5];azdtinvisib=azdatiregv[6].slice(1);azdtcalcolati=azdatiregv[7].slice(1); azdtnewins=azdatiregv[8];azdtcancins=azdatiregv[9];azdtduplic=azdatiregv[10];azdtnewstrutins=azdatiregv[11]; azdtcancstrutins=azdatiregv[12];azdtcommonlist=azdatiregv[13];
if(document.getElementById("insnumk")!=null){ document.getElementById("insnumk").style.display="none";}
/*regin="operativo.xml"; regout="capitolato.xml"; var rifasp="gestserver1/copia_struttura_reg.asp?indreg="+indreg+"&regin="+regin+"&regout="+regout; window.open(rifasp,"popup");*/
var regdamod1="capitolato.xml",operaz="modstrut",liv=0,elstrutnew="keymod",numsezlivfin=0,nomsezliv=nomsez='',azione="inserimento chiavi settore "+val; /*alert(azione);*/
keyrif1="capitolato.xml ";  /*"keyrif "+aznomsezarfin[3]+"=&#39;"+azsezselfin[3]+"&#39;"; alert(keyrif1); return;*/
var frmph0="([0-9]{1,2})",frmph="([,]{1}[a-zA-Z]{1}[a-zA-Z0-9_]{1,20})+",frmph1="([,]{1}[a-zA-Z]{1}[a-zA-Z0-9_-]{1,20})+";
var str="<center><table style='table-layout:auto;width:auto;'><tr><td><center><h3>MODULO per strutturare il registro <b>"+regdamod1+"</b> del settore</br><mark>"+document.getElementById("sect").value+"</mark> </h3></center> </td></tr>"; 
str=str+"<tr><td>Indica il numero di moduli in cui il prodotto, <mark>ovvero il registro <b>"+regdamod1+"</b> che lo rappresenta</mark>, deve essere suddiviso:<center> <input type='text' id='nummod' min=1 value=0 pattern='"+frmph0+"' placeholder='numero di moduli da 1 a 99' title='"+frmph0+"' onchange='centroctrldata(this,\"text\");' style='width:10%;' /> <button onclick='wsfcostruiscicapitolato1(\""+operaz+"\",\""+regdamod1+"\",\""+liv+"\",\""+elstrutnew+"\","+numsezlivfin+",\""+nomsezliv+"\",\""+nomsez+"\",\""+val+"\")'> procedi </button> </center></td></tr>";
/*wsfcostruiscicapitolato1(\""+val+"\")*/
str=str+"</table> </center>"; document.getElementById("modextern01").innerHTML=str;
}
function wsfcostruiscicapitolato1(operaz,regdamod1,liv,elstrutnew,numsezlivfin,nomsezliv,nomsez,val){percorso=percorso+"wsfcostruiscicapitolato1; "; var indreg=msg="",p1=i=0; 
p1=val.lastIndexOf("/"); indreg=val.slice(0,(p1+1)); numsezlivfin=document.getElementById("nummod").value; 
if(nummod.style.color!="rgb(0, 0, 0)"){msg="<b> *ATTENZIONE * </b>dato non formalmente corretto: occorre indicare da 1 a 99 muduli in cui capitolato.xml deve essere strutturato"; mostraer(msg); var audio=new Audio("actung.wav").play(); return; }
if(nummod.value.slice(0,1)=="0"){msg="<b> *ATTENZIONE * </b>il numero di moduli deve essere maggiore di 0"; mostraer(msg); var audio=new Audio("actung.wav").play(); return; }
for(i=0;i<numsezlivfin;i++){nomsezliv=nomsezliv+",modulo"+(i+1); } nomsez=nomsezliv;
/*alert("wsfcostruiscicapitolato1\n"+operaz+"\n"+regdamod1+"\n"+liv+"\n"+elstrutnew+"\n"+numsezlivfin+"\n"+nomsezliv+"\n"+val);*/
azinviamodglobalstrut(operaz,regdamod1,liv,elstrutnew,numsezlivfin,nomsezliv,nomsez,val,"wsfcostruiscicapitolato1"); 
}
function wsfcostruiscicapitolato2(val){percorso=percorso+"wsfcostruiscicapitolato2; "; clearTimeout(timeraz); var indreg=msg="",p1=i=0; /*alert("wsfcostruiscicapitolato2\n"+val);*/
p1=val.lastIndexOf("/"); indreg=val.slice(0,(p1+1)); if(document.getElementById("nummod")!=null){ numsezlivfin=document.getElementById("nummod").value; }
if(azmonit=="fisso"){msg=istfooter.innerHTML; }else{msg=document.getElementById("contactmob").innerHTML; }
if(msg.indexOf("positivo")==-1){msg=msg+"</br><b> *ATTENZIONE * </b>l'operazione di strutturazione iniziale del registro capitolato.xml non e' riuscita. contattare il wsm"; mostraer(msg); var audio=new Audio("actung.wav").play(); return; }
else{msg=msg+"</br><mark> ora devi: cancellare la cronologia e attivare il percorso <b>Gestioni Aziendali > 2-Gestione Registri > 6-Modifica strutturale del registro: Inserimento_sezioni</b></mark></br>per inserire le sezioni di livello keyrif dei singoli moduli"; mostraer(msg); var audio=new Audio("actung.wav").play(); 
if(azmonit=="fisso"){istdoc.innerHTML="";}else{istmobdoc.innerHTML="";} return; }
/*
alert(history.length); history.length=0; alert(history.length); leggireg(val); var lskmod=nvarxml.getElementsByTagName("keymod");  alert(val+"\n"+lskmod.length+"\n"+http_request.responseText); 
var regdamod1="capitolato.xml",operaz="modstrut",liv=0,elstrutnew="keyrif",numsezlivfin=0,nomsezliv=nomsez=''; 
alert("legge capitolato.xml e per ogni sezione di keymod richiede la lista delle corrispondenti partizioni, ovvero sezioni di livello keyrif da generare"); return;
keyrif1="capitolato.xml ";  
var frmph0="([0-9]{1,2})",frmph="([,]{1}[a-zA-Z]{1}[a-zA-Z0-9_]{1,20})+",frmph1="([,]{1}[a-zA-Z]{1}[a-zA-Z0-9_-]{1,20})+";
var str="<center><table style='table-layout:auto;width:auto;'><tr><td><center><h3>MODULO per strutturare il registro <b>"+regdamod1+"</b></h3></center> </td></tr>"; 
str=str+"<tr><td>Indica il numero di moduli in cui il prodotto, <mark>ovvero il registro <b>"+regdamod1+"</b> che lo rappresenta</mark>, deve essere suddiviso:<center> <input type='text' id='nummod' min=1 value=0 pattern='"+frmph0+"' placeholder='numero di moduli da 1 a 99' title='"+frmph0+"' onchange='centroctrldata(this,\"text\");' style='width:10%;' /> <button onclick='wsfcostruiscicapitolato1(\""+operaz+"\",\""+regdamod1+"\",\""+liv+"\",\""+elstrutnew+"\","+numsezlivfin+",\""+nomsezliv+"\",\""+nomsez+"\",\""+val+"\")'> procedi </button> </center></td></tr>";
str=str+"</table> </center>"; document.getElementById("modextern01").innerHTML=str;
for(i=0;i<numsezlivfin;i++){nomsezliv=nomsezliv+",modulo"+(i+1); } nomsez=nomsezliv;
azinviamodglobalstrut(operaz,regdamod1,liv,elstrutnew,numsezlivfin,nomsezliv,nomsez,val,"wsfcostruiscicapitolato1"); 
*/
}

function azmodsingol2(operaz,val){percorso=percorso+"azmodsingol2; ";ckxml=document.getElementById("prcreg").value;var ckxml0=ckxml;ckxml=ckxml+"/"+val; 
var bb=leggireg(ckxml); var vval=""; /*alert("azmodsingol2\n"+operaz+"\n"+val+"\n"+ckxml);*/
/*alert("azmodsingol2\noperaz="+operaz+"\nval="+val+"\nckxml="+ckxml+"\n"+http_request.responseText);alert(val);*/
if(val=="regaccred.xml"){ckxml0=ckxml0+"/tip_operator.xml";/*alert(ckxml0);*/leggireg2(ckxml0);
/*var ckxml3=datiaccredv[2]+"/"+datiaccredv[1]+"/"+wssect+"/capitolato.xml"; alert(ckxml3); leggireg3(ckxml3);*/ }

/*alert(wsprcreg+"\n"+(operaz=="modstrut"&&val=="capitolato.xml"&&(wsprcreg.indexOf("produzione")==-1&&wsprcreg.indexOf("ristorazione")==-1)));*/
if(operaz=="modstrut"&&val=="capitolato.xml"&&(wsprcreg.indexOf("produzione")==-1&&wsprcreg.indexOf("ristorazione")==-1)){var ckxml3=wsprcreg+"/magazzino.xml"; 
leggireg3(ckxml3); /*setTimeout(function(){ leggireg3(ckxml); }, 200);*/}

if(operaz=="ordinareg"){/*var rifasp="gestserver1/ordinareg.asp?indreg="+ckxml; window.open(rifasp,"popup");*/ 
msg="** La procedura di ordinamento del registro <b>"+ckxml+"</b> e' stata avviata"; mostraer(msg); var p1=0,actung=""; p1=ckxml.lastIndexOf("/");nomreg=ckxml.slice(p1+1);
var str="<center><table style='table-layout:auto;width:auto;'><tr><td><center><h3>Procedura di ordinamento del registro <b>"+val+"</b> del settore</br><mark>"+document.getElementById("sect").value+"</mark> </h3></center> </td></tr>"; 
str=str+"<div id='continer' style='height:40%;width:100%; background-color:#ee0;overflow:auto;'> <table border=1><tr><th style='width:50%;vertical-align:top;'>registro attuale</th><th style='width:50%;vertical-align:top;'>registro ordinato</th></tr><tr><td style='vertical-align:top;'><div id='normale' style='word-wrap:break-word;'></div></td> <td style='max-height:50%;vertical-align:top;'><form id='frmnewraz' target='popup' style='display:block'> <table id='regord' style='border:1px #000 solid;border-collapse:collapse;vertical-align:top;'></table><input type='text' name='nomreg' value='"+nomreg+"' /><input type='text' name='indreg' value='"+document.getElementById("prcreg").value+"/ordinato_"+nomreg+"' /></form></td> </tr> </table></div>";
document.getElementById("modextern01").innerHTML=str; ordinareg(); /**/
return; }
/**/
if(val=="capitolato.xml"){ /*actung="<mark>l'eliminazione di una sezione dalla struttura del registro di <b>capitolato</b> elimina logicamente e fisicamente il corrispondente re */
var lskmod=nvarxml.getElementsByTagName("keymod"); }/*alert("**00** lskmod.length="+lskmod.length);*/
var lskrif=nvarxml.getElementsByTagName("keyrif");/**/ /*alert("**01** lskrif.length="+lskrif.length);*//*alert(operaz=="insreg"&&lskrif==null);*/
/*alert(lskrif==null);alert("azmodsingol2\noperaz="+operaz+"\nval="+val+"\nckxml="+ckxml+"\nlskrif.length="+lskrif.length+"\n"+http_request.responseText); */
/*alert("azmodsingol2\noperaz="+operaz+"\nval="+val+"\n"+(val=="capitolato.xml"&&(operaz=="insreg"||operaz=="modstrut")));(operaz=="insreg"||operaz=="modstrut")*/
if(operaz=="insreg"&&nvarxml.getElementsByTagName("keyrif")==null){ var msg="** ATTENZIONE ** il registro di <b>"+val+"</b> del settore operativo <b>"+document.getElementById("rifset").innerText+"</b> non e' stato ancora strutturato. Per farlo devi attivare il percorso: </br><mark><b>Gestioni Aziendali > 3-Gestione Straordinaria dei Registri > 3-Modifica strutturale per Inserimento_sezioni</b></mark>."; mostraer(msg); return; }
if(val=="capitolato.xml"&&operaz=="modstrut"&&lskmod.length>0&&lskrif.length>(lskmod.length*2)){var msg="** ATTENZIONE ** il livello keyrif di <b>capitolato.xml</b> e' stato definito; quindi puoi procedere col caricamento dei dati attivando il percorso: </br><mark><b>Gestioni Aziendali > 3-Gestione Straordinaria dei Registri > 3-Modifica strutturale per Inserimento_sezioni</b></mark>."; mostraer(msg);  }
var i=j=k=0,msg=dtreg=valk=""; /*ckxml=document.getElementById("prcreg").value+"/"+val;*/ /*alert(ckxml);*/ 
/*alert(ckxml+"\n"+http_request.responseText);*/
/*azdatireg="sectorab","dtnumliv","dtstrut","dtnomsezliv","dtkeyrif","letmod","dtinvisib","calcolati","newins","cancins","duplication","newstrutins","cancstrutins","commonlist"*/
/**/if(wssect.indexOf("gestione_comunicazioni")>-1){var p1=val.indexOf("/"); vval=val.slice(p1+1); azdatiregv[0]=vval;  }else{azdatiregv[0]=val; vval=val; } 
/*var bb=leggireg(ckxml);*/ /*alert(ckxml+"\n"+vval+"\n"+http_request.responseText);*//*alert(azdatireg); */ var lskeyreg=nvarxml.getElementsByTagName(vval); 
/*alert(ckxml+"\n"+vval+"\n"+azdatireg+"\n"+http_request.responseText);*/
for(i=0;i<azdatireg.length;i++){ valk=lskeyreg[0].attributes.getNamedItem(azdatireg[i]).value; /*alert(i+"\n"+azdatireg[i]+"\n"+valk); alert(azdatireg[i]+"="+valk);*/ azdatiregv[i]=valk; } 

/*alert(operaz+"\n"+azdatireg+"\n"+azdatiregv); alert(azdatiregv[5]+"\n"+operaz+"\n"+(azdatiregv[5]=="lettura"&&(operaz!="modkeygest"&&operaz!="killreg")));*/
if(azdatiregv[5]=="lettura"&&(operaz!="modkeygest"&&operaz!="killreg")){msg="** ATTENZIONE ** il registro di <b>"+val+"</b> del settore operativo <b>"+document.getElementById("rifset").innerText+"</b> e' di sola lettura; quindi non può essere modificato."; mostraer(msg); return; }
/*var modreg=new Array(0,2,3,4,6,7); for(i=0;i<modreg.length;i++){azdatiregv[modreg[i]]=azdatiregv[modreg[i]].slice(1); }; */
/*azdtsectab=azdtnumliv=azdtstrut=azdtnomesezliv=azdtkeyrif=azdtletmod=azdtinvisib=azdtcalcolati=""*/
azdtsectab=azdatiregv[0].slice(1);azdtnumliv=azdatiregv[1];azdtstrut=azdatiregv[2].slice(1);azdtnomesezliv=azdatiregv[3].slice(1);azdtkeyrif=azdatiregv[4].slice(1);azdtletmod=azdatiregv[5];azdtinvisib=azdatiregv[6].slice(1);azdtcalcolati=azdatiregv[7].slice(1); azdtnewins=azdatiregv[8];azdtcancins=azdatiregv[9];azdtduplic=azdatiregv[10];azdtnewstrutins=azdatiregv[11]; azdtcancstrutins=azdatiregv[12];azdtcommonlist=azdatiregv[13];
if(azdtletmod=="lettura"&&operaz!="letreg"&&tipop!="wsm"){var msg="<mark>* ATTENZIONE * il registro "+val+" è di sola lettura</mark>, pertanto non può essere modificato manualmente"; mostraer(msg); var audio=new Audio("actung.wav").play(); return;/**/ }
/*alert("\nazdtsectab="+azdtsectab+"\nazdtnumliv="+azdtnumliv+"\nazdtstrut="+azdtstrut+"\nazdtnomesezliv="+azdtnomesezliv+"\nazdtkeyrif="+azdtkeyrif+"\nazdtletmod="+azdtletmod+"\nazdtinvisib="+azdtinvisib+"\nazdtcalcolati="+azdtcalcolati);*/
if(operaz=="modkeygest"&&tipop=="wsm"){ckxml=wsprcreg+"/"+val; var bb=leggireg(ckxml); generamodkeygest(operaz,val); return; }
/*alert("azmodsingol2\n"+operaz+"\n"+val+"\n"+wssect+"\n"+wsprcreg+"/"+val);*/ /*(operaz,wssect,wsprcreg,this.value)*/
/*
if(history.length>1){var msg="<mark>* ATTENZIONE * prima di proseguire devi: 1 - <b>cancellare la cronologia del browser</b>, 2 - <b>nella select annulla la selezione poi ricarica il registro da modificare</b>, 3 - <b>entrato nella procedura cancella nuovamente la cache</b></mark>"; mostraer(msg); var audio=new Audio("actung.wav").play(); }
*/
if(bb.indexOf("NON TROVATO")>-1||lskeyreg.length==0){msg="<b>** ATTENZIONE **</b> il registro selezionato <mark>"+val+"</mark> non esiste o e' corrotto"; mostraer(msg); return;}
/*sectorab='' dtnumliv='' dtstrut='' dtnomsezliv='' dtkeyrif='' letmod='' dtinvisib='' calcolati='' newins='' cancins='' duplication='' newstrutins='' cancstrutins='' commonlist=''*/
/*if(lskeyreg[0].attributes[i]!=null){azdatiregv[i]=lskeyreg[0].attributes.getNamedItem(azdatireg[i]).value; }else{azdatiregv[i]=null;}*/
if(operaz!="killreg"){var str="Seleziona il <b>tipo di operazione da compiere</b>:<select id='sel1' onchange='azmodsingol3(\""+operaz+"\",this.value)'><option value=''></option>";}
else{var str="Se sei sicuro di volere eliminare il registro "+wsprcreg+"/"+val+" clicca su <button onclick='verificaeliminareg(\""+wsprcreg+"/"+val+"\");mostraer(\"\"); /*eliminareg(\""+wsprcreg+"/"+val+"\")*/'> procedi </button>";}
if(operaz=="modreg"){str=str+"<option value='modifica_tabellare'>modifica_tabellare</option>"; str=str+"<option value='modifica_schedulare'>modifica_schedulare</option>";}
if(operaz=="insreg"||operaz=="insregmir"){str=str+"<option value='inserimento_tabellare'>inserimento_tabellare</option>";str=str+"<option value='inserimento_schedulare'>inserimento_schedulare</option>";}
if(operaz=="letreg"){
str=str+"<option value='lettura_tabellare'>lettura_tabellare</option>";str=str+"<option value='lettura_schedulare'>lettura_schedulare</option>";
str=str+"<option value='lettura_globale'>lettura_globale</option>";}
if(operaz=="modglob"||operaz=="modstrut"||operaz=="elistrut"){ azsceglitmod1(operaz,val); return; }
if(operaz=="newreg"){str=str+"<option value='modifica_tabellare'>modifica_tabellare</option>"; str=str+"<option value='modifica_schedulare'>modifica_schedulare</option>";}
/*if(operaz=="killreg"){str=str+"<option value='modifica_tabellare'>modifica_tabellare</option>"; str=str+"<option value='modifica_schedulare'>modifica_schedulare</option>";}*/
if(operaz=="newsect"){str=str+"<option value='modifica_tabellare'>modifica_tabellare</option>"; str=str+"<option value='modifica_schedulare'>modifica_schedulare</option>";}
if(operaz=="killsect"){str=str+"<option value='modifica_tabellare'>modifica_tabellare</option>"; str=str+"<option value='modifica_schedulare'>modifica_schedulare</option>";}
str=str+"</select>";
str=str+"<center><div id='modprtins'><table style='width:100%;'><tr><td style='width:30%;'><div id='area1'></div></td><td style='width:70%;'><div id='area2'></div></td></tr></table></div><div id='modextern2_2'></div><div id='modextern3'></div><div id='modextern4'></div><div id='modextern5'></div><div id='modextern6'></div><div id='modextern7' style='display:none;'></div><div id='modextern8' style='display:none;'></div></center>";
modextern2.innerHTML=str;
/*op=document.createElement('OPTION');op.value="modificare elementi di struttura"; op.text="modificare elementi di struttura"; selec.add(op); azcaricasel(prov);*/
}

function verificaeliminareg(indreg){percorso=percorso+"verificaeliminareg; "; /*alert("wsfeliminainfo\n"+n+"\n"+delcart+"\n"+azindreg+"\n"+dtefstr);*/ 
var msg="<center><button onclick='chiudimodshort()'>[X]</button></center><table style='table-layout:auto;font-size:"+azfont2+"px'><tr><th colspan=2>Sei proprio sicuro di dovere </br><mark>eliminare il registro </br><b>"+indreg+"</b> ? </mark></th></tr><tr><td style='text-align:center'> <button onclick='eliminareg(\""+indreg+"\");chiudimodshort()'>SI</button> </td> <td style='text-align:center'><button onclick='chiudimodshort()'>NO</button></td></tr></table>"; /*alert(msg);*/
 istmds.style.textAlign="initial";
istmds.innerHTML=msg; istmds.style.display="block"; istmds.style.zIndex=150; /*return; */
}


function azsceglitmod1(operaz,nomreg){percorso=percorso+"azsceglitmod1; ";  /*alert(operaz+"\n"+azdatireg+"\n"+azdatiregv+"\n\n"+azdtstrut);*/
/*alert("azsceglitmod1\n"+operaz+"\n"+nomreg+"\n"+azdatiregv[2]+"\n"+azdatiregv[11]+"\n"+azdatiregv[12]+"\n"+azdatiregv[10]);*/ var fnz=""; 
/*azdatireg=("sectorab","dtnumliv","dtstrut","dtnomsezliv","dtkeyrif","letmod","dtinvisib","calcolati","newins","cancins","duplication","newstrutins","cancstrutins","commonlist","dtbase","ordinam")*/
/*alert(http_request.responseText);alert(http_request3.responseText);alert(http_request2.responseText);*/
/*azdtnumliv=azdatiregv[1];azdtnomesezliv=azdatiregv[3];azdtletmod=azdatiregv[5];*/ 
if(operaz!="modstrut"&&operaz!="elistrut"){ var str="<table><tr><th>Seleziona il <b>tipo di modifica</b> da realizzare: <select id='tipm1_1' onchange='azsceglitmod2(\""+operaz+"\",\""+nomreg+"\",this.value)' ><option value='' selected></option>";
if(azdatiregv[10]==""||azdatiregv[10]=="no"){str=str+"<option value='modificare_dati_preesistenti' >modificare_dati_preesistenti</option><option value='aggiungere_elementi'> aggiungere_elementi</option> <option value='eliminare_elementi' >eliminare_elementi</option>";}
if(azdatiregv[10]=="si"){str=str+"<option value='generare/registrare_protocolli' >generare/registrare_protocolli</option><option value='duplicare_elementi'> duplicare_elementi</option> <!--<option value='completare_duplicati'> completare_duplicati</option>--> <option value='annullare_elementi'> annullare_elementi</option>"; }}
if(operaz=="modstrut"||operaz=="elistrut"){ if(azdatiregv[11]=="no"&&azdatiregv[12]=="no"){str="* ATTENZIONE * <b>la struttura</b> del registro <b>"+nomreg+"</b> non puo' essere alterata in fase di modifica"; mostraer(str); var audio=new Audio("actung.wav").play(); return;} var i=0,opr=""; 
/*azdtstrut=azdatiregv[2].split(","); dtnomsezliv=new Array(); dtnomsezliv=azdatiregv[3].split(","); */
for(i=0;i<aznumsezliv.length;i++){aznumsezliv[i]=""; }
/**/if(azdtstrutsezsel.length>0){var n=azdtstrutsezsel.length; for(i=0;i<n;i++){azdtstrutsezsel.pop(); } }
var dtstrutar=new Array(); dtstrutar=azdtstrut.split(",");
/*
var str="<table><tr><th>Seleziona il <b>livello piramidale</b> nel quale operare: <select id='tipm1_1' onchange='azmodglobalstrut(\""+operaz+"\",\""+nomreg+"\",this.value)' ><option value='' selected></option>";
*/                                                                        /*selliv_0 diventa sellivop*/
var str="<table><tr><th>Seleziona il <b>livello piramidale</b> nel quale operare: <select id='sellivop' onchange='azmodglobalstrut(\""+operaz+"\",\""+nomreg+"\",this.value)' ><option value='' selected></option>";

for(i=0;i<dtstrutar.length;i++){str=str+"<option value='"+i+"' >"+opr+" "+dtstrutar[i]+"</option>"; }
}
str=str+"</select></th></tr></table><div id='modextern3_0' > </div><div id='modextern3' > </div><div id='modextern4' > </div><div id='modextern5'></div><div id='modextern6'></div><div id='modextern7'></div><div id='modextern8'></div>"; 
document.getElementById("modextern2").innerHTML=str; 
}

function ordinareg(){percorso=percorso+"ordinareg; "; var nreg=document.getElementById("sel0").value; /*alert(wsprcreg);*/
ckxml=document.getElementById("prcreg").value+"/"+nreg; /*alert(ckxml);var aa=leggireg(ckxml); */
var lskeyreg=nvarxml.getElementsByTagName(nreg); var lsatb=lskeyreg[0].attributes; /*alert(lsatb[15].value);*/
if(lsatb[15].value=="no"){msg="** ATTENZIONE ** il registro <b>"+nreg+"</b> non può essere ordinato"; mostraer(msg); istdoc.innerHTML=""; return; }

var regord=document.getElementById("regord");
var normale=document.getElementById("normale").innerText=http_request.responseText; 
var p1=nr=0,i=i1=i2=i3=i4=j=j1=j2=k=at=numliv=nsez=0,nomstrut=nomsez=newk=new2=newinp="",nomstrutar=new Array(),nomsezar=new Array(); var lssez,lssez0,lssez1,lsseez2,lsatb0,lsatb1,lsatb2,lsatb;
newk="<?xml version='1.0' encoding='UTF-8'?>"; 
/*row=regord.insertRow(nr); cell=row.insertCell(0); cell.innerText=newk; */
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
 newk="<"+nreg+" "; for(i=0;i<lsatb.length;i++){newk=newk+lsatb[i].nodeName+"='"+lsatb[i].value+"' "; }newk=newk+" >"; 
/*row=regord.insertRow(nr); cell=row.insertCell(0); cell.innerText=newk; nr++;newk="";*/
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
numliv=lsatb[1].value; nomstrut=lsatb[2].value.slice(1); nomsez=lsatb[3].value.slice(1); nomstrutar=nomstrut.split(","); nomsezar=nomsez.split(","); 
lssez0=nvarxml.getElementsByTagName(nomstrutar[0]);

if(numliv==4){ /*da modificare*/  
msg="** ATTENZIONE ** la procedura di ordinamento pu' essere applicata solo a <b>registri a 2 o 3 livelli.</b> <u>"+nreg+" e' a "+numliv+" livelli</mark>"; mostraer(msg); /*return;*/
for(i=0;i<lssez0.length;i++){lsatb0=lssez0[i].attributes; lssez1=lssez0[i].getElementsByTagName(nomstrutar[1]); 
/*
if(lssez1.length==0){msg="** ATTENZIONE ** la struttura di "+nreg+" non è completa; la procedura di ordinamento del registro non puo' essere eseguita";mostraer(msg);return;}
*/
if(lssez1.length>0){
for(j=0;j<lssez1.length;j++){lsatb1=lssez1[j].attributes; lssez2=lssez1[j].getElementsByTagName(nomstrutar[2]); 
for(k=0;k<lssez2.length;k++){lsatb2=lssez2[k].attributes; }}} }
var sezar0=new Array(); var sezar1=new Array(); var sezar2=new Array(); sezar0=[];
for(i=0;i<lssez0.length;i++){lsatb0=lssez0[i].attributes; sezar0[i]=lsatb0[0].value; } sezar0=sezar0.sort(); 
for(i=0;i<sezar0.length;i++){ newk=newk+"<"+nomstrutar[0]+" "+nomsezar[0]+"='"+sezar0[i]+"' >"; 
/*row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerText=newk; nr++; newk="";*/
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
for(j=0;j<lssez0.length;j++){lsatb0=lssez0[j].attributes; if(lsatb0[0].value==sezar0[i]){ 
lssez1=lssez0[j].getElementsByTagName(nomstrutar[1]);
for(i1=0;i1<lssez1.length;i1++){lsatb1=lssez1[i1].attributes; sezar1[i1]=lsatb1[0].value; } sezar1=sezar1.sort(); 
for(i2=0;i2<sezar1.length;i2++){newk=newk+"<"+nomstrutar[1]+" "+nomsezar[1]+"='"+sezar1[i2]+"' "; 
for(j1=0;j1<lssez1.length;j1++){lsatb0=lssez1[j1].attributes; if(lsatb0[0].value==sezar1[i2]){
for(at=1;at<lsatb0.length;at++){newk=newk+lsatb0[at].nodeName+"='"+lsatb0[at].value+"' "; } newk=newk+" >"; 
/*row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerText=newk; nr++; newk="";*/
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
 lssez2=lssez1[j1].getElementsByTagName(nomstrutar[2]); 
for(i3=0;i3<lssez2.length;i3++){lsatb2=lssez2[i3].attributes; sezar2[i3]=lsatb2[0].value; } /*sezar2=sezar2.sort();*/ sezar2=ordinasez(sezar2); /*alert(sezar2+"\n"+sezar2.length); return;*/
for(i4=0;i4<sezar2.length;i4++){for(j2=0;j2<lssez2.length;j2++){lsatb0=lssez2[j2].attributes; newk="<key ";
if(lsatb0[0].value==sezar2[i4]){ for(at=0;at<lsatb0.length;at++){newk=newk+lsatb0[at].nodeName+"='"+lsatb0[at].value+"' "; } newk=newk+"/>"; 
/*row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerText=newk;nr++; newk="";*/
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
}}} }sezar2=[]; }
newk="</"+nomstrutar[1]+">"; /*row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerText=newk;nr++; newk="";*/
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
}
newk=newk+"</"+nomstrutar[0]+">"; /*row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerText=newk;nr++; newk="";*/
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
}} }sezar1=[]; 
newk=newk+"</"+nreg+">";/*row=regord.insertRow(nr);var cell=row.insertCell(0); cell.innerText=newk;nr++; newk=""; */
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
}

if(numliv==3){var connum=0;
for(i=0;i<lssez0.length;i++){lsatb0=lssez0[i].attributes; lssez1=lssez0[i].getElementsByTagName(nomstrutar[1]); 
/*
if(lssez1.length==0){msg="** ATTENZIONE ** la struttura di "+nreg+" non è completa; la procedura di ordinamento del registro non puo' essere eseguita";mostraer(msg);return;}
*/
/*for(j=0;j<lssez1.length;j++){lsatb1=lssez1[j].attributes; lssez2=lssez1[j].getElementsByTagName(nomstrutar[2]); for(k=0;k<lssez2.length;k++){lsatb2=lssez2[k].attributes; }}*/ }
var sezar0=new Array(); var sezar1=new Array(); var sezar2=new Array(); var sezarrit=new Array(); sezar0=[];
for(i=0;i<lssez0.length;i++){lsatb0=lssez0[i].attributes; sezar0[i]=lsatb0[0].value; } sezar0=sezar0.sort(); 
for(i=0;i<sezar0.length;i++){/*alert("sezar0["+i+"]="+sezar0[i]);*/ newk=newk+"<"+nomstrutar[0]+" "+nomsezar[0]+"='"+sezar0[i]+"' >"; 
/*row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerText=newk; nr++; newk="";*/
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
for(j=0;j<lssez0.length;j++){lsatb0=lssez0[j].attributes; if(lsatb0[0].value==sezar0[i]){ lssez1=lssez0[j].getElementsByTagName(nomstrutar[1]);
for(i1=0;i1<lssez1.length;i1++){lsatb1=lssez1[i1].attributes; sezar1[i1]=lsatb1[0].value; } sezar1=sezar1.sort(); 
for(i2=0;i2<sezar1.length;i2++){newk=newk+"<"+nomstrutar[1]+" "+nomsezar[1]+"='"+sezar1[i2]+"' "; 
for(j1=0;j1<lssez1.length;j1++){lsatb0=lssez1[j1].attributes; if(lsatb0[0].value==sezar1[i2]){
for(at=1;at<lsatb0.length;at++){newk=newk+lsatb0[at].nodeName+"='"+lsatb0[at].value+"' "; } newk=newk+" >"; 
/*row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerText=newk; nr++; newk="";*/
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk=""; 
 lssez2=lssez1[j1].getElementsByTagName(nomstrutar[2]); 
 /*
 if(lssez2.length==0){msg="** ATTENZIONE ** nel registro "+nreg+" vi sono sezioni di livello keyrif vuote. <b>Per procedere occorre inserire in ciascuna sezione keyrif almeno una sezione di livello key</b>"; mostraer(msg); return;  }
 */
 if(lssez2.length>0){for(i3=0;i3<lssez2.length;i3++){lsatb2=lssez2[i3].attributes; /*alert(sezar2[i3]+" - "+lsatb2[0].value);*/  sezar2[i3]=lsatb2[0].value; }} /*alert("sezar2="+sezar2+"\nsezar0["+i+"]="+sezar0[i]+"\nsezar1["+i2+"]="+sezar1[i2]);*/
/*sezarrit=sezar2.sort(); sezar2=sezar2.sort();*/ /*alert(sezar2+"\n"+sezar2.length); */ /*alert(sezar2+"\n"+sezar2.length); */ var sezz=sezar2;
/*alert("sezar2="+sezar2+"\nsezz=sezz.metch(/_/gi)"+sezz.metch(/_/gi)); return;
if(sezar2.metch("_")>-1){}*/
sezarrit=ordinasez(sezar2); /*alert(sezarrit);*/
/*sezarrit=sezar2.sort(); alert(sezarrit);*/
for(i4=0;i4<sezarrit.length;i4++){for(j2=0;j2<lssez2.length;j2++){lsatb0=lssez2[j2].attributes; newk="<key ";
if(lsatb0[0].value==sezarrit[i4]){ for(at=0;at<lsatb0.length;at++){newk=newk+lsatb0[at].nodeName+"='"+lsatb0[at].value+"' "; } newk=newk+"/>"; 
/*row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerText=newk;nr++; newk="";*/
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
}}}
/**/
}sezar2=[]; }
newk="</"+nomstrutar[1]+">"; /*row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerText=newk;nr++; newk="";*/
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
} /*alert(i2+"/"+sezar1.length);*/
newk=newk+"</"+nomstrutar[0]+">"; /*row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerText=newk;nr++; newk="";*/
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
sezar1=[]; }} } 
newk=newk+"</"+nreg+">";/*row=regord.insertRow(nr);var cell=row.insertCell(0); cell.innerText=newk;nr++; newk=""; */
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk=""; /*return;*/
}

if(numliv==2){
for(i=0;i<lssez0.length;i++){lsatb0=lssez0[i].attributes; lssez1=lssez0[i].getElementsByTagName(nomstrutar[1]); 
for(j=0;j<lssez1.length;j++){lsatb1=lssez1[j].attributes; lssez2=lssez1[j].getElementsByTagName(nomstrutar[2]); 
for(k=0;k<lssez2.length;k++){lsatb2=lssez2[k].attributes; }} /**/}
var sezar0=new Array(); var sezar1=new Array(); var sezar2=new Array(); var sez=new Array(); sezar0=[];
for(i=0;i<lssez0.length;i++){lsatb0=lssez0[i].attributes; sezar0[i]=lsatb0[0].value; } sezar0=sezar0.sort(); /**/  
for(i2=0;i2<sezar0.length;i2++){newk=newk+"<"+nomstrutar[0]+" "+nomsezar[0]+"='"+sezar0[i2]+"' "; 
for(j1=0;j1<lssez0.length;j1++){lsatb0=lssez0[j1].attributes; if(lsatb0[0].value==sezar0[i2]){
for(at=1;at<lsatb0.length;at++){newk=newk+lsatb0[at].nodeName+"='"+lsatb0[at].value+"' "; } newk=newk+" >"; 
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
lssez1=lssez0[j1].getElementsByTagName(nomstrutar[1]); 
if(lssez1.length>0){
for(i3=0;i3<lssez1.length;i3++){lsatb1=lssez1[i3].attributes; sezar1[i3]=lsatb1[0].value; } /*sezar1=sezar1.sort();*/ sez=sezar1; /*sezar1=ordinasez(sez); */ 
 sezar1=ordinasezioni(sez); /*alert("sezar1="+sezar1);*/}
for(i4=0;i4<sezar1.length;i4++){for(j2=0;j2<lssez1.length;j2++){lsatb0=lssez1[j2].attributes; newk="<key ";
if(lsatb0[0].value==sezar1[i4]){ for(at=0;at<lsatb0.length;at++){newk=newk+lsatb0[at].nodeName+"='"+lsatb0[at].value+"' "; } newk=newk+"/>"; 
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
}}}sezar1=[];
newk="</"+nomstrutar[0]+">"; 
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
}} }sezar1=[]; 
newk=newk+"</"+nreg+">";
newk=newk.replace(/'/g,"&#39;"); newinp="<input type='text' style='width:100%;' name='key"+nr+"' value='"+newk+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; nr++;newk="";
}

newinp="<input type='text' style='width:100%;' name='nrec' value='"+nr+"'>";
var row=regord.insertRow(nr); var cell=row.insertCell(0); cell.innerHTML=newinp; 
var frm=document.getElementById("frmnewraz"); /*alert(strm);*/
frm.action="gestserver1/ordinareg.asp"; frm.target="popup"; frm.method="post"; /**/frm.submit(); 
}

function ordinasez(sezar2){percorso=percorso+"ordinasez; "; 
var sezar=new Array(),sezar3=new Array(),sezar4=new Array(),sezarx=new Array(),sn1=new Array(),sn2=new Array(),sarord=new Array(); var ix=jx=n=val=0; 
/*alert(sezar2);*/ for(ix=0;ix<sezar2.length;ix++){sezarx[ix]=sezar2[ix];} /*alert(sezarx);*/
for(ix=0;ix<sezarx.length;ix++){ sezar[ix]=0; for(jx=0;jx<sezarx[ix].length;jx++){sezar[ix]=sezar[ix]+sezarx[ix].charCodeAt(jx)*1; } } 
sezar.sort(function(a, b){return a-b}); /*alert("sezar="+sezar+"\n"+"sezar4="+sezar4); */
for(ix=0;ix<sezar.length;ix++){sezar4[ix]=sezar[ix];}
for(ix=0;ix<sezar.length;ix++){for(jx=0;jx<sezar4.length;jx++){if(sezar[ix]==sezar4[jx]){sezar3[ix]=sezarx[jx];/*alert(i+"-"+j+"-"+sezar[i]+"-"+sezar3[i]+"-"+sezar2[j]);*/break;}}} 
for(n=0;n<sezar3.length;n++){val=0;for(jx=0;jx<sezar3[n].length;jx++){val=val+sezar3[n].charCodeAt([jx]); }sn1[n]=sn2[n]=val;} sn2.sort(function(a, b){return a-b}); 
/*alert("sn1="+sn1+"\nsn2="+sn2);*/
for(n=0;n<sn2.length;n++){for(jx=0;jx<sn1.length;jx++){if(sn2[n]==sn1[jx]){sarord[n]=sezar3[jx]; break; } } } sezar3=sarord; /*alert("sezar3="+sezar3+"\nsarord="+sarord);*/
/*sezar3.sort(function(a, b){return a-b}); alert("sezar3="+sezar3);return(sezar3); alert(sarord);*/ return(sarord);
}

function eliminareg(indreg){percorso=percorso+"eliminareg; ";var p1=0,indregact=azione=newkey2=azione=oper=rifkey2=""; p1=indreg.lastIndexOf("/"); indregact=indreg.slice(0,(p1+1))+"regactivity.xml"; 
azione="elimina registro"; oper=cred1+"-"+cred2; 
newkey2="key data='"+azoggi+"' operatore='"+oper+"' settore='"+wssectab+"' azione='"+azione+"' riferimenti='"+indreg+"' />"; keyrif2="keyrif rif0='"; 
/*key data='19/11/2021' operatore='aaa-aaasss11a11a111a' settore='ristorante' azione='elimina registro' riferimenti='ristorazione/rs3/datiazienda/qqqq.xml' />*/
var rifasp="gestserver1/killreg.asp?indreg="+indreg+"&indregact="+indregact+"&newkey2="+newkey2+"&keyrif2="+keyrif2; window.open(rifasp,"popup"); istdoc.innerHTML="";
/* https://www.servizinterattivi.it/ptdmsg/gestserver1/killaz.asp?setmerc=ristorazione&az=ind; */
}

function azmodsingol3(operaz,operaz1){percorso=percorso+"azmodsingol3; ";/*alert("azmodsingol3\n"+operaz+"\n"+operaz1);*//*alert("azmodsingol3\n"+tipop);alert(http_request.responseText);*/
var msg="";var lskey=nvarxml.getElementsByTagName("key"); var regsel=document.getElementById("sel0").value; /*alert(regsel);alert(operaz1+"-"+lskey.length); */
if(regsel=="bozze.xml"){ckxml=wsprcreg+"/appunti.xml"; var bb=leggireg2(ckxml); }
/*alert(wssectab+"-"+wssect+"-"+azdatiregv[1]+"-"+azdatiregv[6]+"-"+azdatiregv[11]+"-"+azdatiregv[12]);*/
/*"sectorab","dtnumliv","dtstrut","dtnomsezliv","dtkeyrif","letmod","dtinvisib","calcolati","newins","cancins","duplication","newstrutins","cancstrutins","commonlist","dtbase","ordinam"*/
/*alert(azdatiregv[0]+"\n"+azdatiregv[1]+"\n"+azdatiregv[2]+"\n"+azdatiregv[3]+"\n"+azdatiregv[4]+"\n"+azdatiregv[5]+"\n"+azdatiregv[6]+"\n"+azdatiregv[7]);*/
if((operaz=="modreg")&&lskey.length==0){msg="<b>** ATTENZIONE **</b> il registro selezionato <mark>"+regsel+"</mark> non contiene nessun dato, ovvero il livello key non e' stato ancora costruito"; mostraer(msg); return;} 
if(azdatiregv[5]!="modifica"&&tipop!="wsm"&&operaz!="letreg"){msg="<b>** ATTENZIONE **</b> il registro selezionato <mark>"+regsel+"</mark> puo' essere solo tetto"; mostraer(msg); return; }
if(azdatiregv[11]!="si"&&azdatiregv[12]!="si"&&operaz1=="modificare_elementi_di_struttura"){msg="<b>** ATTENZIONE **</b> per il registro selezionato <mark>"+regsel+"</mark> non e' possibile inserire o eliminare elementi di struttura"; mostraer(msg); return; } /*alert(azdatiregv[0].indexOf(wssectab)+"\n"+tipop);*/
if(azdatiregv[0].indexOf(wssectab)==-1&&tipop!="wsm"){msg="<b>** ATTENZIONE **</b> il registro selezionato <mark>"+regsel+"</mark> puo' essere gestito solo da supervisori il cui settore operativo di appartenenza rientra tra quelli indicati dall'attributo sectorab del registro: "+azdatiregv[0]; mostraer(msg); return;}
/*alert("dtnumliv="+azdatiregv[1]+"\ndtstrut="+azdatiregv[2]+"\ndtnomsezliv="+azdatiregv[3]); */
var rifstrut=new Array(),numliv=azdatiregv[1]*1; rifstrut=azdatiregv[2].slice(1).split(","); var lsstrut=nvarxml.getElementsByTagName(rifstrut[0]); /*alert(lsstrut.length);*/ 
var str=sez="",i=0; /*alert(operaz=="modreg"||operaz=="insreg"||(operaz=="letreg"&&operaz1!="lettura_globale"));*/
if(operaz=="modreg"||operaz=="insreg"||operaz=="insregmir"||(operaz=="letreg"&&operaz1!="lettura_globale")){
str="seleziona la sezione di livello <b>"+rifstrut[0]+"</b> del registro <b>"+regsel+"</b> nella quale operare: <select id='selliv_"+numliv+"' onchange='liv_"+(numliv-1)+"(\""+operaz+"\",\""+operaz1+"\","+numliv+","+(numliv-1)+",this.value)' ><option value='' selected></option>";
for(i=0;i<lsstrut.length;i++){sez=lsstrut[i].attributes[0].value+""; /*alert(sez);*/ str=str+"<option value='"+sez+"'>"+sez+"</option>"; } str=str+"</select> ";
str=str+"<div id='divliv_"+(numliv-1)+"'></div> ";}
if(operaz1=="lettura_globale"){ if(wssect.indexOf("gestione_comunicazioni")==-1){ reg=document.getElementById("sel0").value; azlettabglob("",reg,"");return; } 
else{reg=document.getElementById("sel0").value; reg=reg+"/"+reg+".xml"; azlettabglob("",reg,"");return; } }
document.getElementById("modprtins").innerHTML=str;
}

function liv_4(operaz,operaz1,nliv,numliv,ktip){percorso=percorso+"liv_4; "; /*alert("liv_4\n"+operaz+"\n"+operaz1+"\n"+nliv+"\n"+ktip);*/  var lsstrut,lsstrut2;
var rifstrut=new Array();rifstrut=azdatiregv[2].slice(1).split(","); var i=j=k=ind=0,str="",sez="",trov=0; /*,numliv=azdatiregv[1]*1-1*/
/*if(nliv==5){*/ lsstrut=nvarxml.getElementsByTagName(rifstrut[nliv-5]); /*else{lsstrut=nvarxml.getElementsByTagName(rifstrut[nliv-4]);}*/
for(i=0;i<lsstrut.length;i++){sez=lsstrut[i].attributes[0].value+""; /*alert(sez+"\n"+ktip);*/if(sez==ktip){lsstrut2=lsstrut[i].getElementsByTagName(rifstrut[nliv-4]); 
/*alert(lsstrut2.length);*/ break;}}
str="seleziona la sezione di livello <b>"+rifstrut[nliv-4]+"</b> nella quale operare: <select id='selliv_"+numliv+"' onchange='liv_"+(numliv-1)+"(\""+operaz+"\",\""+operaz1+"\","+nliv+","+(numliv-1)+",this.value)' ><option value='' selected></option>";
for(i=0;i<lsstrut2.length;i++){sez=lsstrut2[i].attributes[0].value+""; /*alert(sez);*/ str=str+"<option value='"+sez+"'>"+sez+"</option>"; } str=str+"</select> ";
str=str+"<div id='divliv_"+(numliv-1)+"'></div> ";
document.getElementById("modextern3").innerHTML=str;
}
function liv_3(operaz,operaz1,nliv,numliv,kcat){percorso=percorso+"liv_3; "; /*alert("liv_3\n"+operaz+"\n"+operaz1+"\n"+nliv+"\n"+kcat); */
var lsstrut,lsstrut2; var i=j=k=ind=0,str="",sez="",trov=0; var rifstrut=new Array(); rifstrut=azdatiregv[2].slice(1).split(","); /*,numliv=azdatiregv[1]*1-2*/
/*alert("rifstrut="+rifstrut+"\nrifstrut[nliv-4]="+rifstrut[nliv-4]+"\nrifstrut[nliv-3]="+rifstrut[nliv-3]);*/
/*if(nliv==5){*/ lsstrut=nvarxml.getElementsByTagName(rifstrut[nliv-4]); /*}else{lsstrut=nvarxml.getElementsByTagName(rifstrut[nliv-4]); }*/
for(i=0;i<lsstrut.length;i++){sez=lsstrut[i].attributes[0].value+""; /*alert(sez+"\n"+kcat);*/ if(sez==kcat){ lsstrut2=lsstrut[i].getElementsByTagName(rifstrut[nliv-3]); 
/*alert(lsstrut2.length);*/ break;}} 
str="seleziona la sezione di livello <b>"+rifstrut[nliv-3]+"</b> nella quale operare: <select id='selliv_"+numliv+"' onchange='liv_"+(numliv-1)+"(\""+operaz+"\",\""+operaz1+"\","+nliv+","+(numliv-1)+",this.value)' ><option value='' selected></option>"; 
for(i=0;i<lsstrut2.length;i++){sez=lsstrut2[i].attributes[0].value+""; /*alert(sez);*/ str=str+"<option value='"+sez+"'>"+sez+"</option>"; } str=str+"</select> ";
str=str+"<div id='divliv_"+(numliv-1)+"'></div> ";
document.getElementById("modextern4").innerHTML=str;
}

function liv_2(operaz,operaz1,nliv,numliv,kset){percorso=percorso+"liv_2; "; /*alert("liv_2\n"+operaz+"\n"+operaz1+"\n"+nliv+"\n"+numliv+"\n"+kset);*/ var lsstrut,lsstrut2;
var rifstrut=new Array();rifstrut=azdatiregv[2].slice(1).split(","); var i=j=k=ind=0,str=sezione="",sez=new Array(),sez2=new Array(),trov=0; /*,numliv=azdatiregv[1]*1-3*/
/*alert("rifstrut="+rifstrut+"\nrifstrut[nliv-3]="+rifstrut[nliv-3]+"\nrifstrut[nliv-2]="+rifstrut[nliv-2]);*/
/*if(nliv==5){*/ lsstrut=nvarxml.getElementsByTagName(rifstrut[nliv-3]); /*}*/
/*alert(rifstrut[3]+"\n"+lsstrut.length);*/
for(i=0;i<lsstrut.length;i++){sezione=lsstrut[i].attributes[0].value+""; /*alert(sez+"\n"+kset);*/ if(sezione==kset){ lsstrut2=lsstrut[i].getElementsByTagName(rifstrut[nliv-2]); /*alert(lsstrut2.length);*/ break;}} 
for(i=0;i<lsstrut2.length;i++){sez[i]=lsstrut2[i].attributes[0].value+"";} sez=ordinasezioni(sez);
str="seleziona la sezione di livello <b>"+rifstrut[nliv-2]+"</b> nella quale operare: <select id='selliv_"+numliv+"' onchange='liv_"+(numliv-1)+"(\""+operaz+"\",\""+operaz1+"\","+nliv+","+(numliv-1)+",this.value)' ><option value='' selected></option>";
for(i=0;i<sez.length;i++){/*sez=lsstrut2[i].attributes[0].value+"";*/ /*alert(sez);*/ str=str+"<option value='"+sez[i]+"'>"+sez[i]+"</option>"; } str=str+"</select> ";
str=str+"<div id='divliv_"+(numliv-1)+"'></div> ";
document.getElementById("modextern5").innerHTML=str;
}

/*liv_1("insreg","inserimento_tabellare",2,1,this.value)*/

function liv_1(operaz,operaz1,nliv,numliv,krif){percorso=percorso+"liv_1; ";/*alert("liv_1\n"+operaz+"\n"+operaz1+"\n"+nliv+"\n"+numliv+"\n"+krif);*/var cc="",numnewk=0;
/*alert("liv_1\noperaz="+operaz+"\noperaz1="+operaz1+"\nnliv="+nliv+"\nckxml="+ckxml+"\n"+http_request.responseText);*/
/*alert(http_request.responseText);alert(http_request2.responseText);alert(http_request3.responseText); alert(azdtstrut);*/
if(krif.indexOf("direzione_")==-1&&krif.indexOf("gestione_")==-1&&datiaccredv[2]=="ristorazione"){
	/*wssect="produzione/"+krif;var ckxml3=datiaccredv[2]+"/"+datiaccredv[1]+"/"+wssect+"/capitolato.xml"; */
wssect=document.getElementById("rifset").innerText; ckxml3=wssect+"/capitolato.xml"; /*alert(ckxml3);*/ leggireg3(ckxml3);}
if(krif.indexOf("direzione_")==-1&&krif.indexOf("gestione_")==-1&&datiaccredv[2]=="formazione"){
	/*wssect="produzione/"+krif;var ckxml3=datiaccredv[2]+"/"+datiaccredv[1]+"/"+wssect+"/capitolato.xml"; */
wssect=document.getElementById("rifset").innerText; ckxml3=wssect+"/capitolato.xml"; /*alert(ckxml3);*/ leggireg3(ckxml3);}
/* if(krif=="gestione_comunicazioni"){wssect="datiazienda/"+krif; var ckxml3=datiaccredv[2]+"/"+datiaccredv[1]+"/"+wssect+"/capitolato.xml"; leggireg3(ckxml3); }*/
/*alert(ckxml3);*/
if(azdatiregv[5]=="lettura"&&(operaz=="modreg"||operaz=="insreg"||operaz=="insregmir")){msg="** ATTENZIONE ** il registro selezionato <b>"+document.getElementById("sel0").value+"</b> è di sola lettura e non può essere modificato"; mostraer(msg); return;}
if(operaz=="insreg"){ numnewk=document.getElementById("numnewk").value; /*alert(numnewk); */
if(numnewk==0){msg="** ATTENZIONE ** "+numnewk+" occorre indicare un numero di chiavi maggiore di zero per procedere"; mostraer(msg); return;}
}
var lsstrut,lsstrut2;var dtatbrif=new Array(),dtatbrifv=new Array(); var rifstrut=new Array();rifstrut=azdtstrut.split(","); /*alert(rifstrut+"\n"+nliv);*/
var i=j=k=n=ind=0,str=kkrif=cel="",trov=0,nonblac=rifk="";
/*if(nliv==5){}*/  lsstrut=nvarxml.getElementsByTagName(rifstrut[nliv-2]); 
/*var azsezselfin=new Array("","","","","");*/ var sezar=new Array(),sezsel=new Array(),nomsezar=new Array(); sezar=azdtstrut.split(","); /*azdatiregv[2].split(",");*/ 
nomsezar=azdtnomesezliv.split(","); /*azdatiregv[3].split(","); */
/*alert(sezar.length+"\n"+sezar);*/
for(i=nliv;i>1;i--){sezsel[nliv-i]=document.getElementById("selliv_"+i).value; } 
for(i=nliv;i>0;i--){azsezarfin[5-i]=sezar[(nliv-i)]; aznomsezarfin[5-i]=nomsezar[(nliv-i)]; azsezselfin[5-i]=sezsel[(nliv-i)];/*alert((5-i)+"\n"++"\n"+ )*/ }  
/*alert("sezar="+sezar+"\nsezsel="+sezsel+"\nazsezarfin="+azsezarfin+"\nazsezselfin="+azsezselfin);  alert(azsezarfin);*/
/*var ls5,ls4,ls3,ls2; var lsar=new Array(ls5,ls4,ls3,ls2);*/ var primo=sec=ter=qua=cin=0; 

var nomreg=document.getElementById("sel0").value; /*alert(krif);*/ var datarifkey="";
/*alert(wsprcreg+"\n"+azdatas1+"\n"+(wsprcreg.indexOf("gestione_fanclub")>-1&&nomreg!="regactivity.xml"&&nomreg!="canali.xml"));*/
if(wsprcreg.indexOf("gestione_fanclub")>-1&&nomreg!="regactivity.xml"&&nomreg!="canali.xml"){var datarifkey=azdatas1.slice(0,(azdatas1.length-1));
datarifkey=","+datarifkey+"/"; }

for(i=0;azsezarfin.length;i++){ if(azsezarfin[i]!=""){primo=i; break }} /*alert("azsezarfin["+primo+"]="+azsezarfin[primo]+"\nazsezselfin["+primo+"]="+azsezselfin[primo]);*/
var ls1=nvarxml.getElementsByTagName(azsezarfin[primo]); /*alert(primo+"\n"+azsezarfin[primo]+"\n"+ls1.length);*/
for(j=0;j<ls1.length;j++){ var val=ls1[j].attributes[0].value; /*alert(val+"\n"+azsezselfin[primo]);*/ if(val==azsezselfin[primo]){sec=j; /*alert("ok1 primo="+primo);*/
if(primo==3){var lsfin=ls1[sec];} break;} } /*alert(primo); alert(sec);*/ 
if(primo<3){var lskkrif=ls1[j]; primo++; var ls2=ls1[sec].getElementsByTagName(azsezarfin[primo]); /*alert(lskkrif.attributes[0].value);*/
for(j=0;j<ls2.length;j++){ var val=ls2[j].attributes[0].value; /*alert(val+"\nazsezarfin["+primo+"]="+azsezarfin[primo]+"\nazsezselfin["+primo+"]="+azsezselfin[primo]); */
if(val==azsezselfin[primo]){ter=j; /*alert("ok2 primo="+primo);*/ if(primo==3){var lsfin=ls2[j];} break;} }
} /*alert(primo);*/
if(primo<3){primo++; /*var ls3=ls2[ter].getElementsByTagName(azsezarfin[primo]);  alert(azsezarfin[primo]);*/ var ls3=lsfin.getElementsByTagName(azsezarfin[primo]);
for(j=0;j<ls3.length;j++){ var val=ls3[j].attributes[0].value; /*alert(val+"\nazsezarfin["+primo+"]="+azsezarfin[primo]+"\nazsezselfin["+primo+"]="+azsezselfin[primo]); */
if(val==azsezselfin[primo]){qua=j; /*alert("ok3 primo="+primo);*/ if(primo==3){var lsfin=ls3[j];} break;} }
} /*alert(primo);*/
if(primo<3){primo++; var ls4=ls3[qua].getElementsByTagName(azsezarfin[primo]); 
for(j=0;j<ls4.length;j++){ var val=ls4[j].attributes[0].value; /*alert(val+"\nazsezarfin["+primo+"]="+azsezarfin[primo]+"\nazsezselfin["+primo+"]="+azsezselfin[primo]); */
if(val==azsezselfin[primo]){cin=j; /*alert("ok4 primo="+primo);*/ if(primo==3){var lsfin=ls4[j];} break;} }
}
var trv=0; 
var lsatb0=lsfin.attributes; /*alert(lsatb0.length);*/ 
 for(j=1;j<lsatb0.length;j++){dtatbrif[j-1]=lsatb0[j].value; /*alert(j+"-"+lsatb0[j].value+"\n"+lsatb0[j].nodeName);*/ }/*alert(dtatbrif+"\n"+99+"\n"+azdatiregv[7]); */
var lskey=lsfin.getElementsByTagName("key"); /*alert(lskey.length);*/ var atbmancanti="";
var dtef=new Array(); 
if(document.getElementById("sel0").value!="datiazienda.xml"){ 
for(i=0;i<dtatbrif.length;i++){/*if(azdatiregv[7].indexOf(dtatbrif[i])==-1){*/ trv=0; /*if(azdatiregv[7].indexOf(dtatbrif[i])==-1){ }*/ /*alert(atbmancanti);*/
for(j=0;j<datiformtip.length;j++){if(dtatbrif[i]==datiformtip[j]){dtef[i]=numdatireg[j]; trv=1;} if(trv==1){break;} } if(trv==0){atbmancanti=atbmancanti+","+dtatbrif[i]; }}}

if(document.getElementById("sel0").value=="datiazienda.xml"){/*alert(dtatbrif);*/ for(i=0;i<dtatbrif.length;i++){ trv=0; 
for(j=0;j<datiformtip.length;j++){if(dtatbrif[i]==datiformtip[j]){dtef[i]=numdatireg[j]; trv=1;} if(trv==1){break;} } if(trv==0){atbmancanti=atbmancanti+","+dtatbrif[i]; }}}
/*alert(dtatbrif+"\n"+dtef+"\n"+dtatbrif.length+"\n"+dtef.length)*/
if(atbmancanti!=""&&operaz!="letreg"){msg="** ATTENZIONE ** per procedere occorre inserire nella banca dati del sistema i seguenti attributi: <b>"+atbmancanti+"</b>. Segnalare l'inconveniente al wsm."; mostraer(msg); return;} /*}}*/ /**//*alert(dtatbrif+"\n"+dtef);*/
/*if(krif=="corsisti"){kkrif="corsista";}if(krif=="provisti"){kkrif="provista";}if(krif=="docenti"){kkrif="docente";}*/
switch(krif){
case "corsisti":{kkrif="corsista";break;}
case "provisti":{kkrif="provista";break;}
case "docenti":{kkrif="docente";break;}
case "acquirenti":{kkrif="acquirente";break;}
case "avventori":{kkrif="avventore";break;}
case "chef":{kkrif="chef";break;}
case "cuochi":{kkrif="cuoco";break;}
case "caposala":{kkrif="caposala";break;}
case "magazzinieri":{kkrif="magazziniere";break;}
/*case "":{kkrif="";break;}*/
}
/*if(krif.indexOf("sala_")>-1){kkrif="caposala";}*/

var calcolato=0,frmph=strdt="";
/*alert(http_request.responseText);alert(http_request2.responseText);alert(http_request3.responseText);*/

if(operaz=="insreg"&&operaz1=="inserimento_tabellare"){ str=str+"<table style='table-layout:auto;'> <tr><th style='width:3%;'>N.</th>"; 
for(i=0;i<dtatbrif.length;i++){if(azdatiregv[6].indexOf(dtatbrif[i])>-1){nonblac=" style='display:none'";}else{nonblac="";}
if(dtatbrif[i]=="data_ins"){strdt=" data: "+azoggi; }else{strdt="";}
str=str+"<th"+nonblac+">"+dtatbrif[i]+strdt+"</th>"; }
str=str+"<th>registra</th></tr>";
for(i=0;i<numnewk;i++){ str=str+"<tr><th>"+(i+1)+"</th>"; 
for(j=0;j<dtatbrif.length;j++){if(azdatiregv[6].indexOf(dtatbrif[j])>-1){nonblac=" style='display:none'";}else{nonblac="";}
if(azdatiregv[7].indexOf(dtatbrif[j])>-1||azdatiregv[6].indexOf(dtatbrif[j])>-1||dtatbrif[j]=="password"){calcolato=1;}else{calcolato=0;} /*if(azdatiregv[7].indexOf(dtatbrif[i])==-1){ }*/
/*if(calcolato==0){alert(calcolato+"-"+dtatbrif[j]); }else{ str=str+"<td><input style='border:transparent;width:80%;' type='text' id='keycel_"+i+"_"+j+"' title='campo calcolato runtime\n"+datiformph[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' value='"; 
if(dtatbrif[j]=="caricato"||dtatbrif[j]=="fotorif"){str=str+"no";}if(dtatbrif[j]=="tipoper"){str=str+kkrif;} 
if(dtatbrif[j].indexOf("lp")>-1||dtatbrif[j]=="saldata"||dtatbrif[j]=="chiusa"){str=str+"0";}
str=str+"' disabled /></td> "; } alert(j+"\n"+datiformtipinp[dtef[j]]);*/
switch(datiformtipinp[dtef[j]]){
case "text":{/*alert(dtatbrif[j]+"-"+calcolato); alert(dtatbrif[j].nodeName);*/ var valatbk="";
if(wsprcreg.indexOf("gestione_fanclub")>-1&&nomreg!="regactivity.xml"&&nomreg!="canali.xml"&&dtatbrif[j]=="data_ins"){valatbk=datarifkey; }
if(wsprcreg.indexOf("gestione_fanclub")>-1&&nomreg!="regactivity.xml"&&nomreg!="canali.xml"&&dtatbrif[j]=="nickname"){valatbk="nali"; }
if(wsprcreg.indexOf("gestione_fanclub")>-1&&nomreg!="regactivity.xml"&&nomreg!="canali.xml"&&dtatbrif[j]=="stato"){valatbk="0"; } /*alert(dtatbrif[j]+"\n"+valatbk);*/
if(calcolato==0){ str=str+"<td"+nonblac+"><input type='text' id='keycel_"+i+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' style='width:100%;' value='"+valatbk+"' />";
}
else{ str=str+"<td"+nonblac+"><input type='text' id='keycel_"+i+"_"+j+"' value='"+valatbk+"' "; 
if(dtatbrif[j]=="caricato"||dtatbrif[j]=="fotorif"){str=str+"no";}if(dtatbrif[j]=="tipoper"){str=str+kkrif;} 
if(dtatbrif[j].indexOf("lp")>-1||dtatbrif[j]=="saldata"||dtatbrif[j]=="chiusa"){str=str+"0";}
str=str+" disabled=true /></td> "; } break;}
case "textarea":{str=str+"<td"+nonblac+"><textarea id='keycel_"+i+"_"+j+"' rows='3' required title='"+datiformpattern[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' onchange='centroctrldata(this,\"textarea\")'></textarea> <input type='text' id='textarap' pattern='"+datiformpattern[dtef[i]]+"' style='display:none;' ></td>";
/*var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1;str=str+" readonly"; kil="canc:<input type='text' oninput='cancingredspec(this,\""+ntot+"\")' title='selezionare e trascinare il nome dell&#39;ingrediente da eliminare' style='size:130px;'>";} str=str+" '></textarea> "+kil+"</td>";*/ break;}
case "number":{var min=0; str=str+"<td"+nonblac+"><input type='number' id='keycel_"+i+"_"+j+"' value='"+cel+"' ";
if(datiformtip[dtef[j]]=="tmpcolmax"){str=str+"min=0.4 max=9 step=.4";} 
str=str+" required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"number\")'></td>"; break;}
case "selprot":{str=str+"<td><select id='keycel_"+i+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; nrc=new Array("NO","SI");
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str=str+" selected ";} str=str+">"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectrc":{var lskey=nvarxml2.getElementsByTagName("key"); nrc=new Array(); var tipoperator=lskey[0].attributes[0].value; nrc=tipoperator.slice(1).split(",");
 str=str+"<td><select id='keycel_"+i+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; /*nrc=new Array("res","sup","wsm");*/
/* str=str+"<td><select id='keycel_"+i+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; */
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' >"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selrep":{if(nvarxml.getElementsByTagName("keymod")!=null){ var lskeymod=nvarxml.getElementsByTagName("keymod");} 
else{var lskeymod=nvarxml.getElementsByTagName("keymod");}
 str=str+"<td><select id='keycel_"+i+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; /*nrc=new Array("res","sup","wsm");*/
/* str=str+"<td><select id='keycel_"+i+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; */
for(n=0;n<lskeymod.length;n++){var mod=lskeymod[n].attributes[0].value; /*alert(mod);*/ str=str+"<option value='"+mod+"' >"+mod+"</option> ";}  str=str+"</select></td>"; break;}
case "password":{ str=str+"<td"+nonblac+"><input type='password' id='keycel_"+i+"_"+j+"' value='' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td> "; break;}
case "mail":{ str=str+"<td"+nonblac+"><input type='mail' id='keycel_"+i+"_"+j+"' value='' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td> "; break;}
case "file":{/*alert(wsprcreg);*/ if(wsprcreg.indexOf("fanclub")>-1){var tipdoc="documenti_fanclub";aznkbpdf=3500;aznkbimg=500;aznkbmp4=35000; var n=2.11; azindreg=wsprcreg+"/"+document.getElementById("sel0").value; p1=nomreg.indexOf(".xml"); var inddoc=wsprcreg+"/"+nomreg.slice(0,p1);

str=str+"<td> <form method=post action='' id='frmw' target='popup' enctype=multipart/form-data > <table>  <tr><td>E' possibile caricare: </br> &#160;&#160; * o <u>un documento pdf</u> non superiore a "+aznkbpdf+"KB</br> &#160;&#160; * o <u>un'immagine</u> png,gif o jpg non superiore a "+aznkbimg+"KB</br>seleziona l'immagine o il pdf da cariare:<br/> <input type='file' name='immagini' onfocus='this.style.color=\"#000;\"' id='immagini' onchange='caricaff(this,\""+tipdoc+"\","+i+")' />  CARICA <select onchange='wsfinviainfo("+n+"); '><option selected></option><option value='INVIA'>INVIA</option><option value='INVIA'> REINVIA</option> </select> </br> &#160;&#160; * o <u>il link di un video</u>:  <!--<input type='text' id='doc_"+i+"' >--> <input type='text' name='nf' id='nf_"+i+"' value='' onchange='svuotaform("+i+")' /> </br> &#160;&#160; * o <u>nessun allegato</u>: <button onclick='document.getElementById(\"frmw\").innerHTML=\"\";' > nessun allegato </button>  </td></tr> </table><table style='display:none'><tr><td> <input type='text' name='data' value='"+azoggi+"' /> <input type='text' name='cred1' value='"+cred1+"' /> <input type='text' name='cred2' value='"+cred2+"' /> <input type='text' name='indbase' value='"+wsprcreg+"/' />  <input type='text' name='act' value='"+operaz+"' /> <input type='text' name='sett' value='"+sett+"' /> <input type='text' name='sectop' value='"+sectop+"' /> <input type='text' name='indreg0' value='"+inddoc+"/' /> <input type='text' id='nxn' value='7'> <input type='text' id='rifxrif' value='Documenti in "+wssect+"'></td></tr></table> </form></td>"; 
/*
str=str+"<td> <form method=post action='' id='frmw' target='popup' enctype=multipart/form-data > <table>  <tr><td>E' possibile caricare: </br> o <u>1 documento pdf</u> non superiore a "+aznkbpdf+"KB</br> o <u>1 immagine</u> png,gif o jpg non superiore a "+aznkbimg+"KB</br> o <u>il link di un video</u> </br>quindi: </br>seleziona l'immagine o il pdf da cariare:<br/> <input type='file' name='immagini' onfocus='this.style.color=\"#000;\"' id='immagini' onchange='caricaff(this,\""+tipdoc+"\")' />  CARICA <select onchange='wsfinviainfo("+n+"); '><option selected></option><option value='INVIA'>INVIA</option><option value='INVIA'> REINVIA</option> </select> </br> oppure inserisci il link del video: <input type='text' id='doc_"+i+"' > </td></tr> </table><table style='display:none'><tr><td> <input type='text' name='data' value='"+azoggi+"' /> <input type='text' name='cred1' value='"+cred1+"' /> <input type='text' name='cred2' value='"+cred2+"' /> <input type='text' name='indbase' value='"+wsprcreg+"/' /> <input type='text' name='nf' id='nf' value='' /> <input type='text' name='act' value='"+operaz+"' /> <input type='text' name='sett' value='"+sett+"' /> <input type='text' name='sectop' value='"+sectop+"' /> <input type='text' name='indreg0' value='"+inddoc+"/' /> <input type='text' id='nxn' value='7'> <input type='text' id='rifxrif' value='Documenti in "+wssect+"'></td></tr></table> </form></td>"; 
*/
break;}} 
}
/*else if(document.getElementById("sel0").value=="capitolato.xml"){str=str+"<td><input style='width:10%;' type='text' id='keycel_"+i+"_"+j+"' value='no' title='campo calcolato runtime' placeholder='calcolato' disabled /></td> ";}*/

}
str=str+"<td style='text-align:center;'><button id='btn_"+i+"' onclick='vedicomplcor0(\""+i+"\",\""+dtatbrif+"\",\""+operaz+"\",this)'>salva</button></td></tr>";}
/*alert(wsprcreg);*/ 

/*
if(wsprcreg.indexOf("artistico")>-1){ var tipdoc="documenti_aziendali";aznkbpdf=3500;aznkbimg=500;aznkbmp4=35000; var n=2.11; azindreg=wsprcreg+"/"+document.getElementById("sel0").value;
str=str+"<tr><td colspan="+(dtatbrif.length+2)+" > <form method=post action='' id='frmw' target='popup' enctype=multipart/form-data > <table>  <tr><td>E' possibile caricare <mark>1 documento pdf non superiore a "+aznkbpdf+"KB</mark> o <mark>video mp4 minori di "+aznkbmp4+"Kb</mark> oppure <mark>1 immagine png,gif o jpg non superiore a "+aznkbimg+"KB</mark></br>seleziona il documento da inviare:<br/> <input type='file' name='immagini' onfocus='this.style.color=\"#000;\"' id='immagini' onchange='caricaff(this,\""+tipdoc+"\")' /> </td></tr><tr><td> INVIA <select onchange='wsfinviainfo("+n+"); '><option selected></option><option value='INVIA'>INVIA</option><option value='INVIA'> REINVIA</option> </select></td></tr> </table><table style='display:none'><tr><td> <input type='text' name='data' value='"+azoggi+"' /> <input type='text' name='cred1' value='"+cred1+"' /> <input type='text' name='cred2' value='"+cred2+"' /> <input type='text' name='indbase' value='"+azindreg+"' /> <input type='text' name='nf' id='nf' value='' /> <input type='text' name='act' value='"+operaz+"' /> <input type='text' name='sett' value='"+sett+"' /> <input type='text' name='sectop' value='"+sectop+"' /> <input type='text' name='indreg0' value='"+wsprcreg0+"' /> <input type='text' id='nxn' value='7'> <input type='text' id='rifxrif' value='Documenti in "+wssect+"'></td></tr></table> </form></td></tr>";} 
*/

str=str+"</table>"; 

if(document.getElementById("sel0").value=="bozze.xml"){
var strp="<center>scegli, dalla <b>sezione emozionale di appunti</b> la frase che intendi riportare: <br/><select id='sel' onchange='caricaspot(this.value);'> <option value='' selected></option>";
var lskrif=nvarxml2.getElementsByTagName("keyrif"); var numkeyar=numkeygenar=new Array(),i=j=k=n=0; /*alert(lskrif.length);*/
for(i=0;i<lskrif.length;i++){var sezem=lskrif[i].attributes[0].value; var lskey=lskrif[i].getElementsByTagName("key"); /*alert(i+" - "+sezem);*/
strp=strp+"<optgroup label='spot della sezione "+sezem+"'>";
for(j=0;j<lskey.length;j++){var spot=lskey[j].attributes[1].value; 
strp=strp+"<option value='"+sezem+"/"+spot+"'> "+spot+"</option>";} 
strp=strp+"</optgroup>"; 
}
strp=strp+"</select></br><b>copia</b> e <b>incolla</b> dove vuoi lo spot selezionato: <span id='spt' style='background-color:#ffa;'></span></center>"; 
var mdx8=document.getElementById("modextern8"); mdx8.innerHTML=strp; mdx8.style.display="block"; mdx8.style.zIndex=2; return;
}
var mdx8=document.getElementById("modextern8"); mdx8.innerHTML=str; mdx8.style.display="block"; mdx8.style.zIndex=2; 
document.getElementById("keycel_0_3").style.width=400+"px"; return;
}/*}*/

/*alert(operaz=="insreg"&&operaz1=="inserimento_schedulare");*/
if(operaz=="insreg"&&operaz1=="inserimento_schedulare"){
for(i=0;i<numnewk;i++){ str=str+"<span style='background-color:"+wscl[2]+";color:"+wscl[0]+";'> &#160; <b>chiave n."+(i+1)+"</b> </span>";
str=str+" <table style='table-layout:auto;'> "; 
for(j=0;j<dtatbrif.length;j++){if(azdatiregv[6].indexOf(dtatbrif[j])>-1){nonblac=" style='display:none'";}else{nonblac="";}
str=str+"<tr"+nonblac+"><td style='width:30%;'>"+dtatbrif[j]+"</td>"; 
if(azdatiregv[7].indexOf(dtatbrif[j])>-1){ calcolato=1;}else{calcolato=0;} /*alert(calcolato+"-"+dtatbrif[j]);*/
if(calcolato==0){
switch(datiformtipinp[dtef[j]]){
case "text":{ str=str+"<td"+nonblac+"><input type='text' id='keycel_"+i+"_"+j+"' value='' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' style='width:98%;' /></td> "; break;}
case "textarea":{str=str+"<td"+nonblac+"><textarea id='keycel_"+i+"_"+j+"' rows='3' required title='"+datiformpattern[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' onchange='centroctrldata(this,\"textarea\")'></textarea> <input type='text' id='textarap' pattern='"+datiformpattern[dtef[i]]+"' style='display:block;' ></td>";
/*var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1;str=str+" readonly"; kil="canc:<input type='text' oninput='cancingredspec(this,\""+ntot+"\")' title='selezionare e trascinare il nome dell&#39;ingrediente da eliminare' style='size:130px;'>";} str=str+" '></textarea> "+kil+"</td>";*/ break;}
case "number":{str=str+"<td"+nonblac+"><input type='number' id='keycel_"+i+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' min=1 onchange='centroctrldata(this,\"number\")'></td></tr>"; break;}
case "selprot":{str=str+"<td><select id='keycel_"+i+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; nrc=new Array("NO","SI");
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str=str+" selected ";} str=str+">"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectrc":{/*alert(http_request2.responseText);*/ var lskey=nvarxml2.getElementsByTagName("key"); nrc=new Array(); var tipoperator=lskey[0].attributes[0].value; nrc=tipoperator.slice(1).split(",");
 str=str+"<td><select id='keycel_"+i+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; /*nrc=new Array("res","sup","wsm");*/
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str=str+" selected ";} str=str+">"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "password":{ str=str+"<td"+nonblac+"><input type='password' id='keycel_"+i+"_"+j+"' value='' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td> "; break;}
case "mail":{ str=str+"<td"+nonblac+"><input type='mail' id='keycel_"+i+"_"+j+"' value='' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td> "; break;}
}}
/*else{if(document.getElementById("sel0").value=="capitolato.xml"){str=str+"<td><input style='width:10%;' type='text' id='keycel_"+i+"_"+j+"' value='no' title='campo calcolato runtime' placeholder='calcolato' disabled /></td> ";}*/
else{ str=str+"<td><input type='text' id='keycel_"+i+"_"+j+"' style='border:transparent;' title='campo calcolato runtime\n"+datiformph[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' value='"; if(dtatbrif[j]=="caricato"||dtatbrif[j]=="fotorif"){str=str+"no";} if(dtatbrif[j]=="tipoper"){str=str+kkrif;} str=str+"' disabled /></td> "; }/*}*/
str=str+"</tr>"; }
str=str+"<tr><td style='text-align:center;' colspan=2><button id='btn_"+i+"' onclick='vedicomplcor0(\""+i+"\",\""+dtatbrif+"\",\""+operaz+"\",this)'>salva</button></td></tr>"; 
str=str+"</table>"; }
/*
if(document.getElementById("sel0").value=="bozze.xml"){
var strp="<center>scegli, dalla <b>sezione emozionale di appunti</b> la frase che intendi riportare: <br/><select id='sel' onchange='caricaspot(this.value);'><option value='' selected></option>";
var lskrif=nvarxml2.getElementsByTagName("keycat"); var numkeyar=numkeygenar=new Array(),i=j=k=n=0;
for(i=0;i<lskrif.length;i++){var sezem=lskrif[i].attributes[0].value; var lskey=lskrif[i].getElementsByTagName("key"); 
strp=strp+"<optgroup label='spot della sezione "+sezem+"'>";
for(j=0;j<lskey.length;j++){var spot=lskey[j].attributes[0].value; 
strp=strp+"<option value='"+sezem+"/"+spot+"'> "+spot+"</option>";} 
strp=strp+"</optgroup>"; 
}
strp=strp+"</select></center>"; 
var mdx8=document.getElementById("modextern8"); mdx8.innerHTML=strp; mdx8.style.display="block"; mdx8.style.zIndex=2; 
}
*/
document.getElementById("sclfunz").innerHTML=str; 
}
/*alert("operaz="+operaz+"\noperaz1="+operaz1+"\n"+(operaz=="modreg"&&operaz1=="modifica_tabellare"));*/
/*0-sectorab 1-dtnumliv 2-dtstrut 3-dtnomsezliv 4-dtkeyrif 5-letmod 6-dtinvisib 7-calcolati 8-newins 9-cancins 10-duplication 11-newstrutins 13-cancstrutins 14-commonlist 15-dtbase 16-ordinam*/
if(operaz=="modreg"&&operaz1=="modifica_tabellare"){/*alert(dtatbrif);*/ str=str+"<table style='table-layout:fixed;max-width:96%;'> <tr><th style='width:3%'>N.</th>"; /*alert(http_request.responseText);*/ var mst=cheksi=chekno=""; /* alert(krif+"\n"+document.getElementById("selliv_3").value);*/
/*alert(lskkrif.attributes[0].value);*/
/*for(j=0;j<lsfin.length;j++){ var val=lsfin[j].attributes[0].value; alert(88+"\n"+val+"\n"+document.getElementById("selliv_3").value); 
if(val==document.getElementById("selliv_3").value){var lskok=lsfin[j]; break; }}*/
if(nliv>2){var lskrif=lskkrif.getElementsByTagName("keyrif");}else{var lskrif=nvarxml.getElementsByTagName("keyrif");}
/*alert(lskey.length+"\n"+krif+"\n"+lskrif.length); */
for(i=0;i<lskrif.length;i++){if(lskrif[i].attributes[0].value==krif){var ikrif=i;break;} }
var lskey=lskrif[ikrif].getElementsByTagName("key"); var numatb=dtatbrif.length;
/*alert("liv_1\ndtatbrif="+dtatbrif+"\ndtef="+dtef+"\ndtatbrif.length="+dtatbrif.length+"\ndtef.length="+dtef.length+"\nazdatiregv="+azdatiregv);*/ 
for(i=0;i<numatb;i++){ 
if(azdatiregv[6].indexOf(dtatbrif[i])>-1){nonblac=" style='display:none'";}else{nonblac="";}str=str+"<th"+nonblac+">"+dtatbrif[i]+"</th>";
/*alert(dtatbrif[i]+"\n"+azdatiregv[6].indexOf(dtatbrif[i])+"\n"+nonblac+"\n"+str);*/}
if(azdatiregv[5]=="modifica"&&operaz=="modreg"){ str=str+"<th>MOSTRA</th><th>REG <input type='text' id='rifatb' style='display:none;' value='"+rifatb+"' /> </th></tr>"; }
if(azdatiregv[5]=="modifica"&&(operaz=="modreg"||operaz=="insregmir")){ 
for(k=0;k<lskey.length;k++){var hk="key "; var lsatb=lskey[k].attributes; var numatb=lsatb.length;
for(j=0;j<numatb;j++){/*alert(j+"\n"+dtatbrif[j]+"\n"+hk);*/ hk=hk+dtatbrif[j]+"='"+lsatb[j].value+"' "; } hk=hk+"/>"; var rifatb=dtatbrif; 
str=str+"<tr><td style='text-align:center;' >"+(k+1)+"</td>";  hk=hk.replace(/'/g,"&#39;"); /*alert(dtatbrif+"\n\n"+hk);*/
for(j=0;j<numatb;j++){/*cel=lskey[k].attributes.getNamedItem(dtatbrif[j]).value+"";*/ cel=lsatb[j].value+""; cel=cel.replace(/\|/g,"&#60;"); /*alert(cel);*/
if(j==0){/* alert(cel+"\n"+cel.slice(0,1));*/if(cel.slice(0,1)=="_"){mst="no";}else{mst="si";}/*alert(99+"-"+mst);*/}
/*alert(azdatiregv[6]+"\n"+dtatbrif[j]);*/ if(azdatiregv[6].indexOf(dtatbrif[j])>-1){nonblac=" style='display:none'";}else{nonblac="";} /*if(k==1){alert(dtatbrif[j]); }*/
switch(datiformtipinp[dtef[j]]){ 
case "text":{ /*str=str+"<td"+nonblac+"><input type='text' id='keycel_"+k+"_"+j+"' value='"+cel.replace(/\^/g,"&#39;")+"' style='width:100%;' required title='"+datiformtit[dtef[j]]+"\n"+cel.replace(/\^/g,"&#39;")+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td>"; alert(dtatbrif[j]+"-"+(azdatiregv[7].indexOf(dtatbrif[j])==-1))*/
if(azdatiregv[7].indexOf(dtatbrif[j])==-1){ str=str+"<td"+nonblac+"><input type='text' id='keycel_"+k+"_"+j+"' value='"+cel.replace(/\^/g,"&#39;")+"' required title='"+datiformtit[dtef[j]]+"\n"+cel.replace(/\^/g,"&#39;")+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' style='width:96%' /></td> "; } 
else{ str=str+"<td"+nonblac+"><input type='text' id='keycel_"+k+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' style='display:none' /><center><b>"+cel+"</b></center></td> "; }/**/ 
break;}
case "textarea":{var pat="[a-zA-Z0-9s .,:!|/´;><%?=^() §&#_]{3,1200}";cel=cel.replace(/\^/g,"&#39;"); cel=cel.replace(/\!/g,"\n"); cel=cel.replace(/\Â/g,""); 
str=str+"<td"+nonblac+"><textarea id='keycel_"+k+"_"+j+"' rows='3' required title='"+datiformpattern[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' onchange='centroctrldata(this,\"textarea\",\""+k+"\")'>"+cel.replace(/\^/g,"&#39;")+"</textarea> <input type='text' id='textarap_"+k+"' pattern='"+pat+"' style='display:block;' ></td>";
/*var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1;str=str+" readonly"; kil="canc:<input type='text' oninput='cancingredspec(this,\""+ntot+"\")' title='selezionare e trascinare il nome dell&#39;ingrediente da eliminare' style='size:130px;'>";} str=str+" '></textarea> "+kil+"</td>";*/ break;}
case "number":{str=str+"<td"+nonblac+"><input type='number' id='keycel_"+k+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"number\")' style='width:96%'></td>"; break;}
case "selprot":{str=str+"<td><select id='keycel_"+k+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; nrc=new Array("NO","SI");
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str=str+" selected ";} str=str+">"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectrc":{str=str+"<td><select id='keycel_"+k+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; /*nrc=new Array("res","sup","wsm");*/
var lskey2=nvarxml2.getElementsByTagName("key"); nrc=new Array(); var tipoperator=lskey2[0].attributes[0].value; nrc=tipoperator.slice(1).split(",");
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str=str+" selected ";} str=str+">"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selrep":{var lskeymod=nvarxml3.getElementsByTagName("keymod"); 
 str=str+"<td><select id='keycel_"+i+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; /*nrc=new Array("res","sup","wsm");*/
/* str=str+"<td><select id='keycel_"+i+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; */
for(n=0;n<lskeymod.length;n++){var mod=lskeymod[n].attributes[0].value; /*alert(mod);*/ str=str+"<option value='"+mod+"' >"+mod+"</option> ";}  str=str+"</select></td>"; break;}
case "password":{ str=str+"<td"+nonblac+"><input type='password' id='keycel_"+k+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td> "; break;}
case "mail":{ str=str+"<td"+nonblac+"><input type='mail' id='keycel_"+k+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td> "; break;}
/*case "selectrc":{str=str+"<td><select id='keycel_"+k+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; nrc=new Array("res","sup","wsm");
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str=str+" selected ";} str=str+">"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}*/
} 
} /*rifk="rifk_"+k;alert(str);*/ if(mst=="si"){cheksi="checked";chekno="";}else{cheksi="";chekno="checked";}
str=str+"<td style='text-align:center;'><table style='table-layout:auto;' ><tr><th><input type='radio' onchange='' name='si_"+k+"' id='si_"+k+"' value='si' "+cheksi+" > <label for='si_"+k+"'>si</label> </th><th><input type='radio' onchange='' name='si_"+k+"' id='no_"+k+"' value='no' "+chekno+" > <label for='no_"+k+"'>no</label> </th></tr></table></td><td style='text-align:center;'><button id='btn_"+k+"' onclick='vedicomplcor0(\""+k+"\",\""+dtatbrif+"\",\""+operaz+"\",this)'>salva</button> <input type='text' id='hk_"+k+"' style='display:none;' value='"+hk+"' /> </td></tr>";  }} 
/*else*/ /*vedicomplcor0(\""+i+"\",\""+dtatbrif+"\",\""+operaz+"\",this)*/
/*if(operaz=="letreg"){
for(k=0;k<lskey.length;k++){str=str+"<tr><td style='text-align:center;' >"+(k+1)+"</td>"; for(j=0;j<dtatbrif.length;j++){cel=lskey[k].attributes.getNamedItem(dtatbrif[j]).value+""; 
if(azdatiregv[6].indexOf(dtatbrif[j])>-1){nonblac="none";}else{nonblac="block";} if(azdatiregv[6].indexOf(dtatbrif[j])>-1){nonblac="none";}else{nonblac="block";}
str=str+"<td style='display:"+nonblac+";'>"+cel+"</td> "; } str=str+"</tr>";  }}*/
str=str+"</table>"; 
}



/*alert("operaz="+operaz+"\noperaz1="+operaz1+"\n"+(operaz=="insregmir"&&operaz1=="inserimento_tabellare"));*/
/*0-sectorab 1-dtnumliv 2-dtstrut 3-dtnomsezliv 4-dtkeyrif 5-letmod 6-dtinvisib 7-calcolati 8-newins 9-cancins 10-duplication 11-newstrutins 13-cancstrutins 14-commonlist 15-dtbase*/
if(operaz=="insregmir"&&operaz1=="inserimento_tabellare"){
if(azdatiregv[8]=="no"){msg="** ATTENZIONE ** il registro <b>"+rifreg+"</b> non può essere modificato inserendo nuove chiavi"; mostraer(msg); return;}
str=str+"<table style='table-layout:auto;'> <tr><th style='width:3%;'>N.</th>"; 
for(i=0;i<dtatbrif.length;i++){if(azdatiregv[6].indexOf(dtatbrif[i])>-1){nonblac=" style='display:none'";}else{nonblac="";}str=str+"<th"+nonblac+">"+dtatbrif[i]+"</th>"; }
str=str+"<th>inserisci</th></tr>";

var lskrif=nvarxml.getElementsByTagName("keyrif"); for(i=0;i<lskrif.length;i++){if(lskrif[i].attributes[0].value==krif){var ikrif=i;break;} }
var lskey=lskrif[ikrif].getElementsByTagName("key"); var numatb=dtatbrif.length; var lsk=lskey;
if(lskey.length>0){
for(i=0;i<lskey.length;i++){/*alert(str);*/ str=str+insertrk(i,dtatbrif,dtef,lsk); /*alert(str);*/ /**/ str=str+insertnewrk(i,dtatbrif,dtef,operaz); /*alert(str); */
} }else{str=str+insertrk(0,dtatbrif,dtef,"bozze.xml"); /*alert(str);*/ /**/ str=str+insertnewrk(0,dtatbrif,dtef,operaz); }
str=str+"</table>"; /*alert(str);*/

if(document.getElementById("sel0").value=="bozze.xml"){
var strp="<center>scegli, dalla <b>sezione emozionale di appunti</b> la frase che intendi riportare: <br/><select id='sel' onchange='caricaspot(this.value);'> <option value='' selected></option>";
var lskrif=nvarxml2.getElementsByTagName("keyrif"); var numkeyar=numkeygenar=new Array(),i=j=k=n=0; /*alert(lskrif.length);*/
for(i=0;i<lskrif.length;i++){var sezem=lskrif[i].attributes[0].value; var lskey=lskrif[i].getElementsByTagName("key"); /*alert(i+" - "+sezem);*/
strp=strp+"<optgroup label='spot della sezione "+sezem+"'>";
for(j=0;j<lskey.length;j++){var spot=lskey[j].attributes[1].value; 
strp=strp+"<option value='"+sezem+"/"+spot+"'> "+spot+"</option>";} 
strp=strp+"</optgroup>"; 
}
strp=strp+"</select></br><b>copia</b> e <b>incolla</b> dove vuoi lo spot selezionato: <span id='spt' style='background-color:#ffa;'></span></center>"; 
var mdx8=document.getElementById("modextern8"); mdx8.innerHTML=strp; mdx8.style.display="block"; mdx8.style.zIndex=2; 
}


}


/*alert("operaz="+operaz+"\noperaz1="+operaz1+"\n"+(operaz=="modreg"&&operaz1=="modifica_schedulare"));*/
if(operaz=="modreg"&&operaz1=="modifica_schedulare"){ str=str+"<span style='background-color:"+wscl[2]+";color:"+wscl[0]+";'> &#160; La sezione <b>"+krif+"</b> contiene "+lskey.length+" chiavi: &#160; </span>"; var mst=cheksi=chekno="";
/*alert("liv_1\ndtatbrif="+dtatbrif+"\ndtef="+dtef+"\ndtatbrif.length="+dtatbrif.length+"\ndtef.length="+dtef.length+"\nazdatiregv="+azdatiregv);*/
 for(k=0;k<lskey.length;k++){var hk="key ";for(j=0;j<dtatbrif.length;j++){hk=hk+dtatbrif[j]+"='"+lskey[k].attributes.getNamedItem(dtatbrif[j]).value+"' ";}hk=hk+"/>";
str=str+" <table style='table-layout:auto;'> <tr><th colspan=2>chiave n."+(k+1)+"</th></tr>"; hk=hk.replace(/'/g,"&#39;");
/*alert("azdatiregv[5]="+azdatiregv[5]+"\noperaz="+operaz);*/
if(azdatiregv[5]=="modifica"&&operaz=="modreg"){
for(j=0;j<dtatbrif.length;j++){/*alert(dtatbrif[j]);*/ cel=lskey[k].attributes.getNamedItem(dtatbrif[j]).value; cel=cel.replace(/\|/g,"&#60;");
if(j==0){/* alert(cel+"\n"+cel.slice(0,1));*/if(cel.slice(0,1)=="_"){mst="no";}else{mst="si";}/*alert(99+"-"+mst);*/}
/*alert("azdatiregv[6]="+azdatiregv[6]+"\ndtatbrif[j]="+dtatbrif[j]+"\n"+(azdatiregv[6].indexOf(dtatbrif[j])>-1));*
if(azdatiregv[6].indexOf(dtatbrif[j])>-1){nonblac=" style='display:none'";}else{nonblac="";}
str=str+"<tr"+nonblac+"><td style='width:30%;'>"+dtatbrif[j]+"</td>"; /*alert(datiformtipinp[dtef[j]]); alert(k);*/
switch(datiformtipinp[dtef[j]]){
case "text":{str=str+"<td><input type='text' id='keycel_"+k+"_"+j+"' value='"+cel.replace(/\^/g,"&#39;")+"' style='width:100%;' required title='"+datiformtit[dtef[j]]+"\n"+cel.replace(/\^/g,"&#39;")+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td></tr>"; break;}
case "textarea":{var pat="[a-zA-Z0-9s .,:!|/´;><%?=^() §&#_]{3,1200}";cel=cel.replace(/\^/g,"&#39;"); cel=cel.replace(/\!/g,"\n"); cel=cel.replace(/\Â/g,""); /*alert(cel);,\"textarap\"*/ 
str=str+"<td><textarea id='keycel_"+k+"_"+j+"' rows='3' required title='"+datiformpattern[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' onchange='centroctrldata(this,\"textarea\",\""+k+"\")'>"+cel+"</textarea> <input type='text' id='textarap_"+k+"' pattern='"+pat+"' style='display:block;' ></td></tr>";
/*var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1;str=str+" readonly"; kil="canc:<input type='text' oninput='cancingredspec(this,\""+ntot+"\")' title='selezionare e trascinare il nome dell&#39;ingrediente da eliminare' style='size:130px;'>";} str=str+" '></textarea> "+kil+"</td>";*/ break;}
case "number":{str=str+"<td><input type='number' id='keycel_"+k+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"number\")'></td></tr>"; break;}
case "selprot":{ str=str+"<td><select id='keycel_"+k+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; nrc=new Array("NO","SI");
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str=str+" selected ";} str=str+">"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectrc":{str=str+"<td><select id='keycel_"+k+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; /*nrc=new Array("res","sup","wsm");*/
var lskey=nvarxml2.getElementsByTagName("key"); nrc=new Array(); var tipoperator=lskey[0].attributes[0].value; nrc=tipoperator.slice(1).split(",");
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str=str+" selected ";} str=str+">"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "password":{ str=str+"<td><input type='password' id='keycel_"+k+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td></tr> "; break;}
case "mail":{ str=str+"<td><input type='mail' id='keycel_"+k+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td></tr> "; break;}
case "selectrc":{str=str+"<td>"+dtatbrif[j]+"</td><td><select id='keycel_"+k+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; nrc=new Array("res","sup","wsm");
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str=str+" selected ";} str=str+">"+nrc[n]+"</option> ";}  str=str+"</select></td></tr>"; break;}
}
}if(mst=="si"){cheksi="checked";chekno="";}else{cheksi="";chekno="checked";} }
str=str+"<tr><th>MOSTRA: <input type='radio' onchange='' name='si_"+k+"' id='si_"+k+"' value='si' "+cheksi+" > <label for='si_"+k+"'>si</label> <input type='radio' onchange='' name='si_"+k+"' id='no_"+k+"' value='no' "+chekno+" > <label for='no_"+k+"'>no</label> </th><th><button id='btn_"+k+"' onclick='vedicomplcor0(\""+k+"\",\""+dtatbrif+"\",\""+operaz+"\",this)'>salva</button> <input type='text' id='hk_"+k+"' style='display:none;' value='"+hk+"' /> </th> </tr> </table>";
}}

if(operaz=="letreg"&&operaz1=="lettura_tabellare"){ str=str+"<table style='table-layout:auto;'> <tr><th>N.</th>";
for(i=0;i<dtatbrif.length;i++){if(azdatiregv[6].indexOf(dtatbrif[i])>-1){nonblac=" style='display:none'";}else{nonblac="";}str=str+"<th"+nonblac+">"+dtatbrif[i]+"</th>"; }
str=str+"</tr>";
for(k=0;k<lskey.length;k++){str=str+"<tr><th>"+(k+1)+"</th>"; for(j=0;j<dtatbrif.length;j++){
cel=lskey[k].attributes.getNamedItem(dtatbrif[j]).value+""; cel=cel.replace(/\|/g,"&#60;"); 
if(azdatiregv[6].indexOf(dtatbrif[j])>-1){nonblac=" style='display:none'";}else{nonblac="";}str=str+"<td"+nonblac+">"+cel+"</td> "; } str=str+"</tr>";  }
str=str+"</table>"; 
}

if(operaz=="letreg"&&operaz1=="lettura_schedulare"){ str=str+"<span style='background-color:"+wscl[2]+";color:"+wscl[0]+";'> &#160; La sezione <b>"+krif+"</b> contiene "+lskey.length+" chiavi: &#160; </span>";
 for(k=0;k<lskey.length;k++){str=str+" <table style='table-layout:auto;width:100%;' > <tr><th colspan=2>chiave n."+(k+1)+"</th></tr>"; 
for(j=0;j<dtatbrif.length;j++){cel=lskey[k].attributes.getNamedItem(dtatbrif[j]).value; cel=cel.replace(/\|/g,"&#60;"); cel=cel.replace(/\°/g,"\n"); /*alert(cel);*/
if(azdatiregv[6].indexOf(dtatbrif[j])>-1){nonblac=" style='display:none'";}else{nonblac="";}
str=str+"<tr"+nonblac+"><th style='text-align:left;'>"+dtatbrif[j]+"</th><td>"+cel+"</td></tr>"; }
} 
str=str+"</table>";
}

/*alert(str);*/ document.getElementById("modextern6").innerHTML=str; /*||wsprcreg.indexOf("produzione")==-1*/
if(document.getElementById("sel0").value=="capitolato.xml"&&(wsprcreg.indexOf("produzione")>-1)){str=""; ckxml=wsprcreg+"/magazzino.xml"; aa=leggireg3(ckxml); 
frmph="([,]{1}[a-zA-Z0-9! ]{1,50}[_]{1}[0-9]{1,3})+";/*alert(ckxml+"\n\n"+http_request3.responseText);*/
str="<table><tr><th colspan=3>MAGAZZINO</th></tr><tr><th>reparto</th><th>tipologia</th><th>elemento</th></tr><tr><th><select id='selrep' onchange='caricamagazzino(\"selrif\",this.value)'><option value='' selected></option></select></th><th><select id='selrif' onchange='caricamagazzino(\"selkey\",this.value)'><option value='' selected></option></select></th><th><select id='selkey' onchange='document.getElementById(\"elem\").value=document.getElementById(\"elem\").value+\",\"+this.value+\"_\"; document.getElementById(\"elem\").focus(); this.value=\"\";'><option value='' selected></option></select></th></tr><tr><td colspan=3>lista ingredienti_dosaggi: <input type='text' id='elem' value='' style='width:90%' pattern='"+frmph+"' onchange='centroctrldata(this,\"text\");' onblur='centroctrldata(this,\"text\");' title='la lista deve essere costituta da 1 o piu&#180; elementi ,ingrediente_dosaggio' /></td></tr><tr><th colspan=3 style='text-align:left'> * <u>Selezionando un ingrediente</u> questo, nel formato <mark>,ingrediente_</mark>, viene aggiunto nella <mark>lista ingredienti_dosaggi</mark>.</br> * <u>Ciascun ingrediente</u> deve essere completato <mark>aggiungendo il dosaggio in grammi</mark>.</br> * quando la lista <u>,ingrediente_dosaggio,...</u> di un prodotto è completa o corretta <mark>la si deve copiare nella corrispondente casella di input della colonna ingredienti corrispondente</mark>.</th></tr></table>"; 
var lskeyrep=nvarxml3.getElementsByTagName("keyrep"); 
document.getElementById("modextern7").innerHTML=str;document.getElementById("modextern7").style.display="block";
for(i=0;i<lskeyrep.length;i++){ op=document.createElement('OPTION');op.value=op.text=lskeyrep[i].attributes[0].value; document.getElementById("selrep").add(op); }
}
/*if(document.getElementById("modextern6")!=null){ document.getElementById("modextern6").innerHTML=str;}else{ document.getElementById("modextern7").innerHTML=str;}*/

if(document.getElementById("sel0").value=="capitolato.xml"&&(wsprcreg.indexOf("produzione")==-1&&wsprcreg.indexOf("ristorazione")==-1&&wsprcreg.indexOf("formazione")==-1)){str=""; /*alert(azdatireg+"\n"+azdatiregv);*/
var nomliv=new Array(), nomsezliv=new Array(); nomliv=azdatireg[2].split(","); nomsezliv=azdatiregv[2].slice(1).split(","); 
/*alert("azdatireg="+azdatireg+"\nazdatiregv="+azdatiregv+"\nnomliv="+nomliv+"\nnomsezliv="+nomsezliv);*/
/*alert(ckxml+"\n\n"+http_request.responseText); alert(ckxml+"\n\n"+http_request2.responseText);alert(ckxml+"\n\n"+http_request3.responseText);*/
var lskeymod=nvarxml.getElementsByTagName(nomsezliv[0]); var rifsez=new Array(),sez=new Array(),mod=mod0="";
for(i=0;i<lskeymod.length;i++){ mod=mod0=lskeymod[i].attributes[0].value; /*alert(mod+"\n"+document.getElementById("selliv_3").value); */ 
if(mod=="zoneFunzionali"){var ind=i;break; } } /*alert(ind);*/
var lskrif=lskeymod[ind].getElementsByTagName("keyrif");
for(i=0;i<lskrif.length;i++){ var rif=lskrif[i].attributes[0].value; 
/*alert(rif+"\n"+document.getElementById("selliv_2").value+"\n"+(rif==document.getElementById("selliv_2").value));*/ 
if(rif==document.getElementById("selliv_2").value){var ind=i;break; } }
var lsk=lskrif[ind].getElementsByTagName("key"); lsatb=lsk[0].attributes; 
for(i=0;i<lsatb.length;i++){var ndnm=lsatb[i].nodeName, ndvl=lsatb[i].value; /*alert("i="+i+": ndm="+ndnm+" ndvl="+ndvl); */
if(i==0){mod=ndvl; }if(i==1){rifsez=ndvl.slice(1).split(","); }if(i==2){sez=ndvl.slice(1).split(","); } } 
/*alert(rifsez+"\n"+sez);*/
/*}*/
/**/str="<table><tr><td colspan=2 style='text-align:center'>sezionamento del reparto <b><mark>"+mod+"</mark></b> (ovvero <b>"+document.getElementById("selliv_2").value+"</b>) </td></tr><tr><th style='text-align:center'>titolo</th><th style='text-align:center'>sigla</th></tr>";
for(i=0;i<rifsez.length;i++){str=str+"<tr><td>"+rifsez[i]+"</td><th>"+sez[i]+"</th></tr>"; }

str=str+"<tr><th colspan=2 style='text-align:left'> n.b.: per ciascun elemento da installare occorre costruire la lista </br><b><mark>quantità_sezione</mark></b>, ad esempio: <b>,5_sz1,8_sz2,...</b></th></tr></table>"; str=str.replace(/'/g,"&#39;"); /*alert("mod="+mod+"\nmod0="+mod0+"\n"+document.getElementById("selliv_3").value);*/
if(document.getElementById("selliv_3").value=="zoneFunzionali"){var str2="";}else{var str2="<button onclick='mostralegenda(\""+str+"\")'>legenda</button>";}
document.getElementById("modextern7").innerHTML=str2;document.getElementById("modextern7").style.display="block"; 
}
}

function svuotaform(n){percorso=percorso+"svuotaform; "; document.getElementById("frmw").innerText=document.getElementById("nf_"+n).value; }

function mostralegenda(val){percorso=percorso+"mostralegenda; "; /*alert(val);*/
var msg0="<center><button onclick='chiudimodshort()'>[X]</button></center></br>";istmds.innerHTML=msg0+val; istmds.style.zIndex=2; istmds.style.display="block";}

function caricaspot(spot){percorso=percorso+"caricaspot; "; document.getElementById("spt").innerText=spot; }
 

function insertnewrk(k,dtatbrif,dtef,operaz){percorso=percorso+"insertnewrk; "; 
var j=0,str0="<tr id='newrig_"+k+"' style='widtn:100%;'><th style='width:3%;'></th>"; 
for(j=0;j<dtatbrif.length;j++){if(azdatiregv[6].indexOf(dtatbrif[j])>-1){nonblac=" style='display:none'";}else{nonblac="";}
if(azdatiregv[7].indexOf(dtatbrif[j])>-1||azdatiregv[6].indexOf(dtatbrif[j])>-1||dtatbrif[j]=="password"){calcolato=1;}else{calcolato=0;} switch(datiformtipinp[dtef[j]]){
case "text":{ if(calcolato==0){ str0=str0+"<td"+nonblac+"><input type='text' id='keycel_"+k+"_"+j+"' value='' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\\'text\\');' style='width:100%;' /></td> ";}
else{ str0=str0+"<td"+nonblac+"><input type='text' id='keycel_"+k+"_"+j+"' value='"; 
if(dtatbrif[j]=="caricato"||dtatbrif[j]=="fotorif"){str0=str0+"no";}if(dtatbrif[j]=="tipoper"){str0=str0+kkrif;} 
if(dtatbrif[j].indexOf("lp")>-1||dtatbrif[j]=="saldata"||dtatbrif[j]=="chiusa"){str0=str0+"0";}
str0=str0+"' disabled /></td> "; } break;}
case "textarea":{str0=str0+"<td"+nonblac+"><textarea id='keycel_"+k+"_"+j+"' rows='3' required title='"+datiformpattern[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' onchange='centroctrldata(this,\"textarea\")'></textarea> <input type='text' id='textarap' pattern='"+datiformpattern[dtef[k]]+"' style='display:block;' ></td>";
 break;}
case "number":{var min=0; str0=str0+"<td"+nonblac+"><input type='number' id='keycel_"+k+"_"+j+"' value='"+cel+"' ";
if(datiformtip[dtef[j]]=="tmpcolmax"){str0=str0+"min=0.4 max=9 step=.4";} 
str0=str0+" required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"number\")'></td>"; break;}
case "selprot":{str0=str0+"<td><select id='keycel_"+k+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; nrc=new Array("NO","SI");
for(n=0;n<nrc.length;n++){str0=str0+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str0=str0+" selected ";} str0=str0+">"+nrc[n]+"</option> ";}  str0=str0+"</select></td>"; break;}
case "selectrc":{var lskey2=nvarxml2.getElementsByTagName("key"); nrc=new Array(); var tipoperator=lskey2[0].attributes[0].value; nrc=tipoperator.slice(1).split(",");
 str0=str0+"<td><select id='keycel_"+k+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<nrc.length;n++){str0=str0+"<option value='"+nrc[n]+"' >"+nrc[n]+"</option> ";}  str0=str0+"</select></td>"; break;}
case "selrep":{var lskeymod=nvarxml3.getElementsByTagName("keymod"); 
 str0=str0+"<td><select id='keycel_"+k+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<lskeymod.length;n++){var mod=lskeymod[n].attributes[0].value;  str0=str0+"<option value='"+mod+"' >"+mod+"</option> ";}  str0=str0+"</select></td>"; break;}
case "password":{ str0=str0+"<td"+nonblac+"><input type='password' id='keycel_"+k+"_"+j+"' value='' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td> "; break;}
case "mail":{ str0=str0+"<td"+nonblac+"><input type='mail' id='keycel_"+k+"_"+j+"' value='' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td> "; break;}
}
}
str0=str0+"<td style='text-align:center;'><button id='btn_"+k+"' onclick='vedicomplcor0(\""+k+"\",\""+dtatbrif+"\",\""+operaz+"\",this)'>salva</button></td></tr>";
return(str0);
}

function insertrk(k,dtatbrif,dtef,lskey){percorso=percorso+"insertrk; "; var j=0,str0=mst="";
if(lskey!="bozze.xml"){var hk="key ";var lsatb=lskey[k].attributes;var numatb=lsatb.length;for(j=0;j<numatb;j++){ hk=hk+dtatbrif[j]+"='"+lsatb[j].value+"' "; } hk=hk+"/>"; }
else{var hk=lskey+" sectorab='"; }
 

var rifatb=dtatbrif; /*alert(hk);*/
str0=str0+"<tr><th style='text-align:center;width:3%;' >"+(k+1)+"</th>";  hk=hk.replace(/'/g,"&#39;"); 
for(j=0;j<numatb;j++){ cel=lsatb[j].value+""; cel=ritratta(cel); /*cel.replace(/\|/g,"&#60;"); */
if(j==0){if(cel.slice(0,1)=="_"){mst="no";}else{mst="si";}}
if(azdatiregv[6].indexOf(dtatbrif[j])>-1){nonblac=" style='display:none'";}else{nonblac="";} 
str0=str0+"<td"+nonblac+">"+cel+"</td> ";

/*
switch(datiformtipinp[dtef[j]]){ 
case "text":{ 
if(azdatiregv[7].indexOf(dtatbrif[j])==-1){ str0=str0+"<td"+nonblac+"><input type='text' id='keycel_"+k+"_"+j+"' value='"+cel.replace(/\^/g,"&#39;")+"' required title='"+datiformtit[dtef[j]]+"\n"+cel.replace(/\^/g,"&#39;")+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' style='width:96%' /></td> "; } 
else{ str0=str0+"<td"+nonblac+"><input type='text' id='keycel_"+k+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' style='display:none' /><center><b>"+cel+"</b></center></td> "; } 
break;}
case "textarea":{var pat="[a-zA-Z0-9s .,:!|/´;><%?=^() §&#_]{3,1200}";cel=cel.replace(/\^/g,"&#39;"); cel=cel.replace(/\!/g,"\n"); cel=cel.replace(/\Â/g,""); 
str0=str0+"<td"+nonblac+"><textarea id='keycel_"+k+"_"+j+"' rows='3' required title='"+datiformpattern[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' onchange='centroctrldata(this,\"textarea\",\""+k+"\")'>"+cel.replace(/\^/g,"&#39;")+"</textarea> <input type='text' id='textarap_"+k+"' pattern='"+pat+"' style='display:block;' ></td>";
 break;}
case "number":{str0=str0+"<td"+nonblac+"><input type='number' id='keycel_"+k+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"number\")' style='width:96%'></td>"; break;}
case "selprot":{str0=str0+"<td><select id='keycel_"+k+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; nrc=new Array("NO","SI");
for(n=0;n<nrc.length;n++){str0=str0+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str0=str0+" selected ";} str0=str0+">"+nrc[n]+"</option> ";}  str0=str0+"</select></td>"; break;}
case "selectrc":{str0=str0+"<td><select id='keycel_"+k+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; 
var lskey2=nvarxml2.getElementsByTagName("key"); nrc=new Array(); var tipoperator=lskey2[0].attributes[0].value; nrc=tipoperator.slice(1).split(",");
for(n=0;n<nrc.length;n++){str0=str0+"<option value='"+nrc[n]+"' "; if(nrc[n]==cel){ str0=str0+" selected ";} str0=str0+">"+nrc[n]+"</option> ";}  str0=str0+"</select></td>"; break;}
case "selrep":{var lskeymod=nvarxml3.getElementsByTagName("keymod"); 
 str0=str0+"<td><select id='keycel_"+i+"_"+j+"' required title='"+datiformtit[dtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<lskeymod.length;n++){var mod=lskeymod[n].attributes[0].value;  str0=str0+"<option value='"+mod+"' >"+mod+"</option> ";}  str0=str0+"</select></td>"; break;}
case "password":{ str0=str0+"<td"+nonblac+"><input type='password' id='keycel_"+k+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td> "; break;}
case "mail":{ str0=str0+"<td"+nonblac+"><input type='mail' id='keycel_"+k+"_"+j+"' value='"+cel+"' required title='"+datiformtit[dtef[j]]+"' placeholder='"+datiformph[dtef[j]]+"' pattern='"+datiformpattern[dtef[j]]+"' onchange='centroctrldata(this,\"text\");' /></td> "; break;}
}
*/
} if(mst=="si"){cheksi="checked";chekno="";}else{cheksi="";chekno="checked";}
str0=str0+"<td style='text-align:center;'><input type='text' id='hk_"+k+"' style='display:none;' value='"+hk+"' /><!--<button id='btn_"+k+"' onclick='vedirig(\""+k+"\")'>inserisci</button> --> </td></tr>";  
return(str0);
}

/*
function vedirig(k){document.getElementById("newrig_"+k).style.display="block"; }
*/

function caricamagazzino(sel,val){percorso=percorso+"caricamagazzino; "; /*alert("da caricamagazzino:\nsel="+sel+"\nval="+val);*/ var el=new Array(),i=j=k=0;
if(sel=="selrif"){var lskeyrep=nvarxml3.getElementsByTagName("keyrep"); for(i=0;i<lskeyrep.length;i++){if(lskeyrep[i].attributes[0].value==val){
var lskrif=lskeyrep[i].getElementsByTagName("keyrif"); for(j=0;j<lskrif.length;j++){el[j]=lskrif[j].attributes[0].value; } el.sort();
} } }
if(sel=="selkey"){var x=document.getElementById(sel),i=n=0; var y=x.options; n=y.length; for(i=0;i<n;i++){ y[0].remove();}
var lskeyrep=nvarxml3.getElementsByTagName("keyrep"); var rep=document.getElementById("selrep").value;
for(i=0;i<lskeyrep.length;i++){if(lskeyrep[i].attributes[0].value==rep){ var lskrif=lskeyrep[i].getElementsByTagName("keyrif"); } }
for(j=0;j<lskrif.length;j++){if(lskrif[j].attributes[0].value==val){var lskey=lskrif[j].getElementsByTagName("key"); break;}} 
for(k=0;k<lskey.length;k++){	el[k]=lskey[k].attributes[0].value; }  el.sort();
 }op=document.createElement('OPTION');op.value=op.text=""; document.getElementById(sel).add(op);
for(i=0;i<el.length;i++){ op=document.createElement('OPTION');op.value=op.text=el[i]; document.getElementById(sel).add(op); }
}


function vedicomplcor0(k,dtatbrif,operaz,obj){percorso=percorso+"vedicomplcor0; "; /*ckxml=wsprcreg+"/capitolato.xml";*/var regsel=document.getElementById("sel0").value; 
/*ckxml=wsprcreg+"/"+regsel; leggireg3(ckxml); */ /*vedicomplcor0("0","codice_fiscale,pw,pww,mail,resp_sup,reparto","insreg",this)*/
/*alert(ckxml+"\n\n"+http_request.responseText);*//* alert("da vedicomplcor0:\nk="+k+"\ndtatbrif="+dtatbrif+"\noperaz="+operaz+"\n"+obj.textContent);*/
var rifk="key ",i=j=0,trv=0,msg="",nliv=azdtnumliv,cmpar=new Array(); cmpar=dtatbrif.split(","); 
if(regsel=="datiazienda.xml"&&operaz=="insregmir"){var sezrif=document.getElementById("selliv_2").value; var lskrif=nvarxml.getElementsByTagName("keyrif");
for(i=0;i<lskrif.length;i++){var lsatb=lskrif[i].attributes; /*alert(lsatb.length+"\n"+lsatb[0].value+"\n"+sezrif);*/ if(lsatb[0].value==sezrif){break; } }
for(j=1;j<lsatb.length;j++){/*alert(lsatb[j].nodeName+"="+lsatb[j].value); alert(document.getElementById("keycel_"+k+"_"+(j-1)).value);*/
if(document.getElementById("keycel_"+k+"_"+0).value==""){ msg="** ATTENZIONE ** questa chiave non puo' essere salvata in quanto il valore della cella n."+j+", identificativo della chiave, manca"; mostraer(msg); return; }
if(document.getElementById("keycel_"+k+"_"+(j-1)).style.color=="rgb(238, 0, 0)"){ msg="** ATTENZIONE ** questa chiave non puo' essere salvata in quanto il valore della cella n."+j+" non e' formalmente corretto"; mostraer(msg); return; }
 }
if(document.getElementById("hk_"+k).value!=null){var rifk=document.getElementById("hk_"+k).value; }else{var rifk="";}
var indreg=wsprcreg+"/"+regsel; var newk="key ",rep="",azione=""; 
for(i=0;i<cmpar.length;i++){ /*alert("keycel_"+k+"_"+i+": "+cmpar[i]+"="+document.getElementById("keycel_"+k+"_"+i).value);*/ 
newk=newk+cmpar[i]+"='"+document.getElementById("keycel_"+k+"_"+i).value+"' "; } newk=newk+"/>"; if(operaz=="modreg"){azione="sostituisci";}
obj.textContent="salvato"; obj.disabled=true; insertmodelkey(rifk,indreg,newk,rep,azione); /*vedicomplcor(k,dtatbrif,operaz,obj,regsel);*/ return; }

/* alert(azdtkeyrif+"\n"+dtatbrif); alert(wsprcreg);*/
/*alert("da vedicomplcor0:\n"+k+"\n"+dtatbrif+"\n"+operaz); 
alert(azdtkeyrif+"\n"+azdtinvisib+"\n"+azdtcalcolati);*/
/*sectorab='' dtnumliv='' dtstrut='' dtnomsezliv='' dtkeyrif='' letmod='' dtinvisib='' calcolati='' newins='' cancins='' duplication='' newstrutins='' cancstrutins='' commonlist=''*/
if(document.getElementById("sel0").value=="capitolato.xml"&&wsprcreg.indexOf("ristorazione")>-1&&wsprcreg.indexOf("formazione")>-1){ ckxml=wsprcreg+"/magazzino.xml"; leggireg3(ckxml); 
if(document.getElementById("keycel_"+k+"_"+1).style.color=="rgb(238, 0, 0)"){ msg="** ATTENZIONE ** questa chiave non puo' essere salvata in quanto la lista degli ingredienti non e' formalmente corretta"; mostraer(msg); return; }
var elem=document.getElementById("keycel_"+k+"_"+0).value,p1=0; var ingr=document.getElementById("keycel_"+k+"_"+1).value; var ing=dos="";
var ingdosar=new Array(),ingar=new Array(),dosar=new Array();ingr=ingr.slice(1); ingdosar=ingr.split(","); 
for(i=0;i<ingdosar.length;i++){p1=ingdosar[i].indexOf("_");  ingar[i]=ingdosar[i].slice(0,p1); dosar[i]=ingdosar[i].slice((p1+1));  }
/*alert("gli ingredienti_dosaggi di -"+elem+"- sono:\n"+ingr+"\ngli ingredienti sono:"+ingar+"\ni dosaggi sono:"+dosar); */
/*for(i=0;i<ingar.length;i++){alert(i+" - "+ingar[i]+" - "+dosar[i]); }*/
var lskey=nvarxml3.getElementsByTagName("key"); var trv=0,esci=0,dsg=0;
if(wsprcreg.indexOf("formazione")==-1&&wsprcreg.indexOf("costruzioni")==-1&&wsprcreg.indexOf("manutenzioni")==-1){
for(i=0;i<ingar.length;i++){trv=esci=dsg=0; for(j=0;j<lskey.length;j++){var lsatb=lskey[j].attributes;
/*    alert(lsatb[0].value+"\n"+ingar[i]+"\n"+(lsatb[0].value==ingar[i]));*/ if(lsatb[0].value==ingar[i]){trv=1;
/*alert(lsatb[1].value+"\n"+dosar[i]+"\n"+(lsatb[1].value*1<dosar[i]*1));*/ if(lsatb[1].value*1<dosar[i]*10){ dsg=1;} break;} } 
if(trv==1&&dsg==1){msg="** ATTENZIONE ** questa chiave non puo' essere salvata in quanto l'ingrediente <b>"+ingar[i]+"</b> non e' sufficiente a realizzare almeno 10 pietanze"; mostraer(msg); return; } /*alert(ingar[i]+" - "+trv);*/ if(trv==0){esci=1;break;} } 
if(esci==1){msg="** ATTENZIONE ** questa chiave non puo' essere salvata in quanto l'ingrediente <b>"+ingar[i]+"</b> non e' presente nel registro di magazzino"; mostraer(msg); return; }
}
}
/*alert(wsprcreg+"\n"+dtatbrif+"\n"+cmpar+"\n"+(wsprcreg.indexOf("ristorazione")==-1&&wsprcreg.indexOf("formazione")==-1));*/
if(wsprcreg.indexOf("ristorazione")==-1&&wsprcreg.indexOf("formazione")==-1){ 
var lskrif=nvarxml.getElementsByTagName("keyrif"); var rifkrif=document.getElementById("selliv_2").value;
for(i=0;i<lskrif.length;i++){lsatb=lskrif[i].attributes; if(lsatb[0].value==rifkrif){var ind=i;break;} } var lskey=lskrif[ind].getElementsByTagName("key"); 

var rifkeyar=new Array(); /**/rifkeyar=azdatiregv[4].split(","); rifkeyar=rifkeyar.slice(1); /*rifkeyar=azdtkeyrif.split(",");*/ /*alert(rifkeyar+"\n"+azdtkeyrif+"\n"+k);*/
for(i=0;i<rifkeyar.length;i++){rifk=rifk+rifkeyar[i+1]+"='"+document.getElementById("keycel_"+k+"_"+i).value+"' ";} /*alert(rifk);} alert(rifkeyar.length+"\n"+rifkeyar[0]); return;*/
/*alert("cmpar="+cmpar+"\nazdatiregv="+azdatiregv+"\nrifkeyar="+rifkeyar+"\nazdtkeyrif="+azdtkeyrif+"\nrifk="+rifk);*/
/*for(i=0;i<rifkeyar.length;i++){if(document.getElementById("keycel_"+k+"_"+i).value==""){trv=1;break; } }*/
for(i=0;i<cmpar.length;i++){if(azdatiregv[4].indexOf(cmpar[i])>-1){  if(document.getElementById("keycel_"+k+"_"+i).value==""){trv=1;break; } }}
/*alert(trv+"\n"+regsel+"\n"+(trv==1&&regsel!="accredsect.xml"));*/
if(trv==1&&regsel!="accredsect.xml"){msg="** ATTENZIONE ** questa chiave non puo' essere inserita in quanto non tutti i campi richiesti sono stati compilati"; mostraer(msg); return;} 

/*alert(cmpar+"\n"+document.getElementById("sel0").value+"\n"+cmpar.indexOf("richiesti")); return;*/ var pos=cmpar.indexOf("richiesti");
if(document.getElementById("sel0").value=="capitolato.xml"&&cmpar.indexOf("richiesti")>-1&&cmpar.indexOf("dislocazioni")>-1){ var sezar=new Array(),qtatot=0;
var dis="keycel_"+k+"_"+cmpar.indexOf("dislocazioni"); sezar=document.getElementById(dis).value.slice(1).split(",");
for(i=0;i<sezar.length;i++){var p1=0,qta=0; p1=sezar[i].indexOf("_"); /*alert(sezar[i]+"\n"+sezar[i].slice(0,p1));*/ qta=sezar[i].slice(0,p1)*1; /*alert(qta);*/ 
qtatot=qtatot+qta; } /*alert(qtatot);*/var ric="keycel_"+k+"_"+pos; var ob=document.getElementById(ric); ob.value=qtatot; ob.style.display="block";
ob.disabled=true;
}

/*alert("rifkeyar="+rifkeyar+"\nnliv="+azdtnumliv+"\n5-nliv="+(5-nliv)); alert(rifk); */ /*return;alert(http_request.responseText); alert(rifkeyar.length);*/
/*var lskey=nvarxml.getElementsByTagName("key"); */
for(i=0;i<lskey.length;i++){var lsatb=lskey[i].attributes; var lsk="key "; trv=0;
/*for(j=0;j<cmpar.length;j++){lsk=lsk+cmpar[j]+"='"+lsatb.getNamedItem(cmpar[j]).value+"' "; } if(lsk.indexOf(rifk)>-1){ trv=1; break;} }*/
for(j=0;j<cmpar.length;j++){alert(cmpar[j]+"\nkeycel_"+k+"_"+j); lsk=lsk+cmpar[j]+"='"+document.getElementById("keycel_"+k+"_"+j).value+"' "; /*alert(lsk+"\n"+rifk);*/ } if(lsk.indexOf(rifk)>-1){ trv=1; break;} }
if(trv==1&&operaz=="insreg"){msg="** ATTENZIONE **, con operaz=<b>"+operaz+"</b> questa chiave non puo' essere inserita per valore di riferimento: "+azdatiregv[4]+" gia' registrato"; mostraer(msg); return;}
}/*}*/
else{ trv=0; /*alert(cmpar);*/ var val0=val1=val2=""; 
val0=document.getElementById("keycel_"+k+"_"+0).value; 
if(document.getElementById("keycel_"+k+"_"+1)!=null){ val1=document.getElementById("keycel_"+k+"_"+1).value;} 
if(document.getElementById("keycel_"+k+"_"+2)!=null){ val2=document.getElementById("keycel_"+k+"_"+2).value;} 
if(val0.indexOf("video")>-1&&val1!=""&&val2!=""){document.getElementById("keycel_"+k+"_"+4).value="si"; }

for(i=0;i<cmpar.length;i++){if(document.getElementById("keycel_"+k+"_"+i).value!=""){trv=1;break; } }
if(trv==0){msg="** ATTENZIONE ** questa chiave non puo' essere inserita in quanto non e' stato caricato alcun valore"; mostraer(msg); return;}}
for(i=0;i<cmpar.length;i++){if(cmpar[i]=="tmpcolmax"&&document.getElementById("keycel_"+k+"_"+i).value==""){msg="** ATTENZIONE ** questa chiave non puo' essere inserita in quanto in <b>"+cmpar[i]+"</b> non e' stato indicato <mark>il numero di ore di collegamento gratuito consentito</mark>."; mostraer(msg); return; } }
obj.tectContent="salvato"; obj.disabled=true; 
vedicomplcor(k,dtatbrif,operaz,obj,regsel);
}

function vedicomplcor(k,dtatbrif,operaz,obj,nomreg){percorso=percorso+"vedicomplcor; "; var sik=new Array(); var cel=document.getElementById("keycel_"+k+"_0");
/*alert("da vedicomplcor:\nk="+k+"\ndtatbrif="+dtatbrif+"\noperaz="+operaz+"\nobj.value="+obj.value+"\nnomreg="+nomreg+"\nwsprcreg="+wsprcreg); */
var canc=document.getElementsByName("si_"+k);  /*alert(cel.value);*/
if(operaz=="modreg"){
if(canc[0].checked==true&&cel.value.slice(0,1)=="_"){cel.value=cel.value.slice(1);} /*return;*/
if(canc[0].checked==false&&cel.value.slice(0,1)!="_"){cel.value="_"+cel.value;} /*return;*/
}
/*alert("da vedicomplcor:\n"+k+"\n"+dtatbrif+"\n"+operaz); alert(document.getElementsByName("si_"+k)[0].checked+"-"+document.getElementsByName("si_"+k)[1].checked); */
 var i=j=p1=p2=trovato=trovatof=cmp=fatto1=trcanc=esci=0; var regdamod1=keyrif1=newkey1=regdamod2=keyrif2=newkey2=strm=mail=a=dmin=settore=azione=operaz1=operaz2=oldk="",msg="";  
 if(operaz!="comunicazione"){ var prcreg="../"+document.getElementById("prcreg").value; var regsel=document.getElementById("sel0").value; regdamod1=prcreg+"/"+regsel;
var sectab=document.getElementById("sectab").value; var sect=document.getElementById("sect").value; var oper=cred1+"-"+cred2;}
/* if(regsel=="capitolato.xml"&&prcreg.indexOf("formazione")>-1)*/
/*alert("azdtkeyrif="+azdtkeyrif+"\noperaz="+operaz);*/
if(azdtkeyrif==""&&operaz!="insreg"){var nk=k*1; oldk=document.getElementById("hk_"+nk).value,operaz="modificaKeyGlobal"; var confkey=""; /*alert(operaz);*/
/*alert("noldk="+oldk+"\noperaz="+operaz+"\nazdtnumliv="+azdtnumliv+"\nazdtstrut="+azdtstrut+"\nazdtnomesezliv="+azdtnomesezliv+"\noldk="+oldk+"\noperaz="+operaz);*/
for(i=0;i<(azdtnumliv*1-1);i++){azsezlivsel0[i]=document.getElementById("selliv_"+(azdtnumliv*1-i)).value; } azsezlivsel0[i]=document.getElementById("keycel_"+nk+"_"+0).value;
var dtstrutar=new Array(),dtnomsezlivar=new Array(); dtstrutar=azdtstrut.split(","); dtnomsezlivar=azdtnomesezliv.split(",");
for(i=0;i<(azdtnumliv*1-1);i++){confkey=confkey+dtstrutar[i]+" "+dtnomsezlivar[i]+"='"+azsezlivsel0[i]+"' "+"|"; }confkey=confkey+oldk;/*confkey=confkey.slice(0,(confkey.length-1))*/
/*alert("azdtnumliv="+azdtnumliv+"\nazdtstrut="+azdtstrut+"\nazdtnomesezliv="+azdtnomesezliv+"\nazsezlivsel0="+azsezlivsel0+"\noldk="+oldk+"\noperaz="+operaz+"\nconfkey="+confkey);*/
confkey=confkey.replace(/'/g,"&#39;");
} 
/*alert("azdtkeyrif="+azdtkeyrif+"\n"+(azdtkeyrif==""&&operaz=="insreg"));*/
if(azdtkeyrif==""&&operaz=="insreg"){var nk=k*1; operaz="insertKeyGlobal"; var confkey=""; /*alert(operaz+"\n"+azdtnumliv+"\n"+nk); */
for(i=0;i<(azdtnumliv*1-1);i++){azsezlivsel0[i]=document.getElementById("selliv_"+(azdtnumliv*1-i)).value;/*alert(azsezlivsel0[i]);*/ } 
azsezlivsel0[i]=document.getElementById("keycel_"+nk+"_"+0).value;/*alert(azsezlivsel0[i]);*/
var dtstrutar=new Array(),dtnomsezlivar=new Array(); dtstrutar=azdtstrut.split(","); dtnomsezlivar=azdtnomesezliv.split(",");
for(i=0;i<(azdtnumliv*1-1);i++){confkey=confkey+dtstrutar[i]+" "+dtnomsezlivar[i]+"='"+azsezlivsel0[i]+"' "+"|"; }confkey=confkey+oldk;/*confkey=confkey.slice(0,(confkey.length-1))*/
/*alert("azdtnumliv="+azdtnumliv+"\nazdtstrut="+azdtstrut+"\nazdtnomesezliv="+azdtnomesezliv+"\nazsezlivsel0="+azsezlivsel0+"\noldk="+oldk+"\noperaz="+operaz+"\nconfkey="+confkey);*/
confkey=confkey.replace(/'/g,"&#39;");}
/*alert(("azdtkeyrif="+azdtkeyrif+"\noperaz="+operaz)) alert(http_request3.responseText);*/ valkrif=document.getElementById("keycel_"+k+"_0").value; /*alert(valkrif);*/
if(azdtkeyrif!=""){if(nomreg!="magazzino.xml"){ var lskey=nvarxml.getElementsByTagName("key");}else{var lskey=nvarxml.getElementsByTagName("key");}
for(i=0;i<lskey.length;i++){var lsatb=lskey[i].attributes; if(lsatb[0].value==valkrif){esci=1;break;} }
if(esci==1&&operaz!="modreg"){var regsel=document.getElementById("sel0").value; msg="** ATTENZIONE **, con operaz=<b>"+operaz+"</b> nel registro <b>"+regsel+"</b> è già presente una chiave che nel campo <b>"+azdtkeyrif+"</b> contiene il valore:<b>"+valkrif+"</b>"; mostraer(msg); return;  }
}
if(azdtkeyrif!=""&&operaz=="insreg"){operaz="insertKeyGlobal"; var confkey=""; /*alert(operaz+"\n"+azdtnumliv+"\n"+azdtstrut+"\n"+azdtnomesezliv);*/ operaz1=operaz;
for(i=0;i<(azdtnumliv*1-1);i++){azsezlivsel0[i]=document.getElementById("selliv_"+(azdtnumliv*1-i)).value; } /*azsezlivsel0[i]=document.getElementById("keycel_"+nk+"_"+0).value;*/
var dtstrutar=new Array(),dtnomsezlivar=new Array(); dtstrutar=azdtstrut.split(","); dtnomsezlivar=azdtnomesezliv.split(",");
for(i=0;i<(azdtnumliv*1-1);i++){confkey=confkey+dtstrutar[i]+" "+dtnomsezlivar[i]+"='"+azsezlivsel0[i]+"' "+"|"; }confkey=confkey+oldk; /*alert(confkey); return;*/
confkey=confkey.replace(/'/g,"&#39;");}


if(operaz=="modreg"){
for(i=0;i<2;i++){ sik[i]=document.getElementsByName("si_"+k)[i].checked; } 
if(sik[0]==false){operaz1="sostituisci"; azione="modifica chiave settore "+sect;}
else{/*operaz1="cancella";*/ operaz1="sostituisci"; azione="occulta chiave settore "+sect;}/*alert(sik);*/
}
if(operaz=="insreg"||operaz=="insertKeyGlobal"){operaz1="inserisci"; azione="inserimento chiavi settore "+sect;} 
/*alert("da vedicomplcor:\n"+operaz+"\n"+operaz1+"\n"+azsezselfin+"\n"+sect);*/
if(operaz=="comunicazione"){operaz1="inserisci"; regdamod1=nomreg;} 
var arr = dtatbrif.split(","); /*alert(arr);*/ 
for(i=0;i<arr.length;i++){var cmpval=document.getElementById("keycel_"+k+"_"+i).value;cmpval=cmpval.replace(/'/g,"^"); document.getElementById("keycel_"+k+"_"+i).value=cmpval; }
/*for(i=0;i<arr.length;i++){if(azdatiregv[6].indexOf(arr[i])==-1){ alert(arr+"\nkeycel_"+k+"_"+i+"\n"+document.getElementById("keycel_"+k+"_"+i).value)}}*/
for(i=0;i<arr.length;i++){/* alert("keycel_"+k+"_"+i+"\n"+arr[i]+"\n"+azdatiregv[6]);*/
if(azdatiregv[6].indexOf(arr[i])==-1){if(document.getElementById("keycel_"+k+"_"+i).value==""){trovato=1; ; break;}}/**/ 
if(trovato==1&&regsel!="datiazienda.xml"&&regsel!="regaccred.xml"&&regsel!="accredsect.xml"){msg="<b> *ATTENZIONE * </b>LA CHIAVE NON PUO' ESSERE INVIATA in quanto non tutti i campi sono stati compilati"; mostraer(msg); var audio=new Audio("actung.wav").play(); return; break;} }
if(trovato==1){trovato=0;}
for(i=0;i<arr.length;i++){ if(document.getElementById("keycel_"+k+"_"+i).style.color=="rgb(238, 0, 0)"){trovato=1; break;}  }
if(trovato==1){msg="<b> *ATTENZIONE * </b>LA CHIAVE NON PUO' ESSERE INVIATA in quanto non tutti i valori inseriti sono formalmente corretti"; mostraer(msg); var audio=new Audio("actung.wav").play(); return; }
obj.disabled=true; obj.textContent="salvato";
/*keyrif1="key "+azdatiregv[4]+"='"+document.getElementById("keycel_"+k+"_0").value+"' "; */
if(operaz=="modreg"){keyrif1=document.getElementById("hk_"+k).value; refkey1=keyrif1.replace(/'/g,"&#39;"); /*alert(keyrif1);*/}
if(operaz=="insreg"||operaz=="insertKeyGlobal"){if(regsel=="regaccred.xml"||regsel=="accredsect.xml"){var cc=calcolasec(),pw1="",pww="",pw2=pw3=0,cf=document.getElementById("keycel_"+k+"_0").value; 
pw1=cf.toLowerCase().slice(1,5); 
for(j=0;j<pw1.length;j++){pw2=pw2+pw1.charCodeAt(j); } pw3=(24*60*60+cc*1)+pw2+1; pww=pw1+pw3; document.getElementById("keycel_"+k+"_2").value=pww; /*alert(pww);*/}
keyrif1="keyrif "+aznomsezarfin[3]+"=&#39;"+azsezselfin[3]+"&#39;"; /*alert(keyrif1); return;*/}
/*<key data='21/9/21_8:34:14' operatore='qqq-qqqwww11a11a111a' settore='ristorante' azione='chiede nuovamente la password di accesso' riferimenti='regaccred.xml' />*/
regdamod2=prcreg+"/"+"regactivity.xml"; keyrif2="keyrif rif0='";
newkey2="key data='"+azoggi+"' operatore='"+oper+"' settore='"+sectab+"' azione='"+azione+"' riferimenti='"+regsel+"' />"; 
newkey2=newkey2.replace(/'/g,"&#39;");
operaz2="inserisci"; /*alert(operaz);*/
if(operaz=="modificaKeyGlobal"){keyrif1=oldk; keyrif2="";regdamod2="";newkey2="";operaz2=""; operaz1=operaz; } /*alert(operaz1);*/
newkey1="key "; for(j=0;j<arr.length;j++){ var vv=document.getElementById("keycel_"+k+"_"+j).value; /*alert(k+"-"+j+"\n"+vv); */
/*vv=vv.replace(/'/g,"&#180;");*/ vv=vv.replace(/'/g,"^"); vv=vv.replace(/</g,"|"); /*vv=vv.replace(/\(/g,"&#40;"); vv=vv.replace(/\)/g,"&#41;");alert(2+"\n"+vv);*/
newkey1=newkey1+arr[j]+"=&#39;"+vv+"&#39; "; } newkey1=newkey1+"/>"; /*alert(newkey1);return;*/
/*alert(regdamod1+"\n"+keyrif1+"\n"+newkey1+"\n"+sectab+"\n"+oper+"\n"+azoggi+"\n"+sect+"\n"+regsel+"\n"+regdamod2+"\n"+keyrif2+"\n"+newkey2);*/
/*azione="inserimento_liv_key"; */
/*inviamodreg*/			/*dtstrut,dtnumliv,dtnomesezliv,sezlivsel  azdtstrut,azdtnumliv,azdtnomesezliv,azsezlivsel*/
if(regsel=="capitolato.xml"&&operaz=="insertKeyGlobal"){operaz1="insertKeyGlobal"; } /*alert(regsel+"\n"+operaz+"\n"+operaz1);*/
if(regsel=="pub.xml"&&(operaz!="insertKeyGlobal"&&operaz!="insregmir")){if(cel.value.slice(0,1)!="_"){operaz=operaz1="sostituisci";}else{operaz=operaz1="cancella";} } 
/*alert(regsel+"\n"+operaz+"\n"+operaz1); return;*/ var lastscl=document.getElementById("nv3").innerText; /*alert(lastscl);*/
if((regsel=="pub.xml"||regsel=="bozze.xml")&&lastscl.indexOf("Inserimento")>-1){operaz=operaz1="inserisci";} 

/*alert(regsel=="bozze.xml"&&keyrif1=="");*/
if(regsel=="bozze.xml"&&keyrif1==""){keyrif1=document.getElementById("hk_"+k).value; }

var valrec=strm="",nrec=0;refkey1=keyrif1.replace(/'/g,"&#39;");newkey2=newkey2.replace(/'/g,"&#39;"); /*alert("keyrif1="+refkey1);*/
if(regdamod1.indexOf("pub.xml")>-1&&operaz=="insreg"){keyrif1="/keyrif"; }keyrif1=keyrif1.replace(/\</g,"|");
strm="<form id='frmnewraz' target='popup' style='display:block'> ";  
strm=strm+"<input type='text' name='nomreg1' value='"+regdamod1+"' /><input type='text' name='operaz1' value='"+operaz1+"' />";
strm=strm+"**<input type='text' name='keyrif1' value='"+keyrif1.replace(/'/g,"&#39;")+"' /> <input type='text' name='azione' style='width:100%;' value='"+azione+"' />"; 
valrec=newkey1;
strm=strm+"<input name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' readonly='true'>"; nrec++;
strm=strm+"<input type='text' name='nrec' value='"+nrec+"' /><input type='text' name='sect' value='"+sect+"' />";
strm=strm+"<input type='text' name='mail' value='' /><input type='text' name='oggetto' value='' />";
strm=strm+"<input type='text' name='nomreg2' value='"+regdamod2+"' /><input type='text' name='operaz2' value='"+operaz2+"' />";
strm=strm+"<input type='text' name='keyrif2' value='"+keyrif2+"' /> <input type='text' name='newkey2' style='width:100%;' value='"+newkey2+"' />";
if(operaz="modificaKeyGlobal"){strm=strm+"<input type='text' name='confkey' value='"+confkey+"' /> "; }
strm=strm+"</form>";
document.getElementById("modextern8").innerHTML=strm; /*alert(strm);*/
var frm=document.getElementById("frmnewraz"); /*alert(strm);*/
frm.action="gestserver1/registra_dati.asp"; frm.target="popup"; frm.method="post"; frm.submit(); /**/ document.getElementById("modextern8").innerHTML="";
}

function azlettabglob(prov, reg, act){percorso=percorso+"azlettabglob; "; /* alert("azlettabglob\n"+prov+"\n"+reg+"\n"+act+"\n"+indbasexml);   alert(azxmlreq.responseText); */
/*azdatireg="sectorab","dtnumliv","dtstrut","dtnomsezliv","dtkeyrif","letmod","dtinvisib","calcolati","newins","cancins","duplication","newstrutins","cancstrutins","commonlist","dtbase","ordinam"*/
/*sectorab='direzione-x' dtinvisib='' dtkeyrif='elemento,modello,versione' dtstrut='keyarea,keycat,keyrif,key' calcolati='giacenza,costo,um' ndtnomliv='keycat,keyrif,key' dtnomsezliv='area,categoria,tipologia_componenti,elementi_specifici' newins='si' cancins='si' specifiche='' magazzino_mp='' duplication='' coppie_sml='' newstrutins='si' cancstrutins='si',"dtbase","ordinam"*/
var i=j=n=m=s=t=h=l=o=k=0,ntot=-1, tipop2="",str=str0="",sec="", nk=0,nliv=0, atrbind=new Array(), rifsec="",p1=0,trg="",val="",sezliv="",rifnam=""; /*alert(azdtstrut);var dtstrutar=new Array(); dtstrutar=azdtstrut;*/
var dtnamesezstrutar=new Array(); dtnamesezstrutar=azdatiregv[3].slice(1).split(","); /*alert(dtnamesezstrutar); alert(azdtstrut+"\n"+azdtnomesezliv);*/
var azdtinvisib=azdatiregv[6];
var dtstrutar=new Array(); dtstrutar=azdtstrut.split(","); /*var azdtstrut=new Array(); azdtstrut=azdatiregv[2].split(","); alert(azdtstrut);*/
for(i=(azknar.length-azdatiregv[1]);i<azknar.length;i++){azknar[i]=dtstrutar[i-(azknar.length-azdatiregv[1])]; azkvar[i]=dtnamesezstrutar[i-(azknar.length-azdatiregv[1])];} 
/*alert("numliv="+azdatiregv[1]+"\ndtstrutar="+azdatiregv[2]+"\nnomsezliv="+azdatiregv[3]+"\nazknar="+azknar+"\nazkvar="+azkvar+"\n(azknar.length-azdatiregv[1])="+(azknar.length-azdatiregv[1])+"\ndtnamesezstrutar="+dtnamesezstrutar+"\nazdatiregv[3]="+azdatiregv[3]); */
var msg="stampa globale del registro: "+reg; 
if(reg.indexOf("rapgilav_")>-1){azletgloblav(prov, reg, act); return;}
azlistkeyrif= nvarxml.getElementsByTagName("keyrif");  var numkeyrif= azlistkeyrif.length;
var lskeyreg=nvarxml.getElementsByTagName(reg);
var str0="<button onclick='vedinewfin(1,\""+msg+"\")'>  visualizza a tutta pagina e stampa</button><span id='stmp' style='display:none'> </span></br><table style='width:100%'><thead>I numeri del registro <mark>"+reg+"</mark></thead><tr><td>";
str0=str0+"Il registro <mark>"+reg+"</mark> e' strutturato in n.<mark>"+azdatiregv[1]+" livelli piramidali.</mark><br/>Ciascun livello e' suddiviso in una o piu' sezioni di smistamento tranne l'ultimo che contiene i dati."; 
for(k=0;k<azknar.length;k++){ if(azknar[k]!=""){sezliv=nvarxml.getElementsByTagName(azknar[k]); nliv++; 
if(k<azknar.length-1){rifnam="e' suddiviso in n.<b>"+sezliv.length+"</b> sezioni di smistamento individuate dall'attributo <b>"+azkvar[k]+"</b>";}else{var rifnam="contiene n.<b>"+sezliv.length+"</b> <mark>elementi</mark>"; if(azdatiregv[4]!=""){ rifnam=rifnam+" contraddistinti dai valori degli attributi: <b>"+azkvar[k]+"</b>";} }
str0=str0+"<br/>Il livello n."+nliv+" denominato <b>"+azknar[k]+"</b> "+rifnam;}} 
str0=str0+"</td></tr></table><div id='mostratab'></div>"
/*if(wstipreg!="rapgilav" && wstipreg!="rapinterv" && wstipreg!="ordinazioni"){ var modextern=document.getElementById("modextern3");}else{ var modextern=document.getElementById("modextern2");}*/
document.getElementById("modextern2_2").innerHTML=str0; /*return;*/
var livstrut=dtstrutar.length,fatto0=fatto1=fatto2=fatto3=fatto4=0; 
if(dtstrutar.length==5){ var azlistliv0=nvarxml.getElementsByTagName(azknar[0]); for(n=0;n<azlistliv0.length;n++){str=str+"<table style='width:100%;'><tr><th style='background-color:"+wscl[3]+";color:"+wscl[1]+";font-weight:normal;'>la sezione <b>"+azkvar[0]+": "+azlistliv0[(n)].attributes[0].value+"</b> contiene:</th></tr>"; 
var azlistliv1=azlistliv0[n].getElementsByTagName(azknar[1]); 
for(s=0;s<azlistliv1.length;s++){str=str+"<table style='table-layout:auto;width:100%;'><tr><th style='background-color:"+wscl[2]+"; color:"+wscl[1]+";font-weight:normal;' >la sezione <b>"+dtnamesezstrutar[1]+"</b>: <mark>"+azlistliv1[(s)].attributes[0].value+"</mark> che contiene:</th></tr>";
var azlistliv2=azlistliv1[s].getElementsByTagName(azknar[2]); var dec=(parseInt(wscl[2].slice(1),16)*1)+304; var esa=Number(dec).toString(16); esa="#"+esa; nero="#000";
/*alert((parseInt(wscl[2].slice(1),16)*1)+"\n"+dec+"\n"+esa);*/
for(t=0;t<azlistliv2.length;t++){str=str+"<table style='table-layout:auto;width:100%;'><tr><th style='background-color:"+esa+"; color:"+nero+";font-weight:normal;' >la sezione <b>"+dtnamesezstrutar[2]+"</b>: <mark>"+azlistliv2[(t)].attributes[0].value+"</mark> che contiene:</th></tr>";
var azlistliv3=azlistliv2[t].getElementsByTagName(azknar[3]);
for(m=0;m<azlistliv3.length;m++){ var azlistliv4=azlistliv3[m].getElementsByTagName(azknar[4]); /*e' la sezione n."+(m+1)+" e */
str=str+"<table style='table-layout:auto;width:100%;'><tr><th class='az1' style='font-weight:normal;'>sezione <mark>"+azlistliv3[(m)].attributes[0].value+"</mark> contenente n."+azlistliv4.length+": chiavi</th></tr><tr><th>"; var lsatbkrif=azlistliv3[m].attributes; str=str+"<table style='table-layout:auto;width:100%;'><tr><th style='width:3%'>N</th>";
for(l=0;l<lsatbkrif.length;l++){var rifk=lsatbkrif[l].nodeName;  var valk=lsatbkrif[l].value; valk=valk.replace(/\|/g,"&#60;"); 
if(rifk.indexOf("rif")>-1&&azdtinvisib.indexOf(valk)==-1){ str=str+"<td style='width:auto'>"+valk+"</td>" }} str=str+"</th></tr>"; 
for(h=0;h<azlistliv4.length;h++){ azlistattrib=azlistliv4[h].attributes;  str=str+"<tr><th>"+(h+1)+"</th>";
for(o=0;o<azlistattrib.length;o++){var rifk=azlistattrib[o].nodeName,valk=azlistattrib[o].value; valk=valk.replace(/\|/g,"&#60;"); if(azdtinvisib.indexOf(rifk)==-1){str=str+"<td>"+valk+"</td>" }} str=str+"</tr>"; }
str=str+"</table></table></table></table></table>"; }}}}}
if(dtstrutar.length==4){ var azlistliv1=nvarxml.getElementsByTagName(azknar[1]); fatto1=1;
for(s=0;s<azlistliv1.length;s++){str=str+"<table style='table-layout:auto;width:100%;'><tr><th style='background-color:#922; color:"+wscl[1]+";' >la sezione <b>"+dtnamesezstrutar[0]+"</b> denominata <b>"+azlistliv1[(s)].attributes[0].value+"</b> contiene le sezioni:</th></tr>";
if(fatto1==0){var azlistliv2=nvarxml.getElementsByTagName(azknar[2]);}else{var azlistliv2=azlistliv1[s].getElementsByTagName(azknar[2]);} fatto2=1;
for(t=0;t<azlistliv2.length;t++){str=str+"<table style='table-layout:auto;width:100%;'><tr><th style='background-color:"+wscl[3]+"; color:"+wscl[1]+";' >la sezione <b>"+dtnamesezstrutar[1]+"</b> denominata <mark>"+azlistliv2[(t)].attributes[0].value+"</mark> contiene le sezioni:</th></tr>";
if(fatto2==0){ var azlistliv3=nvarxml.getElementsByTagName(azknar[3]);}else{var azlistliv3=azlistliv2[t].getElementsByTagName(azknar[3]);} 
for(m=0;m<azlistliv3.length;m++){ var azlistliv4=azlistliv3[m].getElementsByTagName(azknar[4]); /*e' la sezione n."+(m+1)+" e */
str=str+"<table style='table-layout:auto;width:100%;'><tr><th class='az1' style='font-weight:normal;' > sezione <mark>"+azlistliv3[(m)].attributes[0].value+"</mark> contenente n."+azlistliv4.length+": chiavi</th></tr><tr><th>"; var lsatbkrif=azlistliv3[m].attributes; str=str+"<table style='table-layout:auto;width:100%;'><tr><th>N</th>";
for(l=0;l<lsatbkrif.length;l++){var rifk=lsatbkrif[l].nodeName;  var valk=lsatbkrif[l].value;  valk=valk.replace(/\|/g,"&#60;"); if(rifk.indexOf("rif")>-1&&azdtinvisib.indexOf(valk)==-1){ str=str+"<th>"+valk+"</th>" }} str=str+"</th></tr>"; 
for(h=0;h<azlistliv4.length;h++){ azlistattrib=azlistliv4[h].attributes;  
str=str+"<tr><th>"+(h+1)+"</th>";
for(o=0;o<azlistattrib.length;o++){var rifk=azlistattrib[o].nodeName,valk=azlistattrib[o].value; valk=valk.replace(/\|/g,"&#60;"); if(azdtinvisib.indexOf(rifk)==-1){str=str+"<td>"+valk+"</td>" }} str=str+"</tr>"; }
str=str+"</table></table></table></table>"; }}}}
if(dtstrutar.length==3){ if(fatto1==0){var azlistliv2=nvarxml.getElementsByTagName(azknar[2]);}else{var azlistliv2=azlistliv1[i].getElementsByTagName(azknar[2]);} fatto2=1;
for(t=0;t<azlistliv2.length;t++){str=str+"<table style='table-layout:auto;width:100%;'><tr><th style='background-color:"+wscl[3]+"; color:"+wscl[1]+";' >la sezione <b>"+dtnamesezstrutar[0]+"</b> denominata <mark>"+azlistliv2[(t)].attributes[0].value+"</mark> contiene le sezioni:</th></tr>";
if(fatto2==0){ var azlistliv3=nvarxml.getElementsByTagName(azknar[3]);}else{var azlistliv3=azlistliv2[t].getElementsByTagName(azknar[3]);} 
for(m=0;m<azlistliv3.length;m++){ var azlistliv4=azlistliv3[m].getElementsByTagName(azknar[4]); /*e' la sezione n."+(m+1)+" e */
str=str+"<table style='table-layout:auto;width:100%;'><tr><th style='font-weight:normal;'>sezione <mark>"+azlistliv3[(m)].attributes[0].value+"</mark> contenente n."+azlistliv4.length+": chiavi</th></tr><tr><th>"; var lsatbkrif=azlistliv3[m].attributes; str=str+"<table style='table-layout:fixed;width:100%;'><tr><th style='width:4%;'>N</th>";
/*for(l=0;l<lsatbkrif.length;l++){var rifk=lsatbkrif[l].nodeName;  var valk=lsatbkrif[l].value;  valk=valk.replace(/\|/g,"&#60;"); if(rifk.indexOf("rif")>-1&&azdtinvisib.indexOf(valk)==-1){ str=str+"<th>"+valk+"</th>" }} str=str+"</th></tr>"; */ 
for(l=0;l<lsatbkrif.length;l++){var rifk=lsatbkrif[l].nodeName;  var valk=lsatbkrif[l].value; valk=valk.replace(/\|/g,"&#60;"); /*if(m==2){alert(rifk+"="+valk); }*/
if(rifk.indexOf("rif")>-1&&azdtinvisib.indexOf(valk)==-1){ if(reg.indexOf("capitolato")>-1&&l==(lsatbkrif.length-1)){str=str+"<th style='width:5%;'>"+valk+"</th>"; }else{ str=str+"<th>"+valk+"</th>"; }}} str=str+"</th></tr>"; 
for(h=0;h<azlistliv4.length;h++){ azlistattrib=azlistliv4[h].attributes;  
str=str+"<tr><th>"+(h+1)+"</th>";
for(o=0;o<azlistattrib.length;o++){var rifk=azlistattrib[o].nodeName,valk=azlistattrib[o].value;  valk=valk.replace(/\|/g,"&#60;"); 
if(azdtinvisib.indexOf(rifk)==-1){if(o==(azlistattrib.length-1)){ if(valk=="si"){str=str+"<th style='background-color:rgb(100,255,100);'>"+valk+"</th>"; }
if(valk=="no"){ str=str+"<th style='background-color:rgb(255,100,100);'>"+valk+"</th>"; }}if(valk!="si"&&valk!="no"){str=str+"<td>"+valk+"</td>"; } }} str=str+"</tr>"; }
str=str+"</table></table></table>"; }}}
if(dtstrutar.length==2){if(fatto2==0){ var azlistliv3=nvarxml.getElementsByTagName(azknar[3]);}else{var azlistliv3=azlistliv2[i].getElementsByTagName(azknar[3]);} for(m=0;m<azlistliv3.length;m++){
var azlistliv4=azlistliv3[m].getElementsByTagName(azknar[4]); /*e' la sezione n."+(m+1)+" e */
str=str+"<table style='table-layout:auto;width:100%;'><tr><th class='az1' style='font-weight:normal;'>sezione <b>"+azlistliv3[(m)].attributes[0].value+"</b> contenente n."+azlistliv4.length+": chiavi</th></tr><tr><th>"; var lsatbkrif=azlistliv3[m].attributes; str=str+"<table style='table-layout:auto;width:100%;'><tr><th>N</th>";
/**/
for(l=0;l<lsatbkrif.length;l++){var rifk=lsatbkrif[l].nodeName;  var valk=lsatbkrif[l].value;  valk=valk.replace(/\|/g,"&#60;"); if(rifk.indexOf("rif")>-1&&azdtinvisib.indexOf(valk)==-1){ str=str+"<th>"+valk+"</th>" }} str=str+"</th></tr>"; 
for(h=0;h<azlistliv4.length;h++){ azlistattrib=azlistliv4[h].attributes;  
str=str+"<tr><th>"+(h+1)+"</th>";
for(o=0;o<azlistattrib.length;o++){var rifk=azlistattrib[o].nodeName,valk=azlistattrib[o].value; valk=valk.replace(/\|/g,"&#60;"); if(azdtinvisib.indexOf(rifk)==-1){str=str+"<td>"+valk+"</td>" }} str=str+"</tr>"; }
str=str+"</table></table>"; }} 
/**/
 document.getElementById("mostratab").innerHTML=str; document.getElementById("stmp").innerHTML=str; /*alert(operaz);*/
}

function generamodkeygest(operaz,nff){percorso=percorso+"generamodkeygest; "; /*alert("generamodkeygest\noperaz="+operaz+"\nnff="+nff+"\nwssect="+wssect+"\n"+wsprcreg);*/
/*alert("generamodnewreg\n"+n+"\n"+cart+"\n"+nff); alert(wsxmlreq2.responseText);*/ var op=nf="", fnz="",i=j=trovato=0,str="",frmph="",opz="",val=""; 
/*if(nff!=""){ ckxml=wsprcreg+"/"+nff; var bb=leggireg(ckxml); var lskeyreg=nvarxml.getElementsByTagName(nff); }else{alert("nff="+nff); }*/  
/*alert(nff+"\n"+http_request.responseText); alert(document.getElementById("sel0").style.color+"\n"+(document.getElementById("sel0").color=="rgb(238, 0, 0)"));*/
if(document.getElementById("sel0").style.color=="rgb(238, 0, 0)"){msg="<b> *ATTENZIONE * </b>non puoi procedere in quanto <b>devi prima indicare il nome corretto del nuovo registro</b> da generare"; mostraer(msg); /*alert(msg);*/ return; }  

if(operaz=="newreg"){var lskey=nvarxml.getElementsByTagName("key"); /*alert(lskey.length);*/
for(i=0;i<lskey.length;i++){val=lskey[i].attributes[0].value; /*alert(val+"\n"+nff);*/ if(val==nff){trovato=1;break; } } /*alert(trovato);*/
if(trovato==1){document.getElementById("sel0").style.color="rgb(238, 0, 0)";msg="** ATTENZIONE ** il registro <b>"+wssect+"/"+nff+"</b> già esiste";mostraer(msg);return;} }

if(document.getElementById("sel0").value==""){msg="<b> *ATTENZIONE * </b>non puoi procedere in quanto <b>devi prima indicare il nome del registro</b> da generare";return; } 
 
if(trovato==0){msg="Nel percorso indicato il registro <b>"+wssect+"/"+nff+"</b> manca quindi puoi definire la <b>chiave di gestione e generare il nuovo registro</b> "; document.getElementById("sel0").style.color=="rgb(0, 0, 0)"; mostraer(msg); } 
/*if(trovato==1){mostraer(msg); return;}}*/
if(operaz=="newreg"){document.getElementById("prcd1").remove(); }
ckxml=ckxml=datiaccredv[2]+"/"+datiaccredv[1]+"/datiazienda/regaccred.xml";/*alert(ckxml);*/ leggireg(ckxml); /*alert(http_request.responseText);*/ 
/*
azdatireg=("sectorab","dtnumliv","dtstrut","dtnomsezliv","dtkeyrif","letmod","dtinvisib","calcolati","newins","cancins","duplication","newstrutins","cancstrutins","commonlist","dtbase");
*/
/*
var azglobalregrif=new Array(3.0"settori operativi abilitati alla gestione",4.1"livelli piramidali",5.2"lista dei nomi dei livelli piramidali",6.3"lista dei nomi delle sezioni dei rispettivi livelli",7.4"lista di attributi di identificazione dei record",8.5"tipo di modifica del registro",9.6"lista di attributi dei campi invisibili",10.7"lista di attributi dei campi calcolati",13.8"inserimento di nuovi record",14.9"eliminazione di record",15.10"duplicazione di record",16.11"inserire elementi di struttura",17.12"eliminare elementi di struttura",18.13"liste comuni per i nomi delle sezioni da inserire nel livello intermedio ed eventualmente anche in particolari sezioni del livello successivo");
*/
if(operaz=="newreg"){opz="costruire la chiave di gestione del nuovo registro";}else{opz="modificare la chiave di gestione del registro";}
str="<table style='table-layout:auto'><tr><th colspan=4>MODULO per <b>"+opz+"</b> </th></tr><tr><th style='width:3%;'>N</th><th>caratteristica</th><th>seleziona</th> <th>valore</th></tr>"; 
for(i=0;i<azglobalregrif.length;i++){
if(i==0||i==6){frmph="([,]{1}[a-z0-9_\-]{1,50})+"; str=str+"<tr><th>"+(i+1)+"</th><td>"+azglobalregrif[i]+"</td><td><span id='span_"+i+"'></span></td><td><input type='text' id='cmp_"+i+"' value='' pattern='"+frmph+"' placeholder='lista di nomi preceduti dalla ,' title='lista di nomi preceduti dalla , nel formato: "+frmph+"' onblur='centroctrldata(this,\"text\")' style='color: rgb(0, 0, 0);' /></td></tr>";}
if(i==1){frmph="([2-5]{1})+"; str=str+"<tr><th>"+(i+1)+"</th><td>"+azglobalregrif[i]+"</td><td><span id='span_"+i+"'></span></td><td><input type='text' id='cmp_"+i+"' value='' pattern='"+frmph+"' placeholder='lista di nomi preceduti dal ;' title='lista di nomi preceduti dal ; "+frmph+"' onblur='centroctrldata(this,\"text\")' style='color: rgb(0, 0, 0);' /></td></tr>";}
if(i==4||i==7||i==14){frmph="([,]{1}[a-z0-9_\-]{1,40})+"; str=str+"<tr><th>"+(i+1)+"</th><td>"+azglobalregrif[i]+"</td><td><span id='span_"+i+"'></span></td><td><input type='text' id='cmp_"+i+"' value='' pattern='"+frmph+"' placeholder='lista di nomi preceduti dalla ,' title='lista di nomi preceduti dalla , "+frmph+"' onblur='centroctrldata(this,\"text\")' style='color: rgb(0, 0, 0);' /></td></tr>";}
if(i==5){frmph="(lettura|modifica)"; str=str+"<tr><th>"+(i+1)+"</th><td>"+azglobalregrif[i]+"</td><td><span id='span_"+i+"'></span></td><td><input type='text' id='cmp_"+i+"' value='' pattern='"+frmph+"' placeholder='lista di nomi preceduti dalla ,' title='lista di nomi preceduti dalla , "+frmph+"' onblur='centroctrldata(this,\"text\")' style='color: rgb(0, 0, 0);' /></td></tr>";} val="";if(i==8||i==9||i==11||i==12){val='si'};if(i==10){val='no'};
if(i==8||i==9||i==10||i==11||i==12||i==15){frmph="(si|no){1}"; str=str+"<tr><th>"+(i+1)+"</th><td>"+azglobalregrif[i]+"</td><td><span id='span_"+i+"'></span></td><td><input type='text' id='cmp_"+i+"' value='"+val+"' title='"+frmph+"' pattern='"+frmph+"' onblur='centroctrldata(this,\"text\")' style='color: rgb(0, 0, 0);' /></td></tr>";}
if(i==2){frmph="([,]{1}[a-z]{1,20})+"; str=str+"<tr><th>"+(i+1)+"</th><td>"+azglobalregrif[i]+"</td><td><span id='span_"+i+"'></span></td><td><input type='text' id='cmp_"+i+"' value='' pattern='"+frmph+"' placeholder='lista di nomi preceduti dalla ,' title='lista di nomi preceduti dalla , "+frmph+"' onblur='centroctrldata(this,\"text\")' style='color: rgb(0, 0, 0);' /></td></tr>";}/**/
if(i==3){frmph="([,]{1}[a-zA-Z]{1}[a-zA-Z0-9_]{1,20})+"; str=str+"<tr><th>"+(i+1)+"</th><td>"+azglobalregrif[i]+"</td><td><span id='span_"+i+"'></span></td><td><input type='text' id='cmp_"+i+"' value='' pattern='"+frmph+"' placeholder='lista di nomi preceduti dalla ,' title='lista di nomi preceduti dalla , "+frmph+"' onblur='centroctrldata(this,\"text\")' style='color: rgb(0, 0, 0);' /></td></tr>";} 
if(i==13){val="NO";frmph="(SI|NO){1}"; str=str+"<tr><th>"+(i+1)+"</th><td>"+azglobalregrif[i]+"</td><td><span id='span_"+i+"'></span></td><td><input type='text' id='cmp_"+i+"' value='"+val+"' title='"+frmph+"' pattern='"+frmph+"' onblur='centroctrldata(this,\"text\")' style='color: rgb(0, 0, 0);' /></td></tr>";}
} 
str=str+"</table><center> <input type='text' id='tipmodglob' style='display:none' /><button id='prcd2' onclick='wsfpredisponiregglob(\""+operaz+"\",\""+nff+"\",this)'>registra</button> </center>"; /*alert(str);*/ document.getElementById("modextern1").innerHTML=str; 
 if(operaz=="modkeygest"){ckxml=wsprcreg+"/"+nff; var bb=leggireg(ckxml); /*alert(ckxml);*/ p1=nff.indexOf("/"); if(p1>-1){nf=nff.slice(p1+1);}else{nf=nff;}
 var lskey=nvarxml.getElementsByTagName(nf); var lsatb=lskey[0].attributes; /*alert(lsatb.length);*/
for(i=0;i<azglobalregrif.length;i++){document.getElementById("cmp_"+i).value=lsatb[i].value; }}
 if(operaz=="newreg"&&nff=="accredsect.xml"){var kgestaccredsect=new Array(",direzione_amministrativa","2",",keyrif,key",",settore,codice_fiscale",",codice_fiscale","modifica",",pw,pww,mail",",livmod,livlez,datariccrs,giorniriccrs,dataavcrs,datascad,avvisrin,avvis20","si","si","no","si","si","NO");
for(i=0;i<azglobalregrif.length;i++){document.getElementById("cmp_"+i).value=kgestaccredsect[i]; document.getElementById("prcd2").click();}}
wsfcaricaspan(operaz,nff);  /*return; }*/
}

function wsfcaricaspan(operaz,nff){percorso=percorso+"wsfcaricaspan; "; var i=j=k=0,str="",lskey,lsatb,xx; 
ckxml=ckxml=datiaccredv[2]+"/"+datiaccredv[1]+"/datiazienda/regaccred.xml";/*alert(ckxml);*/ leggireg(ckxml);lskey=nvarxml.getElementsByTagName("keyrif");
/*if(operaz=="newreg"){lskey=nvarxml.getElementsByTagName("keyrif");}else{lskey=nvarxml.getElementsByTagName("key");}*/
for(i=0;i<azglobalregrif.length;i++){ 
/*<regaccred.xml sectorab='direzione_amministrativa' dtnumliv='2' dtstrut='keyrif,key' dtnomsezliv='settore,cf' dtkeyrif='cf' letmod='modifica' dtinvisib='' calcolati='' newins='si' cancins='no' duplication='no' newstrutins='si' cancstrutins='si' commonlist='NO' dtbase='' ordinam='' >*/ 
if(i==0){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=xx.value+\",\"+this.value;xx.focus()' ><option value='' selected></option>"; 
 for(j=0;j<lskey.length;j++){ lsatb=lskey[j].attributes; str=str+"<option value='"+lsatb[0].value+"'>"+lsatb[0].value+"</option>";  } }
/*if(i==4){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=this.value;xx.focus()'><option value='' selected></option> <option value='keyrif,key'>2</option> <option value='keytip,keyrif,key'>3</option> <option value='keycat,keytip,keyrif,key'>4</option> <option value='keyarea,keycat,keytip,keyrif,key'>5</option>"; }
*/
if(i==1){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=this.value;xx.focus()'><option value='' selected></option> <option value='2'>2</option> <option value='3'>3</option> <option value='4'>4</option> <option value='5'>5</option>"; }
if(i==2){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=this.value;xx.focus()'><option value='' selected></option> <option value=',keyrif,key'>2=,keyrif,key</option> <option value=',keytip,keyrif,key'>3=,keytip,keyrif,key</option> <option value=',keycat,keytip,keyrif,key'>4=,keycat,keytip,keyrif,key</option> <option value=',keyarea,keycat,keytip,keyrif,key'>5=,keyarea,keycat,keytip,keyrif,key</option>"; }
if(i==3){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=this.value;xx.focus()'><option value='' selected></option> <option value=',generico'>2=,generico</option> <option value=',tipologia,generico'>3=,tipologia,generico</option> <option value=',categoria,tipologia,generico'>4=,categoria,tipologia,generico</option> <option value=',area,categoria,tipologia,generico'>5=,area,categoria,tipologia,generico</option>"; }
if(i==4||i==14){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=xx.value+\",\"+this.value;xx.focus()' ><option value='' selected></option>"; 
for(k=0;k<datiformtip.length;k++){str=str+"<option value='"+datiformtip[k]+"'>"+datiformtip[k]+"</option>"; } }
if(i==6){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=xx.value+\",\"+this.value;xx.focus()' ><option value='' selected></option>"; 
for(k=0;k<datiformtip.length;k++){str=str+"<option value='"+datiformtip[k]+"'>"+datiformtip[k]+"</option>"; } }
if(i==5){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=this.value;xx.focus()'><option value='' selected></option> <option value='lettura'>solo lettura</option> <option value='modifica'>lettura e modifica</option>"; }
if(i==7){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=xx.value+\",\"+this.value;xx.focus()' ><option value='' selected></option> <option value='costo'>costo</option> <option value='totale'>totale</option> "; }
if(i==8){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=this.value;xx.focus()'><option value='' selected></option> <option value='si'>si</option> <option value='no'>no</option> "; }
if(i==9){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=value;xx.focus()'><option value='' selected></option> <option value='si'>si</option> <option value='no'>no</option> "; }
if(i==10){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=this.value;xx.focus()'><option value='' selected></option> <option value='si'>si</option> <option value='no'>no</option> "; }
if(i==11){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=this.value;xx.focus()'><option value='' selected></option> <option value='si'>si</option> <option value='no'>no</option> "; }
if(i==12){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=this.value;xx.focus()'><option value='' selected></option> <option value='si'>si</option> <option value='no'>no</option> "; }
if(i==13){str="ad un eventuale SI deve seguire il numero del livello ed eventualmente quello del livello successivo nei quali devono essere riportate le liste comuni. Tali livelli non possono essere il primo e l'ultimo <select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=this.value;xx.focus()' style='text-align:middle'><option value='' selected></option> <option value='SI'>SI</option> <option value='NO'>NO</option> "; }
str=str+"</select> "; 
if(i==15){str="<select onchange='xx=document.getElementById(\"cmp_"+i+"\");xx.value=this.value;xx.focus()'><option value='' selected></option> <option value='no'>no</option> "; }
document.getElementById("span_"+i).innerHTML=str;
}
}

function wsfpredisponiregglob(operaz,nomreg,obb){percorso=percorso+"wsfpredisponiregglob; ";  
var i=j=p1=p2=trovato=trovatof=cmp=fatto1=trcanc=nrec=0; var regdamod1=keyrif1=newkey1=regdamod2=keyrif2=newkey2=strm=mail=admin=settore=azione=operaz1=operaz2="",msg="",val="";  
var prcreg="../"+document.getElementById("prcreg").value;
if(wsprcreg.indexOf("comunicazioni")==-1){var regsel=document.getElementById("sel0").value; regdamod1=prcreg+"/"+regsel;}
else{regdamod1="../"+wsprcreg+"/"+nomreg; p1=nomreg.indexOf("/");var regsel=nomreg.slice(p1+1);}
/* alert("wsfpredisponiregglob\noperaz="+operaz+"\nnomreg="+nomreg+"\nregsel="+regsel+"\nregdamod1="+regdamod1);*/
var sectab=document.getElementById("sectab").value; var sect=document.getElementById("sect").value; var oper=cred1+"-"+cred2;
var rifk=document.getElementById("cmp_4").value; 
if(rifk!=""){ var rifkar=new Array(); rifkar=rifk.slice(1).split(","); /*alert("rifk="+rifk+"\nrifkar="+rifkar+"\nrifkar.length="+rifkar.length);*/
for(i=0;i<rifkar.length;i++){trovato=0;for(j=0;j<datiformtip.length;j++){if(rifkar[i]==datiformtip[j]){trovato=1;break; } } /*alert(rifkar[i]+"-"+trovato);*/
if(trovato==0){msg="** ATTENZIONE ** il valore <b>"+rifkar[i]+"</b> indicato come campo identificativo delle chiavi non è presente nel database"; mostraer(msg);return;}}}trovato=0; 
var rifinv=document.getElementById("cmp_6").value; 
if(rifinv!=""){ var rifinvar=new Array(); rifinvar=rifinv.slice(1).split(","); /*alert(rifkar);*/
var rifcalc=document.getElementById("cmp_7").value; var rifcalcar=new Array(); rifcalcar=rifcalc.slice(1).split(","); /*alert(rifkar);*/
for(i=0;i<rifinvar.length;i++){trovato=0;for(j=0;j<datiformtip.length;j++){if(rifinvar[i]==datiformtip[j]){trovato=1;break; } } /*alert(rifinvar[i]+"-"+trovato);*/
if(trovato==0){msg="** ATTENZIONE ** il valore <b>"+rifinvar[i]+"</b> indicato come campo invisibile non è presente nel database"; mostraer(msg);return;}} }trovato=0; 
/*if(rifcalc!=""){for(i=0;i<rifcalcar.length;i++){trovato=0;for(j=0;j<datiformtip.length;j++){if(rifcalcar[i]==datiformtip[j]){trovato=1;break; } } 
if(trovato==0){msg="** ATTENZIONE ** il valore <b>"+rifcalcar[i]+"</b> indicato come campo calcolato non è presente nel database"; mostraer(msg);return;}}trovato=0;  }*/
/*alert("wsfpredisponiregglob\n"+prcreg+"\n"+regsel+"\n"+regdamod1+"\n"+sectab+"\n"+sect+"\n"+oper+"\n"); */
if(operaz=="newreg"){operaz1="genera";azione="predispone il registro "+nomreg+" in "+sect;}
if(operaz=="modkeygest"){operaz1="sostituisce";azione="modifica la keygest di registro "+nomreg+" in "+sect; keyrif1=regsel+" sectorab='";}
/*0,1,2,3,4,5,8,9,10,11,12,13
azdatireg=("sectorab","dtnumliv","dtstrut","dtnomsezliv","dtkeyrif","letmod","dtinvisib","calcolati","newins","cancins","duplication","newstrutins","cancstrutins","commonlist","dtbase","ordinam");
*/if(document.getElementById("cmp_5").value=="lettura"){var numcmp=azdatireg.length-1;}else{var numcmp=azdatireg.length;}
for(i=0;i<numcmp;i++){var cm=document.getElementById("cmp_"+i).value; if(cm==""&&(i!=6&&i!=7&&i!=4)&&operaz!="modkeygest"){trovato=1; msg="<b> *ATTENZIONE * <b>il campo n."+(i+1)+" non è stato compilato</b>, <mark>solo i campi n.5, n.7 e n.8 </mark> possono non essere compilati in fase di <b>modkeygest</b>"; mostraer(msg); var audio=new Audio("actung.wav").play(); }if(trovato==1){ break;}}if(trovato==1){return; }
for(i=0;i<azdatireg.length;i++){if(i!=6&&i!=7){ var obj=document.getElementById("cmp_"+i); /*alert("cmp_"+i+"\n"+obj.style.color);*/
if(obj.value!=""&&obj.style.color!="rgb(0, 0, 0)"){trovato=1; msg="<b> *ATTENZIONE * </b>i dati non possono essere inviati in quanto il valore inserito <mark>nel campo "+(i+1)+"</mark> non e' formalmente corretto"; mostraer(msg); var audio=new Audio("actung.wav").play(); }if(trovato==1){ break;}}}
if(trovato==1){return; }
if(operaz1=="genera"){newkey1="?xml version='1.0' encoding='UTF-8'?>|"+regsel+" ";
for(i=0;i<azdatireg.length;i++){newkey1=newkey1+azdatireg[i]+"='"+document.getElementById("cmp_"+i).value+"' "; }newkey1=newkey1+">|";newkey1=newkey1+"/"+regsel+">";
}
if(operaz1=="sostituisce"){newkey1=regsel+" "; for(i=0;i<azdatireg.length;i++){newkey1=newkey1+azdatireg[i]+"='"+document.getElementById("cmp_"+i).value+"' "; }newkey1=newkey1+">";}
regdamod2=prcreg+"/"+"regactivity.xml"; keyrif2="keyrif rif0='";
newkey2="key data='"+azoggi+"' operatore='"+oper+"' settore='"+sectab+"' azione='"+azione+"' riferimenti='"+regsel+"' />"; keyrif2="keyrif rif0='";
newkey1=newkey1.replace(/'/g,"&#39;"); newkey2=newkey2.replace(/'/g,"&#39;"); operaz2="inserisci";
strm="<form id='frmnewraz' target='popup' style='display:block'> ";  
strm=strm+"<input type='text' name='nomreg1' value='"+regdamod1+"' /><input type='text' name='operaz1' value='"+operaz1+"' />";
strm=strm+"**<input type='text' name='keyrif1' value='"+keyrif1.replace(/'/g,"&#39;")+"' /> <input type='text' name='azione' style='width:100%;' value='"+azione+"' />"; 
/*valrec=newkey1;
strm=strm+"<input name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' readonly='true'>"; nrec++;*/
strm=strm+"<input type='text' name='newkey1' value='"+newkey1+"' />";
strm=strm+"<input type='text' name='nrec' value='"+nrec+"' /><input type='text' name='sect' value='"+sect+"' />";
strm=strm+"<input type='text' name='nomreg2' value='"+regdamod2+"' /><input type='text' name='operaz2' value='"+operaz2+"' />";
strm=strm+"<input type='text' name='keyrif2' value='"+keyrif2+"' /> <input type='text' name='newkey2' style='width:100%;' value='"+newkey2+"' /> <input type='text' name='oggetto' style='width:100%;' value='' /> <input type='text' name='msg' style='width:100%;' value='' /> <input type='text' name='mail' style='width:100%;' value='' /></form>";
document.getElementById("modextern2").innerHTML=strm;
var frm=document.getElementById("frmnewraz"); 
frm.action="gestserver1/generamod_strutreg.asp"; frm.target="popup"; frm.method="post"; frm.submit(); if(azmonit=="fisso"){istdoc.innerHTML="";}else{istmobdoc.innerHTML=""; }
}

function azmodglobalstrut(operaz,nomreg,liv){percorso=percorso+"azmodglobalstrut; "; var obj=document.getElementById("sellivop");
/*alert("azmodglobalstrut\n"+operaz+"\n"+nomreg+"\n"+liv+"\n"+azdatiregv[2]);  */  
var lsop=obj.options; var opar=new Array(); var numop=lsop.length; for(i=1;i<numop;i++){ /*alert(liv+"\n"+i+"\n"+lsop[i].textContent);*/
if((i-1)==liv){azlivop=lsop[i].textContent; } }/* alert(azlivop);*/
/*azdatireg=("sectorab","dtnumliv","dtstrut","dtnomsezliv","dtkeyrif","letmod","dtinvisib","calcolati","newins","cancins","duplication","newstrutins","cancstrutins","commonlist","dtbase","ordinam");*/
var dtstrutar=new Array(); dtstrutar=azdtstrut.split(","); azlivdamod=liv; /*alert(dtstrutar+"\n"+(dtstrutar.length-2)+"\n"+(dtstrutar[liv]=="key")); */
/*if(dtstrutar[liv]=="key"){liv=1;}*/
var pass=0, reg="", str=str0="",fz; var i=0; /*dtstrut=azdatiregv[2].split(",");*/ /*alert(azxmlreq.responseText);*/  fz="azmodglobalstrut_"+liv; azlivop=dtstrutar[liv];
/*if(azlivop=="key"&&operaz!="elistrut"){str="<mark>* ATTENZIONE * le sezioni di livello <b>"+azlivop+"</b> devono essere inserite attivando la procedura <b>2-Inserimento dati</b></mark>"; mostraer(str); var audio=new Audio("actung.wav").play(); return; }*/
/*
if(azlivop=="key"){str="<mark>* ATTENZIONE * le sezioni di livello <b>"+azlivop+"</b> devono essere inserite o eliminate attivando rispettivamente le procedure <b>2-Inserimento dati</b> o <b>1-Modifica cancellazione dati</b></mark>"; mostraer(str); var audio=new Audio("actung.wav").play(); return; }
*/
for(i=0;i<dtstrutar.length;i++){if(i==liv){/*alert(dtstrut[i]);*/ azlistkey=nvarxml.getElementsByTagName(dtstrutar[i]); var numsezliv=azlistkey.length; /*alert(numsezliv);*/
if(i>0){/*??????? azdatixml > nvarxml*/ var livstrutprec=nvarxml.getElementsByTagName(dtstrutar[i-1]);
if(livstrutprec.length==0){str="* ATTENZIONE * sezioni di livello piramidale <b>"+dtstrutar[i]+"</b> non possono essere inserite in quanto mancano sezioni del livello piramidale superiore <b>"+dtstrutar[i-1]+"</b> nelle quali inserirle"; mostraer(str); var audio=new Audio("actung.wav").play(); return;} 
if(operaz=="modstrut"){str0="<b>generazione di nuove sezioni</b> nel";}
if(operaz=="elistrut"){str0="<b>eliminazione di sezioni</b> dal";}
str="Si procede alla "+str0+" livello piramidale di ordine "+i+":<b>"+dtstrutar[i]+"</b> ";  }
if(i==0){  /*var livstrut=nvarxml.getElementsByTagName(dtstrut[i]); var numsezliv=livstrut.length;alert(numsezliv);*/
if(numsezliv==0){str="Il livello piramidale di ordine "+i+": <b>"+dtstrutar[i]+"</b> non contiene ancora alcuna sezione";  }
if(numsezliv>0){str="Il livello piramidale di ordine "+i+": <b>"+dtstrutar[i]+"</b> gia' contiene n."+numsezliv+" sezioni";  } } 
if(liv>0){ azlistkey=nvarxml.getElementsByTagName(dtstrutar[0]); azmodglobalstrut_n(operaz,nomreg,liv,dtstrutar[liv],numsezliv,0); } mostraer(str);
if(liv==0){azlistkey=nvarxml.getElementsByTagName(dtstrutar[i]); 
if(azlistkey.length==0){ /*alert("oltre ai nomi delle sezioni da inserire in questo livello occorre dichiarare pure il nome della chiave che individua tali sezioni");*/ } 
var numsezliv=azlistkey.length; azmodglobalstrut_0(operaz,nomreg,liv,dtstrutar[i],numsezliv); }
} } 
}

function azmodglobalstrut_0(operaz,nomreg,liv,elstrutnew,numsezliv,livp,rifdiv){percorso=percorso+"azmodglobalstrut_0; "; 
var dtstrutar=new Array(); dtstrutar=azdtstrut.split(","); elstrutnew=dtstrutar[document.getElementById("sellivop").value];
/*alert("azmodglobalstrut_0\noperaz="+operaz+"\nnomreg="+nomreg+"\nliv="+liv+"\nelstrutnew="+elstrutnew+"\nnumsezliv="+numsezliv+"\nlivp="+livp+"\nazlivdamod="+azlivdamod+"\nazdtstrut="+azdtstrut+"\nazdtnomesezliv="+azdtnomesezliv+"\nazsezlivsel="+azsezlivsel);  */
/*alert(wsprcreg+"\n"+operaz+"\n"+nomreg+"\n"+(nomreg=="capitolato.xml"&&(wsprcreg.indexOf("costruzioni")>-1||wsprcreg.indexOf("manutenzioni")>-1)));*/
var sezlivstr=azsezlivsel.toString();
/*alert("nazsezlivsel="+azsezlivsel+"\n"+azsezlivsel.indexOf("rif_area")+"\n"+(nomreg=="capitolato.xml"&&(wsprcreg.indexOf("costruzioni")>-1||wsprcreg.indexOf("manutenzioni")>-1)&&(elstrutnew=="key"&&sezlivstr.indexOf("rif_area")==-1)));*/

if(document.getElementById("selliv_0")==null){var rifarea=document.getElementById("sellivop").value; }else{var rifarea=document.getElementById("selliv_0").value; }

/*alert(rifarea+"\n"+(nomreg=="capitolato.xml"&&rifarea!="zoneFunzionali"&&(wsprcreg.indexOf("costruzioni")>-1||wsprcreg.indexOf("manutenzioni")>-1)&&(elstrutnew=="key"&&sezlivstr.indexOf("rif_area")==-1)));*/
if(nomreg=="capitolato.xml"&&rifarea!="zoneFunzionali"&&(wsprcreg.indexOf("costruzioni")>-1||wsprcreg.indexOf("manutenzioni")>-1)&&(elstrutnew=="key"&&sezlivstr.indexOf("rif_area")==-1)){
azmodglobalstrut_00(operaz,nomreg,liv,elstrutnew,numsezliv,livp,rifdiv); return; }
/*
*/


/**/if(nomreg=="accredsect.xml"&&elstrutnew=="key"){var msg="<b>** ATTENZIONE **</b> per il registro <b>accredsect</b> le sezioni di livello key devono essere costruite ed inserite singolarmente utilizzando il percorso</br><mark> > Gestioni Aziendali > 2-Gestione Registri > 2-Inserimanto dati</mark>"; mostraer(msg); return; }
/*var livtot=azdtstrut.match(","); azdtnomesezliv[5-livtot]=document.getElementById("selliv_0").value;*/ 
/*azdtstrutsezsel[liv]=nomsez;alert(azdtnomesezliv); */ /*alert("azmodglobalstrut_0\n"+azdtstrut);*/
numsezlivfin=aznumsezliv[liv]; /*alert(dtstrutar+"\n"+azsezsel+"\n"+http_request.responseText);*/
var nsz="",livsel=krif=""; if(livp==null){livp=liv;}
var azlskey=new Array(azlsk0,azlsk1,azlsk2,azlsk3,azlsk4,azlsk5); /*for(i=0;i<liv;i++){ alert(liv+"\n"+azlskey[i].length);}*/
/*for(i=0;i<azlskey[liv-1].length;i++){var lsk= }*/
if(liv>0&&liv==livp){nsz=document.getElementById("selliv_"+(livp-1)).value; /*azlistkey=nvarxml.getElementsByTagName(dtstrut[liv-1]);*/ azlistkey=azlskey[liv]; /*azsezlivsel;*/ /**//*alert(azlistkey+"\n"+azlistkey.length);*/
numsezlivfin=azlistkey.length; /*for(i=0;i<azlistkey.length;i++){  alert(azlistkey[i].attributes[0].value); }*/ } 
if(liv==0&&liv==livp){azlistkey=nvarxml.getElementsByTagName(dtstrutar[liv]); } /*alert(dtstrutar[liv]);*/
if(azlistkey[0]!=null){ azknar[liv]=azlistkey[0].attributes[0].nodeName;} var dtnamesezstrutar=new Array(); dtnamesezstrutar=azdtnomesezliv.split(","); 
/*alert("dtnamesezstrutar="+dtnamesezstrutar);*/
var str="<table style='table-layout:auto;'>",dtstrut=new Array(),sez=new Array(),sez2=new Array(),sez3=new Array(),i=j=n=0,nomsezliv="",p1=0,numsezlivfin=0,info="",atb="",listatb="",atbiniz="",keyrifar=new Array(),invisibar=new Array(),calcar=new Array(),specar=new Array(); dtstrut=azdtstrut.split(",");
if(operaz=="elistrut"){ 
/*alert("operaz=elistrut\nazmodglobalstrut_0\nazsezlivsel="+azsezlivsel+"\ndtstrutar="+dtstrutar+"\ndtnamesezstrutar="+dtnamesezstrutar+"\nazlivdamod="+azlivdamod+"\nliv="+liv+"\nlivp="+livp); */
/*if(azlivdamod>0){var lsk=nvarxml.getElementsByTagName(dtstrutar[0]); }else{var lsk=nvarxml.getElementsByTagName(dtstrutar[0]); }*/
var lsk=nvarxml.getElementsByTagName(dtstrutar[0]); 
if(azsezlivsel[0]!=""){for(j=0;j<lsk.length;j++){ if(lsk[j].attributes[0].value==azsezlivsel[0]){var lsk0=lsk[j]; indk=j;break;} }
for(i=0;i<(azlivdamod*1);i++){/*alert(i+"\n"+dtstrutar[i]);*/ var lsk=lsk0.getElementsByTagName(dtstrutar[i]); for(j=0;j<lsk.length;j++){ if(lsk[j].attributes[0].value==azsezlivsel[i]){lsk0=lsk[j];break;}}}
var lsk=lsk0.getElementsByTagName(dtstrutar[azlivdamod]);
}
/*else{var lsk0=lsk;}*/

if(lsk.length==0){ msg="** ATTENZIONE ** la sezione <b>"+azsezlivsel[liv-1]+"</b> di livello <b>"+dtstrutar[liv-1]+"</b> del registro <b>"+nomreg+"</b> non contiene alcuna sezione"; mostraer(msg); /* ATTENZIONE ** la sezione bibite di livello keyrif del registro productiveActivities.xml non contiene alcuna sezione*/ return;}
/*alert(str+"\n"+(azlivdamod<dtstrutar.length-1)); if(azlivdamod<dtstrutar.length-1){ }*/
str=str+"<tr><th colspan=3>la "; /*alert(azlivdamod+"\n"+azsezlivsel+"\n"+dtstrutar);*/
for(i=(azsezlivsel.length-1);i>-1;i--){if(azsezlivsel[i]!=""){str=str+"sezione "+azsezlivsel[i]+" di livello "+dtstrutar[i]; if(i>0){str=str+" inclusa nella ";} } } 
if(lsk.length>0){for(i=0;i<lsk.length;i++){  sez[i]=lsk[i].attributes[0].value;} /*alert("1: "+sez);*/

sez3=ordinasezioni(sez);
/*
var numin="**"; p1=sez[0].indexOf("_"); if(p1>-1){numin=sez[0].slice(0,p1)*1; } 
if(isNaN(numin*1)){sez3=sez.sort(); sez=sez3; }
else{ for(i=0;i<sez.length;i++){p1=sez[i].indexOf("_");sez2[i]=sez[i].slice(0,p1); } 
sez2=sez2.sort(function(a, b){return a-b}); var conf=""
for(i=0;i<sez2.length;i++){for(j=0;j<sez.length;j++){conf=sez2[i]+"_"; if(conf==sez[j].slice(0,conf.length)){p1=sez[j].indexOf("_"); sez3[i]=sez[j]; break;} } }sez=sez3;
} 
*/
sez=sez3;

str=str+" contiene n."+lsk.length+" sezioni di livello "+dtstrutar[azlivdamod]+"</th></tr><tr><th>n.</th><th>sezione</th><th> <!--<button id='but_x' onclick='azinviamodglobalstrut(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezlivfin+"\",\""+nomsezliv+"\",\""+","+sez+"\",this)'>elimina tutte</button> -->elimina </th></tr>"; 

/*alert(sez);azinviamodglobalstrut() */
for(i=0;i<sez.length;i++){ for(j=0;j<lsk.length;j++){ var lsatb=lsk[j].attributes,hk=elstrutnew+" "; if(lsatb[0].value==sez[i]){
for(n=0;n<lsatb.length;n++){ /*alert(lsatb[n].nodeName+"="+lsatb[n].value);*/ hk=hk+lsatb[n].nodeName+"='"+lsatb[n].value+"' ";}
if(elstrutnew=="key"){ hk=hk+"/>";}else{ hk=hk+">";}break;}} hk=hk.replace(/'/g,"&#39;");/**/
str=str+"<tr><th>"+(i+1)+"</th><td style='text-align:left'>"+sez[i]+"</td><td style='text-align:center'><button id='but_"+i+"' onclick='eliminakeyregsist_0(\""+operaz+"\",\""+nomreg+"\",\""+hk+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezlivfin+"\",\""+nomsezliv+"\",\""+sez[i]+"\",\""+i+"\")'>elimina</button> <!--<input type='text' id='hk_'+"+i+" style='display:none' value='"+hk+"'>--></td></tr> "; nomsezliv=nomsezliv+","+lsk[i].attributes[0].value; } 

/*
for(i=0;i<lsk.length;i++){str=str+"<tr><th>"+(i+1)+"</th><td style='text-align:center'>"+sez[i]+"</td><td style='text-align:center'><button id='but_"+i+"' onclick='azinviamodglobalstrut(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezlivfin+"\",\""+nomsezliv+"\",\""+","+sez[i]+"\",this)'>elimina</button></td></tr> "; nomsezliv=nomsezliv+","+lsk[i].attributes[0].value; } 
*/
str=str+"</table> <div id='modinv'></div>"; } 
document.getElementById("modextern7").innerHTML=str; return; }
/*alert(liv>0&&liv!=livp); alert(numsezlivfin>0); alert; alert;  alert(str);*/
for(i=0;i<azlistkey.length;i++){  sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); /*alert("sez="+sez);*/
var frmph="([,]{1}[a-zA-Z0-9_\/\\!\|:]{1,50})+",frmph1="([,]{1}[a-zA-Z]{1}[a-zA-Z0-9_-]{1,20})+"; /* alert(liv);*/ /*azlistkey=nvarxml.getElementsByTagName(dtstrut[liv]);*/
/*alert("numsezlivfin="+numsezlivfin+"\nnumsezliv="+numsezliv);alert("azmodglobalstrut_0\n"+azdtstrut+"\n"+azdtstrutsezsel+"\n"+azknar+"\n"+aznumsezliv+"\n"+liv+"\n"+livp+"\n"+dtstrut.length);*/ atbiniz=azdatiregv[4]+azdatiregv[6];/*+azdatiregv[7]*/ atbinv=","+azdtinvisib;atbcalc=","+azdtcalcolati; /*alert(atbiniz);*/
if(nomreg=="capitolato.xml"&&wsprcreg.indexOf("formazione")>-1){var lsnomatbpred=",elemento,titolo,competenze,specifiche,caricato"; }
if(nomreg=="capitolato.xml"&&wsprcreg.indexOf("ristorazione")>-1){var lsnomatbpred=",elemento,ingredienti,allergeni,costo,fotorif,caricato"; }
if(nomreg=="capitolato.xml"&&wsprcreg.indexOf("industriale")>-1){var lsnomatbpred=",elemento,richiesti,dislocazioni,fotorif,caricato"; }
if(nomreg=="gestione_tavoli.xml"){var lsnomatbpred=",tavolo,coperti,avventore,lp1,lp2,lp3,lp4,lp5,lp6,lp7,lp8,lp9,lp10,chiusa,costo,punti,saldata"; }
if(nomreg=="fornitori.xml"&&liv==0){var lsnomatbpred=",codice_fiscale,pw,pww,cognome,nome,mail,settore";}
/*alert("azmodglobalstrut_0\nnomreg="+nomreg+"\nwsprcreg="+wsprcreg+"\nlsnomatbpred="+lsnomatbpred);*/
if(liv>0&&liv!=livp){ for(j=0;j<azlistkey.length;j++){/*alert(nsz+"\n"+azlistkey[j].attributes[0].value);*/{if(azlistkey[j].attributes[0].value==nsz){ break;}} } /*alert(j+"\n"+dtstrut[livp]);*/ azlistkey=azlistkey[j].getElementsByTagName(dtstrutar[livp]); livsel="nella sezione <b>"+nsz+"</b> di livello <b>"+dtstrutar[liv-1]+"</b> "; }
str=str+"<tr><td>Digita la lista dei <b>nomi delle sezioni</b> di livello <b>"+dtstrut[liv]+"</b> da inserire "+livsel+"nel registro <b>"+nomreg+"</b>, tenendo presente che tale livello contiene attualmente n.<b>"+azlistkey.length+"</b>";
if(azlistkey.length>0){str=str+" sezioni con denominazione <b>"+dtnamesezstrutar[liv]+"</b> che sono: <b>";}
/* if(liv>0&&liv==livp){ azlistkey=nvarxml.getElementsByTagName(dtstrut[liv-1]);  for(j=0;j<azlistkey.length;j++){if(azlistkey[j].attributes[0].value==nsz){break;} }  
azlistkey=azlistkey[j].getElementsByTagName(dtstrut[livp]);*/ 
if(azlistkey.length>0){ for(i=0;i<azlistkey.length;i++){  sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); 
for(i=0;i<azlistkey.length;i++){str=str+"* "+sez[i]+" "; nomsezliv=nomsezliv+","+azlistkey[i].attributes[0].value; }}
if(azlistkey.length==0&&elstrutnew=="keyrif"){
if(nomreg=="operativo.xml"){ var sezprec=document.getElementById("sellivop").value; krif="rif_"+sezprec; krif=","+krif; if(sez.indexOf(krif)>-1){var krif="";} }else{var krif="";}if(nomreg=="fornitori.xml"){var krif=",tecnologie,strumentazioni,cancelleria,arredi";}
/*alert(krif);*/}
if(elstrutnew=="key"&&nomreg=="magazzino.xml"){frmph="([,]{1}[a-zA-Z0-9 _]{3,20}([!]{1}([a-zA-Z0-9 _]{2,20})){0,2})+"; }
if(elstrutnew=="key"&&nomreg=="capitolato.xml"){frmph="([,]{1}[a-zA-Z0-9 _]{3,20}([!]{1}([a-zA-Z0-9 _]{2,20})){0,2})+"; }
str=str+"</b></br>La lista deve avere la forma <mark><b>"+krif+"</b>,nomesez1,nomesez2,..,nomesezfin</mark><input type='text' value='"+krif+"' id='kkrif' style='display:none;' />"; 
alert(wsprcreg+"\n"+azdatas1+"\n"+(wsprcreg.indexOf("gestione_fanclub")>-1&&nomreg!="regactivity.xml"&&nomreg!="canali.xml"));
if(wsprcreg.indexOf("gestione_fanclub")>-1&&nomreg!="regactivity.xml"&&nomreg!="canali.xml"){krif=azdatas1.slice(0,(azdatas1.length-1));krif=","+krif+"/0";}
str=str+"<center> <input type='text' id='lsnewsez' value='"+krif+"' pattern='"+frmph+"' placeholder='lista di nomi preceduti dalla ,' title='"+frmph+"' onblur='centroctrldata(this,\"text\")' style='width:80%;' /> </center></td></tr>";
 /*alert(liv+"\n"+(dtstrut.length-2));*/
/*if(numsezlivfin>-1){*/ /*var livstrut=nvarxml.getElementsByTagName(dtstrut[liv]);*/ 
 /* str=str+"<tr><td><input type='text' id='nomnewsez' value='"+dtnamesezstrutar[liv]+"' readonly /> </td></tr>"; */  /*alert(liv+"\n"+dtstrut+"\n"+dtstrut.length);*/
if(liv*1==(dtstrut.length-2)&&dtstrut[liv]!="key"){ info="N.B.: Le sezioni del livello <b>keyrif</b> devono contenere gli attributi che caratterizzano i componenti specifici del livello <b>key</b>. </br>La lista di questi attributi e' comune a tutte le sezioni <b>keyrif</b> elencate sopra.</br>Sezioni keyrif che devono contenere chiavi con attributi differenti devono essere caricate singolarmente. </br>In ogni caso, la lista degli attributi delle keyrif deve iniziare con la lista degli attributi indicati come identificativi delle chiavi.";
/*
if(dtstrut[liv-1]!=null){str=str+"Poiche' la sezione di livello superiore <b>"+dtstrut[liv-1]+"</b> indicata gia' contiene sezioni <b>keyrif</b>, la lista degli attributi da adottare viene ricopiata dalle sezioni precedenti.";}
*/
/*str=str+"<tr><td>Il livello "+dtstrut[liv]+" gia' contiene n."+azlistkey.length+" sezioni, pertanto:<b>";*/ /*alert(numsezlivfin+"\n"+azlistkey.length);*/
if(numsezlivfin>0){ var lsatb=azlistkey[0].attributes; for(i=0;i<lsatb.length;i++){atb=lsatb[i].nodeName; if(atb.indexOf("rif")==0){listatb=listatb+lsatb[i].value+","; } }/*listatb=listatb+",";*/ 
str=str+"<tr><td>la lista degli attributi e' la stessa delle sezioni keyrif dello stesso livello e vale:<br/><center><input type='text' id='atbkey' value='"+listatb+"' onchange='centroctrldata(this.value,)' style='width:80%;' ></center></td></tr>";}
if(numsezlivfin==0){ str=str+"<tr><td>Costruisci nel formato <mark>,attrib1,attrib2,..,attribn</mark> la lista di attributi da associare a tutte le sezioni keyrif sopra elencate.</br>N.B. la lista degli attributi deve iniziare, come predisposto, dai nomi degli attributi <mrk><b>identificativi</b> delle chiavi e dei campi <b>invisibili</b> dichiarati nella chiave di accesso di questo registro</mark>. Inoltre a tale lista possono essere aggiunti uno o piu' dei campi calcolati anch'essi dichiarati:</br><mark>"+azdtcalcolati+"</mark></br>Ulteriori nomi di attributi da aggiungere possono essere selezionati dalla select:<center><select multiple onchange=' document.getElementById(\"atbkey\").value=document.getElementById(\"atbkey\").value+\",\"+this.value' ><option selected value=''></option>"; 
if(nomreg=="capitolato.xml"||nomreg=="gestione_tavoli.xml"||nomreg=="fornitori.xml"){if(lsnomatbpred!=null){atbiniz=lsnomatbpred;}else{atbiniz="";} } 
for(i=0;i<datiformtip.length;i++){str=str+"<option value='"+datiformtip[i]+"'>"+datiformtip[i]+"</option>"; }
str=str+"</select> </center><input type='text' id='atbkey' value='"+atbiniz+"' pattern='"+frmph1+"' placeholder='lista dei nomi degli attributi del livello key seguiti dal carattere ,' title='"+frmph1+"' onchange='centroctrldata(this,\"text\")' style='width:80%;' ></td></tr>";}
if(nomreg=="gestione_tavoli.xml"){str=str+"<tr><th>N.B. dopo avere registrato le sezioni relative alle suddette sale, per le ordinazioni da casa occorre riavviare il percorso ed aggiungere la sala <mark>casa</mark> con la lista di attributi: <mark>,tavolo,acquirente,ordinazione,conferma,consegna,costo,punti,saldata</mark></th></tr>"; }
frmph="[A-Za-z0-9_\-]{3,20}";  /*alert(liv+"\n"+dtstrut+"\n"+dtstrut.length);*/
str=str+"<tr style='display:none;'><td>il nome col quale le sezioni di livello <b>"+dtstrut[liv]+"</b> devono essere individuate all'interno del registro e': <input type='text' id='nomnewsez' value='"+dtnamesezstrutar[liv]+"' readonly pattern='"+frmph+"' placeholder='nome identificativo delle sezioni (da 3 a 20 caratteri alfanumerici _-)' title='"+frmph+"' onblur='centroctrldata(this,\"text\")' /></td></tr>"; } /*}*/ 
var ms="";
if(azmonit=="fisso"){ms=istfooter.innerHTML; } else{ms=document.getElementById("contactmob").innerHTML; }
if(ms.indexOf("Il livello piramidale di ordine")>-1){info=ms+"</br>"+info; }
mostraer(info); if(nomreg=="capitolato.xml"&&liv==0&&atbiniz==""){atbiniz=lsnomatbpred;}
str=str+" </table> <center><button onclick='azinviamodglobalstrut(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezlivfin+"\",\""+nomsezliv+"\",\"\",this,\""+atbiniz+"\")'  >registra</button> </br><input type='text' readonly id='numsezlivtot' value='"+aznumsezliv+"' style='display:none;' /> </center><div id='modinv'></div>";
if(rifdiv==null||rifdiv==""){ document.getElementById("modextern3").innerHTML=str; }else{ document.getElementById(rifdiv).innerHTML=str; }
}

function azmodglobalstrut_00(operaz,nomreg,liv,elstrutnew,numsezliv,livp,rifdiv){percorso=percorso+"azmodglobalstrut_00; "; 
/*alert("azmodglobalstrut_00\noperaz="+operaz+"\nnomreg="+nomreg+"\nliv="+liv+"\nelstrutnew="+elstrutnew+"\nnumsezliv="+numsezliv+"\nlivp="+livp+"\nazlivdamod="+azlivdamod+"\nazdtstrut="+azdtstrut+"\nazdtnomesezliv="+azdtnomesezliv+"\nazsezlivsel="+azsezlivsel); 
alert(dtstrutar+"\n"+azsezsel+"\n"+http_request.responseText);alert(dtstrutar+"\n"+azsezsel+"\n"+http_request3.responseText);*/
numsezlivfin=aznumsezliv[liv]; var dtstrutar=new Array(); dtstrutar=azdtstrut.split(","); /*alert(dtstrutar+"\n"+azsezsel+"\n"+http_request.responseText);*/
var nsz="",livsel=krif=""; if(livp==null){livp=liv;}
var azlskey=new Array(azlsk0,azlsk1,azlsk2,azlsk3,azlsk4,azlsk5); /*for(i=0;i<liv;i++){ alert(liv+"\n"+azlskey[i].length);}*/
if(liv>0&&liv==livp){nsz=document.getElementById("selliv_"+(livp-1)).value; 
numsezlivfin=azlistkey.length; } 
if(liv==0&&liv==livp){azlistkey=nvarxml.getElementsByTagName(dtstrutar[liv]); } /*alert(dtstrutar[liv]);*/
if(azlistkey[0]!=null){ azknar[liv]=azlistkey[0].attributes[0].nodeName;} var dtnamesezstrutar=new Array(); dtnamesezstrutar=azdtnomesezliv.split(","); 
var str="<table style='table-layout:auto;'>",dtstrut=new Array(),sez=new Array(),sez2=new Array(),sez3=new Array(),i=j=n=0,nomsezliv="",p1=0,numsezlivfin=0,info="",atb="",listatb="",atbiniz="",keyrifar=new Array(),invisibar=new Array(),calcar=new Array(),specar=new Array(); dtstrut=azdtstrut.split(",");
/*
if(operaz=="elistrut"){ 
var lsk=nvarxml.getElementsByTagName(dtstrutar[0]); 
if(azsezlivsel[0]!=""){for(j=0;j<lsk.length;j++){ if(lsk[j].attributes[0].value==azsezlivsel[0]){var lsk0=lsk[j]; indk=j;break;} }
for(i=0;i<(azlivdamod*1);i++){ var lsk=lsk0.getElementsByTagName(dtstrutar[i]); for(j=0;j<lsk.length;j++){ if(lsk[j].attributes[0].value==azsezlivsel[i]){lsk0=lsk[j];break;}}}
var lsk=lsk0.getElementsByTagName(dtstrutar[azlivdamod]);
}
if(lsk.length==0){ msg="** ATTENZIONE ** la sezione <b>"+azsezlivsel[liv-1]+"</b> di livello <b>"+dtstrutar[liv-1]+"</b> del registro <b>"+nomreg+"</b> non contiene alcuna sezione"; mostraer(msg);  return;}
str=str+"<tr><th colspan=3>la "; 
for(i=(azsezlivsel.length-1);i>-1;i--){if(azsezlivsel[i]!=""){str=str+"sezione "+azsezlivsel[i]+" di livello "+dtstrutar[i]; if(i>0){str=str+" inclusa nella ";} } } 
if(lsk.length>0){for(i=0;i<lsk.length;i++){  sez[i]=lsk[i].attributes[0].value;} 
sez3=ordinasezioni(sez);
sez=sez3;
str=str+" contiene n."+lsk.length+" sezioni di livello "+dtstrutar[azlivdamod]+"</th></tr><tr><th>n.</th><th>sezione</th><th> <!--<button id='but_x' onclick='azinviamodglobalstrut(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezlivfin+"\",\""+nomsezliv+"\",\""+","+sez+"\",this)'>elimina tutte</button> -->elimina </th></tr>"; 
for(i=0;i<sez.length;i++){ for(j=0;j<lsk.length;j++){ var lsatb=lsk[j].attributes,hk=elstrutnew+" "; if(lsatb[0].value==sez[i]){
for(n=0;n<lsatb.length;n++){  hk=hk+lsatb[n].nodeName+"='"+lsatb[n].value+"' ";}
if(elstrutnew=="key"){ hk=hk+"/>";}else{ hk=hk+">";}break;}} hk=hk.replace(/'/g,"&#39;");
str=str+"<tr><th>"+(i+1)+"</th><td style='text-align:left'>"+sez[i]+"</td><td style='text-align:center'><button id='but_"+i+"' onclick='eliminakeyregsist_0(\""+operaz+"\",\""+nomreg+"\",\""+hk+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezlivfin+"\",\""+nomsezliv+"\",\""+sez[i]+"\",\""+i+"\")'>elimina</button> <!--<input type='text' id='hk_'+"+i+" style='display:none' value='"+hk+"'>--></td></tr> "; nomsezliv=nomsezliv+","+lsk[i].attributes[0].value; } 
str=str+"</table> <div id='modinv'></div>"; } 
document.getElementById("modextern7").innerHTML=str; return; }
*/
/*alert(liv>0&&liv!=livp); alert(numsezlivfin>0); alert(str);*/
for(i=0;i<azlistkey.length;i++){  sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); /*alert("sez="+sez);*/
var frmph="([,]{1}[a-zA-Z0-9_\/\\!\|:]{1,50})+",frmph1="([,]{1}[a-zA-Z]{1}[a-zA-Z0-9_-]{1,20})+"; /* alert(liv);*/ /*azlistkey=nvarxml.getElementsByTagName(dtstrut[liv]);*/
atbiniz=azdatiregv[4]+azdatiregv[6];/*+azdatiregv[7]*/ atbinv=","+azdtinvisib;atbcalc=","+azdtcalcolati; /*alert(atbiniz);*/
if(liv>0&&liv!=livp){ for(j=0;j<azlistkey.length;j++){/*alert(nsz+"\n"+azlistkey[j].attributes[0].value);*/{if(azlistkey[j].attributes[0].value==nsz){ break;}} } /*alert(j+"\n"+dtstrut[livp]);*/ azlistkey=azlistkey[j].getElementsByTagName(dtstrutar[livp]); livsel="nella sezione <b>"+nsz+"</b> di livello <b>"+dtstrutar[liv-1]+"</b> "; }
str=str+"<tr><td>Costruisci la lista dei <b>nomi delle sezioni</b> di livello <b>"+dtstrut[liv]+"</b> da inserire "+livsel+"nel registro <b>"+nomreg+"</b> selezionando tali nomi dal registro di <b>magazzino</b> del settore.</br>Si tenga presente che attualmente tale livello contiene n.<b>"+azlistkey.length+" chiavi</b>";
if(azlistkey.length>0){str=str+" sezioni con denominazione <b>"+dtnamesezstrutar[liv]+"</b> che sono: <b>";} 
/* if(liv>0&&liv==livp){ azlistkey=nvarxml.getElementsByTagName(dtstrut[liv-1]);  for(j=0;j<azlistkey.length;j++){if(azlistkey[j].attributes[0].value==nsz){break;} }  
azlistkey=azlistkey[j].getElementsByTagName(dtstrut[livp]);*/ 

if(azlistkey.length>0){ for(i=0;i<azlistkey.length;i++){  sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); 
for(i=0;i<azlistkey.length;i++){str=str+"* "+sez[i]+" "; nomsezliv=nomsezliv+","+azlistkey[i].attributes[0].value; }}
if(azlistkey.length==0&&elstrutnew=="keyrif"){
if(nomreg=="operativo.xml"){ var sezprec=document.getElementById("sellivop").value; krif="rif_"+sezprec; krif=","+krif; if(sez.indexOf(krif)>-1){var krif="";} }else{var krif="";}if(nomreg=="fornitori.xml"){var krif=",tecnologie,strumentazioni,cancelleria,arredi";}
/*alert(krif);*/}
if(elstrutnew=="key"&&nomreg=="magazzino.xml"){frmph="([,]{1}[a-zA-Z0-9 _]{3,20}([!]{1}([a-zA-Z0-9 _]{2,20})){0,2})+"; }
if(elstrutnew=="key"&&nomreg=="capitolato.xml"){frmph="([,]{1}[a-zA-Z0-9 _]{3,20}([!]{1}([a-zA-Z0-9 _]{2,20})){0,2})+"; }
/*
str=str+"</b></br>La lista deve avere la forma <mark><b>"+krif+"</b>,nomesez1,nomesez2,..,nomesezfin</mark><input type='text' value='"+krif+"' id='kkrif' style='display:none;' />"; 
*/
str=str+"<input type='text' value='"+krif+"' id='kkrif' style='display:none;' />"; 
str=str+"<center> <input type='text' id='lsnewsez' value='"+krif+"' pattern='"+frmph+"' placeholder='lista di nomi preceduti dalla ,' title='"+frmph+"' onblur='centroctrldata(this,\"text\")' style='width:80%;' /> </center></td></tr>"; 

frmph="([,]{1}[a-zA-Z0-9! ]{1,50})+";/*alert(ckxml+"\n\n"+http_request3.responseText);*/
str="<table><tr><th colspan=3>MAGAZZINO</th></tr><tr><th>reparto</th><th>tipologia</th><th>elemento</th></tr><tr><th><select id='selrep' onchange='caricamagazzino(\"selrif\",this.value)'><option value='' selected></option></select></th><th><select id='selrif' onchange='caricamagazzino(\"selkey\",this.value)'><option value='' selected></option></select></th><th><select id='selkey' onchange='document.getElementById(\"lsnewsez\").value=document.getElementById(\"lsnewsez\").value+\",\"+this.value; document.getElementById(\"lsnewsez\").focus(); this.value=\"\";'><option value='' selected></option></select></th></tr><tr><td colspan=3>per <b>reparto</b> e per <b>tipologia di elementi</b> costruisci la lista degli elementi richiesti nell'area <b>"+document.getElementById("selliv_1").value+"</b>: <input type='text' id='lsnewsez' value='' style='width:90%' pattern='"+frmph+"' onchange='centroctrldata(this,\"text\");' onblur='centroctrldata(this,\"text\");' title='la lista deve essere costituta da 1 o piu&#180; elementi ,ingrediente_dosaggio' /></td></tr><tr><th colspan=3 style='text-align:left'> * <u>Selezionando un elemento</u> questo, nel formato <mark>,elemento_</mark> , viene aggiunto nella lista e ad esso deve essere indicato il quantitativo complessivo richiesto in <mark>quell'area del settore</mark>.</br> * quando la lista è completa la si deve inviare.</th></tr><tr><td style='text-align:center;' colspan=3> <button onclick='azinviamodglobalstrut(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezlivfin+"\",\""+nomsezliv+"\",\"\",this,\""+atbiniz+"\")'  >registra</button></td></tr></table>"; 

/*str=str+" </table> <center><button onclick='azinviamodglobalstrut(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezlivfin+"\",\""+nomsezliv+"\",\"\",this,\""+atbiniz+"\")'  >registra</button> </br><input type='text' readonly id='numsezlivtot' value='"+aznumsezliv+"' style='display:none;' /> </center><div id='modinv'></div>";*/

var lskeyrep=nvarxml3.getElementsByTagName("keyrep"); 
document.getElementById("modextern7").innerHTML=str;document.getElementById("modextern7").style.display="block";
for(i=0;i<lskeyrep.length;i++){ op=document.createElement('OPTION');op.value=op.text=lskeyrep[i].attributes[0].value; document.getElementById("selrep").add(op); }

/*
if(liv*1==(dtstrut.length-2)&&dtstrut[liv]!="key"){ info="N.B.: Le sezioni del livello <b>keyrif</b> devono contenere gli attributi che caratterizzano i componenti specifici del livello <b>key</b>. </br>La lista di questi attributi e' comune a tutte le sezioni <b>keyrif</b> elencate sopra.</br>Sezioni keyrif che devono contenere chiavi con attributi differenti devono essere caricate singolarmente. </br>In ogni caso, la lista degli attributi delle keyrif deve iniziare con la lista degli attributi indicati come identificativi delle chiavi.";
if(numsezlivfin>0){ var lsatb=azlistkey[0].attributes; for(i=0;i<lsatb.length;i++){atb=lsatb[i].nodeName; if(atb.indexOf("rif")==0){listatb=listatb+lsatb[i].value+","; } }str=str+"<tr><td>la lista degli attributi e' la stessa delle sezioni keyrif dello stesso livello e vale:<br/><center><input type='text' id='atbkey' value='"+listatb+"' onchange='centroctrldata(this.value,)' style='width:80%;' ></center></td></tr>";}
if(numsezlivfin==0){ str=str+"<tr><td>Costruisci nel formato <mark>,attrib1,attrib2,..,attribn</mark> la lista di attributi da associare a tutte le sezioni keyrif sopra elencate.</br>N.B. la lista degli attributi deve iniziare, come predisposto, dai nomi degli attributi <mrk><b>identificativi</b> delle chiavi e dei campi <b>invisibili</b> dichiarati nella chiave di accesso di questo registro</mark>. Inoltre a tale lista possono essere aggiunti uno o piu' dei campi calcolati anch'essi dichiarati:</br><mark>"+azdtcalcolati+"</mark></br>Ulteriori nomi di attributi da aggiungere possono essere selezionati dalla select:<center><select multiple onchange=' document.getElementById(\"atbkey\").value=document.getElementById(\"atbkey\").value+\",\"+this.value' ><option selected value=''></option>"; 
if(nomreg=="capitolato.xml"||nomreg=="gestione_tavoli.xml"||nomreg=="fornitori.xml"){atbiniz=lsnomatbpred;} 
for(i=0;i<datiformtip.length;i++){str=str+"<option value='"+datiformtip[i]+"'>"+datiformtip[i]+"</option>"; }
str=str+"</select> </center><input type='text' id='atbkey' value='"+atbiniz+"' pattern='"+frmph1+"' placeholder='lista dei nomi degli attributi del livello key seguiti dal carattere ,' title='"+frmph1+"' onchange='centroctrldata(this,\"text\")' style='width:80%;' ></td></tr>";}
if(nomreg=="gestione_tavoli.xml"){str=str+"<tr><th>N.B. dopo avere registrato le sezioni relative alle suddette sale, per le ordinazioni da casa occorre riavviare il percorso ed aggiungere la sala <mark>casa</mark> con la lista di attributi: <mark>,tavolo,acquirente,ordinazione,conferma,consegna,costo,punti,saldata</mark></th></tr>"; }
frmph="[A-Za-z0-9_\-]{3,20}";  
str=str+"<tr style='display:none;'><td>il nome col quale le sezioni di livello <b>"+dtstrut[liv]+"</b> devono essere individuate all'interno del registro e': <input type='text' id='nomnewsez' value='"+dtnamesezstrutar[liv]+"' readonly pattern='"+frmph+"' placeholder='nome identificativo delle sezioni (da 3 a 20 caratteri alfanumerici _-)' title='"+frmph+"' onblur='centroctrldata(this,\"text\")' /></td></tr>"; }  
var ms="";
if(azmonit=="fisso"){ms=istfooter.innerHTML; } else{ms=document.getElementById("contactmob").innerHTML; }
if(ms.indexOf("Il livello piramidale di ordine")>-1){info=ms+"</br>"+info; }
mostraer(info); if(nomreg=="capitolato.xml"&&liv==0&&atbiniz==""){atbiniz=lsnomatbpred;}
str=str+" </table> <center><button onclick='azinviamodglobalstrut(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezlivfin+"\",\""+nomsezliv+"\",\"\",this,\""+atbiniz+"\")'  >registra</button> </br><input type='text' readonly id='numsezlivtot' value='"+aznumsezliv+"' style='display:none;' /> </center><div id='modinv'></div>";
if(rifdiv==null||rifdiv==""){ document.getElementById("modextern3").innerHTML=str; }else{ document.getElementById(rifdiv).innerHTML=str; }
*/
}

function ordinasezioni(sezin){percorso=percorso+"ordinasezioni; "; var p1=0,sez=new Array(),sez2=new Array(),sez3=new Array();  /*alert("ordinasezioni\n"+sezin);*/
/*if(sezin!=null&&sezin!=""){sez=sezin.split(",");}*/
/*alert(sezin);*/var numin="**",numfin="**"; 
if(sezin!=""){sez=sezin; /*alert(sez);*/p1=sez[0].indexOf("_"); if(p1>-1){numin=sez[0].slice(0,p1)*1; numfin=sez[0].slice(p1+1)*1; }} 
 /*alert(p1+"\n"+numin*1+"\n"+isNaN(numin*1)+"\n"+(isNaN(numin*1)));*/
if(isNaN(numin*1)){/*il valore di numin non è numerico*//*alert("il valore di numin non è numerico");*/ 
if(isNaN(numfin*1)){/*pure numfin non è numerico*/ /*alert("pure numfin non è numerico");*/ sez3=sez.sort(); sez=sez3; return(sez);} 
/*numfin è numerico*//*alert("numfin è numerico");*/ for(i=0;i<sez.length;i++){p1=sez[i].indexOf("_");sez2[i]=sez[i].slice(p1+1); } /*alert(sez+"\n"+sez2);*/
sez2=sez2.sort(function(a, b){return a-b});/*alert(sez2);*/ var conf="";
for(i=0;i<sez2.length;i++){for(j=0;j<sez.length;j++){conf="_"+sez2[i];p1=sez[j].indexOf("_");/*alert(conf+"\n"+sez[j].slice(p1)+"\n"+sez[j]);*/ 
if((p1>-1&&conf==sez[j].slice(p1))||(p1==-1&&sez2[i]==sez[j])){ sez3[i]=sez[j];/*.slice(p1)+conf;*/ break;}  } } sez=sez3;
/*alert(sez.length+"\n"+sez2.length);if(sez.length>sez2.length){for(i=0;i<sez.length;i++){p1=sez[i].indexOf("_"); if(p1==-1){ sez3[i]=sez[j]; break; } } }*/ 
return(sez);
}
else{/*il valore di numin è numerico*/ for(i=0;i<sez.length;i++){p1=sez[i].indexOf("_");sez2[i]=sez[i].slice(0,p1); } /*alert(sez2);*/
sez2=sez2.sort(function(a, b){return a-b});/*alert(sez2);*/ var conf="";
for(i=0;i<sez2.length;i++){for(j=0;j<sez.length;j++){conf=sez2[i]+"_"; if(conf==sez[j].slice(0,conf.length)){p1=sez[j].indexOf("_"); sez3[i]=sez[j]; break;} } }sez=sez3;
} return(sez);
}

function eliminakeyregsist_0(operaz,nomreg,hk,liv,elstrutnew,numsezlivfin,nomsezliv,sez,obj){percorso=percorso+"eliminakeyregsist_0; "; /*alert("wsfeliminainfo\n"+n+"\n"+delcart+"\n"+azindreg+"\n"+dtefstr);*/ 
/*alert("eliminakeyregsist_0\noperaz="+operaz+"\nnomreg="+nomreg+"\nhk="+hk+"\nliv="+liv+"\nelstrutnew="+elstrutnew+"\nnumsezlivfin="+numsezlivfin+"\nnomsezliv="+nomsezliv+"\nsez="+sez+"\nobj="+obj); alert("eliminakeyregsist_0: azsezsel="+azsezsel);*/
var sezselar=new Array(); /*azsezsel=azsezsel.slice(1);*/ sezselar=azsezsel.slice(1).split(","); var dtstrutar=new Array(); dtstrutar=azdtstrut.split(","); 
/*alert("sezselar.length="+sezselar.length);*/
var dtnomesezlivar=new Array(); dtnomesezlivar=azdtnomesezliv.split(","); /*alert("dtstrutar="+dtstrutar+"\ndtnomesezlivar="+dtnomesezlivar+"\nsezselar="+sezselar);*/
var rifksel="",i=0; 
if(sezselar.length>1){ for(i=0;i<sezselar.length;i++){rifksel=rifksel+","+dtstrutar[i]+" "+dtnomesezlivar[i]+"='"+sezselar[i]+"' "; }rifksel=rifksel+","+elstrutnew+" "+dtnomesezlivar[i]+"='"+sez+"' ";} 
else{rifksel=rifksel+","+dtstrutar[0]+" "+dtnomesezlivar[0]+"='"+sezselar[0]+"' "; rifksel=rifksel+","+elstrutnew+" "+dtnomesezlivar[1]+"='"+sez+"' ";} /*alert(2+"-"+rifksel);*/ 
var rifkselstop=""; if(elstrutnew!="key"){rifkselstop="/"+elstrutnew+">";  } 
/*alert("rifksel="+rifksel+"\nrifkselstop="+rifkselstop);*/
/*for(i=0;i<sezselar.length;i++){rifksel=rifksel+","+azdtstrut[i]+" "+azdtnomesezliv[i]+"='"+sezselar[i]+"' "; alert(sezselar+"\n"+azdtstrut+"\n"+azdtnomesezliv); } */
var indregdoc=""; if("nomreg==capitolato.xml"&&elstrutnew=="key"){indregdoc=wsprcreg+"/"+sezselar[0]+"/"+sezselar[1]+"/"+sez; }
var indreg=wsprcreg+"/"+nomreg; hk=hk.replace(/'/g,"&#39;"); /*alert(hk);*/rifksel=rifksel.replace(/'/g,"&#39;");
var msg="<center><button onclick='chiudimodshort()'>[X]</button></center><table style='table-layout:auto;font-size:"+azfont2+"px'><tr><th colspan=2>Sei proprio sicuro di dovere </br><mark>eliminare la sezione <b>"+sez+"</b></mark> </br>dal percorso<mark>"+rifksel+"</mark></br>del registro <mark><b>"+nomreg+"</b></br>con tutto ciò che contiene</mark> ? </th></tr><tr><td style='text-align:center'> <button onclick='eliminakeyregsist(\""+operaz+"\",\""+nomreg+"\",\""+hk+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezlivfin+"\",\""+nomsezliv+"\",\""+sez+"\",\""+obj+"\",\""+rifksel+"\",\""+rifkselstop+"\",\""+indregdoc+"\"); chiudimodshort()'>SI</button> </td> <td style='text-align:center'><button onclick='chiudimodshort()'>NO</button></td> </tr></table>"; /*alert(msg);*/
 istmds.style.textAlign="initial";
istmds.innerHTML=msg; istmds.style.display="block"; istmds.style.zIndex=150; /*return; */
}

function eliminakeyregsist(operaz,nomreg,hk,liv,elstrutnew,numsezlivfin,nomsezliv,sez,obj,rifksel,rifkselstop,indregdoc){percorso=percorso+"eliminakeyregsist; "; 
/*var sezselar=new Array(); sezselar=azsezsel.split(","); 
var dtnomesezlivar=new Array(); dtnomesezlivar=azdtnomesezliv.split(",");
var rifksel="",i=0; for(i=0;i<sezselar.length;i++){rifksel=rifksel+","+dtstrutar[i]+" "+dtnomesezlivar[i]+"='"+sezselar[i]+"' "; } 
rifksel=rifksel+","+elstrutnew+" "+dtnomesezlivar[i]+"='"+sez+"' ";*/var dtstrutar=new Array(); dtstrutar=azdtstrut.split(",");
/*alert(rifksel); */
/*if(nomreg!="capitolato"&&nomreg!="productiveActivities"){eliminakeyreg(operaz,nomreg,hk,liv,elstrutnew,numsezlivfin,nomsezliv,sez,obj); return; }*/
document.getElementById("but_"+obj).textContent="eliminato";
hk=hk.replace(/&#39;/g,"'"); hk="<"+hk; var indreg=wsprcreg+"/"+nomreg,rep=tip=elpdf=elimg=""; var nomliv=dtstrutar[liv]; 
/*alert("eliminakeyregsist\noperaz="+operaz+"\nnomreg="+nomreg+"\nhk="+hk+"\nliv="+liv+"\nelstrutnew="+elstrutnew+"\nnumsezlivfin="+numsezlivfin+"\nnomsezliv="+nomsezliv+"\nsez="+sez+"\nobj="+obj+"\nrifksel="+rifksel+"\nrifkselstop="+rifkselstop);   alert(nomliv+"\n"+(nomliv=="key"));return; */
if(nomreg!="capitolato.xml"&&nomreg!="productivActivities.xml"){var rifasp="https://www.servizinterattivi.it/ptdmsg/gestserver1/eliminakey.asp?rifreg="+indreg+"&rifkey="+hk+"&rifksel="+rifksel+"&rifkselstop="+rifkselstop; window.open(rifasp,"popup"); return;}
else{if(nomliv=="key"){ rep=document.getElementById("selliv_0").value; tip=document.getElementById("selliv_1").value; elpdf=sez+".pdf";
/*elpdf=sez.slice(1)+".pdf"; elimg=sez.slice(1);*/ /*elimg=elimg.replace(/\s/g,"_");*/ elimg=sez+".jpg"; var indcartpdf=wsprcreg+"/"+rep+"/"+tip+"/"+elpdf; var indcartimg=wsprcreg+"/"+rep+"/"+tip+"/"+elimg; /*alert(indreg+"\n"+indcartpdf+"\n"+indcartimg); return;*/ 
var rifasp="https://www.servizinterattivi.it/ptdmsg/gestserver1/eliminakey.asp?rifreg="+indreg+"&rifkey="+hk+"&elpdf="+indcartpdf+"&elimg="+indcartimg+"&rifksel="+rifksel+"&rifkselstop="+rifkselstop+"&indregdoc="+indregdoc;}
if(nomliv!="key"){
rep=document.getElementById("selliv_0").value; elpdf=sez+".pdf";  /*elimg=elimg.replace(/\s/g,"_");*/ elimg=sez+".jpg"; var indcartpdf=wsprcreg+"/"+rep+"/"+elpdf; var indcartimg=wsprcreg+"/"+rep+"/"+elimg; /*alert(indreg+"\n"+indcartpdf+"\n"+indcartimg); return;*/ 
var rifasp="https://www.servizinterattivi.it/ptdmsg/gestserver1/eliminakey.asp?rifreg="+indreg+"&rifkey="+hk+"&elpdf="+indcartpdf+"&elimg="+indcartimg+"&rifksel="+rifksel+"&rifkselstop="+rifkselstop+"&indregdoc="+indregdoc;}} /*alert(rifasp); */
window.open(rifasp,"popup");  /*alert(tmpnew==undefined);
if(tmpnew!==undefined&&tmpmax!==undefined){
msg="Tempo di collegamento attuale="+tmpnew+" secondi che, in ore:min:sec=<b>"+ore+":"+min+":"+sec+"</b>. Tale tempo e' maggiore di quello concesso di <b>"+tmpmax+"</b> pertanto le credenziali vengono eliminate"; mostraer(msg);}*/
istdoc.innerHTML="";
}

/*
function eliminakeyreg(operaz,nomreg,hk,liv,elstrutnew,numsezlivfin,nomsezliv,sez,obj){percorso=percorso+"eliminakeyreg"; obj.textContent="eliminato";
hk=hk.replace(/&#39;/g,"'"); var indreg=wsprcreg+"/"+nomreg,rep=tip=elpdf=elimg=""; 
rep=document.getElementById("selliv_0").value; 
alert("eliminakeyregsist\noperaz="+operaz+"\nnomreg="+nomreg+"\nhk="+hk+"\nliv="+liv+"\nelstrutnew="+elstrutnew+"\nnumsezlivfin="+numsezlivfin+"\nnomsezliv="+nomsezliv+"\nsez="+sez+"\nwsprdreg="+wsprcreg+"\nindreg="+indreg); return;
var rifasp="https://www.servizinterattivi.it/ptdmsg/gestserver1/eliminakey.asp?rifreg="+indreg+"&rifkey="+hk; window.open(rifasp,"popup"); 
msg="Tempo di collegamento attuale="+tmpnew+" secondi che, in ore:min:sec=<b>"+ore+":"+min+":"+sec+"</b>. Tale tempo e' maggiore di quello concesso di <b>"+tmpmax+"</b> pertanto le credenziali vengono eliminate"; mostraer(msg);
}
*/

function azinviamodglobalstrut(operaz,nomreg,liv,elstrutnew,numsezliv,nomsezliv,nomsez,obj,prov){percorso=percorso+"azinviamodglobalstrut; ";   liv=liv*1; 
/*alert("azinviamodglobalstrut\noperaz="+operaz+"\nnomreg="+nomreg+"\nwsprcreg="+wsprcreg+"\nliv="+liv+"\nelstrutnew="+elstrutnew+"\nnumsezliv="+numsezliv+"\nnomsezliv="+nomsezliv+"\nnomsez="+nomsez+"\nobj.value="+obj.value+"\nprov="+prov+"\natbiniz="+prov); return;*/ 
var nsezrif=tipelem=""; 
if(document.getElementById("selliv_0")==null){nsezrif=document.getElementById("sellivop").value; }else{ nsezrif=document.getElementById("selliv_0").value; }
if(nomreg.indexOf("capitolato")>-1&&(wsprcreg.indexOf("produzion")==-1&&(nsezrif!="zoneFunzionali"&&nsezrif!=""&&document.getElementById("selrif")!=null))){tipelem=document.getElementById("selrif").value;
/*alert(tipelem); return;*/}

var nsar=new Array(),i=0,esci=0; var ns=document.getElementById("lsnewsez").value; 
if(ns==""){msg="** ATTENZIONE ** non è stata inserita la lista delle sezioni del livello indicato"; mostraer(msg); return; }
if(document.getElementById("lsnewsez").style.color!="rgb(0, 0, 0)"){msg="<b> * ATTENZIONE * </b>la lista richiesta NON e' formalmente corretta"; mostraer(msg); return;}
var n=ns.match(/,/g).length; /*alert(n); return;*/
if(n>1){nsar=ns.slice(1).split(","); }else{nsar[0]=ns.slice(1);}
for(i=0;i<nsar.length;i++){if(nomsezliv.indexOf(nsar[i])>-1){msg="** ATTENZIONE ** il valore <b>"+nsar[i]+"</b> è già presente nella lista delle sezioni del livello indicato"; mostraer(msg); esci=1; break; } } if(esci==1){return; }

var azione=modinv=atbiniz="",fatto=0; if(prov!=null){ if(prov.indexOf(",")>-1){ atbiniz=prov;atbiniz=atbiniz.slice(1); }}
var nnreg=""; p1=nomreg.indexOf("/"); if(p1>-1){nnreg=nomreg.slice(p1+1);}else{nnreg=nomreg;} 
if(nomreg=="capitolato.xml"&&liv==0){atbiniz=atbiniz.replace(",caricato",",interact,costo,caricato");}
if(nomreg=="capitolato.xml"){prov="wsfcostruiscicapitolato1"; modinv="modinv"; }
if(obj.textContent=="elimina"){obj.textContent="eliminata"; obj.disabled=true;}
if(obj.textContent=="elimina tutte"){obj.textContent="eliminate";obj.disabled=true;}
/*alert("azinviamodglobalstrut\noperaz="+operaz+"\nnomreg="+nomreg+"\nliv="+liv+"\nelstrutnew="+elstrutnew+"\nnumsezliv="+numsezliv+"\nnomsezliv="+nomsezliv+"\nprov="+prov+"\nnomsez="+nomsez+"\nazlivdamod="+azlivdamod+"\nwsprcreg="+wsprcreg+"\nazsezlivsel="+azsezlivsel+"\nazdtstrut="+azdtstrut+"\nazdtnomesezliv="+azdtnomesezliv); */
/*return;*/
/*alert(http_request.responseText); return; */ 
var dtstrutar=new Array(); dtstrutar=azdtstrut.split(","); var selliv_ar=new Array(); var indp=0;
var i=j=trv=nrec=ind=indk=numsezlivfin=0,op=confkey=indreg=valrec=strf=msg=tipm1="",atbkeyar=new Array(); var calcolatiar=new Array(); calcolatiar=azdtcalcolati.split(",");
azknar=azdtnomesezliv.split(","); 

if(prov=="wsfcostruiscicapitolato1"&&operaz!="elistrut"&&document.getElementById("lsnewsez")!=null){var lsnewsez=document.getElementById("lsnewsez").value; var sezar=new Array(); sezar=lsnewsez.split(","); azlivop=liv; /*modinv="modextern2";*/modinv="modinv"; numsezlivfin=numsezliv*1;var lscol=document.getElementById("lsnewsez").style.color;
if(lscol=="rgb(238, 0, 0)"){ msg="** ATTENZIONE ** la lista dei nuovi elementi di struttura da inserire a livello <b>"+dtstrutar[liv]+"</b> nel registro <b>"+nomreg+"</b> non e' formalmente corretta"; mostraer(msg); return;}} /*else{modinv="modinv";}*/

if(prov=="wsfcostruiscicapitolato1"&&operaz!="elistrut"&&document.getElementById("lsnewsez")==null){var sezar=new Array(); lsnewsez=nomsez; sezar=nomsez.split(","); azlivop=liv;modinv="modextern2";/*modinv="modinv";*/ numsezlivfin=numsezliv*1;} /*else{modinv="modinv";}*/
if(prov!="wsfcostruiscicapitolato1"){
if(operaz=="elistrut"){var lsnewsez=nomsez; modinv="modinv";}
else{var lsnewsez=document.getElementById("lsnewsez").value; var sezar=new Array(); sezar=lsnewsez.split(","); var lscol=document.getElementById("lsnewsez").style.color;
if(lscol=="rgb(238, 0, 0)"){ msg="** ATTENZIONE ** la lista dei nuovi elementi di struttura da inserire a livello <b>"+dtstrutar[liv]+"</b> nel registro <b>"+nomreg+"</b> non e' formalmente corretta"; mostraer(msg); return;}
if(nomreg=="operativo.xml"&&document.getElementById("kkrif").value!=""){ var sezprec=document.getElementById("selliv_0").value; var krif="rif_"+sezprec; if(lsnewsez.indexOf(krif)==-1){msg="** ATTENZIONE ** la lista delle sezioni deve contenere anche l'elemento <b>"+krif+"</b> "; mostraer(msg); return;} }
}}
/*alert(elstrutnew+"\n"+(elstrutnew=="keyrif"&&operaz!="elistrut"));*/
if(elstrutnew=="keyrif"&&operaz!="elistrut"){var atbkey=document.getElementById("atbkey").value.slice(1); atbkeyar=atbkey.split(","); /*alert(azdtcalcolati+"\n"+atbkeyar);*/
if(atbkey==""){msg="** ATTENZIONE ** non e' stata dichiarata la lista degli attributi comuni a tutte le nuove sezioni da inserire a livello <b>"+dtstrutar[liv]+"</b> nel registro <b>"+nomreg+"</b> "; mostraer(msg); return;} /*alert(atbkey+"\n"+atbiniz+"\n"+(atbiniz!=""&&atbkey.indexOf(atbiniz)==-1));*/
/*if(atbiniz!=""&&atbkey.indexOf(atbiniz)==-1)*/
if(atbkey.indexOf(atbiniz)==-1&&atbiniz.indexOf(atbkeyar[0])==-1){msg="** ATTENZIONE ** la lista degli attributi comuni a tutte le nuove sezioni da inserire a livello <b>"+dtstrutar[liv]+"</b> nel registro <b>"+nomreg+"</b> non contiene almeno uno degli attributi inizialmente predisposti e necessari"; mostraer(msg); return;}
for(i=0;i<atbkeyar.length;i++){ if(calcolatiar.indexOf(atbkeyar[i])==-1){ trv=0; for(j=0;j<datiformtip.length;j++){if(atbkeyar[i]==datiformtip[j]){trv=1;}if(trv==1){break;} } 
if(trv==0){msg="** ATTENZIONE ** non e' possibile procedere in quanto la lista degli attributi contiene il valore <b>"+atbkeyar[i]+"</b> che non e' presente nella banca dati del sistema."; mostraer(msg); return;}}}
}
if(lsnewsez==""){msg="** ATTENZIONE ** non e' stata dichiarata la lista delle nuove sezioni da inserire a livello <b>"+dtstrutar[liv]+"</b> nel registro <b>"+nomreg+"</b> "; 
mostraer(msg); return;}
var dtnamesezstrutar=new Array(); dtnamesezstrutar=azdtnomesezliv.split(","); /*var lsk=nvarxml.getElementsByTagName(dtstrutar[liv]); */ /*alert(sezar+"\n"+dtstrutar[liv]+"\n"+lsk.length);*//*alert(dtstrutar[liv]+"\n"+lsk.length);*/
/*alert("dtstrutar[0]="+dtstrutar[0]+"\nlsk.length="+lsk.length+"\nazsezlivsel[0]="+azsezlivsel[0]);*/
if(liv==0){var lsk=nvarxml.getElementsByTagName(dtstrutar[0]); var lsk0=lsk; } 
/*if(liv>0){for(j=0;j<lsk.length;j++){if(lsk[j].attributes[0].value==azsezlivsel[0]){var lsk0=lsk[j]; indk=j;break;} }}*/

if(liv>0){var sezlivar=new Array(),sezlivtotar=new Array(),ni=0;sezlivtotar=azsezlivsel; for(n=0;n<sezlivtotar.length;n++){if(sezlivtotar[n]!=""){sezlivar[ni]=sezlivtotar[n];ni++;}}
/*alert("sezlivtotar="+sezlivtotar+"\nsezlivar="+sezlivar);*/
for(n=0;n<sezlivar.length;n++){/*alert(n);*/ if(n==0){var lsk0=nvarxml.getElementsByTagName(dtstrutar[n]); }else{var lsk=lsk0[0].getElementsByTagName(dtstrutar[n]); lsk0=lsk; } }
/*alert(lsk0.length);*/
/*var lsk=nvarxml.getElementsByTagName(elstrutnew); var lsk0=lsk; */ var lsk=lsk0;
} 

if(lsk.length>0&&operaz!="elistrut"){trv=0; 
for(i=1;i<sezar.length;i++){for(j=0;j<lsk.length;j++){oldsez=lsk[j].attributes[0].value; /*alert(sezar[i]+"-"+oldsez);*/ if(sezar[i]==oldsez){trv=1; ind=i;break;} } 
if(trv==1){break;} } /*alert(trv+"\n"+ind+"\n"+sezar[ind]); alert(trv);*/
if(trv==1){msg="** ATTENZIONE ** in <b>"+nomreg+"</b> e' gia' presente una sezione di livello <b>"+dtstrutar[liv]+"</b> denominata <b>"+sezar[ind]+"</b>"; 
document.getElementById("lsnewsez").style.color="rgb(238,0,0)"; mostraer(msg); return;}}
var numsezlivfin=aznumsezliv[liv]*1; /*, numsezlivtot=aznumsezliv,lsnewsez=""*/
/*obj.disabled=true; obj.textContent="registrato";*/
gestione=operaz; 
indreg=wsprcreg+"/"+nomreg; var strf="<center> <div style='display:block'><form id='frmnewrap' target='popup' > "; 
var oper=cred1+"-"+cred2; var operaz2="inserisci";
var sectab=document.getElementById("sectab").value; var sect=document.getElementById("sect").value; 
if(operaz=="elistrut"){ azione="elimina sezioni dal registro "+nomreg+" in "+sect; }
if(operaz=="modstrut"){ azione="inserisce sezioni nel registro "+nomreg+" in "+sect; }
var regdamod2=wsprcreg+"/"+"regactivity.xml"; var keyrif2="keyrif rif0='";
var newkey2="key data='"+azoggi+"' operatore='"+oper+"' settore='"+sectab+"' azione='"+azione+"' riferimenti='"+nomreg+"' />"; var keyrif2="keyrif rif0='";
newkey2=newkey2.replace(/'/g,"&#39;"); 
/*alert("liv="+liv+"\nnumsezlivfin="+numsezlivfin+"\ndtstrutar.length="+dtstrutar.length);*/
/*alert(sezar);*/
if(liv==0&&numsezlivfin>0&&dtstrutar.length==2){tipm1="inserimento di nuove sezioni nel livello "+dtstrutar[liv]; op="caricamento di n."+(sezar.length-1)+" sezioni: "+lsnewsez; 
confkey=nnreg; nomsezliv=azknar[liv]; /* alert("-"+1);*/
for(i=1;i<sezar.length;i++){ valrec=dtstrutar[liv]+" "+dtnamesezstrutar[liv]+"=&#39;"+sezar[i]+"&#39; ";
/*atbkey=document.getElementById("atbkey").value;atbkey=atbkey.slice(0,(atbkey.length-1));atbkeyar=atbkey.split(",");azatbkeyrif=atbkeyar;*/
for(j=0;j<atbkeyar.length;j++){valrec=valrec+"rif"+j+"=&#39;"+atbkeyar[j]+"&#39; "; } valrec=valrec+">";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
valrec="/"+dtstrutar[liv]+">";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
} }
if(liv==0&&numsezlivfin==0&&dtstrutar.length==2&&operaz!="elistrut"){tipm1="definizione di livello e inserimento di nuove sezioni";op="generazione del livello "+elstrutnew+" e caricamento di n."+(sezar.length-1)+" sezioni: "+lsnewsez; fatto=1;
confkey=nnreg; nomsezliv=azknar[liv];  /* alert("-"+2);*/
for(i=1;i<sezar.length;i++){ valrec=dtstrutar[liv]+" "+dtnamesezstrutar[liv]+"=&#39;"+sezar[i]+"&#39; ";
/*atbkey=document.getElementById("atbkey").value;atbkey=atbkey.slice(0,(atbkey.length-1));atbkeyar=atbkey.split(",");azatbkeyrif=atbkeyar;*/
for(j=0;j<atbkeyar.length;j++){valrec=valrec+"rif"+j+"=&#39;"+atbkeyar[j]+"&#39; "; } valrec=valrec+">";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
valrec="/"+dtstrutar[liv]+">";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
} }/*alert(88+"\n"+strf);*/
if(nomreg=="capitolato.xml"&&operaz=="modstrut"&&liv==0){numsezlivfin=1; }
/*if(prov=="wsfcostruiscicapitolato1"){ numsezlivfin=numsezliv*1; alert(nomsez+"\n"+sezar); alert(liv+"\n"+numsezlivfin+"\n"+dtstrutar.length+"\n"+prov);nomsez=lsnewsez=sezar; }*/ /*alert(numsezlivfin); alert(liv==0&&numsezlivfin>0&&dtstrutar.length>2);alert(prov);alert(nomreg);*/
if(liv==0&&numsezlivfin>0&&dtstrutar.length>2){tipm1="inserimento di nuove sezioni nel livello "+dtstrutar[liv]; op="caricamento di n."+(sezar.length-1)+" sezioni: "+lsnewsez; 
confkey=nnreg; nomsezliv=azknar[liv]; /* alert("-"+1);*/
for(i=1;i<sezar.length;i++){ valrec=dtstrutar[liv]+" "+dtnamesezstrutar[liv]+"=&#39;"+sezar[i]+"&#39; >";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
if(prov=="wsfcostruiscicapitolato1"){tipm1="definizione di livello e inserimento di nuove sezioni"; 
/*var attrif=new Array("elemento","titolo","competenze","specifiche","interact","costo","caricato"); */
var attrif=new Array(); attrif=atbiniz.split(",");
if(wsprcreg.indexOf("formazione")>-1){
if(nomreg=="capitolato.xml"&&operaz=="modstrut"&&liv==0){valrec=dtstrutar[liv+1]+" "+dtnamesezstrutar[liv+1]+"=&#39;rif_"+sezar[i]+"&#39; "; /*alert(valrec);*/ }
if(nomreg=="capitolato.xml"&&operaz=="modstrut"&&liv==1){valrec=dtstrutar[liv+1]+" "+dtnamesezstrutar[liv+1]+"=&#39;presentazione&#39; "; }
/*valrec=dtstrutar[liv+1]+" "+dtnamesezstrutar[liv+1]+"=&#39;rif_"+sezar[i]+"&#39; ";*/

for(k=0;k<attrif.length;k++){valrec=valrec+"rif"+k+"=&#39;"+attrif[k]+"&#39; "; } valrec=valrec+">"; /*alert(valrec);*/
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;

if(nomreg=="capitolato.xml"&&operaz=="modstrut"&&liv==0){valrec="key "+attrif[0]+"=&#39;presentazione&#39; "; for(k=1;k<attrif.length;k++){valrec=valrec+attrif[k]+"=&#39;&#39; "; } valrec=valrec+"/>";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;}
/*
valrec="key "; for(k=0;k<attrif.length;k++){valrec=valrec+attrif[k]+"=&#39;&#39; "; } valrec=valrec+"/>";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
*/
valrec="/"+dtstrutar[liv+1]+">";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
}
}
valrec="/"+dtstrutar[liv]+">";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
} }
if(liv==0&&numsezlivfin==0&&dtstrutar.length>2&&operaz!="elistrut"){tipm1="definizione di livello e inserimento di nuove sezioni";op="generazione del livello "+elstrutnew+" e caricamento di n."+(sezar.length-1)+" sezioni: "+lsnewsez; 
confkey=nnreg; nomsezliv=azknar[liv];  /* alert("-"+2);*/
for(i=1;i<sezar.length;i++){ valrec=dtstrutar[liv]+" "+dtnamesezstrutar[liv]+"=&#39;"+sezar[i]+"&#39; >";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
valrec="/"+dtstrutar[liv]+">";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
} } 
if(liv>0&&(numsezlivfin==0||numsezlivfin>0)&&elstrutnew!="key"&&operaz!="elistrut"){tipm1="definizione di livello e inserimento di nuove sezioni";op="generazione del livello "+elstrutnew+" e caricamento di n."+(sezar.length-1)+" sezioni: "+lsnewsez; /* alert("-"+3);*/ 
if(liv==0){ azdtnomesezliv=","+document.getElementById("tipm1_1").value;}
var confkeyar=new Array(); if(dtstrutar.length==4){confkeyar[0]=dtstrutar[liv-1]+" "+azknar[liv-1]+"=&#39;"+document.getElementById("selliv_"+(liv-1)).value+"&#39; "; }
/*confkey=dtstrutar[liv-1]+" "+azknar[liv-1]+"=&#39;"+document.getElementById("selliv_"+(liv-1)).value+"&#39; ";*/   nomsezliv=azknar[liv];  
/*for(i=1;i<sezar.length;i++){ valrec=dtstrutar[liv]+" "+azknar[liv]+"=&#39;"+sezar[i]+"&#39; ";*/
for(i=1;i<sezar.length;i++){ valrec=dtstrutar[liv]+" "+dtnamesezstrutar[liv]+"=&#39;"+sezar[i]+"&#39; ";
if(liv*1==(dtstrutar.length-2)){/*atbkey=document.getElementById("atbkey").value;atbkey=atbkey.slice(0,(atbkey.length-1));atbkeyar=atbkey.split(",");*/
/*alert(atbkeyar);atbkeyar=atbkeyar.sort();*/azatbkeyrif=atbkeyar;
for(j=0;j<atbkeyar.length;j++){valrec=valrec+"rif"+j+"=&#39;"+atbkeyar[j]+"&#39; "; }} valrec=valrec+">";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
/*
if(liv==1&&nomreg=="capitolato.xml"){var attrif=new Array("titolo","competenze","specifiche","caricato");
valrec=dtstrutar[liv+1]+" "+dtnamesezstrutar[liv+1]+"=&#39;rif_"+sezar[i]+"&#39; ";
for(k=0;k<attrif.length;k++){valrec=valrec+"rif"+k+"=&#39;"+attrif[k]+"&#39; "; } valrec=valrec+"/>";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
}
*/
if(liv==1&&nomreg=="capitolato.xml"&&wsprcreg.indexOf("formazione")>-1){ /*var attrif=new Array("titolo","competenze","specifiche","caricato");*/
var attrif=new Array(); attrif=atbiniz.split(",");
valrec=dtstrutar[liv+1]+" "+dtnamesezstrutar[liv+1]+"=&#39;presentazione&#39; ";
for(k=1;k<attrif.length-1;k++){valrec=valrec+attrif[k]+"=&#39;&#39; "; }valrec=valrec+attrif[k]+"=&#39;no&#39; "; valrec=valrec+"/>";
/*for(k=0;k<attrif.length-1;k++){valrec=valrec+attrif[k]+"=&#39;&#39; "; }valrec=valrec+attrif[k]+"=&#39;no&#39; "; valrec=valrec+"/>"; alert(valrec);*/
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
}

valrec="/"+dtstrutar[liv]+">";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
} }
var regiscr="",codiscrp1="",loc="",fatto=0,rifloc=new Array(),valatbkeyrif=new Array(); /*alert(liv>0&&(numsezlivfin==0||numsezlivfin>0)&&elstrutnew=="key"&&operaz!="elistrut");*/
if(liv==2&&nomreg=="capitolato.xml"&&wsprcreg.indexOf("formazione")>-1){ /*var attrif=new Array("titolo","competenze","specifiche","caricato");*/
/*ricavare sezar leggendo da nvarxml selliv_0 selliv_1 e listando i valori di rif0,rif1,... in esso verificare che la nuova chiave non sia già presente e  var confkeyar=new Array(); if(dtstrutar.length==4){confkeyar[0]=dtstrutar[liv-1]+" "+azknar[liv-1]+"=&#39;"+document.getElementById("selliv_"+(liv-1)).value+"&#39; "; }*/
var attrif=new Array(),indar=0;
for(i=0;i<dtstrutar.length-1;i++){selliv_ar[i]=document.getElementById("selliv_"+i).value; /*alert(selliv_ar[i]);*/ } /*alert(selliv_ar);*/
var lsk0=nvarxml.getElementsByTagName(dtstrutar[0]); 
for(i=0;i<lsk0.length;i++){var lsatb=lsk0[i].attributes; if(lsatb[0].value==selliv_ar[0]){var lsk1=lsk0[i].getElementsByTagName(dtstrutar[1]); break;} }
//for(j=2;j<selliv_ar.length;j++){for(i=1;lsk1.length;i++){lsatb=lsk1[i].attributes; if(lsatb[0].value==selliv_ar[1]){var lsk1=lsk1[i].getElementsByTagName(dtstrutar[j]);break;}}}
for(i=0;lsk1.length;i++){lsatb=lsk1[i].attributes; /*alert(lsatb[0].value+"-"+selliv_ar[1]); */
if(lsatb[0].value==selliv_ar[1]){for(j=2;j<lsatb.length;j++){attrif[indar]=lsatb[j].value; indar++; } break;}} /*alert(attrif);*/
tipm1="definizione di livello e inserimento di nuove sezioni"; /*alert(sezar);return;*/ 
for(i=1;i<sezar.length;i++){ valrec=dtstrutar[liv]+" "+dtnamesezstrutar[liv]+"=&#39;"+sezar[i]+"&#39; ";
valrec=dtstrutar[liv]+" "+dtnamesezstrutar[liv]+"=&#39;"+sezar[i]+"&#39; ";
for(k=0;k<attrif.length-1;k++){valrec=valrec+attrif[k]+"=&#39;&#39; "; }valrec=valrec+attrif[k]+"=&#39;no&#39; "; valrec=valrec+"/>"; /*alert(valrec);*/
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
} fatto=1;
}
/*alert("liv="+liv+"\nnumsezlivfin="+numsezlivfin+"\nelstrutnew="+elstrutnew+"\noperaz="+operaz+"\nfatto="+fatto);*/
/*alert(99+"\n"+strf);*//*if(liv>0&&nomreg!="capitolato.xml"&&(numsezlivfin==0||numsezlivfin>0)&&elstrutnew=="key"&&operaz!="elistrut")*/ /*alert(liv);*/
if(liv>0&&(numsezlivfin==0||numsezlivfin>0)&&elstrutnew=="key"&&operaz!="elistrut"&&fatto==0){tipm1="definizione di livello e inserimento di nuove sezioni";
op="generazione del livello "+elstrutnew+" e caricamento di n."+(sezar.length-1)+" sezioni: "+lsnewsez; /*alert(azatbkeyrif);   alert("-"+4);
lsattribkeyrif=nvarxml.getElementsByTagName(dtstrutar[liv-1]);  */ 
/*var lsk=nvarxml.*/ if(elstrutnew=="key"&&dtstrutar.length==2){msg="**  ATTENZIONE  ** per un registro a 2 livelli occorre inserire le sezioni di livello key utilizzando il percorso: <center><mark>Gestioni Aziendali > 1-Gestione Ordinaria dei Registri > 2-Inserimento dati</mark></center>"; mostraer(msg); return; }else{var lskm=nvarxml.getElementsByTagName(dtstrutar[liv-2]);}
var ind=0; nomsezmod=document.getElementById("selliv_"+(liv-2)).value; 
for(j=0;j<lskm.length;j++){ /*alert(lskm[j].attributes[0].value);*/ if(lskm[j].attributes[0].value==nomsezmod){ind=j; break;}} 
var lsk=lskm[j].getElementsByTagName(dtstrutar[liv-1]), ind=0, lsnewsezar=new Array(),valatb=""; nomsezliv=document.getElementById("selliv_"+(liv-1)).value; 
/*alert("nomsezliv="+nomsezliv);*/
/*alert(lsk.length);*/
for(j=0;j<lsk.length;j++){ /*alert(lsk[j].attributes[0].value);*/ if(lsk[j].attributes[0].value==nomsezliv){ break;}} var lsatb=lsk[j].attributes; /*alert(j+"\n"+dtstrutar[liv-1]+"\n"+lsatb.length);*/
azatbkeyrif=[]; for(i=1;i<lsatb.length;i++){azatbkeyrif[ind]=lsatb[i].value; ind++;} /*alert("azatbkeyrif="+azatbkeyrif+"\nsezar="+sezar);*/ lsnewsezar=lsnewsez.split(",");
/*for(i=0;i<azlistkey.length;i++){sez[i]=azlistkey[i].attributes[0].value; }*/
confkey=dtstrutar[liv-1]+" "+azknar[liv-1]+"=&#39;"+azkvar[liv-1]+"&#39; ";   nomsezliv=azknar[liv];  /*azatbkeyrif=atbkeyar; alert(azatbkeyrif);*/
/*for(i=1;i<sezar.length;i++){ valrec=dtstrutar[liv]+" "+azknar[liv]+"=&#39;"+sezar[i]+"&#39; "; alert(azatbkeyrif);*/ /*alert("azknar="+azknar+"\ndtstrutar="+dtstrutar);*/
for(i=1;i<sezar.length;i++){ /*if(dtnamesezstrutar[liv]!=undefined||dtnamesezstrutar[liv]!=null)*/
if(azknar.length==dtstrutar.length){valrec=dtstrutar[liv]+" "+dtnamesezstrutar[liv]+"=&#39;"+sezar[i]+"&#39; "; }else{valrec=dtstrutar[liv]+" "; } 
if(nomreg=="datiazienda.xml"){valrec=dtstrutar[liv]+" "+azatbkeyrif[0]+"=&#39;"+sezar[i]+"&#39; "; }/*alert(valrec); */
/*valrec=dtstrutar[liv]+" "+dtnamesezstrutar[liv]+"=&#39;codrif_"+i+"&#39; ";}else{valrec=dtstrutar[liv]+" "; } alert(dtnamesezstrutar[liv]+"\n"+sezar[i]+"\n"+azknar.length+"\n"+dtstrutar.length);*/ 
if(nomreg.indexOf("locality")>-1){ regiscr=codiscrp1=loc=""; rifloc=null; var rifloc=new Array(); loc=dtstrutarsezsel+","+sezar[i]; rifloc=loc.split(","); regiscr=loc.replace(/\,/g,""); 
for(j=0;j<rifloc.length;j++){codiscrp1=codiscrp1+rifloc[j].slice(0,2); } codiscrp1=codiscrp1+sezar[i].slice(sezar[i].length-2); /* alert("codiscrp1="+codiscrp1+"\n"+"regiscr="+regiscr); */
valatbkeyrif[0]=codiscrp1; valatbkeyrif[1]=regiscr; 
for(j=0;j<azatbkeyrif.length;j++){valrec=valrec+azatbkeyrif[j]+"=&#39;"+valatbkeyrif[j]+"&#39; "; } valrec=valrec+"/>";}
if(nomreg.indexOf("locality")==-1){ /*alert(azatbkeyrif);*/
for(j=1;j<azatbkeyrif.length;j++){if(j==0){valatb=lsnewsezar[i] }else{ valatb=""; } 
if(azatbkeyrif[j]=="giacenza"||azatbkeyrif[j]=="scorta_minima"||azatbkeyrif[j]=="costo"){valatb="0"; }else{ valatb="";}

if(azatbkeyrif[j]=="tipelem"){valatb=tipelem; }/*else{ valatb="";}*/

valrec=valrec+azatbkeyrif[j]+"=&#39;"+valatb+"&#39; "; } valrec=valrec+"/>";} /*alert("valrec=\n"+valrec);*/
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
} }/*alert(valrec); alert(77+"\n"+strf);*/
if(liv==0&&numsezlivfin>0&&dtstrutar.length==2&&operaz!="elistrut"&&fatto==0){op="caricamento di n."+(sezar.length-1)+" sezioni: "+lsnewsez; confkey=nnreg; nomsezliv=azknar[liv]; /* alert("-"+1);*/
for(i=1;i<sezar.length;i++){ valrec=dtstrutar[liv]+" "+dtnamesezstrutar[liv]+"=&#39;"+sezar[i]+"&#39; ";
/*atbkey=document.getElementById("atbkey").value;atbkey=atbkey.slice(0,(atbkey.length-1));atbkeyar=atbkey.split(",");azatbkeyrif=atbkeyar;*/
for(j=0;j<atbkeyar.length;j++){valrec=valrec+"rif"+j+"=&#39;"+atbkeyar[j]+"&#39; "; } valrec=valrec+">";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
valrec="/"+dtstrutar[liv]+">";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
} }/*alert(78+"\n"+strf);*/
if(operaz=="elistrut"){var sezar=new Array(); sezar=nomsez.split(","); tipm1="eliminazione di sezioni"; op="modifica del livello "+elstrutnew+" con eliminazione di n."+(sezar.length-1)+" sezioni: "+sezar; }  
/*
if(azdtcommonlist=="SI"){azknar=azdtnomesezliv;}
*/
/*if(azdtcommonlist.indexOf("SI")>-1){azknar=azdtnomesezliv;}*/
var dtefstr=";nrec;cred1;cred2;operaz;tipm1;indreg;confkey;gestione;tipop;nkar;vkar;liv;numsezliv;commonlist;dtstrut;livop;nomsez;sezlivsel"; /*confarea;confcat;conftip;confcmpgen;*/ /*alert(azknar+"\n"+azkvar);*/ /*if(dtstrutar.length==4){confkey=confkeyar;}*/
var dtstrutar=new Array(),dtnomesezliv=new Array(); dtstrutar=azdtstrut.split(","); dtnomesezliv=azdtnomesezliv.split(","); var i0=0; /*alert(azsezlivsel);*/
if(indreg.indexOf("productiveActivities.xml")>-1&&liv==0){i0=1;} 
var confkey=""; 
if(azlivdamod>0){for(i=i0;i<azlivdamod;i++){confkey=confkey+","+dtstrutar[i]+" "+dtnomesezliv[i]+"=&#39;"+azsezlivsel[i]+"&#39; "; }}else{confkey=nnreg+" sectorab='"; }
/*alert("confkey="+confkey+"\nazlivdamod="+azlivdamod);*/
if(indreg.indexOf("productiveActivities.xml")>-1){ azsezlivsel.shift();} /*alert(indreg+"\n"+i0+"\n"+azlivdamod);alert(azsezlivsel);*/
if(operaz!="elistrut"){ nomsez=lsnewsez;}
var greg=0;
if(nomsez.indexOf("appunti")>-1||nomsez.indexOf("bozze")>-1){prov=""; var lsreg=ireg=""; p1=indreg.lastIndexOf("/"); ireg=indreg.slice(0,(p1+1)); greg=1;
if(nomsez.indexOf("appunti")>-1){lsreg=lsreg+",appunti"; nomsez=nomsez.replace(",appunti","");} /*alert(nomsez.indexOf("bozze")>-1)*/
if(nomsez.indexOf("bozze")>-1){lsreg=lsreg+",bozze"; nomsez=nomsez.replace(",bozze","");} /*alert(nomsez);*/
var rifasp="gestserver1/generareg.asp?lsreg="+lsreg+"&indreg="+ireg; /*window.open(rifasp,"popup");*/ setTimeout(()=>window.open(rifasp,"popup"),1000);
}

/*alert(confkey); ,keyar area='Area0' ,keycat categoria='Cat00' ,keytip tipoologia='Tip0' alert(strf); */ 
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='nrec' value='"+nrec+"' /><input type='text' name='dtefstr' value='"+dtefstr+"' /> <input type='text' name='nkar' value='"+azdtstrut+"' /> <input type='text' name='vkar' value='"+azdtnomesezliv+"' /> <input type='text' name='cred1' value='"+cred1+"' /><input type='text' name='cred2' value='"+cred2+"' /><input type='text' name='operaz' value='"+op+"' /> <input type='text' name='tipm1' value='"+tipm1+"' /><input type='text' name='confkey' value='"+confkey+"' /> <input type='text' name='indreg' value='"+indreg+"' /> <input type='text' name='gestione' value='"+gestione+"' /> <input type='text' name='tipop' value='"+tipop+"' /> <input type='text' name='liv' value='"+liv+"' /> <input type='text' name='numsezliv' value='"+numsezlivfin+"' /> <input type='text' name='commonlist' value='"+azdtcommonlist+"' /> <input type='text' name='dtstrut' value='"+dtstrutar+"' /> <input type='text' name='livop' value='"+azlivop+"' /> <input type='text' name='nomsez' value='"+nomsez+"' /> <input type='text' name='sezlivsel' value='"+azsezlivsel+"' /> ";
strf=strf+"<input type='text' name='nomreg2' value='"+regdamod2+"' /><input type='text' name='operaz2' value='"+operaz2+"' /> <input type='text' name='keyrif2' value='"+keyrif2+"' /> <input type='text' name='newkey2' style='width:100%;' value='"+newkey2+"' /> </form>"; 
if(document.getElementById("modinv")!=null){ document.getElementById("modinv").innerHTML=strf;}
else{document.getElementById("modextern1_1").innerHTML=strf;}
/*return;*//*alert(79+"\n"+strf);*/
var frm=document.getElementById("frmnewrap"); 
frm.action="gestserver1/modifica_strutregglob.asp"; frm.target="popup"; frm.method="post"; frm.submit(); /*alert(nomsez+"\n"+nomsez.match(/,/g).length);*/
/*setTimeout(()=>frm.submit(),500); setTimeout(frm.submit, 3000); alert(prov);*/
 /* alert(strf); return;*/
/* document.getElementById("modinv").innerHTML="";*/

if(prov=="wsfcostruiscicapitolato1"){timeraz=setTimeout(function(){ wsfcostruiscicapitolato2(indreg); }, 1500); /*wsfcostruiscicapitolato2(indreg); */}  
istdoc.innerHTML="";
/* wsfwait(); 
if(operaz=="elistrut"&&obj.textContent=="elimina tutte"){ obj.disabled=true; obj.textContent="sezioni eliminate";
for(i=0;i<nomsez.match(/,/g).length;i++){var ob=document.getElementById("but_"+i); ob.disabled=true; ob.textContent="sezione eliminata";} }
if(operaz=="elistrut"&&obj.textContent=="elimina"){ obj.disabled=true; obj.textContent="eliminata";}
*/
}

function azmodglobalstrut_n(operaz,nomreg,liv,elstrutnew,numsezliv,livp){percorso=percorso+"azmodglobalstrut_n; ";  
/*alert("azmodglobalstrut_n\n"+operaz+"\n"+nomreg+"\n"+liv+"\n"+elstrutnew+"\n"+numsezliv+"\n"+livp); alert("azmodglobalstrut_n\n"+livp+"-"+liv); */
if(azdtcommonlist.indexOf("SI")>-1&&azdtcommonlist.indexOf(liv)>-1){ var p1=0; p1=azdtcommonlist.indexOf(liv); /*alert(p1); */
if(p1==2){ azmodglobalstrut_0_SI(operaz,nomreg,liv,elstrutnew,numsezliv,rifdiv,livp);} 
if(p1==3){ azmodglobalstrut_01_SI(operaz,nomreg,liv,elstrutnew,numsezliv,rifdiv,livp);} 
if(p1==4){ azmodglobalstrut_02_SI(operaz,nomreg,liv,elstrutnew,numsezliv,rifdiv,livp);}
return; }
var str="<table>", dtstrut=new Array(),sez=new Array(),sez2=new Array(),sez3=new Array(),i=0,nomsezliv="",val=""; dtstrut=azdtstrut.split(","); azlistkey=nvarxml.getElementsByTagName(dtstrut[0]); azlsk0=azlistkey; 
/*alert(azdtnomesezliv+"\n"+livp); */
if(livp<liv){str=str+"<tr><td>seleziona la sezione di livello <b>"+dtstrut[livp]+"</b> nella quale operare: <select id='selliv_"+livp+"' onchange='azmodglobalstrut_n_1(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezliv+"\","+(livp*1+1)+",this.value); ' ><option value='' selected></option>"; 
aznumsezliv[livp]=azlistkey.length; 
/*alert("azmodglobalstrut_n="+aznumsezliv);*/ for(i=0;i<azlistkey.length;i++){sez[i]=azlistkey[i].attributes[0].value; } 

sez3=ordinasezioni(sez); sez=sez3;

/*
var numin="**"; p1=sez[0].indexOf("_"); if(p1>-1){var numin=sez[0].slice(0,p1); } 
if(isNaN(numin)){sez3=sez.sort(); sez=sez3; }
else{ for(i=0;i<sez.length;i++){p1=sez[i].indexOf("_");sez2[i]=sez[i].slice(0,p1); } 
sez2=sez2.sort(function(a, b){return a-b}); var conf=""
for(i=0;i<sez2.length;i++){for(j=0;j<sez.length;j++){conf=sez2[i]+"_"; if(conf==sez[j].slice(0,conf.length)){p1=sez[j].indexOf("_"); sez3[i]=sez[j]; break;} } }sez=sez3;
}
*/

/*  alert(sez);var sez3=sez.sort((a,b) => a-b);*/ /*alert(sez3); */
 for(i=0;i<azlistkey.length;i++){val=sez[i]; str=str+"<option value='"+val+"'>"+val+"</option>";  }
str=str+"</select></td></tr></table>"; }else{aznumsezliv[livp]=azlistkey.length; /*alert("azmodglobalstrut_n_3_livfin="+aznumsezliv);*/ var rifdiv="div_"+(livp*1-1); azmodglobalstrut_0(operaz,nomreg,liv,elstrutnew,numsezliv,rifdiv,livp); return;}
document.getElementById("modextern3").innerHTML=str+"<div id='div_"+livp+"'></div>"; 
azlsk0=azlistkey; /*alert(azlsk0.length);*/
}

function azmodglobalstrut_n_1(operaz,nomreg,liv,elstrutnew,numsezliv,livp,nomsez){percorso=percorso+"azmodglobalstrut_n_1; "; dammidata();
var rifdiv="div_"+(livp*1-1); azsezsel=azsezsel+","+nomsez; /*alert("azmodglobalstrut_n_1: azsezsel="+azsezsel);*/
/*alert("azmodglobalstrut_n_1\n"+operaz+"\n"+nomreg+"\n"+liv+"\n"+elstrutnew+"\n"+numsezliv+"\n"+livp+"\n"+nomsez); alert("azmodglobalstrut_n_1\nlivp="+livp+"\nliv="+liv);  */ 
var str="<table>", dtstrut=dtstrutsezsel=new Array(),sez=new Array(),i=j=0,nomsezliv="",val=""; dtstrut=azdtstrut.split(","); azdtstrutsezsel[livp-1]=nomsez; azknar[livp-1]=azlistkey[0].attributes[0].nodeName; azsezlivsel[0]=document.getElementById("selliv_0").value;
/*alert(dtstrut[livp-1]+"\nnonsez="+nomsez);*/
/*var lsk=nvarxml.getElementsByTagName(dtstrut[livp-1]); */
var lsk=nvarxml.getElementsByTagName(dtstrut[livp-1]); 
for(j=0;j<lsk.length;j++){if(lsk[j].attributes[0].value==nomsez){ break;}} /*alert(dtstrut[livp]);*/
azlistkey=lsk[j].getElementsByTagName(dtstrut[livp]); /*for(j=0;j<azlistkey.length;j++){alert(azlistkey[j].attributes[0].value);} */ 
for(i=0;i<azlistkey.length;i++){sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(function(a, b){return a-b}); /*sez=sez.sort(); alert(sez); */
/*for(i=0;i<azlistkey.length;i++){val=sez[i]; if(val==nomsez){azlistkey=azlistkey[i].getElementsByTagName(dtstrut[livp]);  }  }*/
azlsk1=azlistkey; /*alert(azlsk1.length); var azlskey=new Array(azlsk0,azlsk1,azlsk2,azlsk3,azlsk4,azlsk5); alert(azlskey[0].length);*/
if(livp<liv){str=str+"<tr><td>seleziona la sezione di livello <b>"+dtstrut[livp]+"</b> nella quale operare: <select id='selliv_"+livp+"' onchange='azmodglobalstrut_n_2(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezliv+"\","+(livp*1+1)+",this.value)' ><option value='' selected></option>"; 
/*azlistkey=nvarxml.getElementsByTagName(dtstrut[livp]); aznumsezliv[livp]=azlistkey.length; */
/*alert("azmodglobalstrut_n_1="+aznumsezliv+"\n"+azlistkey.length);*/
/*for(i=0;i<azlistkey.length;i++){sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); alert(sez);*/
 for(i=0;i<azlistkey.length;i++){val=sez[i]; str=str+"<option value='"+val+"'>"+val+"</option>";  }
str=str+"</select></td></tr></table>"; }else{aznumsezliv[livp]=azlistkey.length; /*alert("azmodglobalstrut_n_1_livfin="+aznumsezliv);*/ 
azlistkey=nvarxml.getElementsByTagName(dtstrut[(livp+1)]);
azmodglobalstrut_0(operaz,nomreg,liv,elstrutnew,numsezliv,livp,rifdiv); return;}
/*alert("div_"+(livp-1));*/ document.getElementById("div_"+(livp*1-1)).innerHTML=str+"<div id='div_"+livp+"'></div>"; 
}

function azmodglobalstrut_n_2(operaz,nomreg,liv,elstrutnew,numsezliv,livp,nomsez){percorso=percorso+"azmodglobalstrut_n_2; ";  azsezsel=azsezsel+","+nomsez;
/*alert("azmodglobalstrut_n_2\n"+operaz+"\n"+nomreg+"\n"+liv+"\n"+elstrutnew+"\n"+numsezliv+"\n"+livp+"\n"+nomsez);   alert("azmodglobalstrut_n_2: azsezsel="+azsezsel);*/
var str="<table>", dtstrut=new Array(),sez=new Array(),sez2=new Array(),sez3=new Array(),i=j=ind=0,nomsezliv="",val=""; 
dtstrut=azdtstrut.split(","); azdtstrutsezsel[livp-1]=nomsez; 
azknar[livp-1]=azlistkey[0].attributes[0].nodeName; azsezlivsel[1]=document.getElementById("selliv_1").value; nomsez=azsezlivsel[1];
/*alert("azmodglobalstrut_n_2\nlivp="+livp+"\nliv="+liv+"\n"+dtstrut[livp]);  */
var lsattribkeyrif=azlistkey[0].attributes; azatbkeyrif=[]; for(i=1;i<lsattribkeyrif.length;i++){azatbkeyrif[ind]=lsattribkeyrif[i].value; ind++;}
for(j=0;j<azlistkey.length;j++){/*alert(azlistkey[j].attributes[0].value);*/ if(azlistkey[j].attributes[0].value==nomsez){ break;}} /*alert(dtstrut[livp]);*/
azlistkey=azlistkey[j].getElementsByTagName(dtstrut[livp]); numsezliv=azlistkey.length; 

/*for(i=0;i<azlistkey.length;i++){  sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort();*/ /*alert(sez+"\n"+livp+"-"+liv);*/

for(i=0;i<azlistkey.length;i++){sez[i]=azlistkey[i].attributes[0].value; } /*alert(sez);  var sez2=sez.sort(); alert(sez2);*/
sez3=ordinasezioni(sez); sez=sez3;
/*
var numin="**"; p1=sez[0].indexOf("_"); if(p1>-1){var numin=sez[0].slice(0,p1); } 
if(isNaN(numin)){sez3=sez.sort(); sez=sez3;}
else{ for(i=0;i<sez.length;i++){p1=sez[i].indexOf("_");sez2[i]=sez[i].slice(0,p1); } 
sez2=sez2.sort(function(a, b){return a-b}); var conf=""
for(i=0;i<sez2.length;i++){for(j=0;j<sez.length;j++){conf=sez2[i]+"_"; if(conf==sez[j].slice(0,conf.length)){p1=sez[j].indexOf("_"); sez3[i]=sez[j]; break;} } }sez=sez3;
}
*/

azlsk2=azlistkey; /*alert(azlsk1.length); var azlskey=new Array(azlsk0,azlsk1,azlsk2,azlsk3,azlsk4,azlsk5); alert(azlskey[0].length);*/
if(livp<(liv)){str=str+"<tr><td>seleziona la sezione di livello <b>"+dtstrut[livp]+"</b> nella quale operare: <select id='selliv_"+livp+"' onchange='azmodglobalstrut_n_3(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezliv+"\","+(livp*1+1)+",this.value)' ><option value='' selected></option>"; /*aznumsezliv[livp]=azlistkey.length; alert(dtstrut[livp]);*/
/*azlistkey=azlistkey[j].getElementsByTagName(nomsez);*/ /*nvarxml.getElementsByTagName(dtstrut[livp]); */
aznumsezliv[livp]=azlistkey.length; 
 for(i=0;i<azlistkey.length;i++){val=sez[i]; str=str+"<option value='"+val+"'>"+val+"</option>";  }
str=str+"</select></td></tr></table>"; } else{aznumsezliv[livp]=azlistkey.length; var rifdiv="div_"+(livp*1-1); 
/*azlistkey=nvarxml.getElementsByTagName(dtstrut[(livp+1)]);*/
azmodglobalstrut_0(operaz,nomreg,liv,elstrutnew,numsezliv,livp,rifdiv); return;}
document.getElementById("div_"+(livp*1-1)).innerHTML=str+"<div id='div_"+livp+"'></div>"; 
}

function azmodglobalstrut_n_3(operaz,nomreg,liv,elstrutnew,numsezliv,livp,nomsez){percorso=percorso+"azmodglobalstrut_n_3; ";  azsezsel=azsezsel+","+nomsez;
/*alert("azmodglobalstrut_n_3\n"+operaz+"\n"+nomreg+"\n"+liv+"\n"+elstrutnew+"\n"+numsezliv+"\n"+livp+"\n"+nomsez);*/
var str="<table>", dtstrut=new Array(),sez=new Array(),i=0,ind=0,nomsezliv="",val=""; dtstrut=azdtstrut.split(","); azdtstrutsezsel[livp-1]=nomsez; 
azknar[livp-1]=azlistkey[0].attributes[0].nodeName; azsezlivsel[2]=document.getElementById("selliv_2").value; nomsez=azsezlivsel[2];
/*alert("azmodglobalstrut_n_3\nlivp="+livp+"\nliv="+liv+"\n"+dtstrut[livp]);  */
var lsattribkeyrif=azlistkey[0].attributes; azatbkeyrif=[]; for(i=1;i<lsattribkeyrif.length;i++){azatbkeyrif[ind]=lsattribkeyrif[i].value; ind++;}
for(j=0;j<azlistkey.length;j++){if(azlistkey[j].attributes[0].value==nomsez){ break;}} /*alert(dtstrut[livp]);*/
azlistkey=azlistkey[j].getElementsByTagName(dtstrut[livp]); numsezliv=azlistkey.length; 
for(i=0;i<azlistkey.length;i++){  sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); /*alert(sez);*/
azlsk3=azlistkey; /*alert(azlsk1.length); var azlskey=new Array(azlsk0,azlsk1,azlsk2,azlsk3,azlsk4,azlsk5); alert(azlskey[0].length);*/
if(livp<(liv)){str=str+"<tr><td>seleziona la sezione di livello <b>"+dtstrut[livp]+"</b> nella quale operare: <select id='selliv_"+livp+"' onchange='azmodglobalstrut_n_4(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezliv+"\","+(livp*1+1)+",this.value)' ><option value='' selected></option>"; /*aznumsezliv[livp]=azlistkey.length; alert(dtstrut[livp]);*/
/*azlistkey=azlistkey[j].getElementsByTagName(nomsez);*/ /*nvarxml.getElementsByTagName(dtstrut[livp]); */
aznumsezliv[livp]=azlistkey.length; 
 for(i=0;i<azlistkey.length;i++){val=sez[i]; str=str+"<option value='"+val+"'>"+val+"</option>";  }
str=str+"</select></td></tr></table>"; } else{aznumsezliv[livp]=azlistkey.length; var rifdiv="div_"+(livp*1-1); 
/*azlistkey=nvarxml.getElementsByTagName(dtstrut[(livp+1)]);*/
azmodglobalstrut_0(operaz,nomreg,liv,elstrutnew,numsezliv,livp,rifdiv); return;}
document.getElementById("div_"+(livp*1-1)).innerHTML=str+"<div id='div_"+livp+"'></div>"; 
}
function azmodglobalstrut_n_4(operaz,nomreg,liv,elstrutnew,numsezliv,livp,nomsez){percorso=percorso+"azmodglobalstrut_n_4; ";  azsezsel=azsezsel+","+nomsez;
/*alert("azmodglobalstrut_n_4\n"+operaz+"\n"+nomreg+"\n"+liv+"\n"+elstrutnew+"\n"+numsezliv+"\n"+livp+"\n"+nomsez);  alert("azmodglobalstrut_n_4\n"+livp+"-"+liv); */
var str="<table>", dtstrut=new Array(),sez=new Array(),i=0,nomsezliv="",val=""; dtstrut=azdtstrut; azdtstrutsezsel[livp-1]=nomsez; azknar[livp-1]=azlistkey[0].attributes[0].nodeName;
azsezlivsel[3]=document.getElementById("selliv_3").value; nomsez=azsezlivsel[3];
var lsattribkeyrif=azlistkey[0].attributes; azatbkeyrif=[]; for(i=1;i<lsattribkeyrif.length;i++){azatbkeyrif[ind]=lsattribkeyrif[i].value; ind++;}
for(i=0;i<azlistkey.length;i++){sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); /*alert(sez);*/
for(i=0;i<azlistkey.length;i++){val=sez[i]; if(val==nomsez){azlistkey=azlistkey[i].getElementsByTagName(dtstrut[livp]);  }  }
azlsk4=azlistkey; /*alert(azlsk1.length); var azlskey=new Array(azlsk0,azlsk1,azlsk2,azlsk3,azlsk4,azlsk5); alert(azlskey[0].length);*/
if(livp<liv){str=str+"<tr><td>seleziona la sezione di livello <b>"+dtstrut[livp]+"</b> nella quale operare: <select id='selliv_"+livp+"' onchange='azmodglobalstrut_n_5(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezliv+"\","+(livp*1+1)+",this.value)' ><option value='' selected></option>"; aznumsezliv[livp]=azlistkey.length; 
/*alert("azmodglobalstrut_n_4="+aznumsezliv);*/
 for(i=0;i<azlistkey.length;i++){val=azlistkey[i].attributes[0].value; str=str+"<option value='"+val+"'>"+val+"</option>";  }
str=str+"</select></td></tr></table>"; }
else{aznumsezliv[livp]=azlistkey.length; /*alert("azmodglobalstrut_n_4_livfin="+aznumsezliv);*/ var rifdiv="div_"+(livp*1-1); azmodglobalstrut_0(operaz,nomreg,liv,elstrutnew,numsezliv,rifdiv,livp); return;}
document.getElementById("div_"+(livp*1-1)).innerHTML=str+"<div id='div_"+livp+"'></div>"; 
}
function azmodglobal(operaz,val){percorso=percorso+"azmodglobal; ";  /* alert("azmodglobal\n"+operaz+"\n"+val); *//*  clearTimeout(timeraz); timeraz=clearTimeout();*/ 
if(operaz!="modstrut"&&operaz!="elistrut"){
var str="<table><tr><th>Seleziona il <b>tipo di modifica</b> da realizzare: <select id='tipm1_1' onchange='azsceglitmod2(\""+operaz+"\",\""+val+"\",this.value)' ><option value='' selected></option>";
if(azdtduplic==""||azdtduplic=="no"){str=str+"<option value='modificare_dati_preesistenti' >modificare_dati_preesistenti</option><option value='aggiungere_elementi'> aggiungere_elementi</option> <option value='eliminare_elementi' >eliminare_elementi</option>";}
if(azdtduplic=="si"){str=str+"<option value='generare/registrare_protocolli' >generare/registrare_protocolli</option><option value='duplicare_elementi'> duplicare_elementi</option> <!--<option value='completare_duplicati'> completare_duplicati</option>--> <option value='annullare_elementi'> annullare_elementi</option>"; }}
if(operaz=="modstrut"||operaz=="elistrut"){ if(azdatiregv[11]=="no"&&azdatiregv[12]=="no"){str="* ATTENZIONE * <b>la struttura</b> del registro <b>"+val+"</b> non puo' essere alterata in fase di modifica"; mostraer(str); var audio=new Audio("actung.wav").play(); return;} var dtstrut=new Array(),i=0,opr=""; dtstrut=azdtstrut; for(i=0;i<aznumsezliv.length;i++){aznumsezliv[i]=""; }
if(azdtstrutsezsel.length>0){var n=azdtstrutsezsel.length; for(i=0;i<n;i++){azdtstrutsezsel.pop(); } }
var str="<table><tr><th>Seleziona il <b>livello piramidale</b> nel quale operare: <select id='tipm1_1' onchange='azmodglobalstrut(\""+operaz+"\",\""+val+"\",this.value)' ><option value='' selected></option>";
for(i=0;i<dtstrut.length;i++){str=str+"<option value='"+i+"' >"+opr+" "+dtstrut[i]+"</option>"; }
}
str=str+"</select></th></tr></table><div id='modextern3_0' > </div><div id='modextern3' > </div><div id='modextern4' > </div><div id='modextern5'></div><div id='modextern6'></div><div id='modextern7'></div>"; 
document.getElementById("modextern2").innerHTML=str; 
}
/*  MODIFICA PARZIALE DEI REGISTRI */
function azmodpartmod(prov,reg,act){percorso=percorso+"azmodpartmod; ";  /* alert("da azmodpartmod \n"+prov+"\n"+reg+"\n"+act+"\n"+wstipreg);*/
if(wstipreg==tipreg[12]){rifsec="tipologia_documenti"; str="* ATTENZIONE * <mark>i registri delle bacheche</mark> possono essere modificati solo <mark><b>inserendo</b> nuovi informative</mark> "+wsnomreg; mostraer(str); var audio=new Audio("actung.wav").play(); return;} 
if(prov=="azmodsingol" && (reg.indexOf("mgz_acqvnd_")>-1 || wstipreg=="magazzini/beni_da_vendere")){var indmgz="../"+wsaz+"/magazzini/", operaz="modsing_mgz_acqvnd"; indlista="../"+wsaz+"/datiazienda/"; var gestione="modificarec_acqvnd"; /*
var rifasp="progasp/generalistasetmerc.asp?indmgz="+indmgz+"&indlista="+indlista+"&operaz="+operaz; window.open(rifasp,"popup"); 
wsnomreg=wsaz+"/datiazienda/listasetmerc.xml"; azletreg=leggidatiaziendali(wsnomreg); 
*/document.getElementById("modprtins").style.display="none";  wsfgestisciacqvnd_1(0,gestione,reg); return;
 }
if(prov=="azmodsingol" && reg.indexOf("mgz_prdvnd_")>-1){var indmgz="../"+wsaz+"/magazzini/", operaz="modsing_mgz_acqvnd"; indlista="../"+wsaz+"/datiazienda/"; var gestione="modificarec_acqvnd"; document.getElementById("modprtins").style.display="none";  wsfgestisciacqvnd_1(0,gestione,reg); return;
 }
var area1=document.getElementById("area1"); 
nvarxml=leggidatiaziendali(indbasexml+reg); var i=0, ntot=-1, tipop2="", str="", stato="", areatip="",artip="";
if(wstipreg==tipreg[1]){areatip="acquisti";}
if(areatip=="acquisti"){lskaree=nvarxml.getElementsByTagName("keyarea"); 
for(i=0;i<lskaree.length;i++){ artip=lskaree[i].attributes[0].value; if(artip.indexOf(areatip)>-1){azlistkeyrif=lskaree[i].getElementsByTagName("keyrif"); break;} }}
else{azlistkeyrif=nvarxml.getElementsByTagName("keyrif");  }
if(azsecind.length>0){var n=azsecind.length; for(i=0;i<n;i++){azsecind.pop();} }
for(i=0;i<azlistkeyrif.length;i++){var nome=azlistkeyrif.item(0).attributes.item(0).nodeName; 
azsecind.push(azlistkeyrif.item(i).attributes.getNamedItem(nome).value);}
var str=str+"Seleziona la sezione del registro <mark>"+reg+"</mark> su cui lavorare: <select id='selsec' onchange='azmodpartmod2(\""+stato+"\",\""+reg+"\",\""+act+"\",\""+prov+"\",this.value)'><option value=''></option>";
/*
switch(reg){
case qfunc('82124691247112465124671246712482124691246812446124881247712476124'):{if(tipop=="sv"){i=0;} else{i=1;}; break;}
default:{i=0; break;}
}
*/
/*var i=0; for(i;i<azlistkeyrif.length;i++){str=str+"<option value='"+azsecind[i]+"'>"+azsecind[i]+"</option>";} */
str=str+"</select>";
/*if(wstipreg=="magazzini_sf"){document.getElementById("modextern3").innerHTML=str+"<div id='modextern4'></div>"; }
else{area1.innerHTML=str+"<div id='modextern4'></div>"; } */
area1.innerHTML=str+"<div id='modextern4'></div>";  azcaricaselgroup(reg,"selsec",areatip);
}
function azmodpartmod2(stato,reg,act,prov,sec){percorso=percorso+"azmodpartmod2; ";  var str="<table><tr><th colspan=2> inserisci, in uno dei seguenti campi, un valore per il filtraggio:</th></tr>";  
/* alert("da azmodpartmod2"+"\n"+stato+"\n"+reg+"\n"+act+"\n"+prov+"\n"+sec);alert(azxmlreq.responseText);*/
var areatip="",artip="";
if(wstipreg==tipreg[1]){areatip="acquisti";}
if(areatip=="acquisti"){lskaree=nvarxml.getElementsByTagName("keyarea"); 
for(i=0;i<lskaree.length;i++){ /*if(lskaree[i].attributes[0].value==areatip)*/
artip=lskaree[i].attributes[0].value; if(artip.indexOf(areatip)>-1){azlistkeyrif=lskaree[i].getElementsByTagName("keyrif"); break;} }}
else{azlistkeyrif=nvarxml.getElementsByTagName("keyrif");  }
for(i=0;i<azlistkeyrif.length;i++){var nome=azlistkeyrif.item(0).attributes.item(0).nodeName; 
/* alert(azlistkeyrif.item(i).attributes.getNamedItem(nome).value+"\n"+sec);  */
 if(azlistkeyrif.item(i).attributes.getNamedItem(nome).value==sec){
azlistkey=azlistkeyrif[i].getElementsByTagName("key"); azlistattrib=azlistkeyrif.item(i).attributes; 
var nattrib=azlistattrib.length; 
var trovato=0; if(sec=="emergenziali" || sec=="straordinarie"){var n=0; stato="occasionali";}else{var n=1;}
for(j=n;j<nattrib;j++){if(azlistattrib[j].value=="immagine"){trovato=1;} }
if(trovato==1){var azlistrifimg=azlistkeyrif[i].getElementsByTagName("rifimg"); prefimg=azlistrifimg[0].attributes[0].value; /*atbnom=azlistrifimg[0].attributes[1].value; */  caricanrcimg();/* caricanomiimg(atbnom); */ caricanomiimg();}} } 
for(i=n;i<nattrib;i++){ 
if(azlistattrib[i].value!="pw" && azlistattrib[i].value!="pww" && azlistattrib[i].value!="mail"){ var ndn=azlistattrib[i].nodeName; if(ndn.indexOf("rif")>-1 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){ 
str=str+"<tr><td>"+azlistattrib[i].value+"</td><td><input id='"+azlistattrib[i].value+"' type='text' onchange='azmodregpart(\""+stato+"\",\""+sec+"\",\""+prov+"\",\""+reg+"\",\""+act+"\",this)'></td></tr>"; }}}
str=str+"</table><span id='rispric'></span>"; /* alert(prov); */
document.getElementById("modextern4").innerHTML=str; 
/* if(prov=="chiusuramanuoccas") */
if(prov!="azmodsingol"){ azctrlrapinterv(stato,sec,prov,reg,act); } /* else{ azctrlrapinterv(stato,sec,prov,reg,act); }*/
}                                                                          
function azctrlrapinterv(stato,sec,prov,reg,act){percorso=percorso+"azctrlrapinterv; ";  /* alert("da azctrlrapinterv:\n"+stato+"\n"+sec+"\n"+prov+"\n"+reg+"\n"+act); */
if(reg.indexOf("rapinterv_")>-1){var rifods=document.getElementById("rifods"); 
var rifod=rifods.value; if(rifod.indexOf(".htm")>0){rifod=rifod.slice(0,(rifod.length-4));} 
/* alert(rifod);  var ods=document.getElementById("ods"); ods.value=rifod; */
azmodregpart(stato,sec,prov,reg,act,rifods,rifod); } else{return;}
}
function azmodregpart(stato,sec,prov,reg,act,obj,rifod){percorso=percorso+"azmodregpart; ";  var p1=0, treg="", secdest="", cmp="", ndn="",trovato=0,trovatoc=0; treg=document.getElementById("wstipreg").value; /*alert(treg);*/
/*alert("da azmodregpart:\n"+stato+"\n"+sec+"\n"+prov+"\n"+reg+"\n"+act+"\n"+obj+"\n"+rifod); */ 
var rif=rifod, attrib=obj.id, atrbind=new Array(), selec="3"; 
p1=reg.indexOf("_"); if(p1>0){ treg=reg.slice(0,p1); secdest=reg.slice((p1+1)); secdest=secdest.slice(0,(secdest.length-4)); /*alert(reg+"\n"+secdest+"\n"+treg);*/ }
if(azndtef.length>0){var n=azndtef.length; for(i=0;i<n;i++){azndtef.pop(); azdtef.pop(); atrbind.pop();} }
if(azdtinvisib.length>0){var n=azdtinvisib.length; for(i=0;i<n;i++){azdtinvisib.pop();} }
/* if(reg=="regaccred.xml"){azdtinvisib=new Array("pw", "pww", "mail"); } 
var rg=reg.match(qfunc('82124691247112465124671246712482124691246812446124881247712476124')); 
if(rg!=null){azdtinvisib=new Array("pw", "pww", "mail"); }*/
if(reg=="regaccred.xml"||reg=="acquirenti_"+wssec+".xml"){ azdtinvisib=new Array("pw", "pww", "mail");}
var nattrib=azlistattrib.length; var trovato=0; 
if(treg=="rapinterv" && prov=="azmodsingol"){trovato=0;
for(i=0;i<azlistattrib.length;i++){ ndn=azlistattrib[i].nodeName; 
if(ndn.indexOf("rif")>-1 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){ cmp=document.getElementById(azlistattrib[i].value); 
if(cmp.value!=""){ trovato++;}}} if(trovato==0 || trovato>1){str="* ATTENZIONE * per la MODIFICA PARZIALE il filtraggio dei record deve essere fatto inserendo un valore in un campo"; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; } trovato=0;
for(i=0;i<azlistattrib.length;i++){ ndn=azlistattrib[i].nodeName; 
if(ndn.indexOf("rif")>-1 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){ cmp=document.getElementById(azlistattrib[i].value); /* alert(azlistattrib[i].value+"="+cmp.value); */
if(cmp.value!="" && azlistattrib[i].value!="ods"){trovato=1;break;}}} if(trovato==1){str="* ATTENZIONE * per la MODIFICA PARZIALE di questo tipo di registro il filtraggio dei dati deve essere effettuato SOLO sui valori di ODS"; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; }  }
if(treg=="rapinterv" && prov=="azmodsingol"){var ods=document.getElementById("ods").value; 
/* alert(wsaz+"/comunicazioni/"+secdest+"/"+ods+".htm"); */
nvarxml=wsfleggidatiaziendali(wsaz+"/comunicazioni/"+secdest+"/"+ods+".htm"); /* alert(nvarxml); */
if(nvarxml!="esci"){ str="* ATTENZIONE * l'ods "+ods+".htm non e' stato ancora eliminato. In riferimento a tale ods la prima modifica deve essere effettuata tramite CRONOPROGRAMMA."; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; }
}
if(treg=="rapinterv" && prov=="azmodsingol"){ /**/
var parent=document.getElementById("frmw"); var child=document.getElementsByName("azienda")[0]; if(child!=null){ parent.removeChild(child);} 
/* var x = document.getElementById("frmw"); x.remove();*/
/*alert(indbasexml+wsnomreg); alert(azxmlreq.responseText);nvarxml=leggidatiaziendali(indbasexml+wsnomreg); */
if(document.getElementById("frmw")!=null){ var x = document.getElementById("frmw"); x.remove();}
var str="<form action='' method='post' id='frmw' target='popup' > <div id='datigen' style='display:none'> <input type='text' name='dtefstr' value='' /> <!----> <input type='text' name='azienda' value='"+wsaz+"' /><input type='text' name='secmit' value='"+tipop+"' >  <input type='text' name='secdest' value='' > <input type='text' name='cognome' value='"+cred1+"' > <input type='text' name='cred2' value='"+cred2+"' > <input type='text' name='pww' value='"+cred3+"' ></div> <table style='display:none'> <tr><td style='width:30%;'>Tipo di registro su cui operare: </td><td style='width:70%;'><input type='text' id='typreg' value='rapinterv' ></td></tr><tr><td>Registro da modificare: </td><td><input type='text' id='reg' name='nomreg' value='"+wsnomreg+"' > </td></tr> <tr><td>operazione da compiere: </td><td><input type='text' id='seloperaz' value='modificare un tipo di record' ></td></tr> <tr><td>numero di chiavi da modificare: </td><td><input type='text' id='numnewrec' value='1' > </td></tr> <tr><td>la sezione del registro <mark>"+wsnomreg+"</mark> su cui lavorare:  <input type='text' id='selsec' name='typemanu' value='"+sec+"' > <input type='text' id='wstipreg' value='"+wstipreg+"' style='display:none' ></td></tr> </table><table> <tr><td><div id='area1'></div><div id='modextern4'></div></td><td><div id='area2'></div></td></tr></table></form>"; /*alert(str);*/
document.getElementById("area2").innerHTML=str;
/*modlarge.innerHTML=str;*/
}
var rispric=document.getElementById("rispric"); 
wstipreg=document.getElementById("wstipreg").value; /*alert("--------"+wstipreg);*/
if(rifod==undefined){rifod=obj.value; }
if(treg!="rapinterv" && prov=="azmodsingol"){trovato=0;
for(i=0;i<azlistattrib.length;i++){ ndn=azlistattrib[i].nodeName; /*alert(ndn);*/
if(azdtinvisib.length>0){trovatoc=0; for(j=0;j<azdtinvisib.length;j++){if(azlistattrib[i].value==azdtinvisib[j]){trovatoc=1;}} }/*alert(ndn+"\n"+azlistattrib[i].value+"\n"+trovatoc);*/
if(ndn.indexOf("rif")>-1 && trovatoc==0 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){ cmp=document.getElementById(azlistattrib[i].value); 
if(cmp.value!=""){ trovato++; break;}}} if(trovato==0 || trovato>1){str="* ATTENZIONE * per la MODIFICA PARZIALE il filtraggio dei record deve deve essere fatto inserendo un valore in un campo"; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; } trovato=0; /* alert(azlistattrib[i].value+"\n"+obj.value); */
for(i=0;i<azlistattrib.length;i++){ ndn=azlistattrib[i].nodeName; 
if(ndn.indexOf("rif")>-1 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){ cmp=document.getElementById(azlistattrib[i].value);  /*alert(rif+"\n"+azlistattrib[i].value+"\n"+cmp.value); *//*
if(cmp.value!="" && cmp.value==rif){trovato=1;break;}*/}} 
/*alert(trovato); if(trovato==0){str="* ATTENZIONE * il dato immesso non e' stato trovato"; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; } */ }
if(prov=="azinviaaggcronop3"){ if(rif.indexOf(".htm")>0){ rif=rif.slice(0,(rif.length-4));}}
if(azdtinvisib.length>0){for(i=1;i<nattrib;i++){trovato=0; for(j=0;j<azdtinvisib.length;j++){
if(azlistattrib[i].value==azdtinvisib[j]){trovato=1;}} 
if(trovato==0 && azlistattrib[i].nodeName.indexOf("rif")>-1 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){azndtef.push(azlistattrib[i].value); /*atrbind.push(i);*/}}}
else{for(i=1;i<nattrib;i++){if(azlistattrib[i].nodeName.indexOf("rif")>-1 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){ azndtef.push(azlistattrib[i].value); } }} 
var rifsec="";
/*
switch(wstipreg){ case tipreg[0]:{rifsec="nome"; break;} case tipreg[1]:{rifsec="tipologia_prodotti"; break;} 
case tipreg[2]:{rifsec="tipologia_componenti"; break;} case tipreg[3]:{rifsec="tipologia_componenti"; break;}
}
*/ 
/*
if(wstipreg==tipreg[0]){rifsec="nome";} 
if(wstipreg==tipreg[12]){rifsec="tipologia_documenti"; str="* ATTENZIONE * <mark>i registri delle bacheche</mark> possono essere modificati solo <mark><b>inserendo</b> nuovi informative</mark> "+wsnomreg; mostraer(str); var audio=new Audio("actung.wav").play(); return;} 
if(wstipreg==tipreg[1]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[2]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[3]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[4]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[5]){rifsec="type_activity";} 
if(wstipreg==tipreg[6]){rifsec="ordinaz_rif";} 
if(wstipreg==tipreg[7]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[8]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[9]){rifsec="data";} 
if(wstipreg==tipreg[10]){rifsec="manutenzioni"; attrib="ods";}
if(wstipreg==tipreg[5]){rifsec="lavorazioni"; attrib="";}
*/
var str="", ntot=0, mgz=0, mgztot=0, kil=""; 
if(wstipreg==tipreg[0]){rifsec="nome";} 
if(wstipreg==tipreg[12]){rifsec="tipologia_documenti"; } 
if(wstipreg==tipreg[1]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[2]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[3]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[4]){rifsec="tipologia_prodotti"; mgz=1;} 
if(wstipreg==tipreg[5]){if(wsnomreg.indexOf("mgz_")>-1 ){rifsec="tipologia_componenti"; } 
else if(wsnomreg.indexOf("rapgilav_")>-1 ){rifsec="azione"; } else{rifsec="type_activity";} }
if(wstipreg==tipreg[6]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[7]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[8]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[9]){rifsec="data";} /*alert(rifsec);*/
if(wstipreg==tipreg[10]){rifsec="manutenzioni";}
wsactung.innerHTML="";
if(wstipreg==tipreg[3]){wssect.push("escluso"); }
var areatip="",artip="";
if(wstipreg==tipreg[1]){areatip="acquisti";}
if(areatip=="acquisti"){lskaree=nvarxml.getElementsByTagName("keyarea"); 
for(i=0;i<lskaree.length;i++){ /*if(lskaree[i].attributes[0].value==areatip)*/
artip=lskaree[i].attributes[0].value; if(artip.indexOf(areatip)>-1){
azlistkeyrif=lskaree[i].getElementsByTagName("keyrif"); break;} }}
else{azlistkeyrif=nvarxml.getElementsByTagName("keyrif");  }
for(i=0;i<azlistkeyrif.length;i++){ /*if(azlistkeyrif.item(i).attributes.getNamedItem(rifsec).value==sec)*/
if(azlistkeyrif.item(i).attributes[0].value==sec){ azlistkey=azlistkeyrif[i].getElementsByTagName("key"); 
if(wstipreg!=tipreg[0] && wstipreg!=tipreg[12] && wstipreg!=tipreg[5] && wstipreg!=tipreg[10]){
if(azlistkeyrif.item(i).attributes.getNamedItem("calcolati")!=null){
rifatbcalc=azlistkeyrif.item(i).attributes.getNamedItem("calcolati").value;
if(wstipreg==tipreg[4]){ var mgzin="mgz_produzioni_.xml"; /*azlistkeyrif.item(i).attributes.getNamedItem("magazzini_in").value;	*/
var mgzinn=mgzin.split(","); rifmgz=mgzinn[0];}  }} break;} }
	/* alert(azndtef.length); */
 var azdtefstr="";
 for(i=0;i<azndtef.length;i++){azdtefstr=azdtefstr+azndtef[i]+"|";}  /*azdtefstr=azdtefstr+"canc";  */
for(i=0;i<azndtef.length;i++){ for(j=0;j<datiformtip.length;j++){if(azndtef[i]==datiformtip[j]){azdtef.push(j); }}}
/* for(i=0;i<azndtef.length;i++){alert(azndtef[i]+" - "+azdtef[i]);} alert(azlistkey.length);*/
for(i=0;i<azlistkey.length;i++){ str=str+"<table style='border:2px #a00 solid; width:100%;'>"; /*mgz=0;*/ kil="";
/* alert(azlistkey[i].attributes.getNamedItem(attrib).value+"-"+rif); */
/*var rg1=azlistkey[i].attributes.getNamedItem(attrib).value.match(rif); */
/*var valcmp=azlistkey[i].attributes[0].value;*/ /*alert(valcmp+"\n"+rif);*/ /*rg1=valcmp.match(rif); */ 
if(rif==undefined){rif=obj.value;  /*alert(obj.id+"\n"+rif);*/ }
for(k=0;k<azlistkey[i].attributes.length;k++){var valcmp=azlistkey[i].attributes.getNamedItem(obj.id).value; 
p1=valcmp.indexOf(rif);
/* alert(rg1+"-"+azlistkey[i].attributes.getNamedItem(attrib).value); *//* alert(azlistkey[i].attributes[0]+"\n"+valcmp+"\n"+p1); */
/*if(rg1!=null)*/if(p1>-1){ if(reg=="regaccred.xml"){ tipop2=azlistkey.item(i).attributes.getNamedItem("settore").value; 
/*abop=azlistkey.item(i).attributes.getNamedItem("accesso").value;*/ nrcop=azlistkey.item(i).attributes.getNamedItem("resp_com").value;}
azlistattrib2=azlistkey.item(i).attributes; 
 /* for(n=0;n<azndtef.length;n++){alert(azlistattrib2.getNamedItem(azndtef[n]).value+"-"+atrbind[n]); } */ 
for(j=0;j<azdtef.length;j++){ 
str=str+"<tr><td class='az1' style='width:30%'>"+datiformtip[azdtef[j]]+"</td><td class='az2'>";
switch(datiformtipinp[azdtef[j]]){ 
case "number":{str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='"+azlistattrib2.getNamedItem(azndtef[j]).value+"' type='number' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")'></td></tr>"; break;}
case "text":{str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='"+azlistattrib2.getNamedItem(azndtef[j]).value+"' type='text' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")'";
/*if(wstipreg!=tipreg[0]||wstipreg==tipreg[3]){if(j==0||j==1||j==2){str=str+" readonly></td></tr>";}else{str=str+" ></td></tr>";}}*/
if(wstipreg!=tipreg[0] && (sec!="emergenziali" && sec!="straordinarie")){if(j==0||j==1||j==2){str=str+" readonly ";}/*else{str=str+" ></td></tr>";}*/ }
if(wstipreg==tipreg[0] ){if(j==0){str=str+" readonly ></td></tr>";} /*else{str=str+" ></td></tr>";}*/ }
if(wstipreg==tipreg[12]){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+" readonly ";}}
if(wstipreg!=tipreg[12]){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+" readonly ";}}
if(wstipreg!=tipreg[0] && (sec=="emergenziali" || sec=="straordinarie")){ /*alert(j+"\n"+datiformtip[azdtef[j]]);*/
if(j==0||j==1){ str=str+" readonly "; } /*if(j==2){alert(str); }*/ /*else{str=str+" ></td></tr>";}*/ }
str=str+" ></td></tr>";
 break;}
case "textarea":{str=str+"<textarea name='"+datiformtip[azdtef[j]]+"' rows='3' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")'";
/*alert(wstipreg+"\n"+tipreg[1]); */
if(wstipreg==tipreg[12] && j>2 ){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); 
if(p1>-1){mgz=1;str=str+" readonly"; kil="canc:<input type='text' oninput='cancingredspec(this,\""+ntot+"\")' title='selezionare e trascinare il nome dell&#39;ingrediente da eliminare' style='size:130px;'>";}} 
/* alert(azndtef[j]);*/ str=str+" '> "+azlistattrib2.getNamedItem(azndtef[j]).value.replace(/§/g,"\n")+"</textarea> <input type='text' id='textarap' pattern='"+datiformpattern[dtef[i]]+"' style='display:block;' >"+kil+"</td></tr>"; break;}
case "password":{str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='"+azlistattrib2.getNamedItem(azndtef[j]).value+"' type='password' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")'></td></tr>"; break;}
case "selectsec":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=1;n<nsectorind.length;n++){str=str+"<option value='"+ssectorind[n]+"' "; if(ssectorind[n]==tipop2){ str=str+" selected ";}
str=str+">"+nsectorind[n]+"</option> ";} str=str+"</select></td></tr>";  break;}
case "selectabil":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<nabilop.length;n++){str=str+"<option value='"+sabilop[n]+"' "; if(sabilop[n]==abop){ str=str+" selected ";} str=str+">"+nabilop[n]+"</option> ";}  str=str+"</select>"; break;}
case "selectsect":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
if(datiformtip[azdtef[j]]=="settore_prel"){str=str+"onchange='escludiins("+i+")'"; }
if(datiformtip[azdtef[j]]=="settore_ins"){str=str+"onchange='escludiprel("+i+")'"; }
str=str+"><option value='' selected></option> "; 
for(n=0;n<wssect.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=wssect[n]){str=str+"<option value='"+wssect[n]+"' >"+wssect[n]+"</option> ";} else{ str=str+"<option value='"+wssect[n]+"' selected>"+wssect[n]+"</option> ";}
}  str=str+"</select>"; break;}
case "selectrc":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' "; if(nrc[n]==nrcop){ str=str+" selected ";} str=str+">"+nrc[n]+"</option> ";}  str=str+"</select></td></tr>"; break;}
case "selectacqinaf":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<acqaffid.length;n++){str=str+"<option value='"+acqaffid[n]+"' "; if(acqaffid[n]==azlistattrib2.getNamedItem(azndtef[j]).value){ str=str+" selected ";} str=str+">"+acqaffid[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectlivdif":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivdif.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=azlivdif[n]){str=str+"<option value='"+azlivdif[n]+"' >"+azlivdif[n]+"</option> ";} else{ str=str+"<option value='"+azlivdif[n]+"' selected>"+azlivdif[n]+"</option> ";}
}  str=str+"</select>"; break;}
case "selectlivcompet":{str=str+"<select id='"+id+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivcompet.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=azlivcompet[n]){str=str+"<option value='"+azlivcompet[n]+"' >"+azlivcompet[n]+"</option> ";} else{ str=str+"<option value='"+azlivcompet[n]+"' selected>"+azlivcompet[n]+"</option> ";}
}  str=str+"</select>"; break;}
case "selectcontr":{str=str+"<select id='"+id+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azcontr.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=azcontr[n]){str=str+"<option value='"+azcontr[n]+"' >"+azcontr[n]+"</option> ";} else{ str=str+"<option value='"+azcontr[n]+"' selected>"+azcontr[n]+"</option> ";}
}  str=str+"</select>"; break;}
case "selectlivcontr":{str=str+"<select id='"+id+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivcontr.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=azlivcontr[n]){str=str+"<option value='"+azlivcontr[n]+"' >"+azlivcontr[n]+"</option> ";} else{ str=str+"<option value='"+azlivcontr[n]+"' selected>"+azlivcontr[n]+"</option> ";}
}  str=str+"</select>"; break;}
case "selectum":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<um.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=um[n]){str=str+"<option value='"+um[n]+"' >"+um[n]+"</option> ";} else{ str=str+"<option value='"+um[n]+"' selected>"+um[n]+"</option> ";}
}  str=str+"</select>"; break;}
case "selareamanu":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' readonly ><option value='"+azlistattrib2.getNamedItem(azndtef[j]).value+"' selected>"+azlistattrib2.getNamedItem(azndtef[j]).value+"</option></select>"; 
 break;}
case "selectimg":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; var nrcim=azlistattrib2.getNamedItem(azndtef[j]).value; /* var nrcimrif=nrcim.slice(0,3); alert(prefimg); */
for(n=0;n<nrcimg.length;n++){if(nrcimg[n].match(prefimg)==prefimg){ str=str+"<option value='"+nrcimg[n]+"' title='"+nomiimg[n]+"' "; if(nrcimg[n]==nrcim){ str=str+" selected ";} str=str+">"+nrcimg[n]+"</option> ";} } str=str+"</select></td></tr>"; break;}
}
} 
if(mgz==1 && rifatbcalc!=""){str=str+"<tr><td colspan=2><span id='selectmag"+ntot+"' ></span> </td></tr><tr><td colspan=2><span class='cancingr' onclick='canclastingred("+ntot+")'>cancella l'ultimo ingrediente</span> <!--&#160; <span class='cancingr' onclick='"+riffunzmgz+"("+ntot+")"+"'> calcola </span> -->&#160; cancellare il prodotto: <input type='text' name='canc' title='clicca per cambiare' onclick='cancsino(this)' value='NO' style='width:30px;'/> "; mgztot++;} 
else{str=str+"<tr><td colspan=2> cancellare: <input type='text' name='canc' title='clicca per cambiare' onclick='cancsino(this)' value='NO' style='width:30px;'/>";}
/*
if(mgz==1){str=str+"<tr><td colspan=2><span id='selectmag"+i+"' ></span> </td></tr>"; mgztot++;}
str=str+"<tr><td>cancellare: </td><th><input type='text' name='canc' title='clicca per cambiare' onclick='cancsino(this)' value='NO' style='width:30px;'/>"; 
*/
if(azdtinvisib.length>0){
for(m=0;m<azdtinvisib.length;m++){str=str+"<input class='invis' id='"+azdtinvisib[m]+"' name='"+azdtinvisib[m]+"' value='"+azlistattrib2.getNamedItem(azdtinvisib[m]).value+"'>";} str=str+"</td></tr>";}
else{ str=str+"</td></tr></table>";} 
ntot++; break;}  }	}
var azdteftot=azdtefstr; 
if(azdtinvisib.length>0){for(i=0;i<azdtinvisib.length;i++){azdteftot=azdteftot+azdtinvisib[i]+"|";}} 
azdteftot=azdteftot+"canc"; /* alert(act+"\n"+azmodpart[act]); */
/*alert(str); document.getElementsByName("dtefstr")[0].value=azdteftot;*/
str=str+"<table><tr style='display:block; height:1%;'><td ><input type='text' name='nomicamp' value='"+azdteftot+"' /><input type='text' name='numkey' value='"+(ntot)+"' /> <input type='text' name='nomebloc' value='"+sec+"' /> <input type='text' name='cred1' value='"+cred1+"' /><input type='text' name='cred2' value='"+cred2+"' /><input type='text' name='tipop' value='"+tipop+"' /> <input type='text' name='act' value='"+azmodpart[act]+"' /><input type='text' name='nomereg' value='"+reg+"' /> <input type='text' name='tipdireg' value='"+treg+"' /><input type='text' name='rif' value='"+rif+"' /> <input type='text' name='attrib' value='"+attrib+"' /> </td></tr></table>";
/* for(n=0;n<azndtef.length;n++){str=str+azdtef[n]+"-"; } <input type='text' name='nomereg' value='"+reg+"' />*/
if(prov!="azinviaaggcronop3"){ var aggrapinterv="ok";
if(treg=="rapinterv"){
/*azienda|secmit|odshtm|ods|secdest|areaint|typemanu|cella|nomreg|data_inizio|data_fine|ore_intervento|risultato|costo'*/
/*var dtefstr="azienda|secmit|odshtm|ods|secdest|areaint|typemanu";*/
/*"azienda|secmit|odshtm|ods|secdest|areaint|typemanu|cella|nomreg|data_inizio|data_fine|ore_intervento|risultato|costo|rif_data_richiesta";
for(j=0;j<azdtef.length;j++){dtefstr=dtefstr+"|"+azndtef[j]; } */
str=str+"<!--<input type='text' name='areaint' value='' > <input type='text' name='typemanu' value='"+sec+"' > <input type='text' name='nomreg' value='"+wsnomreg+"' > <input type='text' name='secdest' value='"+secdest+"' ><input type='text' name='dtefstr' value='"+azdteftot+"' > -->"; 
}} 
if(reg=="mgz_produzioni_.xml"||reg=="produzioni_.xml"){prov=reg;}
str=str+"invia: <select id='sel"+selec+"' onchange='ctrlinviamod(\""+azdtefstr+"\", "+(ntot)+",\""+prov+"\",\""+sec+"\",\""+stato+"\")'><option value='' selected></option></select></center></form>";  
if(ntot==0){rispric.innerHTML="attenzione, il dato immesso non è stato trovato <mark>rispettare le maiuscole</mark>"; return;}
else{rispric.innerHTML="sono stati trovati <b>"+ntot+"</b> record contenenti il riferimento inserito<br/><mark>procedere con cautela</mark>";} 
area2.innerHTML=area2.innerHTML+str; 
if(treg=="rapinterv"){ var azdteftot="azienda|secmit|odshtm|secdest|typemanu|nomreg"; azdteftot=azdteftot+"|"+azdtefstr; 
var lsn=document.getElementById("datigen").childNodes; 
/*for(j=0;j<lsn.length;j++){alert(lsn[j].nodeName+"\n"+lsn[j].name+"\n"+lsn[j].value); } */
for(j=0;j<lsn.length;j++){if(lsn[j].name=="secdest"){lsn[j].value=secdest; /*alert(secdest);*/} if(lsn[j].name=="dtefstr"){lsn[j].value=azdteftot; }}
} document.getElementById("popup").innerHTML=str;
/*
var x=document.getElementById("datigen").childNodes[1]; var m=document.getElementById("datigen").childNodes.length;
for(j=0;j<m;j++){ x=document.getElementById("datigen").childNodes[j];
if(x.name="secdest"){x.value==secdest;} } 
x.value=azdteftot;} else{azdteftot=azdteftot+azdtefstr;  } */
/*document.getElementsByName("areaint")[0].value=document.getElementsByName("area_intervento")[0].value; */
caricasel("inviamod",selec);
if(reg==qfunc('8212469124711246712479124771248312473124781248412446124881247712476124') || reg==qfunc('8212469124711246712479124771248312469124881248412446124881247712476124')){
for(i=0;i<azlistkey.length;i++){for(j=0;j<azndtef.length;j++){document.getElementsByName(azndtef[j])[i].readonly='true';  } }}
/* alert(mgztot+"\n"+mgz);*/ if(mgztot>0){vediselectmag(azlistkey.length,"parziale"); }
/*alert(wstipreg.value+"-"+tipreg[1]); if(wstipreg.value==tipreg[1]){readonlyvoce(0); } alert(treg);*/
if(rifsec!="nome" && treg!="rapinterv"  && treg!="rapgilav"){ var k=0,j=0;
for(j=0;j<ntot+1;j++){for(k=0;k<3;k++){if(ntot>1){document.getElementsByName(azndtef[k])[j].readonly=true;}
else{document.getElementsByName(azndtef[k]).readonly=true;} }} }
}
function azmodpartins(prov,reg,act){percorso=percorso+"azmodpartins; ";  /*alert("azmodpartins\n"+prov+"\n"+reg+"\n"+act); */
 if(prov=="azmodsingol" && (reg.indexOf("mgz_acqvnd_")>-1 || reg.indexOf("mgz_prdvnd_")>-1)){var indmgz="../"+wsaz+"/magazzini/", operaz="modsing_mgz_acqvnd"; indlista="../"+wsaz+"/datiazienda/"; var gestione="insertnewrec_acqvnd";
var rifasp="progasp/generalistasetmerc.asp?indmgz="+indmgz+"&indlista="+indlista+"&operaz="+operaz; window.open(rifasp,"popup"); 
wsnomreg=wsaz+"/datiazienda/listasetmerc.xml"; azletreg=leggidatiaziendali(wsnomreg); wsfgestisciacqvnd_1(0,gestione,reg);
/*document.getElementById("modprtins").style.display="none"; */ return;
 }
var i=0, ntot=-1, str="", prov="azmodsingolins",p1=-1,areatip="",artip="",operaz=""; 
/*var modextern3=document.getElementById("modextern3");alert(prov+"-"+reg+"-"+act+"-"+tipop);*/
var area1=document.getElementById("area1"); 
/*if(wstipreg!=tipreg[8] && wstipreg!=tipreg[9] && wstipreg!=tipreg[1] && wstipreg!=tipreg[3]){*/
if(wstipreg!=tipreg[8] && wstipreg!=tipreg[12] && wstipreg!=tipreg[3]){
str=str+"Inserisci il numero delle chiavi da aggiungere: <input type='number' value='0' id='numnewrec' onchange='ctrlaccred1(this);'/> ";}
if(wsnomreg.indexOf("mgz_acqvnd_")>-1){operaz="acq_vnd"; area1.innerHTML=str+"<div id='area_1'></div>"; azmodpartins_01(prov,reg,act,operaz); return; }
if(wstipreg==tipreg[12]){ 
str=str+"Per selezionare e tresmettere piu' informative <b>devi tenere premuto [ctrl] durante la selezione dei documenti da caricare</b> nel registro <mark>"+wsnomreg+"</mark>.<br/> <input type='number' value='1' id='numnewrec' onchange='ctrlaccred1(this);' readonly style='display:none;' /><br/> ";}
var i=0; /* alert(azsecind.length); alert(wstipreg+" - "+tipreg[5]+" - "+indbasexml+reg); */
if(wstipreg==tipreg[5]){nvarxml=leggidatiaziendali(indbasexml+reg); }
/* alert(wstipreg+"\n"+reg+"\n"+azxmlreq.responseText); alert(reg);*/ 
if(wstipreg==tipreg[1] && reg=="mgz_produzioni_.xml"){areatip="acquisti";}
if(wstipreg==tipreg[1] && reg!="mgz_produzioni_.xml"){areatip="";}
if(wstipreg==tipreg[4]){areatip="mercanzie";} /*alert(areatip);*/
if(areatip=="acquisti"){lskaree=nvarxml.getElementsByTagName("keyarea"); /*alert(lskaree.length);*/
for(i=0;i<lskaree.length;i++){/*alert(lskaree[i].attributes[0].value+"\n"+areatip);*//*if(lskaree[i].attributes[0].value==areatip)*/
artip=lskaree[i].attributes[0].value; if(artip.indexOf(areatip)>-1){azlistkeyrif=lskaree[i].getElementsByTagName("keyrif"); break;} }}
else{azlistkeyrif=nvarxml.getElementsByTagName("keyrif");  }
/* alert(azlistkeyrif.length+"\n"+areatip); */
if(azlistkeyrif.length==0){ str="* ATTENZIONE * l'area "+areatip+" o la sezione del registro "+reg+" non contiene alcuna sezione. Procedere con la modifica della struttura e il caricamento della sezione e delle relative chiavi."; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; }
if(azsecind.length>0){var n=azsecind.length; for(i=0;i<n;i++){azsecind.pop();} } 
for(i=0;i<azlistkeyrif.length;i++){var nome=azlistkeyrif.item(0).attributes.item(0).nodeName; 
azsecind.push(azlistkeyrif.item(i).attributes.getNamedItem(nome).value);}
var str=str+"Seleziona la sezione del registro in cui aggiungere le nuove chiavi: <select id='selsec' onchange='azmodpartins2(\""+prov+"\",\""+reg+"\",\""+act+"\",this.value)'><option value=''></option>";
str=str+"</select><br/><span id='rispric'></span>"; 
/*
if(reg!="mgz_produzioni_.xml"){for(i=0;i<azsecind.length;i++){str=str+"<option value='"+azsecind[i]+"'>"+azsecind[i]+"</option>";} 
str=str+"</select><br/><span id='rispric'></span>"; }
else{{for(i=0;i<2;i++){str=str+"<option value='"+azsecind[i]+"'>"+azsecind[i]+"</option>";} 
str=str+"</select><br/><span id='rispric'></span>"; }}
*/
area1.innerHTML=str;  azcaricaselgroup(reg,"selsec",areatip);
}
function azmodpartins_01(prov,reg,act,operaz){percorso=percorso+"azmodpartins_01; ";  /*alert("azmodpartins_01\n"+prov+"\n"+reg+"\n"+act+"\n"+operaz); */
var lskeyreg=nvarxml.getElementsByTagName(catsel); var lskeyaree=nvarxml.getElementsByTagName("keyarea");
atbsection=lskeyreg[0].attributes.getNamedItem("section").value;
str=str+"Seleziona la <b>categoria di mercanzie</b> che interessa: <select id='areaint' onchange='wsfgestisciacqvnd_2("+n+",\""+gestione+"\",this.value)' ><option value='' selected></option>";
if(lskeyreg[0].attributes.getNamedItem("section")!=null){ 
for(i=0;i<lskeyaree.length;i++){arint=lskeyaree[i].attributes[0].value; if(arint!="acquisti_prd"){ 
str=str+"<optgroup label='"+arint+"'>";
var lssection=lskeyaree[i].getElementsByTagName(atbsection); 
for(r=0;r<lssection.length;r++){categ=lssection[r].attributes[0].value;
str=str+"<option value='"+categ+"|"+arint+"'>"+categ+"</option>";}}str=str+"</optgroup>"; } str=str+"</select><div id='seltip'></div>"; }
document.getElementById("area_1").innerHTML=str+"<div id='area_2'></div>";
}
function azmodpartins2(prov,reg,act,sec){percorso=percorso+"azmodpartins2; ";  var rispric=document.getElementById("rispric"); var k=0, i=0, j=0, s=0, v=0;
/* alert("azmodpartins2 \n"+prov+"\n"+reg+"\n"+act+"\n"+sec+"\n"+azndtef); */
var numnewrec=document.getElementById("numnewrec").value; /* alert(azxmlreq.responseText); */
if(numnewrec==0){alert("ATTENZIONE\n\n devi indicare il numero di chiavi da aggiungere nel settore \n"+sec+" \n dell'archivio\n"+reg);}
var rif=sec, atrbind=new Array(); /* alert(prov+"-"+reg+"-"+azmodpart[act]+"-"+sec); */
if(azndtef.length>0){var n=azndtef.length; for(i=0;i<n;i++){azndtef.pop(); azdtef.pop(); atrbind.pop();} }
/*
if(azdtinvisib.length>0){var n=azdtinvisib.length; for(i=0;i<n;i++){azdtinvisib.pop();} }
if(reg==qfunc('82124691247112465124671246712482124691246812446124881247712476124')){azdtinvisib=new Array("pw", "pww", "mail"); }
*/
if(reg=="regaccred.xml"||reg=="acquirenti_"+wssec+".xml"){ azdtinvisib=new Array("pw", "pww", "mail");}
azlistkeyrif=nvarxml.getElementsByTagName("keyrif"); 
for(i=0;i<azlistkeyrif.length;i++){ var nome=azlistkeyrif.item(0).attributes.item(0).nodeName;
if(azlistkeyrif.item(i).attributes.getNamedItem(nome).value==sec){
azlistkey=azlistkeyrif[i].getElementsByTagName("key"); azlistattrib=azlistkeyrif.item(i).attributes; 
var nattrib=azlistattrib.length; 
/* var listreg=nvarxml.getElementsByTagName(reg); var prefimg=listreg[0].attributes[1].value; listaimmagini(prefimg); */
var trovato=0; for(j=1;j<nattrib;j++){if(azlistattrib[j].value=="immagine"){trovato=1;} }
if(trovato==1){ var azlistrifimg=azlistkeyrif[i].getElementsByTagName("rifimg"); prefimg=azlistrifimg[0].attributes[0].value;  /*alert(prefimg); var atbnom=azlistrifimg[0].attributes[1].value; */  caricanrcimg(); caricanomiimg();}} } 
var nattrib=azlistattrib.length; var trovato=0; 
/*
if(azdtinvisib.length>0){for(i=1;i<nattrib;i++){trovato=0; for(j=0;j<azdtinvisib.length;j++){
	if(azlistattrib[i].value==azdtinvisib[j]){trovato=1;}} if(trovato==0){azndtef.push(azlistattrib[i].value); atrbind.push(i);}}}
	else{for(i=1;i<nattrib;i++){azndtef.push(azlistattrib[i].value); atrbind.push(i);} }
*/
if(azdtinvisib.length>0){for(i=1;i<nattrib;i++){trovato=0; for(j=0;j<azdtinvisib.length;j++){
if(azlistattrib[i].value==azdtinvisib[j]){trovato=1;}} 
if(trovato==0 && azlistattrib[i].nodeName.indexOf("rif")>-1 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){azndtef.push(azlistattrib[i].value); /*atrbind.push(i);*/}}}
else{for(i=1;i<nattrib;i++){if(azlistattrib[i].nodeName.indexOf("rif")>-1 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){ azndtef.push(azlistattrib[i].value); } }} 
var rifsec="";
	var azdtefstr="", str="", ntot=0, mgz=0;  
switch(wstipreg){ case tipreg[0]:{rifsec="nome"; break;} case tipreg[12]:{rifsec="tipologia_prodotti"; break;} 
case tipreg[1]:{rifsec="tipologia_componenti"; break;}case tipreg[2]:{rifsec="tipologia_componenti"; break;} case tipreg[3]:{rifsec="tipologia_componenti"; break;} 
} /* alert(wsnomreg+" - "+wstipreg); */
if(wstipreg==tipreg[0]){rifsec="nome";} 
if(wstipreg==tipreg[12]){rifsec="tipologia_documenti"; } 
if(wstipreg==tipreg[1]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[2]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[3]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[4]){rifsec="tipologia_prodotti"; mgz=1;} 
if(wstipreg==tipreg[5]){if(wsnomreg.indexOf("mgz_")>-1 ){rifsec="tipologia_componenti"; } 
else if(wsnomreg.indexOf("rapgilav_")>-1 ){rifsec="azione"; } else{rifsec="type_activity";} }
if(wstipreg==tipreg[6]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[7]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[8]){rifsec="tipologia_prodotti";} 
/*if(wstipreg==tipreg[9]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[10]){rifsec="tipologia_prodotti";} */
if(wstipreg==tipreg[9]){rifsec="data";} /*alert(rifsec);*/
if(wstipreg==tipreg[10]){rifsec="manutenzioni";}
for(i=0;i<azlistkeyrif.length;i++){ /*alert(azlistkeyrif.item(i).attributes.getNamedItem(rifsec).value+" ** "+sec);*/
if(azlistkeyrif.item(i).attributes.getNamedItem(rifsec).value==sec){
if(wstipreg!=tipreg[0] && wstipreg!=tipreg[12] && wstipreg!=tipreg[10]){rifatbcalc=azlistkeyrif.item(i).attributes.getNamedItem("calcolati").value;
if(wstipreg==tipreg[4]){ /*var mgzin=azlistkeyrif.item(i).attributes.getNamedItem("magazzini_in").value;	
var mgzinn=mgzin.split(","); rifmgz=mgzinn[0];*/ rifmgz="mgz_produzioni_.xml";}
if(wstipreg==tipreg[5]){ var mgzin=azlistkeyrif.item(i).attributes.getNamedItem("magazzino").value;	
var mgzinn=mgzin.split(","); rifmgz=mgzinn[0];}  }; break; }  }
 for(i=0;i<azndtef.length;i++){azdtefstr=azdtefstr+azndtef[i]+"|";}  /* alert(azdtefstr); */
for(i=0;i<azndtef.length;i++){ for(j=0;j<datiformtip.length;j++){if(azndtef[i]==datiformtip[j]){azdtef.push(j); }}}
/* var trovato=0;
for(i=1;i<nattrib;i++){if(azlistattrib[i].value=="immagine"){trovato=1;} if(trovato==1){caricanrcimg(); caricanomiimg(reg,sec,nattrib);}} */
if(wstipreg==tipreg[3]){ caricaelmgz(indbasexml+reg,sec); }
 for(s=0;s<numnewrec;s++){ntot++; mgz=0; str=str+"<table style='border:2px #a00 solid; width:100%;'>"; 
if(wstipreg==tipreg[3]){ str=str+"<tr><td colspan=2>Seleziona l'elemento del magazzino da prelevare o da inserire:<br/><select id='selelem'"+s+" onchange='inseriscirifel(this.value,"+s+")' ><option value=''></option>";
for(k=0;k<wselmgz.length;k++){str=str+"<option val='"+wselmgz[k]+"'>"+wselmgz[k]+"</option>"; }
str=str+"</select> </td></tr>"; }
/*alert(rifatbcalc);*/
for(j=0;j<azdtef.length;j++){str=str+"<tr><td class='az1' style='width:30%'>"+datiformtip[azdtef[j]]+"</td><td class='az2'>";
switch(datiformtipinp[azdtef[j]]){ 
case "number":{str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='' type='number' required title='"+datiformp[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")'></td></tr>"; break;}
 case "text":{var vv=""; if(datiformtip[azdtef[j]]=="data_ins"){vv=oggi;} str=str+"<input name='"+datiformtip[azdtef[j]]+"' type='text' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'";
/*if(wstipreg==tipreg[1] && datiformtip[azdtef[j]].indexOf("quantita_">-1)){mgz=1;str=str+" readonly ></td>";}else{ str=str+"></td>";} */
if(wstipreg==tipreg[12] && (j==0||j==1||j==2)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; /*str=str+" readonly ";*/ str=str+" value=''";}}
if(wstipreg==tipreg[12] && j==0){str=str+" value='"+wsoggi+"'";}
if(wstipreg==tipreg[12] && (j>2)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+" value='' readonly";}}
if(wstipreg!=tipreg[12] && wstipreg!=tipreg[5]){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){/*str=str+" readonly ";*/ str=str+" value=''";}}
/* alert(wstipreg+" ** "+tipreg[5]+" ** "+j); */
if(wstipreg==tipreg[5] && (j==0)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+" value='"+wsoggi+"' readonly";}}
if(wstipreg==tipreg[4]){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+" value='' readonly";}}
str=str+" ></td>"; 
break;}
case "textarea":{str=str+"<textarea name='"+datiformtip[azdtef[j]]+"' rows='3' required title='"+datiformtit[azdtef[j]]+datiformpattern[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")'";
/*if(datiformtip[azdtef[j]]=="ingredienti")*/var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); 
if(p1>-1){mgz=1;str=str+" readonly";} str=str+" '></textarea> <input type='text' id='textarap' pattern='"+datiformpattern[dtef[i]]+"' style='display:block;' ></td></tr>"; break;}
case "file":{prov=prov+"_file"; str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='' type='file' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")' multiple /></td>"; break;}
case "password":{str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='' type='password' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")'></td></tr>"; break;}
case "selectsec":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' selected></option> "; 
for(n=1;n<nsectorind.length;n++){str=str+"<option value='"+ssectorind[n]+"' "; str=str+">"+nsectorind[n]+"</option> ";} str=str+"</select></td>";  break;}
case "selectabil":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' selected></option> "; 
for(n=0;n<nabilop.length;n++){str=str+"<option value='"+sabilop[n]+"' "; str=str+">"+nabilop[n]+"</option> ";}  str=str+"</select>"; break;}
case "selectsect":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
if(datiformtip[azdtef[j]]=="settore_prel"){str=str+"onchange='escludiins("+s+")'"; }
if(datiformtip[azdtef[j]]=="settore_ins" && rifsec!="tipologia_documenti"){str=str+"onchange='escludiprel("+s+")'"; }
str=str+"><option value='' selected></option> "; 
for(n=0;n<wssect.length;n++){str=str+"<option value='"+wssect[n]+"' "; str=str+">"+wssect[n]+"</option> ";}  str=str+"</select>"; break;}
case "selectrc":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' >"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectacqinaf":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<acqaffid.length;n++){str=str+"<option value='"+acqaffid[n]+"' >"+acqaffid[n]+"</option> ";}  str=str+"</select></td></tr>"; break;}
/*
case "selectimg":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<nrcimg.length;n++){str=str+"<option value='"+nrcimg[n]+"' >"+nrcimg[n]+"</option> ";}  str=str+"</select></td>"; break;}
*/
case "selectum":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<um.length;n++){str=str+"<option value='"+um[n]+"' >"+um[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectlivdif":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivdif.length;n++){ str=str+"<option value='"+azlivdif[n]+"' >"+azlivdif[n]+"</option> ";
}  str=str+"</select>"; break;}
case "selectlivcompet":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivcompet.length;n++){ str=str+"<option value='"+azlivcompet[n]+"' >"+azlivcompet[n]+"</option> ";
}  str=str+"</select>"; break;}
case "selectlivcontr":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivcontr.length;n++){ str=str+"<option value='"+azlivcontr[n]+"' >"+azlivcontr[n]+"</option> ";
}  str=str+"</select>"; break;}
case "selectcontr":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azcontr.length;n++){ str=str+"<option value='"+azcontr[n]+"' >"+azcontr[n]+"</option> ";
}  str=str+"</select>"; break;}
case "selareamanu":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value=''></option></select>"; 
 break;}
case "selectimg":{ str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> ";/* var nrcim=azlistattrib.getNamedItem(azndtef[j]).value; var nrcimrif=nrcim.slice(0,3); alert(prefimg); */
for(n=0;n<nrcimg.length;n++){if(nrcimg[n].match(prefimg)==prefimg){ str=str+"<option value='"+nrcimg[n]+"' title='"+nomiimg[n]+"' >"+nrcimg[n]+"</option> ";} } str=str+"</select></td>"; break;}
} }
if(mgz==1){str=str+"<tr><td colspan=2><span id='selectmag"+s+"' ></span> </td></tr><tr><td colspan=2><span class='cancingr' onclick='canclastingred("+s+")'>cancella ultimo componente</span> <!--&#160; <span class='cancingr' onclick='"+riffunzmgz+"("+s+")"+"'> calcola </span>--></td></tr>";} 
/*str=str+"<tr style='display:none'><td>cancellare: </td><th><input type='text' name='canc' title='clicca per cambiare' onclick='cancsino(this)' value='NO' style='width:30px;'/>"; */
if(azdtinvisib.length>0){
for(m=0;m<azdtinvisib.length;m++){str=str+"<input class='invis' id='"+azdtinvisib[m]+"' name='"+azdtinvisib[m]+"' value=''>";} str=str+"</th></tr></table>";} else{str=str+"</th></tr></table>";}
/* else{ str=str+"</th></tr><tr><td colspan=2>calorie:<input type='text' id='cal"+s+"' value='0' style='width:10%;'> costo:<input type='text' id='cst"+s+"' value='0' style='width:10%;'> allergeni:<input type='text' id='alg"+s+"' value='0' style='width:10%;'>  <span class='cancingr' onclick='valutaingred("+s+")'> <mark> calcola </mark> </span></td></tr></table>";} */
} 
var azdteftot=""; 
if(azdtinvisib.length>0){for(i=0;i<azdtinvisib.length;i++){azdteftot=azdteftot+azdtinvisib[i]+"|";}} azdteftot=azdteftot+azdtefstr;
str=str+"<table><tr style='display:none; height:1%;'><td ><input type='text' name='nomicamp' value='"+azdteftot+"' /><input type='text' name='numkey' value='"+(ntot)+"' /><input type='text' name='nomereg' value='"+reg+"' /> <input type='text' name='nomebloc' value='"+sec+"' /> <input type='text' name='cred1' value='"+cred1+"' /><input type='text' name='cred2' value='"+cred2+"' /><input type='text' name='tipop' value='"+tipop+"' /> <input type='text' name='act' value='"+azmodpart[act]+"' /> <input type='text' name='rif' value='"+rif+"' /> </td></tr></table>";
str=str+"invia: <select id='selinv' onchange='ctrlinviamod(\""+azdtefstr+"\", "+(ntot)+",\""+prov+"\")'><option value='' selected></option></select></center></form>";  
if(ntot==0){rispric.innerHTML="attenzione, il dato immesso non è stato trovato <mark>rispettare le maiuscole</mark>"; return;}
else{rispric.innerHTML="modulo predisposto per l'inserimento di <b>"+ntot+"</b> <mark>nuovi record</mark>";}
area2.innerHTML=str; /*alert(str);*/ caricasel("inviamod","selinv"); if(mgz==1){vediselectmag(numnewrec,"parziale"); }
if(rifsec!="nome" && rifsec!="type_activity" && rifsec!="tipologia_documenti" && rifsec!="manutenzioni"){for(s=0;s<numnewrec;s++){document.getElementsByName("modello")[s].value="M1"; document.getElementsByName("versione")[s].value="V1"; } } 
if(wstipreg==tipreg[10]){azcaricaareint("area_intervento");
}
/*alert(azdteftot);*/
/*if(wstipreg==tipreg[3]){for(v=0;v<3;v++){document.getElementsByName(azndtef[v])[s].readOnly=true; }}*/
/*if(rifsec!="nome"){var k=0,j=0;for(j=0;j<ntot+1;j++){for(k=0;k<3;k++){document.getElementsByName(azndtef[k])[j].readOnly=true;}}}*/
}
function azcaricaareint(sel){percorso=percorso+"azcaricaareint; ";  var p1=wsnomreg.indexOf("_"); var lavman=wsnomreg.slice(p1+1), s=0, i=0, j=0; 
/*alert(indbasexml+" - "+lavman);  alert(sel);*/
var sel=document.getElementsByName(sel); /*alert(sel[0].value);*/ var tipmsel=document.getElementById("selsec").value;
nvarxml=leggidatiaziendali(indbasexml+lavman); /* alert(azxmlreq.responseText);  */
var listkeytipm=nvarxml.getElementsByTagName("keytipm"); /*alert(sel.length);*/
for(s=0;s<sel.length;s++){
for(i=0;i<listkeytipm.length;i++){var tipm=listkeytipm[i].attributes[0].value; /* alert(tipm+" - "+tipmsel); */
if(tipm==tipmsel){ var listkeyarint=listkeytipm[i].getElementsByTagName("keyrif");
for(j=0;j<listkeyarint.length;j++){ var opval=listkeyarint[j].attributes[0].value; /* alert(opval);  */
op=document.createElement('OPTION');op.value=opval; op.text=opval; sel[s].add(op); } 
sel[s].title='selezionare un elemento dall\'elenco'; } } }
/*
for(n=0;n<azlivdif.length;n++){ str=str+"<option value='"+azlivdif[n]+"' >"+azlivdif[n]+"</option> ";
}  str=str+"</select>";*/
}
function azmodglobalstrut_0_SI(operaz,tipreg,nomreg,liv,elstrutnew,numsezliv,rifdiv,livp){percorso=percorso+"azmodglobalstrut_0_SI; "; /*azdtstrutsezsel[liv]=nomsez;alert(azdtnomesezliv); */ 
/* alert("azmodglobalstrut_0_SI\n"+operaz+"\n"+tipreg+"\n"+nomreg+"\n"+liv+"\n"+livp+"\n"+elstrutnew+"\n"+numsezliv+"\n"+rifdiv);  */
var nsz="",livsel="",nomsez="",ind=0; if(livp==null){livp=liv;}  nomsez=livp; /*alert(nomsez);*/
/*
var p1=0,i=0,rifsez=""; p1=azdtcommonlist.indexOf(liv); alert(p1); if(p1==3){azlistkey=nvarxml.getElementsByTagName(dtstrut[liv-2]); rifsez=azlistkey[0].attributes[0].value; alert(rifsez);
azlistkey=azlistkey[0].getElementsByTagName(dtstrut[liv-1]); alert(azlistkey.length); for(i=0;i<azlistkey.length;i++){ alert(azlistkey[i].attributes[0].value); } }
*/
azlistkey=nvarxml.getElementsByTagName(dtstrut[liv-1]); for(i=0;i<azlistkey.length;i++){  if(azlistkey[i].attributes[0].value==nomsez){ind=i;break; } } 
azlistkey=azlistkey[ind].getElementsByTagName(dtstrut[liv]);
/*if(liv==0&&liv==livp){azlistkey=nvarxml.getElementsByTagName(dtstrut[liv]); } if(azlistkey[0]!=null){ azknar[liv]=azlistkey[0].attributes[0].nodeName;} */
var dtnamesezstrutar=new Array(); dtnamesezstrutar=azdtnomesezliv.split(",");
var str="<table>",dtstrut=new Array(),sez=new Array(),i=j=0,nomsezliv="",p1=0,numsezlivfin=0,info="",atb="",listatb="",atbiniz="",keyrifar=new Array(),invisibar=new Array(),calcar=new Array(),specar=new Array(); dtstrut=azdtstrut; for(i=0;i<azlistkey.length;i++){  sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); /*alert(sez);*/
var frmph="([,]{1}[A-Z]{1}[A-Za-z0-9_\-]{1,40})+"; /* alert(liv);*/ /*azlistkey=nvarxml.getElementsByTagName(dtstrut[liv]);*/
numsezlivfin=aznumsezliv[liv]; 
/*alert("numsezlivfin="+numsezlivfin+"\nnumsezliv="+numsezliv);alert("azmodglobalstrut_0\n"+azdtstrut+"\n"+azdtstrutsezsel+"\n"+azknar+"\n"+aznumsezliv+"\n"+liv+"\n"+livp+"\n"+dtstrut.length);*/
str=str+"<tr><td>digita la lista dei <b>nomi delle sezioni</b> di livello <b>"+dtstrut[liv]+"</b> da inserire in tutte le sezioni di livello <b>"+dtstrut[liv-1]+"</b> del registro <b>"+nomreg+"</b> denominate <b>"+nomsez+"</b>. Attualmente il livello <b>"+dtstrut[liv]+"</b> contiene n.<b>"+azlistkey.length+"</b> sezioni:<br/><center><b>";
if(azlistkey.length>0){ for(i=0;i<azlistkey.length;i++){ sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); }
for(i=0;i<azlistkey.length;i++){str=str+"*** "+sez[i]+","; nomsezliv=nomsezliv+","+azlistkey[i].attributes[0].value; }
str=str+"</b></center> <input type='text' id='lsnewsez' value='' pattern='"+frmph+"' placeholder='lista di nomi (in lettere maiuscole) preceduti dalla ,' title='"+frmph+"' onblur='centroctrldata(this,\"text\")' /></td></tr>"; /*alert(liv+"\n"+(dtstrut.length-2));*/
/*if(numsezlivfin>-1){*/ /*var livstrut=nvarxml.getElementsByTagName(dtstrut[liv]);*/ 
 /* str=str+"<tr><td><input type='text' id='nomnewsez' value='"+dtnamesezstrutar[liv]+"' readonly /> </td></tr>"; */  /*alert(liv+"\n"+dtstrut+"\n"+dtstrut.length);*/
if(liv*1==(dtstrut.length-2)&&dtstrut[liv]!="key"){ info="N.B.: Le sezioni del livello <b>keyrif</b> devono contenere gli attributi che caratterizzano i componenti specifici del livello <b>key</b>. La lista di questi attributi e' comune a tutte le sezioni <b>keyrif</b> di una stessa sezione di livello superiore. Poiche' la sezione di livello superiore <b>"+dtstrut[liv-1]+"</b> indicata gia' contiene sezioni <b>keyrif</b>, la lista degli attributi da adottare viene ricopiata dalle sezioni precedenti."; 
str=str+"<tr><td>Il livello "+dtstrut[liv]+" gia' contiene n."+azlistkey.length+" sezioni, pertanto:<b>"; /*alert(numsezlivfin+"\n"+azlistkey.length);*/
if(numsezlivfin>0){ var lsatb=azlistkey[0].attributes; for(i=0;i<lsatb.length;i++){atb=lsatb[i].nodeName; if(atb.indexOf("rif")==0){listatb=listatb+","+lsatb[i].value; } }
str=str+"<tr><td>la lista degli attributi e' la stessa delle sezioni keyrif dello stesso livello e vale:<br/><input type='text' id='atbkey' value='"+listatb+"' onchange='centroctrldata(this,\"text\")' ></td></tr>";}
if(numsezlivfin==0){ str=str+"<tr><td>la lista degli attributi delle sezioni keyrif deve essere completata selezionando dalla seguente select gli attributi necessari:<select multiple onchange=' document.getElementById(\"atbkey\").value=document.getElementById(\"atbkey\").value+this.value+\",\"'><option selected value=''></option>"; 
for(i=0;i<datiformtip.length;i++){str=str+"<option value='"+datiformtip[i]+"'>"+datiformtip[i]+"</option>"; }
str=str+"</select> <br/><input type='text' id='atbkey' value='"+atbiniz+"' onchange='centroctrldata(this,\"text\")' ></td></tr>";}
frmph="[A-Za-z0-9_\-]{3,20}";  /*alert(liv+"\n"+dtstrut+"\n"+dtstrut.length);*/
str=str+"<tr><td>il nome col quale le sezioni di livello <b>"+dtstrut[liv]+"</b> devono essere individuate all'interno del registro e': <input type='text' id='nomnewsez' value='"+dtnamesezstrutar[liv]+"' readonly pattern='"+frmph+"' placeholder='nome identificativo delle sezioni (da 3 a 20 caratteri alfanumerici _-)' title='"+frmph+"' onblur='centroctrldata(this,\"text\")' /></td></tr>"; } /*}*/ 
wssubmodul.innerHTML=info; 
str=str+" </table> <center><button onclick='azinviamodglobalstrut(\""+operaz+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezlivfin+"\",\""+nomsezliv+"\",\""+nomsez+"\")'  >procedi</button> <input type='text' readonly id='numsezlivtot' value='"+aznumsezliv+"' /> </center><div id='modinv'></div>"; /*alert(rifdiv);*/
if(rifdiv==null||rifdiv==""){ document.getElementById("modextern4").innerHTML=str; }else{ document.getElementById(rifdiv).innerHTML=str; }
/*document.getElementById("modextern4").innerHTML=str; */
}
function azmodglobalstrut_01_SI(operaz,tipreg,nomreg,liv,elstrutnew,numsezliv,rifdiv,livp){percorso=percorso+"azmodglobalstrut_01_SI; ";   var rifdiv="modextern4"; /*alert(rifdiv);*/
/*alert("azmodglobalstrut_n_1\n"+operaz+"\n"+tipreg+"\n"+nomreg+"\n"+liv+"\n"+elstrutnew+"\n"+numsezliv+"\n"+livp+"\n"+nomsez); alert("azmodglobalstrut_n_1\nlivp="+livp+"\nliv="+liv); */ 
var str="<table>", dtstrut=new Array(),sez=new Array(),i=j=0,nomsezliv="",val=""; dtstrut=azdtstrut; azknar[livp-1]=azlistkey[0].attributes[0].nodeName; 
azlistkey=nvarxml.getElementsByTagName(dtstrut[liv-2]); /* rifsez=azlistkey[0].attributes[0].value; alert(dtstrut[liv-2]+"\n"+livp); */
azlistkey=azlistkey[0].getElementsByTagName(dtstrut[liv-1]); /*alert(azlistkey.length); for(i=0;i<azlistkey.length;i++){ alert(azlistkey[i].attributes[0].value); } */ 
for(i=0;i<azlistkey.length;i++){sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); /*alert(sez);*/
/*for(i=0;i<azlistkey.length;i++){val=sez[i]; if(val==nomsez){azlistkey=azlistkey[i].getElementsByTagName(dtstrut[livp]);  }  }*/
str=str+"<tr><td>seleziona la sezione comune di livello <b>"+dtstrut[liv-1]+"</b> nella quale operare: <select id='selliv_"+livp+"' onchange='azmodglobalstrut_0_SI(\""+operaz+"\",\""+tipreg+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezliv+"\",\""+rifdiv+"\",this.value)' ><option value='' selected></option>"; 
 for(i=0;i<azlistkey.length;i++){val=sez[i]; str=str+"<option value='"+val+"'>"+val+"</option>";  }
str=str+"</select></td></tr></table>"; 
/*alert("div_"+(livp-1));*/ document.getElementById("modextern3").innerHTML=str; /*"<div id='div_"+livp+"'></div>"; */ /* alert(str);*/
}
function azmodglobalstrut_02_SI(operaz,tipreg,nomreg,liv,elstrutnew,numsezliv,rifdiv,livp){percorso=percorso+"azmodglobalstrut_02_SI; ";   var rifdiv="modextern4"; /*alert(rifdiv);*/
/*alert("azmodglobalstrut_n_1\n"+operaz+"\n"+tipreg+"\n"+nomreg+"\n"+liv+"\n"+elstrutnew+"\n"+numsezliv+"\n"+livp+"\n"+nomsez); alert("azmodglobalstrut_n_1\nlivp="+livp+"\nliv="+liv); */ 
var str="<table>", dtstrut=new Array(),sez=new Array(),i=j=0,nomsezliv="",val=""; dtstrut=azdtstrut; azknar[livp-1]=azlistkey[0].attributes[0].nodeName; 
azlistkey=nvarxml.getElementsByTagName(dtstrut[0]); /*alert(dtstrut[0]+"\n"+azlistkey.length);*/
azlistkey=azlistkey[0].getElementsByTagName(dtstrut[1]); /*alert(dtstrut[1]+"\n"+azlistkey.length); rifsez=azlistkey[0].attributes[0].value;  alert(dtstrut[liv-1]+"\n"+rifsez); */
/* azlistkey=azlistkey[0].getElementsByTagName(dtstrut[2]); alert(dtstrut[2]+"\n"+azlistkey.length); */
/* azlistkey=azlistkey[0].getElementsByTagName(dtstrut[3]); alert(dtstrut[3]+"\n"+azlistkey.length); */
for(i=0;i<azlistkey.length;i++){sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); /*alert(sez);*/
str=str+"<tr><td>seleziona la sezione comune di livello <b>"+dtstrut[liv-2]+"</b> nella quale selezionare la tipologia di componenti a cui appartengono le key da inserire : <select id='selliv_"+(liv-2)+"' onchange='azmodglobalstrut_03_SI(\""+operaz+"\",\""+tipreg+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezliv+"\",\""+rifdiv+"\",this.value)' ><option value='' selected></option>"; 
 for(i=0;i<azlistkey.length;i++){val=sez[i]; str=str+"<option value='"+val+"'>"+val+"</option>";  }
str=str+"</select></td></tr></table>"; 
 document.getElementById("modextern3").innerHTML=str+"<div id='modextern3_1'></div>"; 
}
function azmodglobalstrut_03_SI(operaz,tipreg,nomreg,liv,elstrutnew,numsezliv,rifdiv,livp){percorso=percorso+"azmodglobalstrut_03_SI; ";   var rifdiv="modextern4"; /*alert(rifdiv);*/
/*alert("azmodglobalstrut_n_1\n"+operaz+"\n"+tipreg+"\n"+nomreg+"\n"+liv+"\n"+elstrutnew+"\n"+numsezliv+"\n"+livp+"\n"+nomsez); alert("azmodglobalstrut_n_1\nlivp="+livp+"\nliv="+liv); */ 
var str="<table>", dtstrut=new Array(),sez=new Array(),i=j=0,nomsezliv="",val=""; dtstrut=azdtstrut; azknar[livp-1]=azlistkey[0].attributes[0].nodeName; 
/*azlistkey=nvarxml.getElementsByTagName(dtstrut[0]); alert(dtstrut[0]+"\n"+azlistkey.length);
azlistkey=azlistkey[0].getElementsByTagName(livp);*/ 
azlistkey=nvarxml.getElementsByTagName(dtstrut[0]); /*alert(dtstrut[0]+"\n"+azlistkey.length);*/
azlistkey=azlistkey[0].getElementsByTagName(dtstrut[1]); /*alert(dtstrut[1]+"\n"+azlistkey.length); */
/*azlistkey=azlistkey[0].getElementsByTagName(dtstrut[2]); alert(dtstrut[2]+"\n"+azlistkey.length);*/
for(i=0;i<azlistkey.length;i++){/*alert(azlistkey[i].attributes[0].value+"\n"+livp);*/ if(azlistkey[i].attributes[0].value==livp){azlistkey=azlistkey[i].getElementsByTagName(dtstrut[liv-1]);break; } }
 /*alert(dtstrut[liv-1]+"\n"+azlistkey.length);*/
for(i=0;i<azlistkey.length;i++){sez[i]=azlistkey[i].attributes[0].value; } sez=sez.sort(); /*alert(sez);*/
str=str+"<tr><td>seleziona la sezione comune di livello <b>"+dtstrut[liv-1]+"</b> nella quale selezionare la tipologia di componenti a cui appartengono le key da inserire : <select id='selliv_"+(liv-1)+"' onchange='azmodglobalstrut_0_SI(\""+operaz+"\",\""+tipreg+"\",\""+nomreg+"\",\""+liv+"\",\""+elstrutnew+"\",\""+numsezliv+"\",\""+rifdiv+"\",this.value)' ><option value='' selected></option>"; 
 for(i=0;i<azlistkey.length;i++){val=sez[i]; str=str+"<option value='"+val+"'>"+val+"</option>";  }
str=str+"</select></td></tr></table>"; 
 document.getElementById("modextern3_1").innerHTML=str; 
}
function azmodglobalcancins(operaz,tipreg,nomreg,val){percorso=percorso+"azmodglobalcancins; ";  /*alert("azmodglobalcancins\n"+operaz+"\n"+tipreg+"\n"+nomreg+"\n"+val); */
var str="<table>";
var str=str+"<tr><td>Seleziona la sezione del registro <mark>"+nomreg+"</mark> su cui lavorare: <select id='selkrif' onchange='azmodglobalcancins2(\""+operaz+"\",\""+tipreg+"\",\""+nomreg+"\",\""+val+"\",this.value)'> <option value='' selected></option>";
wslistkeyrif=nvarxml.getElementsByTagName("keyrif"); var numkeyrif= wslistkeyrif.length; 
for(i=0;i<numkeyrif;i++){var nom=wslistkeyrif[i].attributes[0].value; str=str+"<option value='"+nom+"'>"+nom+"</option>";}
 str=str+"</select></td></tr></table>";
 document.getElementById("modextern3").innerHTML=str; /*azcaricaselgroup(reg,idsel,areatip);*/
}
function azmodglobalcancins2(operaz,tipreg,nomreg,val,nkrif){percorso=percorso+"azmodglobalcancins2; ";  /*alert("azmodglobalcancins2\n"+operaz+"\n"+indbasexml+nomreg+"\n"+nomreg+"\n"+val+"\n"+nkrif+"\n"+azdtinvisib+"\n"+azdtstrut+"\n"+wsxmlreq.responseText); */
var s=k=n=t=0,dtefstr="",dtefstrtot="",dtefstrar=new Array(),trovato=0,str="";
for(s=0;s<wslistkeyrif.length;s++){ if(wslistkeyrif[s].attributes[0].value==nkrif){ var lskey=wslistkeyrif[s].getElementsByTagName("key"); break; }}  
var lsatb=wslistkeyrif[0].attributes;
for(k=1;k<lsatb.length;k++){if(lsatb[k].nodeName.slice(0,3)=="rif"){ dtefstrtot=dtefstrtot+";"+lsatb[k].value; trovato=0;
for(t=0;t<azdtinvisib.length;t++){if(lsatb[k].value==azdtinvisib[t]){trovato=1;break; }} if(trovato==0){dtefstr=dtefstr+";"+lsatb[k].value;} }} dtefstrar=dtefstr.split(";"); 
if(azndtef.length>0){var n=azndtef.length; for(i=0;i<n;i++){azndtef.pop(); } }
for(k=1;k<dtefstrar.length;k++){azndtef[k-1]=dtefstrar[k]; }
for(n=0;n<azndtef.length;n++){ for(m=0;m<datiformtip.length;m++){if(azndtef[n]==datiformtip[m]){azdtef.push(m); }}}
str=str+"<table style='table-layout: fixed;word-wrap: break-word;'><tr><th class='az1' colspan="+(azndtef.length+2)+" style='width:3%'>Il componente generico <b>"+nkrif+"</b> contiene n."+lskey.length+" <b>componenti specifici</b> che e' possibile  <b>eliminare singolarmente</b> <button onclick='wsmodlarge.style.display=\"none\"; wsmodlarge.innerHTML=\"\";' >[X]</button></th></tr><tr><th>N</th>";
for(k=0;k<azndtef.length;k++){str=str+"<th>"+azndtef[k]+"</th>" } str=str+"<th>Elimina<br/>l'elemento</th></tr>";
for(t=0;t<lskey.length;t++){var lsatb=lskey[t].attributes; str=str+"<tr><th>"+(t+1)+"</th>"; for(k=0;k<azndtef.length;k++){str=str+"<td id='"+azndtef[k]+"_"+t+"'>"+lsatb[k].value+"</td>"; } 
str=str+"<th><button id='but_"+t+"' onclick='azmodglobalcancins3(\""+t+"\",\""+operaz+"\",\""+tipreg+"\",\""+nomreg+"\",\""+val+"\",\""+nkrif+"\",\""+dtefstrtot+"\")'>elimina</button></th></tr>";}
str=str+"</table>"; 
document.getElementById("modextern4").innerHTML=str; 
}
function azmodglobalins(operaz,tipreg,nomreg,val){percorso=percorso+"azmodglobalins; ";  var nins=0; nins=document.getElementById("numnewrec").value; 
/* alert("azmodglobalins\n"+operaz+"\n"+tipreg+"\n"+nomreg+"\n"+val+"\n"+nins+"\n"+wsxmlreq.responseText); */
var str="<table>";
var str=str+"<tr><td>Seleziona la sezione del registro <mark>"+nomreg+"</mark> su cui lavorare: <select id='selkrif' onchange='azmodglobalins2(\""+operaz+"\",\""+tipreg+"\",\""+nomreg+"\",\""+val+"\",\""+nins+"\",this.value)'> <option value='' selected></option>";
wslistkeyrif=nvarxml.getElementsByTagName("keyrif"); var numkeyrif= wslistkeyrif.length; 
for(i=0;i<numkeyrif;i++){var nom=wslistkeyrif[i].attributes[0].value; str=str+"<option value='"+nom+"'>"+nom+"</option>";}
 str=str+"</select></td></tr></table>";
 document.getElementById("modextern3").innerHTML=str; /*azcaricaselgroup(reg,idsel,areatip);*/
}
function azmodglobalins2(operaz,tipreg,nomreg,val,nins,rifsez,nkrif,rifmodul){ percorso=percorso+"azmodglobalins2; "; var i=n=k=j=t=0, rifatbcalc="",valore="",p1=0,p2=0,numprot=""; 
/*alert("azmodglobalins2\n"+operaz+"\n"+indbasexml+nomreg+"\n"+nomreg+"\n"+val+"\n"+nins+"\n"+"\n"+rifsez+"\n"+rifmodul+"\n"+"\n"+nkrif+"\n"+azdtinvisib+"\n"+wsxmlreq.responseText); */
/*alert(azknar+"="+azkvar); */
lskeyreg=nvarxml.getElementsByTagName(nomreg);
if(lskeyreg[0].attributes.getNamedItem("calcolati")!=null){rifatbcalc=lskeyreg[0].attributes.getNamedItem("calcolati").value; }
if(rifmodul==null){rifmodul="modextern4";} 
if(nins==0){nins=document.getElementById("numnewrec").value*1; }
wslistkeyrif=nvarxml.getElementsByTagName("keyrif"); var nome=wslistkeyrif.item(0).attributes.item(0).nodeName, i=j=m=n=k=t=0,dtefstr="",dtefstrar=new Array(),str="",inpcmp=""; 
for(i=0;i<wslistkeyrif.length;i++){ if(wslistkeyrif.item(i).attributes.getNamedItem(nome).value==azkvar[3]){ wslistkey=wslistkeyrif[i].getElementsByTagName("key"); wslistattrib=wslistkeyrif.item(i).attributes; 
if(wslistattrib.getNamedItem("numprot")!=null){numprot=wslistattrib.getNamedItem("numprot").value*1;} break;}} 
var nattrib=wslistattrib.length; 
if(azndtef.length>0){var n=azndtef.length; for(i=0;i<n;i++){azndtef.pop(); azdtef.pop(); } } /*alert(azdtinvisib+"\n"+azdtinvisib.length);*/
if(azdtinvisib!=""&&azdtinvisib.length>0){for(i=1;i<nattrib;i++){trovato=0; for(j=0;j<azdtinvisib.length;j++){ if(wslistattrib[i].value==azdtinvisib[j]){trovato=1;}} 
if(trovato==0 && wslistattrib[i].nodeName.indexOf("rif")>-1 && wslistattrib[i].value!="pww" && wslistattrib[i].value!="pw" && wslistattrib[i].value!="mail"){azndtef.push(wslistattrib[i].value); /*atrbind.push(i);*/}}}
else{for(i=1;i<nattrib;i++){if(wslistattrib[i].nodeName.indexOf("rif")>-1){ azndtef.push(wslistattrib[i].value); } }} 
for(n=0;n<azndtef.length;n++){ for(m=0;m<datiformtip.length;m++){if(azndtef[n]==datiformtip[m]){azdtef.push(m); }}}
for(k=1;k<wslistattrib.length;k++){ dtefstr=dtefstr+";"+wslistattrib[k].value} dtefstrar=dtefstr.split(";"); 
str=str+"<table style='table-layout: auto;'><tr><th class='az1' colspan="+(azndtef.length+1)+" style='width:3%'>Tabella di inserimento dei dati relativi ai n."+nins+" nuovi elementi da aggiungere nel registro <b>"+nomreg+"</b> <button onclick='wsmodlarge.style.display=\"none\"; wsmodlarge.innerHTML=\"\";' >[X]</button></th></tr><tr><th>N</th>";
for(k=0;k<azndtef.length;k++){str=str+"<th>"+azndtef[k]+"</th>" } str=str+"</tr>";
for(t=0;t<nins;t++){ str=str+"<tr><th>"+(t+1)+"</th>"; for(k=0;k<azndtef.length;k++){valore=""; p1=rifatbcalc.indexOf(datiformtip[azdtef[k]]); 
if(p1>-1){ if(nomreg.indexOf("protocollo_")>-1){if(azndtef[k]=="prot1"){p2=azkvar[3].lastIndexOf("-"); valore=azkvar[3].slice(p2+1);} 
if(azndtef[k]=="prot2"){valore=numprot+t;} if(azndtef[k]=="prot3"){valore="0";} if(azndtef[k]=="data"){valore=wsoggi;} } 
if(nomreg=="richieste_di_lavoro_spontanee.xml"&&azndtef[k]=="data_com"){valore=wsoggi; /*alert(wsoggi);*/} 
} inpcmp=wsfinscmp(k,t,rifatbcalc,valore); /*alert(inpcmp);*/ str=str+"<td>"+inpcmp; } }
str=str+"</tr>";
str=str+"</table>"; 
str=str+"<table><tr><th><button onclick='wsfctrlinscmp(\""+operaz+"\",\""+tipreg+"\",\""+nomreg+"\",\""+val+"\",\""+nins+"\",\""+nkrif+"\",\""+dtefstr+"\")'>procedi</button> </th></tr></table><div id='modinviato'></div>"; 
if(operaz!="modglob"){ document.getElementById(rifmodul).innerHTML=str;}else{ document.getElementById("modlet_3").innerHTML=str;}
}
function wsfctrlinscmp(operaz,tipreg,nomreg,val,nins,nkrif,dtefstr,sezsel){percorso=percorso+"wsfctrlinscmp; "; /*var indbasexml="" alert(azdtstrut+"\n"+azdtnomesezliv);*/
var nsezliv=azdtnomesezliv,percorso="",i=j=k=t=m=0; azknar=azdtstrut; 
var dtefstrar=dtefstr.split(";"),val="",valrec="",strf="",tipm1=val,confkey=nkrif,indreg=indbasexml+nomreg,areasel=catsel=tipcmp=cmpgen="",gestione=operaz,nrec=0,pwcogn=pwnom=pww="";
if(nomreg=="richieste_di_lavoro_spontanee.xml"&&operaz=="modglob"){for(i=0;i<azknar.length-1;i++){azkvar[i]=document.getElementById("selliv_"+i).value; } }
if(nomreg=="richieste_di_lavoro_spontanee.xml"&&operaz=="modonline"){var lsk0=nvarxml.getElementsByTagName(azknar[0]); /*keysede*/ /*alert(wsxmlreq.responseText);*/
for(i=0;i<lsk0.length;i++){var lsk1=lsk0[i].getElementsByTagName(azknar[1]); /*keycat*/
for(j=0;j<lsk1.length;j++){var lsk2=lsk1[j].getElementsByTagName(azknar[2]); /*keytyp*/
for(k=0;k<lsk2.length;k++){var lsatb=lsk2[k].attributes; if(lsatb[0].value==sezsel){percorso=lsk0[i].attributes[0].value+","+lsk1[j].attributes[0].value+","+lsk2[k].attributes[0].value;
var lsk3=lsk2[k].getElementsByTagName(azknar[3]); break;}}}} percorso=percorso+","+lsk3[0].attributes[0].value; azkvar=percorso.split(","); /*alert(percorso+"\n"+sezsel); */
}
/*alert("wsfctrlinscmp\n"+operaz+"\n"+tipreg+"\n"+nomreg+"\n"+val+"\n"+nins+"\n"+nkrif+"\n"+dtefstr+"\n"+indbasexml+nomreg); */
/*controllo della duplicazione delle chiavi*/
var conf=new Array(),rifkey=new Array(); 
/*alert(indreg+"\n"+indbasexml+"\n"+azndtef+"\n"+azdtkeyrif+"\n"+nins+"\n"+azknar+"\n"+azkvar); */
for(i=0;i<nins;i++){conf[i]="key ";for(j=0;j<azdtkeyrif.length;j++){for(k=0;k<azndtef.length;k++){if(azdtkeyrif[j]==azndtef[k]){conf[i]=conf[i]+azndtef[k]+"='"+document.getElementById(azndtef[k]+"_"+i).value+"' ";}}}} 
/*for(j=0;j<conf.length;j++){alert(conf[j]); }*/
if(nomreg!="richieste_di_lavoro_spontanee.xml"){
for(j=0;j<wslistkey.length;j++){rifkey[j]="key ";var lsatb=wslistkey[j].attributes;for(k=0;k<azdtkeyrif.length;k++){rifkey[j]=rifkey[j]+lsatb[k].nodeName+"='"+lsatb[k].value+"' "; } }}
/*for(j=0;j<wslistkey.length;j++){alert(rifkey[j]); }*/
for(i=0;i<nins;i++){var trovato=0; for(j=0;j<wslistkey.length;j++){if(conf[i]==rifkey[j]){trovato=1;} }if(trovato==1){str="* ATTENZIONE * nel registro e' gia' presente la chiave <b>"+conf[i]; mostraer(str); var audio=new Audio("actung.wav").play(); return; }    }
/*if(sezlivsel!=""){ for(i=0;i<aznkar.length-1;i++){sezlivsel=sezlivsel+","+document.getElementById("selliv_"+i).value; } sezlivsel=sezlivsel.slice(1); }*/
for(t=0;t<nins;t++){ for(k=0;k<azndtef.length;k++){/*alert(azndtef[k]+"_"+t);*/ if(azdtinvisib.indexOf(azndtef[k])==-1){ val=document.getElementById(azndtef[k]+"_"+t).value; 
if(val==""){str="* ATTENZIONE * manca il valore del campo "+azndtef[k]+"_"+t; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; }	} } }
/*alert(azdtkeyrif);*/
var strf="<center> <div style='display:block'><form id='frmnewrap' target='popup' > "; 
for(m=0;m<nins;m++){ valrec="key "; for(i=0;i<azndtef.length;i++){val=document.getElementById(azndtef[i]+"_"+m).value; 
if(nomreg=="regaccred.xml"||nomreg=="acquirenti_"+wssec+".xml"){ if(i==0){pwcogn=val.slice(0,2);} if(i==1){pwnom=val.slice(0,2);}if(i==2){ pww=pwcogn+pwnom+(wsmslocal.slice(8,wsmslocal.length)+(m*11));}} 

if(nomreg=="accredsect.xml"){ var cc=calcolasec(),pwar=new Array(),cfar=new Array(),pw1="",pw2=pw3=z=0; 
var objcf=document.getElementById("lsnewsez"); var listcf=objcf.value; cfar=listcf.slice(1).split(";"); 
for(z=0;z<cfar.length;z++){pw1=cfar[i].toLowerCase().slice(1,5); for(j=0;j<pw1.length;j++){pw2=pw2+pw1.charCodeAt(j); } pw3=(24*60*60+cc*1)+pw2+1; pwar[i]=pw1+pw3; }/*alert(pwar);*/
/*if(i==0){pwcogn=val.slice(0,2);} if(i==1){pwnom=val.slice(0,2);}if(i==2){ pww=pwcogn+pwnom+(wsmslocal.slice(8,wsmslocal.length)+(m*11));}*/
} 


valrec=valrec+azndtef[i]+"=&#39;"+val+"&#39; "; } 
if(nomreg=="regaccred.xml"||nomreg=="acquirenti_"+wssec+".xml"){ valrec=valrec+azdtinvisib[0]+"=&#39;&#39; "+azdtinvisib[1]+"=&#39;"+pww+"&#39; "+azdtinvisib[2]+"=&#39;&#39; ";}
if(nomreg=="accredsect.xml"){ valrec=valrec+azdtinvisib[0]+"=&#39;&#39; "+azdtinvisib[1]+"=&#39;"+pwar[i]+"&#39; "+azdtinvisib[2]+"=&#39;&#39; ";}
valrec=valrec+"/>"; /*alert(valrec);*/
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' /></div>"; nrec++;
}
var dtefstr=";nrec;cred1;cred2;operaz;tipm1;indreg;confkey;gestione;tipop;nkar;vkar;nsezliv;azdtkeyrif"; /*confarea;confcat;conftip;confcmpgen;*/
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='nrec' value='"+nrec+"' /><input type='text' name='dtefstr' value='"+dtefstr+"' /> <input type='text' name='nkar' value='"+azknar+"' /> <input type='text' name='vkar' value='"+azkvar+"' /> <input type='text' name='cred1' value='"+cred1+"' /><input type='text' name='cred2' value='"+cred2+"' /><input type='text' name='operaz' value='"+operaz+"' /> <input type='text' name='tipm1' value='"+tipm1+"' /><input type='text' name='confkey' value='"+confkey+"' /> <input type='text' name='indreg' value='"+indreg+"' /> <!--<input type='text' name='confarea' value='keyarea area=&#39;"+areasel+"&#39;' /> <input type='text' name='confcat' value='keycat categoria=&#39;"+catsel+"&#39;' /> <input type='text' name='conftip' value='keytip tipologia_componenti=&#39;"+tipcmp+"&#39;' /> <input type='text' name='confcmpgen' value='keyrif generico=&#39;"+cmpgen+"&#39; ' />--><input type='text' name='gestione' value='"+gestione+"' /> <input type='text' name='tipop' value='"+tipop+"' /> <input type='text' name='nsezliv' value='"+nsezliv+"' /> <input type='text' name='azdtkeyrif' value='"+azdtkeyrif+"' /> ";
//strf=strf+"</div></form></div><button onclick='salvanewrecins2(\""+ncar+"\")'> INVIA </button> "; 
if(val!="aggiungere_elementi"&&val!="generare/registrare_protocolli"){ document.getElementById("modextern5").innerHTML=strf;}else{ document.getElementById("modinviato").innerHTML=strf;}
var frm=document.getElementById("frmnewrap"); 
if(nomreg=="richieste_di_lavoro_spontanee.xml"){frm.action="progasp/modifica_richieste_di_lavoro_spontanee.asp";}else{frm.action="progasp/modifica_regbase.asp"; }
frm.target="popup"; /*alert(frm.action);*/ frm.method="post"; frm.submit(); 
}
function wsfinscmp(k,t,rifatbcalc,valore,dupprot){percorso=percorso+"wsfinscmp; ";  var j=i=0,str="",kil="";j=k,rifcmp="",fatto=0; 
/*alert("wsfinscmp\n"+k+"\n"+t+"\n"+rifatbcalc+"\n"+valore+"\n"+dupprot+"\n"+azdtef[j]+"\n"+datiformtip[azdtef[j]]+"\n"+datiformtipinp[azdtef[j]]);*/
/*if(azlistattrib2!=null){alert("azlistattrib2.length="+azlistattrib2.length); } */
var cart=document.getElementById("wstipreg").value;
if(document.getElementById("wssubcart")!=null){cart=cart+"/"+document.getElementById("wssubcart").value; }
var regsel=document.getElementById("regsel").value; var indreg=wsaz+"/"+cart+"/"+regsel; 
/*alert("wsfinscmp\n"+k+"\n"+t+"\n"+rifatbcalc+"\n"+datiformtipinp[azdtef[j]]+"\n"+datiformtip[azdtef[j]]+"\n"+regsel);*/
if(dupprot!=null){rifcmp="name='cmpdp'";}else{rifcmp="id='"+datiformtip[azdtef[j]]+"_"+t+"'";}
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]);
if(datiformtip[azdtef[j]]=="settore"&&datiformtipinp[azdtef[j]]=="selectsect"){datiformtipinp[azdtef[j]]="text";}
switch(datiformtipinp[azdtef[j]]){ 
case "text":{ /* alert(datiformtip[azdtef[j]]+"="+azlistattrib2.getNamedItem(azndtef[j]).value); */
str=str+"<input "+rifcmp+" type='text' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' ";
if(azdtspec!=""&&azdtspec.indexOf("giacenze")==-1&&datiformtip[azdtef[j]]=="carico_scarico"){var id=datiformtip[azdtef[j]]+"_"+t; str=str+"onchange='azcaricaqta("+t+",\""+id+"\","+azdtef[j]+")' "; wssubmodul.innerHTML="<b>N.B.</b> un valore numerico <mark>positivo o negativo</mark> nel campo <b>carico_scarico</b> realizza corrispondentemente un <mark>aumento o una riduzione</mark> del valore della <b>giacenza</b>. "; }
 if(wstipreg==tipreg[12] && (j>2)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+"onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")' style='border:0px;background-color:transparent' readonly";}}
if(wstipreg!=tipreg[12] && wstipreg!=tipreg[5]){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){ str=str+"onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")' style='border:0px;background-color:transparent' readonly value='"+valore+"'";}}
if(wstipreg==tipreg[5] && (j==0)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+"onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")' style='border:0px;background-color:transparent' readonly";}}
str=str+" ></td>";
 break;}
 
case "textarea":{str=str+"<textarea id='"+datiformtip[azdtef[j]]+"_"+t+"' rows='3' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")'";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); /*alert("rifatbcalc="+rifatbcalc+"   p1="+p1);*/
if(p1>-1){mgz=1;str=str+" readonly"; kil="canc:<input type='text' oninput='cancingredspec(this,\""+ntot+"\")' title='selezionare e trascinare il nome dell&#39;ingrediente da eliminare' style='size:130px;'>";} str=str+" '></textarea> <input type='text' id='textarap' pattern='"+datiformpattern[dtef[i]]+"' style='display:block;' > "+kil+"</td>"; break;}
case "number":{str=str+"<input id='"+datiformtip[azdtef[j]]+"_"+t+"' value='' type='number' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'></td>"; break;}
case "file":{str=str+"<input id='"+datiformtip[azdtef[j]]+"_"+t+"' value='' type='file' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'></td>"; break;}
case "password":{str=str+"<input id='"+datiformtip[azdtef[j]]+"_"+t+"' value='' type='password' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'></td>"; break;}
case "selectsec":{str=str+"<select id='"+datiformtip[azdtef[j]]+"_"+t+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' selected ></option> "; 
for(n=1;n<nsectorind.length;n++){str=str+"<option value='"+ssectorind[n]+"' >"+nsectorind[n]+"</option> ";} str=str+"</select></td>";  break;}
case "selectabil":{str=str+"<select id='"+datiformtip[azdtef[j]]+"_"+t+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' selected ></option> "; 
for(n=0;n<nabilop.length;n++){str=str+"<option value='"+sabilop[n]+"' >"+nabilop[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectsect":{str=str+"<select id='"+datiformtip[azdtef[j]]+"_"+t+"' required title='"+datiformtit[azdtef[j]]+"' ";
/*if(datiformtip[azdtef[j]]=="settore_prel"){str=str+"onchange='escludiins("+i+")'"; }
if(datiformtip[azdtef[j]]=="settore_ins"){str=str+"onchange='escludiprel("+i+")'"; }*/
str=str+"><option value='' selected ></option> "; 
for(n=0;n<wssect.length;n++){ str=str+"<option value='"+wssect[n]+"' >"+wssect[n]+"</option> ";}  str=str+"</select>"; break;}
case "selectrc":{str=str+"<select id='"+datiformtip[azdtef[j]]+"_"+t+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' selected ></option> "; 
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' >"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selprot":{str=str+"<select "+rifcmp+" required title='"+datiformtit[azdtef[j]]+"' ><option value='NO' selected >NO</option><option value='SI' >SI</option> </select></td>"; break;}
case "selectacqinaf":{str=str+"<select id='"+datiformtip[azdtef[j]]+"_"+t+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' selected ></option> "; 
for(n=0;n<acqaffid.length;n++){str=str+"<option value='"+acqaffid[n]+"' >"+acqaffid[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectum":{str=str+"<select id='"+datiformtip[azdtef[j]]+"_"+t+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' selected ></option> "; 
for(n=0;n<um.length;n++){ str=str+"<option value='"+um[n]+"' >"+um[n]+"</option> ";}  str=str+"</select>"; break;}
case "selectlivdif":{str=str+"<select id='"+datiformtip[azdtef[j]]+"_"+t+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' selected ></option> "; 
for(n=0;n<azlivdif.length;n++){ str=str+"<option value='"+azlivdif[n]+"' >"+azlivdif[n]+"</option> ";}  str=str+"</select>"; break;}
case "selectlivcompet":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivcompet.length;n++){ str=str+"<option value='"+azlivcompet[n]+"' >"+azlivcompet[n]+"</option> ";
}  str=str+"</select>"; break;}
case "selectlivcontr":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivcontr.length;n++){ str=str+"<option value='"+azlivcontr[n]+"' >"+azlivcontr[n]+"</option> ";
}  str=str+"</select>"; break;}
case "selectcontr":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azcontr.length;n++){ str=str+"<option value='"+azcontr[n]+"' >"+azcontr[n]+"</option> ";
}  str=str+"</select>"; break;}
case "selareamanu":{str=str+"<select id='"+datiformtip[azdtef[j]]+"_"+t+"' required title='"+datiformtit[azdtef[j]]+"' readonly ><option value='"+azlistattrib2.getNamedItem(azndtef[j]).value+"' selected>"+azlistattrib2.getNamedItem(azndtef[j]).value+"</option></select>"; 
 break;}
case "selectimg":{str=str+"<select id='"+datiformtip[azdtef[j]]+"_"+t+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' selected ></option> "; 
if(azlistattrib2!=null){ var nrcim=azlistattrib2.getNamedItem(azndtef[j]).value; 
for(n=0;n<nrcimg.length;n++){if(nrcimg[n].match(prefimg)==prefimg){str=str+"<option value='"+nrcimg[n]+"' title='"+nomiimg[n]+"' "; if(nrcimg[n]==nrcim){ str=str+" selected ";} str=str+">"+nrcimg[n]+"</option> "; } }} str=str+"</select></td>"; break;}
} 
return(str); 
} 
function azmodglobal1(operaz,tipreg,nomreg,val,nins,skrif){percorso=percorso+"azmodglobal1; ";  var reg=document.getElementById("regsel").value; /**/alert("azmodglobal1\n"+operaz+"\n"+tipreg+"\n"+nomreg+"\n"+val+"\n"+nins+"\n"+skrif); 
document.getElementById("proced").innerHTML="", areatip="",artip="";
var numnewrec=document.getElementById("numnewrec").value; /*document.getElementById("modfrm").innerHTML="";  */
if(numnewrec>0 && (reg==qfunc('8212469124711246712479124771248312473124781248412446124881247712476124') || reg==qfunc('8212469124711246712479124771248312469124881248412446124881247712476124'))){alert("ATTENZIONE\n\nla procedura di modifica dei registri sintetici delle comunicazioni non prevede la possibilita' di inserire nuovi record"); document.getElementById("part2").innerHTML=""; return;} /* alert(indbasexml+reg); */
var idsel="selgrp";
nvarxml=wsfleggidatiaziendali(indbasexml+reg); 
var str="<table>";
var str=str+"<tr><td>Seleziona la sezione del registro <mark>"+reg+"</mark> su cui lavorare: <select id='"+idsel+"' onchange='azglobal1(\""+prov+"\",\""+reg+"\",this.value)'> <option value='' selected></option>";
 str=str+"</select></td></tr></table><div id='modextern4' > </div>";
if(wstipreg==tipreg[1]){ areatip="acquisti";}
document.getElementById("part2").innerHTML=str; /*azcaricaselgroup(reg,idsel,areatip);*/
}
function azcaricaselgroup(reg,idsel,areatip){percorso=percorso+"azcaricaselgroup; ";  /*alert("azcaricaselgroup\n"+reg+"\n"+idsel+"\n"+areatip);*/
var sel=document.getElementById(idsel);
var i=0,j=0,k=0, atbsection="", section="", catelem="", tipelem="";
var lskeyreg=nvarxml.getElementsByTagName(reg);
if(lskeyreg[0].attributes.getNamedItem("section")!=null){ atbsection=lskeyreg[0].attributes.getNamedItem("section").value; 
if(areatip=="acquisti"){var lskaree=nvarxml.getElementsByTagName("keyarea"); /*alert(lskaree.length);*/
for(i=0;i<lskaree.length;i++){
/*if(lskaree[i].attributes[0].value==areatip)*/
artip=lskaree[i].attributes[0].value; if(artip.indexOf(areatip)>-1){
var lssection=lskaree[i].getElementsByTagName(atbsection); /*alert(lssection.length);*/
for(k=0;k<lssection.length;k++){
catelem=lssection[k].attributes[0].value; 
/*alert(lskaree[i].attributes[0].value+"\n"+areatip+"\n"+atbsection+"\n"+catelem);*/ 
op=document.createElement('OPTGROUP');op.label=catelem; op.style.backgroundColor=wscolor1; sel.add(op);
azlistkeyrif=lssection[k].getElementsByTagName("keyrif");
for(j=0;j<azlistkeyrif.length;j++){ /*alert(azlistkeyrif[j].attributes[0].value);*/
tipelem=azlistkeyrif[j].attributes[0].value; op=document.createElement('OPTION');op.value=tipelem; op.text=tipelem; sel.add(op); 
} } }}}
else{azlistkeyrif=nvarxml.getElementsByTagName("keyrif"); /*alert(azlistkeyrif.length);*/
for(j=0;j<azlistkeyrif.length;j++){ 
tipelem=azlistkeyrif[j].attributes[0].value; /*str=str+"<option value='"+tipelem+"'>"+tipelem+"</option>";*/
op=document.createElement('OPTION');op.value=tipelem; op.text=tipelem; sel.add(op); 
}} 
}
else{if(azsecind.length>0){var n=azsecind.length; for(i=0;i<n;i++){azsecind.pop();} }
azlistkeyrif=nvarxml.getElementsByTagName("keyrif"); 
for(i=0;i<azlistkeyrif.length;i++){var nome=azlistkeyrif.item(0).attributes.item(0).nodeName;
	azsecind.push(azlistkeyrif.item(i).attributes.getNamedItem(nome).value);}
for(i=0;i<azlistkeyrif.length;i++){
op=document.createElement('OPTION');op.value=azsecind[i]; op.text=azsecind[i]; sel.add(op); }}
}
function azglobal1(operaz,tipreg,nomreg,val,nins,nkrif){percorso=percorso+"azglobal1; ";  /* alert("azglobal1\n"+operaz+"\n"+indbasexml+nomreg+"\n"+nomreg+"\n"+val+"\n"+nins+"\n"+nkrif); */
var modfrm=document.getElementById("modfrm"); var i=0, ntot=-1, tipop2="", str="", atrbind=new Array() ; 
/* nvarxml=wsfleggidatiaziendali(indbasexml+reg); alert(azlistkeyrif.length); */
azlistkeyrif=nvarxml.getElementsByTagName("keyrif"); 
for(i=0;i<azlistkeyrif.length;i++){var nome=azlistkeyrif.item(0).attributes.item(0).nodeName; 
/* alert(azlistkeyrif.item(i).attributes.getNamedItem(nome).value+"\n"+sec); */
if(azlistkeyrif.item(i).attributes.getNamedItem(nome).value==nkrif){
azlistkey=azlistkeyrif[i].getElementsByTagName("key"); azlistattrib=azlistkeyrif.item(i).attributes; 
var nattrib=azlistattrib.length; /* alert(nattrib); */
var trovato=0; for(j=1;j<nattrib;j++){ if(azlistattrib[j].value=="immagine"){trovato=1;} if(trovato==1){
var azlistrifimg=azlistkeyrif[i].getElementsByTagName("rifimg"); prefimg=azlistrifimg[0].attributes[0].value; /* alert(prefimg);*/ /*atbnom=azlistrifimg[0].attributes[1].value; */ caricanrcimg(); caricanomiimg();/*caricanomiimg(atbnom);*/  trovato=0;}}} } 
if(nomreg!=qfunc('82124691247112465124671246712482124691246812446124881247712476124')){
var nattrib=azlistattrib.length; var str="cliccare sulla casella <b>NASCONDI</b> dei campi che <b>non si vuole visualizzare</b> e cliccare su <b>invio</b><center><table>"; 
for(i=1;i<nattrib;i++){ /*if(azlistattrib[i].value!="pw" && azlistattrib[i].value!="pww" && azlistattrib[i].value!="mail"){ */
if(azlistattrib[i].nodeName.indexOf("rif")>-1 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){ azndtef.push(azlistattrib[i].value); 
str=str+"<tr><td>"+azlistattrib[i].value+"</td><th><input type='text' name='canc' title='clicca per cambiare' onclick='cancsino(this)' value='SI' style='width:30px;'/></th></tr>";}}/*}*/ 
str=str+"</table>"; modfrm.innerHTML=str;
document.getElementById("proced").innerHTML="<table class='az1'><tr><td onclick='azglobal2(\""+prov+"\",\""+nomreg+"\", \""+nkrif+"\")' > <span class='az1'> procedi </span> </td></tr></table>";} 
else{azglobal2(operaz,tipreg,nomreg,val,nins,nkrif);}
}
function azglobal2(operaz,tipreg,nomreg,val,nins,nkrif){percorso=percorso+"azglobal2; "; /*var cancellati=document.getElementsByName("canc");*/ var i=0, trovato=0; 
if(azdtinvisib.length>0){var n=azdtinvisib.length; for(i=0;i<n;i++){azdtinvisib.pop();} }  /*alert(cancellati.length); */
/*for(i=0;i<cancellati.length;i++){if(cancellati[i].value=="NO"){azdtinvisib.push(azlistattrib[(i+1)].value);} }*/
	/* for(i=0;i<azdtinvisib.length;i++){alert(azdtinvisib[i]); } */
	if(nomreg=="regaccred.xml"||nomreg=="acquirenti_"+wssec+".xml"){ azdtinvisib=new Array("pw", "pww", "mail"); /*
trovato=0;for(i=0;i<azdtinvisib.length;i++){if(azdtinvisib[i]==="pw"){trovato=1;} } if(trovato==0){azdtinvisib.push("pw"); }
trovato=0;for(i=0;i<azdtinvisib.length;i++){if(azdtinvisib[i]==="pww"){trovato=1;} } if(trovato==0){azdtinvisib.push("pww"); }
trovato=0;for(i=0;i<azdtinvisib.length;i++){if(azdtinvisib[i]==="mail"){trovato=1;} }if(trovato==0){azdtinvisib.push("mail"); } */}
/* for(i=0;i<azdtinvisib.length;i++){alert(azdtinvisib[i]); } */	azmodregglobal(operaz,tipreg,nomreg,val,nins,nkrif);
}
function azmodregglobal(operaz,treg,nomreg,val,nins,nkrif){percorso=percorso+"azmodregglobal; ";  /*alert(prov+"-"+reg+"-"+sec); */ var prov=operaz,sec=nkrif,reg=nomreg; 
//nvarxml=leggidatiaziendali(indbasexml+reg); 
 wstipreg=document.getElementById("wstipreg").value; /*alert(wstipreg+"\n"+tipreg[0]); */
var i=0, j=0, ntot=-1, ntotin=0, tipop2="", str="", /*atrbind=new Array(),*/ selec="4";
 var modfrm=document.getElementById("modfrm");
var nnew=document.getElementById("numnewrec").value; 
var nattrib=azlistattrib.length; var trovato=0; var numkey= azlistkey.length; /* alert(nattrib+"-"+numkey); */
/* alert(azlistkey.length+"-"+azlistattrib.length); alert(azdtinvisib.length);*/
if(azndtef.length>0){var n=azndtef.length; for(i=0;i<n;i++){azndtef.pop(); azdtef.pop(); /*atrbind.pop(); */} }
if(azdtinvisib.length>0){for(i=1;i<nattrib;i++){trovato=0; for(j=0;j<azdtinvisib.length;j++){
if(azlistattrib[i].value==azdtinvisib[j]){trovato=1;}} 
if(trovato==0 && azlistattrib[i].nodeName.indexOf("rif")>-1 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){azndtef.push(azlistattrib[i].value); /*atrbind.push(i);*/}}}
else{for(i=1;i<nattrib;i++){if(azlistattrib[i].nodeName.indexOf("rif")>-1 && azlistattrib[i].value!="pww" && azlistattrib[i].value!="pw" && azlistattrib[i].value!="mail"){ azndtef.push(azlistattrib[i].value); } }} 
var rifsec=""; 
/*"aziendale", "bacheche", "magazzino", "movimenti", "operativo", "ordinazioni", "ordini", "vendite", "immagini", "datasheet"*/
/*"aziendale", "bacheche", "magazzino", "movimenti", "produzioni", "lavorazioni", "ordinazioni", "ordini", "vendite", "rapgilav"*/
/*"aziendale", "magazzini/beni_da_vendere", "magazzini_sm", "movimenti", "produzioni", "lavorazioni", "ordinazioni ricevute", "ordinazioni fatte", "vendite", "rapgilav", "rapinterv","cronoprogramma", "bacheche","activity","elezioni"*/
if(wstipreg==tipreg[0]){rifsec="nome";} 
if(wstipreg==tipreg[12]){rifsec="tipologia_documenti";} 
if(wstipreg==tipreg[1]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[2]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[3]){rifsec="tipologia_componenti";} 
if(wstipreg==tipreg[4]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[5]){rifsec="type_activity";} 
if(wstipreg==tipreg[6]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[7]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[8]){rifsec="tipologia_prodotti";} 
if(wstipreg==tipreg[10]){rifsec="manutenzioni";}
/*if(wstipreg==tipreg[9]){rifsec="tipologia_prodotti";}  */
if(wstipreg==tipreg[9]){rifsec="data";} 
/*
for(i=0;i<azlistkeyrif.length;i++){ 
if(azlistkeyrif.item(i).attributes.getNamedItem(rifsec).value==sec){
if(wstipreg==tipreg[1]){	rifatbcalc=azlistkeyrif.item(i).attributes.getNamedItem("calcolati").value;
var mgzin=azlistkeyrif.item(i).attributes.getNamedItem("magazzini_in").value;	
var mgzinn=mgzin.split(","); rifmgz=mgzinn[0];}  } } 
*/
/*azlistkeyrif=nvarxml.getElementsByTagName("keyrif"); */
azlistkeyrif=nvarxml.getElementsByTagName("keyrif"); 
for(i=0;i<azlistkeyrif.length;i++){
/*if(azlistkeyrif.item(i).attributes.getNamedItem(rifsec).value==sec)*/ if(azlistkeyrif.item(i).attributes[0].value==sec){
if(wstipreg!=tipreg[0] && wstipreg!=tipreg[12] && wstipreg!=tipreg[5] && wstipreg!=tipreg[10]){rifatbcalc=azlistkeyrif.item(i).attributes.getNamedItem("calcolati").value; /*alert(rifatbcalc);*/
if(wstipreg==tipreg[4]){ /*var mgzin=azlistkeyrif.item(i).attributes.getNamedItem("magazzini_in").value;	
var mgzinn=mgzin.split(","); rifmgz=mgzinn[0];*/ rifmgz="mgz_produzioni_.xml"; }  } } }
 var azdtefstr="", mgz=0, mgztot=0, kil=""; /*alert(azndtef);*/
 for(i=0;i<azndtef.length;i++){azdtefstr=azdtefstr+azndtef[i]+"|";}  /* azdtefstr=azdtefstr+"canc"; alert(azdtefstr); */
for(i=0;i<azndtef.length;i++){ for(j=0;j<datiformtip.length;j++){if(azndtef[i]==datiformtip[j]){azdtef.push(j);  /*alert(azndtef[i]+"-"+azdtef[i]);*/}}} 
/* for(j=0;j<datiformtip.length;j++){if("quantita_mp"==datiformtip[j]){alert(j);}} */
/* for(i=0;i<azndtef.length;i++){ alert(azndtef[i]+"-"+azdtef[i]);} */
var str="N.B. il settore <mark>"+sec+"</mark> gia' contiene <mark>"+numkey+" chiavi</mark>, per eliminare una chiave basta cliccare nella casella <b>cancella</b> <center><table> <tr><th class='az1'>N.</th>";
for(i=0;i<azndtef.length;i++){ str=str+"<th class='az1'>"+datiformtip[azdtef[i]]+"</th>";} str=str+"<th class='az1'>cancella</th></tr>";  
if(wstipreg!=tipreg[12]){
if(wstipreg==tipreg[3]){wssect.push("escluso"); }
for(i=0;i<numkey;i++){ ntot++; mgz=0; kil="";
azlistattrib2=azlistkey.item(i).attributes; 
if(azlistattrib2==null){ }
if(reg==qfunc('82124691247112465124671246712482124691246812446124881247712476124')){
 tipop2=azlistkey.item(i).attributes.getNamedItem("settore").value; 
/*abop=azlistkey.item(i).attributes.getNamedItem("accesso").value;*/ nrcop=azlistkey.item(i).attributes.getNamedItem("resp_com").value}
str=str+"<tr><td class='az2'>"+(ntot+1)+"</td>"; 
for(j=0;j<azdtef.length;j++){str=str+"<td class='az2'>"; /*alert(j+"-"+azdtef.length+"-"+datiformtipinp[azdtef[j]]);*/
switch(datiformtipinp[azdtef[j]]){ 
case "text":{ /* alert(datiformtip[azdtef[j]]+"="+azlistattrib2.getNamedItem(azndtef[j]).value); */
str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='"+azlistattrib2.getNamedItem(azndtef[j]).value+"' type='text' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")'";
/*if(wstipreg==tipreg[1]){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+" readonly ></td>";}}
if(wstipreg!=tipreg[1]){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+" readonly ></td>";}} */
 if(wstipreg==tipreg[12] && (j>2)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+" readonly";}}
if(wstipreg!=tipreg[12] && wstipreg!=tipreg[5]){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){ str=str+" readonly";}}
if(wstipreg==tipreg[5] && (j==0)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+" readonly";}}
str=str+" ></td>";
 break;}
 
 case "textarea":{str=str+"<textarea name='"+datiformtip[azdtef[j]]+"' rows='3' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregpart\")'";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); /*alert("rifatbcalc="+rifatbcalc+"   p1="+p1);*/
if(p1>-1){mgz=1;str=str+" readonly"; kil="canc:<input type='text' oninput='cancingredspec(this,\""+ntot+"\")' title='selezionare e trascinare il nome dell&#39;ingrediente da eliminare' style='size:130px;'>";} str=str+" '>"+azlistattrib2.getNamedItem(azndtef[j]).value.replace(/§/g,"\n")+"</textarea> <input type='text' id='textarap' pattern='"+datiformpattern[dtef[i]]+"' style='display:block;' > "+kil+"</td>"; break;}
case "number":{str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='"+azlistattrib2.getNamedItem(azndtef[j]).value+"' type='number' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'></td>"; break;}
case "file":{str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='"+azlistattrib2.getNamedItem(azndtef[j]).value+"' type='file' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'></td>"; break;}
case "password":{str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='"+azlistattrib2.getNamedItem(azndtef[j]).value+"' type='password' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'></td>"; break;}
case "selectsec":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=1;n<nsectorind.length;n++){str=str+"<option value='"+ssectorind[n]+"' "; if(ssectorind[n]==tipop2){ str=str+" selected ";}
str=str+">"+nsectorind[n]+"</option> ";} str=str+"</select></td>";  break;}
case "selectabil":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<nabilop.length;n++){str=str+"<option value='"+sabilop[n]+"' "; if(sabilop[n]==abop){ str=str+" selected ";} str=str+">"+nabilop[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectsect":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
if(datiformtip[azdtef[j]]=="settore_prel"){str=str+"onchange='escludiins("+i+")'"; }
if(datiformtip[azdtef[j]]=="settore_ins"){str=str+"onchange='escludiprel("+i+")'"; }
str=str+"><option value='' selected></option> "; 
for(n=0;n<wssect.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=wssect[n]){str=str+"<option value='"+wssect[n]+"' >"+wssect[n]+"</option> ";} else{ str=str+"<option value='"+wssect[n]+"' selected>"+wssect[n]+"</option> ";}
}  str=str+"</select>"; break;}
case "selectrc":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' "; if(nrc[n]==nrcop){ str=str+" selected ";} str=str+">"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectacqinaf":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<acqaffid.length;n++){str=str+"<option value='"+acqaffid[n]+"' "; if(acqaffid[n]==azlistattrib2.getNamedItem(azndtef[j]).value){ str=str+" selected ";} str=str+">"+acqaffid[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectum":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<um.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=um[n]){str=str+"<option value='"+um[n]+"' >"+um[n]+"</option> ";} else{ str=str+"<option value='"+um[n]+"' selected>"+um[n]+"</option> ";}
}  str=str+"</select>"; break;}
case "selectlivdif":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivdif.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=azlivdif[n]){str=str+"<option value='"+azlivdif[n]+"' >"+azlivdif[n]+"</option> ";} else{ str=str+"<option value='"+azlivdif[n]+"' selected>"+azlivdif[n]+"</option> ";}
}  str=str+"</select>"; break;}
case "selectlivcompet":{str=str+"<select id='"+id+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivcompet.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=azlivcompet[n]){str=str+"<option value='"+azlivcompet[n]+"' >"+azlivcompet[n]+"</option> ";} else{ str=str+"<option value='"+azlivcompet[n]+"' selected>"+azlivcompet[n]+"</option> ";}
}  str=str+"</select>"; break;}
case "selectcontr":{str=str+"<select id='"+id+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azcontr.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=azcontr[n]){str=str+"<option value='"+azcontr[n]+"' >"+azcontr[n]+"</option> ";} else{ str=str+"<option value='"+azcontr[n]+"' selected>"+azcontr[n]+"</option> ";}
}  str=str+"</select>"; break;}
case "selectlivcontr":{str=str+"<select id='"+id+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivcontr.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=azlivcontr[n]){str=str+"<option value='"+azlivcontr[n]+"' >"+azlivcontr[n]+"</option> ";} else{ str=str+"<option value='"+azlivcontr[n]+"' selected>"+azlivcontr[n]+"</option> ";}
}  str=str+"</select>"; break;}
/*
case "selectrep":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=1;n<nrep.length;n++){str=str+"<option value='"+lsrepar[n]+"' "; if(lsrepar[n]==tipop2){ str=str+" selected ";}
str=str+">"+lsrepar[n]+"</option> ";} str=str+"</select></td>";  break;}
*/
case "selareamanu":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' readonly ><option value='"+azlistattrib2.getNamedItem(azndtef[j]).value+"' selected>"+azlistattrib2.getNamedItem(azndtef[j]).value+"</option></select>"; 
 break;}
case "selectimg":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; var nrcim=azlistattrib2.getNamedItem(azndtef[j]).value; /* var nrcimrif=nrcim.slice(0,3); alert(prefimg); 
alert(nrcimg.length);for(n=0;n<nrcimg.length;n++){alert(nrcimg[n]+"-"+nomiimg[n]); }*/
for(n=0;n<nrcimg.length;n++){if(nrcimg[n].match(prefimg)==prefimg){str=str+"<option value='"+nrcimg[n]+"' title='"+nomiimg[n]+"' "; if(nrcimg[n]==nrcim){ str=str+" selected ";} str=str+">"+nrcimg[n]+"</option> "; } } str=str+"</select></td>"; break;}
}  } 
str=str+"<th><input type='text' name='canc' title='clicca per cambiare' onclick='cancsino(this)' value='NO' style='width:30px;'/>";
if(azdtinvisib.length>0){
for(m=0;m<azdtinvisib.length;m++){str=str+"<input class='invis' id='"+azdtinvisib[m]+"' name='"+azdtinvisib[m]+"' value='"+azlistattrib2.getNamedItem(azdtinvisib[m]).value+"'>";} str=str+"</th></tr>";}
else{ str=str+"</th></tr>";} /*alert(mgz); */
if(mgz==1 && rifatbcalc!=""){str=str+"<tr><td colspan="+(azlistattrib2.length+2)+"><table><tr><td><span class='cancingr' onclick='canclastingred("+i+")'>cancella ultimo ingrediente</span> <!--&#160; <span class='cancingr' onclick='"+riffunzmgz+"("+i+")"+"'>  calcola  </span>--> </td><td><span id='selectmag"+i+"' ></span></td></tr></table> </td></tr>"; mgztot++;}
} 
}
 ntotin=ntot; if(azlistattrib2==undefined){alert("ATTENZIONE, il registro richiesto non contiene ancora alcuna chiave\n\npertanto e' necessario inserire inizialmente chiavi in MODIFICA SCHEDULARE O TABELLARE" ); return;} ;
for(i=ntot+1;i<nnew*1+ntot+1;i++){str=str+"<tr><td class='az2'>"+(i+1)+"</td>"; /* mgz=0; */
for(j=0;j<azdtef.length;j++){str=str+"<td class='az2'>";
switch(datiformtipinp[azdtef[j]]){ 
/*
case "text":{str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='' type='text' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'></td>"; break;}
*/
case "text":{var vv=""; if(datiformtip[azdtef[j]]=="data_ins"){vv=oggi;} str=str+"<input name='"+datiformtip[azdtef[j]]+"' type='text' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'";
/*if(wstipreg==tipreg[1] && (j==0||j==1||j==2)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+"></td>";}}
if(wstipreg==tipreg[1] && (j>2)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+" readonly ></td>";}}
if(wstipreg!=tipreg[1]){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"></td>";}} */
if(wstipreg==tipreg[12] && (j==0||j==1||j==2)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+" value=''";}} 
if(wstipreg==tipreg[12] && (j>2)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+" value='' readonly";}}
if(wstipreg!=tipreg[12] && wstipreg!=tipreg[5]){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){ str=str+" value=''";}}
if(wstipreg==tipreg[5] && (j==0)){var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){mgz=1; str=str+" value='"+wsoggi+"' readonly";}}
str=str+" ></td>";
break;}
case "number":{str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='' type='number' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'></td>"; break;}
case "file":{prov=prov+"_file"; str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='' type='file' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")' multiple /></td>"; break;}
case "textarea":{str=str+"<textarea name='"+datiformtip[azdtef[j]]+"' rows='3' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'";
/*if(datiformtip[azdtef[j]]=="ingredienti")*/ 
if(wstipreg==tipreg[12] && datiformtip[azdtef[j]].indexOf("componenti_">-1)){mgz=1;str=str+" readonly";} str=str+" '></textarea> <input type='text' id='textarap' pattern='"+datiformpattern[dtef[i]]+"' style='display:block;' ></td>"; break;}
case "password":{str=str+"<input name='"+datiformtip[azdtef[j]]+"' value='' type='password' required title='"+datiformtit[azdtef[j]]+"' placeholder='"+datiformph[azdtef[j]]+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodregglobal\")'></td>"; break;}
case "selectsec":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=1;n<nsectorind.length;n++){str=str+"<option value='"+ssectorind[n]+"' >"+nsectorind[n]+"</option> ";} str=str+"</select></td>";  break;}
case "selectabil":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; for(n=0;n<nabilop.length;n++){str=str+"<option value='"+sabilop[n]+"' >"+nabilop[n]+"</option> ";}  str=str+"</select></td>";  break;}
case "selectsect":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' selected></option> "; 
for(n=0;n<wssect.length;n++){str=str+"<option value='"+wssect[n]+"' "; str=str+">"+wssect[n]+"</option> ";}  str=str+"</select>"; break;}
case "selectrc":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<nrc.length;n++){str=str+"<option value='"+nrc[n]+"' >"+nrc[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectacqinaf":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<acqaffid.length;n++){str=str+"<option value='"+acqaffid[n]+"' "; if(acqaffid[n]==nrcop){ str=str+" selected ";} str=str+">"+acqaffid[n]+"</option> ";}  str=str+"</select></td></tr>"; break;}
case "selectum":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; 
for(n=0;n<um.length;n++){str=str+"<option value='"+um[n]+"' >"+um[n]+"</option> ";}  str=str+"</select></td>"; break;}
case "selectlivdif":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivdif.length;n++){ str=str+"<option value='"+azlivdif[n]+"' >"+azlivdif[n]+"</option> ";} 
  str=str+"</select>"; break;}
case "selectimg":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ><option value='' ></option> "; /* alert(azndtef[j]); */ var nrcim=azlistattrib2.getNamedItem(azndtef[j]).value; /* var nrcimrif=nrcim.slice(0,3); alert(prefimg); */
for(n=0;n<nrcimg.length;n++){if(nrcimg[n].match(prefimg)==prefimg){ str=str+"<option value='"+nrcimg[n]+"' title='"+nomiimg[n]+"' >"+nrcimg[n]+"</option> ";} } str=str+"</select></td>"; break;}
}}
str=str+"<th style='display:none'><input type='text' name='canc' title='clicca per cambiare' onclick='cancsino(this)' value='NO' style='width:30px;'/>";
if(azdtinvisib.length>0){
for(m=0;m<azdtinvisib.length;m++){str=str+"<input class='invis' id='"+azdtinvisib[m]+"' name='"+azdtinvisib[m]+"' value=''>";} str=str+"</th></tr>";}
else{ str=str+"</th></tr>";}
/*str=str+"<td></td></tr>";  
str=str+"<th><input type='text' name='canc' title='clicca per cambiare' onclick='cancsino(this)' value='NO' style='width:30px;'/>";
if(azdtinvisib.length>0){
for(m=0;m<azdtinvisib.length;m++){str=str+"<input class='invis' id='"+azdtinvisib[m]+"' name='"+azdtinvisib[m]+"' value=''>";} str=str+"</th></tr></table>";}
else{ str=str+"</th></tr></table>";}  */ 
/*if(mgz==1){str=str+"<tr><td colspan="+(azlistattrib2.length+2)+"><span id='selectmag"+i+"' ></span> </td></tr>"; mgztot++;}
alert(azlistattrib2.length); alert(mgz);*/
if(mgz==1 && rifatbcalc!=""){str=str+"<tr><td colspan="+(azlistattrib2.length+2)+"><table><tr><td><span class='cancingr' onclick='canclastingred("+i+")'>cancella ultimo ingrediente</span> <!--&#160; <span class='cancingr' onclick='"+riffunzmgz+"("+i+")"+"'> <mark> calcola </mark> </span>--></td><td><span id='selectmag"+i+"' ></span></td></tr></table> </td></tr>"; mgztot++;}
} str=str+"</table>"; 
 ntot=ntot+nnew*1; 
if(reg=="mgz_produzioni_.xml"||reg=="produzioni_.xml"){var stato=prov; prov=reg;}
var azdteftot=""; for(i=0;i<azdtinvisib.length;i++){azdteftot=azdteftot+azdtinvisib[i]+"|";} azdteftot=azdteftot+azdtefstr+"canc"; 
str=str+"<table class='invis' style='display:none; height:1%;'> <tr><td colspan="+nattrib+"><input type='text' name='nomicamp' value='"+azdteftot+"' /><input type='text' name='numkey' value='"+(ntot+1)+"' /><input type='text' name='nomereg' value='"+reg+"' /> <input type='text' name='nomebloc' value='"+sec+"' /> <input type='text' name='cred1' value='"+cred1+"' /><input type='text' name='cred2' value='"+cred2+"' /><input type='text' name='tipop' value='"+tipop+"' /></td></tr></table>";
str=str+"</table>invia: <select id='sel"+selec+"' onchange='ctrlinviamod(\""+azdtefstr+"\",\""+(ntot+1)+"\",\""+prov+"\",\""+sec+"\",\""+stato+"\")'><option value='' selected></option></select></center></form>"; 
/*modfrm.innerHTML=str;*/ document.getElementById("modextern4").innerHTML=str; caricasel("inviamod",selec); if(mgztot>0 && rifatbcalc!=""){vediselectmag(mgztot,"globale"); }
if(reg==qfunc('8212469124711246712479124771248312473124781248412446124881247712476124') || reg==qfunc('8212469124711246712479124771248312469124881248412446124881247712476124')){
for(i=0;i<azlistkey.length;i++){for(j=0;j<azndtef.length;j++){document.getElementsByName(azndtef[j])[i].readOnly='true';  } }}
if(wstipreg!=tipreg[0] && wstipreg!=tipreg[12] && wstipreg!=tipreg[10]){ var s=0,k=0,j=0;
for(s=ntotin+1;s<nnew*1+ntotin+1;s++){
/* document.getElementsByName(azndtef[1])[s].value="M1"; document.getElementsByName(azndtef[2])[s].value="V1";*/
for(j=0;j<ntot+1;j++){if(j<ntotin+1){ for(k=0;k<3;k++){ document.getElementsByName(azndtef[k])[j].readOnly=true;} } 
else{ for(k=0;k<3;k++){ document.getElementsByName(azndtef[k])[j].readOnly=false;} }}
} } /*alert(azdteftot);*/
 
}
function caricaelmgz(reg,sec){percorso=percorso+"caricaelmgz; ";  var regn="";
if(reg.indexOf("mp")>0 || reg.indexOf("atz")>0 || reg.indexOf("utn")>0 || reg.indexOf("str")>0 || reg.indexOf("app")>0){
var p1=reg.lastIndexOf("_"); regn=wsaz+"/magazzini/magazzino"+reg.slice(p1); } 
if(reg.indexOf("sl")>0 || reg.indexOf("pas")>0 || reg.indexOf("fnt")>0){
var p1=reg.lastIndexOf("_"); regn=wsaz+"/produzioni/prodotti"+reg.slice(p1); } /* alert(regn+" - "+sec); */
wsletreg=wsfleggidatiaziendali(regn); /* alert(wsxmlreq.responseText);*/ var i=0, j=0, s=0, valstr="";
if(wsletreg=="esci"){ str="* ATTENZIONE * devi prima generare e implementare il registro "+reg; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; }
if(wselmgz.length>0){var n=wselmgz.length; for(i=0;i<n;i++){wselmgz.pop();} }
wslistkeyrif= nvarxml.getElementsByTagName("keyrif"); 
var numkeyrif= wslistkeyrif.length; 
for(i=0;i<numkeyrif;i++){var nom=wslistkeyrif.item(i).attributes.getNamedItem("tipologia_componenti").value; 
if(nom==sec){wslistkey=wslistkeyrif.item(i).getElementsByTagName("key"); 
for(j=0;j<wslistkey.length;j++){valstr=""; for(s=0;s<4;s++){ valstr=valstr+wslistkey.item(j).attributes[s].value+"|";} 
wselmgz.push(valstr); 
}}}wselmgz.sort();
}
function inseriscirifel(val,n){percorso=percorso+"inseriscirifel; "; var rif=val.split("|"), m=0; n=n*1;
/*for(m=0;m<rif.length-1;m++){alert(m+" - "+rif[m]); } alert(val+" - "+n); */
for(m=0;m<3;m++){document.getElementsByName(azndtef[m])[n].value=rif[m];}
var x = new Date(); var data=x.getDate()+"/"+(x.getMonth()+1)+"/"+x.getFullYear()+" "+x.getHours()+":"+x.getMinutes(); 
document.getElementsByName("qta_prel")[n].title="inserire il quantitativo espresso in "+rif[3];
document.getElementsByName("qta_ins")[n].title="inserire il quantitativo espresso in "+rif[3];
document.getElementsByName("data_prel")[n].value=data;
document.getElementsByName("data_ins")[n].value=data;
document.getElementsByName("qta_prel")[n].value="0";
document.getElementsByName("qta_ins")[n].value="0";
var op=document.createElement('OPTION');op.value="escluso"; op.text="escluso"; op.selected=true; 
document.getElementsByName("settore_ins")[n].add(op);
var op=document.createElement('OPTION');op.value="escluso"; op.text="escluso"; op.selected=true; 
document.getElementsByName("settore_prel")[n].add(op);
}
function escludiins(n){percorso=percorso+"escludiins; "; 
document.getElementsByName("data_ins")[n].value="00/00/0000";
document.getElementsByName("qta_ins")[n].value="0";
var x = new Date(); var data=x.getDate()+"/"+(x.getMonth()+1)+"/"+x.getFullYear()+" "+x.getHours()+":"+x.getMinutes(); 
document.getElementsByName("data_prel")[n].value=data;
document.getElementsByName("settore_ins")[n].value="escluso";
}
function escludiprel(n){percorso=percorso+"escludiprel; "; 
document.getElementsByName("data_prel")[n].value="00/00/0000";
document.getElementsByName("qta_prel")[n].value="0";
var x = new Date(); var data=x.getDate()+"/"+(x.getMonth()+1)+"/"+x.getFullYear()+" "+x.getHours()+":"+x.getMinutes(); 
document.getElementsByName("data_ins")[n].value=data;
document.getElementsByName("settore_prel")[n].value="escluso";
}
/*------------------- AZMODRAPINTERV -----------------*/
function azmodrapinterv(reg, regop){percorso=percorso+"azmodrapinterv; ";  /* alert(reg+" - "+regop);  alert(xmlreq.responsetext);*/
var x = document.getElementById("frmw");     x.remove();
var str="<center>Modulo per la formulazione del <mark> rapporto di intervento </mark> della lavorazione <b>"+regop.slice(0,(regop.length-4))+"</b> <button onclick='modlarge.style.display=\"none\"' > [X] </button><br/><br/>A secondo del tipo di manutenzione chiamato a svolgere, seleziona tutte le attivita' eseguite per l'intervento di oggi: <b>"+wsoggi+"</b><br/><table><tr>"; 
azlistkeyrif= nvarxml.getElementsByTagName("keyrif");  
for(i=0;i<azlistkeyrif.length;i++){var nome=azlistkeyrif.item(0).attributes.item(0).nodeName;
str=str+"<th>"+azlistkeyrif.item(i).attributes.getNamedItem(nome).value+"</th>";} str=str+"</tr><tr>";
for(i=0;i<azlistkeyrif.length;i++){str=str+"<td><div id='activ"+i+"' ></div></td>";}
str=str+"</tr></table>";
str=str+"<table class='az1'><tr><td onclick='azmodrapinterv2(\""+reg+"\", \""+regop+"\")' > <span class='az1'> procedi </span></td></tr></table><div id='rapporto'></div>";
modlarge.innerHTML=str+"<div id='modextern3'></div>"; 
for(i=0;i<azlistkeyrif.length;i++){var str2="<table>"; azlistkey=azlistkeyrif[i].getElementsByTagName("key"); 
for(j=0;j<azlistkey.length;j++){str2=str2+"<tr><td><input type='checkbox' id='ckbx_"+i+"-"+j+"' value='' /></td><td>"+azlistkey[j].attributes.getNamedItem("voce").value+" </td></tr>";} 
str2=str2+"</table>";
document.getElementById("activ"+i).innerHTML=str2;}
}
function azmodrapinterv2(reg, regop){percorso=percorso+"azmodrapinterv2; ";  var lavorazione=regop.slice(0,regop.length-4); 
var i=0,j=0,n=0,m=0,s=0,ncmp=-1,mgz=0, tipac=new Array(), keycomp=new Array(); 
/* var el=new Array("elemento","modello", "versione"); */ var cl="az3",e=0;
var lsatbsup=wslstatbsup.split(";"); var lsatbcmp=wslstatbcmp.split(";"); lsatbsup=lsatbsup.slice(1); lsatbcmp=lsatbcmp.slice(1);
var str="<center><span id='intestrap'>RAPPORTO di intervento per la lavorazione <b>"+lavorazione+"</b> completata il giorno <mark>"+wsoggi+"</mark></span></center><div id='rap'></div><table class='az1'><tr><td onclick='azmodrapgilav3(\""+reg+"\", \""+regop+"\")' > <span class='az1'> procedi </span></td></tr></table><div id='rapinv'></div>";
document.getElementById("rapporto").innerHTML=str; str="";
for(i=0;i<azlistkeyrif.length;i++){ var nome=azlistkeyrif.item(0).attributes.item(0).nodeName;
var trovato=0; azlistkey= azlistkeyrif[i].getElementsByTagName("key"); 
for(j=0;j<azlistkey.length;j++){if(document.getElementById("ckbx_"+i+"-"+j).checked==true){trovato=1;  }  }
if(trovato==1){tipac[i]="si";str=str+"<table><tr><th><mark>attivita' "+azlistkeyrif.item(i).attributes.getNamedItem(nome).value+"</mark></th></tr><tr><td><div id='tac_"+i+"'></div></td></tr></table>"; 
/*for(n=0;n<azlistkey.length;n++){if(document.getElementById("ckbx_"+i+"-"+n).checked==true){alert(azlistkey[n].attributes.getNamedItem("voce").value); } }*/ }else{tipac[i]="no";  } 
} 
document.getElementById("rap").innerHTML=str; str="";
/* for(n=0;n<azndtef.length;n++){alert(azndtef[n]+"-"+azdtef[n]); } */
for(i=0;i<azlistkeyrif.length;i++){ azlistkey=azlistkeyrif[i].getElementsByTagName("key"); 
if(tipac[i]=="si"){var str=str+"<table>"; 
if(i<3){wsrifelemgen_lav=lsatbsup;}else{wsrifelemgen_lav=lsatbcmp; /*ncmp++;alert(lsatbcmp);*/}
if(azndtef.length>0){var s=azndtef.length; for(n=0;n<s;n++){azndtef.pop(); azdtef.pop(); } }
for(s=0;s<wsrifelemgen_lav.length;s++){azndtef.push(wsrifelemgen_lav[s]); }
for(n=0;n<azndtef.length;n++){ for(m=0;m<datiformtip.length;m++){if(azndtef[n]==datiformtip[m]){azdtef.push(m); }}}
for(j=0;j<azlistkey.length;j++){ var kil="";
if(document.getElementById("ckbx_"+i+"-"+j).checked==true){str=str+"<tr><td colspan="+azndtef.length+"><b>"+azlistkey[j].attributes.getNamedItem("voce").value+"</b></td></tr>"; 
str=str+"<tr>"; for(n=0;n<azndtef.length;n++){str=str+"<th>"+azndtef[n]+"</th>"; } str=str+"</tr><tr>"; /*alert(str); */
for(n=0;n<azndtef.length;n++){
switch(datiformtipinp[azdtef[n]]){ 
case "text":{str=str+"<td><input name='"+datiformtip[azdtef[n]]+"' value='' type='text'  title='"+datiformtit[azdtef[n]]+"' placeholder='"+datiformph[azdtef[n]]+"' onchange='centroctrldatoform("+azdtef[n]+",this,\"azmodregpart\")'";
/*if(i==3 && n==1){str=str+" readonly ></td>";} else{ str=str+" ></td>";}*/ str=str+" ></td>";
 break;}
case "textarea":{str=str+"<td><textarea name='"+datiformtip[azdtef[n]]+"' rows='3'  title='"+datiformtit[azdtef[n]]+"' placeholder='"+datiformph[azdtef[n]]+"' onchange='centroctrldatoform("+azdtef[n]+",this,\"azmodregpart\")'";
/*
if(i==3 && n==0){ncmp++; mgz=1; str=str+" readonly ></textarea>"; kil="canc:<input type='text' oninput='canccmpspec(this,\""+ncmp+"\",\""+datiformtip[azdtef[n]]+"\",\""+datiformtip[azdtef[(n+1)]]+"\")' title='selezionare e trascinare il nome del componente da eliminare' >"; str=str+" "+kil+"<br/> <span class='cancingr' onclick='canclastcmp("+ncmp+",\""+datiformtip[azdtef[n]]+"\",\""+datiformtip[azdtef[(n+1)]]+"\")'>cancella l'ultimo ingrediente</span><!--<span id='selectmag"+ncmp+"' ></span>--> <br/><span class='"+cl+"'> select-comp: <select id='selcmp"+ncmp+"' onchange='caricacmp(\""+ncmp+"\",\""+datiformtip[azdtef[n]]+"\",this.value)' title='seleziona i componenti installati' ><option value='' selected></option>";
wslistkey=wslistkeyrif[j].getElementsByTagName("key"); 
for(s=0;s<wslistkey.length;s++){var elem=""; for(e=0;e<el.length;e++){ elem=elem+wslistkey[s].attributes.getNamedItem(el[e]).value+"/"; }str=str+"<option value='"+elem+"' style=' text-overflow: ellipsis;' title='"+elem+"'>"+elem+"</option>";}
str=str+"</select></td>";}
else{str=str+"></textarea>"; }*/ str=str+"></textarea> <input type='text' id='textarap' pattern='"+datiformpattern[dtef[i]]+"' style='display:block;' >";break;}
case "selectlivdif":{str=str+"<select name='"+datiformtip[azdtef[j]]+"' required title='"+datiformtit[azdtef[j]]+"' ";
var p1=rifatbcalc.indexOf(datiformtip[azdtef[j]]); if(p1>-1){str=str+"readonly";} str=str+" ><option value='' ></option> "; 
for(n=0;n<azlivdif.length;n++){ if(azlistattrib2.getNamedItem(azndtef[j]).value!=azlivdif[n]){str=str+"<option value='"+azlivdif[n]+"' >"+azlivdif[n]+"</option> ";} else{ str=str+"<option value='"+azlivdif[n]+"' selected>"+azlivdif[n]+"</option> ";}
}  str=str+"</select>"; break;}
 }}
} } str=str+"<tr></table>"; if(tipac[i]=="si"){ document.getElementById("tac_"+i).innerHTML=str; str="";} } } 
}
/*----------------- AZMODRAPGILAV -------------------*/
function azmodrapgilav(reg, regop){percorso=percorso+"azmodrapgilav; ";  /* alert(reg+" - "+regop); */
wslistkeyrif= nvarxml.getElementsByTagName("keyrif");  var trovato=0, rok="Ok", res="esci";
for(i=0;i<wslistkeyrif.length;i++){var data=wslistkeyrif[i].attributes[0].value; if(data==wsoggi){trovato=1; break;}}
if(trovato==1){modlarge.innerHTML="* ATTENZIONE *\n\n il rapporto giornaliero di oggi "+wsoggi+" e' gia' stato caricato <button onclick='chiudimodlarge();' > [X] </button>"; return; }
var x = document.getElementById("frmw");     x.remove();
var y = document.getElementById("modalpas");    if(y!=null){ y.remove();}
var str="<center>Modulo per la formulazione del registro giornaliero della lavorazione <b>"+regop.slice(0,(regop.length-4))+"</b> <button onclick='modlarge.style.display=\"none\"; coprimenu.style.display=\"none\"; ' > [X] </button><br/>Seleziona <b>gli operatori</b> e tutte <b>le tipologie di attivita' di supporto</b>, <b>le aree di intervento</b> presso le quali sono state eseguite le <b>attivita' di installazione</b>, svolte oggi: <b>"+wsoggi+"</b><br/>"; 
var regoper="lav_operator.xml", lavoraz="", nomop="";
nvarxml=wsfleggidatiaziendali(wsaz+"/datiazienda/"+regoper);/*alert(wsaz+"/datiazienda/"+regoper);alert(wsxmlreq.responseText);*/
if(wsletreg=="esci"){ str="* ATTENZIONE * il registro richiesto "+regoper+" non esiste o risdulta danneggiato. inviare dettagliate informazioni al wsm"; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; }
wslistkeyrif=nvarxml.getElementsByTagName("keyrif");
str=str+"<table><tr><td><b>Seleziona in sequenza i nomi degli operatori</b> che in data "+wsoggi+" hanno partecipato alle seguenti lavorazioni: <select  onchange='document.getElementById(\"lsoplav\").value=document.getElementById(\"lsoplav\").value+\";\"+this.value' multiple><option value='' selected></option>";
for(i=0;i<wslistkeyrif.length;i++){lavoraz=wslistkeyrif[i].attributes[0].value; p1=reg.indexOf(lavoraz); 
/*alert(lavoraz+"\n"+lavorazione+"\n"+reg+"\n"+regop+"\n"+p1); */
if(p1>-1){listkey=wslistkeyrif[i].getElementsByTagName("key"); 
for(j=0;j<listkey.length;j++){ nomop=listkey[j].attributes[0].value+" "+listkey[j].attributes[1].value; 
str=str+"<option value='"+nomop+"' >"+nomop+"</option>"; }
}
}str=str+"</select></br><textarea id='lsoplav' ></textarea></td></tr></table><table><tr><td><center><span class='az1' > Attivita' di supporto</span></center></td></tr></table><table><tr>";
/*nvarxml=wsfleggidatiaziendali(wsaz+"/lavorazioni/mgz_"+regop); 
alert(azxmlreq.responseText); alert(wsxmlreq.responseText); 
wslistkeyrif= nvarxml.getElementsByTagName("keyrif");  
wslistkeyrif=nvarxml.getElementsByTagName("keyrif");   */
var listkeysupport=nvarxml.getElementsByTagName("activity_support");
var azlistkeyrifpp= listkeysupport[0].getElementsByTagName("keyrif");  
for(i=0;i<azlistkeyrifpp.length;i++){var nome=azlistkeyrifpp.item(0).attributes.item(0).nodeName;
str=str+"<th>"+azlistkeyrifpp.item(i).attributes.getNamedItem(nome).value+"</th>";} str=str+"</tr><tr>";
for(i=0;i<azlistkeyrifpp.length;i++){str=str+"<td><div id='activpp"+i+"' ></div></td>";}
str=str+"</tr></table>";
var listkeyarint=nvarxml.getElementsByTagName("activity_areeint");
var azlistkeyrifsp= listkeyarint[0].getElementsByTagName("keyrif");  
str=str+"<table><tr><td>Seleziona in sequenza le <b>aree di intervento</b> presso le quali, in giornata, sono stati <mark>installati dei componenti</matk>  <select id='areeintsel' onchange='document.getElementById(\"lsareesel\").value=document.getElementById(\"lsareesel\").value+\";\"+this.value' multiple ><option value=''></option>";
for(i=0;i<azlistkeyrifsp.length;i++){ str=str+"<option value='"+azlistkeyrifsp[i].attributes[0].value+"'>"+azlistkeyrifsp[i].attributes[0].value+"</option>"; }
str=str+"</select><br/> aree selezionate:<input type='text' id='lsareesel' name='lsareesel' value='' style='width:50%;'/> <button onclick='azmodrapgilav1(\""+reg+"\", \""+regop+"\")'>procedi_1</button></td></tr></table> <!--<tr><td><div id='modrapgilav2'></div></table> -->"; /*<table><tr> spezzare e inserire una div nella quale mostrare la seconda parte del modulo*/
modlarge.innerHTML=str+"<div id='modextern3'></div>";
for(i=0;i<azlistkeyrifpp.length;i++){var str2="<table>"; azlistkey=azlistkeyrifpp[i].getElementsByTagName("key"); 
for(j=0;j<azlistkey.length;j++){
str2=str2+"<tr><td><input type='checkbox' id='ckbx_"+i+"-"+j+"' value='' /></td><td>"+azlistkey[j].attributes.getNamedItem("azione").value+" </td></tr>";} 
str2=str2+"</table>";
str=str+"<table class='az1'><tr><td onclick='azmodrapgilav2(\""+reg+"\", \""+regop+"\")' > <span class='az1'> procedi_2</span> </td></tr></table>";
document.getElementById("activpp"+i).innerHTML=str2;}
/*wssubmodul0.innerHTML="<button onclick='azmodrapgilav2(\""+reg+"\", \""+regop+"\")'> [procedi_1] </button>"; */
}
function azmodrapgilav1(reg, regop){percorso=percorso+"azmodrapgilav1; ";  var str="", i=0, j=0, k=0, ind1=0, ind2=0, ii=-1;jj=-1;;
/* str=str+"</td></tr><tr><td><table><tr><td class='az1'>Attivita' nelle aree di intervento</td></tr><tr><td><table><tr>"; */
str=str+"<table><tr><td class='az1'>Attivita' di installazione</td></tr></table>";
var listkeyarint=nvarxml.getElementsByTagName("activity_areeint");
var azlistkeyrifsp= listkeyarint[0].getElementsByTagName("keyrif"); /*alert(azxmlreq.responseText);alert(wsxmlreq.responseText);*/ 
/*var nome=azlistkeyrifsp[0].attributes[0].nodeName; str=str+"<th>"+azlistkeyrifsp.item(i).attributes.getNamedItem(nome).value*/
str=str+"<table><tr>";
var lsareeselar=document.getElementById("lsareesel").value.split(";"); var trovato=0;
for(j=1;j<lsareeselar.length;j++){trovato=0; 
for(i=0;i<azlistkeyrifsp.length;i++){var arrint=azlistkeyrifsp[i].attributes[0].value; if(lsareeselar[j]==arrint){trovato=1; break; } }
if(trovato==1){/*str=str+"<th><input id='arint_"+(j-1)+"' value='"+lsareeselar[j]+"' /></th>";*/ 
str=str+"<th id='arint_"+(j-1)+"'>"+lsareeselar[j]+"</th>";}} str=str+"</tr><tr>";
for(i=1;i<lsareeselar.length;i++){str=str+"<td><div id='activsp"+(i-1)+"' ></div></td>"; /*alert('activsp'+(i-1));*/ }
str=str+"</tr></table>";
str=str+"<table class='az1'><tr><td onclick='azmodrapgilav2(\""+reg+"\", \""+regop+"\")' > <span class='az1'> procedi_2 </span></td></tr></table>";
/* document.getElementById("modrapgilav2").innerHTML=str+"<div id='modextern3'></div>"; azmodrapgilav2(reg, regop); */
document.getElementById("modextern3").innerHTML=str+"<div id='rapporto'></div>"; 
for(j=1;j<lsareeselar.length;j++){ trovato=0; 
for(i=0;i<azlistkeyrifsp.length;i++){var arrint=azlistkeyrifsp[i].attributes[0].value; if(lsareeselar[j]==arrint){trovato=1; ind1=i; ind2=(j-1); lsareeselar[j]=""; break; } }
/*se la key dell'area di intervento letta è contenuta in lsareesel ne vengono visualizzati i dati*/
if(trovato==1){
var str2="<table><tr><th>componente</th><th>qt_inst</th><th></th></tr>"; 
azlistkey=azlistkeyrifsp[ind1].getElementsByTagName("key"); 
for(k=0;k<azlistkey.length;k++){var ric=azlistkey[k].attributes.getNamedItem("richiesti").value*1;
var inst=azlistkey[k].attributes.getNamedItem("installati").value*1;
var idobj="numcinst_"+ind2+"_"+k; /*alert(idobj);*/ str2=str2+"<tr><td id='actarint_"+ind2+"_"+k+"'>"+azlistkey[k].attributes.getNamedItem("componente").value+" [ric.:"+ric+" inst.:"+inst+"]</td><td><input type='number' max='"+(ric-inst)+"' min=0 value='0' onchange='document.getElementById(\""+idobj+"\").textContent=this.value' /> </td><td id='"+idobj+"'></td> </tr>"; /*alert('id=ckbx_'+ind2+'_'+k);*/ } 
str2=str2+"</table>";} /*alert('activsp'+ind2);*/
document.getElementById("activsp"+ind2).innerHTML=str2;}
/*
for(j=1;j<lsareeselar.length;j++){var obj=document.getElementById("arint_"+(j-1));obj.style.width=(obj.value.length-2)*13+"px";}
*/
}
function azmodrapgilav2(reg, regop){percorso=percorso+"azmodrapgilav2; ";  var lavorazione=regop.slice(0,regop.length-4); 
var i=0,j=0,n=0,m=0,s=0,ncmp=-1,mgz=0, tipac=new Array(), keycomp=new Array(), tipact="", nomact="", ii=-1, jj=-1, iprec=-1; 
var el=new Array("elemento","modello", "versione"); var cl="az3",e=0, nazxtipact=0, nazxtipactar=new Array();
var lsatbsup=wslstatbsup.split(";"); var lsatbcmp=wslstatbcmp.split(";"); lsatbsup=lsatbsup.slice(1); lsatbcmp=lsatbcmp.slice(1);
var str="<center><span id='intestrap'>RAPPORTO giornaliero della lavorazione <b>"+lavorazione+"</b> riferito al giorno <mark>"+wsoggi+"</mark> <!--<button onclick='vedinewfin(0)'> vedi</button> --></span></center>";
if(nazxtipactar.length>0){var s=nazxtipactar.length; for(n=0;n<s;n++){nazxtipactar.pop(); nazxtipactar.pop(); } }
var oplavar=document.getElementById("lsoplav").value.split(";");
/*   sezione operatori  */
str=str+"<table><tr><td><center><span class='az1' >Operatori<input type='text' name='tipology' value='Operatori' style='display:none' /></span></center></td></tr></table>";
str=str+"<table><tr><th>operatore</th><th>ora inizio</th><th>ora fine</th><th>totale ore</th></tr>";
for(i=1;i<oplavar.length;i++){
str=str+"<tr><td><input type='text' name='nomeop' value='"+oplavar[i]+"' style='background-color:transparent; border:0px;'  readonly /></td><td><input name='orin' type='number' min=0 max=23 value='8' />:<input name='minin' type='number' min=0 max=59 value='0' step='5' /></td><td><input name='orfin' type='number' min=0 max=23 value='8' />:<input name='minfin' type='number' min=0 max=59 value='0' step='5' /></td><td><input type='text' name='ortot' onclick='calcolaore("+(i-1)+")' readonly /></td></tr>";
} str=str+"</table>";
/*   sezione attivita' di supporto  */
str=str+"<table><tr><td><center><span class='az1' >Attivita&#180; di supporto<input type='text' name='tipology' value='Attivita&#180; di supporto' style='display:none' /></span></center></td></tr></table>";
var listkeysupport=nvarxml.getElementsByTagName("activity_support");
var azlistkeyrifpp= listkeysupport[0].getElementsByTagName("keyrif");  ii=-1; 
for(i=0;i<azlistkeyrifpp.length;i++){ var nome=azlistkeyrifpp.item(0).attributes.item(0).nodeName;
var trovato=0; azlistkey= azlistkeyrifpp[i].getElementsByTagName("key"); 
for(j=0;j<azlistkey.length;j++){if(document.getElementById("ckbx_"+i+"-"+j).checked==true){trovato=1;  }  }
if(trovato==1){tipac[i]="si"; tipact=azlistkeyrifpp.item(i).attributes.getNamedItem(nome).value; 
str=str+"<table><tr><th><span name='tipact' style='background-color:transparent; border:0px;' >"+tipact+"</span> </th></tr>";
jj=-1;
for(j=0;j<azlistkey.length;j++){  
if(document.getElementById("ckbx_"+i+"-"+j).checked==true){
					
jj++; nomact=azlistkey[j].attributes.getNamedItem("azione").value; 
if(i!=iprec && iprec==-1){ii++; iprec=i; nazxtipact=1; str=str+"<table>"; str=str+"<div name='p2' >"; }
else if(i!=iprec && iprec!=-1){ii++; iprec=i; nazxtipactar.push(nazxtipact); nazxtipact=1; str=str+"<table>"; str=str+"<div name='p2' >"; }  else{nazxtipact++;}
/* alert("i="+i+"\n iprec="+iprec+"\n nomactpp_"+ii+"_"+jj);  */
str=str+"<tr> <td>seleziona lo stato di avanzamento delle operazioni di: <b><span name='nomspan_"+ii+"' id='nomactpp_"+ii+"_"+jj+"' >"+nomact+"</span></b>: <select onchange='carica(\"statopp_"+ii+"_"+jj+"\",this.value)' ><option value='' checked></option> <option value='Avviate' >Avviate</option> <option value='Avviate e completate' >Avviate e completate</option> <option value='Proseguite' >Proseguite</option> <option value='Completate' >Completate</option> </select><span id='statopp_"+ii+"_"+jj+"' style='display:none' ></span>. &#160; Note al riguardo:  <input type='text' onchange='carica(\"notepp_"+ii+"_"+jj+"\",this.value)' value='' /><span id='notepp_"+ii+"_"+jj+"' style='display:none' ></span></td></tr>"; }}
str=str+"</table>"; str=str+"</div>";
 }else{tipac[i]="no";  } 
} 
nazxtipactar.push(nazxtipact);
var numazxact="";
for(i=0;i<nazxtipactar.length;i++){ numazxact=numazxact+";"+nazxtipactar[i];} /* alert(numazxact); */
/*   sezione attivita' di installazione   */
var str3=""; var cmpqtainstar=new Array(), cmpqtainst="", arint_cmp_inst_="", cmpforarint="";
str=str+"<table><tr><td><center><span class='az1' >Attivita&#180; di installazione<input type='text' name='tipology' value='Attivita&#180; di installazione' style='display:none' /></span></center></td></tr></table>";
var lsareeselar=document.getElementById("lsareesel").value.split(";"); /* alert(lsareeselar.length); */
if(lsareeselar.length>0){  var arint="", numcinst="", actarint="", trovato=0, ind1=0, ind2=0; 
str3=str3+"<table>";
var listkeyarint=nvarxml.getElementsByTagName("activity_areeint");
var azlistkeyrifsp= listkeyarint[0].getElementsByTagName("keyrif");   
for(j=1;j<lsareeselar.length;j++){ trovato=0; str3=str3+"<tr><th id='arint_"+(j-1)+"'>"+lsareeselar[j]+"</th></tr>"; 
for(i=0;i<azlistkeyrifsp.length;i++){var arrint=azlistkeyrifsp[i].attributes[0].value; 
if(lsareeselar[j]==arrint){trovato=1; ind1=i; ind2=(j-1); lsareeselar[j]=""; break; } }
if(trovato==1){azlistkey=azlistkeyrifsp[ind1].getElementsByTagName("key"); /*alert(arrint);*/ arint_cmp_inst_=""; arint_cmp_inst_=arrint+"|";
for(k=0;k<azlistkey.length;k++){var arint=document.getElementById("arint_"+(j-1)).textContent; 
numcinst=document.getElementById("numcinst_"+ind2+"_"+k).textContent; 
actarint=document.getElementById("actarint_"+ind2+"_"+k).textContent; 
if(numcinst!="" && numcinst!="0"){arint_cmp_inst_=arint_cmp_inst_+actarint+";"+numcinst+"/";
str3=str3+"<tr><td>installati n. <b>"+numcinst+"</b> di <b>"+actarint+"</b>  </td></tr>"; 
p1=actarint.indexOf(" ("); if(p1>0){actarint=actarint.slice(0,p1); } cmpqtainstar.push(actarint+";"+numcinst); }
} str3=str3+"<tr style='display:none'><td><input type='text' id='arint_cmp_inst_"+j+"' value='"+arint_cmp_inst_+"' /></td> </tr>"; } }
str3=str3+"</table>"; 
for(i=0;i<cmpqtainstar.length;i++){cmpqtainst=cmpqtainst+"|"+cmpqtainstar[i]; }
str=str+str3+"<span id='str3' style='display:none'>"+str3+"</span> <span class='az1' onclick='azmodrapgilav3(\""+cmpqtainst+"\",\""+numazxact+"\",\""+reg+"\",\""+regop+"\")'> controlla e registra </span></td></tr></table><div id='rap_inv'></div>";  
document.getElementById("rapporto").innerHTML=str;
}
var lsinp=document.getElementsByTagName("input"); /* alert(lsinp.length);  */
for(i=0;i<lsinp.length;i++){lsinp[i].style.width=(lsinp[i].value.length-5)*13+"px"; }
var str0=""; 
str0=str0+"<table><tr><td><center><mark><b>ORDINE DI SERVIZIO</b> per il settore operativo <b><mark> "+regop.slice(0,(regop.length-4))+" </mark> </b>  <button onclick='chiudimodshort()'>[X]</button> <button onclick='vedinewfin(0)'> vedi</button></tr></td> </table> ";
 wsmodshort.style.textAlign="initial";
wsmodshort.innerHTML=str0+str; wsmodshort.style.display="block"; wsmodshort.style.zIndex=150; 
}
function carica(cel,val){percorso=percorso+"carica";  /*alert(cel+"\n"+val);*/ document.getElementById(cel).innerHTML=val; }
function azmodrapgilav3(cmpqtainst,numazxact,reg, regop){percorso=percorso+"azmodrapgilav3; ";  /* alert(numazxact); */
var arrint=document.getElementById("lsareesel").value.split(";"); 
/* for(i=1;i<arrint.length;i++){alert(document.getElementById("arint_cmp_inst_"+i).value+"\n"+arrint[i]); } return; */
var lavorazione=regop.slice(0,regop.length-4), nrec=0, valrec="", tipac=new Array(); 
var s=0, i=0, j=0, n=0, m=0, sj=-1,cj=-1, nj=0,ii=-1,jj=-1; 
var str="<center><span id='intestrap'>RAPPORTO giornaliero della lavorazione <b>"+lavorazione+"</b> riferito al giorno <mark>"+wsoggi+"</mark> </span></center>";
str=str+"<table><tr><td>";
var oplavar=document.getElementById("lsoplav").value.split(";");
var tipology=document.getElementsByName("tipology");
var tipact=document.getElementsByName("tipact");  /* for(i=0;i<tipact.length;i++){alert(tipact[i].innerText); } */
for(s=0;s<tipology.length;s++){ 
ntipology=document.getElementsByName("tipology")[s].value; 
str=str+"<table><tr><td><center><span class='az1' > "+ntipology+" </span></center></td></tr></table>";
if(s==0){ str=str+"<table><tr><th>nome</th><th>ora-in</th><th>min-in</th><th>ora-fin</th><th>min-fin</th><th>totale</th></tr><tr>";
for(j=1;j<oplavar.length;j++){ 
nomeop=document.getElementsByName("nomeop")[(j-1)].value; str=str+"<td>"+nomeop+"</td>";
orin=document.getElementsByName("orin")[(j-1)].value; str=str+"<td>"+orin+"</td>";
minin=document.getElementsByName("minin")[(j-1)].value; str=str+"<td>"+minin+"</td>";
orfin=document.getElementsByName("orfin")[(j-1)].value; str=str+"<td>"+orfin+"</td>";
minfin=document.getElementsByName("minfin")[(j-1)].value; str=str+"<td>"+minfin+"</td>";
ortot=document.getElementsByName("ortot")[(j-1)].value; str=str+"<td>"+ortot+"</td></tr>";
} } str=str+"</table>";
if(s==1){ var nomactpp="", statopp="", notepp="", nazxactar=numazxact.split(";");  /* alert(nazxactar.length); */
for(i=0;i<tipact.length;i++){ ntipact=tipact[i].innerText; str=str+"<table><tr><th>"+ntipact+"</th></tr>";
for(j=0;j<nazxactar[(i+1)];j++){ /* alert("nomactpp_"+i+"_"+j); */
var lsnomactpp=document.getElementById("nomactpp_"+i+"_"+j);
var lsstatopp=document.getElementById("statopp_"+i+"_"+j);
var lsnotepp=document.getElementById("notepp_"+i+"_"+j); 
nomactpp=lsnomactpp.innerHTML; statopp=lsstatopp.innerHTML; notepp=lsnotepp.innerHTML;
str=str+"<tr><td> lavorazione: <b>"+nomactpp+"</b><br/> stato: <b>"+statopp+"</b><br/>note: <b>"+notepp+"</b></td></tr>";}
} } str=str+"</table>";
if(s==2){ var str3=document.getElementById("str3").innerHTML; str=str+str3; 
if(cmpqtainst!=""){ var arcompnom=cmpqtainst.split("|"); arcompnom.sort(); var cmp="", cmpprec="", qta=0, qtatot=0;
for(m=1;m<arcompnom.length;m++){p1=arcompnom[m].indexOf(";"); cmp=arcompnom[m].slice(0,p1); qta=arcompnom[m].slice((p1+1))*1; 
if(cmp==cmpprec){arcompnom[m]=""; qtatot=qtatot+qta;  }
else if(cmp!=cmpprec && indrif==0 && m==0){ qtatot=qta; cmpprec=cmp; indrif=m; arcompnom[m]=cmp; }
else if(cmp!=cmpprec && m>0){arcompnom[indrif]=arcompnom[indrif]+";"+qtatot; qtatot=qta;cmpprec=cmp;indrif=m; arcompnom[m]=cmp; }
else{}
} 
var h=0, p1=0;
/*for(h=0;h<arcompnom.length;h++){p1=arcompnom[h].indexOf(" ["); arcompnom[h]=arcompnom[h].slice(0,p1); }*/
arcompnom[indrif]=arcompnom[indrif]+";"+qtatot; wsqtatot=""; wscmp="";
for(m=0;m<arcompnom.length;m++){if(arcompnom[m]!=""){p1=arcompnom[m].indexOf(";"); cmp=arcompnom[m].slice(0,p1); 
qta=arcompnom[m].slice((p1+1))*1; wscmp=wscmp+";"+cmp; wsqtatot=wsqtatot+";"+qta; } } /*alert(wscmp+"\n"+wsqtatot);*/
}
}
}
document.getElementById("rap_inv").innerHTML=str;
var regdamod=wsaz+"/lavorazioni/rapgilav_"+regop;
var strf="<form id='frmnewrap' target='popup' > "; 
strf=strf+"<div id='rec"+nrec+"'><input name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+regdamod+"' readonly='true'></div>"; nrec++; 
valrec="keyrif data=&#39;"+wsoggi+"&#39; >";
strf=strf+"<div id='rec"+nrec+"'><textarea name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis'>"+valrec+"</textarea></div>"; nrec++;
str="<html><head><meta charset='utf-8' /><meta HTTP-EQUIV='Pragma' CONTENT='no-cache'><link rel='stylesheet' type='text/css' href='http://www.servizinterattivi.it/newdms/funzionisito/wscss.css' /></head><body>"+str+"</body></html>";
str=str.replace(/\</g, "-"); 
valrec=str;
strf=strf+"<div id='rec"+nrec+"'><textarea name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis'>"+valrec+"</textarea></div>"; nrec++;
valrec="/keyrif>";
strf=strf+"<div id='rec"+nrec+"'><input name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+valrec+"' readonly='true'></div>"; nrec++;
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='nrec' value='"+nrec+"' /><input type='text' name='wscmp' value='"+wscmp+"' /><input type='text' name='wsqtatot' value='"+wsqtatot+"' /><input type='text' name='cred1' value='"+cred1+"' /><input type='text' name='cred2' value='"+cred2+"' /><input type='text' name='tipop' value='"+tipop+"' /><input type='text' name='operaz' value='caricamento del rapporto di lavoro' /> <input type='text' name='numarint' value='"+arrint.length+"' />";
/*for(i=1;i<arrint.length;i++){alert(+"\n"+arrint[i]); }*/
for(i=1;i<arrint.length;i++){ var arint_cmp_inst_=document.getElementById("arint_cmp_inst_"+i).value;
strf=strf+"<input name='arint_cmp_inst_"+i+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+arint_cmp_inst_+"' readonly='true' />"; 
}
strf=strf+"</div></form><button onclick='wsfmodificarapgilav()'> INVIA </button> <button onclick='wsmodshort.innerHTML=\"\"; wsmodshort.style.display=\"none\"'> chiudi </button>"; 
wsmodshort.innerHTML=strf; wsmodshort.style.display="block";
}
function wsfmodificarapgilav(){percorso=percorso+"wsfmodificarapgilav; "; 
var frm=document.getElementById("frmnewrap"); 
frm.action="progasp/inseriscirapgilav.asp"; frm.target="popup"; /*alert(frm.action);*/ frm.method="post"; frm.submit(); 
}
function vedimodaldoselav(ncmp,val){percorso=percorso+"vedimodaldoselav; ";   var modaldose=document.getElementById("modaldose"); modaldose.style.display="block";
var modcont=document.getElementById('modalcontent'); 
var str="<br/><hr style='width:100%; color:#fff;'><br/><center>indica il numero di <mark> "+val+" </mark> installati: <br/><input type='number' id='dss' onchange='chiudimodallav(\""+ncmp+"\",\""+val+"\",this.value)' value=''><br/><hr style='width:100%; color:#fff;'><span onclick='chiudimodallav(\""+ncmp+"\",\""+val+"\",this.value)' style='cursor:pointer;'>[ok]</span></center>"; 
modcont.innerHTML=str; document.getElementById("dss").focus();
}
function chiudimodallav(ncmp,val,val2){percorso=percorso+"chiudimodallav; ";   /*alert(nrec+" - "+val+" - "+val2);
var dos=document.getElementById("dss").value; var okval=vedival(dos);
if(okval=="ok"){*/var ds=document.getElementsByName("quantitativi")[ncmp]; ds.value=ds.value+";"+val2; 
var moddos=document.getElementById('modaldose'); moddos.style.display='none';
/*var costo=document.getElementsByName("costo")[nrec]; 
costo.value=(costo.value*1+(rifnewel[1]*dos*1/1000)).toFixed(2);}
else{alert("ATTENZIONE\n\n devi indicare il quantitativo espresso in "+rifnewel[2]+" dell'ingrediente scelto"); return; }*/
}
function caricacmp(ncmp,natb,val){percorso=percorso+"caricacmp; ";  /*alert(ncmp+"-"+natb+"-"+val);*/ var cmp=document.getElementsByName(natb)[ncmp]; 
var aa=cmp.value; var p1=aa.indexOf(val[0]);
if(p1!=-1){alert("ATTENZIONE\n\nil componente selezionato era gia' stato inserito\n\n"); return;}
aa=aa+";"+val; cmp.value=aa; 
if(natb!="ncompric" && natb!="ndatric" && natb!="nactric"){ vedimodaldoselav(ncmp,val);
var y=document.getElementById('selcmp'+ncmp); 
var lop=y.getElementsByTagName('option'); /* alert(y.value); alert(lop.length); */
lop[0].selected=true;}
}
function canclastcmp(ind,natb,natbqta){percorso=percorso+"canclastcmp; ";  var cmp=document.getElementsByName(natb)[ind];
var qta=document.getElementsByName(natbqta)[ind]; 
var lscmp=cmp.value, lsqta=qta.value, i=0; var cmpar=lscmp.split(";"), qtaar=lsqta.split(";"); lscmp=""; lsqta="";
for(i=1;i<cmpar.length-1;i++){lscmp=lscmp+";"+cmpar[i]; lsqta=lsqta+";"+qtaar[i]; } cmp.value=lscmp; qta.value=lsqta; 
}
function canccmpspec(obj,ind,natb,natbqta){percorso=percorso+"canccmpspec; ";  var cmp=document.getElementsByName(natb)[ind]; 
var qta=document.getElementsByName(natbqta)[ind]; var lscmp=cmp.value, lsqta=qta.value, i=0; 
var cmpar=lscmp.split(";"), qtaar=lsqta.split(";"); /*alert(obj.value+" - "+lscmp+" - "+ind); alert(cmpar); */ lscmp=""; lsqta="";
for(i=1;i<cmpar.length;i++){if(cmpar[i]!=obj.value){ lscmp=lscmp+";"+cmpar[i]; lsqta=lsqta+";"+qtaar[i]; }} 
cmp.value=lscmp; qta.value=lsqta; obj.value="";/**/
}
/*------------------- AZMODORDINAZIONI -----------------*/
function azmodordinazioni(reg,operaz){percorso=percorso+"azmodordinazioni; ";  alert("azmodordinazioni\n"+reg+"\n"+wsnomreg+"\n"+azxmlreq.responseText); /* 
document.getElementById("modextern2").innerHTML="xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx";
alert("azmodordinazioni\n"+reg+"\n"+wscart+"\n"+operaz+"\n"+indbasexml+reg);*/ var str="";
/*var x = document.getElementById("frmw"); if(x!=null){ x.remove();} var op="",str="";
if(operaz=="letreg"){op="lettura";}else{op="modifica";}*/
if(operaz=="letreg"){str=str+"Seleziona il tipo di lettura: <select onchange='azleggiordinazioni0(\""+reg+"\",this.value)' ><option value='' selected></option><option value='per identificativo ordinazione'>per identificativo ordinazione</option><option value='per Acquirenti'>per Acquirenti</option></select> ";} 
else{ str=str+"seleziona il <b>tipo di modifica da realizzare</b>: <select id='selmodordinaz' onchange='azmodordinazioni2(\""+reg+"\",this.value)' ><option value='' selected></option><option value='0'>modificare il livello di sconto</option><option value='1'>modificare i dati di una ordinazione</option></select> "; }
document.getElementById("modextern2").innerHTML=str+"<div id='modextern3'></div>"; /*alert(azxmlreq.responseText); */
}
function azmodordinazioni2(reg, val){percorso=percorso+"azmodordinazioni2; ";  /* alert("azmodordinazioni2\n"+reg+"\n"+val); alert(azxmlreq.responseText);*/ 
var str="",acquir="", ordinaz="",i=0,j=0;
if(val=="0"){ azlistkeyrif= nvarxml.getElementsByTagName("keyrif");  
str=str+"seleziona <b>l'acquirente al quale cambiare il livello di sconto</b>: <select id='selacquir' onchange='azmodordinazioni3(\""+reg+"\", \""+val+"\",this.value)'><option value='' selected></option> </select>";
document.getElementById("modextern3").innerHTML=str+"<div id='modextern4'></div>";
var selec=document.getElementById("selacquir");
for(i=0;i<azlistkeyrif.length;i++){acquir=azlistkeyrif[i].attributes[0].value;
/*var nom=azlistkeyrif[i].attributes.getNamedItem("nome").value; 
var cf=azlistkeyrif[i].attributes.getNamedItem("codice_fiscale").value; acquir=cogn+"_"+nom+"_"+cf;*/
op=document.createElement('OPTION');op.value=acquir; op.text=acquir; selec.add(op);} 
}
if(val=="1"){ azlistkey= nvarxml.getElementsByTagName("key");  /*alert(azlistkey.length);*/
str=str+"seleziona il <b>codice di riferimento dell'ordinazione</b> da modificare: <select id='selordinaz' onchange='azmodordinazioni3(\""+reg+"\", \""+val+"\",this.value)'><option value='' selected></option> </select>";
document.getElementById("modextern3").innerHTML=str+"<div id='modextern4'></div>";
var selec=document.getElementById("selordinaz");
for(i=0;i<azlistkey.length;i++){ordinaz=""; ordinaz=azlistkey[i].attributes[0].value;
op=document.createElement('OPTION');op.value=ordinaz; op.text=ordinaz; selec.add(op);}}
}
function azmodordinazioni3(reg, val,rif){percorso=percorso+"azmodordinazioni3; "; /* alert("azmodordinazioni3\n"+reg+"\n"+val+"\n"+rif); */
var calcolatiacq="",calcolatikey="",attribacq="",attribkey="",i=0,j=0,n=0, str="<table>", cmp="",trovato=0,atrbind=new Array();
var listkeyglob= nvarxml.getElementsByTagName(reg); 
calcolatiacq=listkeyglob[0].attributes.getNamedItem("calcolatiacq").value;
calcolatikey=listkeyglob[0].attributes.getNamedItem("calcolatikey").value;
attribacq=listkeyglob[0].attributes.getNamedItem("attribacq").value;
attribkey=listkeyglob[0].attributes.getNamedItem("attribkey").value;
if(azndtef.length>0){var n=azndtef.length; for(i=0;i<n;i++){azndtef.pop(); azdtef.pop(); atrbind.pop();} }
var acquir="";
wsletreg=wsfleggidatiaziendali(wsaz+"/datiazienda/promozioni_ordinazioni.xml"); 
wslistkeyrif=nvarxml.getElementsByTagName("keyrif"); 
if(val=="0"){
for(i=0;i<azlistkeyrif.length;i++){/*var cogn=azlistkeyrif[i].attributes.getNamedItem("cognome").value;
var nom=azlistkeyrif[i].attributes.getNamedItem("nome").value; 
var cf=azlistkeyrif[i].attributes.getNamedItem("codice_fiscale").value; var acquir=cogn+"_"+nom+"_"+cf;*/
acquir=azlistkeyrif[i].attributes[0].value;
if(acquir==rif){ /*alert(calcolatiacq+"\n"+attribacq); */
var calcolatiacqar=calcolatiacq.split(";"), attribacqar=attribacq.split(";"); 
for(j=1;j<attribacqar.length;j++){azndtef[(j-1)]=attribacqar[j]; }
for(j=0;j<azndtef.length;j++){ for(m=0;m<datiformtip.length;m++){if(azndtef[j]==datiformtip[m]){azdtef[j]=m; }}}
for(j=0;j<azndtef.length;j++){cmp=azndtef[j]; trovato=0;    /*alert(azndtef[j]+"\n"+azdtef[j]+"\n"+datiformtip[azdtef[j]]+"\n"+azlistkeyrif[i].attributes.getNamedItem(azndtef[j]).value+"\n"+datiformph[azdtef[j]]+"\n"+datiformtipinp[azdtef[i]]);*/
for(n=1;n<calcolatiacqar.length-1;n++){/*alert(calcolatiacqar[n]+"\n"+cmp);*/ if(calcolatiacqar[n]==cmp){trovato=1; break;} }
str=str+"<tr><td>"+cmp+"</td>"; /*alert(cmp+"\n"+trovato);*/
if(trovato==1){ var scnprec=azlistkeyrif[i].attributes.getNamedItem("sconto").value;
str=str+"<td id='"+cmp+"'>"+azlistkeyrif[i].attributes.getNamedItem(azndtef[j]).value+"</td></tr>"; }
else{str=str+"<td><span  id='scnprec' style='display:none'>"+scnprec+"</span><select onchange='document.getElementById(\""+cmp+"\").innerText=this.value'><option value='' selected></option>";
for(i=0;i<wslistkeyrif.length;i++){ if(wslistkeyrif[i].attributes[0].value=="grossista"){
wslistkey=wslistkeyrif[i].getElementsByTagName("key"); 
for(n=0;n<wslistkey.length;n++){ var livscn=wslistkey[n].attributes.getNamedItem("liv_scn").value;
var sconto=wslistkey[n].attributes.getNamedItem("sconto").value, spmin=wslistkey[n].attributes.getNamedItem("spesa_min").value;
var spmax=wslistkey[n].attributes.getNamedItem("spesa_max").value;
str=str+"<option value='"+sconto+"'>sconto del "+livscn+"% per una spesa tra i "+spmin+" e i "+spmax+" &#128;</option>";
} } }  str=str+"</select> <span  id='"+cmp+"'>"+scnprec+"</span></td></tr>";  }} } } attribkey=attribacq;
}
if(val=="1"){
for(i=0;i<azlistkey.length;i++){var ordinaz=azlistkey[i].attributes[0].value; 
if(ordinaz==rif){/*alert(calcolatikey+"\n"+attribkey);*/ var calcolatikeyar=calcolatikey.split(";"), attribkeyar=attribkey.split(";"); 
for(j=1;j<attribkeyar.length;j++){azndtef[(j-1)]=attribkeyar[j]; }
for(j=0;j<azndtef.length;j++){ for(m=0;m<datiformtip.length;m++){if(azndtef[j]==datiformtip[m]){azdtef[j]=m; }}}
for(j=0;j<azndtef.length-1;j++){cmp=azndtef[j]; trovato=0;    /*alert(azndtef[j]+"\n"+azdtef[j]+"\n"+datiformtip[azdtef[j]]+"\n"+azlistkeyrif[i].attributes.getNamedItem(azndtef[j]).value+"\n"+datiformph[azdtef[j]]+"\n"+datiformtipinp[azdtef[i]]);*/
for(n=1;n<calcolatikeyar.length;n++){/*alert(calcolatiacqar[n]+"\n"+cmp);*/ if(calcolatikeyar[n]==cmp){trovato=1; break;} }
str=str+"<tr><td>"+cmp+"</td>"; /*alert(cmp+"\n"+trovato);*/
if(trovato==1){ str=str+"<td id='"+cmp+"'>"+azlistkey[i].attributes.getNamedItem(azndtef[j]).value+"</td></tr>"; }
else{str=str+"<td>oggi: <select onchange='document.getElementById(\""+cmp+"\").value=\""+wsoggi+"\"' ><option value='' selected></option><option value='"+wsoggi+"'>"+wsoggi+"</option></select> <input id='"+cmp+"' onchange='centroctrldatoform("+azdtef[j]+",this,\"azmodordinazioni\")' value='"+azlistkey[i].attributes.getNamedItem(azndtef[j]).value+"' title='gg/mm/aaa' /></td></tr>";}}
str=str+"<tr><td>esito</td><td><select id='esito' > <option selected value='"+azlistkey[i].attributes.getNamedItem("esito").value+"'> "+azlistkey[i].attributes.getNamedItem("esito").value+"</option><option value='positivo'>positivo</option><option value='negativo'>negativo</option></select></td></tr>";} }
}str=str+"<tr><td colspan=2><center><span onclick='azmodordinazioni4(\""+reg+"\", \""+val+"\", \""+rif+"\", \""+attribkey+"\")' class='az1'> registra </span></center></td></table>"; document.getElementById("modextern4").innerHTML=str;
}
function azmodordinazioni4(reg, val,rif,attrib){percorso=percorso+"azmodordinazioni4; "; /* alert("azmodordinazioni4\n"+reg+"\n"+val+"\n"+rif+"\n"+attrib); */
if(val==0){
var newsc="",scnprec="";newsc=document.getElementById("sconto").textContent;scnprec=document.getElementById("scnprec").textContent;
if(newsc==""){str="* ATTENZIONE * non e' stato selezionato alcun livello di sconto"; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; }
if(newsc==scnprec){str="* ATTENZIONE * il livllo di sconto selezionato e' identico al precedente"; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; }}
var keyconf="", newkey="", p1=0,p2=0,i=0,strf="",nrec=0,n=0; var attribar=attrib.split(";"), indreg=wsnomreg;
var indreg=wsaz+"/ordinazioni/"+reg;
var strf="<form id='frmnewrap' target='popup' > "; 
strf=strf+"<div id='rec"+nrec+"'><input name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis' value='"+indreg+"' readonly='true'></div>"; nrec++; 
if(val==0){/*p1=rif.indexOf("_"); p2=rif.lastIndexOf("_"); 
keyconf="keyrif cognome=&#39;"+rif.slice(0,p1)+"&#39; nome=&#39;"+rif.slice((p1+1),p2)+"&#39; codice_fiscale=&#39;"+rif.slice((p2+1))+"&#39; ";  */ keyconf="keyrif acquirente=&#39;"+rif+"&#39; ";
valrec=keyconf;
strf=strf+"<div id='rec"+nrec+"'><textarea name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis'>"+valrec+"</textarea></div>"; nrec++;
newkey=keyconf;
for(i=2;i<attribar.length;i++){ newkey=newkey+attribar[i]+"=&#39;"+document.getElementById(attribar[i]).innerText+"&#39; ";
} newkey=newkey+"rif0=&#39;ordinaz_rif&#39; rif1=&#39;prodotti&#39; rif2=&#39;quantitativi&#39; rif3=&#39;costi&#39; rif4=&#39;costo&#39; rif5=&#39;data_inizio&#39; rif6=&#39;data_saldo&#39; rif7=&#39;data_fine&#39;  >"; 
valrec=newkey;
strf=strf+"<div id='rec"+nrec+"'><textarea name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis'>"+valrec+"</textarea></div>"; nrec++;
}
if(val==1){ 
keyconf="key ordinaz_rif=&#39;"+rif+"&#39; ";  
valrec=keyconf;
strf=strf+"<div id='rec"+nrec+"'><textarea name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis'>"+valrec+"</textarea></div>"; nrec++;
newkey=keyconf;
for(i=2;i<attribar.length-4;i++){ newkey=newkey+attribar[i]+"=&#39;"+document.getElementById(attribar[i]).innerText+"&#39; ";} n=i;
for(i=n;i<attribar.length;i++){ newkey=newkey+attribar[i]+"=&#39;"+document.getElementById(attribar[i]).value+"&#39; ";}
 newkey=newkey+"/>"; 
valrec=newkey;
strf=strf+"<div id='rec"+nrec+"'><textarea name='key"+nrec+"' style='border:0px; width:100%; text-overflow: ellipsis'>"+valrec+"</textarea></div>"; nrec++;
}
var dtefstr=";dtefstr;nrec;cred1;cred2;tipop;operaz";
strf=strf+"<div id='rec"+nrec+"'><input type='text' name='nrec' value='"+nrec+"' /><input type='text' name='dtefstr' value='"+dtefstr+"' /><input type='text' name='cred1' value='"+cred1+"' /><input type='text' name='cred2' value='"+cred2+"' /><input type='text' name='tipop' value='"+tipop+"' /><input type='text' name='operaz' value='modifica del registro ordinazioni_beni_prod.xml' /> ";
strf=strf+"</div></form><button onclick='azmodordinazioni5()'> INVIA </button> <button id='invia' onclick='wsmodshort.innerHTML=\"\"; wsmodshort.style.display=\"none\"'> chiudi </button>"; 
wsmodshort.innerHTML=strf; wsmodshort.style.display="block";  wsmodshort.style.zIndex=100;  
document.getElementById("invia").click();
}
function azmodordinazioni5(){percorso=percorso+"azmodordinazioni5; "; 
var frm=document.getElementById("frmnewrap"); /*inserisci_newtip_regopmgz*/
frm.action="progasp/azmodregordinazioni.asp"; frm.target="popup"; /*alert(frm.action);*/ frm.method="post"; frm.submit(); 
}
/* LEGGIIORDINAZIONI */
function azleggiordinazioni0(reg,val){percorso=percorso+"azleggiordinazioni0; ";  var regmgz="",indregmgz="",str="",setmerc="",acq="",acqar=new Array(),i=0,ordinaz="";
/*regmgz=reg.replace("ordinazioni_","mgz_" );*/ regmgz=reg.replace("ordinazioni_","" );
indregmgz=wsaz+"/magazzini/beni_da_vendere/"+regmgz; /*alert("azleggiordinazioni\n"+reg+"\n"+val+"\n"+indregmgz);*/
nvarxml=wsfleggidatiaziendali(indregmgz); /*alert(wsxmlreq.responseText);alert(azxmlreq.responseText);*/
/*setmerc=nvarxml.getElementsByTagName(regmgz)[0].attributes.getNamedItem("setmerc").value;*/ setmerc=regmgz.slice(0,(regmgz.length-4));
azlistkeyrif=nvarxml.getElementsByTagName("keyrif");
if(val=="per Acquirenti"){
str=str+"Seleziona l'acquirente del settore merceologico <b>"+setmerc+"</b>: <select id='selacqordinaz' onchange='wsfleggiordinazioni(\""+reg+"\",\""+setmerc+"\",this.value)' ><option value='' selected></option>";
for(i=0;i<azlistkeyrif.length;i++){acq=""; acq=acq=azlistkeyrif[i].attributes[0].value; acqar[i]=acq;/*acq=azlistkeyrif[i].attributes[0].value+"_"+azlistkeyrif[i].attributes[1].value+"_"+azlistkeyrif[i].attributes[2].value; */ } 
acqar.sort(); for(i=0;i<acqar.length;i++){ str=str+"<option value='"+acqar[i]+"'>"+acqar[i]+"</option>";}
str=str+"<option value='tutti'>tutti</option></select><div id='modextern4'></div> ";}
else{/*str="inserisci il codice identificativo dell'ordinazione desiderata <input type='text' onchange='wsfleggiordinazspecific(\""+reg+"\",\""+setmerc+"\",this.value)' /><div id='modextern4'></div>";*/ 
azlistkey= nvarxml.getElementsByTagName("key");  /*alert(azlistkey.length);*/
str=str+"seleziona il <b>codice di riferimento dell'ordinazione</b> da modificare: <select id='selord' onchange='wsfleggiordinazspecific(\""+reg+"\",\""+setmerc+"\",this.value)'><option value='' selected></option>";
for(i=0;i<azlistkey.length;i++){
ordinaz=""; ordinaz=azlistkey[i].attributes[0].value; str=str+"<option value='"+ordinaz+"'>"+ordinaz+"</option>"; }
str=str+"</select><div id='modextern4'></div>";
document.getElementById("modextern3").innerHTML=str;}
/*var selec=document.getElementById("selord");
{ordinaz=""; ordinaz=azlistkey[i].attributes[0].value; 
op=document.createElement('OPTION');op.value=ordinaz; op.text=ordinaz; selec.add(op);}}*/
document.getElementById("modextern3").innerHTML=str;
}
function wsfleggiordinazspecific(reg,setmerc,val){percorso=percorso+"wsfleggiordinazspecific; ";   val=val+""; var i=0,trovato=0,ind=0,idrif=""; 
/*alert("azleggiordinazspecific\n"+reg+"\n"+setmerc+"\n"+val+"\n"+azxmlreq.responseText); return; */
var lskey=nvarxml.getElementsByTagName("key");
for(i==0;i<lskey.length;i++){ idrif=lskey[i].attributes[0].value+""; if(idrif==val){ trovato=1; ind=i; break; } }
if(trovato==0){str="* ATTENZIONE * il codice di riferimento inserito non e' stato trovato tra le ordinazioni del settore merceologico <b>"+setmerc+"</b>."; mostraer(str); var audio=new Audio("actung.wav").play(); return;} else{wsactung.innerHTML=""; }
attribkey=nvarxml.getElementsByTagName(reg)[0].attributes.getNamedItem("attribkey").value; attribkeyar=attribkey.split(";");
var str="<mark>Risultato delle <b>ordinazioni</b> del settore merceologico: <b>"+setmerc+"</b></mark> &#160;&#160; <span class='az1'  onclick='vedinewfin(3)'>visualizza a tutta pagine e stampa</span><br/><table style='border: 2px "+wscolor0+" solid'  onclick='wsfmostrakeytab(\""+val+"\","+i+","+i+",\""+setmerc+"\")'>";
str=str+"<tr><th colspan="+(attribkeyar.length-1)+">Ordinazione n."+(ind+1)+"</th></tr><tr>"; /*
for(m=1;m<attribkeyar.length;m++){str=str+"<th>"+attribkeyar[m]+"</th>"; } str=str+"</tr><tr onclick='wsfmostrakeytab(\""+val+"\","+i+","+i+",\""+setmerc+"\")'>"; 
var lsattribkey=lskey[ind].attributes;
for(m=1;m<attribkeyar.length-1;m++){str=str+"<td>"+lsattribkey.getNamedItem(attribkeyar[m]).value+"</td>"; } 
var lstot=lsattribkey[2].value+":"+lsattribkey[3].value+":"+lsattribkey[4].value+":"+lsattribkey[0].value; 
str=str+"<td>"+lsattribkey.getNamedItem(attribkeyar[m]).value+"<input type='text' name='lstot_' value='"+lstot+"' style='display:none' /></td></tr>"; 
str=str+"</td></tr></table>"; */
/*str=str+"</tr><tr onclick='wsfmostrakeytab(\""+val+"\","+i+","+i+",\""+setmerc+"\")'>"; */
var lsattribkey=lskey[ind].attributes;
for(m=1;m<attribkeyar.length;m++){ str=str+"<tr><th>"+attribkeyar[m]+"</th><td>"+lsattribkey.getNamedItem(attribkeyar[m]).value+"</td></tr>"; } 
/*var lstot=lsattribkey[2].value+":"+lsattribkey[3].value+":"+lsattribkey[4].value+":"+lsattribkey[0].value; 
str=str+"<td>"+lsattribkey.getNamedItem(attribkeyar[m]).value+"<input type='text' name='lstot_' value='"+lstot+"' style='display:none' /></td></tr>"; */
str=str+"</table>";
document.getElementById("modextern4").innerHTML=str;
}
function wsfleggiordinazioni(reg,setmerc,val){percorso=percorso+"wsfleggiordinazioni; ";  /*alert("wsleggiordinazioni\n"+reg+"\n"+val); */
var i=0,elmodver=new Array(),j=0,k=0,m=0,n=0,attribacq="",attribkey="",str="<mark>Risultato delle <b>ordinazioni</b> del settore merceologico: <b>"+setmerc+"</b> richieste</mark> &#160;&#160; <span class='az1'  onclick='vedinewfin(3)'>visualizza a tutta pagine e stampa</span><table style='border: 2px "+wscolor0+" solid'>";
attribacq=nvarxml.getElementsByTagName(reg)[0].attributes.getNamedItem("attribacq").value; attribacqar=attribacq.split(";");
/*for(j=1;j<attribacqar.length;j++){alert(attribacqar[j]); } */
attribkey=nvarxml.getElementsByTagName(reg)[0].attributes.getNamedItem("attribkey").value; attribkeyar=attribkey.split(";");
azlistkeyrif= nvarxml.getElementsByTagName("keyrif");
if(val!="tutti"){/*elmodver=val.split("_"); */
for(i=0;i<azlistkeyrif.length;i++){ var lsattribacq=azlistkeyrif[i].attributes;/**/ var acq=azlistkeyrif[i].attributes[0].value;
/*if(i==val)*/ if(acq==val){ 
str=str+"<tr><th>dati acquirente:</th><td>";
/*for(j=1;j<5;j++){*/ str=str+"<mark>"+attribacqar[1]+"</mark>=<b>"+lsattribacq.getNamedItem(attribacqar[1]).value+"</b> "; /*}*/
str=str+"</td></tr><tr><th>dati acquisti:</th><td>";
for(j=2;j<attribacqar.length;j++){str=str+"<mark>"+attribacqar[j]+"</mark>=<b>"+lsattribacq.getNamedItem(attribacqar[j]).value+"</b> "; } azlistkey=azlistkeyrif[i].getElementsByTagName("key"); break;}} str=str+"</td></tr></table>"; 
str=str+"<table style='border: 2px "+wscolor0+" solid'>"; 
for(k=0;k<azlistkey.length;k++){str=str+"<tr><th colspan="+(attribkeyar.length-1)+">Ordinazione n."+(k+1)+"</th></tr><tr>";
for(m=1;m<attribkeyar.length;m++){str=str+"<th>"+attribkeyar[m]+"</th>"; } str=str+"</tr><tr onclick='wsfmostrakeytab(\""+val+"\","+k+","+i+",\""+setmerc+"\")'>"; 
var lsattribkey=azlistkey[k].attributes;
for(m=1;m<attribkeyar.length-1;m++){str=str+"<td>"+lsattribkey.getNamedItem(attribkeyar[m]).value+"</td>"; } 
var lstot=lsattribkey[2].value+":"+lsattribkey[3].value+":"+lsattribkey[4].value+":"+lsattribkey[0].value; 
str=str+"<td>"+lsattribkey.getNamedItem(attribkeyar[m]).value+"<input type='text' name='lstot_' value='"+lstot+"' style='display:none' /></td></tr>"; 
}str=str+"</td></tr></table>"; }
if(val=="tutti"){str="<mark>Risultato delle <b>ordinazioni</b> del settore merceologico: <b>"+setmerc+"</b> richieste</mark> &#160;&#160; <span class='az1'  onclick='vedinewfin(3)'>visualizza a tutta pagine e stampa</span><table style='border: 2px "+wscolor0+" solid'>";
for(i=0;i<azlistkeyrif.length;i++){str=str+"<table style='border: 2px "+wscolor0+" solid'>"; 
var lsattribacq=azlistkeyrif[i].attributes;
str=str+"<tr><th colspan=2><span class='az1'> Acquirente n."+(i+1)+" </span></th></tr><tr><th>dati acquirente:</th><td>";
for(j=1;j<5;j++){str=str+"<mark>"+attribacqar[j]+"</mark>=<b>"+lsattribacq.getNamedItem(attribacqar[j]).value+"</b> "; }
str=str+"</td></tr><tr><th>dati acquisti:</th><td>";
for(j=5;j<attribacqar.length;j++){str=str+"<mark>"+attribacqar[j]+"</mark>=<b>"+lsattribacq.getNamedItem(attribacqar[j]).value+"</b> "; } azlistkey=azlistkeyrif[i].getElementsByTagName("key");  str=str+"</td></tr></table>"; 
str=str+"<table style='border: 2px "+wscolor0+" solid'>"; 
for(k=0;k<azlistkey.length;k++){str=str+"<tr><th colspan="+(attribkeyar.length-1)+">Ordinazione n."+(k+1)+"</th></tr><tr>";
for(m=1;m<attribkeyar.length;m++){str=str+"<th>"+attribkeyar[m]+"</th>"; } str=str+"</tr><tr onclick='wsfmostrakeytab(\""+val+"\","+k+","+i+",\""+setmerc+"\")'>"; 
var lsattribkey=azlistkey[k].attributes;
for(m=1;m<attribkeyar.length-1;m++){str=str+"<td>"+lsattribkey.getNamedItem(attribkeyar[m]).value+"</td>"; } 
var lstot=lsattribkey[2].value+":"+lsattribkey[3].value+":"+lsattribkey[4].value+":"+lsattribkey[0].value; 
str=str+"<td>"+lsattribkey.getNamedItem(attribkeyar[m]).value+"<input type='text' name='lstot_"+i+"' value='"+lstot+"' style='display:none' /></td></tr>"; 
}str=str+"</td></tr></table>"; }}
document.getElementById("modextern4").innerHTML=str;
}
function wsfmostrakeytab(val,numk,numi,setmerc){percorso=percorso+"wsfmostrakeytab; ";  var i=0,num_=0,str="",infoar=new Array(),lsar0="",lsar1="",lsar2="";
var areamerc="", categoria="", tipologia="",indar=0,indcat=0,indrif=0,valar="",valcat="",valrif="",elem="",mod="",ver="";
for(i=0;i<val.length;i++){if(val.charAt(i)=="_"){num_++; } }
if(val!="tutti" && num_!=6){var lstot=document.getElementsByName("lstot_")[numk].value; }
if(val=="tutti"){var lstot=document.getElementsByName("lstot_"+numi)[numk].value;}
if(num_==6){var lstot=document.getElementsByName("lstot_")[0].value+"/"+val; }
/*alert("azmostrakeytab\n"+val+"\n"+numk+"\n"+numi+"\n"+setmerc+"\n"+lstot); alert(wsxmlreq.responseText);*/ 
var p1=lstot.lastIndexOf(":"); var riford=lstot.slice(p1+1);
var str0="<center><span class='az1'  onclick='vedinewfin(1)'>visualizza a tutta pagine e stampa</span></center>";
str="<table><tr><th colspan=8><mark>Ordinazione "+riford+" per il settore merceologico <b>"+setmerc+"</b></mark></th></tr><tr><th>quantita'</th><th>elemento</th><th>modello</th><th>versione</th><th>area</th><th>categoria</th><th>tipologia</th><th>costo</th></tr>";
var lskeyarea=nvarxml.getElementsByTagName("keyarea"); 
infoar=lstot.split(":");
lsar0=infoar[0];lsar1=infoar[1];lsar2=infoar[2]; /*alert(lsar0+"\n"+lsar1+"\n"+lsar2);*/ 
var mercear0=lsar0.split(";"); var qtaar=lsar1.split(";"); var costiar=lsar2.split(";");
for(i=1;i<mercear0.length;i++){/*alert(mercear0[i]);*/  var idmercear=mercear0[i].split("/"); var coordar=idmercear[0].split("|"); 
indar=coordar[0]; indcat=coordar[1]; indrif=coordar[2]; var coordprodar=idmercear[1].split("|");
elem=coordprodar[0]; mod=coordprodar[1]; ver=coordprodar[2];
/*alert("--\n"+indar+"\n"+indcat+"\n"+indrif); alert("--\n"+elem+"\n"+mod+"\n"+ver); */
var areamer=lskeyarea[indar].attributes[0].value; 
var lskeycat=lskeyarea[indar].getElementsByTagName("keycat");
var categ=lskeycat[indcat].attributes[0].value;
var lskeyrif=lskeycat[indcat].getElementsByTagName("keyrif");
var rif=lskeyrif[indrif].attributes[0].value;
/*alert("--\n"+areamer+"\n"+categ+"\n"+rif); */
str=str+"<tr><td>"+qtaar[i]+"</td> <td>"+elem+"</td><td>"+mod+"</td><td>"+ver+"</td><td>"+areamer+"</td><td>"+categ+"</td><td>"+rif+"</td><td>"+costiar[i]+"</td></tr>";
}str=str+"</table><div id='stmp' style='display:none'></div>"; 
var ctlgimg=document.getElementById("ctlgimg"); ctlgimg.style.display="block"; ctlgimg.innerHTML=str0+str+"<center><button onclick='document.getElementById(&#39;ctlgimg&#39;).innerHTML=&#39;&#39;; document.getElementById(&#39;ctlgimg&#39;).style.display=&#39;none&#39;' > [ X ] </button></center>"; ctlgimg.style.zIndex=100;
document.getElementById("stmp").innerHTML=str;
}

x13();
function x13(){percorso=percorso+"x13; "; 
newscript = document.createElement("script");
newscript.src=fdscaricati2[3];  
newscript.type="text/javascript";
document.body.insertBefore(newscript, null);  /**/
}