dolibarr/htdocs/soc.php

<?PHP
/* Copyright (C) 2001-2003 Rodolphe Quiedeville <rodolphe@quiedeville.org>
 * Copyright (C) 2003      Brian Fraval         <brian@fraval.org>
 * Copyright (C) 2004      Laurent Destailleur  <eldy@users.sourceforge.net>
 *
 * 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");


/*
 * S<EFBFBD>curit<EFBFBD> acc<EFBFBD>s client
 */
if ($user->societe_id > 0) 
{
  $action = '';
  $socid = $user->societe_id;
}

if ($action == 'add')
{
  $soc = new Societe($db);
  $soc->nom = $nom;

  $soc->adresse = $adresse;
  $soc->cp      = $cp;
  $soc->ville   = $ville;

  $soc->tel     = $tel;
  $soc->fax     = $fax;
  $soc->url     = ereg_replace( "http://", "", $url );
  $soc->siren   = $siren;

  $soc->siret      = $HTTP_POST_VARS["siret"];
  $soc->ape        = $HTTP_POST_VARS["ape"];
  $soc->capital    = $HTTP_POST_VARS["capital"];
  $soc->tva_intra  = $HTTP_POST_VARS["tva_intra_code"] . $HTTP_POST_VARS["tva_intra_num"];

  $soc->client   = $client;
  $soc->fournisseur = $fournisseur;

  $socid = $soc->create();
}

if ($action == 'update')
{
  $soc = new Societe($db);

  $soc->nom = $nom;

  $soc->adresse = $adresse;
  $soc->cp = $cp;
  $soc->ville = $ville;

  $soc->tel = $tel;
  $soc->fax = $fax;
  $soc->url = ereg_replace( "http://", "", $url );

  $soc->siren      = $HTTP_POST_VARS["siren"];
  $soc->siret      = $HTTP_POST_VARS["siret"];
  $soc->ape        = $HTTP_POST_VARS["ape"];
  $soc->capital    = $HTTP_POST_VARS["capital"];
  $soc->tva_intra  = $HTTP_POST_VARS["tva_intra_code"] . $HTTP_POST_VARS["tva_intra_num"];


  $soc->client = $client;
  $soc->fournisseur = $fournisseur;

  $soc->update($socid);
}

/*
 *
 *
 */
llxHeader();

if ($action == 'create') 
{
  print '<div class="titre">Nouvelle soci<63>t<EFBFBD> (prospect, client, fournisseur, partenaire...)</div><br>';
  print '<form action="soc.php" method="post">';
  print '<input type="hidden" name="action" value="add">';
  print '<input type="hidden" name="fournisseur" value="0">';

  print '<table class="border" cellpadding="3" cellspacing="0" width="100%">';
  print '<tr><td>Nom</td><td colspan="3"><input type="text" name="nom"></td></tr>';
  print '<tr><td>Adresse</td><td colspan="3"><textarea name="adresse" cols="30" rows="3" wrap="soft"></textarea></td></tr>';
  print '<tr><td>CP</td><td colspan="3"><input size="6" type="text" name="cp">&nbsp;';
  print 'Ville&nbsp;<input type="text" name="ville"></td></tr>';

  print '<tr><td>T<>l<EFBFBD>phone</td><td><input type="text" name="tel"></td>';
  print '<td>Fax</td><td><input type="text" name="fax"></td></tr>';

  print '<tr><td>Web</td><td colspan="3">http://<input size="40" type="text" name="url"></td></tr>';

  print '<tr><td>Siren</td><td><input type="text" name="siren"></td>';

  print '<td>Siret</td><td><input type="text" name="siret" size="15" maxlength="14" value="'.$soc->siret.'"></td></tr>';

  print '<tr><td>Ape</td><td><input type="text" name="ape" size="5" maxlength="4" value="'.$soc->ape.'"></td>';
  print '<td>Capital</td><td><input type="text" name="capital" size="10" value="'.$soc->capital.'"> '.MAIN_MONNAIE.'</td></tr>';
  
  print '<tr><td colspan="2">Num<75>ro de TVA Intracommunautaire</td><td colspan="2">';
  
  print '<input type="text" name="tva_intra_code" size="3" maxlength="2" value="'.$soc->tva_intra_code.'">';
  print '<input type="text" name="tva_intra_num" size="18" maxlength="18" value="'.$soc->tva_intra_num.'">';
  print '<br>Vous pouvez v<>rifier ce num<75>ro sur le <a href="http://europa.eu.int/comm/taxation_customs/vies/fr/vieshome.htm" target="_blank">site</a> de la commission europ<6F>enne';
  print '</td></tr>';
  

  print '<tr><td>Client</td><td><select name="client">';
  print_oui_non($soc->client);
  print '</select></td>';

  print '<td>Fournisseur</td><td><select name="fournisseur">';
  print_oui_non($soc->fournisseur);
  print '</select></td></tr>';

  print '<tr><td colspan="4" align="center"><input type="submit" value="Ajouter"></td></tr>';
  print '</table>';
  print '</form>';
}
elseif ($action == 'edit')
{
  print_titre("Edition de la soci<63>t<EFBFBD>");

  if ($socid)
    {

      $soc = new Societe($db);
      $soc->id = $socid;
      $soc->fetch($socid);

      print '<form action="soc.php?socid='.$socid.'" method="post">';
      print '<input type="hidden" name="action" value="update">';

      print '<table class="border" width="100%" cellpadding="3" cellspacing="0">';
      print '<tr><td>Nom</td><td><input type="text" name="nom" value="'.$soc->nom.'"></td></tr>';
      print '<tr><td valign="top">Adresse</td><td><textarea name="adresse" cols="30" rows="3" wrap="soft">';
      print $soc->adresse;
      print '</textarea></td></tr>';
      
      print '<tr><td>CP</td><td><input size="6" type="text" name="cp" value="'.$soc->cp.'">&nbsp;';
      print 'Ville&nbsp;<input type="text" name="ville" value="'.$soc->ville.'"></td></tr>';
      
      print '<tr><td>T<>l<EFBFBD>phone</td><td><input type="text" name="tel" value="'.$soc->tel.'"></td>';
      print '<td>Fax</td><td><input type="text" name="fax" value="'.$soc->fax.'"></td></tr>';
      print '<tr><td>Web</td><td colspan="3">http://<input type="text" name="url" size="40" value="'.$soc->url.'"></td></tr>';
      
      print '<tr><td>Siren</td><td><input type="text" name="siren" size="10" maxlength="9" value="'.$soc->siren.'"></td>';
      print '<td>Siret</td><td><input type="text" name="siret" size="15" maxlength="14" value="'.$soc->siret.'"></td></tr>';

      print '<tr><td>Ape</td><td><input type="text" name="ape" size="5" maxlength="4" value="'.$soc->ape.'"></td>';
      print '<td>Capital</td><td><input type="text" name="capital" size="10" value="'.$soc->capital.'"> '.MAIN_MONNAIE.'</td></tr>';

      print '<tr><td colspan="2">Num<75>ro de TVA Intracommunautaire</td><td colspan="2">';

      print '<input type="text" name="tva_intra_code" size="3" maxlength="2" value="'.$soc->tva_intra_code.'">';
      print '<input type="text" name="tva_intra_num" size="18" maxlength="18" value="'.$soc->tva_intra_num.'">';
      print '<br>Vous pouvez v<>rifier ce num<75>ro sur le <a href="http://europa.eu.int/comm/taxation_customs/vies/fr/vieshome.htm" target="_blank">site</a> de la commission europ<6F>enne';
      print '</td></tr>';

      print '<tr><td>Client</td><td><select name="client">';
      print_oui_non($soc->client);
      print '</select>';
      
      print '<tr><td>Fournisseur</td><td><select name="fournisseur">';
      print_oui_non($soc->fournisseur);
      print '</select>';
      
      print '</td></tr>';
      
      print '<tr><td align="center" colspan="2"><input type="submit" value="Mettre <20> jour"></td></tr>';
      print '</table>';
      print '</form>';
    }
}
else
{
  $soc = new Societe($db);
  $soc->id = $socid;
  $soc->fetch($socid);


  print '<div class="tabs">';
  print '<a href="soc.php?socid='.$_GET["socid"].'" id="active" class="tab">Fiche soci<63>t<EFBFBD></a>';

  if ($soc->client)
    {
      print '<a class="tab" href="'.DOL_URL_ROOT.'/comm/fiche.php?socid='.$socid.'">Fiche commerciale</a>';
    }
  if ($soc->fournisseur)
    {
      print '<a class="tab" href="'.DOL_URL_ROOT.'/fourn/fiche.php?socid='.$socid.'">Fiche fournisseur</a>';
    }
  
  print '</div>';
  print '<div class="tabBar"><br>';
    
  print '<table class="border" cellpadding="3" cellspacing="0" width="100%">';
  print '<tr><td width="20%">Nom</td><td width="80%" colspan="3">'.$soc->nom.'</td></tr>';
  print '<tr><td valign="top">Adresse</td><td colspan="3">'.nl2br($soc->adresse).'&nbsp;</td></tr>';
  print '<tr><td>CP</td><td colspan="3">'.$soc->cp.'&nbsp;'.$soc->ville.'</td></tr>';
  
  print '<tr><td>Tel</td><td>'.$soc->tel.'</td>';
  print '<td>Fax</td><td>'.$soc->fax.'</td></tr>';
  print '<tr><td>Web</td><td colspan="3"><a href="http://'.$soc->url.'">http://'.$soc->url.'</a></td></tr>';
  
  print '<tr><td>Siren</td><td><a target="_blank" href="http://www.societe.com/cgi-bin/recherche?rncs='.$soc->siren.'">'.$soc->siren.'</a>&nbsp;</td>';

  print '<td>Siret</td><td>'.$soc->siret.'</td></tr>';
  print '<tr><td>Ape</td><td>'.$soc->ape.'</td>';
  print '<td>Capital</td><td>'.$soc->capital.' '.MAIN_MONNAIE.'</td></tr>';

  print '<tr><td colspan="2">Num<75>ro de TVA Intracommunautaire</td><td colspan="2">';
  print $soc->tva_intra;
  print '</td></tr>';

  print '</table>';
  print '<br></div>';
  /*
   *
   */
  
  print '<div class="tabsAction">';

  print '<a class="tabAction" href="soc.php?socid='.$socid.'&action=edit">Editer</a>';

  print '<a class="tabAction" href="./contact/fiche.php?socid='.$socid.'&amp;action=create">Ajouter un contact</a>';
  
  print '<a class="tabAction" href="societe/notify/fiche.php?socid='.$socid.'">Notifications</a>';
  print '</div>';
/*
 *
 */
}

$db->close();

llxFooter("<em>Derni&egrave;re modification $Date$ r&eacute;vision $Revision$</em>");
?>