altocompta/include/class_action.php

<?php  
/*
 *   This file is part of PhpCompta.
 *
 *   PhpCompta 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.
 *
 *   PhpCompta 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 PhpCompta; if not, write to the Free Software
 *   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
*/
/* $Revision$ */
// Copyright Author Dany De Bontridder ddebontridder@yahoo.f

require_once("class_fiche.php");
require_once("class_document.php");
require_once("class_document_type.php");
require_once("user_common.php");
/*!\file 
 * \brief class_action for manipulating actions
 * action can be :
 * <ul>
 * <li>an invoice
 * <li>a meeting
 * <li>an order
 * <li>a letter
 *</ul>
 * The table document_type are the possible actions
 */
/*!
 * \brief class_action for manipulating actions
 * action can be :
 * <ul>
 * <li> a meeting
 * <li>an order
 * <li>a letter
 * </ul>
 * The table document_type are the possible actions
 */

class action 
{
 /*!<  $db  database connexion   
  *  $ag_comment description (ag_gestion.ag_comment)
  *  $ag_timestamp document date (ag_gestion.ag_timestamp)
  *  $dt_id type of the document (document_type.dt_id)
  *  $d_state stage of the document (printed, send to client...)
  *  $d_number number of the document
  *  $d_filename filename's document
  *  $d_mimetype document's filename
  *  $ag_title title document
  *  $f_id_dest fiche id (From field )
  *  $f_id_exp fiche id (to field)
  *  $ag_ref_ag_id concern previous action
  *  $ag_id pk of the table action_gestion

  * \todo replace attribut from class document  document by an object document 
  */
  var $db;
  var $ag_comment;
  var $ag_timestamp;
  var $dt_id;
  var $d_state;
  var $d_number;
  var $d_filename;
  var $d_mimetype;
  var $ag_title;
  var $f_id;
  var $ag_ref_ag_id;
/*!  constructor
 * \brief constructor
 * \param p_cn database connection
 */
  function action ($p_cn)
    {
      $this->db=$p_cn;
      $this->f_id=0;

    }
  //----------------------------------------------------------------------
  /*!  Display
   * \brief Display the object, the tags for the FORM
   *        are in the caller. It will be used for adding and updating 
   *        action 
   *\note  If  ag_id is not equal to zero then it is an update otherwise
   *        it is a new document
   *
   * \param $p_view if set to true the form will be in readonly mode 
   * \param $p_gen true we show the tag for generating a doc
   *
   * \note  update the reference number or the document type is not allowed
   *       
   *
   * \return string containing the html code
   */
  function Display($p_view,$p_gen) 
    {
      echo_debug('class_action',__LINE__,'Display()  :'.var_export($_POST,true));
      echo_debug('class_action',__LINE__,'Display $this  :'.var_export($this,true));


      if ( $p_view=='UPD')
		{
		  $upd=true;	
		  $readonly=false;
		}
      elseif ($p_view=="NEW")
		{
		  $upd=false;
		  $readonly=false;
		}
      elseif ($p_view=='READ')
		{
		  $upd=true;
		  $readonly=true;
		}
      else
		{
		  exit('class_action'.__LINE__.'Action::Display error unknown parameter'.$p_view);
		  
		}
      // Compute the widget
      // Date 
      $date=new widget("js_date");
      $date->readonly=$readonly;
      $date->name="ag_timestamp";
      $date->value=$this->ag_timestamp;
      
      
      // for insert mode only
      if ( $upd == false )
	{
	  // Doc Type
	  $doc_type=new widget("select");
	  $doc_type->name="dt_id";
	  $doc_type->value=make_array($this->db,"select dt_id,dt_value from document_type where dt_id in (".ACTION.")");
	  $doc_type->selected=$this->dt_id;
	  $doc_type->readonly=false;
	  $str_doc_type=$doc_type->IOValue();
	  echo_debug('class_action',__LINE__,var_export($doc_type,true));
	}
      else {
	// Doc Type
	$doc_type=new widget("hidden");
	$doc_type->name="dt_id";
	$doc_type->value=$this->dt_id;
	$str_doc_type=$doc_type->IOValue()." ".getDbValue($this->db,"select dt_value from document_type where dt_id=".$this->dt_id);
      }

      // Description
      $desc=new widget('RICHTEXT');
      $desc->width=700;
      $desc->heigh=100;
      $desc->name="ag_comment";
      $desc->readonly=$readonly;
	  /*!\todo Formatstring and urldecode ?? */
      $desc->value=FormatString(urldecode($this->ag_comment));

      // state
      // Retrieve the value
      if ( $p_view != 'READ' )
	{
	  $a=make_array($this->db,"select s_id,s_value from document_state ");
	  $state=new widget("select");
	  $state->readonly=$readonly;
	  $state->name="d_state";
	  $state->value=$a;
	  $state->selected=$this->d_state;
	  $str_state=$state->IOValue();
	} else {
	  $str_state="";
	  if ( strlen($this->d_state) != 0 )
	    {	  $str_state=getDbValue($this->db,"select s_value from document_state where s_id=".$this->d_state);
	    $g=new widget("hidden");
	    $str_state.=$g->IOValue('d_state',$this->d_state);
	    }
	}
      // Retrieve the value if there is an attached doc
      $doc_ref="";
      // Document id

      $h2=new widget("hidden");
      $h2->name="d_id";
      $h2->value=$this->d_id;
      
      if ( $this->d_id != 0 && $this->d_id != "" )
	{
	  $h2->readonly=($p_view=='NEW')?false:true;
	  $doc=new Document($this->db,$this->d_id);
	  $doc->get();
	  if ( strlen(trim($doc->d_lob)) != 0 )
	    {
	      $d_id=new widget("hidden");
	      $doc_ref="<p> Document ".$doc->a_ref().'</p>';
	      $doc_ref.=$h2->IOValue().$d_id->IOValue('d_id',$this->d_id);
	    }
	      
	}


      // title
      $title=new widget("text");
      $title->readonly=$readonly;
      $title->name="ag_title";
	  //      $title->value=FormatString($this->ag_title);
      $title->value=$this->ag_title;
      $title->size=80;

      // ag_ref
      // Always false for update
      $ag_ref=new widget("text");
      $ag_ref->readonly=$upd;
      $ag_ref->name="ag_ref";
      $ag_ref->value=FormatString($this->ag_ref);
      $client_label=new widget("span");

      // f_id_dest destination
      if ( $this->qcode_dest != '- ERROR -' && strlen(trim($this->qcode_dest)) != 0)
	{
	  $tiers=new fiche($this->db);
	  $tiers->get_by_qcode($this->qcode_dest);
	  $qcode_dest_label=$tiers->strAttribut(1);
	} else {
	  //	  echo "f_id $this->f_id";
	  $qcode_dest_label=($this->f_id_dest==0 || trim($this->qcode_dest)=="")?'Interne ':'Error';
	}

      // f_id_exp sender
      if ( $this->qcode_exp != '- ERROR -' && strlen(trim($this->qcode_exp)) != 0)
	{
	  $tiers=new fiche($this->db);
	  $tiers->get_by_qcode($this->qcode_exp);
	  $qcode_exp_label=$tiers->strAttribut(1);
	} else {
	  $qcode_exp_label=($this->f_id_exp==0 || trim($this->qcode_exp)=="")?'Interne ':'Error';
	}

      $h_ag_id=new widget("hidden");
      // if concerns another action : show the link otherwise nothing
      $lag_ref_ag_id=" X / XX ";
      
      if ( $this->ag_ref_ag_id != 0 )
	{
    // 	    $this->GetAgRef("ag_ref_ag_id")."</A>";

	  $lag_ref_ag_id='<a class="mtitle" href="commercial.php?p_action=suivi_courrier&sa=detail&ag_id='.
	    $this->ag_ref_ag_id.'&'.dossier::get().'">'.
	    getDbValue($this->db,"select ag_ref from action_gestion where ag_id=".$this->ag_ref_ag_id).
	    "</A>";
	} 
      // sender
      $w=new widget('js_search_only');
      $w->readonly=$readonly;
      $w->name='qcode_exp';
      $w->value=($this->f_id_exp != 0)?$this->qcode_exp:"";
      $w->label="";
      $w->extra='4,8,9,14,16';
      $sp= new widget("span");
      $h_agrefid=new widget('hidden');
      // destination
      $wdest=new widget('js_search_only');
      $wdest->readonly=$readonly;
      $wdest->name='qcode_dest';
      $wdest->value=($this->f_id_dest != 0)?$this->qcode_dest:"";
      $wdest->label="";
      $wdest->extra='4,8,9,14,16';
      $spdest= new widget("span");
      $h_agrefid=new widget('hidden');
      $str_ag_ref="<b>".(($this->ag_ref != "")?$this->ag_ref:" Nouveau ")."</b>";
      // Preparing the return string
      $r="";
      $r.=JS_SEARCH_CARD;
      $r.= '<p>Date :'.$date->IOValue()." <br>Reference  ".$str_ag_ref; 
      $r.="&nbsp;         Concerne :".$lag_ref_ag_id.
      '   Type d\' action';
      echo_debug('class_action',__LINE__,"str_doc_type $str_doc_type");
      $r.= $str_doc_type;

      // state
      $r.="     Etat :".$str_state."</p>";


      $r.= "<p> ";
      $r.="Exp&eacute;diteur : ".$w->IOValue();
      $r.=$sp->IOValue('qcode_exp_label',$qcode_exp_label)."</TD></TR>";
      $r.="Destinataire :".$wdest->IOValue();
      $r.=$spdest->IOValue('qcode_dest_label',$qcode_dest_label)."</TD></TR>";

      //      $r.=' Ref :'.$ag_ref->IOValue();
      $r.="</p>";
      echo_debug('class_action',__LINE__,' ag_id is '.$this->ag_id);

      $r.= "<p> Titre : ".$title->IOValue();
      $r.= "<p>".$desc->IOValue()."</p>";
      $r.= $doc_ref;

      //hidden
      $r.="<p>";
      $r.=$h2->IOValue();
      $r.=$h_agrefid->IOValue("ag_ref_ag_id",$this->ag_ref_ag_id); 
      $r.=$h_ag_id->IOValue('ag_id',$this->ag_id);
      $hidden=new widget('hidden');
      $r.=$hidden->IOValue('f_id_dest',$this->f_id_dest);
      $hidden2=new widget('hidden');
      $r.=$hidden2->IOValue('f_id_exp',$this->f_id_exp);

      $r.="</p>";

      // show the list of the concern operation
      if ( CountSql($this->db,'select * from action_gestion where ag_ref_ag_id!=0 and ag_ref_ag_id='.$this->ag_id.
		    " limit 2") > 0 )
	$r.=$this->myList(ACTION," and ag_ref_ag_id=".$this->ag_id);
      return $r;
 
    }
  //----------------------------------------------------------------------
  /*!\brief This function shows the detail of an action thanks the ag_id
   */
  function get()
    {
      echo_debug('class_action',__LINE__,'Action::Get() ');
      $sql="select ag_id, ag_comment,to_char (ag_timestamp,'DD-MM-YYYY') as ag_timestamp,".
	" f_id_dest,f_id_exp,ag_title,ag_comment,ag_ref,d_id,ag_type,d_state,  ".
	" ag_ref_ag_id ".
	" from action_gestion left join document using (ag_id) where ag_id=".$this->ag_id;
      $r=ExecSql($this->db,$sql);
      $row=pg_fetch_all($r);
      if ( $row==false) return;
      $this->ag_comment=$row[0]['ag_comment'];
      $this->ag_timestamp=$row[0]['ag_timestamp'];
      $this->f_id_dest=$row[0]['f_id_dest'];
      $this->f_id_exp=$row[0]['f_id_exp'];
      $this->ag_title=$row[0]['ag_title'];
      $this->ag_type=$row[0]['ag_type'];
      $this->ag_ref=$row[0]['ag_ref'];
      $this->ag_ref_ag_id=$row[0]['ag_ref_ag_id'];
      $this->d_id=$row[0]['d_id'];
      //
      echo_debug('class_action',__LINE__,' Document id = '.$this->d_id);
      // if there is no document set 0 to d_id
      if ( $this->d_id == "" ) 
	$this->d_id=0;
      // if there is a document fill the object
      if ($this->d_id != 0 )
	{
	  $this->state=$row['0']['d_state'];
	  $this->d_state=$row[0]['d_state'];
	}
      echo_debug('class_action',__LINE__,' After test Document id = '.$this->d_id);
      $this->dt_id=$this->ag_type;
      $adest=new fiche($this->db,$this->f_id_dest);
      $this->qcode_dest=$adest->strAttribut(ATTR_DEF_QUICKCODE);
      $aexp=new fiche($this->db,$this->f_id_exp);
      $this->qcode_exp=$aexp->strAttribut(ATTR_DEF_QUICKCODE);

      echo_debug('class_action',__LINE__,'Detail end ()  :'.var_export($_POST,true));
      echo_debug('class_action',__LINE__,'Detail $this  :'.var_export($this,true));

    }
/*!  Confirm
 * \brief Display the encoded data and ask a confirmation
 *        this correspond to the stage 1, before the generation
 *        or the upload of document
 * 
 * 
 * \return string containing the form
 */
  function Confirm()
    {
      echo_debug('class_action',__LINE__,'confirm()  :'.var_export($_POST,true));
      echo_debug('class_action',__LINE__,'confirm $this  :'.var_export($this,true));

      if ( isDate($this->ag_timestamp) == null )
		{
		  // if the date is invalid, default date is today
		  $this->ag_timestamp=date("d.m.Y");
		}
      // Compute the widget
      // Date 
      $date=new widget("text");
      $date->readonly=true;
      $date->name="ag_timestamp";
      $date->value=$this->ag_timestamp;
      // Doc Type
      $doc_type=new widget("hidden");
      $doc_type->name="dt_id";
      $doc_type->value=$this->dt_id;
      $a=ExecSql($this->db,"select dt_value from document_type where dt_id=".$this->dt_id);
      $v=pg_fetch_array($a,0);
      $str_type=$v[0];
      if ( isset ($_REQUEST['url'])) 
	{
	  $retour=widget::button_href('Retour',urldecode($_REQUEST['url']));
				 
	  $h_url=sprintf('<input type="hidden" name="url" value="%s">',urldecode($_REQUEST['url']));
	}
      else 
	{ 
	  $retour="";
	  $h_url="";
	}

      // state
      $a=ExecSql($this->db,"select s_value from document_state where s_id=".$this->d_state);
      $v=pg_fetch_array($a,0);
      $str_state=$v[0];
      $state=new widget("hidden");
      $state->name="d_state";
      $state->value=$this->d_state;
	
      // title
      $title=new widget("text");
      $title->readonly=true;
      $title->name="ag_title";
      $title->value=FormatString($this->ag_title);

      // Description
      $desc=new widget('textarea');
      $desc->name="ag_comment";
      $desc->readonly=" disabled ";
      $desc->value=$this->ag_comment;
      // Propose to generate a document
      $gen=new widget ("checkbox");
      $gen->name="p_gen";
      $doc_gen=new widget("select");
      $doc_gen->name="gen_doc";
      $doc_gen->value=make_array($this->db,
				 "select md_id,md_name from document_modele where md_type=".$this->dt_id);

      $h_agrefid=new widget('hidden');

       // f_id
       if ( trim($this->qcode_dest) =="")
         {
           // internal document
           $this->f_id_dest=0; // internal document
           $namedest="interne";
         }
       else // ( trim($this->qcode_dest) !=""  )
         {
           $tiers=new fiche($this->db);
           $tiers->get_by_qcode($this->qcode_dest);
           $this->f_id_dest=$tiers->id;
           $namedest=$tiers->strAttribut(1);
		if ( $namedest == '- ERROR  -') $this->f_id_dest=-1;	
         }
 
       // f_id
       if ( trim($this->qcode_exp) =="")
         {
           // internal document
           $this->f_id_exp=0; // internal document
           $nameexp="interne";
         }
       else // ( trim($this->qcode_exp) !=""  )
         {
           $tiers=new fiche($this->db);
           $tiers->get_by_qcode($this->qcode_exp);
           $this->f_id_exp=$tiers->id;
           $nameexp=$tiers->strAttribut(1);
		if ( $nameexp == '- ERROR  -') $this->f_id_exp=-1;	
         }
 


      // Preparing the return string
      $r=$retour."<form method=\"post\">";
	  $r.=dossier::hidden();
      $r.="<p>Date : ".$date->IOValue()."</p>";
      $r.="<p>Etat $str_state".$state->IOValue()."</p>";
      $r.="<p>Type du document $str_type".$doc_type->IOValue()."</p>";
      $r.="<p> Expediteur : ".$this->qcode_exp." ".$nameexp.'</p>';
      $r.="<p> Destinataire : ".$this->qcode_dest." ".$namedest.'</p>';
      $r.="<p> Titre : ".$title->IOValue();
      $r.="<p>Description :".$desc->IOValue()."</p>";

      // if no document exist for this type then do not display the question
      if ( sizeof($doc_gen->value) != 0) 
	$r.="<p> G&eacute;n&eacute;rer un document ".$gen->IOValue()." ".$doc_gen->IOValue()."</p>";
	

      // Add the hidden tag
      $r.='<input type="hidden" name="sa" value="save_action_st2">';
      $r.='<input type="hidden" name="p_action" value="suivi_courrier">';
      $r.='<input type="hidden" name="f_id_dest" value="'.$this->f_id_dest.'">';
      $r.='<input type="hidden" name="f_id_exp" value="'.$this->f_id_exp.'">';
      $r.='<input type="hidden" name="qcode_dest" value="'.$this->qcode_dest.'">';
      $r.='<input type="hidden" name="qcode_exp" value="'.$this->qcode_exp.'">';


      $r.=	$h_agrefid->IOValue("ag_ref_ag_id",$this->ag_ref_ag_id);
	
      // retrieve customer


      if ( $this->f_id_dest != -1 && $this->f_id_exp !=-1 )
	$r.=widget::submit("Save","Sauve");
      $r.=widget::submit("corr","Corrige");

      $r.=$h_url."</form>";
      return $r;
    }
/*!  SaveStage2
 * \brief Save the document and propose to save the generated document or  
 *  to upload one, the data are included except the file. Temporary the generated
 * document is save
 *
 * \return
 */
  function SaveStage2() 
    {
      echo_debug('class_action',__LINE__,'saveStage2()  :'.var_export($_POST,true));
      echo_debug('class_action',__LINE__,' saveStage2()  $this  :'.var_export($this,true));

      // Get The sequence id, 
      $seq_name="seq_doc_type_".$this->dt_id;
      $str_file="";
      $add_file='';
      // f_id dest
      $tiers=new fiche($this->db);
      $tiers->get_by_qcode($this->qcode_dest);

      // f_id exp
      $exp=new fiche($this->db);
      $exp->get_by_qcode($this->qcode_exp);

      if ( trim($this->ag_title) == "") 
	{
	  $doc_mod=new document_type($this->db);
	  $doc_mod->dt_id=$this->dt_id;
	  $doc_mod->get();
	  $this->ag_title=$doc_mod->dt_value;
	}
      echo_debug('class_action',__LINE__," tiers->id  ".$tiers->id);
      $this->ag_id=NextSequence($this->db,'action_gestion_ag_id_seq');
      // Create the reference 
      $ref=$this->dt_id.'/'.$this->ag_id;
      $this->ag_ref=$ref;
      /*!\brief the ag_comment is already urlencoded 
       */
      //we remove newline 
      $this->ag_comment=str_replace("%OD","",$this->ag_comment);
      $this->ag_comment=str_replace("%OA","",$this->ag_comment);
      // save into the database
      $sql=sprintf("insert into action_gestion".
		   "(ag_id,ag_timestamp,ag_type,ag_title,f_id_dest,f_id_exp,ag_comment,ag_ref,ag_ref_ag_id) ".
		   " values (%d,to_date('%s','DD-MM-YYYY'),'%d','%s',%d,%d,'%s','%s',%d)",
		   $this->ag_id,
		   $this->ag_timestamp,
		   $this->dt_id,
		   FormatString($this->ag_title),
		   $tiers->id,
		   $exp->id,
		   $this->ag_comment,
		   $ref,
		   $this->ag_ref_ag_id
		   );
      ExecSql($this->db,$sql);



      // the lob filename and the mimetype needed if we want to generate a doc.
      if ( $this->gen == 'on' ) 
	{
	  $doc=new Document($this->db);
	  $doc->f_id=$tiers->id;
	  $doc->md_id=$this->md_id;
	  $doc->ag_id=$this->ag_id;
	  $doc->d_state=$this->d_state;
	  $str_file=$doc->Generate();
	  $d='<input type="hidden" name="d_id" value="'.$doc->d_id.'">';
	}
      $r="";
      // readonly and upload of a file
      $r.="<hr>";
      $r.='<form enctype="multipart/form-data" method="post">';
	  $r.=dossier::hidden();
      echo_debug("class_action",__LINE__,"call display");
      $r.=$this->Display('READ',false);
      // Add the hidden tag
      $r.='<input type="hidden" name="sa" value="save_action_st3">';
      $r.='<input type="hidden" name="p_action" value="suivi_courrier">';
      // add the d_id
      $r.='<input type="hidden" name="d_id" value="'.$this->d_id.'">'; 
      // ag_comment must be saved in urlcode
      $r.='<input type="hidden" name="ag_comment" value="'.urlencode($this->ag_comment).'">';
      // add hidden code for qcode_exp, qcode_dest
      $r.='<input type="hidden" name="qcode_dest" value="'.$this->qcode_dest.'">';
      $r.='<input type="hidden" name="qcode_exp" value="'.$this->qcode_exp.'">';
      // Value for the generated document
      if ( $this->gen == 'on' ) 
	{
	  $r.='<input type="hidden" name="d_id" value="'.$doc->d_id.'">';
	  $r.="Sauver le document généré :";
	  $r.=$str_file;
	  $checkbox=new widget("checkbox");
	  $checkbox->name="save_generate";
	  $r.=$checkbox->IOValue();
	  $r.="<hr>";
	}
      $upload=new widget("file");
      $upload->name="file_upload";
      $upload->value="";
      $r.="Enregistrer le fichier ".$upload->IOValue();
      $r.=widget::submit("save","Sauve le fichier");
      $r.="</form>";
      return $r;
    }
/*! SaveStage3
 * \brief Upload the document or save the generated document
 * \param $d_id document_id when we upload we don't increment seq. if = 0 then no file
 *
 */
  function SaveStage3($d_id) 
    {
      echo_debug('class_action',__LINE__,'SaveStage3()  :'.var_export($_POST,true));
      echo_debug('class_action',__LINE__,'SaveStage3  :'.var_export($this,true));

      // if we save the generated doc
      if ( isset($_POST['save_generate']))
	{
	  return;
	}

      // Upload a new document
      $doc=new Document($this->db);
      $doc->ag_id=$this->ag_id;
      // if there is a document and it is not an update
      if ( sizeof($_FILES) !=0 && $d_id==0) 
	{
	  $doc->md_type=$this->dt_id;
	  $doc->blank();
	}
      else 
	$doc->d_id=$d_id;

      $doc->Upload($this->ag_id);
    }

/*! myList($p_filter="")
 * \brief Show list of action
 * \param  $p_filter filters on the document_type
 * \param $p_search must a valid sql command ( ex 'and  ag_title like upper('%hjkh%'))
 * 
 * 
 * \return string containing html code
 */
  function myList($p_filter="",$p_search="")
    {
	  $str_dossier=dossier::get();
      // for the sort
      $sort="";
      $image_asc='<IMAGE SRC="image/down.png" border="0" >';
      $image_desc='<IMAGE SRC="image/up.png" border="0" >';
      $image_sel_desc='<IMAGE SRC="image/select1.png" border="0" >';
      $image_sel_asc='<IMAGE SRC="image/select2.png" border="0" >';

      $url=CleanUrl();

      $sort_date='<th><A class="mtitle" href="?'.$url.'&s=date_a">'.$image_asc.'</A>'.
	'Date'.
	'<A class="mtitle"  href="?'.$url.'&s=date_d&'.$str_dossier.'">'.$image_desc.'</A></th>';
      $sort_exp='<th><A  class="mtitle"  href="?'.$url.'&s=exp&'.$str_dossier.'">'.$image_asc.'</A>'.
	'Expéditeur'.
	'<A  class="mtitle"  href="?'.$url.'&s=exp_d&'.$str_dossier.'">'.$image_desc.'</A></th>';
      $sort_dest='<th><A  class="mtitle" href="?'.$url.'&s=dest&'.$str_dossier.'">'.$image_asc.'</A>'.
	'Destinataire'.
	'<A class="mtitle"  href="?'.$url.'&s=dest_d&'.$str_dossier.'">'.$image_desc.'</A></th>';
      $sort_titre='<th><A  class="mtitle"  href="?'.$url.'&s=ti&'.$str_dossier.'">'.$image_asc.'</A>'.
	'Titre'.
	'<A  class="mtitle"  href="?'.$url.'&s=ti_d&'.$str_dossier.'">'.$image_desc.'</A></th>';
      $sort_concerne='<th><A  class="mtitle"  href="?'.$url.'&s=conc&'.$str_dossier.'">'.$image_asc.'</A>'.
	'Concerne'.
	'<A class="mtitle"  href="?'.$url.'&s=conc_d&'.$str_dossier.'">'.$image_desc.'</A></th>';
      $sort_reference='<th><A class="mtitle"  href="?'.$url.'&s=ref&'.$str_dossier.'">'.$image_asc.'</A>'.
	'Référence'.
	'<A  class="mtitle"  href="?'.$url.'&s=ref_d&'.$str_dossier.'">'.$image_desc.'</A></th>';

      if ( isset($_GET['s'])){
	{
	  switch ($_GET['s']) {
	  case "date_a":
	    $sort=" ag_timestamp asc";
	    $sort_date='<th>'.$image_sel_asc.'</A>'.
	      'Date'.
	      '<A  class="mtitle"  href="?'.$url.'&s=date_d">'.$image_desc.'</A></th>';
	    break;

	  case "date_d":
	    $sort=" ag_timestamp desc";
	    $sort_date='<th><A class="mtitle"  href="?'.$url.'&s=date_a">'.$image_asc.'</A>'.
	      'Date'.
	      $image_sel_desc.'</th>';
	    break;

	  case "exp":
	    $sort_exp='<th>'.$image_sel_asc.'</A>'.
	      'Expéditeur'.
	      '<A  class="mtitle"  href="?'.$url.'&s=exp_d">'.$image_asc.'</A></th>';
	    $sort=" f_id_exp asc";
	    break;

	  case "exp_d":
	    $sort_exp='<th><A  class="mtitle"  href="?'.$url.'&s=exp">'.$image_asc.'</A>'.
	      'Expéditeur'.
	      $image_sel_desc.'</th>';

	    $sort=" f_id_exp desc";
	    break;

	  case "dest":
	    $sort_dest='<th>'.$image_sel_asc.
	      'Destinataire'.
	      '<A class="mtitle"  href="?'.$url.'&s=dest_d">'.$image_desc.'</A></th>';

	    $sort=" f_id_dest asc";
	    break;
	  case "dest_d":
	    $sort_dest='<th><A  class="mtitle"  href="?'.$url.'&s=dest">'.$image_asc.'</A>'.
	      'Destinataire'.
	      $image_sel_desc.'</th>';
	    
	    $sort=" f_id_dest desc";
	    break;

	  case "ti":
	    $sort_titre='<th>'.$image_sel_asc.
	      'Titre'.
	      '<A class="mtitle"  href="?'.$url.'&s=ti_d">'.$image_desc.'</A></th>';

	    $sort=" ag_title  asc";
	    break;
	  case "ti_d":
	    $sort_titre='<th><A  class="mtitle" href="?'.$url.'&s=ti">'.$image_asc.'</A>'.
	      'Titre'.
	      $image_sel_desc.'</th>';
	    
	    $sort=" ag_title desc";
	    break;
	    
	  case "conc":
	    $sort_concerne='<th>'.$image_sel_asc.
	      'Concerne'.
	      '<A  class="mtitle" href="?'.$url.'&s=conc_d">'.$image_desc.'</A></th>';

	    $sort=" ag_ref_ag_id asc";
	    break;
	  case "conc_d":
	    $sort_concerne='<th><A  class="mtitle"  href="?'.$url.'&s=conc">'.$image_asc.'</A>'.
	      'Concerne'.
	      $image_sel_desc.'</th>';

	    $sort=" ag_ref_ag_id desc";
	    break;

	  case "ref":
	    $sort_reference='<th>'.$image_sel_asc.
	      'Référence'.
	      '<A  class="mtitle"  href="?'.$url.'&s=ref_d">'.$image_desc.'</A></th>';

	    $sort=" ag_ref ";
	    break;

	  case "ref_d":
	    $sort_reference='<th><A class="mtitle"  href="?'.$url.'&s=ref">'.$image_asc.'</A>'.
	      'Référence'.
	      $image_sel_desc.'</th>';

	    $sort=" ag_ref desc";
	    break;


	  }
	  $sort=" order by ".$sort;
	}
      }
      $sql="
   select ag_id,to_char(ag_timestamp,'DD-MM-YYYY') as my_date,ag_ref_ag_id,f_id_dest,f_id_exp".
	",ag_title,d_id,md_type,dt_value,ag_ref 
   from action_gestion 
      left outer join document using (ag_id)
      left outer join document_modele on (ag_type=md_type) 
      join document_type on (ag_type=dt_id)
   where dt_id in ($p_filter) $p_search $sort";
      $max_line=CountSql($this->db,$sql);
      $step=$_SESSION['g_pagesize'];
      $page=(isset($_GET['offset']))?$_GET['page']:1;
      $offset=(isset($_GET['offset']))?pg_escape_string($_GET['offset']):0;
      $limit=" LIMIT $step OFFSET $offset ";  
      $bar=jrn_navigation_bar($offset,$max_line,$step,$page);

      $Res=ExecSql($this->db,$sql.$limit);
      $a_row=pg_fetch_all($Res);

      $r="";
      $r.=$bar;
      $r.='<table class="document">';
      $r.="<tr>";
      $r.=$sort_date;
      $r.=$sort_dest;
      $r.=$sort_exp;
      $r.=$sort_titre;
      $r.='<th>type</th>';
      $r.=$sort_reference;
      $r.=$sort_concerne;
      $r.='<th>Document</th>';
      $r.="</tr>";

      
      // if there are no records return a message
      if ( sizeof ($a_row) == 0 or $a_row == false ) 
	{
	  $r='<div class="u_redcontent">';
	  $r.='<hr>Aucun enregistrement trouvé';
	  $r.="</div>";
	  return $r;

	}
      $r.=JS_SEARCH_CARD;
      $i=0;
      foreach ($a_row as $row )
	{
	  $href='<A class="document" HREF="commercial.php?p_action=suivi_courrier&sa=detail&ag_id='.$row['ag_id'].'&'.$str_dossier.'">';
	  $i++;
	  $tr=($i%2==0)?'even':'odd';
	  $r.="<tr class=\"$tr\">";
	  $r.="<td>".$href.$row['my_date'].'</a>'."</td>";
	  // Destinataire
	  $fdest=new fiche($this->db);
	  $fdest->id=$row['f_id_dest'];
	  $qcode_dest=$fdest->strAttribut(ATTR_DEF_QUICKCODE);

	  $qdest=($qcode_dest=="- ERROR -")?"Interne":$qcode_dest;
	  $jsdest=sprintf("javascript:showfiche('%s','%s')",
		      $_REQUEST['PHPSESSID'],$qdest);
	  if ( $qdest != 'Interne' )
	    {
	      $r.="<td>".$href.$qdest." : ".$fdest->getName().'</a></td>';
	    }
	  else
	    $r.="<td>$href Interne </a> </td>";

	  // Expediteur
	  $fexp=new fiche($this->db);
	  $fexp->id=$row['f_id_exp'];
	  $qcode_exp=$fexp->strAttribut(ATTR_DEF_QUICKCODE);

	  $qexp=($qcode_exp=="- ERROR -")?"Interne":$qcode_exp;
	  $jsexp=sprintf("javascript:showfiche('%s','%s')",
		      $_REQUEST['PHPSESSID'],$qexp);
	  if ( $qexp != 'Interne' )
	    {
	      $r.="<td>$href".$qexp." : ".$fexp->getName().'</a></td>';
	    }
	  else
	    $r.="<td>$href Interne </a></td>";

	  $ref="";

	  // show reference
	  if ( $row['ag_ref_ag_id'] != 0 ) 
	    {
	      $retSqlStmt=ExecSql($this->db,
				  "select ag_ref from action_gestion where ag_id=".$row['ag_ref_ag_id']);
	      $retSql=pg_fetch_all($retSqlStmt);
	      if ( $retSql != null )
		{
		  foreach ($retSql as $line) 
		    {
		      $ref.='<A  href="commercial.php?p_action=suivi_courrier&query='.$line['ag_ref'].'&'.$str_dossier.'">'.
			$line['ag_ref']."<A>";
		    }
		}
	    }

	  $r.='<td>'.$href.
	    $row['ag_title']."</A></td>";
	  $r.="<td>".$row['dt_value']."</td>";
	  $r.="<td>".$row['ag_ref']."</td>";
	  $r.="<td>".$ref."</td>";
	  if ( $row['d_id'] != '')
	    {
	      $doc=new Document($this->db,$row['d_id']);
	      $doc->get();
	      if ( strlen(trim($doc->d_lob)) != 0 )
		$r.="<td>".$doc->a_ref()."</td>";
	    }
	  $r.="</tr>";

	}
      $r.="</table>";

      $r.=$bar;
      //$r.="</div>";
      return $r;
    }
  //----------------------------------------------------------------------
  /*!\brief Update the data into the database
   *
   * \return true on success otherwise false
   */
  function Update()
    {
      echo_debug('class_action',__LINE__,'Update() $_POST()  :'.var_export($_POST,true));
      echo_debug('class_action',__LINE__,'Update()  $this  :'.var_export($this,true));

      // if ag_id == 0 nothing to do
      if ( $this->ag_id == 0 ) return ;


      // retrieve customer
      // f_id
     
      if ( trim($this->qcode_exp) =="" )
	{
	  // internal document
	  $this->f_id_exp=0; // internal document
	}
      else
	{
	  $tiers=new fiche($this->db);
	  if ( $tiers->get_by_qcode($this->qcode_exp) == -1 ) // Error we cannot retrieve this qcode
	    return false; 
	  else
	    $this->f_id_exp=$tiers->id;

	}
      if ( trim($this->qcode_dest) =="" )
	{
	  // internal document
	  $this->f_id_dest=0; // internal document
	}
      else
	{
	  $tiers=new fiche($this->db);
	  if ( $tiers->get_by_qcode($this->qcode_dest) == -1 ) // Error we cannot retrieve this qcode
	    return false; 
	  else
	    $this->f_id_dest=$tiers->id;

	}


      //remove newline from ag_comment
      $this->ag_comment=str_replace("\n","",$this->ag_comment);
      $this->ag_comment=str_replace("\r","",$this->ag_comment);

      // url encoded
      $this->ag_comment=urlencode($this->ag_comment);

      // bug PHP : sometimes the newline remains
      $this->ag_comment=str_replace("%A0","",$this->ag_comment);
      $this->ag_comment=str_replace("%0D","",$this->ag_comment);
      $this->ag_comment=str_replace("+%A0+","",$this->ag_comment);
      $this->ag_comment=str_replace("+%0D+","",$this->ag_comment);


      $sql=sprintf("update action_gestion set ag_comment='%s',".
		   " ag_timestamp=to_date('%s','DD.MM.YYYY'),".
		   " ag_title='%s',".
		   " ag_type=%d, ".
		   " f_id_exp=%d, ".
		   " f_id_dest=%d, ".
		   " ag_ref_ag_id=%d".
		   " where ag_id = %d",
		   $this->ag_comment,
		   $this->ag_timestamp,
		   FormatString($this->ag_title),
		   $this->dt_id,
		   $this->f_id_exp,
		   $this->f_id_dest,
		   $this->ag_ref_ag_id,
		   $this->ag_id);
      ExecSql($this->db,$sql);
      echo_debug('class_action',__LINE__,$_FILES);
      if ( strlen(trim($_FILES['file_upload']['name'])) !=0 ) 
	{
	  echo_debug('class_action',__LINE__,'sizeof($_FILES) = '.sizeof($_FILES));
	  echo_debug('class_action',__LINE__,'$this->d_id = '.$this->d_id);

	  // Upload a new document
	  $doc=new Document($this->db);
	  if ( $this->d_id !=0 )
	    {
	      $doc->d_id=$this->d_id;
	    } else {
	      // we need to increment the counter 
	      $doc->ag_id=$this->ag_id;
	      $doc->md_type=$this->dt_id;
	      $doc->blank();
	    }
	  $doc->Upload($this->ag_id);
      
	}
      if ( $this->d_id != 0 )
	{
	  $doc=new Document($this->db);
	  $doc->d_id=$this->d_id ;
	  $doc->d_state=$this->d_state;
	  $doc->save();
	}
      return true;
    }
  /*!\brief remove the action 
   *
   */
  function remove()
    {
      $this->get();
      // remove the key
      $sql=sprintf("delete from action_gestion where ag_id=%d",$this->ag_id);
      ExecSql($this->db,$sql);

      // remove the ref
       $sql=sprintf("update action_gestion set ag_ref_ag_id=0 where ag_ref_ag_id=%d",
 		   $this->ag_id);
       ExecSql($this->db,$sql);

      // if there is a document
      if ( $this->dt_id != 0 )
	{
	  $doc=new Document($this->db,$this->dt_id);
	  $doc->get();
	  $doc->remove();
	  if ( strlen(trim($doc->d_lob))!=0 ) 
	    pg_lo_unlink($this->db,$doc->dt_lob);
	}

    } 
}