dolibarr-fork/htdocs/comm/action/index.php

<?php
/* Copyright (C) 2001-2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
 * Copyright (C) 2003      Éric Seigne          <erics@rycks.com>
 * Copyright (C) 2004-2005 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$
 *
 */

/**
	    \file       htdocs/comm/action/index.php
        \ingroup    commercial
		\brief      Page accueil des actions commerciales
		\version    $Revision$
*/
 
require("./pre.inc.php");

require("../../contact.class.php");
require("../../actioncomm.class.php");

$langs->load("companies");


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


$sortfield = isset($_GET["sortfield"])?$_GET["sortfield"]:$_POST["sortfield"];
$sortorder = isset($_GET["sortorder"])?$_GET["sortorder"]:$_POST["sortorder"];
$page = isset($_GET["page"])?$_GET["page"]:$_POST["page"];

if ($page == -1) { $page = 0 ; }
$limit = $conf->liste_limit;
$offset = $limit * $page ;
if (! $sortorder) $sortorder="DESC";
if (! $sortfield) $sortfield="a.datea";


llxHeader();


/*
 *  Affichage liste des actions
 *
 */

$sql = "SELECT s.nom as societe, s.idp as socidp, s.client, a.id,".$db->pdate("a.datea")." as da, a.datea, c.code as acode, c.libelle, u.code, a.fk_contact, a.note, a.percent as percent";
$sql .= " FROM ".MAIN_DB_PREFIX."actioncomm as a, ".MAIN_DB_PREFIX."c_actioncomm as c, ".MAIN_DB_PREFIX."societe as s, ".MAIN_DB_PREFIX."user as u";
$sql .= " WHERE a.fk_soc = s.idp AND c.id=a.fk_action AND a.fk_user_author = u.rowid";

if ($_GET["type"])
{
  $sql .= " AND c.id = ".$_GET["type"];
}
if ($_GET["time"] == "today")
{
  $sql .= " AND date_format(a.datea, '%d%m%Y') = ".strftime("%d%m%Y",time());
}
if ($socid) 
{
  $sql .= " AND s.idp = $socid";
}
$sql .= " ORDER BY a.datea DESC";
$sql .= $db->plimit( $limit + 1, $offset);
  
$resql=$db->query($sql);
if ($resql)
{
  $num = $db->num_rows($resql);
  if ($socid) 
    {
      $societe = new Societe($db);
      $societe->fetch($socid);
      
      print_barre_liste($langs->trans("DoneAndToDoTasksFor",$societe->nom), $page, "index.php",'',$sortfield,$sortorder,'',$num);
    }
  else
    {      
      print_barre_liste($langs->trans("DoneAndToDoTasks"), $page, "index.php",'',$sortfield,$sortorder,'',$num);
    }
  $i = 0;
  print "<table class=\"noborder\" width=\"100%\">";
  print '<tr class="liste_titre">';
  print '<td colspan="4">'.$langs->trans("Date").'</td>';
  print '<td>'.$langs->trans("Status").'</td>';
  print '<td>'.$langs->trans("Action").'</td>';
  print '<td>'.$langs->trans("Company").'</td>';
  print '<td>'.$langs->trans("Contact").'</td>';
  print '<td>'.$langs->trans("Comments").'</td>';
  print '<td>'.$langs->trans("Author").'</td>';
  print "</tr>\n";
  $var=true;
  while ($i < min($num,$limit))
    {
      $obj = $db->fetch_object($resql);
      
      $var=!$var;
    
      print "<tr $bc[$var]>";
    
      if ($oldyear == strftime("%Y",$obj->da) )
	{
	  print '<td>&nbsp;</td>';
	}
      else
	{
	  print "<td width=\"30\">" .strftime("%Y",$obj->da)."</td>\n"; 
	  $oldyear = strftime("%Y",$obj->da);
	}
      
      if ($oldmonth == strftime("%Y%b",$obj->da) )
	{
	  print '<td width=\"20\">&nbsp;</td>';
	}
	else
	  {
	    print "<td width=\"20\">" .strftime("%b",$obj->da)."</td>\n"; 
	    $oldmonth = strftime("%Y%b",$obj->da);
	  }
	
	print "<td width=\"20\">" .strftime("%d",$obj->da)."</td>\n"; 
	print "<td width=\"30\">" .strftime("%H:%M",$obj->da)."</td>\n";
    if ($obj->percent < 100) {
    	print "<td align=\"center\">".$obj->percent."%</td>";
	}
	else {
		print "<td align=\"center\">".$langs->trans("Done")."</td>";
	}
	print '<td><a href="fiche.php?id='.$obj->id.'">'.img_object($langs->trans("ShowTask"),"task").' ';
    $transcode=$langs->trans("Action".$obj->acode);
    $libelle=($transcode!="Action".$obj->acode?$transcode:$obj->libelle);
    print $libelle;
    print '</a></td>';
	
	print '<td>';

	if ($obj->client == 1)
	  {
	    print '&nbsp;<a href="'.DOL_URL_ROOT.'/comm/fiche.php?socid='.$obj->socidp.'">'.img_object($langs->trans("ShowCompany"),"company").' '.$obj->societe.'</a></td>';
	  }
	elseif ($obj->client == 2)
	  {
	    print '&nbsp;<a href="'.DOL_URL_ROOT.'/comm/prospect/fiche.php?id='.$obj->socidp.'">'.img_object($langs->trans("ShowCompany"),"company").' '.$obj->societe.'</a></td>';
	  }
	else
	  {
	    print '&nbsp;<a href="'.DOL_URL_ROOT.'/soc.php?socid='.$obj->socidp.'">'.img_object($langs->trans("ShowCompany"),"company").' '.$obj->societe.'</a></td>';
	  }
	/*
	 * Contact
	 */
	print '<td>';
	if ($obj->fk_contact)
	  {
	    $cont = new Contact($db);
	    $cont->fetch($obj->fk_contact);
	    print '<a href="'.DOL_URL_ROOT.'/contact/fiche.php?id='.$cont->id.'">'.img_object($langs->trans("ShowContact"),"contact").' '.$cont->fullname.'</a>';
	  }
	else
	  {
	    print "&nbsp;";
	  }
	print '</td>';

	/*
	 *
	 */
	print '<td>'.dolibarr_trunc($obj->note, 20).'</td>';
	print "<td>$obj->code</td>\n";
	
	print "</tr>\n";
	$i++;
      }
    print "</table>";
    $db->free($resql);

}
else
{
    dolibarr_print_error($db);
}


$db->close();

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