// Source Code Function getMessage

<script type="text/javascript">
var xmlDoc;
function loadXML()
{
// Generation of the mailbox id.
var nom= "<portal-fmt:user attribute="sn"/>";
var iprenom= "<portal-fmt:user attribute="givenName"/>";
var long = iprenom.length;
var initial = iprenom.substr(-long, 1);
var logmail = initial + nom;

var URL = "http://portal.renovations.com/mail/" + logmail + ".nsf/iNotes/Proxy/?openDocument&Form=s_ReadViewEntries&PresetFields=FolderName;($Inbox)"

// code for IE
  xmlDoc=new ActiveXObject("Microsoft.XMLDOM");
  xmlDoc.async=false;

//Loading of XML File
  xmlDoc.load(URL);
  getmessage();
  
}

function getmessage()
{
var nbmails = 0;
var AllMails = xmlDoc.getElementsByTagName("viewentries");
var EntryMail = AllMails[0].getElementsByTagName("viewentry");
for(var i=0; i<EntryMail.length; i++) 
{
	var value = EntryMail[i].getAttribute("unread")
		if (value != null) 
		{
			nbmails = nbmails+1;
		}
}//fin FOR
document.write(nbmails);
}
</script>


// Function Display


<portal-logic:if loggedIn="yes">
<portal-navigation:urlGeneration contentNode="ibm.portal.Mail">
	<a href="<%wpsURL.write(out);%>"> 
		<portal-fmt:text key="mail.begin" bundle="nls.engine"/>
			<SCRIPT  LANGUAGE="JAVASCRIPT">
				loadXML();
			</SCRIPT>
		<portal-fmt:text key="mail.End" bundle="nls.engine"/>
	</a> 
</portal-navigation:urlGeneration>
</portal-logic:if>