[pft]@AHHEAD.PFT[/pft]

<script>
	function AnySelected(){			
		var any = false;
		var count = 0;		

		while(!any && count < document.forms[0].listChecked.length) {			
			any = (document.forms[0].listChecked[count].checked || document.forms[0].listChecked[count].type == "hidden");
			count++;
	    }
		if (!any)
		{
			alert("Ninguna referencia fue seleccionada");
			return false;
		}	
		else{
			document.forms[0].nextAction.value="your_selection";			
			document.forms[0].submit();			
			return true;
		}		
	}


	//ebsco functions 
	
	function goEbscoOnline(parametros)
	{
		var str_aux = "http://www-us.ebsco.com/online/direct.asp?"+parametros;
        janela = window.open(str_aux,"EBSCO_Online","width=640,height=480,resizable=yes,toolbar=no,location=no,menubar=no,scrollbars=yes,status=yes");
        janela.focus()	
	
	}
	//CVLACS functions 
	
	function goCVLACS1(parametros)
	{
		var str_aux = "http://genos.cnpq.br:12010/dwlattes/owa/prc_imp_cv_int?"+parametros;
        janela = window.open(str_aux,"CVLACS","width=640,height=480,resizable=yes,toolbar=no,location=no,menubar=no,scrollbars=yes,status=yes");
        janela.focus()	
	
	}

	//MDL_COC functions 
	
	function goMdlCochrane(parametros)
      {
              var str_aux = "/cgi-bin/wxislind.exe/iah-cochrane/?IsisScript=/users/www/cgi-bin/iah-cochrane/fulltext.xis&"+parametros;
        janela = window.open(str_aux,"FullText","width=640,height=480,resizable=yes,toolbar=no,location=no,menubar=no,scrollbars=yes,status=yes");
        janela.focus()  
        
        }
        

</script>

<form action="[pft]getenv('SCRIPT_NAME')v5000^d[/pft]" method="POST">
	[pft]@AHHIDD.PFT[/pft]

	
	<input type="hidden" name="nextAction" value="refine/resubmit">	
	<center>
	<table border="0" width="600" cellspacing="0" cellpadding="0" bgcolor="[pft]v5006^b[/pft]">
		<tr>
			[pft]if val(v1002) = 0 then[/pft]
				<td>&nbsp;</td>
			[pft]else[/pft]	
				<td align="center">
					<a href="javascript:void(AnySelected())"><img src="[pft]v5002[/pft]yselect.gif" border="0"></a>
				</td>
				<td align="center">
					<input type="image" src="[pft]v5002[/pft]sresult.gif" name="list" border="0"></a>					
				</td>							
				<td align="center">				
					<input type="image" name="new search" src="[pft]v5002[/pft]npesq.gif" border="0">				
				</td>
				<td align="center">		
					<input type="image" name="config" src="[pft]v5002[/pft]config.gif" border="0">			
				</td>
				<td align="center">			
					<a href="#bottom"><img src="[pft]v5002[/pft]fim.gif" border="0"></a>
				</td>	
			[pft]fi[/pft]	
		</tr>
	</table>

	<table border="0" width="600" cellspacing="0" cellpadding="0" align="center">	
		<tr>
			<td>
			<table border="0" width="600">
				<tr>
					<td align="right" valign="top">
						<font face="arial" size="2">Base de datos :</font>
					</td>
					<td valign="top">
						<font face="verdana" size="1"><b>[pft]v5003^*[/pft]</b></font>
					</td>		
				</tr>
				<tr>
					<td align="right" width="35%" valign="top">
						<font face="arial" size="2">Búsqueda :</font>
					</td>
					<td width="65%" valign="top">
						<font face="verdana" size="1"><b>
						[pft]
						,if p(v6102) then
							 v6102 ' [',v6100^e,']' 
						,else,
							,if v6000='F' then,
								 replace(v6002,' ',s('&nbsp;'mpu,v6001,mpl'&nbsp;'))
							,else,	 
								,(if p(v6002) then if iocc > 1 then '&nbsp;'v6001'&nbsp;'fi,v6002,' [',v6003^e,']' fi),
							,fi,							
						,fi,	
						[/pft]				
						</b></font>					
					</td>
				</tr>		
				<tr>
					<td align="right" valign="top">
						<font face="arial" size="2">Referencias encontradas :</font>
					</td>
					<td>
						<font face="verdana" size="1">
						<b>[pft]v1002[/pft]</b>
						[pft]if val(v1002) > 0 then '[<a href="#refine">refinar</a>]' fi[/pft]
						</font>
					</td>				
				</tr>	
				[pft]if val(v1002) > 0 then[/pft]
        		<tr>
          			<td align="right">
						<font face="Verdana" size="2">Mostrando:</font>
	          		</td>
    	      		<td>
						<font face="Verdana" size="1">
						<b>[pft]v1031,' .. ',v1032[/pft]</b>&nbsp;&nbsp;
						en el formato  [pft]'[<b>'(if  v5009[1] = v5005^n then v5005^e fi)'</b>]'[/pft]
						</font>
						
		 			</td>
        		</tr>
				[pft]fi[/pft]				
			</table>
			</td>
		</tr>
	</table>
	</center>
	<br>
	<!-- monta navegacao entre as paginas do resultado -->
	[pft]if val(v1002) > 0 then @NAVPAGE.PFT fi[/pft]