<%@ Language=VBScript%>
<!--#INCLUDE file="ADOVBS.inc"-->
<%
	Response.Buffer=true
	DIM sqlQuery, int_folio, str_tiempo, dbl_hora, dbl_minutos, dbl_segundos, dbl_avance, nextTest
	DIM int_w, int_h
	dim testId
	dim totalIncognitas
	dim tabbs, incognitasPerTab(10)
	int_w="100%"
	int_h="100%"

	dsn= application("bd_sieps")
	int_folio= Request.Cookies("sieps")("folio")
	Session("solicitudeFolio") = int_folio
	testId = Session("testId")
	
	SET rs = server.CreateObject("ADODB.Recordset")
	SET conn = SERVER.CreateObject("ADODB.CONNECTION")

	conn.Open dsn

	'Inician parametros de configuracion de la prueba
	if testId = "ORTO" then
		'total de incognitas
		totalIncognitas = 80
		'total de tabbs
		tabbs = 5
		'total incognitas por tab
		'incognitasPerTab = 25
		incognitasPerTab(1) = 20
		incognitasPerTab(2) = 13
		incognitasPerTab(3) = 20
		incognitasPerTab(4) = 22
		incognitasPerTab(5) = 5		 
		nextTest = "acentos"
		'tiempo de prueba se toma de la DB
		sqlQuery = "SELECT prue_tiempo FROM pruebas WHERE prue_clave='"&testId&"'"
		On Error Resume Next
		rs.Open sqlQuery, conn,adOpenForwardOnly,adLockReadOnly,1
		handleError(conn)
		
		str_tiempo="000000"		
		if rs.EOF= FALSE THEN
			str_tiempo_inicio = rs.Fields("prue_tiempo")
		end if	
	else
	'total de incognitas
		totalIncognitas = 54 'las tabbs 5 y 6 solo cuentan como una incognita respectivamente!
		'total de tabbs
		tabbs = 6
		'total incognitas por tab
		incognitasPerTab(1) = 16
		incognitasPerTab(2) = 14
		incognitasPerTab(3) = 14
		incognitasPerTab(4) = 7
		incognitasPerTab(5) = 6		 
		incognitasPerTab(6) = 3		 
		nextTest = ""
		'El tiempo para ORTO2 no esta en db, pero es el mismo que ORTO
		str_tiempo_inicio = 003000
'sendMensajeToConsole("Es la prueba de acentos")
	end if	
			  
	dbl_hora = Mid(str_tiempo_inicio, 1, 2)
	dbl_minutos = Mid(str_tiempo_inicio, 3, 2)
	dbl_Segundos = Mid(str_tiempo_inicio, 5, 2)

'sendMensajeToConsole("Prueba: "&testId&" hora: "&dbl_hora&" min: "&dbl_minutos&" seg: "&dbl_segundos)	
	'clean up
	If rs.State = adStateOpen then
		rs.Close
	End If
	If conn.State = adStateOpen then
		conn.Close
	End If
	Set rs = Nothing
	Set conn = Nothing
	
sub handleError(connectionRef)
	dim objErr
	dim str_c
	dim strrr, flag
	flag = 0

	if connectionRef.Errors.Count <> 0 Then
		str_c = str_c & "Count: " 
		str_c = str_c & connectionRef.Errors.Count
		for each objErr in connectionRef.Errors
			if objErr.Number <> 0 then ' Number = 0 el error es meramente informativo
				str_c = str_c & " Number: "
				str_c = str_c & objErr.Number			
				
				str_c = str_c & " Description: "
				str_c = str_c & objErr.Description  
			  
				str_c=str_c&" Native error: "
				str_c=str_c&objErr.NativeError 
				  
				str_c=str_c&" SQL state: "
				str_c=str_c&objErr.SQLState
				flag = 1
			end if
		next		
		if flag <> 0 then
			' clean up		
			if conn.State = adStateOpen then
				conn.Close
			end if
			
			set rs = Nothing
			set conn = Nothing
			set connectionRef = nothing
			
			strrr = "uti_console.asp?mensaje=" & "Error: " & str_c 
			Response.Redirect(strrr)
		end if		
	end if	
end sub	
	
sub sendMensajeToConsole(mensaje)
	dim strrr
	strrr="uti_console.asp?mensaje=" & mensaje
	Response.Redirect(strrr)
end sub
%>
<HTML>
	<HEAD>
		<TITLE></TITLE>
		<!--#INCLUDE FILE="uti_utilerias_aplicacion.asp"-->
		<SCRIPT LANGUAGE=javascript>
		<!--
			function changeTabb(idxTabb) {
				$('idxTabb').value = idxTabb;			
				
				var parms = $('form1').serialize();	
				new Ajax.Updater('wrapperTabbs','wich.asp', {
				methos: 'get',
				parameters: parms
				});
			}
			function start() {
				//resultado()
//window.parent.frames[0].location="uti_tiempo.asp?terminar=SI&nombre=Prueba Wonderlick"
				
				/*if ($('avanceHidden').value != "") { // Por si en la base hay un valor guardado de avance
					var mainWindow = window.parent;
					var listFrames = mainWindow.frames;
					var frameTiempo = listFrames[0];
					var int_avance = $('avanceHidden').value
					
					int_avance = Math.floor((int_avance/81)*100)
					
					frameTiempo.document.getElementById('avance').innerText =int_avance+"%"
				}*/
				window.setTimeout("runningtime()",1000)
				changeTabb(1);
			}
			
			function runningtime() {
			
				if ($('clockface').value !="false") {
					//clockface está vacio  ==''
					var int_hora = $('hora').value;
					var int_minutos = $('minutaje').value;
					var int_segundos = $('segundero').value;
					var str_tiempo = $('tiempo').value;
//alert('hora: '+int_hora+' minutero: '+int_minutos);
					var str_tiempo_actual = new Date();
					var str_termina =new Date();
					var valor;
				
					int_dia = str_tiempo_actual.getDate();
					int_mes = str_tiempo_actual.getMonth();
					int_ano = str_tiempo_actual.getYear();
						
					int_hora_actual =str_tiempo_actual.getHours();
					int_minutos_actual =str_tiempo_actual.getMinutes();
					int_segundos_actual =str_tiempo_actual.getSeconds();
								
					if (str_tiempo == "") {	
						var s = new Date(int_ano, int_mes, int_dia, int_hora, int_minutos, int_segundos);
						
						int_hora = s.getHours();
						int_minutos = s.getMinutes();
						int_segundos = s.getSeconds();

						str_tiempo = new Date(int_ano,int_mes, int_dia, int_hora_actual+ int_hora, int_minutos_actual+ int_minutos, int_segundos_actual+ int_segundos);
						$('tiempo').value = str_tiempo;
							
					} else {
						str_tiempo=new Date(str_tiempo);
					}
											
					valor = str_tiempo.getTime() - str_tiempo_actual.getTime();
						
					str_termina.setHours(0);
					str_termina.setMinutes(0);
					str_termina.setSeconds(0);
					str_termina.setMilliseconds(0);
					
					str_termina.setMilliseconds(valor);
					int_hora =0;
					int_minutos=str_termina.getMinutes();
					//alert('termina: '+int_minutos);
					int_segundos=str_termina.getSeconds();

					if (int_hora<10){
						int_hora="0"+int_hora
					}
					if(int_minutos<10){
						int_minutos="0"+int_minutos
					}
					
					if (int_segundos<10){
						int_segundos="0"+int_segundos
					}
					
					var mainWindow = window.parent;
					var listFrames = mainWindow.frames;
					var frameTiempo = listFrames[0];

					// Oculto la etiqueta
					if (frameTiempo.document.getElementById('avance').style.display != 'none') {
						frameTiempo.document.getElementById('avance').style.display = 'none';
					}
					// Muestro el div
					if (frameTiempo.document.getElementById('avanceDiv').style.display != '') {
						frameTiempo.document.getElementById('avanceDiv').style.display = ''
					}
					//frameTiempo.document.getElementById('avance').innerText =int_avance+"%"
														
//					if($('avanceHidden').value!=""){
						var int_avance=$('avanceHidden').value;
						int_avance = Math.floor((int_avance/$('totalIncognitas').value)*100);
						frameTiempo.document.getElementById('avanceDiv').innerHTML = int_avance+"%";
						$('avanceRegistrado').value = int_avance;
//						alert('avance: '+int_avance);
//					}

					//frameTiempo.document.getElementById('cronometro').innerText =int_hora +":" +int_minutos +":" + int_segundos 
					if (frameTiempo.document.getElementById('cronometro').style.display!='none') {
						frameTiempo.document.getElementById('cronometro').style.display = 'none';
					}
					if ( frameTiempo.document.getElementById('cronometroDiv').style.display != '' ) {
						frameTiempo.document.getElementById('cronometroDiv').style.display = '';
					}
					frameTiempo.document.getElementById('cronometroDiv').innerHTML =int_hora +":" +int_minutos +":" + int_segundos 
					
					if (int_hora <="00" & int_minutos <="00" & int_segundos<="00"){						
						alert("Terminado el Tiempo !!!")
						$('clockface').value=false
						$('hora').value="00"
						$('minutaje').value="00"
						$('segundero').value="00"
						$('tiempo').value=""
						$('form1').submit()
						//window.setTimeout("runningtime()",1000)
					} else {
						window.setTimeout("runningtime()",1000)
					}
				}				
			}

		//-->
		</SCRIPT>
		<link rel="stylesheet" type="text/css" href="stylesheet.css"/>
		<link rel="stylesheet" type="text/css" href="css/styleTests.css"/>
		<script type="text/javascript" src="js/lib/prototype-1.6.0.2.js"></script>
		<script type="text/javascript" src="js/funciones/functionsTests.js"></script>		
		<style type="text/css">
			#mainContentTest { /* Es toda el area en blanco */
				width:100%; 
				height:100%; 
				text-align:center;/*Asi IE centra a todos los elementos*/
			}
			#testContent {
				width:650px; 
				/*border:1px solid red;*/
				margin:0 auto;
			}
			
			/* El contenedor de los tabbs */
			#tabbs {
				width:650px;
				height:1.5em;
			}
			
			#wrapperTabbs {
				border:1px solid black;
				background-color: #efefef;
			}
			
			/*El menu tabb*/
			#globalnav {
				position:relative;
				float:left;
				width:100%;
				padding:0 0 0 1em;
				margin:0;
				list-style:none;
				line-height:1em;
			}

			#globalnav LI {
				float:left;
				margin:0;
				padding:0;
			}
			#globalnav A {
				display:block;
				color:#444;
				text-decoration:none;
				font-weight:bold;
				background:#ddd;
				margin:0;
				padding:0.25em 1em;
				border-left:1px solid #fff;
				border-top:1px solid #fff;
				border-right:1px solid #aaa;
			}

			#globalnav A:hover,
			#globalnav A:active,
			#globalnav A.here:link,
			#globalnav A.here:visited {
				background:#bbb;
			}

			#globalnav A.here:link,
			#globalnav A.here:visited {
				position:relative;
				z-index:102;
			}</
		</style></HEAD>

<body class="body" onLoad="start();"  topmargin="6" bottommargin="6" leftmargin="6" rightmargin="6" bgColor="slategray">
<!--#INCLUDE FILE="uti_fondo.asp"-->
	<table width="100%" Align="center" valign="top" border="0"  cellspacing="1" cellpadding="4" bordercolor="silver"  bordercolordark="white" bordercolorlight="black">
		<tr>
			<td valign="top">
				<br>
				<div id="mainContentTest">
					<form name="form1" id="form1" target="_top" method="post" action="TestSave.asp">
						<div id="testContent">
							<h2>En las siguientes oraciones, demuestre el uso de las letras señaladas, llenando las l&iacute;neas correctamente.</h2>											
							
							<div id="tabbs">
								<ul id="globalnav">
									<li>
										<a href="#" onClick="changeTabb(1);">Pag. 1</a>
									</li>
									<li>
										<a href="#" onClick="changeTabb(2);">Pag. 2</a>
									</li>
									<li>
										<a href="#" onClick="changeTabb(3);">Pag. 3</a>
									</li>
									<li>
										<a href="#" onClick="changeTabb(4);">Pag. 4</a>
									</li>
									<li>
										<a href="#" onClick="changeTabb(5);">Pag. 5</a>
									</li>
									<% if testId = "ORTO2" then %>
										<li>
											<a href="#" onClick="changeTabb(6);">Pag. 6</a>											
										</li>
									<% end if %>
								</ul>
							</div>
							
							<div id="wrapperTabbs">
									<!-- Mediante Ajax se llena este div -->
							</div>														
							<br/>							
							<br/>							
							<br/>							
							<br/>							
						</div>
						<input id="idxTabb" name="idxTabb" type="hidden" value="" />
						<input id="valueSelected" type="hidden" value="" />
						<input id="clockface" name="clockface" type="hidden" />						
						<input type="hidden" id="tiempo" name="TXT_TIEMPO" />
						<input type="hidden" id="hora" name="TXT_HORA" value="00" />
						<input type="hidden" id="minutaje" name="TXT_MINUTOS" value="30" />
						<input type="hidden" id="segundero" name="TXT_SEGUNDOS" value="<%=dbl_segundos%>" />
						<input type="hidden" id="avanceHidden" name="TXT_AVANCE" value="<%=dbl_avance%>" />
						<input type="hidden" id="avanceTotal" name="TXT_AVANCE_TOTAL" value="100" />
						<input type="hidden" id="avanceRegistrado" value="" />
						<input type="hidden" id="nextTest" name="nextTest" value="<%=nextTest%>"/>
						<input type="hidden" id="tabbs" name="tabbs" value="<%=tabbs%>" />
						<input id="totalIncognitas" type="hidden" value="<%=totalIncognitas%>" />
						<input type="hidden" id="tabbs1" name="incognitas" value="<%=incognitasPerTab(1)%>" />
						<input type="hidden" id="tabbs2" name="incognitas" value="<%=incognitasPerTab(2)%>" />
						<input type="hidden" id="tabbs3" name="incognitas" value="<%=incognitasPerTab(3)%>" />
						<input type="hidden" id="tabbs4" name="incognitas" value="<%=incognitasPerTab(4)%>" />
						<input type="hidden" id="tabbs5" name="incognitas" value="<%=incognitasPerTab(5)%>" />
						<!-- Auxiliar para ir guardadno la opcion de los radios seleccionado -->
						<input type="hidden" id="optionSeleccionada_5_21" value="" />
						<input type="hidden" id="optionSeleccionada_5_22" value="" />
						<input type="hidden" id="optionSeleccionada_6_23" value="" />
						<% if testId = "ORTO2" then %>
							<input type="hidden" id="tabbs6" name="incognitas" value="<%=incognitasPerTab(6)%>" />
						<% end if %>
						
						<%
							dim inputTag
							dim id, sufixId
							id ="id='"
							for tagg = 1 to tabbs
								for element = 1 to incognitasPerTab(tagg)
									inputTag = "<input "
									id = "id='" & "hidden_incognita"& element & "_" & tagg & "'" 
									inputTag = inputTag & id & " "
									inputTag = inputTag & "name='incognita' "
									inputTag = inputTag & "type='hidden' value='' "
									
									inputTag = inputTag & "/>"
								
									Response.write(inputTag)
								next
							next
							
						%>						
						
					</form>				
				</div>
<!--#INCLUDE FILE="uti_calce.asp"-->
</BODY>
</HTML>