//  *****************************************************************************
//  * applicazione web : BUSSOLA
//  *           modulo :    
//  *        nome file : CREA_FOOTER.JS
//  * contenuto:
//  * elementi software per la predisposizione della pagina dei link di utilità 
//  * 
//  * data ultimo aggiornamento: 09/10/2006 17.05
//  *****************************************************************************
//
//
  var myfootConfig = new Array();   // array ottenuto splittando l'array footConfig 
  var UsefulLinks = new Array();    // array dei link di utilità presenti nel footer
  var mystaffConfig = new Array();  // array ottenuto splittando l'array staffConfig 
  var proConfig_lan = new Array();  // array dei nomi dei Progetti nella lingua corrente
//
// per costruire il path corretto della Mappa Sito di riflesso alle scelte di personalizzazione effettuate
// 
//  var mapPsl =14;  //posizione separatore map_title bilingue
  var map_title = "Mappa del sito&Site Map";
//
//
//                             ::::::::::::::::::::::::
// 
// costruttore dell'oggetto UsefulLink (= Link di Utilità)
//
 function UsefulLink(sig,des,linkutass,target)
 {

  this.sig = sig;                    // sigla identificativa
  this.des = des;                    // etichetta associata bilingue
  this.linkutass = linkutass;        // Url associato alla voce del link utile
  this.target = target;              // target dell'url associato
  this.show =UsefulLink_show;        // metodo per il disegno dell'oggetto 

//alert("sono nella function UsefulLink");  

 }
//                             ::::::::::::::::::::::::::
//
// metodo dell'oggetto UsefulLink
// disegna la cella della tabella del footer contenente il link di utilità 
//  
 function UsefulLink_show (mydocument)
 {
  with(mydocument)
  {
	   writeln('<td nowrap >');
	   
// uso la pickLan per sistemare this.des nella lingua corretta
  	 
	   this.des = pickLan(this.des,parent.p_lan); // Voce del footer già nella lingua corretta
/*
alert(this.linkutass);    
alert(strReplace(this.linkutass,"$DESLINK",this.des));
*/	       	
           writeln('<A HREF="'+strReplace(this.linkutass,"$DESLINK",this.des)+'" TARGET="'+this.target+'" onclick="window.status=\''+this.des+'\';return true" onMouseOver="window.status=\''+this.des+'\';return true"  onMouseOut="window.status=\' \';return true" >');
           writeln(''+ this.des +'');                      
           writeln('</A>');
	   writeln('</td>'); 	           
	   writeln('<td class="stysep"> &nbsp;|&nbsp;</td>');   	
   
  }
 }
//                             :::::::::::::::::::::::::
//
// la creazione delle istanze dell'oggetto UsefulLink è subordinata ad un test che verifica la lingua corrente
// le istanze dell'oggetto UsefulLink vengono registrate nell'array UsefulLinks 
//
 function load_footer()
 {  
//alert("sono nella load_footer ");
  var j=0;	                           
  var i = 0;    
  var i1 = 0;   
   
//alert("footConfig.length="+footConfig.length); // OK: footConfig.length=5
   
  for(i=0; i< footConfig.length; i++)
  {
   myfootConfig[j] = footConfig[i].split("#"); 
     	
// è necessario eseguire il test sulla lingua corrente 
// per restituire la Home nella lingua opportuna al click sulla voce "Home BUSSOLA" 
           
           if (p_lan=='EN' && myfootConfig[j][0] =='HOM')
	   {		      
	    UsefulLinks[i1] = new UsefulLink(myfootConfig[j][0],myfootConfig[j][1],''+ strReplace(myfootConfig[j][2],"$LAN",p_lan)+'',myfootConfig[j][3]);        	
	   }
           else
           {	   
	    UsefulLinks[i1] = new UsefulLink(myfootConfig[j][0],myfootConfig[j][1],''+ strReplace(myfootConfig[j][2],"$LAN",p_lan)+'',myfootConfig[j][3]);
	   }
	   i1++;
	   j++;   
  }   
 }
//                             ::::::::::::::::::::::::: 
//
// genera la pagina HTML associata al Link di Utilità "Staff Tecnico"
// nella versione della lingua corrente
// Parametri :
// p_link = descrizione del Link di utilità già nella lingua appropriata
// p_pro  = sigla del progetto
// p_lan  = sigla della lingua
//
 function crea_footStaff(p_link,p_pro,p_lan)
 {
   j=0;
   mystaffConfig.length=0;
   z = staffConfig[0].lastIndexOf("#")+1;  // individua la posizione d'inizio stringa progetti
   for(i=0; i< staffConfig.length; i++)
     {	whichPro = staffConfig[i].substr(z);  //si isola la porzione di stringa dei progetti
        if ( whichPro.lastIndexOf(p_pro) != -1 ) 
     	   { mystaffConfig[j] = staffConfig[i].split("#"); //j è indice di riga di mystaffConfig
             mystaffConfig[j][2] = pickLan(mystaffConfig[j][2],p_lan); 
             j++;
           }  
     }
      
   with(parent.frm_cen.document)
   {
     open(); 
//     alert ("p_link="+p_link);
     writeln('<HTML>'); 	 
     writeln('<HEAD>');
     writeln('<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">');
     writeln('<link rel="stylesheet" href="'+$CSSDIR+'stylinkut.css" type="text/css">');
     writeln('</HEAD>');
	 
     writeln('<BODY background="'+$IMGDIR+'bg_buss.jpg">');
     
     writeln(prepPath(myfootConfig[0][1]));     
     writeln(visTit(pickLan(myfootConfig[0][1],parent.p_lan)));       
     writeln('<BR><br><br>');
//         
// ciclo sull'Array myStaffConfig per popolare la pagina relativa allo Staff Tecnico
//  
     writeln("<!-- tabella staff tecnico -->");	        
     writeln('<CENTER>');
     writeln('<TABLE cellSpacing=0 cellPadding=4 width="90%" border=2 bordercolor="#006699">');
/*     writeln('<TR><TH>'+pickLan('Nome&Name',parent.p_lan)+'</TH><TH>'+pickLan('Ruolo&Role',parent.p_lan)+'</TH><TD align="center"><b>'+pickLan('Indirizzo e-mail&E-mail address',parent.p_lan)+'</TH><TH>'+pickLan('Telefono&Phone Number',parent.p_lan)+'</TH></TR>');*/
     writeln(' <TR><TH>'+pickLan('Nome&Name',parent.p_lan)+'</TH><TH>'+pickLan('Indirizzo e-mail&E-mail address',parent.p_lan)+'</TH><TH>'+pickLan('Telefono&Phone Number',parent.p_lan)+'</TH></TR>');	    
     var j = 0;	                           
     var i = 0;    
     var j1 = 0;   
	  
     for(j=0; j< mystaffConfig.length; j++)
     {	  	
      writeln(' <TR>');      
      for(j1=1; j1<=4; j1++) //j1 è l'indice delle colonne dell'Array mystaffConfig (j è l'indice di riga) 
      {
// test sugli elementi di mystaffConfig: solo se si incontra l'inidirzzo e-mail occorre impostare il link
/*       if (mystaffConfig[j][j1]!= mystaffConfig[j][3])// se non incontro un indirizzo e-mail*/
       if (mystaffConfig[j][j1]!= mystaffConfig[j][3] && j1!=2)
       { 	 				   		
	writeln('  <TD class="pg_LinkUtil" nowrap valign="middle" align="center">'+mystaffConfig[j][j1]+'</TD>');
       }
       else if (mystaffConfig[j][j1]== mystaffConfig[j][3])// se incontro un indirizzo e-mail		   
       {			
        writeln('  <TD nowrap valign="middle" align="center" ><a href="mailto:'+mystaffConfig[j][3]+'" class="pg_LinkUtil">'+mystaffConfig[j][3]+'</a></TD>');	 	
       } 	   	
      }// chiusura del ciclo for sulle colonne di mystaffConfig (j1)       
      writeln('</TR>');	 

     } // chiusura del for più esterno che cicla su mystaffConfig	
         
         writeln('</TABLE>')
         writeln('</CENTER>');
         writeln('</BODY></HTML>');      	  
         close();
   }// chisura del width	
 }// chiusura della function
// 
//                             ::::::::::::::::::::::::: 
//
// genera la pagina HTML associata al Link di Utilità "Note"
//
 function crea_footNote(p_link,p_lan)
 {
   with(parent.frm_cen.document)
   {
    open();
//  alert ("p_link="+p_link);
    writeln('<HTML>'); 	 
    writeln('<HEAD>');
    writeln('<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">');
    writeln('<link rel="stylesheet" href="'+$CSSDIR+'stylinkut.css" type="text/css">');
// la function displayBrowserInfo()fornisce differenti informazioni riguardanti il Browser utilizzato dall'utente
    writeln('<SCRIPT language="Javascript">');
    writeln('<!--');
    writeln('//');    
    writeln('function displayBrowserInfo()');
    writeln(' {' );	   
    writeln('var browserStr = "" ');
    writeln('browserStr += "Browser          : "+ navigator.appName');
    writeln('browserStr += "\\n'+ pickLan('Versione         &Version          ',parent.p_lan)+': "+ navigator.appVersion');
    writeln('browserStr += "\\n'+ pickLan('Nome in codice   &Crypted name     ',parent.p_lan)+': "+ navigator.appCodeName ');
    writeln('browserStr += "\\n'+ pickLan('Agente di utente &User Agent       ',parent.p_lan)+': "+ navigator.userAgent');
    writeln('browserStr += "\\n'+ pickLan('Piattaforma      &Platform         ',parent.p_lan)+': "+ navigator.platform');
    writeln('browserStr += "\\n'+ pickLan('Risoluzione video&Screen Resolution',parent.p_lan)+': "+ screen.width+" x "+screen.height');    
    writeln('alert(browserStr);');
    writeln('}' );
    writeln('//                             ::::::::::::::::::::::::: ');
    writeln('//-->');
    writeln('</SCRIPT>');  
    writeln('</HEAD>');
	 
    writeln('<BODY LINK="#778899" TEXT="#000000" class="link_indexinfo">'); 
    writeln('<FORM>'); 
    writeln(prepPath(myfootConfig[2][1]));    
    writeln(visTit(pickLan(myfootConfig[2][1],parent.p_lan)));     
    writeln('<BR><BR>'); 
    
// scrivo staticamente il testo relativo alle versioni di browser supportate ecc.: le Note         
    writeln('<CENTER>');
    writeln('<p class="pg_LinkUtil">');
    if (parent.p_lan == 'IT')
    {	  	 
      writeln('Per la visione di questo sito, si consiglia una risoluzione video ad almeno 800x600 pixels.\n');
      writeln('<BR><br><br>'); 
      writeln('Internet Browser consigliato:');
      writeln('<BR><br>'); 
      writeln('<LI TYPE="square" class="pg_LinkUtil">');
      writeln('NETSCAPE 4.0 o superiori');
      writeln('</LI>');
      writeln('<LI TYPE="square" class="pg_LinkUtil">'); 
      writeln('EXPLORER 5.0 o superiori'); 
      writeln('</LI>');	  
      writeln('</p>');
      writeln('<BR>'); 
      writeln('<b>Desideri informazioni sul tuo Internet Browser?</b>');
      writeln('<BR><BR>');   
 
      writeln('<input class="btn1" type="button" value="MOSTRA INFORMAZIONI SUL BROWSER" OnClick="displayBrowserInfo()"></input>');
	  	  
      writeln('</a>');
      writeln('</CENTER>');
      writeln('</FORM>');
      writeln('</BODY></HTML>');      	  
      close();
     }
     else
     {	
      writeln('For the best use of this site, a screen resolution of at least 800x600 pixels is advisable.\n');
      writeln('<BR><br><br>'); 
      writeln('Internet Browser advised:');
      writeln('<BR><br><br>'); 
      writeln('<LI TYPE="square" class="pg_LinkUtil">');
      writeln('NETSCAPE 3.0 or superior');
      writeln('</LI>');
      writeln('<LI TYPE="square" class="pg_LinkUtil">'); 
      writeln('EXPLORER 4.0 or superior'); 
      writeln('</LI>');	  
      writeln('</p>');	  
      writeln('<BR><br><br>');           	  
      writeln('<b>More information about your Internet Browser?</b>');
      writeln('<BR><br><br>');   	  
      writeln('<input class="btn1" type="button" value="SHOW INFORMATION ABOUT THE BROWSER" OnClick="displayBrowserInfo()"></input>');
      writeln('</a>');	           
      writeln('</CENTER>');
      writeln('</BODY></HTML>');      	  
      close();
     }
   }    
 }
//                             :::::::::::::::::::::::::
//
// nella mappa del sito,
// al termine di ciascuna sezione ("Area di utenza","Progetto","Ateneo"),
// la function presenta le voci dei link di utilità che popolano il footer
//
 function visLnkutil_map()  
 {
  var apg = '';  
   apg = '  <table width="100%" BORDER="0" >'; 
  for (var h=0; h<UsefulLinks.length; h++) 
  { 
   apg += '  <tr>\n';
   apg += '   <td valign="middle">&nbsp;&nbsp;\n';		 
   apg += '   <img src="'+$IMGDIR+'mp_paper.jpg" border="0" align="absbottom">\n';
   apg += '    <a href="'+strReplace(UsefulLinks[h].linkutass,"$DESLINK",UsefulLinks[h].des)+'" target="'+UsefulLinks[h].target+'">&nbsp;'+UsefulLinks[h].des+'</a></td>\n'; 
   apg += '  </tr>\n';
  } 
  apg += '  </table>';   
  return apg;
 }
//
//                             :::::::::::::::::::::::::
//
//
  function visTitSez(p_id,p_des) 
 {
  var apg = '';   
    apg  = '   <TR>\n'; 
    apg += '    <TD class="stytit2" nowrap>';
    apg += '    <a href="#topPag" title="'+pickLan('Torna a inizio pagina&Return to top',parent.p_lan)+'" > \n';
    apg += '     <img src="'+$IMGDIR+'arrUp.jpg" width="17" height="15" border="0" alt="'+pickLan('Torna a inizio pagina&Return to top',parent.p_lan)+'"></a>';
    apg += '&nbsp;&nbsp;<a name="'+p_id+'"></a>'+pickLan(p_des,p_lan)+'\n';
    apg += '    </TD>\n';
    apg += '   </TR>\n';
  return apg;
 }
//
//                             :::::::::::::::::::::::::    
// 
// disegna le sezioni ATENEO e PROGETTO della Mappa del Sito
//
 function map_AreaUte()
 {
  var apg = '';	
   for(var r=0; r<AreeUte.length; r++) 
   {  // apertura primo for
      apg +=' <tr>\n';
      apg +='  <td class="styitem1">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_first.gif"  border="0" align="absbottom">'; 	 	   	
      apg +='&nbsp;'+ AreeUte[r].des + '</td>\n';
      apg +=' </tr>\n';

     for(var s=0; s < AreeUte[r].TipiSer.length; s++) 
      { // apertura secondo for

      apg +=' <tr>\n';
      apg +='  <td class="styitem2">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_vert.gif"  border="0" align="absbottom">';      	
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_mid.gif" border="0" align="absbottom">';	
      apg +='&nbsp;'+AreeUte[r].TipiSer[s].des+'</td>\n';	
      apg +=' </tr>\n'; 

      for (var t=0; t < AreeUte[r].TipiSer[s].Servizi.length; t++) 
       { // apertura terzo for
      apg +=' <tr>\n';
      apg +='  <td class="styitem2">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_vert.gif"  border="0" align="absbottom">';      	
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_vert.gif" border="0" align="absbottom">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_mid.gif" border="0" align="absbottom">';      	

// nel caso dei Servizi, la scrittura della singola voce è subordinata ad un test
// che verifica se il Servizio specifico prevede l'apertura o meno di un sottomenu a tendina	         
//
       if (AreeUte[r].TipiSer[s].Servizi[t].indgest != 'S')
          {
      apg += '<a href="'+AreeUte[r].TipiSer[s].Servizi[t].linkass+'" target="'+AreeUte[r].TipiSer[s].Servizi[t].target+'">&nbsp;'+AreeUte[r].TipiSer[s].Servizi[t].des+'</a></td>\n';  	
          }
       else {
      apg += '&nbsp;'+AreeUte[r].TipiSer[s].Servizi[t].des+'</a></td>\n'; 
            }
      apg +=' </tr>\n'; 

       for (var u=0; u< AreeUte[r].TipiSer[s].Servizi[t].SubServizi.length-1; u++) 
        { // apertura quarto for
      apg +=' <tr>\n';
      apg +='  <td class="styitem2">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_vert.gif"  border="0" align="absbottom">';      
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_vert.gif"  border="0" align="absbottom">';      	
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_vert.gif" border="0" align="absbottom">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_mid.gif" border="0" align="absbottom">';          	
      apg += '<a href="'+AreeUte[r].TipiSer[s].Servizi[t].SubServizi[u].linkass+'" target="_new">&nbsp;'+ pickLan(''+AreeUte[r].TipiSer[s].Servizi[t].SubServizi[u].des+'',p_lan)+'</a></td>\n'; 
      apg +=' </tr>\n';
	            } //chiusura quarto ciclo for
	        } //chiusura terzo ciclo for 
            } //chiusura secondo ciclo for 
   } //chiusura primo ciclo for 
  return apg; 
 } // chiusura function     
//                             :::::::::::::::::::::::::
//
// genera la Mappa del Sito, associata al Link di Utilità "Mappa del sito"
//
 function crea_footMappa(p_link,p_lan)
 { 	
   with(parent.frm_cen.document)
   {
     open();
     var apg = ''; 
     writeln('<HTML>'); 	 
     writeln('<HEAD>');
     writeln('<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=iso-8859-1">');
     writeln('<link rel="stylesheet" href="'+$CSSDIR+'stylinkut.css" type="text/css">');
     writeln('</HEAD>');   
       
     writeln('<BODY>');   
     writeln(prepPath(map_title));
     writeln( visTit(pickLan(myfootConfig[3][1],parent.p_lan)));	 

     writeln('<A name="topPag"></A>');
     writeln('<!-- INIZIO tab. grande esternissima -->');
     writeln('<TABLE width="100%" BORDER="0" >');// ***inizio tab. grande esternissima contenente tutte le altre
     
     writeln(' <TR>'); 
     writeln('  <TD>'); 
     writeln('<!-- INIZIO TABELLA TITOLI DELLE 3 SEZIONI DELLA MAPPA-->');
     writeln('  <Table width="100%"  border=0>');
     writeln('   <Tr>');
     writeln('    <Td class="stytit1" nowrap >');
     writeln('     <a href="#AreaUte"><img src="'+$IMGDIR+'arrRight.jpg" width="23" height="17" border="0" alt="'+pickLan('Vai alla sezione Area di utenza&Go to User Area section',parent.p_lan)+'"></a>');
     writeln('     &nbsp;&nbsp;'+ pickLan('AREA DI UTENZA&USER AREA',parent.p_lan) + '</Td>');
     writeln('    <Td class="stytit1" nowrap >');
     writeln('     <a href="#Ate"><img src="'+$IMGDIR+'arrRight.jpg" width="23" height="17" border="0" alt="'+pickLan('Vai alla sezione Ateneo&Go to University section',parent.p_lan)+'"></a>');
     writeln('&nbsp;&nbsp;'+ pickLan('ATENEO&UNIVERSITY',parent.p_lan)+ '</Td>');
     writeln('    <Td class="stytit1" nowrap >');
     writeln('     <a href="#Pro"><img src="'+$IMGDIR+'arrRight.jpg" width="23" height="17" border="0" alt="'+pickLan('Vai alla sezione Progetto&Go to Project section',parent.p_lan)+'"></a>');
     writeln('&nbsp;&nbsp;'+ pickLan('PROGETTO&PROJECT',parent.p_lan)+ '</Td>');
     writeln('   </Tr>');	 
     writeln('  </Table>');
     writeln('<!-- FINE TABELLA TITOLI DELLE 3 SEZIONI DELLA MAPPA-->');
     writeln('  </TD>');          
     writeln(' </TR>');  

     write ( visTitSez('AreaUte','AREA DI UTENZA&USER AREA') );
     
     writeln(' <TR>');
     writeln('  <TD>');  
     writeln('<!-- INIZIO TABELLA CON LE VOCI DELLA SEZIONE MAPPA: "AREA DI UTENZA"-->');
     writeln('   <TABLE width="100%" border="0">');
	    
// è necessario ricostruire il myconfig (e quindi non ottimizzare!) PER EVITARE che, in caso di click sulla voce Mappa Sito,
// una volta che essa è già visualizzata, venga tenuto in memoria e mostrato l'ultimo myconfig, ossia quello relativo al Prog. STAGES
	    sel_obj(p_ute,p_uni,p_pro,p_lan);
            load_obj(p_uni);   
	    
     writeln( map_AreaUte());
     writeln('  </TABLE>');
     writeln('<!-- FINE TABELLA CON LE VOCI DELLA SEZIONE MAPPA: "AREA DI UTENZA"-->');
     writeln('  </TD>');      
     writeln(' </TR>');  
           
     writeln(' <TR>'); 
     writeln('  <TD>'); 
     writeln( visLnkutil_map());
     writeln('  </TD>');
     writeln(' </TR>');           

     write ( visTitSez('Ate','ATENEO&UNIVERSITY') ); 

     writeln(' <tr><td>&nbsp;</td></tr>\n');  
     writeln(' </TR>');  
     
     writeln(' <TR>');   
     writeln('  <!-- INIZIO TABELLA CON LE VOCI DELLA SECONDA SEZIONE MAPPA: "ATENEO" -->');
     
     writeln('<!-- *************************************************** -->');
      
     writeln('<table width="100%" border="0">');   
     var j;
     j=0;
//
// sig_uni è la proprietà dell'Array associativo unieConfig
// il valore di sig_uni è la sigla dell'Ateneo corrente
//    
   for ( var sig_uni in unieConfig ) //        
    { // inizio loop sugli elementi dell'Array associativo unieConfig
//
// utilizzo il seguente "continue Statement" 
// per evitare la prima voce ('all') dell'Array associativo unieConfig
//    
      if (sig_uni == 'all')
      continue	
//    alert ('sig_uni='+sig_uni); // p_uni è la sigla identificativa dell'Ateneo    	   
   
      if (parent.p_uni == sig_uni || parent.p_uni == 'all' ) 
      { //inizio if      
       sel_obj(p_ute,sig_uni,p_pro,p_lan);
       load_obj(sig_uni); 
//      
// Nella sez. della Mappa "ATENEO", è il nome dell'Ateneo per esteso ad essere posto in "bold"
//    
      apg  =' <tr>\n';
      apg +='  <td class="styitem1">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_first.gif"  border="0" align="absbottom">'; 	 	   	
      apg +='&nbsp;'+ pickLan(unieConfig[sig_uni],p_lan) + '</td>\n';
      apg +=' </tr>\n';
      write(apg);     
      
    for(var r=0; r<AreeUte.length; r++) 
    { // inizio primo ciclo for
      apg  =' <tr>\n';
      apg +='  <td class="styitem2">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_first.gif"  border="0" align="absbottom">'; 	 	   	
      apg +='&nbsp;'+ AreeUte[r].des + '</td>\n';
      apg +=' </tr>\n';
      write(apg); 
      
     for(var s=0; s < AreeUte[r].TipiSer.length; s++) 
     { // inizio secondo ciclo for
     	
      apg  =' <tr>\n';
      apg +='  <td class="styitem2">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_vert.gif"  border="0" align="absbottom">';      	
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_mid.gif" border="0" align="absbottom">';	
      apg +='&nbsp;'+AreeUte[r].TipiSer[s].des+'</td>\n';	
      apg +=' </tr>\n'; 
      write(apg);     	
                
      for (var t=0; t < AreeUte[r].TipiSer[s].Servizi.length; t++) 
      { // inizio terzo ciclo for

      apg  =' <tr>\n';
      apg +='  <td class="styitem2">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_vert.gif"  border="0" align="absbottom">';      	
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_vert.gif" border="0" align="absbottom">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_mid.gif" border="0" align="absbottom">';      	
      apg +='<a href="'+AreeUte[r].TipiSer[s].Servizi[t].linkass+'" target="'+AreeUte[r].TipiSer[s].Servizi[t].target+'">&nbsp;'+AreeUte[r].TipiSer[s].Servizi[t].des+'</a></td>\n';	
      apg +=' </tr>\n'; 
      write(apg); 
          				
      }// fine terzo ciclo for                
     }// fine secondo ciclo for                
    }// fine primo ciclo for   
   } // fine if      
      j++; 
    } // fine loop sugli elementi dell'Array associativo unieConfig  
  
     writeln('</table>');  
     writeln('<!-- FINE TABELLA CON LE VOCI DELLA SEZIONE MAPPA: "ATENEO" -->');       
     writeln( visLnkutil_map());   
     writeln('<br><br>');
     writeln('<tr><td></td></tr><tr><td>&nbsp;</td></tr>');
     
     write ( visTitSez('Pro','PROGETTO&PROJECT') );         
 
     writeln('<tr><td>&nbsp;</td></tr>');      
     writeln('</TR>'); //***fine QUINTA riga tab. grande esternissima 
          
     writeln('<TR>'); //***inizio SESTA riga tab. grande esternissima 
     writeln('<!-- INIZIO TABELLA CON LE VOCI DELLA SEZIONE MAPPA: "PROGETTO" -->');      
     writeln('<TABLE width="100%" bordercolor="BROWN" border="0">');   
     var k;
     k=0;
//
// sig_pro è la proprietà dell'Array associativo proConfig
// il valore di sig_pro è la sigla del progetto corrente
//    
   for ( var sig_pro in proConfig ) // ciclo for che legge l'elemento iesimo di un Array associativo           
   { // inizio loop sugli elementi dell'Array associativo proConfig
//
// utilizzo il seguente "continue Statement" 
// per evitare la prima voce ('all') dell'Array associativo proConfig
//    
     if (sig_pro == 'all')
     continue	
//   alert ('sig_pro='+sig_pro); // sig_pro è la sigla identificativa del progetto
     
     if (parent.p_pro == 'all') 
     {     
      sel_obj(p_ute,p_uni,sig_pro,p_lan); //costruisco il myConfig appropriato passando il progetto corrente sig_pro                                               
      load_obj(p_uni);          	
     }
    
     if (parent.p_pro == sig_pro || parent.p_pro == 'all' ) //l'accorpamento delle 2 cond. separate dall'or è dovuto a una ottimizzazione 
     {     	
      sel_obj(p_ute,p_uni,sig_pro,p_lan); //costruisco il myConfig appropriato in base al progetto corrente                                  
      load_obj(p_uni);   
//      
// Nella sez. della Mappa "PROGETTO", è il nome del PROGETTO ad essere posto in "bold"
//    
      apg  =' <tr>\n';
      apg +='  <td class="styitem1">';
      apg +='&nbsp;&nbsp;&nbsp;&nbsp;<img src="'+$IMGDIR+'mp_first.gif"  border="0" align="absbottom">'; 	 	   	
      apg +='&nbsp;'+ pickLan(proConfig[sig_pro],p_lan) + '</td>\n';
      apg +=' </tr>\n';
      write(apg); 
        
      write( map_AreaUte()); 
        
     }// fine if      
     j++; 
   } // fine loop sugli elementi dell'Array associativo proConfig  
  
     writeln('</TABLE>');  
 
     writeln('<!-- FINE TABELLA CON LE VOCI DELLA SEZIONE MAPPA: "PROGETTO" -->');
     writeln( visLnkutil_map());
     writeln('</TR>'); //***fine SESTA riga tab. grande esternissima 
     writeln('<TR><TD>'); 
     writeln('</TD></TR>');
     writeln('<TR><TD>'); 
     writeln('</TD></TR>');
//
// segue immagine linkabile per tornare al top della mappa del sito
//     
     writeln ('<CENTER>'); 
     writeln ('  <TR>');
     writeln ('   <TD ALIGN="CENTER">');
     writeln ('    <a href="#topPag" title="'+pickLan('Torna  a inizio pagina&Return to top',parent.p_lan)+'" > ');   
     writeln ('    <img src="'+$IMGDIR+'arrUp.jpg" width="17" height="15" border="0" alt="'+pickLan('Torna  a inizio pagina&Return to top',parent.p_lan)+'">');    
     writeln ('    </a>');
     writeln ('   </TD>'); 
     writeln ('  </TR>');
     writeln ('</CENTER>'); 
          
     writeln(' </TR>'); //***fine ultima riga tab grande esternissima 
     writeln('</TABLE>'); // ***fine tab grande esternissima 
     writeln('<!-- FINE tab. grande esternissima -->');
     
//********************************************     
 sel_obj(p_ute,p_uni,p_pro,p_lan);
//******************************************** 
          	   
     writeln('</BODY></HTML>');           	  
     close();
     
  }// chisura del width	
 }// chiusura della function      
//      
//                             ::::::::::::::::::::::::: 
//
// genera la pagina HTML  contenente i link di utilità
// nella versione della lingua corrente
// 
 function crea_footer(p_lan)
 {
  var j;
  var j=0;
  	
  load_footer(); //richiamo della funzione che popola l'Array delle voci dei Link di Utilità
  		
  with (parent.frm_footer.document)
  {
   open();
   apg =  '<HTML>\n';
   apg += '<HEAD>\n';
   apg += $BASESTM+'\n';	 
   apg += '<link rel="stylesheet" href="'+$CSSDIR+'styfooter.css" type="text/css">\n'; 
   apg += '</HEAD>\n';	 
   write (apg); 	 
   
   writeln('<BODY bgcolor="#006699">'); 
   writeln('<TABLE class="TB_mnuFooter" border="0" align="center" cellpadding="0" cellspacing="0" >');  
   writeln(' <TR valign="bottom">');
   
   for (j=0; j<UsefulLinks.length; j++) 
   {  
    UsefulLinks[j].show(parent.frm_footer.document); 
   }            
           
   writeln('  <TD nowrap >');
   writeln('   <A HREF="http://www.cilea.it" TARGET="_new" >&nbsp;&nbsp;');                    
   writeln('' + pickLan('A cura di&Powered by',parent.p_lan)+ '&nbsp;');
   writeln('   <img src="'+$IMGDIR+'logo_cilea.gif" height="13" border="0" ALT="WWW C.I.L.E.A." align="ABSBOTTOM" >'); 
   writeln('   <font family="Courier New" color="#F0FFF0" size="2pt"> cilea</font>');
   writeln('   </A>');   
   writeln('  </TD>');
   
   writeln(' </TR>');  
   writeln('</TABLE>');   
     
   writeln('</BODY>');   
   writeln('</HTML>'); 	  
   close();
  }
 }
//                             ::::::::::::::::::::::::: 

/*
<!-- Begin
if ((navigator.appName == "Microsoft Internet Explorer") && (parseInt(navigator.appVersion) >= 4)) 
{
 var url="http://efesto.cilea.it/bussola/home.htm";
 var title="BUSSOLA";

 document.write('<A HREF="javascript:window.ext');
 document.write('ernal.AddFavorite(url,title);" ');
 document.write('onMouseOver=" window.status=');
 document.write("'Add our site to your favorites!'; return true ");
 document.write('"onMouseOut=" window.status=');
 document.write("' '; return true ");
 document.write('">Add our site to your favorites!</a>');
 }
else {
 var msg = "Don't forget to bookmark us!";
 if(navigator.appName == "Netscape") msg += "  (CTRL-D)";
 document.write(msg);
      }
*/