'; /* if(!isset($_SERVER['PATH_INFO'])) { $inicio = 0; $pagina = 1; $codigoespe = $_POST["codigoespe"]; } else { $var = explode('/',$_SERVER['PATH_INFO']); $codigoespe = $var[1]; if(!isset($var[2])) {$pagina = 1; $inicio = 0;} else $pagina = $var[2]; if(isset($var[3])) $total_paginas = $var[3]; */ $inicio = ($pagina - 1) * $lineas; if (is_file('/servidor/db.inc')) require_once('/servidor/db.inc'); else require_once("/var/www/html/db.inc"); if (is_file('/servidor/siicsalud/web/temp/oculto/funcionessiicsalud.php')) include '/servidor/siicsalud/web/temp/oculto/funcionessiicsalud.php'; else include '/var/www/html/siicsalud/web/temp/oculto/funcionessiicsalud.php'; $co = mysql_connect($host, $user, $pass); if($co == 0) { echo "

ERROR AL EFECTUAR LA CONEXION

"; } else { mysql_select_db("siicsalud", $co); if ($inicio==0) {$pe = "SELECT nroartic, fecha, codestilo, dathtml, pathtml, titulocaste, pagini, pagfin, codrevista, nrorevistamov, pathtapa, url, nombre, volumen, numero, mes, anio, autornombre, apellido, ciudad, pais, seccion FROM articons WHERE (codigoespe = '".$codigoespe."') and (redactado=1) and (publicado=1) and (seccion".$cib."'NIBE');"; $resu = mysql_query($pe,$co); $total_registros = mysql_num_rows($resu); mysql_free_result($resu); $totp = ceil($total_registros / $lineas); } $lcPeti = "SELECT detalle, imagen FROM especialidad WHERE codigoespe = '$codigoespe'"; $lnresu = mysql_query($lcPeti, $co); $row2=mysql_fetch_object($lnresu); $detalle = TRIM($row2->detalle); $imagen = TRIM($row2->imagen); $pe = "SELECT nroartic, fecha, codestilo, getStrSinAcentos(titulocaste, 2) AS titulocaste, pagini, pagfin, codrevista, nrorevistamov, pathtapa, url, nombre, volumen, numero, mes, anio, autornombre, apellido, ciudad, pais, seccion FROM articons WHERE (codigoespe = '".$codigoespe."') and (redactado=1) and (publicado=1) and (seccion".$cib."'NIBE') ORDER BY fecha DESC LIMIT ".$inicio.",".$lineas.";"; $resu = mysql_query($pe, $co); if($resu > 0) { cabezalespecificas($ibero); $lnContadorLinea=0; while($row=mysql_fetch_object($resu)) { $lnContadorLinea++; $volumen = (trim($row->volumen)); $numero = (trim($row->numero)); $pagini = (trim($row->pagini)); $pagfin = (trim($row->pagfin)); $mes = (trim($row->mes)); $anio = (trim($row->anio)); $fecha = (trim($row->fecha)); $ciudad = (trim($row->ciudad)); $pais = (trim($row->pais)); $nombre = (trim($row->nombre)); $autornombre = (trim($row->autornombre)); $apellido = (trim($row->apellido)); $codestilo = (trim($row->codestilo)); $estilo = strtolower($codestilo); if ($estilo == 'arsiic') { $estilo = 'experto'; } $titulocaste = (trim($row->titulocaste)); $titulocaste = acentos($titulocaste); $titulocaste = strtoupper($titulocaste); //$titulocaste = htmlentities($titulocaste); $titulocaste = str_replace("<", "<", $titulocaste); $titulocaste = str_replace(">", ">", $titulocaste); $dathtml = (trim($row->dathtml)); $pathtml = (trim($row->pathtml)); $pathtapa = (trim($row->pathtapa)); $nroartic = $row->nroartic; $fechapublicacion = nfecha($fecha); IF (($codestilo == "RESIIC") OR ($codestilo == "INSIIC")) $revistaresto = completarfuente($volumen, $numero, $pagini, $pagfin, $mes, $anio); ponerdatos($lnContadorLinea); } } } ?>
'; if ($x==$pagina) echo ''.$x.''; else echo ''.$x.''; echo '  '; } ?>
Cada página contiene artículos
' ; } ?>
0) if($row=mysql_fetch_object($resu)) { $lcDetalle = TRIM($row->detalle); $lcLogo = TRIM($row->logo); } ?> <? echo $detalle; ?>

<?echo TRIM($lcLogo);?>
'; ELSE echo '

Novedades del mundo'; ?>

, siicsalud Novedades IberoMédicas
"; } } ELSE echo ''; ?> '; } ELSE { IF ($codestilo != "CROSIIC") { echo ''; echo ''.TRIM($autornombre).' '.TRIM($apellido).''; echo ''; } ELSE { echo ''.TRIM($autornombre).' '.TRIM($apellido).''; echo ''; } echo '
 Portada/Indice
'; } ?>
'; } function ponerespecificas() { global $nroartic, $co; $lcPeti = "SELECT codigoespe FROM artiespec WHERE nroartic = '$nroartic' AND principal = 1"; $resu = mysql_query($lcPeti, $co); if($resu > 0) $linkespeprin=""; while($row=mysql_fetch_object($resu)) { $lcCodigoEspe = TRIM($row->codigoespe); $lcPeti = "SELECT detalle, logo FROM especialidad WHERE codigoespe = '$lcCodigoEspe' AND padre = ' '"; $lnresu = mysql_query($lcPeti, $co); if($lnresu > 0) while($row2=mysql_fetch_object($lnresu)) { $lcDetalle = TRIM($row2->detalle); $lcLogo = TRIM($row2->logo); IF (!$linkespeprin) $linkespeprin = ''.TRIM($lcLogo).''; ELSE $linkespeprin .= ' '.TRIM($lcLogo).''; }; }; echo "$linkespeprin"; } function ponerespecialedades() { global $nroartic, $co, $codigoespe; $lcPeti = "SELECT codigoespe FROM artiespec WHERE nroartic = '$nroartic' AND principal = 0"; $resu = mysql_query($lcPeti, $co); if($resu > 0) $linksubespe=""; while($row=mysql_fetch_object($resu)) { $lcCodigoEspe = TRIM($row->codigoespe); $lcPeti = "SELECT detalle, logo FROM especialidad WHERE codigoespe = '$lcCodigoEspe' AND padre = '$codigoespe'"; $lnresu = mysql_query($lcPeti, $co); if($lnresu > 0) while($row2=mysql_fetch_object($lnresu)) { $lcDetalle = TRIM($row2->detalle); $lcLogo = TRIM($row2->logo); IF (!$linksubespe) $linksubespe = ''.TRIM($lcLogo).''; ELSE $linksubespe .= ' '.TRIM($lcLogo).''; }; }; echo "$linksubespe"; } function poneresperel() { global $nroartic, $co, $codigoespe; $lcPeti="SELECT DISTINCT(a.codigoespe), b.detalle, b.logo FROM artiespec AS a INNER JOIN especialidad AS b ON a.codigoespe = b.codigoespe WHERE nroartic = '".$nroartic."' && principal = '0' && padre = ' '"; $resu = mysql_query($lcPeti, $co); $linksubespe=""; if($resu > 0) while($row=mysql_fetch_object($resu)) { $lcDetalle = TRIM($row->detalle); $lcLogo = TRIM($row->logo); IF ($linksubespe) $linksubespe .= ' '; $linksubespe .= ''.TRIM($lcLogo).''; } echo $linksubespe.""; }

'; ELSE { echo " "; echo "

'; break; CASE "ENSIIC": echo 'flecha_ensiic_a.gif'; break; CASE "CROSIIC": echo 'flecha_crosiic_a.gif'; break; CASE "RESIIC": echo 'flecha_resiic_a.gif'; break; CASE "INSIIC": echo 'flecha_resiic_a.gif'; break; } echo ' '; /* IF ($codestilo != "CROSIIC") echo ' '; ELSE echo ' '; */ limpiaracentos(); echo "$titulo, "; ?>
['.TRIM($nombre).'
 '.$revistaresto.']

Especialidades específicas'; ELSE echo ' '; ?>

Relacionadas'; ELSE echo '

 '; ?>