$usercid = RecupLib("users", "login", "user_id", $_SESSION['me']); $booluscreaconnect = $tbValChp['parcours_uscrea'] == $usercid || $_SESSION['admin']; // bouton edition affich� if ($booluscreaconnect && !$_REQUEST['editpc']) { $tb_infparc .= '<input id="edithid" type="hidden" name="editpc" value=""> <input type="submit" onclick="document.getElementById(\'edithid\').value=\'true\'; document.f.submit()" class="redbutton" name="toto" value="!! MODIFIER LES ATTRIBUTS DE CE PARCOURS !!"/>'; } $tb_infparc .= '<TABLE class="table">'; $tb_infparc .= '<thead><th>Attribut</th><th>Valeur</th></thead>'; // Cr�tion et Initialisation des propri�� des objets PYAobj $reqLChp = "SELECT NM_CHAMP from {$TBDname} where NM_TABLE='parcours' AND NM_CHAMP!='{$NmChDT}' AND (TYPEAFF!='HID' OR (TT_PDTMAJ!='' AND TT_PDTMAJ!= NULL)) ORDER BY ORDAFF, LIBELLE"; $rq1 = db_query($reqLChp) or die("req 2 invalide"); //foreach ($ECT as $PYAObj) { while ($CcChp = db_fetch_row($rq1)) { // boucles sur les champs $PYAObj = new PYAobj(); $PYAObj->NmBase = $dbname; $PYAObj->NmTable = "parcours"; $NM_CHAMP = $CcChp[0]; $PYAObj->NmChamp = $NM_CHAMP; if (!$_REQUEST['editpc']) { $PYAObj->TypEdit = "C"; } // en consultation seule si on a pas appel�l'�ition $PYAObj->InitPO(); if ($PYAObj->TypeAff == "POPL") { $poplex = true; } // s'il existe au moins une edition en popup li� $PYAObj->DirEcho = false; $PYAObj->ValChp = $tbValChp[$NM_CHAMP];
function PYATableMAJ($DB,$table,$typedit,$tbKeys=array()) { // construction du set, necessite uniquement le nom du champ .. $rq1=db_query("SELECT * from DESC_TABLES where NM_TABLE='$table' AND NM_CHAMP!='TABLE0COMM' AND (TYPEAFF!='HID' OR ( TT_PDTMAJ!='' AND TT_PDTMAJ!= NULL)) ORDER BY ORDAFF, LIBELLE"); $key = implode("_",$tbKeys)."_"; $tbset = array(); $tbWhK = array(); while ($res1 = db_fetch_array($rq1)) { $PYAoMAJ=new PYAobj(); // recréée l'objet pour RAZ ses propriétés !!! $PYAoMAJ->NmBase=$DB; $PYAoMAJ->NmTable=$table; $PYAoMAJ->TypEdit=$typedit; if (MaxFileSize>0) $PYAoMAJ->MaxFSize=MaxFileSize; $NOMC = $res1['NM_CHAMP']; // nom variable=nom du champ $PYAoMAJ->NmChamp = $NOMC; $PYAoMAJ->InitPO($_REQUEST[$NOMC],$res1); // init l'objet, sa valeur, lui passe le tableau d'infos du champ pr éviter une requete suppl. if (array_key_exists($NOMC,$tbKeys)) { $tbWhK = array_merge($tbWhK,$PYAoMAJ->RetSet($key."_",true)); } $PYAoMAJ->ValChp=$_REQUEST[$NOMC]; // sinon en new ca bugue if ($PYAoMAJ->TypeAff=="FICFOT") { if ($_FILES[$NOMC]['name']!="" && $_FILES[$NOMC]['error']!="0") { $error=$_FILES[$NOMC]['error']; $err_lbl="Erreur sur le champ $NOMC de type http"; } $PYAoMAJ->ValChp=($_FILES[$NOMC]['tmp_name']!="" ? $_FILES[$NOMC]['tmp_name'] : $PYAoMAJ->ValChp); $PYAoMAJ->Fok=$_REQUEST["Fok".$NOMC]; $PYAoMAJ->Fname=$_FILES[$NOMC]['name']; $PYAoMAJ->Fsize=$_FILES[$NOMC]['size']; $PYAoMAJ->OFN=$_REQUEST["Old".$NOMC]; // recup infos pour les pj dans le mail $size=($PYAoMAJ->Fsize >0 ? " (".round($PYAoMAJ->Fsize / 1000)."Ko) " : ""); $chemfich="http://".$_SERVER["SERVER_NAME"].str_replace(basename($_SERVER['SCRIPT_NAME']),"",$_SERVER['SCRIPT_NAME']).$PYAoMAJ->Valeurs; $fich=($PYAoMAJ->Fname != "" ? $key."_".$PYAoMAJ->Fname : $PYAoMAJ->ValChp); } $tbset=array_merge($tbset,$PYAoMAJ->RetSet($key."_",true)); // key sert �la gestion des fichiers li� if ($PYAoMAJ->error) { $error=true; $err_lbl="Erreur sur le champ $NOMC genree par pya :".$PYAoMAJ->error; $PYAoMAJ->error=""; } } // fin boucle sur les champs if (count($tbWhK)>0) { foreach ($tbWhK as $chp=>$val) $lchp[]=$chp."=$val"; $where= " where ".implode(" AND ",$lchp); } // GROS BUG $where=" where ".$key.($where_sup=="" ? "" : " and $where_sup"); //echovar("_REQUEST['typeditrcr']"); if ($typedit=="M") { // UPDATE $strqaj="UPDATE $table SET ".tbset2set($tbset)." $where"; } elseif ($typedit==-1) { // SUPPRESSION $strqaj="DELETE FROM $table $where"; } elseif ($typedit=="N") { //INSERTION $strqaj="INSERT INTO $table ".tbset2insert($tbset)." ON DUPLICATE KEY UPDATE ".tbset2set($tbset); } // echo "requete sql: $strqaj"; db_query($strqaj); if ($typedit == "N") return(mysql_insert_id()); }
</tr> </table> </div> <div id="modules" align="left"> <form action="rcf_rech.php" name="theform" method="post"> <table width="780" border="0" align="left" cellpadding="0" cellspacing="0"> <tr> <td width="230" align="center" valign="top"><? EchoTitIm1(nbsp(7)."Recherche Libre".nbsp(7),"_b");?> <table width="210" align="center" style="color: #990033"> <? $ss_prmev[ro]="C"; // consultation par défaut $ss_prmev[typers]="I"; // I (interne sans infos DRH) session_register("ss_prmev"); $FCobj=new PYAobj(); $FCobj->NmBase=$DBDRHName; $FCobj->NmTable="PERSONNE"; $FCobj->NmChamp="PER_LLNOMPERS"; DispLigReq(); $FCobj->NmChamp="PER_LLPRENOMPERS"; DispLigReq(); $FCobj->NmChamp="DRH_NUUNITE"; $FCobj->NmTable="INFOS_DRH"; //DispLigReq(); $FCobj->InitPO(); // initialise l'objet echo "<tr><td colspan=\"2\">\n";
} } else { // req custom echo "<H1>".trad("REQ_crit_req_cust").$_SESSION["reqcust_name"]."</H1>"; echo "<p> <a class=\"fxsmallbutton\" href=\"req_table.php?clearCrit=true&lc_NM_TABLE=".$_REQUEST['lc_NM_TABLE']."\">". trad("REQ_clean_memFilt")."</a> "; if ($_REQUEST['clearCrit']) unset($_SESSION['memFilt']); ?></P> <input type="hidden" name="lc_NM_TABLE" value="__reqcust"> <input type="hidden" name="lc_reqcust" value="<?php echo $reqcust; ?> "> <TABLE> <TR class="THEAD"> <TH>Paramètre</TH><TH>Valeur</TH><TH>Commentaire</TH></TR> <? $FCobj=new PYAobj(); $FCobj->NmBase=$DBName; $nolig=0; foreach ($tbargscust as $arg) { $tbpropPya = hash_explode($arg); $nolig++; // pour l'instant on traite que le cas des filtres PYAObj $FCobj->NmTable = $tbpropPya['NmTable']; $FCobj->NmChamp = $tbpropPya['NmChamp']; $tblvarrqc[] = $tbpropPya['NmChamp']; $FCobj->InitPO(); echo "<TR class=\"".($nolig % 2==1 ? "backwhiten" : "backredc")."\"><TD><B>$FCobj->Libelle</B><BR><small>$FCobj->Comment</small></TD><TD>"; $FCobj->EchoFilt(); echo '<input type="hidden" name="nvc_'.$tbpropPya['NmChamp'].'" value="'.$nolig.'">'; echo "</TD><TD>"; $FCobj->EchoCSA();
$nmchp = mysql_fetch_row($rqkc); $keycopy = $keycopy . "_" . ${$nmchp}[0] . "_"; // VALEUR du deuxieme champ } } // fin si pas session pgsql // echo "Keycopy: $keycopy <BR>"; } // fin s'il y a au moins un champ fichier attach� } // fin si autre que modif // construction du set, necessite uniquement le nom du champ .. $rq1 = msq("SELECT NM_CHAMP from {$TBDname} where NM_TABLE='{$NM_TABLE}' AND NM_CHAMP!='{$NmChDT}' AND (TYPEAFF!='HID' OR TYPEAFF!='' OR ( TT_PDTMAJ!='' AND TT_PDTMAJ!= NULL)) ORDER BY ORDAFF, LIBELLE"); $tbset = array(); while ($res1 = db_fetch_row($rq1)) { $PYAoMAJ = new PYAobj(); // recréée l'objet pour RAZ ses propriétés !!! $PYAoMAJ->NmBase = $DBName; $PYAoMAJ->NmTable = $NM_TABLE; $PYAoMAJ->TypEdit = $_REQUEST['modif']; $NOMC = $res1[0]; // nom variable=nom du champ $PYAoMAJ->NmChamp = $NOMC; $PYAoMAJ->InitPO(); $PYAoMAJ->ValChp = $_REQUEST[$NOMC]; // issu du formulaire if ($PYAoMAJ->TypeAff == "HR_MN") { $NOMC_mn = $NOMC . "_mn"; $NOMC_hr = $NOMC . "_mn"; $PYAoMAJ->ValChp = ${$NOMC_mn} + ${$NOMC_hr} * 100; } elseif ($PYAoMAJ->TypeAff == "FICFOT") {
// clé de copie du logo et du plan d'accès if ($modif=="") { // création // récupération de la clé $rpnusoc=msq("SELECT SOC_NUSOCIE from SOCIETE order by SOC_NUSOCIE DESC LIMIT 1"); $rp2=mysql_fetch_row($rpnusoc); $SOC_NUSOCIE=$rp2[0]+1; } $keycopy=$SOC_NUSOCIE."_"; $NM_TABLE="SOCIETE"; // construction du set $rq1=msq("SELECT NM_CHAMP from $TBDRHname where NM_TABLE='$NM_TABLE' AND NM_CHAMP!='$NmChDRHT' ORDER BY ORDAFF, LIBELLE"); $PYAoMAJ=new PYAobj(); $PYAoMAJ->NmBase=$DBDRHName; $PYAoMAJ->NmTable=$NM_TABLE; $PYAoMAJ->TypEdit=$modif; while ($res1=mysql_fetch_array($rq1)) { $NOMC=$res1[NM_CHAMP]; // nom variable=nom du champ $PYAoMAJ->NmChamp=$NOMC; $PYAoMAJ->InitPO(); $PYAoMAJ->ValChp=$$NOMC; // issu du formulaire if ($PYAoMAJ->TypeAff=="FICFOT") { $VarFok="Fok".$NOMC; $PYAoMAJ->Fok=$$VarFok; $VarFname=$NOMC."_name";
<pre> $tPO=new PYAobj(); // propriétés de base $tPO->NmBase="BOUTIQUE"; $tPO->NmTable="ARTICLE"; $tPO->NmChamp="art_coedit"; // valeur du champ $tPO->ValChp="ONF"; // appelle la méthode d'init des autres $tPO->InitPO(); Le champ en question est un champ lié à un autre... <? // instancie un nouvel objet $tPO=new PYAobj(); // propriétés de base $tPO->NmBase=$NM_BASE; $tPO->NmTable="ARTICLE"; $tPO->NmChamp="art_coedit"; // initialise les autres $tPO->InitPO(); // valeur du champ $tPO->ValChp="ONF"; ?> La liaison en question est définie par <?php echo $tPO->Valeurs; ?> </pre>
$nolig = 0; $db->query('SELECT `NM_CHAMP` from `DESC_TABLES` WHERE NM_TABLE="ENTITES" AND NM_CHAMP!="TABLE0COMM" AND (`NM_CHAMP`="CATEGORIES_CAT_ID" OR `NM_CHAMP`="ENT_RAISONSOCIAL" OR `NM_CHAMP`="ENT_NOMINATION" OR `NM_CHAMP`="ENT_CONAF" OR `NM_CHAMP`="ENT_VILLE" OR `NM_CHAMP`="ENT_CODEPOSTAL" OR `NM_CHAMP`="ENT_PAYS" OR `NM_CHAMP`="ENT_REGION" OR `NM_CHAMP`="ENT_MOTCLES") ORDER BY ORDAFF, LIBELLE'); while ($res = $db->fetch_array()) { $nolig++; $FCobj->NmChamp = $res['NM_CHAMP']; $FCobj->InitPO(); $FCobj->DirEcho = false; $tmp .= "<TR><TD><B>{$FCobj->Libelle}</B><BR></TD><TD>"; $tmp .= $FCobj->EchoFilt(false); $tmp .= "</TD></TR>"; } $tpl->set_var('formulaire_entites', $tmp); // RECHERCHE PERSONNES // -------------------------------- unset($tmp, $FCobj, $res); $FCobj = new PYAobj(); $FCobj->NmTable = 'PERSONNES'; $FCobj->NmBase = $DBName; $db->query('SELECT `NM_CHAMP` from `DESC_TABLES` WHERE NM_TABLE="PERSONNES" AND NM_CHAMP!="TABLE0COMM" AND ( `NM_CHAMP`="PER_TITRE" OR `NM_CHAMP`="PER_NOM" OR `NM_CHAMP`="PER_PRENOM" OR `NM_CHAMP`="PER_VILLE" OR `NM_CHAMP`="PER_CODEPOSTAL" OR `NM_CHAMP`="PER_PAYS" OR `NM_CHAMP`="PER_REGION" ) ORDER BY ORDAFF, LIBELLE'); while ($res = $db->fetch_array()) { $FCobj->NmChamp = $res['NM_CHAMP']; $FCobj->InitPO(); $FCobj->DirEcho = false; $tmp .= "<TR><TD><B>{$FCobj->Libelle}</B><BR></TD><TD>"; $tmp .= $FCobj->EchoFilt(false); $tmp .= "</TD></TR>"; } $tpl->set_var('formulaire_personnes', $tmp); $tpl->parse('FileOut', 'FileRef'); // ###################################################################### include 'FOOTER.php';
include "setup.php"; ?> <h2>Bienvenue sur la page d'importation directe de fichiers de tracés ou points</h2> <form method="post" action="admin-import.php"> <b>id de marquage de l'import <input type="text" name="marqimp" value="<?php echo date("dmy"); ?> "></b> <h3>Actions disponibles:</h3> <h4>Import de fichiers trk ou wpt (CartoExplorer)</h4> Sélectionner une discpline dans la liste :<br/> <?php // nouvel objet pour sélection liste déroulante disciplines $ObjSeLD = new PYAobj(); $ObjSeLD->NmBase = $dbname; $ObjSeLD->NmTable = "parcours"; $ObjSeLD->NmChamp = "parcours_discp"; $ObjSeLD->InitPO(); $tabLD = ttChpLink($ObjSeLD->Valeurs); $tabLD = array(0 => "Aucun") + $tabLD; DispLD($tabLD, "LDCats", "no", ""); ?> Sélectionner le fichier à importer : <input type="file" name="ce3file"><BR/> <input type="radio" name="actionname" value="impce3file">Import Fichier CE3<BR/> <hr/> <h4>Import du SIG Régional en shp</h4> Opérations à réaliser pour un import Kayak du SIG Regional:<br><pre> - Supprimer la table temporaire zimptmp_parc_kk (plus obligé si option -d passé à shp2pgsql)