<!--#include file="templates\templateLogin.asp"-->
<%
	on error resume next
	
	dim selecionado
	dim objFolhaPonto, ids, id
	selecionado = request("selecionado")
	if selecionado <> "" then
		set objFolhaPonto = Server.CreateObject("ACME.ACMEFolhaPonto")
		ids = split(selecionado,",")
		for each id in ids
			objFolhaPonto.Delete(cDbl(id))
		next
	End if
	if err.number = 0 then
		response.redirect("ACMEFolhaPontoLst.asp")
	else
		TrataErro
	end if
%>
<html>
<head>
	<title>GUARDIÃO - Sistema de Segurança PROCEMPA</title>
	<link rel="STYLESHEET" type="text/css" href="css/padrao.css">
<script language="JavaScript">

var origem = "<%= request.querystring("origem") %>";
function voltar()
{	if(origem == "ALTERA")
		document.location.href="ACMEFolhaPontoAltera.asp?IDFolhaPonto=<%= selecionado %>"
	else
		document.location.href="ACMEFolhaPontoLst.asp";
}
function abreHelp()
{	alert('Help!');
}
function abreEmail()
{	alert('E-Mail!');
}
</script>
</head>
<body ">
<br><br>
<table width="100%" cellspacing="10" cellpadding="0">
<tr>
	<td align="center" class="msgerro"><img src="imagens/error.gif" alt="" border="0" align="absmiddle"> Ocorreram erros durante o processo de exclusão!</td>
</tr>
<tr>
	<td align="center" class="msgerro"><br><br><%= err.description %>&nbsp;(<%= err.number %>)</td>
</tr>
</table>
</body>
</html>
