2003-08-04 14:42:49 +02:00
< ? PHP
2004-01-30 12:00:57 +01:00
/* Copyright ( C ) 2001 - 2004 Rodolphe Quiedeville < rodolphe @ quiedeville . org >
2004-02-02 04:14:29 +01:00
* Copyright ( C ) 2004 Laurent Destailleur < eldy @ users . sourceforge . net >
2003-08-04 14:42:49 +02:00
*
* This program is free software ; you can redistribute it and / or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation ; either version 2 of the License , or
* ( at your option ) any later version .
*
* This program is distributed in the hope that it will be useful ,
* but WITHOUT ANY WARRANTY ; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE . See the
* GNU General Public License for more details .
*
* You should have received a copy of the GNU General Public License
* along with this program ; if not , write to the Free Software
* Foundation , Inc . , 59 Temple Place - Suite 330 , Boston , MA 02111 - 1307 , USA .
*
* $Id $
* $Source $
*
*/
2003-09-11 22:18:51 +02:00
require ( " ./pre.inc.php " );
require ( " ../contact.class.php " );
2004-02-02 04:14:29 +01:00
llxHeader ();
2003-08-04 14:42:49 +02:00
/*
* S<EFBFBD> curit<EFBFBD> acc<EFBFBD> s client
*/
if ( $user -> societe_id > 0 )
{
$action = '' ;
$socidp = $user -> societe_id ;
}
2004-02-02 04:14:29 +01:00
if ( $sortorder == " " ) {
$sortorder = " ASC " ;
}
if ( $sortfield == " " ) {
$sortfield = " nom " ;
}
2003-08-04 14:42:49 +02:00
if ( $action == 'note' )
{
2004-01-30 12:00:57 +01:00
$sql = " UPDATE " . MAIN_DB_PREFIX . " societe SET note=' $note ' WHERE idp= $socid " ;
2003-08-04 14:42:49 +02:00
$result = $db -> query ( $sql );
}
if ( $action == 'stcomm' ) {
if ( $stcommid <> 'null' && $stcommid <> $oldstcomm ) {
2004-02-02 04:14:29 +01:00
$sql = " INSERT INTO " . MAIN_DB_PREFIX . " socstatutlog (datel, fk_soc, fk_statut, author) " ;
2003-08-04 14:42:49 +02:00
$sql .= " VALUES (' $dateaction ', $socid , $stcommid ,' " . $GLOBALS [ " REMOTE_USER " ] . " ') " ;
$result = @ $db -> query ( $sql );
if ( $result ) {
2004-01-30 12:00:57 +01:00
$sql = " UPDATE " . MAIN_DB_PREFIX . " societe SET fk_stcomm= $stcommid WHERE idp= $socid " ;
2003-08-04 14:42:49 +02:00
$result = $db -> query ( $sql );
} else {
$errmesg = " ERREUR DE DATE ! " ;
}
}
if ( $actioncommid ) {
2004-02-02 04:14:29 +01:00
$sql = " INSERT INTO " . MAIN_DB_PREFIX . " actioncomm (datea, fk_action, fk_soc, fk_user_author) VALUES (' $dateaction ', $actioncommid , $socid ,' " . $user -> id . " ') " ;
2003-08-04 14:42:49 +02:00
$result = @ $db -> query ( $sql );
if ( ! $result ) {
$errmesg = " ERREUR DE DATE ! " ;
}
}
}
/*
* Recherche
*
*
*/
if ( $mode == 'search' ) {
if ( $mode - search == 'soc' ) {
2004-01-30 12:00:57 +01:00
$sql = " SELECT s.idp FROM " . MAIN_DB_PREFIX . " societe as s " ;
2003-08-04 14:42:49 +02:00
$sql .= " WHERE lower(s.nom) like '% " . strtolower ( $socname ) . " %' " ;
}
if ( $db -> query ( $sql ) ) {
if ( $db -> num_rows () == 1 ) {
$obj = $db -> fetch_object ( 0 );
$socid = $obj -> idp ;
}
$db -> free ();
}
}
2004-02-02 04:14:29 +01:00
if ( $page == - 1 ) { $page = 0 ; }
$offset = $conf -> liste_limit * $page ;
$pageprev = $page - 1 ;
$pagenext = $page + 1 ;
2003-09-06 12:41:29 +02:00
/*
* Mode Liste
*
*
*
*/
2003-08-04 14:42:49 +02:00
2003-09-06 12:41:29 +02:00
if ( $sortorder == " " )
{
$sortorder = " ASC " ;
}
if ( $sortfield == " " )
{
$sortfield = " nom " ;
}
2003-08-04 14:42:49 +02:00
2004-01-30 12:00:57 +01:00
$sql = " SELECT s.idp, s.nom, s.ville, " . $db -> pdate ( " s.datec " ) . " as datec, " . $db -> pdate ( " s.datea " ) . " as datea, st.libelle as stcomm, s.prefix_comm FROM " . MAIN_DB_PREFIX . " societe as s, " . MAIN_DB_PREFIX . " c_stcomm as st WHERE s.fk_stcomm = st.id AND s.fournisseur=1 " ;
2003-08-04 14:42:49 +02:00
2003-09-06 12:41:29 +02:00
if ( strlen ( $stcomm )) {
$sql .= " AND s.fk_stcomm= $stcomm " ;
}
2003-08-04 14:42:49 +02:00
2003-09-06 12:41:29 +02:00
if ( $socidp ) {
$sql .= " AND s.idp= $socidp " ;
}
2003-08-04 14:42:49 +02:00
2003-09-06 12:41:29 +02:00
if ( strlen ( $begin )) {
$sql .= " AND upper(s.nom) like ' $begin %' " ;
}
2003-08-04 14:42:49 +02:00
2003-09-06 12:41:29 +02:00
if ( $socname ) {
$sql .= " AND lower(s.nom) like '% " . strtolower ( $socname ) . " %' " ;
$sortfield = " lower(s.nom) " ;
$sortorder = " ASC " ;
}
2003-08-04 14:42:49 +02:00
2004-02-12 19:14:09 +01:00
$sql .= " ORDER BY $sortfield $sortorder " . $db -> plimit ( $conf -> liste_limit + 1 , $offset );
2003-08-04 14:42:49 +02:00
2003-09-06 12:41:29 +02:00
$result = $db -> query ( $sql );
if ( $result )
{
$num = $db -> num_rows ();
$i = 0 ;
2004-02-02 04:14:29 +01:00
print_barre_liste ( " Liste des fournisseurs " , $page , $PHP_SELF , " " , $sortfield , $sortorder , '' , $num );
2003-10-21 17:13:38 +02:00
if ( $sortorder == " DESC " )
{
$sortorder = " ASC " ;
}
else
{
$sortorder = " DESC " ;
}
2004-02-13 15:56:08 +01:00
print '<table class="noborder" width="100%" cellspacing="0" cellpadding="4">' ;
2004-02-02 04:14:29 +01:00
print '<tr class="liste_titre"><td valign="center">' ;
2003-09-06 12:41:29 +02:00
print_liste_field_titre ( " Soci<EFBFBD> t<EFBFBD> " , $PHP_SELF , " s.nom " );
2004-02-02 04:14:29 +01:00
print " </td><td>Ville</td> " ;
print " </tr> \n " ;
2003-09-06 12:41:29 +02:00
$var = True ;
2004-02-12 19:14:09 +01:00
while ( $i < min ( $num , $conf -> liste_limit ))
2003-09-06 12:41:29 +02:00
{
2003-10-21 17:13:38 +02:00
$obj = $db -> fetch_object ( $i );
2003-08-04 14:42:49 +02:00
$var =! $var ;
2004-02-02 04:14:29 +01:00
print " <tr $bc[$var] > " ;
2004-02-12 19:14:09 +01:00
print '<td><a href="fiche.php?socid=' . $obj -> idp . '">' . img_file () . '</a>' ;
print " <a href= \" fiche.php?socid= $obj->idp\ " > $obj -> nom </ a ></ td > \n " ;
2003-10-21 17:13:38 +02:00
print " <td> " . $obj -> ville . " </td> \n " ;
2003-09-06 12:41:29 +02:00
print " </tr> \n " ;
2003-08-04 14:42:49 +02:00
$i ++ ;
}
2003-09-06 12:41:29 +02:00
print " </table> " ;
$db -> free ();
}
else
{
2004-02-02 04:14:29 +01:00
print $db -> error () . ' ' . $sql ;
2003-09-06 12:41:29 +02:00
}
2003-08-04 14:42:49 +02:00
$db -> close ();
llxFooter ( " <em>Dernière modification $Date $ révision $Revision $ </em> " );
?>