arbol.cpp

Go to the documentation of this file.

/***************************************************************************
 *   Copyright (C) 2005 by Ricardo Diaz                                    *
 *   richard@galdi.es                                                      *
 *                                                                         *
 *   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 "arbol.h"



Arbol::Arbol() {
    _depura("Arbol::Arbol", 0);
    unsigned int i;
    raiz = new tipohoja*[70];
    for (i = 0; i < 70; i++) {
        raiz[i] = NULL;
    } // end for
    _depura("END Arbol::Arbol", 0);
}



Arbol::~Arbol() {
    _depura("Arbol::~Arbol", 0);
    unsigned int i;
    for (i = 0; i < 70; i++) {
        raiz[i] = NULL;
    }
    delete raiz;
    delete hoja;
    delete rama;
    _depura("END Arbol::~Arbol", 0);
}



void Arbol::nuevarama(cursor2 *ramas) {
    _depura("Arbol::nuevarama", 0);
    unsigned int i;
    hoja = new tipohoja;
    hoja->idcuenta = atoi(ramas->valor("idcuenta").toAscii().constData());
    hoja->codigo = QString(ramas->valor("codigo"));
    hoja->descripcion = QString(ramas->valor("descripcion"));
    hoja->saldoant = hoja->debe = hoja->haber = hoja->saldo = hoja->debeej = hoja->haberej = hoja->saldoej = Fixed("0.00");
    hoja->numapuntes = 0;
    hoja->ramas = NULL;
    for(i = 0; i < 70 && raiz[i]; i++) {}
    raiz[i] = hoja;
    _depura("END Arbol::nuevarama", 0);
}



void Arbol::inicializa(cursor2 *ramas) {
    _depura("Arbol::inicializa", 0);
    unsigned int i;
    QString padre;
    tiporama* guia = NULL;
    ramas->primerregistro();
    for(i = 0; raiz[i] && i < 70; i++) {
        padre = raiz[i]->codigo;
        while (!ramas->eof() && ramas->valor("codigo").startsWith(padre)) {
            if (ramas->valor("nivel").toInt() > 2) {
                hoja = new tipohoja;
                hoja->idcuenta = atoi(ramas->valor("idcuenta").toAscii().constData());
                hoja->codigo = QString(ramas->valor("codigo"));
                hoja->descripcion = QString(ramas->valor("descripcion"));
                hoja->saldoant = hoja->debe = hoja->haber = hoja->saldo = hoja->debeej = hoja->haberej = hoja->saldoej = Fixed("0.00");
                hoja->numapuntes = 0;
                hoja->ramas = NULL;
                rama = new tiporama;
                rama->hoja = hoja;
                rama->sgte = NULL;
                if (!raiz[i]->ramas) {
                    raiz[i]->ramas = guia = rama;
                } else { 
                    guia->sgte = rama;
                    guia = guia->sgte;
                } // end if
                SintetizarRamas(&ramas, &(hoja->ramas));
            } else {
                ramas->siguienteregistro();
            } // end if
        } // end while
    } // end for
    _depura("END Arbol::inicializa", 0);
}



void Arbol::SintetizarRamas(cursor2 **cuentas, tiporama **ramas) {
    _depura("Arbol::SintetizarRamas", 0);
    tiporama *guia, *rama;
    tipohoja *hoja;
    int nivel;
    cursor2* ptrcuentas = *cuentas;
    nivel = atoi(ptrcuentas->valor("nivel").toAscii().constData());
    ptrcuentas->siguienteregistro();
    guia = NULL;
    while (!ptrcuentas->eof() && (atoi(ptrcuentas->valor("nivel").toAscii().constData()) > nivel)) {
        rama = new tiporama;
        if (!guia) {
            *ramas = guia = rama;
        } else {
            guia->sgte = rama;
            guia = guia->sgte;
        } // end if
        hoja = new tipohoja; 
        hoja->idcuenta = atoi(ptrcuentas->valor("idcuenta").toAscii().constData());
        hoja->codigo = ptrcuentas->valor("codigo");
        hoja->descripcion = ptrcuentas->valor("descripcion");
        hoja->saldoant = hoja->debe = hoja->haber = hoja->saldo = hoja->debeej = hoja->haberej = hoja->saldoej = Fixed("0.00");
        hoja->numapuntes = 0;
        hoja->ramas = NULL;
        guia->hoja = hoja;
        guia->sgte = NULL;
        SintetizarRamas(&ptrcuentas, &(hoja->ramas));
    } // end while
    _depura("END Arbol::SintetizarRamas", 0);
}



void Arbol::actualizahojas(cursor2 *cuenta) {
    _depura("Arbol::actualizahojas", 0);
    unsigned int i = 0;
    bool actualizado;
    tipohoja *hojaraiz;

    QString cuentapadre = cuenta->valor("codigo").left(2);
    do {
        hojaraiz = raiz[i];
        i++;
    } while (i < 70 && cuentapadre != hojaraiz->codigo);
    actualizado = false;
    if (hojaraiz->ramas) {
        ActualizarHoja(&(hojaraiz->ramas), cuenta, &actualizado);
        if (actualizado) {
            hojaraiz->saldoant = hojaraiz->saldoant + Fixed(cuenta->valor("saldoant"));
            hojaraiz->debe = hojaraiz->debe + Fixed(cuenta->valor("debe"));
            hojaraiz->haber = hojaraiz->haber + Fixed(cuenta->valor("haber"));
            hojaraiz->saldo = hojaraiz->saldo + Fixed(cuenta->valor("saldo"));
            hojaraiz->debeej = hojaraiz->debeej + Fixed(cuenta->valor("debeej"));
            hojaraiz->haberej = hojaraiz->haberej + Fixed(cuenta->valor("haberej"));
            hojaraiz->saldoej = hojaraiz->saldoej + Fixed(cuenta->valor("saldoej"));
            hojaraiz->numapuntes += cuenta->valor("numapuntes").toInt();
        } // end if
    } // end if
    _depura("END Arbol::actualizahojas", 0);
}



void Arbol::ActualizarHoja(tiporama** ramaraiz, cursor2* cuenta, bool* actualizado) {
    _depura("Arbol::ActualizarHoja", 0);
    tiporama* rama = *ramaraiz;
    while (rama && !(*actualizado)) {
        int idcuenta = atoi(cuenta->valor("idcuenta").toAscii().constData());
        if (rama->hoja->idcuenta == idcuenta) {
            rama->hoja->saldoant = Fixed(cuenta->valor("saldoant"));
            rama->hoja->debe = Fixed(cuenta->valor("debe"));
            rama->hoja->haber = Fixed(cuenta->valor("haber"));
            rama->hoja->saldo = Fixed(cuenta->valor("saldo"));
            rama->hoja->debeej = Fixed(cuenta->valor("debeej"));
            rama->hoja->haberej = Fixed(cuenta->valor("haberej"));
            rama->hoja->saldoej = Fixed(cuenta->valor("saldoej"));
            rama->hoja->numapuntes = cuenta->valor("numapuntes").toInt();
            *actualizado = true;
        } else {
            if (rama->hoja->ramas) {
                ActualizarHoja(&(rama->hoja->ramas), cuenta, &(*actualizado));
                if (*actualizado) {
                    rama->hoja->saldoant = rama->hoja->saldoant + Fixed(cuenta->valor("saldoant"));
                    rama->hoja->debe = rama->hoja->debe + Fixed(cuenta->valor("debe"));
                    rama->hoja->haber = rama->hoja->haber + Fixed(cuenta->valor("haber"));
                    rama->hoja->saldo = rama->hoja->saldo + Fixed(cuenta->valor("saldo"));
                    rama->hoja->debeej = rama->hoja->debeej + Fixed(cuenta->valor("debeej"));
                    rama->hoja->haberej = rama->hoja->haberej + Fixed(cuenta->valor("haberej"));
                    rama->hoja->saldoej = rama->hoja->saldoej + Fixed(cuenta->valor("saldoej"));
                    rama->hoja->numapuntes += cuenta->valor("numapuntes").toInt();
                } // end if
            } // end if
        } // end if
        rama = rama->sgte;
    } // end while
    _depura("END Arbol::ActualizarHoja", 0);
}



void Arbol::inicia() {
    _depura("Arbol::inicia", 0);
    hojaactiva = QString("00");
    _depura("END Arbol::inicia", 0);
}



bool Arbol::deshoja(unsigned int nivel, bool superiores) {
    _depura("Arbol::deshoja", 0);
    unsigned int i;
    bool deshojada = false;
    if (nivel > 2) {
        QString raizcandidata = hojaactiva.left(2);
        if (hojaactiva == QString("00"))
            i = 0;
        else {
            for(i = 0; i < 70 && raiz[i]; i++) {
                if (raiz[i]->codigo == raizcandidata)
                    break;
            } // end for
        } // end if
        while (!deshojada && raiz[i]) {
            if (superiores && raiz[i]->codigo > hojaactiva && raiz[i]->numapuntes > 0) {
                hoja = raiz[i];
                if (hoja->numapuntes > 0) {
                    hojaactiva = hoja->codigo;
                    deshojada = true;
                } // end if
            } else {
                if (raiz[i]->ramas)
                    Deshojar(raiz[i]->ramas, nivel, superiores, &deshojada);
            } // end if
            i++;
        } // end while
    } else {
        if (hojaactiva == QString("00")) {
            if (raiz[0]) {
                hojaactiva = raiz[0]->codigo;
                hoja = raiz[0];
                deshojada = true;
            } // end if
        } else {
            for (i = 0; i < 70 && raiz[i]; i++) {
                if(raiz[i]->codigo > hojaactiva) {
                    hoja = raiz[i];
                    if (hoja->numapuntes > 0) {
                        hojaactiva = hoja->codigo;
                        deshojada = true;
                        break;
                    }
                } // end if
            } // end for
        } // end if
    } // end if
    return deshojada;
    _depura("END Arbol::deshoja", 0);
}



void Arbol::Deshojar(tiporama *rama, unsigned int nivel, bool superiores, bool *deshojada) {
    _depura("Arbol::Deshojar", 0);
    unsigned int nivelhoja = rama->hoja->codigo.length();
    if (hojaactiva >= rama->hoja->codigo) {
        if (rama->hoja->ramas && nivelhoja < nivel)
            Deshojar(rama->hoja->ramas, nivel, superiores, &(*deshojada));
        if (rama->sgte && !(*deshojada))
            Deshojar(rama->sgte, nivel, superiores, &(*deshojada));
    } else {
        if (rama->hoja->numapuntes == 0) {
            if (rama->sgte)
                Deshojar(rama->sgte, nivel, superiores, &(*deshojada));
        } else { 
            if (superiores) {
                if (nivelhoja <= nivel) {
                    hoja = rama->hoja;
                    hojaactiva = hoja->codigo;
                    *deshojada = true;
                } else {
                    if (rama->sgte)
                        Deshojar(rama->sgte, nivel, superiores, &(*deshojada));
                } // end if
            } else {
                if (nivelhoja == nivel) {
                    hoja = rama->hoja;
                    hojaactiva = hoja->codigo;
                    *deshojada = true;
                } else {
                    if (rama->hoja->ramas && nivelhoja < nivel)
                        Deshojar(rama->hoja->ramas, nivel, superiores, &(*deshojada));
                    if (rama->sgte && !(*deshojada))
                        Deshojar(rama->sgte, nivel, superiores, &(*deshojada));
                } // end if
            } // end if
        } // end if
    } // end if
    _depura("END Arbol::Deshojar", 0);
}



QString Arbol::hojaactual(QString valor) {
    _depura("Arbol::hojaactual", 0);
    QString resultado;
    if (valor == "saldoant")
        resultado = hoja->saldoant.toQString();
    else if (valor == "debe" )
        resultado = hoja->debe.toQString();
    else if (valor == "haber" )
        resultado = hoja->haber.toQString();
    else if (valor == "saldo" )
        resultado = hoja->saldo.toQString();
    else if (valor == "debeej" )
        resultado = hoja->debeej.toQString();
    else if (valor == "haberej" )
        resultado = hoja->haberej.toQString();
    else if (valor == "saldoej" )
        resultado = hoja->saldoej.toQString();
    else if (valor == "codigo" )
        resultado = hoja->codigo;
    else if (valor == "descripcion" )
        resultado = hoja->descripcion;
    else if (valor == "idcuenta" )
        resultado.setNum(hoja->idcuenta);
    else
        _depura("Campo " + valor + " no encontrado en la hoja del arbol", 2);
    return resultado;
    _depura("END Arbol::hojaactual", 0);
}



bool Arbol::irHoja(QString codigo, unsigned int nivel) {
    _depura("Arbol::irHoja", 0);
    hojaactiva = QString("00");
    while (deshoja(nivel, true) && hojaactual("codigo") != codigo);
    if (hojaactual("codigo") == codigo) {
        return true;
    } else {
        return false;
    } // end if
    _depura("END Arbol::irHoja", 0);
}

---