<?
include 'funcoes.php3';
Seguranca($HTTP_REFERER);

if ( $Critica == "P" ) {
	$Db = pg_Connect(Conexao());
	pg_exec($Db,"BEGIN");
	# Envia email para quem cadastrou e responsável
	$Sql = "select SitesQuemCadastrou, SitesCPQuemCadastrou, SitesResponsavel, ";
	$Sql .= "SitesCPResponsavel, SitesNome, SitesDescricao, SitesUrl ";
	$Sql .= "from Sites where SitesCodigo = $SitesCodigo";
	$Resp = pg_exec($Db,$Sql);
	$Rows = pg_NumRows($Resp);
	if ( $Rows != 0 ) {
		$Linha = pg_fetch_row($Resp,0);
		$SitesQuemCadastrou = $Linha[0];
		$SitesCPQuemCadastrou = $Linha[1];
		$SitesResponsavel = $Linha[2];
		$SitesCPResponsavel = $Linha[3];
		$SitesNome = $Linha[4];							
		$SitesDescricao = $Linha[5];							
		$SitesUrl = $Linha[6];							
		# Texto-padrao para inclusao
		$Sql = "select PadraoInclusao, PadraoEmailAdm1 from Padrao";
		$Resp = pg_exec($Db,$Sql);
		$Linha = pg_fetch_row($Resp,0);
		$PadraoInclusao = $Linha[0];
		$PadraoEmailAdm1 = $Linha[1];
		# Texto
		$Mensagem = "$PadraoInclusao\n\n";
		$Mensagem .= "Nome de quem Cadastrou: $SitesQuemCadastrou\n";
		$Mensagem .= "Email de quem Cadastrou: $SitesCPQuemCadastrou\n";
		$Mensagem .= "Nome do Responsável pelo Site: $SitesResponsavel\n";
		$Mensagem .= "Email do Responsável pelo Site: $SitesCPResponsavel\n";
		$Mensagem .= "Nome do Site: $SitesNome\n";
		$Mensagem .= "Url: $SitesUrl\n";
		$Mensagem .= "Descrição: $SitesDescricao\n";
		$Headers = "From: $PadraoEmailAdm1\n";
		if ( $SitesCPQuemCadastrou != $SitesCPResponsavel ) {
			$Headers .= "CC: $SitesCPResponsavel\n";
		}
		$Headers .= "Reply-To: $PadraoEmailAdm1\n";
		mail($SitesCPQuemCadastrou, "PEWEB", $Mensagem, $Headers);
	}	
	$DataInclusao = date("Y/m/d");
	$Sql = "update Sites set SitesAprovado = 'S', SitesDataInclusao = '$DataInclusao' ";
	$Sql .= "where SitesCodigo = $SitesCodigo";
	$Resp = pg_exec($Db,$Sql);
	pg_exec($Db,"COMMIT");
	pg_exec($Db,"END");
	pg_Close($Db);
} else {
	if ( $Critica == "E" ) {
		$Db = pg_Connect(Conexao());
		pg_exec($Db,"BEGIN");
		# Envia email para quem cadastrou e responsável
		$Sql = "select SitesQuemCadastrou, SitesCPQuemCadastrou, SitesResponsavel, ";
		$Sql .= "SitesCPResponsavel, SitesNome, SitesDescricao, SitesUrl ";
		$Sql .= "from Sites where SitesCodigo = $SitesCodigo";
		$Resp = pg_exec($Db,$Sql);
		$Rows = pg_NumRows($Resp);
		if ( $Rows != 0 ) {
			$Linha = pg_fetch_row($Resp,0);
			$SitesQuemCadastrou = $Linha[0];
			$SitesCPQuemCadastrou = $Linha[1];
			$SitesResponsavel = $Linha[2];
			$SitesCPResponsavel = $Linha[3];
			$SitesNome = $Linha[4];							
			$SitesDescricao = $Linha[5];							
			$SitesUrl = $Linha[6];							
			# Texto-padrao para recusa
			$Sql = "select PadraoRecusa, PadraoEmailAdm1 from Padrao";
			$Resp = pg_exec($Db,$Sql);
			$Linha = pg_fetch_row($Resp,0);
			$PadraoRecusa = $Linha[0];
			$PadraoEmailAdm1 = $Linha[1];
			# Texto
			$Mensagem = "$PadraoRecusa\n\n";
			$Mensagem .= "Nome de quem Cadastrou: $SitesQuemCadastrou\n";
			$Mensagem .= "Email de quem Cadastrou: $SitesCPQuemCadastrou\n";
			$Mensagem .= "Nome do Responsável pelo Site: $SitesResponsavel\n";
			$Mensagem .= "Email do Responsável pelo Site: $SitesCPResponsavel\n";
			$Mensagem .= "Nome do Site: $SitesNome\n";
			$Mensagem .= "Url: $SitesUrl\n";
			$Mensagem .= "Descrição: $SitesDescricao\n";
			$Headers = "From: $PadraoEmailAdm1\n";
			if ( $SitesCPQuemCadastrou != $SitesCPResponsavel ) {
				$Headers .= "CC: $SitesCPResponsavel\n";
			}
			$Headers .= "Reply-To: $PadraoEmailAdm1\n";
			mail($SitesCPQuemCadastrou, "PEWEB", $Mensagem, $Headers);
		}	
		$Sql = "delete from SiteCategoria where SitesCodigo = $SitesCodigo";
		$Resp = pg_exec($Db,$Sql);
		if ( ! $Resp ) {
			ExibeErroBD("Sql: $Sql");
			pg_exec($Db,"ROLLBACK");
			exit;
		}
		$Sql = "delete from Sites where SitesCodigo = $SitesCodigo";
		$Resp = pg_exec($Db,$Sql);
		if ( ! $Resp ) {
			ExibeErroBD("Sql: $Sql");
			pg_exec($Db,"ROLLBACK");
			exit;
		}
		pg_exec($Db,"COMMIT");
		pg_exec($Db,"END");
		pg_Close($Db);
	}
}
?>

<!-- Programação: Luciano Melo - http://www.icones.com.br -->

<html>
<style>a{text-decoration:none}</style>
<title>PEWEB</title>
<body bgcolor=ffcc00 text=000000 link=3366ff vlink=009900>
<center><br>
<table border=0 width=70%>
<td><img src=imagens/sites.gif><br>
<a href=siteinc.php3?Adm=1&Critica=0 target=corpo><img alt="Cadastrar um novo site" border=0 src=imagens/sitinc.gif></a><br>
<a href=sitesel.php3?Adm=1&Critica=0 target=corpo><img alt="Alterar os sites cadastrados" border=0 src=imagens/sitalt.gif></a><p>
<hr>
<font face=sans-serif size="-2"><b>Sites Cadastrados Provisoriamente</b></font><p>
<table border=1>

<?
$Db = pg_Connect(Conexao());
$Sql = "select SitesCodigo, SitesUrl from Sites where SitesAprovado = 'N' order by SitesUrl";
$Resp = pg_exec($Db,$Sql);
$Rows = pg_NumRows($Resp);
for ($Row = 0; $Row < $Rows; $Row++) {
	$Linha = pg_fetch_row($Resp,$Row);
	echo "<td><a href=sitepro.php3?Critica=P&SitesCodigo=$Linha[0]>&nbsp;Publicar&nbsp;</a></td><td><a href=sitepro.php3?Critica=E&SitesCodigo=$Linha[0]>&nbsp;Excluir&nbsp;</a></td><td><a href=sitealt.php3?Adm=1&SitesCodigo=$Linha[0]>&nbsp;Alterar&nbsp;</a></td><td><a href=http://$Linha[1] target=top>$Linha[1]</a></td><tr>\n" ;
}
pg_Close($Db);
?>

</table>
</td></table>
</body>
</html>