2002-05-06 21:10:48 +02:00
< ? PHP
2003-02-03 12:56:05 +01:00
/* Copyright ( C ) 2001 - 2003 Rodolphe Quiedeville < rodolphe @ quiedeville . org >
2002-05-06 21:10:48 +02:00
*
* $Id $
* $Source $
*
* 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 .
*
*/
require ( " ./pre.inc.php3 " );
require ( " ../contact.class.php3 " );
llxHeader ();
$db = new Db ();
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 llx_soc_recontact (fk_soc, datere, author) VALUES ( $socid , $dr ,' " . $GLOBALS [ " REMOTE_USER " ] . " ') " ;
$result = $db -> query ( $sql );
}
if ( $action == 'note' ) {
$sql = " UPDATE 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 societe SET fk_stcomm= $stcommid WHERE idp= $socid " ;
$result = $db -> query ( $sql );
} else {
$errmesg = " ERREUR DE DATE ! " ;
}
}
if ( $actioncommid ) {
$sql = " INSERT INTO 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 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 FROM societe as s, c_stcomm as st, c_typent as t, 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 " <b> $errmesg </b><br> " ;
}
/*
*
*/
print " <table width= \" 100% \" border= \" 0 \" cellspacing= \" 1 \" > \n " ;
print " <tr><td><div class= \" titre \" >Fiche fournisseur : $objsoc->nom </div></td> " ;
2003-01-28 18:54:37 +01:00
print '<td><a href="facture/fiche.php3?action=create&socid=' . $objsoc -> idp . '">Nouvelle Facture <img src="/theme/' . $conf -> theme . '/img/filenew.png" border="0" alt="Nouvelle facture"></a></td>' ;
2002-05-06 21:10:48 +02:00
print " <td bgcolor= \" #e0E0E0 \" align= \" center \" >[<a href= \" ../soc.php3?socid= $objsoc->idp &action=edit \" >Editer</a>]</td> " ;
2003-01-28 18:54:37 +01:00
2002-05-06 21:10:48 +02:00
print " </tr></table> " ;
/*
*
*
*/
2002-06-20 15:23:17 +02:00
?>
< style type = " text/css " >
td . border { border : 1 px dashed #c0c0c0; }
</ style >
< ? PHP
print '<table class="border" width="100%" border=0><tr>' ;
print '<td valign="top">' ;
print '<table cellspacing="0" border="0" width="100%">' ;
print '<tr><td class="border">Tel</td><td>' . $objsoc -> tel . ' </td><td>fax</td><td>' . $objsoc -> fax . ' </td></tr>' ;
2002-05-06 21:10:48 +02:00
print " <tr><td>Ville</td><td colspan= \" 3 \" > " . nl2br ( $objsoc -> address ) . " <br> $objsoc->cp $objsoc->ville </td></tr> " ;
print " <tr><td>siren</td><td><a href= \" http://www.societe.com/cgi-bin/recherche?rncs= $objsoc->siren\ " > $objsoc -> siren </ a >& nbsp ; </ td > " ;
print " <td>prefix</td><td> " ;
if ( $objsoc -> prefix_comm ) {
print $objsoc -> prefix_comm ;
} else {
print " [<a href= \" $PHP_SELF ?socid= $objsoc->idp &action=attribute_prefix \" >Attribuer</a>] " ;
}
print " </td></tr> " ;
print " <tr><td>Site</td><td colspan= \" 3 \" ><a href= \" http:// $objsoc->url\ " > $objsoc -> url </ a >& nbsp ; </ td ></ tr > " ;
print " </table> " ;
/*
*
*/
print " </td> \n " ;
print '<td valign="top" width="50%">' ;
print '<table border=0 width="100%" cellspacing=0 bgcolor=#e0e0e0>' ;
print " <tr><td>Cr<43> <72> e le</td><td align=center><b> " . strftime ( " %d %b %Y %H:%M " , $objsoc -> dc ) . " </b></td></tr> " ;
/*
*
*/
print '</table>' ;
print '</td></tr>' ;
/*
*
*/
print " <tr><td valign= \" top \" > " ;
print " </td><td valign= \" top \" > " ;
/*
*
* Liste des projets associ<EFBFBD> s
*
*/
$sql = " SELECT p.rowid,p.title,p.ref, " . $db -> pdate ( " p.dateo " ) . " as do " ;
$sql .= " FROM llx_projet as p WHERE p.fk_soc = $objsoc->idp " ;
if ( $db -> query ( $sql ) ) {
print " <table border=1 cellspacing=0 width=100% cellpadding= \" 1 \" > " ;
$i = 0 ;
$num = $db -> num_rows ();
if ( $num > 0 ) {
$tag = ! $tag ; print " <tr $bc[$tag] > " ;
print " <td colspan= \" 2 \" ><a href= \" projet/index.php3?socidp= $objsoc->idp\ " > liste des projets ( $num ) </ td ></ tr > " ;
}
while ( $i < $num && $i < 5 ) {
$obj = $db -> fetch_object ( $i );
$tag = ! $tag ;
print " <tr $bc[$tag] > " ;
print '<td><a href="projet/fiche.php3?id=' . $obj -> rowid . '">' . $obj -> title . '</a></td>' ;
print " <td align= \" right \" > " . strftime ( " %d %b %Y " , $obj -> do ) . " </td></tr> " ;
$i ++ ;
}
$db -> free ();
print " </table> " ;
} else {
print $db -> error ();
}
/*
*
*
*/
print " </td></tr> " ;
print " </table> \n " ;
/*
*
*
*
*/
if ( $action == 'changevalue' ) {
print " <HR noshade> " ;
print " <form action= \" index.php3?socid= $objsoc->idp\ " method = \ " post \" > " ;
print " <input type= \" hidden \" name= \" action \" value= \" cabrecrut \" > " ;
print " Cette soci<63> t<EFBFBD> est un cabinet de recrutement : " ;
print " <select name= \" selectvalue \" > " ;
print " <option value= \" \" > " ;
print " <option value= \" t \" >Oui " ;
print " <option value= \" f \" >Non " ;
print " </select> " ;
print " <input type= \" submit \" value= \" Mettre à jour \" > " ;
print " </form> \n " ;
} else {
/*
*
* Liste des contacts
*
*/
print " <table width= \" 100% \" cellspacing=0 border=1 cellpadding=2> " ;
print " <tr><td><b>Prénom Nom</b></td> " ;
print '<td><b>Poste</b></td><td><b>Tél</b></td>' ;
print " <td><b>Fax</b></td><td><b>Email</b></td> " ;
print " <td><a href= \" people.php3?socid= $objsoc->idp &action=addcontact \" >Ajouter</a></td></tr> " ;
$sql = " SELECT p.idp, p.name, p.firstname, p.poste, p.phone, p.fax, p.email, p.note FROM 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 " <tr bgcolor= \" e0e0e0 \" > " ;
} else {
print " <tr> " ;
}
print " <td> $obj->firstname $obj->name " ;
if ( $obj -> note ) {
print " <br><b> " . nl2br ( $obj -> note );
}
print " </td> " ;
print " <td> $obj->poste </td> " ;
print '<td><a href="actioncomm.php3?action=create&actionid=1&contactid=' . $obj -> idp . '&socid=' . $objsoc -> idp . '">' . $obj -> phone . '</a> </td>' ;
print '<td><a href="actioncomm.php3?action=create&actionid=2&contactid=' . $obj -> idp . '&socid=' . $objsoc -> idp . '">' . $obj -> fax . '</a> </td>' ;
print '<td><a href="actioncomm.php3?action=create&actionid=4&contactid=' . $obj -> idp . '&socid=' . $objsoc -> idp . '">' . $obj -> email . '</a> </td>' ;
print " <td><a href= \" people.php3?socid= $objsoc->idp &action=editcontact&contactid= $obj->idp\ " > Modifier </ a ></ td > " ;
print " </tr> \n " ;
$i ++ ;
$tag = ! $tag ;
}
print " </table> " ;
print " \n <hr noshade size=1> \n " ;
/*
*
*/
print '<table width="100%" cellspacing=0 border=0 cellpadding=2>' ;
print '<tr>' ;
print '<td valign="top">' ;
/*
*
* 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 actioncomm as a, c_actioncomm as c, llx_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 " <table width= \" 100% \" cellspacing=0 border=0 cellpadding=2> \n " ;
print '<tr><td><a href="actioncomm.php3?socid=' . $objsoc -> idp . '">Actions</a></td></tr>' ;
$i = 0 ; $num = $db -> num_rows (); $tag = True ;
while ( $i < $num ) {
$obj = $db -> fetch_object ( $i );
if ( $tag ) {
print " <tr bgcolor= \" e0e0e0 \" > " ;
} else {
print " <tr> " ;
}
if ( $oldyear == strftime ( " %Y " , $obj -> da ) ) {
print '<td align="center">|</td>' ;
} else {
print " <TD align= \" center \" > " . strftime ( " %Y " , $obj -> da ) . " </TD> \n " ;
$oldyear = strftime ( " %Y " , $obj -> da );
}
if ( $oldmonth == strftime ( " %Y%b " , $obj -> da ) ) {
print '<td align="center">|</td>' ;
} else {
print " <TD align= \" center \" > " . strftime ( " %b " , $obj -> da ) . " </TD> \n " ;
$oldmonth = strftime ( " %Y%b " , $obj -> da );
}
print " <TD> " . strftime ( " %d " , $obj -> da ) . " </TD> \n " ;
print " <TD> " . strftime ( " %H:%M " , $obj -> da ) . " </TD> \n " ;
if ( $obj -> propalrowid ) {
print '<td width="40%"><a href="propal.php3?propalid=' . $obj -> propalrowid . '">' . $obj -> libelle . '</a></td>' ;
} else {
print '<td width="40%">' . $obj -> libelle . '</td>' ;
}
/*
* Contact pour cette action
*
*/
if ( $obj -> fk_contact ) {
$contact = new Contact ( $db );
$contact -> fetch ( $obj -> fk_contact );
print '<td width="40%"><a href="people.php3?socid=' . $objsoc -> idp . '&contactid=' . $contact -> id . '">' . $contact -> fullname . '</a></td>' ;
} else {
print '<td width="40%"> </td>' ;
}
/*
*/
print '<td width="20%"><a href="../user.php3">' . $obj -> code . '</a></td>' ;
print " </tr> \n " ;
$i ++ ;
$tag = ! $tag ;
}
print " </table> " ;
$db -> free ();
} else {
print $db -> error ();
}
print " </td></tr></table> " ;
/*
*
* Notes sur la societe
*
*/
print '<table border="1" width="100%" cellspacing="0" bgcolor="#e0e0e0">' ;
print " <tr><td> " . nl2br ( $objsoc -> note ) . " </td></tr> " ;
print " </table> " ;
}
} else {
print $db -> error () . " <br> " . $sql ;
}
} else {
print " Erreur " ;
}
$db -> close ();
llxFooter ( " <em>Dernière modification $Date $ révision $Revision $ </em> " );
?>
