* Copyright (C) 2003 Éric Seigne * * 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$ * */ require("./pre.inc.php"); require("../contact.class.php"); llxHeader(); /* * Sécurité accés client */ if ($user->societe_id > 0) { $action = ''; $socid = $user->societe_id; } if ($sortorder == "") { $sortorder="ASC"; } if ($sortfield == "") { $sortfield="nom"; } if ($action == 'attribute_prefix') { $societe = new Societe($db, $socid); $societe->attribute_prefix($db, $socid); } if ($action == 'recontact') { $dr = mktime(0, 0, 0, $remonth, $reday, $reyear); $sql = "INSERT INTO ".MAIN_DB_PREFIX."soc_recontact (fk_soc, datere, author) VALUES ($socid, $dr,'". $GLOBALS["REMOTE_USER"]."')"; $result = $db->query($sql); } if ($action == 'note') { $sql = "UPDATE ".MAIN_DB_PREFIX."societe SET note='$note' WHERE idp=$socid"; $result = $db->query($sql); } if ($action == 'stcomm') { if ($stcommid <> 'null' && $stcommid <> $oldstcomm) { $sql = "INSERT INTO socstatutlog (datel, fk_soc, fk_statut, author) "; $sql .= " VALUES ('$dateaction',$socid,$stcommid,'" . $GLOBALS["REMOTE_USER"] . "')"; $result = @$db->query($sql); if ($result) { $sql = "UPDATE ".MAIN_DB_PREFIX."societe SET fk_stcomm=$stcommid WHERE idp=$socid"; $result = $db->query($sql); } else { $errmesg = "ERREUR DE DATE !"; } } if ($actioncommid) { $sql = "INSERT INTO ".MAIN_DB_PREFIX."actioncomm (datea, fk_action, fk_soc, fk_user_author) VALUES ('$dateaction',$actioncommid,$socid,'" . $user->id . "')"; $result = @$db->query($sql); if (!$result) { $errmesg = "ERREUR DE DATE !"; } } } /** * Recherche * * */ if ($mode == 'search') { if ($mode-search == 'soc') { $sql = "SELECT s.idp FROM ".MAIN_DB_PREFIX."societe as s "; $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(); } } /* * * Mode fiche * * */ if ($socid > 0) { $societe = new Societe($db, $socid); $sql = "SELECT s.idp, s.nom, ".$db->pdate("s.datec")." as dc, s.tel, s.fax, st.libelle as stcomm, s.fk_stcomm, s.url,s.address,s.cp,s.ville, s.note, t.libelle as typent, e.libelle as effectif, s.siren, s.prefix_comm, s.services,s.parent, s.description"; $sql .= " FROM ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."c_stcomm as st, ".MAIN_DB_PREFIX."c_typent as t, ".MAIN_DB_PREFIX."c_effectif as e "; $sql .= " WHERE s.fk_stcomm=st.id AND s.fk_typent = t.id AND s.fk_effectif = e.id"; if ($to == 'next') { $sql .= " AND s.idp > $socid ORDER BY idp ASC LIMIT 1"; } elseif ($to == 'prev') { $sql .= " AND s.idp < $socid ORDER BY idp DESC LIMIT 1"; } else { $sql .= " AND s.idp = $socid"; } $result = $db->query($sql); if ($result) { $objsoc = $db->fetch_object(0); $dac = strftime("%Y-%m-%d %H:%M", time()); if ($errmesg) { print "$errmesg
"; } /* * */ print ''; print ""; print ''; print ""; print ''; print "

Fiche fournisseur : $objsoc->nom

[idp&action=edit\">Editer]

Produits

"; /* * * */ print ''; print ''; print '

'; /* * */ print ''; print ''; print ''; print '

Tél	'.$objsoc->tel.'	fax	'.$objsoc->fax.'
Adresse	'.nl2br($objsoc->address).' '.$objsoc->cp.' '.$objsoc->ville.'

'; /* * */ print '

'; /* * * Liste des factures associées * */ $sql = "SELECT p.rowid,p.libelle,p.facnumber,".$db->pdate("p.datef")." as df"; $sql .= " FROM ".MAIN_DB_PREFIX."facture_fourn as p WHERE p.fk_soc = $objsoc->idp"; $sql .= " ORDER BY p.datef DESC LIMIT 0,4"; if ( $db->query($sql) ) { print ''; $i = 0 ; $num = $db->num_rows(); if ($num > 0) { print ''; print ""; } while ($i < $num && $i < 5) { $obj = $db->fetch_object( $i); $tag = !$tag; print ""; print ''; print ""; $i++; } $db->free(); print "

idp\">liste des factures
'; print ''; print img_file(); print $obj->facnumber.' '.$obj->libelle.'	".strftime("%d %b %Y", $obj->df) ."

"; } else { print $db->error(); } /* * * */ print '

' . "
\n"; /* * * Liste des contacts * */ print ''; print ""; print ''; print ""; print ""; $sql = "SELECT p.idp, p.name, p.firstname, p.poste, p.phone, p.fax, p.email, p.note"; $sql .= " FROM ".MAIN_DB_PREFIX."socpeople as p WHERE p.fk_soc = $objsoc->idp ORDER by p.datec"; $result = $db->query($sql); $i = 0 ; $num = $db->num_rows(); $tag = True; while ($i < $num) { $obj = $db->fetch_object( $i); if ($tag) { print ""; } else { print ""; } print ""; print ""; print ''; print ''; print ''; print ""; print "\n"; $i++; $tag = !$tag; } print "

Prénom Nom	Poste	Tél	Fax	Email	idp&action=addcontact\">Ajouter
$obj->firstname $obj->name"; if ($obj->note) { print " ".nl2br($obj->note); } print "	$obj->poste	'.$obj->phone.'	'.$obj->fax.'	'.$obj->email.'	idp&action=editcontact&contactid=$obj->idp\">Modifier

"; /* * */ print ''; print ''; print '

'; /* * * Listes des actions * */ $sql = "SELECT a.id, ".$db->pdate("a.datea")." as da, c.libelle, u.code, a.propalrowid, a.fk_user_author, fk_contact, u.rowid "; $sql .= " FROM ".MAIN_DB_PREFIX."actioncomm as a, ".MAIN_DB_PREFIX."c_actioncomm as c, ".MAIN_DB_PREFIX."user as u "; $sql .= " WHERE a.fk_soc = $objsoc->idp "; $sql .= " AND u.rowid = a.fk_user_author"; $sql .= " AND c.id=a.fk_action "; $sql .= " ORDER BY a.datea DESC, a.id DESC"; if ( $db->query($sql) ) { print "\n"; print ''; $i = 0 ; $num = $db->num_rows(); $tag = True; while ($i < $num) { $obj = $db->fetch_object( $i); if ($tag) { print ""; } else { print ""; } if ($oldyear == strftime("%Y",$obj->da) ) { print ''; } else { print "\n"; $oldyear = strftime("%Y",$obj->da); } if ($oldmonth == strftime("%Y%b",$obj->da) ) { print ''; } else { print "\n"; $oldmonth = strftime("%Y%b",$obj->da); } print "\n"; print "\n"; if ($obj->propalrowid) { print ''; } else { print ''; } /* * Contact pour cette action * */ if ($obj->fk_contact) { $contact = new Contact($db); $contact->fetch($obj->fk_contact); print ''; } else { print ''; } /* */ print ''; print "\n"; $i++; $tag = !$tag; } print "

Actions
\|	" .strftime("%Y",$obj->da)."	\|	" .strftime("%b",$obj->da)."	" .strftime("%d",$obj->da)."	" .strftime("%H:%M",$obj->da)."	'.$obj->libelle.'	'.$obj->libelle.'	'.$contact->fullname.'		'.$obj->code.'

"; $db->free(); } else { print $db->error() . "
" . $sql; } print "

"; /* * * Notes sur la societe * */ print ''; print ""; print "

".nl2br($objsoc->note)."

"; } else { print $db->error() . "
" . $sql; } } else { print "Erreur"; } $db->close(); llxFooter("Dernière modification $Date$ révision $Revision$"); ?>