0){
// Se muestran las noticias que hay en base de datos.
$PA = " SELECT tbNoticia.TipoNoticia_ID, tbNoticia.Fecha, ";
$PA .= " tbNoticia.Titulo, tbNoticia.Subtitulo, tbNoticia.Texto, tbNoticia.Fuente, tbTipoNoticia.Nombre Tipo ";
$PA .= " FROM tbNoticia INNER JOIN tbTipoNoticia ON tbTipoNoticia.TipoNoticia_ID = tbNoticia.TipoNoticia_ID";
$PA .= " WHERE 1 = 1";
$PA .= " AND tbNoticia.bActivo= 1 ";
$PA .= " AND tbTipoNoticia.bActivo= 1 ";
$PA .= " AND tbNoticia.Noticia_ID = ".$Noticia_ID;
$PA .= " LIMIT 1";
$resultado = ExecPA($PA);
$NumElementos=mysql_affected_rows();
if($NumElementos>0){
$Fila = 0;
// Se obtienen los datos.
$TipoNoticia_ID = intval(ValorCelda($resultado, 0, "TipoNoticia_ID"));
$FechaInicio = ValorCelda($resultado, 0, "Fecha");
$Titulo = stripslashes(ValorCelda($resultado, 0, "Titulo"));
$Subtitulo = stripslashes(ValorCelda($resultado, 0, "Subtitulo"));
$Texto = stripslashes(ValorCelda($resultado, 0, "Texto"));
$Fuente = stripslashes(ValorCelda($resultado, 0, "Fuente"));
$Tipo = stripslashes(ValorCelda($resultado, 0, "Tipo"));
$Recursos_Imagenes = SacarRecursos(SECREC_NOTICIA_FOTO,$Noticia_ID);
$Recursos_Videos = SacarRecursos(SECREC_NOTICIA_VIDEO,$Noticia_ID);
$Recursos_Archivos = SacarRecursos(SECREC_NOTICIA_ARCHIVO,$Noticia_ID);
//Componer
/* if(strlen($Tipo)>0){
$strTitulos .= "Tipo: ".$Tipo."
";
}*/
if(strlen($Titulo)>0){
$strTitulos .= "".$Titulo."
";
}
if(strlen($Subtitulo)>0){
$strTitulos .= "".$Subtitulo."
";
}
if(strlen($Fuente)>0 || $FechaInicio!=-1){
$strTitulos .= "";
if(strlen($Fuente)>0){
$strTitulos .= "".$Fuente." ";
}
if($FechaInicio!=-1){
$strTitulos .= "".fechaNormalConPuntos($FechaInicio)."";
}
$strTitulos .= "
";
}
if(strlen($Texto)>0){
$Texto = nl2br($Texto);
$strHtmlFicha .= "".$Texto."
";
}
///////////////////////////////////////////////////////////////////////
//Fotos
if(is_array($Recursos_Imagenes)){
foreach($Recursos_Imagenes as $Recurso){
$strHtmlFotoNoticia .= "";
$strHtmlFotoNoticia .= "
![\"".$Recurso["Pie"].](\"".SERVER.DOC_ROOT.DIR_UPLOAD.$Recurso["Recurso_ID"]."p".$Recurso["Extension"]."\")
";
if(strlen($Recurso["Pie"])>0){
$strHtmlFotoNoticia .= "".$Recurso["Pie"];
}
$strHtmlFotoNoticia .= "
";
$strHtmlVideoNoticia .= adaptarTamanoVideo(stripslashes($Recurso["HTMLembed"]),"");
if(strlen($Recurso["Pie"])>0){
$strHtmlVideoNoticia .= "
".$Recurso["Pie"];
}
$strHtmlVideoNoticia .= "
";
}
}
//Archivos
if(is_array($Recursos_Archivos)){
$strHtmlArchivoNoticia .= "";
$strHtmlArchivoNoticia .= "
Documentos relacionados
";
$strHtmlArchivoNoticia .= "
";
$strHtmlArchivoNoticia .= "
".pintarAgregadoresNoticias(SERVER."/".DIR_NOTICIAS."noticia.php?id=".$Noticia_ID,$Titulo)."
";
///////////////////////////////////////////////////////////////////////LOG
$LogAccion_ID = intval(LOG_VIEW_noticia_ID);
$LogCliente_ID = intval($_SESSION["CLIENTE_ID_EEMPRES"]);
$LogEntidad_ID = intval($Noticia_ID);
$LogTipoEntidad_ID = intval(ENTIDAD_ID_noticia);
InsertLogUsuarias ($LogAccion_ID, $LogCliente_ID, $LogEntidad_ID, $LogTipoEntidad_ID);
}else{
$strHtmlFicha .= "".$MetaTitulo."
";
$strHtmlFicha .= maquetarNegativo("No se ha encontrado la noticia.
Pulsa aquí para volver al índice de actualidad.");
}
}else{
$strTitulo .= "".$MetaTitulo."
";
$strHtmlFicha .= maquetarNegativo("No se ha encontrado la noticia.
Pulsa aquí para volver al índice de actualidad.");
}
///////////////////////////////////////////////////////////////////////////////
Cabecera($MetaTitulo." ".$Titulo,$arrayJs,$arrayCSS,$SeccMenu,$bGMaps);
?>