Esempio n. 1
0
$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());
}
Esempio n. 3
0
		</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>&nbsp;&nbsp;<a class=\"fxsmallbutton\" href=\"req_table.php?clearCrit=true&lc_NM_TABLE=".$_REQUEST['lc_NM_TABLE']."\">". trad("REQ_clean_memFilt")."</a>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;";
	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") {
Esempio n. 6
0
// 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>
Esempio n. 8
0
$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';
Esempio n. 9
0
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)