/plugins/facturacion_base/controller/ventas_factura.php

<?php
/*
 * This file is part of Sartin
 * Miguel San Martin - cosouth.battle@gmail.com
 */

require_model('agencia_transporte.php');
require_model('articulo.php');
require_model('asiento.php');
require_model('asiento_factura.php');
require_model('cliente.php');
require_model('cuenta_banco_cliente.php');
require_model('divisa.php');
require_model('ejercicio.php');
require_model('factura_cliente.php');
require_model('forma_pago.php');
require_model('pais.php');
require_model('partida.php');
require_model('serie.php');
require_model('subcuenta.php');

class ventas_factura extends fs_controller
{
   public $agencia;
   public $agente;
   public $agentes;
   public $allow_delete;
   public $cliente;
   public $divisa;
   public $ejercicio;
   public $factura;
   public $forma_pago;
   public $mostrar_boton_pagada;
   public $pais;
   public $rectificada;
   public $rectificativa;
   public $serie;

   public function __construct()
   {
      parent::__construct(__CLASS__, 'Factura de cliente', 'ventas', FALSE, FALSE);
   }

   protected function private_core()
   {
      /// ¿El usuario tiene permiso para eliminar en esta página?
      $this->allow_delete = $this->user->allow_delete_on(__CLASS__);

      $this->ppage = $this->page->get('ventas_facturas');

      $this->agencia = new agencia_transporte();
      $this->agente = FALSE;
      $this->agentes = array();
      $this->cliente = FALSE;
      $this->divisa = new divisa();
      $this->ejercicio = new ejercicio();
      $this->factura = FALSE;
      $this->forma_pago = new forma_pago();
      $this->pais = new pais();
      $this->rectificada = FALSE;
      $this->rectificativa = FALSE;
      $this->serie = new serie();

      /**
       * Si hay alguna extensión de tipo config y texto no_button_pagada,
       * desactivamos el botón de pagada/sin pagar.
       */
      $this->mostrar_boton_pagada = TRUE;
      foreach($this->extensions as $ext)
      {
         if($ext->type == 'config' AND $ext->text == 'no_button_pagada')
         {
            $this->mostrar_boton_pagada = FALSE;
            break;
         }
      }

      /**
       * ¿Modificamos la factura?
       */
      $factura = new factura_cliente();
      if( isset($_POST['idfactura']) )
      {
         $this->factura = $factura->get($_POST['idfactura']);
         $this->modificar();
      }
      else if( isset($_GET['id']) )
      {
         $this->factura = $factura->get($_GET['id']);
      }

      if($this->factura)
      {
         $this->page->title = $this->factura->codigo;

         /// cargamos el agente
         $agente = new agente();
         if( !is_null($this->factura->codagente) )
         {
            $this->agente = $agente->get($this->factura->codagente);
         }
         $this->agentes = $agente->all();

         /// cargamos el cliente
         $cliente = new cliente();
         $this->cliente = $cliente->get($this->factura->codcliente);

         if( isset($_GET['gen_asiento']) AND isset($_GET['petid']) )
         {
            if( $this->duplicated_petition($_GET['petid']) )
            {
               $this->new_error_msg('Petición duplicada. Evita hacer doble clic sobre los botones.');
            }
            else
            {
               $this->generar_asiento($this->factura);
            }
         }
         else if( isset($_GET['updatedir']) )
         {
            $this->actualizar_direccion();
         }
         else if( isset($_REQUEST['pagada']) )
         {
            $this->pagar( ($_REQUEST['pagada'] == 'TRUE') );
         }
         else if( isset($_POST['anular']) )
         {
            $this->anular_factura();
         }

         if($this->factura->idfacturarect)
         {
            $this->rectificada = $factura->get($this->factura->idfacturarect);
         }
         else
         {
            $this->get_factura_rectificativa();
         }

         /// comprobamos la factura
         $this->factura->full_test();
      }
      else
         $this->new_error_msg("¡Factura de cliente no encontrada!");
   }

   public function url()
   {
      if( !isset($this->factura) )
      {
         return parent::url ();
      }
      else if($this->factura)
      {
         return $this->factura->url();
      }
      else
         return $this->ppage->url();
   }

   private function modificar()
   {
      $this->factura->observaciones = $_POST['observaciones'];
      $this->factura->numero2 = $_POST['numero2'];
      $this->factura->nombrecliente = $_POST['nombrecliente'];
      $this->factura->cifnif = $_POST['cifnif'];
      $this->factura->codpais = $_POST['codpais'];
      $this->factura->provincia = $_POST['provincia'];
      $this->factura->ciudad = $_POST['ciudad'];
      $this->factura->codpostal = $_POST['codpostal'];
      $this->factura->direccion = $_POST['direccion'];

      $this->factura->envio_nombre = $_POST['envio_nombre'];
      $this->factura->envio_apellidos = $_POST['envio_apellidos'];
      $this->factura->envio_codtrans = NULL;
      if($_POST['envio_codtrans'] != '')
      {
         $this->factura->envio_codtrans = $_POST['envio_codtrans'];
      }
      $this->factura->envio_codigo = $_POST['envio_codigo'];
      $this->factura->envio_provincia = $_POST['envio_provincia'];
      $this->factura->envio_ciudad = $_POST['envio_ciudad'];
      $this->factura->envio_codpostal = $_POST['envio_codpostal'];
      $this->factura->envio_direccion = $_POST['envio_direccion'];

      $this->factura->codagente = NULL;
      $this->factura->porcomision = 0;
      if($_POST['codagente'] != '')
      {
         $this->factura->codagente = $_POST['codagente'];
         $this->factura->porcomision = floatval($_POST['porcomision']);
      }

      /// obtenemos el ejercicio para poder acotar la fecha
      $eje0 = $this->ejercicio->get( $this->factura->codejercicio );
      if($eje0)
      {
         $this->factura->fecha = $eje0->get_best_fecha($_POST['fecha'], TRUE);
         $this->factura->hora = $_POST['hora'];
      }
      else
         $this->new_error_msg('No se encuentra el ejercicio asociado a la factura.');

      /// ¿cambiamos la forma de pago?
      if($this->factura->codpago != $_POST['forma_pago'])
      {
         $this->factura->codpago = $_POST['forma_pago'];
         $this->factura->vencimiento = $this->nuevo_vencimiento($this->factura->fecha, $this->factura->codpago);
      }
      else
      {
         $this->factura->vencimiento = $_POST['vencimiento'];
      }

      if( $this->factura->save() )
      {
         $asiento = $this->factura->get_asiento();
         if($asiento)
         {
            $asiento->fecha = $this->factura->fecha;
            if( !$asiento->save() )
            {
               $this->new_error_msg("Imposible modificar la fecha del asiento.");
            }
         }
         $this->new_message("Factura modificada correctamente.");
         $this->new_change('Factura Cliente '.$this->factura->codigo, $this->factura->url());
      }
      else
         $this->new_error_msg("¡Imposible modificar la factura!");
   }

   private function actualizar_direccion()
   {
      foreach($this->cliente->get_direcciones() as $dir)
      {
         if($dir->domfacturacion)
         {
            $this->factura->cifnif = $this->cliente->cifnif;
            $this->factura->nombrecliente = $this->cliente->razonsocial;

            $this->factura->apartado = $dir->apartado;
            $this->factura->ciudad = $dir->ciudad;
            $this->factura->coddir = $dir->id;
            $this->factura->codpais = $dir->codpais;
            $this->factura->codpostal = $dir->codpostal;
            $this->factura->direccion = $dir->direccion;
            $this->factura->provincia = $dir->provincia;

            if( $this->factura->save() )
            {
               $this->new_message('Dirección actualizada correctamente.');
            }
            else
               $this->new_error_msg('Imposible actualizar la dirección de la factura.');

            break;
         }
      }
   }

   private function generar_asiento(&$factura)
   {
      if( $factura->get_asiento() )
      {
         $this->new_error_msg('Ya hay un asiento asociado a esta factura.');
      }
      else
      {
         $asiento_factura = new asiento_factura();
         $asiento_factura->soloasiento = TRUE;
         if( $asiento_factura->generar_asiento_venta($factura) )
         {
            $this->new_message("<a href='".$asiento_factura->asiento->url()."'>Asiento</a> generado correctamente.");
         }

         foreach($asiento_factura->errors as $err)
         {
            $this->new_error_msg($err);
         }

         foreach($asiento_factura->messages as $msg)
         {
            $this->new_message($msg);
         }
      }
   }

   private function pagar($pagada = TRUE)
   {
      /// ¿Hay asiento?
      if( is_null($this->factura->idasiento) )
      {
         $this->factura->pagada = $pagada;
         $this->factura->save();
      }
      else if(!$pagada AND $this->factura->pagada)
      {
         /// marcar como impagada
         $this->factura->pagada = FALSE;

         /// ¿Eliminamos el asiento de pago?
         $as1 = new asiento();
         $asiento = $as1->get($this->factura->idasientop);
         if($asiento)
         {
            $asiento->delete();
            $this->new_message('Asiento de pago eliminado.');
         }

         $this->factura->idasientop = NULL;
         if( $this->factura->save() )
         {
            $this->new_message('Factura marcada como impagada.');
         }
         else
         {
            $this->new_error_msg('Error al modificar la factura.');
         }
      }
      else if($pagada AND !$this->factura->pagada)
      {
         /// marcar como pagada
         $asiento = $this->factura->get_asiento();
         if($asiento)
         {
            /// nos aseguramos que el cliente tenga subcuenta en el ejercicio actual
            $subcli = FALSE;
            $eje = $this->ejercicio->get_by_fecha( $this->today() );
            if($eje)
            {
               $subcli = $this->cliente->get_subcuenta($eje->codejercicio);
            }

            $asiento_factura = new asiento_factura();
            $this->factura->idasientop = $asiento_factura->generar_asiento_pago($asiento, $this->factura->codpago, $this->today(), $subcli);
            if($this->factura->idasientop)
            {
               $this->factura->pagada = TRUE;
               if( $this->factura->save() )
               {
                  $this->new_message('<a href="'.$this->factura->asiento_pago_url().'">Asiento de pago</a> generado.');
               }
               else
               {
                  $this->new_error_msg('Error al marcar la factura como pagada.');
               }
            }

            foreach($asiento_factura->errors as $err)
            {
               $this->new_error_msg($err);
            }
         }
         else
         {
            $this->new_error_msg('No se ha encontrado el asiento de la factura.');
         }
      }
   }

   private function nuevo_vencimiento($fecha, $codpago)
   {
      $vencimiento = $fecha;

      $formap = $this->forma_pago->get($codpago);
      if($formap)
      {
         $vencimiento = Date('d-m-Y', strtotime($fecha.' '.$formap->vencimiento));
      }

      return $vencimiento;
   }

   private function anular_factura()
   {
      /// generamos una factura rectificativa a partir de la actual
      $factura = clone $this->factura;
      $factura->idfactura = NULL;
      $factura->numero = NULL;
      $factura->numero2 = NULL;
      $factura->codigo = NULL;
      $factura->idasiento = NULL;

      $factura->idfacturarect = $this->factura->idfactura;
      $factura->codigorect = $this->factura->codigo;
      $factura->codserie = $_POST['codserie'];
      $factura->fecha = $this->today();
      $factura->hora = $this->hour();
      $factura->observaciones = $_POST['motivo'];
      $factura->neto = 0 - $factura->neto;
      $factura->totalirpf = 0 - $factura->totalirpf;
      $factura->totaliva = 0 - $factura->totaliva;
      $factura->totalrecargo = 0 - $factura->totalrecargo;
      $factura->total = $factura->neto + $factura->totaliva + $factura->totalrecargo - $factura->totalirpf;

      if( $factura->save() )
      {
         $articulo = new articulo();
         $error = FALSE;

         /// copiamos las líneas en negativo
         foreach($this->factura->get_lineas() as $lin)
         {
            /// actualizamos el stock
            $art = $articulo->get($lin->referencia);
            if($art)
            {
               $art->sum_stock($factura->codalmacen, $lin->cantidad);
            }

            $lin->idlinea = NULL;
            $lin->idalbaran = NULL;
            $lin->idfactura = $factura->idfactura;
            $lin->cantidad = 0 - $lin->cantidad;
            $lin->pvpsindto = $lin->pvpunitario * $lin->cantidad;
            $lin->pvptotal = $lin->pvpunitario * (100 - $lin->dtopor)/100 * $lin->cantidad;

            if( !$lin->save() )
            {
               $error = TRUE;
            }
         }

         if($error)
         {
            $factura->delete();
            $this->new_error_msg('Se han producido errores al crear la '.FS_FACTURA_RECTIFICATIVA);
         }
         else
         {
            $this->new_message( '<a href="'.$factura->url().'">'.ucfirst(FS_FACTURA_RECTIFICATIVA).'</a> creada correctamenmte.' );
            $this->generar_asiento($factura);

            $this->factura->anulada = TRUE;
            $this->factura->save();
         }
      }
      else
      {
         $this->new_error_msg('Error al anular la factura.');
      }
   }

   private function get_factura_rectificativa()
   {
      $sql = "SELECT * FROM facturascli WHERE idfacturarect = ".$this->factura->var2str($this->factura->idfactura);

      $data = $this->db->select($sql);
      if($data)
      {
         $this->rectificativa = new factura_cliente($data[0]);
      }
   }

   public function get_cuentas_bancarias()
   {
      $cuentas = array();

      $cbc0 = new cuenta_banco_cliente();
      foreach($cbc0->all_from_cliente($this->factura->codcliente) as $cuenta)
      {
         $cuentas[] = $cuenta;
      }

      return $cuentas;
   }
}