Implementa opção verbose.
[cascardo/declara.git] / lib / calcula.c
index db260b8..71b94b4 100644 (file)
@@ -23,6 +23,7 @@
 #include "cmd.h"
 #include "rendimento.h"
 #include "totais.h"
+#include "util.h"
 
 static const long long dependente2015 = 215652;
 
@@ -39,6 +40,13 @@ long long deducao_dependente(struct declaracao *dec)
 static long long total_deducao(struct declaracao *dec)
 {
        int i;
+       if (dec->verbose) {
+               printf("Dedução:\n");
+               printf("\tDependentes: "FMT_R"\n", R(totais_get(dec, "DEPENDENTES")));
+               printf("\tINSS: "FMT_R"\n", R(totais_get(dec, "INSS")));
+               printf("\tPagamentos: "FMT_R"\n", R(totais_get(dec, "PAGAMENTOS")));
+               printf("\tReembolsos: -"FMT_R"\n", R(totais_get(dec, "REEMBOLSOS")));
+       }
        return totais_get(dec, "DEPENDENTES") +
               totais_get(dec, "INSS") +
               totais_get(dec, "PAGAMENTOS") -
@@ -54,6 +62,10 @@ static void total_pago(struct declaracao *dec)
                dec->pago += rendimento->imposto;
                dec->retido += rendimento->imposto;
        }
+       if (dec->verbose) {
+               printf("Total pago e retido: "FMT_R" "FMT_R"\n",
+                       R(dec->pago), R(dec->retido));
+       }
 }
 
 struct taxtable {
@@ -75,11 +87,15 @@ static const long long simples2015 = 1588089;
 
 static const long long obrigatoriedade2015 = 2681655;
 
-static long long imposto(struct taxtable *tt, long long tr)
+static long long imposto(struct taxtable *tt, long long tr, int verbose)
 {
        int i;
        for (i = 0; tr >= tt[i].base; i++);
        i--;
+       if (verbose) {
+               printf("Aplicando aliquota de %d%%, deduzindo " FMT_R"\n",
+                       tt[i].aliquota / 10, R(tt[i].deducao));
+       }
        return tr * tt[i].aliquota / 10000 - tt[i].deducao;
 }
 
@@ -96,7 +112,10 @@ static long long imposto_simples(struct declaracao *dec)
        totais_add(dec, "DESCONTO", td);
        tr -= td;
        totais_add(dec, "BASESIMPLES", tr);
-       return imposto(tt, tr);
+       if (dec->verbose) {
+               printf("Desconto simplificado é "FMT_R"\n", R(td));
+       }
+       return imposto(tt, tr, dec->verbose);
 }
 
 static long long imposto_completa(struct declaracao *dec)
@@ -112,7 +131,10 @@ static long long imposto_completa(struct declaracao *dec)
        totais_add(dec, "DEDUCOES", td);
        tr -= td;
        totais_add(dec, "BASECOMPLETA", tr);
-       return imposto(tt, tr);
+       if (dec->verbose) {
+               printf("Desconto completa é "FMT_R"\n", R(td));
+       }
+       return imposto(tt, tr, dec->verbose);
 }
 
 int calcula(struct declaracao *dec)
@@ -121,11 +143,23 @@ int calcula(struct declaracao *dec)
        if (dec->ano != 2015) {
                return -EINVAL;
        }
-       if (totais_get(dec, "RENDPJ") > obrigatoriedade2015)
+       if (totais_get(dec, "RENDPJ") > obrigatoriedade2015) {
+               if (dec->verbose) {
+                       printf("Declaracao obrigatoria pois rendimento e"
+                               "maior que mínimo para declaracao: "
+                               FMT_R" > "FMT_R"\n",
+                               R(totais_get(dec, "RENDPJ")),
+                               R(obrigatoriedade2015));
+               }
                dec->obrigatoria = 1;
+       }
        i_simples = imposto_simples(dec);
        i_completa = imposto_completa(dec);
        total_pago(dec);
+       if (dec->verbose) {
+               printf("Imposto simplificada e completa: "FMT_R" "FMT_R"\n",
+                       R(i_simples), R(i_completa));
+       }
        if (dec->tipo != FORCA_SIMPLES &&
            (i_simples > i_completa || dec->tipo == FORCA_COMPLETA)) {
                totais_add(dec, "BASE", totais_get(dec, "BASECOMPLETA"));