"; } function div($a,$b){ return ($a-($a % $b))/$b; } function formato_noticia($texto,$enlace) { ?>


Ver


Ver


Ver

"; switch($area)//ya q este mismo php se usa en diferenres secciones laboral,civil y constitucional { case civ: $img_cabecera="ima/civil_10.jpg";break; case lab: $img_cabecera="ima/labo.jpg";break; case con: $img_cabecera="ima/constitu.jpg";break; } echo "

"; $contador=1; echo "
Doctrina"; if($area=="civ") { echo "
"; } $desfase=140; for($i=1;$i<=6;$i++) { switch($i) { case 1: $tema="Acto jurídico";$salto="AJ";break;//$salto se usa para hipervincular los temas desde las imagenes case 2: $tema="Derecho de las obligaciones";$salto="DO";break; case 3: $tema="Derecho de Familia";$salto="DF";break; case 4: $tema="Derechos Reales";$salto="DR";break; case 5: $tema="Fuentes de las obligaciones";$salto="FO";break; case 6: $tema="Otros temas";$salto="OT";break; } if ($area=="civ") //civi solamente tiene temas,por eso la discriminación { $sql = "SELECT * FROM `doctrina2` WHERE 1 AND `area` LIKE '$area' AND `tema` LIKE '%$tema%' order by `autor`"; echo ""; echo "
$tema
"; } else $sql = "SELECT * FROM `doctrina2` WHERE `area` LIKE '$area' order by `autor`;"; $result = mysql_query($sql) or die(mysql_error()); while ($myrow = mysql_fetch_array($result)) { if ($myrow["iddoctrina"]>37) $imgnew=""; else $imgnew=""; if ($area=="civ") //porque ellos solos tiene sumillas { $sumilla="doctrina/".$area."_sum".$myrow["iddoctrina"].".txt"; //echo $sumilla; printf(" ",$myrow["iddoctrina"]);//para el hipervinculo printf("
%d. %s  %s
%s
Autor: %s
%s
\"Ver
",$contador,$myrow["iddoctrina"],$myrow["titulo"],$imgnew,$myrow["revista"],$myrow["autor"],$myrow["sobre_auto"],$area,$myrow["iddoctrina"]); } else printf("
%d.%s
%s  %s

\"Ver
  ", $contador,$myrow["titulo"],$myrow["autor"],$imgnew,$area,$myrow["iddoctrina"]); $contador+=1; } //del while print(""); printf(" 

Volver

",arriba); if ($area=="con" || $area=="lab" ) //ya que sino ingresaria el For de nuevo y se repetiria 6 veces break; } //del For echo ""; } //-------------------------------------fin------------------------------------------------------------------- function procesa_menu_area($area,$opcion) { if ($opcion==1) doctrina_area(substr($area,0,3)); elseif ($opcion==2) include $area.'_pucp_php.htm'; elseif ($opcion==3) include $area.'_recom_php.htm'; elseif ($opcion==4 && $area=="laboral") include 'ley_antetrabajo.htm'; } function crit_busq($texto,$campo) { //funcion crit_busq y compara sólo se usarán dentro de esta función if ($campo) printf("    %s%s
",$texto,$campo); } function crit_busq_tem($texto,$campo) { //funcion crit_busq y compara sólo se usarán dentro de esta función if ($campo) printf("    %s
",$texto); } function compara($flag,$dato) { $maximo = strlen($flag); $dev = 1; for($i=0;$i<=$maximo;$i++) if ( substr($flag,$i,1)==1 && substr($flag,$i,1) != substr($dato,$i,1) ) { $dev=0; break; } return $dev; } function busqueda_esp_id() { GLOBAL $inicio; GLOBAL $pais; GLOBAL $results; $res_por_page=15; //echo "
el valor de inicio es..."; print $inicio; $num_resultados = busqueda_esp_id_arreglo(); //se llenó el arreglo results de resultados printf("

   Su búsqueda produjo %d resultado(s)

",$num_resultados); if ($num_resultados>0) { for ($j=0;$j<$num_resultados;$j++) { if (($j%$res_por_page)==0) { if (($j%$res_por_page)==0 && $j!=0) echo "
\n"; if ($j==0) $visibilidad="visible"; else $visibilidad="hidden"; printf("
\n",$j,$visibilidad); $str_swap = $str_swap."swap_layer('a".$j."','hidden');"; } if ($j==0) { echo "";} echo ($j+1).".- Nombre de la Página: "; print $results[$j][1]; echo "
\n"; echo "Institución: "; print $results[$j][2]; echo "
\n"; echo "URL: "; print $results[$j][3]; echo "

\n"; } //fin del for echo "
"; ?>
$res_por_page) { ?>     \n"; if ($f1[$i]) $flag1 .= "1"; else $flag1 .= "0"; } $flag2=""; for ($i = 1 ; $i < 63 ; $i++) { if ($f2[$i]) $flag2 .= "1"; else $flag2 .= "0"; } if ($f1[2]) { $f1[2] = 0 ; $f1[8] = 1; $flag3=""; for ($i = 1 ; $i < 34 ; $i++) { if ($f1[$i]) $flag3 .= "1"; else $flag3 .= "0"; } } else $flag3 = $flag1; if (!$id) { $sql = "SELECT * FROM portder where "; //if ($t_nombre || $t_url || $insti || $pais!="todos" ) $sql.="WHERE"; if ($t_nombre) $sql.= " t_nombre like '%$t_nombre%' AND"; if ($t_url) $sql.= " t_url like '%$t_url%' AND"; if ($insti) $sql.= " t_instituc like '%$insti%' AND"; if ( $pais != "todos" ) $sql.= " t_pais like '%$pais%' AND"; $sql.= " c_id >= 1 and t_url!='' AND f_stat=1 order by t_nombre, t_pais ASC"; //cambio 03 julio 2003 //$sql.= " f_flag1 = $flag1 AND f_flag2 = $flag2 AND f_stat=1;"; //print $sql; $result = mysql_query($sql) or die(mysql_error()); echo ""; echo "

  Resultados de la búsqueda con los siguientes criterios seleccionados

"; echo "
"; crit_busq("Nombre: ",$t_nombre); crit_busq("URL: ",$t_url); crit_busq("Institución: ",$insti); crit_busq("Facultad-Carrera-Programa : ",$f1[1]); crit_busq("Departamentos Académicos, Centros e Institutos de Investigación: ",$f1[2]); crit_busq("Diplomas: ",$f1[3]); crit_busq("Especializaciones: ",$f1[4]); crit_busq("Postítulos: ",$f1[5]); crit_busq("Maestrías: ",$f1[6]); crit_busq("Doctorados: ",$f1[7]); if ($f1[8]) $f1[8] = "Si"; crit_busq("Departamentos Académicos, Centros e Institutos de Investigación: ",$f1[8]); crit_busq("Bibliotecas Jurídicas y Centros de Documentación Legal: ",$f1[9]); crit_busq("Editoriales Jurídicas y Librerías Especializadas: ",$f1[10]); crit_busq("Portales Jurídicos: ",$f1[11]); crit_busq("Boletín Oficial: ",$f1[12]); crit_busq("Poder Legislativo: ",$f1[13]); crit_busq("Poder Judicial: ",$f1[14]); crit_busq("Tribunal Constitucional: ",$f1[15]); crit_busq("Páginas Personales: ",$f1[20]); crit_busq("Revistas: ",$f1[17]); crit_busq("Revistas On-line: ",$f1[16]); crit_busq("Artículos y ensayos: ",$f1[31]); crit_busq("Revistas: ",$f1[17]); crit_busq("Colegios de Abogados: ",$f1[19]); crit_busq("Asociaciones de Especialistas: ",$f1[21]); crit_busq("Nacionales: ",$f1[27]); crit_busq("Internacionales: ",$f1[28]); crit_busq("Poder Ejecutivo: ",$f1[33]); crit_busq_tem("ADMINISTRACIÓN DE JUSTICIA: ",$f2[1]); crit_busq_tem("ADMINISTRATIVO, DERECHO: ",$f2[2]); crit_busq_tem("ADUANERO, DERECHO: ",$f2[3]); crit_busq_tem("AMBIENTAL, DERECHO: ",$f2[6]); crit_busq_tem("AUTOR. DERECHO DE: ",$f2[8]); crit_busq_tem("CANÓNICO, DERECHO: ",$f2[10]); crit_busq_tem("CIENCIA POLÍTICA: ",$f2[11]); crit_busq_tem("CIVIL, DERECHO: ",$f2[12]); crit_busq_tem("COMERCIAL, DERECHO: ",$f2[13]); crit_busq_tem("COMPETENCIA, DERECHO DE LA: ",$f2[15]); crit_busq_tem("CONSTITUCIONAL, DERECHO: ",$f2[17]); crit_busq_tem("CRIMINOLOGÍA: ",$f2[19]); crit_busq_tem("ECONÓMICO, DERECHO: ",$f2[22]); crit_busq_tem("EMPRESARIAL, DERECHO: ",$f2[23]); crit_busq_tem("FILOSOFÍA DEL DERECHO: ",$f2[24]); crit_busq_tem("HUMANOS, DERECHOS: ",$f2[26]); crit_busq_tem("INFORMÁTICO, DERECHO: ",$f2[28]); crit_busq_tem("INTEGRACIÓN, DERECHO DE LA: ",$f2[29]); crit_busq_tem("INTERNACIONAL PÚBLICO, DERECHO: ",$f2[30]); crit_busq_tem("MARÍTIMO, DERECHO: ",$f2[31]); crit_busq_tem("MECANISMOS ALTERNATIVOS DE RESOLUCIÓN DE CONFLICTOS: ",$f2[32]); crit_busq_tem("MEDICINA LEGAL: ",$f2[33]); crit_busq_tem("MUNICIPAL, DERECHO: ",$f2[36]); crit_busq_tem("PENAL, DERECHO: ",$f2[38]); crit_busq_tem("PENITENCIARIO, DERECHO: ",$f2[39]); crit_busq_tem("PROCESAL CIVIL, DERECHO: ",$f2[42]); crit_busq_tem("PROCESAL DEL TRABAJO, DERECHO: ",$f2[43]); crit_busq_tem("PROCESAL PENAL, DERECHO: ",$f2[44]); crit_busq_tem("REGISTRAL Y NOTARIAL, DERECHO: ",$f2[46]); crit_busq_tem("ROMANO, DERECHO: ",$f2[47]); crit_busq_tem("SEGURIDAD SOCIAL: ",$f2[48]); crit_busq_tem("SEGUROS, DERECHO DE: ",$f2[49]); crit_busq_tem("SOCIOLOGÍA DEL DERECHO: ",$f2[51]); crit_busq_tem("TELECOMUNICACIONES, DERECHO DE LAS: ",$f2[52]); crit_busq_tem("TRABAJO, DERECHO DEL: ",$f2[55]); crit_busq_tem("TRANSPORTES, DERECHO DE: ",$f2[56]); crit_busq_tem("TRIBUTARIO, DERECHO: ",$f2[57]); crit_busq("País: ",$pais); echo "
"; $hay_results = 0; if ($myrow = mysql_fetch_array($result)) { //echo ""; //echo ""; $num_resultados=0; do { if ( (compara($flag1,$myrow["f_flag1"]) || compara($flag3,$myrow["f_flag1"])) && compara($flag2,$myrow["f_flag2"]) ) { $htt="http://"; $hay_results += 1; if (strstr($myrow["t_url"],"http://")) $htt=""; $results[$num_resultados][1] = $myrow["t_nombre"]; $results[$num_resultados][2] = $myrow["t_instituc"]; $results[$num_resultados][3] = $htt.$myrow["t_url"]; $num_resultados++; //echo "
  • Nombre de la Página: "; print $myrow["t_nombre"]; echo "
    \n"; //echo "Institución: "; print $myrow["t_instituc"]; echo "
    \n"; //echo "URL: "; print $myrow["t_url"]; echo "
    \n"; //echo ""; //echo "

    "; } } while ($myrow = mysql_fetch_array($result)); } //fin if myrow return $num_resultados; } //fin if buscar else { $result1 = mysql_query("select * from portder where c_id=$id") or die(mysql_error()); $myrow = mysql_fetch_array($result1); if ($myrow) { $t_nombre = $myrow["t_nombre"]; $insti = $myrow["t_instituc"]; $t_url = $myrow["t_url"]; $pais = $myrow["t_pais"]; //llenando arreglos $max = strlen($myrow["f_flag1"]); for($i=0;$i<=32;$i++) $fa1[$i] = substr($myrow["f_flag1"],$i,1); $max = strlen($myrow["f_flag2"]); // for($i=0;$i<=$max;$i++) { $fa2[$i+1] = substr($myrow["f_flag2"],$i,1); echo "f1[";print$i;echo "]="; print $fa2[$i]; echo "
    \n";} for($i=0;$i<=$max;$i++) $fa2[$i+1] = substr($myrow["f_flag2"],$i,1); include 'form_especific.php3'; } else echo "No existe el registro seleccionado"; } //fin else } //fin de la función busqueda_esp_id ?>