dolibarr/htdocs/compta/prelevement/fiche.php

<?PHP
/* Copyright (C) 2005 Rodolphe Quiedeville <rodolphe@quiedeville.org>
 * Copyright (C) 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/compta/prelevement/fiche.php
        \ingroup    prelevement
        \brief      Fiche prelevement
        \version    $Revision$
*/

require("./pre.inc.php");

if (!$user->rights->prelevement->bons->lire)
  accessforbidden();

$langs->load("bills");

/*
 * S<EFBFBD>curit<EFBFBD> acc<EFBFBD>s client
 */
if ($user->societe_id > 0) accessforbidden();

if ($_POST["action"] == 'confirm_credite' && $_POST["confirm"] == yes)
{
  $bon = new BonPrelevement($db,"");
  $bon->id = $_GET["id"];
  $bon->set_credite();

  Header("Location: fiche.php?id=".$_GET["id"]);
}

if ($_POST["action"] == 'infotrans')
{
  $bon = new BonPrelevement($db,"");
  $bon->fetch($_GET["id"]);

  if ($_FILES['userfile']['name'] && basename($_FILES['userfile']['name'],".ps") == $bon->ref)
    {      
      $dir = $conf->prelevement->dir_output.'/bon/';

      if (doliMoveFileUpload($_FILES['userfile']['tmp_name'], $dir . "/" . $_FILES['userfile']['name']))
	{
	  $dt = mktime(12,0,0,$_POST["remonth"],$_POST["reday"],$_POST["reyear"]);
	  
	  $bon->set_infotrans($user, $dt, $_POST["methode"]);
	}
    }
  else
    {
      dolibarr_syslog("Fichier invalide",LOG_WARN);
    }

  Header("Location: fiche.php?id=".$_GET["id"]);
}

if ($_POST["action"] == 'infocredit')
{
  $bon = new BonPrelevement($db,"");
  $bon->Fetch($_GET["id"]);
  $dt = mktime(12,0,0,$_POST["remonth"],$_POST["reday"],$_POST["reyear"]);

  $error = $bon->set_infocredit($user, $dt);

  if ($error == 0)
    {
      Header("Location: fiche.php?id=".$_GET["id"]);
    }
  else
    {
      Header("Location: fiche.php?id=".$_GET["id"]."&error=$error");
    }
}

llxHeader('','Bon de pr<70>l<EFBFBD>vement');

$h = 0;
$head[$h][0] = DOL_URL_ROOT.'/compta/prelevement/fiche.php?id='.$_GET["id"];
$head[$h][1] = $langs->trans("Card");
$hselected = $h;
$h++;      

if ($conf->use_preview_tabs)
{
    $head[$h][0] = DOL_URL_ROOT.'/compta/prelevement/bon.php?id='.$_GET["id"];
    $head[$h][1] = $langs->trans("Preview");
    $h++;  
}

$head[$h][0] = DOL_URL_ROOT.'/compta/prelevement/lignes.php?id='.$_GET["id"];
$head[$h][1] = $langs->trans("Lines");
$h++;  

$head[$h][0] = DOL_URL_ROOT.'/compta/prelevement/factures.php?id='.$_GET["id"];
$head[$h][1] = $langs->trans("Bills");
$h++;  

$head[$h][0] = DOL_URL_ROOT.'/compta/prelevement/fiche-rejet.php?id='.$_GET["id"];
$head[$h][1] = $langs->trans("Rejects");
$h++;  

$head[$h][0] = DOL_URL_ROOT.'/compta/prelevement/fiche-stat.php?id='.$_GET["id"];
$head[$h][1] = $langs->trans("Statistics");
$h++;  

$prev_id = $_GET["id"];

$html = new Form($db);

if ($_GET["id"])
{
  $bon = new BonPrelevement($db,"");

  if ($bon->fetch($_GET["id"]) == 0)
    {
      dolibarr_fiche_head($head, $hselected, 'Pr<50>l<EFBFBD>vement : '. $bon->ref);

      if (isset($_GET["error"]))
	{
	  print '<div class="error">'.$bon->ReadError($_GET["error"]).'</div>';
	}



      if ($_GET["action"] == 'credite')
	{
	  $html->form_confirm("fiche.php?id=".$bon->id,"Classer comme cr<63>dit<69>","Etes-vous s<>r de vouloir classer ce bon de pr<70>l<EFBFBD>vement comme cr<63>dit<69> sur votre compte bancaire ?","confirm_credite");
	  print '<br />';
	}

      print '<table class="border" width="100%">';

      print '<tr><td width="20%">'.$langs->trans("Ref").'</td><td>'.$bon->ref.'</td></tr>';
      print '<tr><td width="20%">'.$langs->trans("Date").'</td><td>'.strftime("%e %B %Y",$bon->datec).'</td></tr>';
      print '<tr><td width="20%">'.$langs->trans("Amount").'</td><td>'.price($bon->amount).'</td></tr>';
      print '<tr><td width="20%">'.$langs->trans("File").'</td><td>';

      $relativepath = 'bon/'.$bon->ref;

      print '<a href="'.DOL_URL_ROOT.'/document.php?type=text/plain&amp;modulepart=prelevement&amp;file='.urlencode($relativepath).'">'.$bon->ref.'</a>';

      print '</td></tr>';

      print '<tr><td width="20%">Statut</td><td>';
      print '<img src="./statut'.$bon->statut.'.png">&nbsp;';
      print $lipre->statuts[$lipre->statut].'</td></tr>';

      if($bon->date_trans <> 0)
	{
	  $muser = new User($db, $bon->user_trans);
	  $muser->fetch();

	  print '<tr><td width="20%">Date Transmission / Par</td><td>';
	  print strftime("%e %B %Y",$bon->date_trans);
	  print ' par '.$muser->fullname.'</td></tr>';
	  print '<tr><td width="20%">M<>thode Transmission</td><td>';
	  print $bon->methodes_trans[$bon->method_trans];
	  print '</td></tr>';
	}
      if($bon->date_credit <> 0)
	{
	  print '<tr><td width="20%">Cr<43>dit<69> le</td><td>';
	  print strftime("%e %B %Y",$bon->date_credit);
	  print '</td></tr>';
	}

      print '</table><br />';

      if($bon->date_trans == 0)
	{
	  print '<form method="post" name="userfile" action="fiche.php?id='.$bon->id.'" enctype="multipart/form-data">';
	  print '<input type="hidden" name="action" value="infotrans">';
	  print '<table class="border" width="100%">';
	  print '<tr><td width="20%">Date Transmission</td><td>';
	  print $html->select_date();
	  print '</td></tr>';
	  print '<tr><td width="20%">M<>thode Transmission</td><td>';
	  print $html->select_array("methode",$bon->methodes_trans);
	  print '</td></tr>';
	  print '<tr><td width="20%">Fichier</td><td>';
	  print '<input type="file" name="userfile" size="30" maxlength="80"><br />';
	  print '</td></tr>';
	  print '<tr><td colspan="2" align="center">';
	  print '<input type="submit" class="button" value="'.$langs->trans("Send").'">';
	  print '</td></tr>';
	  print '</table></form>';
	}

      if($bon->date_trans <> 0 && $bon->date_credit == 0)
	{
	  print '<form method="post" action="fiche.php?id='.$bon->id.'">';
	  print '<input type="hidden" name="action" value="infocredit">';
	  print '<table class="border" width="100%">';
	  print '<tr><td width="20%">Cr<43>dit<69> le</td><td>';
	  print $html->select_date();
	  print '</td></tr>';
	  print '<tr><td colspan="2" align="center">';
	  print '<input type="submit" class="button" value="'.$langs->trans("Send").'">';
	  print '</td></tr>';
	  print '</table></form>';
	}

    }
  else
    {
      dolibarr_print_error($db);
    }
}

/* ************************************************************************** */
/*                                                                            */
/* Barre d'action                                                             */
/*                                                                            */
/* ************************************************************************** */

print "\n</div>\n<div class=\"tabsAction\">\n";

if ($_GET["action"] == '')
{  
  
  if ($bon->credite == 0)
    {      
      print "<a class=\"tabAction\" href=\"fiche.php?action=credite&amp;id=$bon->id\">".$langs->trans("Classer cr<EFBFBD>dit<EFBFBD>")."</a>";
    }


      
}

print "</div>";


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