\n";
// =============================================================================
// validation = 0
// =============================================================================
if ($validation == 0) {
//
$validation=1;
//
$correct = 1;
// Vérification qu'il n'y a pas une opération en cours sur cet emplacement
$operation = 0;
$sql = " SELECT count(operation) FROM ".DB_PREFIXE."operation ";
$sql .= " WHERE etat='actif' and emplacement=".$idx;
$operation = $f->db->getOne($sql);
$f->addToLog("app/concessionfin.php: db->getone(\"".$sql."\");", VERBOSE_MODE);
$f->isDatabaseError($operation);
//
if ($operation > 0) {
echo "
".$operation." "._("operation")."(s) "._("en")." ";
echo _("etat")." "._("actif")." -> ";
echo ""._("traitement")." "._("interdit")."";
//
$correct = 0;
}
//
echo "
\n";
} else {
// =============================================================================
// validation = 1 mise a jour [update]
// =============================================================================
// debut de transaction [beginning transaction]
$f->db->autoCommit(false);
// traitement des post_ [ Treatment post_]
$correct=true;
if (isset($_POST['dateexhumation'])){
$dateexhumation= $_POST['dateexhumation'];
}else{
$dateexhumation ="";
$correct=false;
$msg=$msg." "._("dateexhumation")." "._("vide");
}
if (isset($_POST['ossuaire'])){
$ossuaire= $_POST['ossuaire'];
}else{
$ossuaire ="";
$correct=false;
$msg=$msg." "._("ossuaire")." "._("vide");
}
if (isset($_POST['libre'])){
$libre= $_POST['libre'];
}else{
$libre ="";
$correct=false;
$msg=$msg." "._("libre")." "._("vide");
}
if ($dateexhumation<>""){
$date = explode("/", $dateexhumation);
// controle de date [date control]
if (sizeof($date) == 3 and (checkdate($date[1],$date[0],$date[2]))) {
$dateexhumation = $date[2]."-".$date[1]."-".$date[0];
}else{
$msg= $msg."
".$dateexhumation." "._("n_est_pas")." "._("date");
$correct=false;
}
}else{
$correct=false;
$msg= $msg."
"._("dateexhumation")." "._("obligatoire");
}
if ($correct==true){
// msg
$msg = _("archive")." "._("concession")." ".$idx."
";
// destruction operation défunt [delete transaction]
$sql3= "delete from ".DB_PREFIXE."operation_defunt using ".DB_PREFIXE."operation ";
$sql3 .= "where operation_defunt.operation=operation.operation ";
$sql3 .= " and operation.emplacement =". $idx;
$res3= $f -> db->query($sql3);
if (DB :: isError($res3))
echo $res3->getDebugInfo()." ".$res3->getMessage()."
";
else
echo $f -> db->affectedRows()." "._("enregistrement")." ".
_("supprime")." "._("table")." operation_defunt
" ;
// destruction operation [delete transaction]
$sql4= "delete from ".DB_PREFIXE."operation where emplacement =".$idx;
$res4= $f -> db->query($sql4);
if (DB :: isError($res4))
echo $res4->getDebugInfo()." ".$res4->getMessage()."
";
else
echo $f -> db->affectedRows()." "._("enregistrement")." ".
_("supprime")." "._("table")." operation
" ;
$valF=array();
$sql= "select * from ".DB_PREFIXE."defunt where emplacement =".$idx;
$res = $f -> db -> query($sql);
if (DB :: isError($res))
{
die($res->getMessage()."erreur ".$sql);
$verif = false;
}else{
while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){
// traitement defunt [treatment Deceased]
if($row['exhumation']=="Oui"){ // defunt exhume [Dug up deceased]
// ajout defunt en defunt archive
// [add deceased in table defunt_archive]
$valF['defunt'] = $row['defunt'];
$valF['nature'] = $row['nature'];
$valF['taille'] = $row['taille'];
$valF['emplacement'] = $row['emplacement'];
$valF['titre'] = $row['titre'];
$valF['nom'] = $row['nom'];
$valF['prenom'] = $row['prenom'];
$valF['marital'] = $row['marital'];
$valF['lieudeces'] = $row['lieudeces'];
$valF['exhumation'] = $row['exhumation'];
$valF['observation'] = $row['observation'];
$valF['reduction'] = $row['reduction'];
$valF['exhumation'] = $row['exhumation'];
if($row['datenaissance'] !=null)
$valF['datenaissance'] = $row['datenaissance'];
if($row['datedeces'] !=null)
$valF['datedeces'] = $row['datedeces'];
if($row['dateinhumation'] !=null)
$valF['dateinhumation'] = $row['dateinhumation'];
if($row['datereduction'] !=null)
$valF['datereduction'] = $row['datereduction'];
if($row['dateexhumation'] !=null)
$valF['dateexhumation'] = $row['dateexhumation'];
//
$valF['historique']= _("exhume")." "._("ancienne").
" "._("concession")." ".$idx;
// transfert defunt_archive
// [transfer deceased in archive]
$res1= $f -> db -> autoExecute(DB_PREFIXE."defunt_archive",$valF,DB_AUTOQUERY_INSERT);
if (DB :: isError($res1))
echo $res1->getDebugInfo()." ".$res1->getMessage()."
";
echo _("defunt")." ".$row['nom']." ".$row['prenom']." : ".
$f -> db->affectedRows()." "._("enregistrement")." ".
_("ajoute")." "._("table")." defunt_archive
" ;
$msg=$msg."defunt ".$row['nom']." ".$row['prenom'].
" enregistrement ".$row['defunt']." en archive_defunt
";
// destruction en defunt
// delete deceeded
$sql2= "delete from ".DB_PREFIXE."defunt where defunt =".$row['defunt'];
$res2= $f -> db->query($sql2);
if (DB :: isError($res2))
echo $res2->getDebugInfo()." ".$res2->getMessage()."
";
echo _("defunt")." ".$row['nom']." ".$row['prenom']." : ".
$f -> db->affectedRows()." "._("enregistrement")." "._("supprime").
" "._("table")." defunt
" ;
}else{// defunt non exhume [not dug up deceased]
// modifier transfert defunt en ossuaire
// [modify transfer deceased in Ossuary]
unset($valF['defunt']);
$valF['emplacement'] = $ossuaire;
$valF['historique']= _("transfere_le")." ".
$dateexhumation.
" "._("concession")." ".
$row['emplacement'];
$cle = "defunt =".$row['defunt'];
$res3= $f -> db->autoExecute(DB_PREFIXE."defunt",$valF,DB_AUTOQUERY_UPDATE,$cle);
if (DB :: isError($res3))
echo $res3->getDebugInfo()." ".$res3->getMessage()."
";
echo ' '._("defunt")." ".$row['nom']." ".$row['prenom']." ".
$f -> db->affectedRows()." "._("mis_a_jour")." "._("table")." defunt
" ;
$msg=$msg." "._('defunt')." ".$row['nom']." ".$row['prenom'].
" "._("enregistrement")." ".$row['defunt']." ".
_("mis_a_jour")." ["._("ossuaire")." n ".$ossuaire."]
";
}
}
}
// traitement courrier [mail treatement]
$valF=array();
$sql= "select * from ".DB_PREFIXE."courrier where emplacement =".$idx;
$res=$f -> db->query($sql);
if (DB :: isError($res))
{
die($res->getMessage()."erreur ".$sql);
$verif = false;
}else{
while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){
$valF['courrier'] = $row['courrier'];
$valF['destinataire'] = $row['destinataire'];
$valF['lettretype'] = $row['lettretype'];
if($row['datecourrier'] !=null)
$valF['datecourrier'] = $row['datecourrier'];
$valF['complement'] = $row['complement'];
$valF['emplacement'] = $row['emplacement'];
// transfert courrier_archive
// [transfer mail archive]
$res1= $f -> db->autoExecute(DB_PREFIXE."courrier_archive",$valF,DB_AUTOQUERY_INSERT);
if (DB :: isError($res1))
echo $res1->getDebugInfo()." ".$res1->getMessage()."
";
echo $row['lettretype']." : ".
$f -> db->affectedRows()." "._("enregistrement")." "._("ajoute").
" "._("table")." courrier_archive
" ;
$msg=$msg." ".$row['lettretype']." ".
_("enregistrement")." ".$row['courrier']." courrier_archive
";
// destruction courrier
//[delete mail]
$sql2= "delete from ".DB_PREFIXE."courrier where courrier =".$row['courrier'];
$res2= $f -> db->query($sql2);
if (DB :: isError($res2))
echo $res2->getDebugInfo()." ".$res2->getMessage()."
";
echo $row['lettretype']." : ".
$f -> db->affectedRows()." "._("enregistrement")." ".
_("supprime")." "._("table")." courrier
" ;
}
}
// traitement travaux [work treatment]
$valF=array();
$sql= "select * from ".DB_PREFIXE."travaux where emplacement =".$idx;
$res=$f -> db->query($sql);
if (DB :: isError($res))
{
die($res->getMessage()."erreur ".$sql);
$verif = false;
}else{
while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){
$valF['travaux']=$row['travaux'];
$valF['entreprise'] = $row['entreprise'];
$valF['emplacement'] = $row['emplacement'];
if($row['datedebinter'] !=null)
$valF['datedebinter'] = $row['datedebinter'];
if($row['datefininter'] !=null)
$valF['datefininter'] = $row['datefininter'];
$valF['observation'] = $row['observation'];
$valF['naturedemandeur'] = $row['naturedemandeur'];
$valF['naturetravaux'] = $row['naturetravaux'];
// transfert archive
// [transfer work archive]
$res1= $f -> db->autoExecute(DB_PREFIXE."travaux_archive",$valF,DB_AUTOQUERY_INSERT);
if (DB :: isError($res1))
echo $res1->getDebugInfo()." ".$res1->getMessage()."
";
echo $row['naturetravaux']." : ".
$f -> db->affectedRows()." "._("enregistrement")." "._("ajoute")." ".
_("table")." travaux_archive
" ;
$msg=$msg." "._("enregistrement")." ".$row['travaux']." travaux_archive
";
// destruction travaux
// delete work
$sql2= "delete from ".DB_PREFIXE."travaux where travaux =".$row['travaux'];
$res2= $f -> db->query($sql2);
if (DB :: isError($res2))
echo $res2->getDebugInfo()." ".$res2->getMessage()."
";
echo $row['naturetravaux']." : ".
$f -> db->affectedRows()." "._("enregistrement")." ".
_("supprime")." "._("table")." travaux
" ;
}
}
// traitement dossier [file treatment]
$valF=array();
$sql= "select * from ".DB_PREFIXE."dossier where emplacement =".$idx;
$res=$f -> db->query($sql);
if (DB :: isError($res))
{
die($res->getMessage()."erreur ".$sql);
$verif = false;
}else{
while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){
$valF['dossier']=$row['dossier'];
$valF['emplacement'] = $row['emplacement'];
if($row['datedossier'] !=null)
$valF['datedossier'] = $row['datedossier'];
$valF['typedossier'] = $row['typedossier'];
$valF['observation'] = $row['observation'];
$valF['fichier'] = $row['fichier'];
// transfert archive [transfer archive]
$res1= $f -> db->autoExecute(DB_PREFIXE."dossier_archive",$valF,DB_AUTOQUERY_INSERT);
if (DB :: isError($res1))
echo $res1->getDebugInfo()." ".$res1->getMessage()."
";
echo $row['fichier']." : ".
$f -> db->affectedRows()." "._("enregistrement")." "._("ajoute").
" dossier_archive
" ;
$msg=$msg.$row['fichier'].
" "._("enregistrement")." ".$row['dossier']." en dossier_archive
";
// destruction [delete]
$sql2= "delete from ".DB_PREFIXE."dossier where dossier =".$row['dossier'];
$res2= $f -> db->query($sql2);
if (DB :: isError($res2))
echo $res2->getDebugInfo()." ".$res2->getMessage()."
";
echo $row['fichier']." : ".
$f -> db->affectedRows()." "._("enregistrement")." "._("supprime")
." "._("table")." dossier
" ;
}
}
// traitement autorisation [treatment Authorization]
$valF=array();
$sql= "select * from ".DB_PREFIXE."autorisation where emplacement =".$idx;
$res = $f -> db -> query($sql);
if (DB :: isError($res))
{
die($res->getMessage()."erreur ".$sql);
$verif = false;
}else{
while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){
$valF['autorisation'] = $row['autorisation'];
$valF['emplacement'] = $row['emplacement'];
$valF['nature'] = $row['nature'];
if($row['titre'] !=null)
$valF['titre'] = $row['titre'];
$valF['nom'] = $row['nom'];
$valF['prenom'] = $row['prenom'];
$valF['marital'] = $row['marital'];
if($row['datenaissance'] !=null)
$valF['datenaissance'] = $row['datenaissance'];
$valF['adresse1'] = $row['adresse1'];
$valF['adresse2'] = $row['adresse2'];
$valF['cp'] = $row['cp'];
$valF['ville'] = $row['ville'];
$valF['telephone'] = $row['telephone'];
$valF['dcd'] = $row['dcd'];
$valF['observation'] = $row['observation'];
$valF['parente'] = $row['parente'];
// transfert autorisation_archive [transfer archive]
$res1= $f -> db -> autoExecute(DB_PREFIXE."autorisation_archive",$valF,DB_AUTOQUERY_INSERT);
if (DB :: isError($res1))
echo $res1->getDebugInfo()." ".$res1->getMessage()."
";
echo _($row['nature'])." ".$row['nom']." ".$row['prenom']." : ".
$f -> db->affectedRows()." "._("enregistrement")." "._("ajoute")." ".
_("table")." autorisation_archive
" ;
$msg=$msg.$row['nature']." ".$row['nom']." ".$row['prenom'].
" "._('enregistrement')." ".$row['autorisation']." autorisation_archive
";
// destruction [delete]
$sql2= "delete from ".DB_PREFIXE."autorisation where autorisation =".$row['autorisation'];
$res2= $f -> db->query($sql2);
if (DB :: isError($res2))
echo $res2->getDebugInfo()." ".$res2->getMessage()."
";
echo _($row['nature'])." ".$row['nom']." ".$row['prenom']." : ".
$f -> db->affectedRows()." "._("supprime")." "._("table")." autorisation
" ;
}
}
// traitement de la concession [concession treatment]
// concession
$valF=array();
$sql= "select * from ".DB_PREFIXE."emplacement where emplacement =".$idx;
$res=$f -> db->query($sql);
if (DB :: isError($res))
{
die($res->getMessage()."erreur ".$sql);
$verif = false;
}else{
while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){
$valF['emplacement'] = $row['emplacement'];
$valF['nature'] = $row['nature'];
$valF['numero'] = $row['numero'];
$valF['complement'] = $row['complement'];
$valF['voie'] = $row['voie'];
$valF['numerocadastre'] = $row['numerocadastre'];
$valF['famille'] = $row['famille'];
$valF['numeroacte'] = $row['numeroacte'];
if($row['datevente'] !=null)
$valF['datevente'] = $row['datevente'];
$valF['terme'] = $row['terme'];
if($row['duree'] !=null or $row['duree'] != "")
$valF['duree'] = $row['duree'];
if($row['dateterme'] !=null or $row['dateterme'] != "")
$valF['dateterme'] = $row['dateterme'];
if($row['nombreplace'] !=null or $row['nombreplace'] != "")
$valF['nombreplace'] = $row['nombreplace'];
if($row['placeoccupe'] !=null or $row['placeoccupe'] != "")
$valF['placeoccupe'] = $row['placeoccupe'];
if($row['superficie'] !=null or $row['superficie'] != "")
$valF['superficie'] = $row['superficie'];
if($row['placeconstat'] !=null or $row['placeconstat'] != "")
$valF['placeconstat'] = $row['placeconstat'];
if($row['dateconstat'] !=null)
$valF['dateconstat'] = $row['dateconstat'];
$valF['observation'] = $row['observation'];
if($row['positionx'] !=null or $row['positionx'] != "")
$valF['positionx'] = $row['positionx'];
if($row['positiony'] !=null or $row['positiony'] != "")
$valF['positiony'] = $row['positiony'];
$valF['photo'] = $row['photo'];
if($row['plans'] !=null)
$valF['plans'] = $row['plans'];
if($row['sepulturetype'] !=null)
$valF['sepulturetype'] = $row['sepulturetype'];
// transfert archive [transfer archive ]
$res1= $f -> db->autoExecute(DB_PREFIXE."emplacement_archive",$valF,DB_AUTOQUERY_INSERT);
if (DB :: isError($res1))
echo $res1->getDebugInfo()." ".$res1->getMessage()."
";
echo $row['famille']." : ".
$f -> db->affectedRows()." "._("enregistrement")." ".
_("ajoute")." "._("table")." emplacement_archive
" ;
$msg=$msg." "._("concession")." ".$row['famille'].
" "._("enregistrement")." ".$row['emplacement']." emplacement_archive
";
// destruction [delete concession]
$sql2= "delete from ".DB_PREFIXE."emplacement where emplacement =".$row['emplacement'];
$res2= $f -> db->query($sql2);
if (DB :: isError($res2))
echo $res2->getDebugInfo()." ".$res2->getMessage()."
";
echo $row['famille']." : ".
$f -> db->affectedRows()." "._("enregistrement")." "._("supprime").
" "._("table")." emplacement
" ;
if($libre=='Oui') {
$valG['emplacement'] = $f -> db->nextId(DB_PREFIXE.'emplacement');
$valG['famille']= _('emplacement')." "._('libre');
$valG['libre']='Oui';
$valG['nature'] = $row['nature'];
$valG['numero'] = $row['numero'];
$valG['complement'] = $row['complement'];
$valG['voie'] = $row['voie'];
$valG['numerocadastre'] = $row['numerocadastre'];
$valG['superficie'] = $row['superficie'];
$valG['nombreplace'] = $row['nombreplace'];
$valG['positionx'] = $row['positionx'];
$valG['positiony'] = $row['positiony'];
$valG['photo'] = $row['photo'];
$valG['plans'] = $row['plans'];
if ($valG['plans'] == "") {
$valG['plans'] = NULL;
}
// mise a niveau sig
if($row['geom']!='')
$valG['geom'] = $row['geom'];
$res3= $f -> db->autoExecute(DB_PREFIXE."emplacement",$valG,DB_AUTOQUERY_INSERT);
if (DB :: isError($res3))
echo $res3->getDebugInfo()." ".$res3->getMessage()."
";
echo " "._("emplacement")." ".$valG['emplacement']." "._("libre")." ".
$f -> db->affectedRows()." "._("ajoute").
" "._("table")." emplacement
" ;
$msg=$msg." "._("emplacement")." "._("libre").
" n ".$valG['emplacement']." "._("ajoute")."
";
}
}
}
/*
* traitement qui est en relation avec defunt et qui empeche
* la suppression de defunt.
* est ce interessant d archiver les operations pour des
* concessions terminées ?
* /
// traitement opérations [transaction treatment]
$valF=array();
$sql= "select * from ".DB_PREFIXE."operation where emplacement =".$idx;
$res=$f -> db->query($sql);
if (DB :: isError($res)) {
$verif = false;
die($res->getMessage()."erreur ".$sql);
}else{
while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){
$valF['operation']=$row['operation'];
$valF['numdossier'] = $row['numdossier'];
if($row['date'] !=null)
$valF['date'] = $row['date'];
if($row['heure'] !=null)
$valF['heure'] = $row['heure'];
$valF['emplacement'] = $row['emplacement'];
$valF['societe_coordonnee'] = $row['societe_coordonnee'];
$valF['pf_coordonnee'] = $row['pf_coordonnee'];
$valF['etat'] = $row['etat'];
$valF['categorie'] = $row['categorie'];
$valF['particulier'] = $row['particulier'];
if($row['emplacement_transfert'] !=null)
$valF['emplacement_transfert'] = $row['emplacement_transfert'];
$valF['observation'] = $row['observation'];
// archivage opération
$res1= $f -> db->autoExecute(DB_PREFIXE."operation_archive",$valF,DB_AUTOQUERY_INSERT);
if (DB :: isError($res1))
echo $res1->getDebugInfo()." ".$res1->getMessage()."
";
echo $f -> db->affectedRows()." "._("enregistrement")." "._("ajoute")." ".
_("table")." operation_archive
" ;
$msg=$msg._("enregistrement")." ".$row['operation']." operation_archive
";
// archivage opération défunt
$valF2=array();
$sql2= "select * from ".DB_PREFIXE."operation_defunt where operation =".$row['operation'];
$res2=$f -> db->query($sql2);
if (DB :: isError($res2)) {
$verif = false;
die($res2->getMessage()."erreur ".$sql2);
}else{
while ($row2=& $res2->fetchRow(DB_FETCHMODE_ASSOC)){
$valF2['operation_defunt']=$row2['operation_defunt'];
$valF2['operation'] = $row2['operation'];
if($row2['defunt'] !=null)
$valF2['defunt'] = $row2['defunt'];
if($row2['defunt_titre'] !=null)
$valF2['defunt_titre'] = $row2['defunt_titre'];
$valF2['defunt_nom'] = $row2['defunt_nom'];
$valF2['defunt_marital'] = $row2['defunt_marital'];
$valF2['defunt_prenom'] = $row2['defunt_prenom'];
if($row2['defunt_datenaissance'] !=null)
$valF2['defunt_datenaissance'] = $row2['defunt_datenaissance'];
if($row2['defunt_datedeces'] !=null)
$valF2['defunt_datedeces'] = $row2['defunt_datedeces'];
$valF2['defunt_lieudeces'] = $row2['defunt_lieudeces'];
$valF2['defunt_nature'] = $row2['defunt_nature'];
// transfert archive
$res1= $f -> db->autoExecute(DB_PREFIXE."operation_defunt_archive",$valF2,DB_AUTOQUERY_INSERT);
if (DB :: isError($res1))
echo $res1->getDebugInfo()." ".$res1->getMessage()."
";
echo $f -> db->affectedRows()." "._("enregistrement")." "._("ajoute")." ".
_("table")." operation_defunt_archive
" ;
$msg=$msg._("enregistrement")." ".$row2['operation']." operation_defunt_archive
";
// destruction operation défunt [delete transaction]
$sql3= "delete from ".DB_PREFIXE."operation_defunt where operation =".$row2['operation'];
$res3= $f -> db->query($sql3);
if (DB :: isError($res3))
echo $res3->getDebugInfo()." ".$res3->getMessage()."
";
echo $f -> db->affectedRows()." "._("enregistrement")." ".
_("supprime")." "._("table")." operation_defunt
" ;
}
}
// destruction operation [delete transaction]
$sql4= "delete from ".DB_PREFIXE."operation where operation =".$row['operation'];
$res4= $f -> db->query($sql4);
if (DB :: isError($res4))
echo $res4->getDebugInfo()." ".$res4->getMessage()."
";
echo $f -> db->affectedRows()." "._("enregistrement")." ".
_("supprime")." "._("table")." operation
" ;
}
}
*/
// enregistrement $msg en /tmp [record of the file in directory /tmp]
$aff="concessionfin"; // ***
$fichier = "../tmp/".$aff."_".date("dmy_Gis").".htm";
$inf = fopen($fichier,"w");
$ent= date("d/m/Y G:i:s").
"
No "._("collectivite")." : ".$_SESSION['coll'].
"
"._("utilisateur")." : ".$_SESSION['login']."
".
"=========================================="."
";
$msg=$ent."
".$msg ;
fwrite($inf,$msg);
fclose($inf);
// *****************************************************************
} else {
echo _("dateexhumation")." "._("non_remplie");
}
// fin de transaction [end transaction]
$f->db->commit();
}
//
echo "\n";
echo "
\n";
echo "