<%@ Language=VBScript %>
<!--#INCLUDE file="ADOVBS.inc"-->
<% 
Response.Buffer=true
DIM str_empresa, str_nombre_empresa
DIM STR_CONSULTA
DIM int_w, int_h
int_w="100%"
int_h="100%"

dim lon_folio, str_sexo, str_nombre, int_edad, str_departamento, str_puesto, str_peril
dim str_prueba_sel(30)


str_bd= application("bd_sieps")

str_empresa= Request.Cookies("sieps")("empresa")
str_nombre_empresa=Request.Cookies("sieps")("nombre_empresa")

str_valido= Request.Cookies("sieps")("4")
str_valido="SI"

if str_valido <>"SI" then
	Response.Redirect("uti_error.asp?or=inicio.asp&enca=ERROR&mens=" & server.urlencode("El sistema no ha iniciado correctamente"))
end if

SET RES_DATOS = server.CreateObject("ADODB.Recordset")
SET CNN = SERVER.CreateObject("ADODB.CONNECTION")

cnn.Open str_bd


lon_folio= Request.Form("FOLIO")
response.Cookies("sieps")("folio")= lon_folio
str_sexo="Hombre"
str_nombre= ""
int_edad= ""
str_departamento=""
str_perfil=""
str_puesto=""



STR_CONSULTA = "SELECT * FROM solicitud WHERE soli_folio=" & lon_folio 
RES_DATOS.Open STR_CONSULTA, cnn,adOpenStatic,adLockReadOnly,1
if res_datos.EOF=false then
	str_nombre= RES_DATOS.Fields("soli_nombre")
	int_edad= RES_DATOS.Fields("soli_edad")
	str_sexo= RES_DATOS.Fields("soli_sexo")
	str_division=RES_DATOS.Fields("divi_clave")
	str_departamento=RES_DATOS.Fields("depa_clave")
	str_categoria=RES_DATOS.Fields("cate_clave")
	str_puesto=RES_DATOS.Fields("pues_clave")
end if
res_datos.Close

if str_division <> empty then
	STR_CONSULTA = "SELECT * FROM division WHERE divi_clave='" & STR_DIVISION & "' AND empr_clave='" & str_empresa & "'"
	RES_DATOS.Open STR_CONSULTA, cnn,adOpenStatic,adLockReadOnly,1
	if res_datos.EOF=false then
		str_division_nombre= RES_DATOS.Fields("divi_nombre")
	end if
	res_datos.Close
end if
if str_departamento <> empty then
	STR_CONSULTA = "SELECT * FROM departamento WHERE depa_clave='" & STR_DEPARTAMENTO & "' AND empr_clave='" & str_empresa & "'"
	RES_DATOS.Open STR_CONSULTA, cnn,adOpenStatic,adLockReadOnly,1
	if res_datos.EOF=false then
		str_departamento_nombre= RES_DATOS.Fields("depa_nombre")
	end if
	res_datos.Close
end if
if str_puesto <> empty then
	STR_CONSULTA = "SELECT * FROM puestos WHERE pues_clave='" & STR_PUESTO & "' AND empr_clave='" & str_empresa & "'"
	RES_DATOS.Open STR_CONSULTA, cnn,adOpenStatic,adLockReadOnly,1
	if res_datos.EOF=false then
		str_puesto_nombre= RES_DATOS.Fields("pues_nombre")
	end if
	res_datos.Close
end if
if str_categoria <> empty then
	STR_CONSULTA = "SELECT * FROM categoria WHERE cate_clave='" & STR_CATEGORIA & "' AND empr_clave='" & str_empresa & "'"
	RES_DATOS.Open STR_CONSULTA, cnn,adOpenStatic,adLockReadOnly,1
	if res_datos.EOF=false then
		str_categoria_nombre= RES_DATOS.Fields("cate_nombre")
	end if
	res_datos.Close
end if

' pruebas seleccionadas
For F = 1 To 30
    str_prueba_sel(i) = ""
Next
bol_existe=false

STR_CONSULTA = "SELECT * FROM pruebas_seleccionadas WHERE soli_folio = " & lon_folio
RES_DATOS.Open STR_CONSULTA, cnn, adOpenStatic, adLockReadOnly, 1
if res_datos.EOF=false then
	bol_existe=true
    For F = 1 To 30
        str_prueba_sel(F) = RES_DATOS.Fields(f)
    Next
end if
res_datos.Close

if bol_existe=false then
    STR_CONSULTA = "SELECT * FROM puestos_prueba WHERE pues_clave = '" & str_puesto & "' AND empr_clave='" & str_empresa & "'"
    RES_DATOS.Open STR_CONSULTA, cnn, adOpenStatic, adLockReadOnly, 1
	F=0
    Do Until RES_DATOS.EOF
		F=F+1
        str_prueba_sel(F) = RES_DATOS.Fields("PRUE_CLAVE")
		res_datos.MoveNext
	loop
	res_datos.Close
end if

%>
<html>
<head>
<title>Sieps - Selección de Pruebas</title>
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
<!--#INCLUDE FILE="uti_utilerias_cliente.asp"-->

<script LANGUAGE="javascript">
<!--



function iniciar()
{
	var image1
	image1= new Image;
	image1.scr="images/btn_aceptar_1.gif";
	image2= new Image;
	image2.scr="images/btn_cancelar_1.gif";
	
	document.form1.TXT_NOMBRE.focus;
}


function validar()
{
	var str_valida
	
	if (document.all.item("contador").value >0) {
		document.form1.submit();
	}
	
}


function ver_ayuda()
{
	
	var i = document.all.item("ayuda")
	
	
	if (i) {
		for (i=0; i < document.all.tags("SELECT").length;i++)
		{
			document.all.tags("SELECT")(i).style.visibility = "hidden";
		}

		ayuda.style.visibility = "visible";
	}
		


}



function btn_salir()

{
	document.all.item("btn_salir").bgcolor=whiteSmoke;

}




-->
</script>


<link REL="stylesheet" TYPE="text/css" HREF="stylesheet.css">


<meta name="Microsoft Theme" content="none, default"><meta name="Microsoft Border" content="none, default"></head>

<body class="body" topmargin="6" bottommargin="6" leftmargin="6" rightmargin="6" bgColor="slategray" onLoad="iniciar();">
<!--#INCLUDE FILE="uti_fondo.asp"-->
<form method="post" ACTION="aplicacion_abc.asp" id="form1" name="form1">
<table valign="center" border="0" width="100%" cellspacing="0" cellpadding="0">
	<tr>
		<td width="100%" align="middle" valign="top">
			<table border="0" width="100%" cellspacing="0" cellpadding="2">
				<tr>
					<td width="60%" align="left">
						<table border="0" width="100%" cellspacing="0" cellpadding="1">
							<tr>
								<td width="100%" align="left">
									<font class="etiqueta_roja"><%=str_nombre_empresa%></font>
								</td>
							</tr>
							<tr>
								<td width="100%" align="left">
									<font class="titulo_modulo">Selección de Pruebas</font>
								</td>
							</tr>
						</table>
					</td>
					<td width="40%" align="right" valign="center">
						<table border="0" height="50" valign="center" width="100%" bordercolor="dimgray" borderColorDark="white" cellspacing="0" cellpadding="0">
							<tr>
								<td width="100%" align="right" valign="middle">
									<a href="index.asp"><img alt="regresar al registro de candidatos" border="0" style="vertical-align:middle; border-color: DarkBlue; margin:0" src="images/btn_aplica_regresar.jpg" WIDTH="112" HEIGHT="40"></a>
									&nbsp;
								</td>
							</tr>
						</table>
					</td>
				</tr>
			</table>
		</td>
	</tr>
	<tr bgColor="#EFEFEF">
		<td align="right"><img alt="Ayuda en línea" border="0" style="border-color: DarkBlue; margin:0;margin-right:4px; cursor:hand" src="images/img_ayuda.gif" onClick="ver_ayuda()" WIDTH="24" HEIGHT="24"></td>
	</tr>
</table>
<table border="0" width="100%" height="100%" cellspacing="0" cellpadding="2" >
	<tr height="100%">
		<td align="center" valign="top">
			<table border="0" height="100%" width="99%" valign="top" bordercolor="dimgray" bgColor="white" cellspacing="0" cellpadding="2" background borderColorDark="white">
				<tr>
					<td width="100%" align="middle" valign="top">
						<br>
						<table align="center" border="0" width="470">
							<tr>
								<td>
									<table border="1" width="100%" bordercolor="dimgray" borderColorDark="white" cellspacing="0" cellpadding="0">
										<tr height="25">
											<td width="100%" align="middle" valign="middle" bgColor="gainsboro">
												<b><font class="titulo-listado">Datos</font></b>
											</td>
										</tr>
										<tr>
											<td>
											   <table width="100%" align="center" border="1" bgcolor="#EFEFEF" bordercolordark="#FFFFFF" cellspacing="0" bordercolor bordercolorlight="#FFFFFF">
													<tr>
														<td width="25%" align="right"><font class="etiqueta">Nombre:</font></td>
														<td width="75%" bgcolor="white"><input class="eti_azul_11" size="53" name="TXT_NOMBRE" value="<%=str_nombre%>" tabIndex="1"></td>
													</tr>
													<tr>
														<td align="right"><font class="etiqueta">Edad:</font></td>
														<td align="left" bgcolor="white">
															<table width="100%" align="center" bgcolor="white" border="0" bgcolor="#EFEFEF" cellspacing="0" cellpadding="0">
																<tr>
																	<td width="50%" bgcolor="white"><input class="eti_azul_11" size="2" name="TXT_EDAD" value="<%=int_edad%>" tabIndex="2"></td>
																	<td width="50" bgcolor="#EFEFEF" align="right"><font class="etiqueta">Sexo:</font></td>
																	<td bgcolor="white">&nbsp;	
																		<input class="eti_azul_11" size="10" name="TXT_SEXO" value="<%=str_sexo%>" tabIndex="1">
																	</td>
																		
																</tr>
															</table>
														</td>
													</tr>
													<tr>
														<td align="right"><font class="etiqueta">Division:</font></td>
														<td bgcolor="white"><input class="eti_azul_11" size="53" name="TXT_DIVISION" value="<%=str_division_nombre%>" tabIndex="3"></td>
													</tr>
													<tr>
														<td align="right"><font class="etiqueta">Departamento:</font></td>
														<td bgcolor="white"><input class="eti_azul_11" size="53" name="TXT_DEPARTAMENTO" value="<%=str_departamento_nombre%>" tabIndex="3"></td>
													</tr>
													<tr>
														<td align="right"><font class="etiqueta">Puesto:</font></td>
														<td bgcolor="white"><input class="eti_azul_11" size="53" name="TXT_PUESTO" value="<%=str_puesto_nombre%>" tabIndex="4"></td>
													</tr>
													<tr>
														<td align="right"><font class="etiqueta">Categoría:</font></td>
														<td bgcolor="white"><input class="eti_azul_11" size="53" name="TXT_CATEGORIA" value="<%=str_categoria_nombre%>" tabIndex="5"></td>
													</tr>
												</table>
											</td>
										</tr>
									</table>

									<br>
									<table border="1" height="240" width="100%" bordercolor="dimgray" bgColor cellspacing="0" cellpadding="0" borderColorDark="white">
										<tr height="25">
											<td width="100%" align="middle" valign="middle" bgColor="gainsboro">
												<b><font class="titulo-listado">Selección de Pruebas</font></b>
											</td>
										</tr>
										<tr>
											<td width="100%" align="middle" valign="top">
												<table border="1" width="100%" bordercolor="white" bgColor cellspacing="0" cellpadding="2">
													<tr bgColor="gainsboro">
														<td width="10%" align="middle"><b><font class="eti_tim_11">Sel.</font></b></td>
														<td width="75%" align="middle"><b><font class="eti_tim_11">Nombre de Prueba</font></b></td>
														<td width="15%" align="middle"><b><font class="eti_tim_11">Tiempo</font></b></td>
													</tr>

														<%
														
														
														
														STR_CONSULTA = "SELECT prue_clave, prue_nombre, prue_tiempo FROM pruebas ORDER BY prue_orden" 
														RES_DATOS.Open STR_CONSULTA, cnn,adOpenForwardOnly,adLockReadOnly,1

														i=0
														int_contador=0
														if res_datos.EOF= FALSE THEN
															Do Until RES_DATOS.EOF 
																int_contador=int_contador+1
																str_clave= RES_DATOS.Fields("prue_clave")
																str_nombre= RES_DATOS.Fields("prue_nombre")
																str_tiempo= RES_DATOS.Fields("prue_tiempo")
																hora = Mid(STR_TIEMPO, 1, 2)
																minutos = Mid(STR_TIEMPO, 3, 2)
																Segundos = Mid(STR_TIEMPO, 5, 2)
																tiempo_actual = hora & ":" & minutos & ":" & Segundos
														
														if i=0 then 
															Response.Write("<tr bgcolor=''>")
															i=1
														else
															Response.Write("<tr bgcolor='WhiteSmoke'>")
															i=0
														end if
														%>	
														

																	<td align="middle"><input TYPE="checkbox" name="<%=str_clave%>" id="<%=str_clave%>" <% 
																		bol_existe=false
																		for f=1 to 30
																			if str_prueba_sel(f) =str_clave then
																				bol_existe=true
																				exit for
																			end if
																		next
																		if bol_existe=true then
																			Response.Write(" checked=true ")
																		end if
																	%>></td>
																	<td align="left"><font class="eti_tim_11"><%=str_nombre%></font></td>
																	<td align="middle"><font class="eti_tim_11"><%=tiempo_actual%></font></td>
																</tr>
														<%
																res_datos.MoveNext
															loop
														end if
														res_datos.Close
														cnn.Close
														%>
													</tr>
												</table>
											</td>
										</tr>
									</table>
									<br>
									<table Align="center" width="100%" border="0" bgcolor="#EFEFEF" cellspacing="0" cellpadding="0">
										<tr>
											<td align="center" valign="middle">
												<input type="hidden" name="CONTADOR" value="<%=int_contador%>">
												<input type="hidden" name="FOLIO" value="<%=lon_folio%>">
												<img onClick="validar()" onMouseOver="document.pic_aceptar.src='images/btn_aceptar_1.gif'" onMouseOut="document.pic_aceptar.src='images/btn_aceptar_0.gif'" name="pic_aceptar" src="images/btn_aceptar_0.gif" border="0" tabindex="6" style="vertical-align:middle" WIDTH="74" HEIGHT="26">
												<a href="index.asp" onMouseOver="document.pic_cancelar.src='images/btn_cancelar_1.gif'" onMouseOut="document.pic_cancelar.src='images/btn_cancelar_0.gif'"><img name="pic_cancelar" src="images/btn_cancelar_0.gif" border="0" tabindex="7" style="vertical-align:middle" WIDTH="74" HEIGHT="26"></a>
											</td>
										</tr>
									</table>
								</td>
							</tr>
						</table>
						<br>
					</td>
				</tr>
			</table>
		</td>
	</tr>
</table>
</form>
<!--#INCLUDE FILE="uti_calce.asp"-->
<%	int_ancho_ayuda="370"%>

<!--#INCLUDE FILE="uti_ayuda_inicio.asp"-->

<table Align="center" width="96%" border="0" cellspacing="0" cellpadding="4">
	<tr>
		<td width="100%" align="left" valign="top" cellspacing="0" cellpadding="0">
			<font class="titulo-listado">Selección de Pruebas:</font>
			<br><br>
			<font class="etiqueta_normal">
				En esta pantalla se presentan los datos generales de la persona a la que se le aplicará la evaluación y se seleccionan las pruebas que resolverá.
				<br>Por default se presentan seleccionadas las pruebas definidas en el nivel de aplicación del puesto correspondiente. Puede seleccionar o desseleccionar el test que desee.
				<br><br>
				Para iniciar la evaluación presione el botón <i>Aceptar</i>.
				<br><br>
				<b>Opciones:</b>
				<br><br>
				<b><i>Regresar al Listado:</i></b><br>
				<img alt border="0" style="margin:0" src="images/btn_aplica_regresar.jpg" WIDTH="112" HEIGHT="40">
				Regresar al listado de registros. 
				<br><br>
				<b><i>Aceptar:</i></b><br>
				<img alt border="0" style="margin:0" src="images/btn_aceptar_0.gif" WIDTH="74" HEIGHT="26">
				Iniciar la Aplicación de las pruebas.
				<br><br>
				<b><i>Cancelar:</i></b><br>
				<img alt border="0" style="margin:0" src="images/btn_cancelar_0.gif" WIDTH="74" HEIGHT="26">
				Cancelar la aplicación y regresar al listado de registros. 
				<br><br>
			</font>
		</td>
	</tr>
</table>
<!--#INCLUDE FILE="uti_ayuda_fin.asp"-->
</body>
</html>

