class_document.php

Go to the documentation of this file.

<?
/*
 *   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.fr
require_once('class_own.php');
require_once('class_poste.php');
class Document 
{
  var $db;          
  var $ag_id;       
  var $d_mimetype;  
  var $d_filename;  
  var $d_lob;       
  var $d_number;    
  var $md_id;       
  var $d_state;     
  /* Constructor
   * \param $p_cn Database connection
   */
  function Document($p_cn,$p_d_id=0)
    {
      $this->db=$p_cn;
      $this->d_id=$p_d_id;
    } 
  function Generate() 
    {
      // create a temp directory in /tmp to unpack file and to parse it
      $dirname=tempnam('/tmp','doc_');
      echo $dirname;
      unlink($dirname);
      mkdir ($dirname);
      echo_debug('class_action',__LINE__,"Dirname is $dirname");
      // Retrieve the lob and save it into $dirname
      StartSql($this->db);
      $dm_info="select md_type,md_lob,md_filename,md_mimetype 
                   from document_modele where md_id=".$this->md_id;
      $Res=ExecSql($this->db,$dm_info);

      $row=pg_fetch_array($Res,0);
      $this->d_lob=$row['md_lob'];
      $this->d_filename=$row['md_filename'];
      $this->d_mimetype=$row['md_mimetype'];

      echo_debug('class_document',__LINE__,"OID is ".$row['md_lob']);
      chdir($dirname);
      $filename=$row['md_filename'];
      pg_lo_export($this->db,$row['md_lob'],$filename);
      $type="n";
      echo_debug('class_document',__LINE__,'The document type is '.$row['md_mimetype']);
      // if the doc is a OOo, we need to unzip it first
      // and the name of the file to change is always content.xml
      if ( strpos($row['md_mimetype'],'vnd.oasis') != 0 )
        {
          echo_debug('class_document',__LINE__,'Unzip the OOo');
          system("unzip ".$filename);
          // Remove the file we do  not need anymore
          unlink($filename);
          $file_to_parse="content.xml";
          $type="OOo";
        }
      else 
        $file_to_parse=$filename;
      // affect a number
      $this->d_number=NextSequence($this->db,"seq_doc_type_".$row['md_type']);


      // parse the document - return the doc number ?
      $this->ParseDocument($dirname,$file_to_parse,$type);

      Commit($this->db);
      // if the doc is a OOo, we need to re-zip it 
      if ( strpos($row['md_mimetype'],'vnd.oasis') != 0 )
        {
          system ("zip -r ".$filename." *");
          $file_to_parse=$filename;
        }
      // Create a directory 
      mkdir ($_SERVER['DOCUMENT_ROOT'].$dirname);

      // we need to rename the new generated file
      rename($dirname."/".$file_to_parse,$_SERVER['DOCUMENT_ROOT'].$dirname.'/'.$file_to_parse);
      $ret=sprintf('<A HREF="%s">Document généré</A>',
                   $dirname.'/'.$file_to_parse);
      $this->SaveGenerated($_SERVER['DOCUMENT_ROOT'].$dirname."/".$file_to_parse);
      return $ret;
    }
    
  function ParseDocument($p_dir,$p_file,$p_type)
    {

      echo_debug('class_document',__LINE__,'Begin parsing of '.$p_dir.' '.$p_file.'Type = '.$p_type);
      
      // open the document
      $infile_name=$p_dir."/".$p_file;
      echo_debug("class_document.php",__LINE__,"Open the document $p_dir/$p_file");
      $h=fopen($infile_name,"r");
      $output_name=tempnam($_SERVER["DOCUMENT_ROOT"]."/tmp","gen_doc_");
      $output_file=fopen($output_name,"w+");
      // check if the opening is sucessfull
      if (  $h == false ) 
        {
          echo "cannot open $p_dir $p_file ";
          exit();
        }
      if ( $output_file == false) 
        {
          echo "ne peut pas ouvrir le fichier de sortie";
          exit();
        }
      // compute the regex
      if ( $p_type=='OOo')
        {
          $regex="&lt;&lt;[A-Z]+_*[A-Z]*_*[A-Z]*_*[0-9]*&gt;&gt;";
          $lt="&lt;";
          $gt="&gt;";
        }
      else
        {
          $regex="<<[A-Z]+_*[A-Z]*_*[A-Z]*_*[0-9]*>>";
          $lt="<";
          $gt=">";
        }
      //read the file
      while(! feof($h)) 
        {
          // replace the tag
          $buffer=fgets($h);
          // search in the buffer the magic << and >>
          // while ereg finds something to replace
          while ( ereg ($regex,$buffer,$f) )
            {

            echo_debug('class_document',__LINE__,'var_export '.var_export( $f,true));
            foreach ( $f as $pattern )
              {
                echo_debug('class_document',__LINE__, "pattern");
                echo_debug('class_document',__LINE__, var_export($pattern,true));
                $to_remove=$pattern;
                // we remove the < and > from the pattern
                $pattern=str_replace($lt,'',$pattern);
                $pattern=str_replace($gt,'',$pattern);


                // if the pattern if found we replace it
                $value=$this->Replace($pattern);
                // replace into the $buffer
                // take the position in the buffer 
                $pos=strpos($buffer,$to_remove);
                // get the length of the string to remove
                $len=strlen($to_remove);
                $buffer=substr_replace($buffer,$value,$pos,$len);

                //              echo_debug('class_document',__LINE__, $buffer);
                // if the pattern if found we replace it
                echo_debug('class_document',__LINE__,"Transform $pattern by $value");
              }
          }
          // write into the output_file
          fwrite($output_file,$buffer);

        }
      fclose($h);
      fclose($output_file);
      rename ($output_name,$infile_name);
      // Save the document into the database

    }
  function SaveGenerated($p_file) 
    {
      echo_debug('class_document',__LINE__,'Save generated');
      // We save the generated file
      $doc=new Document($this->db);
      StartSql($this->db);
      $this->d_lob=pg_lo_import($this->db,$p_file);
      if ( $this->d_lob == false ) { 
        Rollback($this->db); echo_debug('class_document',__LINE__,"can't save file $p_file");
        return 1; }
    
      $sql=sprintf("insert into document(ag_id,d_lob,d_number,d_filename,d_mimetype,d_state) 
                        values (%d,%s,%d,'%s','%s',%d)",
                   $this->ag_id,
                   $this->d_lob,
                   $this->d_number,
                   $this->d_filename,
                   $this->d_mimetype,
                   $this->d_state
                   );
      ExecSql($this->db,$sql);
      $this->d_id=GetSequence($this->db,"document_d_id_seq");
      echo_debug('class_document',__LINE__,'document sauvé : d_id'.$this->d_id);
      Commit($this->db);
      return 0;
    }
  function Upload() 
    {

      // Start Transaction
      StartSql($this->db);
      $new_name=tempnam('/tmp','doc_');

      // nothing to save
      if ( sizeof($_FILES) == 0 ) return;
      // check if a file is submitted
      if ( strlen($_FILES['file_upload']['tmp_name']) != 0 )
        {
          // upload the file and move it to temp directory
          if ( move_uploaded_file($_FILES['file_upload']['tmp_name'],$new_name))
          {
            $oid=pg_lo_import($this->db,$new_name);
            // check if the lob is in the database
            if ( $oid == false ) 
              {
                Rollback($this->db);
                return 1;
              }
          }
          // the upload in the database is successfull
          $this->d_lob=$oid;
          $this->d_filename=$_FILES['file_upload']['name'];
          $this->d_mimetype=$_FILES['file_upload']['type'];
          // now we have to update the col.
          // We retrieve the row to remove a possible existing lob (replace)
          $sql="select d_lob from document where d_id=".$this->d_id;
          $ret=ExecSql($this->db,$sql);

          if (pg_num_rows($ret) != 0)  
            {
              // a result is found, the old oid is keept in order to
              // remove it later
              $r=pg_fetch_array($ret,0) ;
              $old_oid=$r['d_lob'] ;
              if (strlen($old_oid) != 0) { pg_lo_unlink ($this->db,$old_oid);}
            }
          // Update the table
          $sql=sprintf("update document set d_lob=%s,d_filename='%s',d_mimetype='%s' where d_id=%d",
                       $this->d_lob,$this->d_filename,$this->d_mimetype,$this->d_id);
          ExecSql($this->db,$sql);
          Commit($this->db);
        }

    }
  function a_ref() 
    {
      if ( $this->d_id == 0 )
        return '';
      $r="";
      $r='<A HREF="show_document.php?d_id='.$this->d_id.'">Document</A>';
      return $r;
    }
  /* ! Get
   * \brief Send the document
   */
  function Send() 
    {
      // retrieve the template and generate document
      StartSql($this->db);
      $ret=ExecSql($this->db,
                   "select d_id,d_lob,d_filename,d_mimetype from document where d_id=".$this->d_id );
      if ( pg_num_rows ($ret) == 0 )
        return;
      $row=pg_fetch_array($ret,0);
      //the document  is saved into file $tmp
      $tmp=tempnam('/tmp/','document_');
      pg_lo_export($this->db,$row['d_lob'],$tmp);
      $this->d_mimetype=$row['d_mimetype'];
      $this->d_filename=$row['d_filename'];

      // send it to stdout
      ini_set('zlib.output_compression','Off');
      header("Pragma: public");
      header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
      header("Last-Modified: " . gmdate("D, d M Y H:i:s") . " GMT");
      header("Cache-Control: must-revalidate");
      header('Content-type: "'.$this->d_mimetype.'"');
      header('Content-Disposition: attachment;filename="'.$this->d_filename.'"',FALSE);
      header("Accept-Ranges: bytes");
      $file=fopen($tmp,'r');
      while ( !feof ($file) )
        {
          echo fread($file,8192);
        }
      fclose($file);
      
      unlink ($tmp);
      
      Commit($this->db);
      
    }
  function get()
    {
      $sql="select * from document where d_id=".$this->d_id;
      $ret=Exec($this->db,$sql);
      if ( pg_num_rows($ret) == 0 )
        return;
      $row=pg_fetch_array($ret,0);
      $this->ag_id=$row['ag_id'];
      $this->d_mimetype=$row['d_mimetype'];
      $this->d_filename=$row['d_filename'];
      $this->d_lob=$row['d_lob'];
      $this->d_number=$row[''];
      $this->d_state=$row['ag_id'];
      $this->d_number=$row['d_number'];

    }
  function Replace($p_tag)
    {
      $r="Tag inconnu";
      static $counter=0;
      switch ($p_tag)
        {
        case 'DATE':
          $r=' Date inconnue ';
          // Date are in $_REQUEST['ag_date'] 
          // or $_POST['e_date']
          if ( isset ($_REQUEST['ag_date']))
            $r=$_REQUEST['ag_date'];
          if ( isset ($_REQUEST['e_date']))
            $r=$_REQUEST['e_date'];

          break; 
          //
          //  the company priv

        case 'MY_NAME':
          $my=new own($this->db);
          $r=$my->MY_NAME;
          break;
        case 'MY_CP':
          $my=new own($this->db);
          $r=$my->MY_CP;
          break;
        case 'MY_COMMUNE':
          $my=new own($this->db);
          $r=$my->MY_COMMUNE;
          break;
        case 'MY_TVA':
          $my=new own($this->db);
          $r=$my->MY_TVA;
          break;
        case 'MY_STREET':
          $my=new own($this->db);
          $r=$my->MY_STREET;
          break;
        case 'MY_NUMBER':
          $my=new own($this->db);
          $r=$my->MY_NUMBER;
          break;
        case 'MY_TEL':
          $my=new own($this->db);
          $r=$my->MY_TEL;
          break;
        case 'MY_FAX':
          $my=new own($this->db);
          $r=$my->MY_FAX;
          break;
        case 'MY_PAYS':
          $my=new own($this->db);
          $r=$my->MY_PAYS;
          break;

          // customer 
          /*\note The CUST_* are retrieved thx the $_REQUEST['tiers'] 
           * which contains the quick_code
           */
        case 'SOLDE':
          $tiers=new fiche($this->db);
          $qcode=isset($_REQUEST['tiers'])?$_REQUEST['tiers']:$_REQUEST['e_client'];
          $tiers->Getbyqcode($qcode,false);
          $p=$tiers->strAttribut(ATTR_DEF_ACCOUNT);
          $poste=new Poste($this->db,$p);
          $r=$poste->GetSolde(' true' );
          break;
        case 'CUST_NAME':
          $tiers=new fiche($this->db);
          $qcode=isset($_REQUEST['tiers'])?$_REQUEST['tiers']:$_REQUEST['e_client'];
          $tiers->getByQcode($qcode,false);
          $r=$tiers->strAttribut(ATTR_DEF_NAME);
          break;
        case 'CUST_ADDR_1':
          $tiers=new fiche($this->db);
          $qcode=isset($_REQUEST['tiers'])?$_REQUEST['tiers']:$_REQUEST['e_client'];
          $tiers->getByQcode($qcode,false);
          $r=$tiers->strAttribut(ATTR_DEF_ADRESS);
          
          break ;
        case 'CUST_CP':
          $tiers=new fiche($this->db);
          $qcode=isset($_REQUEST['tiers'])?$_REQUEST['tiers']:$_REQUEST['e_client'];
          $tiers->getByQcode($qcode,false);
          $r=$tiers->strAttribut(ATTR_DEF_CP);

          break;
        case 'CUST_CO':
          $tiers=new fiche($this->db);
          $qcode=isset($_REQUEST['tiers'])?$_REQUEST['tiers']:$_REQUEST['e_client'];
          $tiers->getByQcode($qcode,false);
          $r=$tiers->strAttribut(ATTR_DEF_PAYS);

          break; 
        case 'CUST_VAT':
          $tiers=new fiche($this->db);
          $qcode=isset($_REQUEST['tiers'])?$_REQUEST['tiers']:$_REQUEST['e_client'];
          $tiers->getByQcode($qcode,false);
          $r=$tiers->strAttribut(ATTR_DEF_NUMTVA);
          break; 
          // Marchandise in $_POST['e_march*']
          // \see user_form_achat.php or user_form_ven.php
        case 'NUMBER':
          $r=$this->d_number;
          break;
        case 'REFERENCE':
          $act=new action($this->db);
          $act->ag_id=$this->ag_id;
          $act->get();
          $r=$act->ag_ref;
          break;

          /*
           *  - [VEN_ART_NAME]
           *  - [VEN_ART_PRICE]
           *  - [VEN_ART_QUANT]
           *  - [VEN_ART_TVA_CODE]
           *  - [VEN_ART_TVA_AMOUNT]
           *  - [VEN_ART_STOCK_CODE]
           *  - [VEN_HTVA]
           *  - [VEN_TVAC]
           *  - [VEN_TVA]
           *  - [TOTAL_VEN_HTVA]
           */
        case 'MARCH_NEXT':
          $counter++;
          $r='';
          break;
          
        case 'VEN_ART_NAME':
          extract ($_POST);
          $id='e_march'.$counter;
          // check if the march exists
          if ( ! isset (${$id})) return "";
          // check that something is sold
          if ( ${'e_march'.$counter.'_sell'} != 0 && ${'e_quant'.$counter} != 0 )
            {
              $f=new fiche($this->db);
              $f->GetByQCode(${$id},false);
              $r=$f->strAttribut(ATTR_DEF_NAME);
            } else $r = "";
          break;

        case 'VEN_ART_PRICE':
          extract ($_POST);
          $id='e_march'.$counter.'_sell' ;
          if ( !isset (${$id}) ) return "";
          $r=${$id};
          break;

        case 'TVA_CODE':
          extract ($_POST);
          $id='e_march'.$counter.'_tva_id';
          if ( !isset (${$id}) ) return "";
          if ( ${$id} == -1 ) return "";
          $qt='e_quant'.$counter;
          $price='e_march'.$counter.'_sell' ;
          if ( ${$price} == 0 || ${$qt} == 0 
               || strlen(trim( $price )) ==0 
               || strlen(trim($qt)) ==0)
            return "";

          $r=${$id};
          break;

        case 'TVA_LABEL':
          extract ($_POST);
          $id='e_march'.$counter.'_tva_id';
          if ( !isset (${$id}) ) return "";
          $tva=GetTvaRate($this->db,${$id});
          if ( $tva == null || $tva==0 ) return "";
          $r=$tva['tva_label'];
          break;


        case 'TVA_AMOUNT':
          extract ($_POST);
          $qt='e_quant'.$counter;
          $price='e_march'.$counter.'_sell' ;
          $tva='e_march'.$counter.'_tva_id';
          if ( !isset (${'e_march'.$counter}) ) return "";
          // check that something is sold
          if ( ${$price} == 0 || ${$qt} == 0 
               || strlen(trim( $price )) ==0 
               || strlen(trim($qt)) ==0)
            return "";
          $a_tva=GetTvaRate($this->db,${$tva});
          echo_debug('class_document',__LINE__,'Tva  :'.var_export($a_tva,true));
          // if no vat returns 0
          if ( sizeof($a_tva) == 0 ) return "";
          $r=round(${$price},2)*${$qt}*$a_tva['tva_rate'];
          $r=round($r,2);
          break;

        case 'VEN_ART_QUANT':
          extract ($_POST);
          $id='e_quant'.$counter;
          if ( !isset (${$id}) ) return "";
          // check that something is sold
          if ( ${'e_march'.$counter.'_sell'} == 0 
               || ${'e_quant'.$counter} == 0 
               || strlen(trim( ${'e_march'.$counter.'_sell'} )) ==0 
               || strlen(trim(${'e_quant'.$counter})) ==0 )
            return "";
          $r=${$id};
          break;

        case 'VEN_HTVA':
          extract ($_POST);
          $id='e_march'.$counter.'_sell' ;
          $quant='e_quant'.$counter;
          if ( !isset (${$id}) ) return "";

          // check that something is sold
          if ( ${'e_march'.$counter.'_sell'} == 0 || ${'e_quant'.$counter} == 0 
               || strlen(trim( ${'e_march'.$counter.'_sell'} )) ==0 
               || strlen(trim(${'e_quant'.$counter})) ==0)
            return "";
          $r=round(${$id}*${$quant},2); 
          break;

        case 'VEN_TVAC':
          extract ($_POST);
          $id='e_march'.$counter.'_sell' ;
          $quant='e_quant'.$counter;
          // if it is exist
          if ( ! isset(${$id})) 
            return "";
          // check that something is sold
          if ( ${'e_march'.$counter.'_sell'} == 0 || ${'e_quant'.$counter} == 0 )
            return "";
          $r=${$id}*${$quant}; 
          $tva=GetTvaRate($this->db,${'e_march'.$counter.'_tva_id'});
          // if there is no vat we return now
          if ( $tva == null || $tva == 0 ) return $r;
          // we compute with the vat included
          $r=$r+$r*$tva['tva_rate'];
          $r=round($r,2);
          break;
        case 'TOTAL_VEN_HTVA':
          extract($_POST);
          echo_debug('class_document',__LINE__,'TOTAL_VEN_TVA item :'.$nb_item);

          $sum=0.0;
          for ($i=0;$i<$nb_item;$i++)
            {
              $sell='e_march'.$i.'_sell';
              $qt='e_quant'.$i;
              echo_debug('class_document',__LINE__,'sell :'.$sell.' qt = '.$qt);

              echo_debug('class_document',__LINE__,'counter :'.$i.' sur '.$nb_item);
              if ( ! isset (${$sell}) ) break;
              echo_debug('class_document',__LINE__,'sell :'.${$sell}.' qt = '.${$qt});

              if ( strlen(trim(${$sell})) == 0 ||
                   strlen(trim(${$qt})) == 0 ||
                   ${$qt}==0 || ${$sell}==0)
                continue;
              $sum+=${$sell}*${$qt};
              echo_debug('class_document',__LINE__,'sum :'.$sum);

            }
          $r=round($sum,2);
          break;
        case 'TOTAL_VEN_TVAC':
          extract($_POST);
          $sum=0.0;
          for ($i=0;$i<$nb_item;$i++)
            {
              $tva=GetTvaRate($this->db,${'e_march'.$i.'_tva_id'});
              $tva_rate=( $tva == null || $tva == 0 )?0.0:$tva['tva_rate'];
              echo_debug('class_document',__LINE__,' :'.$i.' sur '.$nb_item);
              $sell=${'e_march'.$i.'_sell'};
              $qt=${'e_quant'.$i};
              echo_debug('class_document',__LINE__,'sell :'.$sell.' qt = '.$qt);

              $sum+=$sell*$qt*(1+$tva_rate);
              //              $sum+=${'e_march'.$i.'_sell'}*${'e_quant'.$i}*(1+$tva_rate);
            }
          $r=round($sum,2);

          break;

        }
      return $r;
    }
  function remove()
    {
      $sql='delete from document where d_id='.$this->d_id;
      ExecSql($this->db,$sql);
    }
  function MoveDocumentPj($p_internal)
    {

      $sql=sprintf("update jrn set jr_pj=%s,jr_pj_name='%s',jr_pj_type='%s' where jr_internal='%s'",
                   $this->d_lob,$this->d_filename,$this->d_mimetype,$p_internal);
      ExecSql($this->db,$sql);
      // clean the table document
      $this->remove();
    }


}

---