mirror of
https://github.com/Dolibarr/dolibarr.git
synced 2025-12-12 20:41:26 +01:00
486 lines
12 KiB
PHP
486 lines
12 KiB
PHP
<?PHP
|
||
/* Copyright (C) 2002 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
||
*
|
||
* 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.php3");
|
||
require("./fichinter.class.php3");
|
||
require("../project.class.php3");
|
||
|
||
$db = new Db();
|
||
|
||
|
||
$sql = "SELECT s.nom, s.idp, s.prefix_comm FROM societe as s WHERE s.idp = $socidp;";
|
||
|
||
$result = $db->query($sql);
|
||
if ($result)
|
||
{
|
||
if ( $db->num_rows() )
|
||
{
|
||
$objsoc = $db->fetch_object(0);
|
||
}
|
||
$db->free();
|
||
}
|
||
|
||
|
||
llxHeader();
|
||
/*
|
||
* Traitements des actions
|
||
*
|
||
*
|
||
*/
|
||
|
||
if ($action == 'valid')
|
||
{
|
||
$fichinter = new Fichinter($db);
|
||
$fichinter->id = $id;
|
||
$fichinter->valid($user->id, $conf->fichinter->outputdir);
|
||
|
||
}
|
||
|
||
if ($action == 'add')
|
||
{
|
||
$fichinter = new Fichinter($db);
|
||
|
||
$fichinter->date = $db->idate(mktime(12, 1 , 1, $pmonth, $pday, $pyear));
|
||
|
||
$fichinter->socidp = $socidp;
|
||
$fichinter->duree = $duree;
|
||
|
||
$fichinter->projet_id = $projetidp;
|
||
|
||
$fichinter->author = $user->id;
|
||
$fichinter->note = $note;
|
||
|
||
$fichinter->ref = $ref;
|
||
|
||
$id = $fichinter->create();
|
||
}
|
||
|
||
if ($action == 'update')
|
||
{
|
||
$fichinter = new Fichinter($db);
|
||
|
||
$fichinter->date = $db->idate(mktime(12, 1 , 1, $remonth, $reday, $reyear));
|
||
|
||
$fichinter->socidp = $socidp;
|
||
$fichinter->duree = $duree;
|
||
|
||
$fichinter->projet_id = $projetidp;
|
||
|
||
$fichinter->author = $user->id;
|
||
$fichinter->note = $note;
|
||
|
||
$fichinter->ref = $ref;
|
||
|
||
$fichinter->update($id);
|
||
}
|
||
/*
|
||
*
|
||
* Generation
|
||
*
|
||
*/
|
||
if ($action == 'generate')
|
||
{
|
||
if ($id)
|
||
{
|
||
|
||
|
||
//$DBI = "dbi:mysql:dbname=lolixdev:host=espy:user=rodo";
|
||
|
||
$command = 'export LC_TIME=fr_FR ; export DBI_DSN="dbi:'.$conf->db->type.':dbname='.$conf->db->name.':host='.$conf->db->host.'"';
|
||
|
||
$command .= " ; ./tex-fichinter.pl --fichinter=".$id ;
|
||
$command .= " --pdf --ps -vv --html";
|
||
$command .= " --output=" .$conf->fichinter->outputdir;
|
||
$command .= " --templates=" .$conf->fichinter->templatesdir;
|
||
|
||
$output = system($command);
|
||
print $output;
|
||
|
||
print "<p>command : <b>$command<br>";
|
||
|
||
}
|
||
else
|
||
{
|
||
print $db->error();
|
||
}
|
||
}
|
||
/*
|
||
*
|
||
* Mode creation
|
||
* Creation d'une nouvelle fiche d'intervention
|
||
*
|
||
*/
|
||
if ($action == 'create')
|
||
{
|
||
|
||
print_titre("Cr<EFBFBD>ation d'une fiche d'intervention");
|
||
|
||
|
||
if ( $objsoc->prefix_comm )
|
||
{
|
||
|
||
$numpr = "FI-" . $objsoc->prefix_comm . "-" . strftime("%y%m%d", time());
|
||
|
||
$sql = "SELECT count(*) FROM llx_propal WHERE ref like '$numpr%'";
|
||
|
||
if ( $db->query($sql) )
|
||
{
|
||
$num = $db->result(0, 0);
|
||
$db->free();
|
||
if ($num > 0) {
|
||
$numpr .= "." . ($num + 1);
|
||
}
|
||
}
|
||
|
||
print "<form action=\"$PHP_SELF?socidp=$socidp\" method=\"post\">";
|
||
|
||
$strmonth[1] = "Janvier";
|
||
$strmonth[2] = "Février";
|
||
$strmonth[3] = "Mars";
|
||
$strmonth[4] = "Avril";
|
||
$strmonth[5] = "Mai";
|
||
$strmonth[6] = "Juin";
|
||
$strmonth[7] = "Juillet";
|
||
$strmonth[8] = "Août";
|
||
$strmonth[9] = "Septembre";
|
||
$strmonth[10] = "Octobre";
|
||
$strmonth[11] = "Novembre";
|
||
$strmonth[12] = "Décembre";
|
||
|
||
$smonth = 1;
|
||
$syear = date("Y", time());
|
||
print '<table border="1" cellspadding="3" cellspacing="0" width="100%">';
|
||
|
||
print "<tr><td>Soci<63>t<EFBFBD></td><td><b>".$objsoc->nom."</td></tr>";
|
||
|
||
print "<tr><td>Date</td><td>";
|
||
$cday = date("d", time());
|
||
print "<select name=\"pday\">";
|
||
for ($day = 1 ; $day < $sday + 32 ; $day++)
|
||
{
|
||
if ($day == $cday)
|
||
{
|
||
print "<option value=\"$day\" SELECTED>$day";
|
||
}
|
||
else
|
||
{
|
||
print "<option value=\"$day\">$day";
|
||
}
|
||
}
|
||
print "</select>";
|
||
$cmonth = date("n", time());
|
||
print "<select name=\"pmonth\">";
|
||
for ($month = $smonth ; $month < $smonth + 12 ; $month++) {
|
||
if ($month == $cmonth)
|
||
{
|
||
print "<option value=\"$month\" SELECTED>" . $strmonth[$month];
|
||
}
|
||
else
|
||
{
|
||
print "<option value=\"$month\">" . $strmonth[$month];
|
||
}
|
||
}
|
||
print "</select>";
|
||
|
||
print "<select name=\"pyear\">";
|
||
|
||
for ($year = $syear ; $year < $syear + 5 ; $year++)
|
||
{
|
||
print "<option value=\"$year\">$year";
|
||
}
|
||
print "</select></td></tr>";
|
||
|
||
print "<input type=\"hidden\" name=\"action\" value=\"add\">";
|
||
|
||
print "<tr><td>Num<75>ro</td><td><input name=\"ref\" value=\"$numpr\"></td></tr>\n";
|
||
print "<tr><td>Dur<EFBFBD>e (en jours)</td><td><input name=\"duree\"></td></tr>\n";
|
||
|
||
/*
|
||
*
|
||
* Projet associ<63>
|
||
*
|
||
*/
|
||
print '<tr><td valign="top">Projet</td><td><select name="projetidp">';
|
||
print '<option value="0"></option>';
|
||
|
||
$sql = "SELECT p.rowid, p.title FROM llx_projet as p WHERE p.fk_soc = $socidp";
|
||
|
||
if ( $db->query($sql) )
|
||
{
|
||
$i = 0 ;
|
||
$numprojet = $db->num_rows();
|
||
while ($i < $numprojet) {
|
||
$projet = $db->fetch_object($i);
|
||
print "<option value=\"$projet->rowid\">$projet->title</option>";
|
||
$i++;
|
||
}
|
||
$db->free();
|
||
} else {
|
||
print $db->error();
|
||
}
|
||
print '</select>';
|
||
if ($numprojet==0) {
|
||
print 'Cette soci<63>t<EFBFBD> n\'a pas de projet. ';
|
||
print '<a href=/comm/projet/fiche.php3?socidp='.$socidp.'&action=create>Cr<43>er un projet</a>';
|
||
}
|
||
print '</td></tr>';
|
||
|
||
|
||
print '<tr><td valign="top">Commentaires</td>';
|
||
print "<td><textarea name=\"note\" wrap=\"soft\" cols=\"60\" rows=\"15\"></textarea>";
|
||
print '</td></tr>';
|
||
|
||
print '<tr><td colspan="2" align="center">';
|
||
print "<input type=\"submit\" value=\"Enregistrer\">";
|
||
print '</td></tr>';
|
||
print "</table>";
|
||
|
||
print "</form>";
|
||
|
||
print "<hr noshade>";
|
||
}
|
||
else
|
||
{
|
||
print "Vous devez d'abord associer un prefixe commercial a cette societe" ;
|
||
}
|
||
}
|
||
/*
|
||
*
|
||
* Mode update
|
||
* Mise a jour de la fiche d'intervention
|
||
*
|
||
*/
|
||
if ($action == 'edit')
|
||
{
|
||
|
||
$fichinter = new Fichinter($db);
|
||
$fichinter->fetch($id);
|
||
|
||
/*
|
||
* Initialisation de la liste des projets
|
||
*/
|
||
$prj = new Project($db);
|
||
$listeprj = $prj->liste_array($fichinter->societe_id);
|
||
|
||
|
||
print_titre("Mettre <20> jour Fiche d'intervention");
|
||
|
||
print "<form action=\"$PHP_SELF?id=$id\" method=\"post\">";
|
||
|
||
print '<table border="1" cellspadding="3" cellspacing="0" width="100%">';
|
||
print "<tr><td>Date</td><td>";
|
||
/*
|
||
* set $reday, $remonth, $reyear
|
||
*/
|
||
print_date_select($fichinter->date);
|
||
|
||
print "</select></td></tr>";
|
||
|
||
print "<input type=\"hidden\" name=\"action\" value=\"update\">";
|
||
|
||
print '<tr><td>Num<75>ro</td><td>'.$fichinter->ref.'</td></tr>';
|
||
print '<tr><td>Dur<75>e (en jours)</td><td><input name="duree" value="'.$fichinter->duree.'"></td></tr>';
|
||
|
||
/*
|
||
*
|
||
* Projet associ<63>
|
||
*
|
||
*/
|
||
|
||
print '<tr><td valign="top">Projet</td><td>';
|
||
|
||
$sel = new Form($db);
|
||
$sel->select_array("projetidp",$listeprj,$fichinter->projet_id);
|
||
|
||
if (sizeof($listeprj) == 0)
|
||
{
|
||
print 'Cette soci<63>t<EFBFBD> n\'a pas de projet. ';
|
||
print '<a href=/comm/projet/fiche.php3?socidp='.$socidp.'&action=create>Cr<43>er un projet</a>';
|
||
}
|
||
print '</td></tr>';
|
||
|
||
|
||
print '<tr><td valign="top">Commentaires</td>';
|
||
print '<td><textarea name="note" wrap="soft" cols="60" rows="15">';
|
||
print $fichinter->note;
|
||
print '</textarea>';
|
||
print '</td></tr>';
|
||
|
||
print '<tr><td colspan="2" align="center">';
|
||
print "<input type=\"submit\" value=\"Enregistrer\">";
|
||
print '</td></tr>';
|
||
print "</table>";
|
||
|
||
print "</form>";
|
||
|
||
print "<hr noshade>";
|
||
|
||
}
|
||
|
||
/*
|
||
* Mode Fiche
|
||
* Affichage de la fiche d'intervention
|
||
*
|
||
*
|
||
*/
|
||
|
||
if ($id)
|
||
{
|
||
|
||
$fichinter = new Fichinter($db);
|
||
$fichinter->fetch($id);
|
||
|
||
print_titre("Fiche d'intervention");
|
||
|
||
print '<table border="1" cellspadding="3" cellspacing="0" width="100%">';
|
||
print '<tr><td width="20%">Date</td><td>'.strftime("%A %d %B %Y",$fichinter->date).'</td></tr>';
|
||
|
||
print '<tr><td>Num<75>ro</td><td>'.$fichinter->ref.'</td></tr>';
|
||
print '<tr><td>Dur<75>e</td><td>'.$fichinter->duree.'</td></tr>';
|
||
print '<tr><td valign="top">Projet</td><td> </td></tr>';
|
||
print '<tr><td valign="top">Commentaires</td>';
|
||
print '<td colspan="3">';
|
||
print nl2br($fichinter->note);
|
||
print '</td></tr>';
|
||
|
||
print '<tr><td>Documents</td><td colspan="3"><a href="'.$conf->fichinter->outputurl.'/'.$fichinter->ref.'">liste...</a></td></tr>';
|
||
|
||
$file = $conf->fichinter->outputdir . "/$fichinter->ref/$fichinter->ref.pdf";
|
||
if (file_exists($file))
|
||
{
|
||
|
||
print '<tr><td>PDF</td><td><a href="'.$conf->fichinter->outputurl.'/'.$fichinter->ref.'/'.$fichinter->ref.'.pdf">'.$fichinter->ref.'.pdf</a></td>';
|
||
print '<td align="right">'.filesize($file). ' bytes</td>';
|
||
print '<td>'.strftime("%d %b %Y %H:%M:%S",filemtime($file)).'</td>';
|
||
print '</tr>';
|
||
}
|
||
$file = $conf->fichinter->outputdir . "/$fichinter->ref/$fichinter->ref.ps";
|
||
if (file_exists($file))
|
||
{
|
||
print '<tr><td>PS</td><td><a href="'.$conf->fichinter->outputurl.'/'.$fichinter->ref.'/'.$fichinter->ref.'.ps">'.$fichinter->ref.'.ps</a></td>';
|
||
print '<td align="right">'.filesize($file).' bytes</td>';
|
||
print '<td>'.strftime("%d %b %Y %H:%M:%S",filemtime($file)).'</td>';
|
||
print '</tr>';
|
||
}
|
||
|
||
$file = $conf->fichinter->outputdir . "/$fichinter->ref/$fichinter->ref.tex";
|
||
if (file_exists($file)) {
|
||
print '<tr><td>tex</td><td><a href="'.$conf->fichinter->outputurl.'/'.$fichinter->ref.'/'.$fichinter->ref.'.tex">'.$fichinter->ref.'.tex</a>';
|
||
print ' [<a href="texview.php3?fichinter_ref='.$fichinter->ref.'">view</a>]';
|
||
print '</td>';
|
||
print '<td align="right">'.filesize($file).' bytes</td>';
|
||
print '<td>'.strftime("%d %b %Y %H:%M:%S",filemtime($file)).'</td>';
|
||
print '</tr>';
|
||
}
|
||
|
||
|
||
print '</td></tr>';
|
||
|
||
print "</table>";
|
||
|
||
|
||
print '<br><table border="1" cellspadding="3" cellspacing="0" width="100%"><tr>';
|
||
|
||
if ($fichinter->statut == 0)
|
||
{
|
||
|
||
print '<td align="center" width="20%"><a href="fiche.php3?id='.$id.'&action=edit">Mettre <20> jour</a></td>';
|
||
print '<td align="center" width="20%">-</td>';
|
||
|
||
print '<td align="center" width="20%"><a href="fiche.php3?id='.$id.'&action=generate">G<>n<EFBFBD>ration du pdf</a></td>';
|
||
print '<td align="center" width="20%">-</td>';
|
||
|
||
print '<td align="center" width="20%"><a href="fiche.php3?id='.$id.'&action=valid">Valider</a></td>';
|
||
|
||
}
|
||
else
|
||
{
|
||
print '<td align="center" width="20%">-</td>';
|
||
print '<td align="center" width="20%">-</td>';
|
||
print '<td align="center" width="20%">-</td>';
|
||
print '<td align="center" width="20%">-</td>';
|
||
print '<td align="center" width="20%">-</td>';
|
||
}
|
||
|
||
print '</tr></table>';
|
||
|
||
}
|
||
|
||
/*
|
||
*
|
||
* Liste des fiches
|
||
*
|
||
*/
|
||
$sql = "SELECT s.nom,s.idp, f.ref,".$db->pdate("f.datei")." as dp, f.rowid as fichid, f.fk_statut, fk_projet";
|
||
$sql .= " FROM societe as s, llx_fichinter as f ";
|
||
$sql .= " WHERE f.fk_soc = s.idp ";
|
||
if ($socidp)
|
||
{
|
||
$sql .= "AND s.idp = $socidp";
|
||
}
|
||
if ($fichinter > 0)
|
||
{
|
||
$sql .= "AND s.idp = $fichinter->societe_id";
|
||
}
|
||
|
||
$sql .= " ORDER BY f.datei DESC ;";
|
||
|
||
if ( $db->query($sql) )
|
||
{
|
||
$num = $db->num_rows();
|
||
$i = 0;
|
||
print "<p><TABLE border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"4\">";
|
||
print "<TR class=\"liste_titre\">";
|
||
print "<TD>Num</TD>";
|
||
print "<TD>Soci<63>t<EFBFBD></td>";
|
||
print "<TD>Date</TD>";
|
||
print "<TD>Statut</TD><td> </td>";
|
||
print "</TR>\n";
|
||
$var=True;
|
||
while ($i < $num)
|
||
{
|
||
$objp = $db->fetch_object( $i);
|
||
$var=!$var;
|
||
print "<TR $bc[$var]>";
|
||
print "<TD><a href=\"fiche.php3?id=$objp->fichid\">$objp->ref</a></TD>\n";
|
||
print "<TD><a href=\"/comm/fiche.php3?socid=$objp->idp\">$objp->nom</a></TD>\n";
|
||
print "<TD>".strftime("%d %B %Y",$objp->dp)."</TD>\n";
|
||
print "<TD>$objp->fk_statut</TD>\n";
|
||
|
||
print '<TD align="center"><a href="fiche.php3?socidp='.$objp->idp.'&action=create">[Fiche Inter]</A></td>';
|
||
|
||
print "</TR>\n";
|
||
|
||
$i++;
|
||
}
|
||
|
||
print "</TABLE>";
|
||
$db->free();
|
||
}
|
||
else
|
||
{
|
||
print $db->error();
|
||
print "<p>$sql";
|
||
}
|
||
$db->close();
|
||
llxFooter();
|
||
?>
|