efqtoolbutton_importar.cpp

Go to the documentation of this file.

/***************************************************************************
 *   Copyright (C) 2006 by Arturo Martin Llado                             *
 *   amartin@conetxia.com                                                  *
 *                                                                         *
 *   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.             *
 ***************************************************************************/

#include <QWidget>
#include "efqtoolbutton_importar.h"
#include "facturasplist.h"
#include "funcaux.h"

#include <QtXml/QDomDocument>
#include <QtXml/QDomNodeList>
#include <QtXml/QDomNode>
#include <QString>
#include <QFileDialog>
#include <QMap>
#include <QList>
#include "facturapview.h"
#include "fixed.h"

#include "listlinfacturapview.h"
#include "company.h"
#include "listdescfacturaprovview.h"
#include "dbrecord.h"



EFQToolButtonImportar::EFQToolButtonImportar(FacturasProveedorList *faclistado, QWidget *parent) : QToolButton(parent), PEmpresaBase() {
        _depura("EFQToolButtonImportar::EFQToolButtonImportar", 0);
        m_faclistado = faclistado;
        setEmpresaBase(faclistado->empresaBase());
        connect(this, SIGNAL(clicked()), this, SLOT(click()));
        _depura("END EFQToolButtonImportar::EFQToolButtonImportar", 0);
}



EFQToolButtonImportar::~EFQToolButtonImportar() {
        _depura("EFQToolButtonImportar::~EFQToolButtonImportar", 0);
        _depura("END EFQToolButtonImportar::~EFQToolButtonImportar", 0);
}



QString EFQToolButtonImportar::obten_valor_nodo(QString nombre, QDomDocument *doc) {
        _depura("EFQToolButtonImportar_EFQToolButtonImportar::obten_valor_nodo", 0);
        QDomNodeList lista_nodos = doc->elementsByTagName(nombre);
        QDomNode nodo = lista_nodos.item(0);
        
        if (nodo.isNull())
                _depura("No hay un nodo con ese nombre", 2);
                
        _depura("END EFQToolButtonImportar_EFQToolButtonImportar::obten_valor_nodo", 0);

        return nodo.toElement().text();
}



QString EFQToolButtonImportar::obten_descuento_factura(QDomDocument *doc, QList< QMap<QString, QString> > &lista_descuentos) {
        _depura("EFQToolButtonImportar_EFQToolButtonImportar::obten_descuento_factura", 0);
        // Obtenemos el nodo padre
        QDomNodeList lista_padre = doc->elementsByTagName("Invoice");
        QDomNode padre = lista_padre.item(0);
        QMap<QString, QString> mapa_descuento;
                
        QDomNode nodo1, nodo2;
        
        Fixed total_descuento = "0.00";
        
        nodo1 = padre.firstChildElement("cac:AllowanceCharge");
        
        while ( !nodo1.isNull() ) {
                
                nodo2 = nodo1.firstChildElement("cbc:MultiplierFactorNumeric");
                
                mapa_descuento["conceptdfactura"] = "DESCUENTO";
                mapa_descuento["proporciondfactura"] = nodo2.toElement().text();
                
                nodo2 = nodo2.nextSiblingElement("cbc:Amount");
                
                total_descuento = total_descuento + Fixed(nodo2.toElement().text());
                
                lista_descuentos.append(mapa_descuento);

                nodo1 = nodo1.nextSiblingElement("cac:AllowanceCharge");
        }
        
        _depura("END EFQToolButtonImportar_EFQToolButtonImportar::obten_descuento_factura", 0);
        
        return total_descuento.toQString();
}



void EFQToolButtonImportar::obten_linea_factura(QDomDocument *doc, QMap<QString, QString> &mapa_lfactura, int i) {
        _depura("EFQToolButtonImportar_EFQToolButtonImportar::obten_linea_factura", 0);
        QDomNodeList lista_lineas = doc->elementsByTagName("cac:InvoiceLine");
        QDomNode padre = lista_lineas.item(i);
        QDomNode tmp;
        
        // Buscamos la descripcion de esa linea de factura
        tmp = padre;
        tmp = tmp.firstChildElement("cac:Item");
        tmp = tmp.firstChildElement("cbc:Description");
        
        mapa_lfactura["desclfactura"] = tmp.toElement().text();
        
        // Buscamos la cantidad de elementos pertenecientes a la linea
        tmp = padre;
        tmp = tmp.firstChildElement("cbc:InvoicedQuantity");
        
        mapa_lfactura["cantlfactura"] = tmp.toElement().text();
        
        // Buscamos PVP de la linea
        tmp = padre;
        tmp = tmp.firstChildElement("cbc:LineExtensionAmount");
        
        mapa_lfactura["pvplfactura"] = tmp.toElement().text();
        
        // Buscamos IVA de la linea
        tmp = padre;
        tmp = tmp.firstChildElement("cac:TaxTotal");
        tmp = tmp.firstChildElement("cbc:TotalTaxAmount");
        
        mapa_lfactura["ivalfactura"] = tmp.toElement().text();
        
        // Buscamos descuento de la linea
        tmp = padre;
        tmp = tmp.firstChildElement("cac:AllowanceCharge");
        tmp = tmp.firstChildElement("cbc:MultiplierFactorNumeric");
        
        mapa_lfactura["descuentolfactura"] = tmp.toElement().text();
        
        // Buscamos ID de articulo de la linea
        tmp = padre;
        tmp = tmp.firstChildElement("cac:Item");
        tmp = tmp.firstChildElement("cac:SellersItemIdentification");
        tmp = tmp.firstChildElement("cac:ID");
        
        mapa_lfactura["idarticulo"] = tmp.toElement().text();
        
        _depura("END EFQToolButtonImportar_EFQToolButtonImportar::obten_linea_factura", 0);
}



QString EFQToolButtonImportar::obten_id_proveedor(QDomDocument *doc) {
        _depura("EFQToolButtonImportar_EFQToolButtonImportar::obten_id_proveedor", 0);
        // Nos situamos sobre la parte que identifica al vendedor
        QDomNodeList lista_nodos = doc->elementsByTagName("cac:SellerParty");
        // Obtenemos el nodo padre de esta seccion
        QDomNode padre = lista_nodos.item(0);
        // Lo recorremos hasta llegar a donde nos interesa
        QDomNode nodo = padre;;
        
        nodo = nodo.firstChildElement("cac:Party");
        nodo = nodo.firstChildElement("cac:PartyIdentification");
        nodo = nodo.firstChildElement("cac:ID");
        
        _depura("END EFQToolButtonImportar_EFQToolButtonImportar::obten_id_proveedor", 0);
        
        return nodo.toElement().text();
}



void EFQToolButtonImportar::importa_factura_ubl() {
        _depura("EFQToolButtonImportar::importa_factura_ubl", 0);

        QString fichero = QFileDialog::getOpenFileName(
                        this,
                        "Escoja un fichero que contenga una efactura para importarlo a la base de datos de BulmaFact",
                        "/tmp",
                        "Todos los archivos (*)"
                        );

        if (fichero == "")
                return;
        
        QDomDocument doc("efactura");
        QFile file(fichero);
        
        if (!file.open(QIODevice::ReadOnly))
                return;

        if (!doc.setContent(&file)) {
                file.close();
                return;
        }
        
        file.close();
        
        
        QString numeroFactura = obten_valor_nodo("ID", &doc);
        QString fechaFactura = obten_valor_nodo("cbc:IssueDate", &doc);
        QString descFactura = obten_valor_nodo("cbc:Note", &doc);
        QString bimpFactura = obten_valor_nodo("cbc:LineExtensionTotalAmount", &doc);
        QString impFactura = obten_valor_nodo("cbc:TotalTaxAmount", &doc);
        QString totalFactura = obten_valor_nodo("cbc:TaxInclusiveTotalAmount", &doc);
        
        QString idProveedor = obten_id_proveedor(&doc);
                
        QString query = "SELECT * FROM proveedor WHERE cifproveedor = '" + idProveedor + "'";
        cursor2 *proveedor = empresaBase()->cargacursor(query);
                
        if (proveedor->numregistros() == 0) {
                _depura("El proveedor con CIF " + idProveedor + " no existe en la base de datos. Hay que crearlo antes de importar esta factura.", 2);
                
                return;
        }

        
        FacturaProveedorView *fp = ((Company *)empresaBase())->newFacturaProveedorView();
        empresaBase()->m_pWorkspace->addWindow(fp);
        fp->inicializar();
        fp->pintar();
        fp->show();
        

        QList< QMap<QString, QString> > lista_mapas_dfactura;
        
        QString descuentoFactura = obten_descuento_factura(&doc, lista_mapas_dfactura);
        
        
        // Contamos los descuentos que hay
        
        int numdescuentos = lista_mapas_dfactura.count();
        


        
        ListDescuentoFacturaProvView *descuentos =(ListDescuentoFacturaProvView *) fp->getlistadescuentos();
        SDBRecord *rec = descuentos->lista()->last();
        QMap <QString, QString> mapa_dfactura;

        for (int i = 0; i < numdescuentos; i++) {
                descuentos->setinsercion(FALSE);
                mapa_dfactura = lista_mapas_dfactura.at(i);     
                        
                rec->setDBvalue("conceptdfacturap", mapa_dfactura["conceptdfactura"]);
                rec->setDBvalue("proporciondfacturap", mapa_dfactura["proporciondfactura"]);
                
                descuentos->setinsercion(TRUE);
                descuentos->nuevoRegistro();
                
                rec = descuentos->lista()->last();
        } // end for
        
        
        
        // Contamos las lineas que hay
        
        QDomNodeList lista_lfactura = doc.elementsByTagName("cac:InvoiceLine");
        
        lista_lfactura.item(0);
        
        int numlineas = 0;
        
        for (int i = 0; !lista_lfactura.item(i).isNull(); i++)
                numlineas = i+1;
        
        if (numlineas == 0) {
                _depura("Esta factura es erronea. No contiene ninguna linea asociada", 2);
                exit(-1);
        }
        

        QMap<QString, QString> mapa_lfactura;
        QList< QMap<QString, QString> > lista_mapas_lfactura;
        


        for (int i = 0; i < numlineas; i++) {
                obten_linea_factura(&doc, mapa_lfactura, i);
                lista_mapas_lfactura.append(mapa_lfactura);
        }
        

        ListLinFacturaProveedorView *lineas = (ListLinFacturaProveedorView *) fp->getlistalineas();
        rec = lineas->lista()->last();
        cursor2 *articulo = NULL;
        QString idarticulo, nomarticulo;

        for (int i = 0; i < numlineas; i++) {
                lineas->setinsercion(FALSE); 
                mapa_lfactura = lista_mapas_lfactura.at(i);     

                query = "SELECT * FROM articulo WHERE codigocompletoarticulo = '" + mapa_lfactura["idarticulo"] + "'";
                articulo = empresaBase()->cargacursor(query);
                
                if (articulo->numregistros() == 0) {
                        _depura("El articulo con codigo completo " + mapa_lfactura["idarticulo"] + " no existe en la base de datos. Se importara como articulo generico.", 2);
                        
                        query = "SELECT valor FROM configuracion WHERE nombre = 'CodArticuloGenerico'";
                        articulo = empresaBase()->cargacursor(query);
                        
                        mapa_lfactura["idarticulo"] = articulo->valor("valor");
                        
                        query = "SELECT idarticulo, nomarticulo FROM articulo WHERE codigocompletoarticulo = '" + articulo->valor("valor") + "'";
                        articulo = empresaBase()->cargacursor(query);
                } // end if
                        
                idarticulo  = articulo->valor("idarticulo");
                nomarticulo = articulo->valor("nomarticulo");
                
                rec->setDBvalue("codigocompletoarticulo", mapa_lfactura["idarticulo"]);
                
//              rec->refresh();
                
                rec->setDBvalue("idarticulo", articulo->valor("idarticulo"));
                
                rec->setDBvalue("nomarticulo", articulo->valor("nomarticulo"));
                rec->setDBvalue("desclfacturap", mapa_lfactura["desclfactura"]);
                rec->setDBvalue("cantlfacturap", mapa_lfactura["cantlfactura"]);
                rec->setDBvalue("pvplfacturap", mapa_lfactura["pvplfactura"]);
                rec->setDBvalue("ivalfacturap", mapa_lfactura["ivalfactura"]);          
                rec->setDBvalue("descuentolfacturap", mapa_lfactura["descuentolfactura"]);

                lineas->setinsercion(TRUE);
                lineas->nuevoRegistro();
                
                rec = lineas->lista()->last();
        } // end for
        
        delete articulo;


/*
        fp->pintanumfacturap(numeroFactura);
        fp->pintafechafacturap(fechaFactura);
        fp->pintadescfacturap(descFactura);
        fp->pintaidproveedor(proveedor->valor("idproveedor"));
*/
        fp->pintar();
        
        delete proveedor;
        
        Fixed bimp(bimpFactura);
        Fixed iva(impFactura);
        
        fp->calculaypintatotales();
        fp->m_totalDiscounts->setText(descuentoFactura);
        
        
        lineas->setEmpresaBase(empresaBase());
        descuentos->setEmpresaBase(empresaBase());

        fp->setDBvalue("idproveedor", idProveedor);
        fp->setDBvalue("reffacturap", ""); 
        fp->setDBvalue("numfacturap", numeroFactura);
        fp->setDBvalue("ffacturap", fechaFactura);
        fp->setDBvalue("descfacturap", descFactura);
        fp->setDBvalue("comentfacturap", "");
        
        fp->setDBvalue("idforma_pago", "");
        
        fp->setDBvalue("procesadafacturap", "");
        
        _depura("END EFQToolButtonImportar::importa_factura_ubl", 0);
}



void EFQToolButtonImportar::click() {
        _depura("EFQToolButtonImportar::click", 0);
        importa_factura_ubl();
        _depura("END EFQToolButtonImportar::click", 0);
}

---