include('mysql.php');
include('_stats.php');
$table="notaires";
$table="notcaran";
function romain ($v) {
$a="";
$rom=array();
$rom{'I'}=1;
$rom{'V'}=5;
$rom{'X'}=10;
$rom{'L'}=50;
$rom{'C'}=100;
$r="XCXLIXIVII";
while ($v>0) {
$cc=$rom{substr($r,1,1)};
$cn=$rom{substr($r,0,1)};
//print "$v + $cn > $cc / $a / $r
\n";
if ($v>=$cc) {
$a .= substr($r,1,1);
$v -= $cc;
}
else if ($v+$cn>=$cc) {
$a .= substr($r,0,2);
$v -= $cc-$cn;
}
else $r=substr($r,2);
}
return($a);
}
function Alias($s) {
$s = str_replace("à", "a", $s);
$s = str_replace("â", "a", $s);
$s = str_replace("ä", "a", $s);
$s = str_replace("ë", "e", $s);
$s = str_replace("è", "e", $s);
$s = str_replace("é", "e", $s);
$s = str_replace("ê", "e", $s);
$s = str_replace("à", "e", $s);
$s = str_replace("â", "a", $s);
$s = str_replace("ä", "a", $s);
$s = str_replace("ï", "i", $s);
$s = str_replace("î", "i", $s);
$s = str_replace("ö", "o", $s);
$s = str_replace("ô", "o", $s);
$s = str_replace("ù", "u", $s);
$s = str_replace("ü", "u", $s);
$s = str_replace("û", "u", $s);
$s = str_replace("ç", "c", $s);
return $s;
}
$et=$_REQUEST["et"];
$nom=$_REQUEST["nom"];
$adr=$_REQUEST["adr"];
$fam=$_REQUEST["fam"];
$dat=$_REQUEST["dat"];
$PHP_SELF=$_SERVER['PHP_SELF'];
$nom = urldecode($nom);// retrait des caractères spéciaux pour l'encodage HTML
$snom = strtolower(Alias($nom)); // retrait des accents
$sadr = strtolower(Alias($adr)); // retrait des accents
$sfam = strtolower(Alias($fam)); // retrait des accents
$maxres1=$maxres+1;
$etpre="Adresse / Remarques";
$req = "select * from $table where (";
if (isset($et)) {
$n=$et-1;
$romet = romain($n);
$etpre="$romet ";
$n=$et+1;
$romet = romain($n);
$etsui=" $romet";
$req .= "etude = $et";
$romet = romain($et);
$etpre.=" Etude $romet :";
print "
Etude $romet";
$contien="Etude $et inconnue";
if (isset($dat) && $dat>1400) $req .= " and exedeb <= $dat and exefin >= $dat";
$req .= ") order by class,Ydeb,liadeb,exedeb,exefin,notnom LIMIT 0 , $maxres1";
}
else if (strlen($snom)>1) { // 2 caractères minimum
print "Notaires de Paris";
// $req .= "notnom like '";
$req .= "notnom regexp '";
$contien="Aucun notaire dont le nom ";
if (ereg('^\((.*)',$snom,$rex)) {
$req .= "^";
if (ereg('(.*)(\))$',$rex[1],$reg)) {
$contien.="est ".$reg[1];
$snom=$reg[1];
$snom = str_replace('e','[eéèëê]',$snom);
$snom = str_replace('a','[aàâä]',$snom);
$snom = str_replace('i','[iîï]',$snom);
$snom = str_replace('o','[oôö]',$snom);
$snom = str_replace('u','[uùûü]',$snom);
$snom = str_replace('y','[yÿ]',$snom);
$req .= $snom."$'";
}
else {
$contien.="commence par ".$rex[1];
// $req .= $rex[1].'%';
$snom=$rex[1];
$snom = str_replace('e','[eéèëê]',$snom);
$snom = str_replace('a','[aàâä]',$snom);
$snom = str_replace('i','[iîï]',$snom);
$snom = str_replace('o','[oôö]',$snom);
$snom = str_replace('u','[uùûü]',$snom);
$snom = str_replace('y','[yÿ]',$snom);
$req .= $snom."'";
}
}
else {
// $req .= '%';
if (ereg('(.*)(\))$',$snom,$reg)) {
$contien.="se termine par ".$reg[1];
$snom=$reg[1];
$snom = str_replace('e','[eéèëê]',$snom);
$snom = str_replace('a','[aàâä]',$snom);
$snom = str_replace('i','[iîï]',$snom);
$snom = str_replace('o','[oôö]',$snom);
$snom = str_replace('u','[uùûü]',$snom);
$snom = str_replace('y','[yÿ]',$snom);
$req .= $snom."$'";
}
else {
$contien.="contient ".$snom;
// $req .= $snom."%'";
// $ini=substr($snom,0,1);
// $snom = '['.$ini.strtoupper($ini).']'.substr($snom,1);
$snom = str_replace('e','[eéèëê]',$snom);
$snom = str_replace('a','[aàâä]',$snom);
$snom = str_replace('i','[iîï]',$snom);
$snom = str_replace('o','[oôö]',$snom);
$snom = str_replace('u','[uùûü]',$snom);
$snom = str_replace('y','[yÿ]',$snom);
$req .= $snom."'";
}
}
if (isset($dat)) {
if ($dat>1400) $req .= " and exedeb <= $dat and exefin >= $dat";
$dat1=10*$dat-5;
$dat2=10*$dat+5;
if ($dat<220 && $dat>150) $req .= " and exedeb <= $dat1 and exefin >= $dat2";
}
$req .= ") order by Ydeb,liadeb,exedeb LIMIT 0 , $maxres1";
}
else if (strlen($sadr)>3) { // 4 caractères minimum
print "Notaires de Paris";
// $req .= "notadr like '";
$req .= "notadr regexp '";
$contien="Aucun notaire situé '".$sadr."'";
if (ereg('^\((.*)',$sadr,$rex)) {
$req .= "^";
if (ereg('(.*)(\))$',$rex[1],$reg)) {
// $req .= $reg[1];
$snom=$reg[1];
$snom = str_replace('e','[eéèëê]',$snom);
$snom = str_replace('a','[aàâä]',$snom);
$snom = str_replace('i','[iîï]',$snom);
$snom = str_replace('o','[oôö]',$snom);
$snom = str_replace('u','[uùûü]',$snom);
$req .= $snom."$'";
}
else {
// $req .= $rex[1].'%';
$snom=$rex[1];
$snom = str_replace('e','[eéèëê]',$snom);
$snom = str_replace('a','[aàâä]',$snom);
$snom = str_replace('i','[iîï]',$snom);
$snom = str_replace('o','[oôö]',$snom);
$snom = str_replace('u','[uùûü]',$snom);
$req .= $snom."'";
}
}
else {
// $req .= '%';
if (ereg('(.*)(\))$',$sadr,$reg)) {
$snom=$reg[1];
$snom = str_replace('e','[eéèëê]',$snom);
$snom = str_replace('a','[aàâä]',$snom);
$snom = str_replace('i','[iîï]',$snom);
$snom = str_replace('o','[oôö]',$snom);
$snom = str_replace('u','[uùûü]',$snom);
$req .= $snom."$'";
}
else {
$snom = str_replace('e','[eéèëê]',$sadr);
$snom = str_replace('a','[aàâä]',$snom);
$snom = str_replace('i','[iîï]',$snom);
$snom = str_replace('o','[oôö]',$snom);
$snom = str_replace('u','[uùûü]',$snom);
$req .= $snom."'";
}
}
if (isset($_POST["dat"])) {
$dat=$_POST["dat"];
if ($dat>1400) $req .= " and exedeb <= $dat and exefin >= $dat";
$dat1=10*$dat-5;
$dat2=10*$dat+5;
if ($dat<220 && $dat>150) $req .= " and exedeb <= $dat2 and exefin >= $dat1";
}
$req .= ") order by etude,Ydeb,liadeb,exedeb LIMIT 0 , $maxres1";
}
else if (strlen($sfam)>3) { // 4 caractères minimum
print "Notaires de Paris";
// $req .= "notadr like '";
$req .= "geneal regexp '$sfam'";
$contien="Aucun notaire avec '".$sfam."'";
$req .= ") order by etude,Ydeb,liadeb,exedeb LIMIT 0 , $maxres1";
}
else $req.= "notnom like 'doy%') order by etude,liadeb";
$result = query_exec($sql_id, $req);
print "
";
// contenu de la page
if (query_numrows($result) > 0) {
if ((query_numrows($result) > $maxres)&& (!isset($et))) {
print "plus de $maxres résultats
";
}
else {
$pai=0;
print "
| Étude / Office | Notaire Nom (Prénom) |
Dates | Liasses | $etpre $etsui |
\n";
for($i=0; $i < query_numrows($result);$i++) {
$row = query_fetch_row($result,$i);
if ($row[0]==0) continue;
$bgp='f8ddf8';
if ($pai) $bgp='ddf8f8';
$pai=1-$pai;
$deu='';
$adrstyl='class=adr';
$nbadr=0;
if (strlen($row[12])) {
$nbadr++;
if (strpos($row[12],"|")) $nbadr++;
$row[12]=str_replace("|", "
",$row[12]);
}
if (strlen($row[10])) {
$nbadr++;
if (strpos($row[10],"|")) $nbadr++;
$adr=str_replace("|", "
",$row[10]);
if (strlen($row[12])) {
$deu=' rowspan=2';
}
}
else
{
$adrstyl='class=rem';
$adr="$row[12]";
}
$et=$row[0];
$etr=romain($et);
$etu="RE/$etr/$row[4]";
if ($nbadr>1) $etu.="
RE/$etr/$row[5]";
if ($et>=200) $etu="Off.".sprintf("%d",$et-200)."";
$not=str_replace("/", " / ",$row[2])." (".$row[3].")";
$exe=$row[8]."-".$row[9];
//$trac=$row[6]."#".$row[7]."#".$row[13];
if ($row[7]==0) { $row[6]=" "; $row[7]=" ";
// $row[7]=$trac;
}
if ($et<200) {
$liadeb = $row[6];
$liafin = $row[7];
}
else {
$liadeb = "Y//".$row[15];
$liafin = "Y//".$row[16];
}
$ref="MC://ET/$etr/$row[8] $not $exe";
if (strlen($et)==0) $etu="$etu";
print "
| $etu |
$not |
$exe |
$liadeb | $liafin | $adr |
\n";
if ($deu) print "
| $row[12] |
\n";
}
print "
\n";
}
}
else {
print "$contien ";
if (isset($dat) && $dat>1500) print "exerçant en $dat";
print "
$req";
print "
";
}
include "chform.htm";
?>