Suporta rendimentos isentos e exclusivos de dependentes.
[cascardo/declara.git] / lib / gera.c
index 382ec06..2d02d26 100644 (file)
@@ -1,5 +1,5 @@
 /*
- *  Copyright (C) 2015  Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
+ *  Copyright (C) 2015-2016  Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
  *
  *  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
 #include "dependente.h"
 #include "totais.h"
 #include "sistema.h"
+#include "ano.h"
 
 static void gera_header(struct declaracao *dec, FILE *f)
 {
+       int i;
+
        fprintf(f, "IRPF    ");
        fprintf(f, "%04d", dec->ano); /* Exercício */
        fprintf(f, "%04d", dec->ano - 1); /* Ano base */
-       fprintf(f, "2500"); /* Código */
+       if (dec->ano == 2015)
+               fprintf(f, "2500"); /* Código */
+       else if (dec->ano == 2016)
+               fprintf(f, "2600"); /* Código */
        fprintf(f, "%s", dec->retifica ? "1" : "0"); /* Retificadora */
        fprintf(f, "%s", dec->cpf); /* CPF: 11 dígitos */
        fprintf(f, "   "); /* Filler */
        fprintf(f, "1"); /* Tipo NI: Pessoa Física (1) */
-       fprintf(f, "130"); /* Versão IRPF */
+       if (dec->ano == 2015)
+               fprintf(f, "130"); /* Versão IRPF */
+       else if (dec->ano == 2016)
+               fprintf(f, "110"); /* Versão IRPF */
        fprintf(f, "%-60.60s", dec->nome);
-       fprintf(f, "%s", dec->contribuinte.uf);
+       fprintf(f, "%-2.2s", dec->contribuinte.uf ?: "");
        fprintf(f, "%s", "0000000000"); /* FIXME: hash */
        fprintf(f, "1"); /* TODO: certificavel */
-       fprintf(f, "%-8.8s", dec->contribuinte.dn);
+       fprintf(f, "%-8.8s", dec->contribuinte.dn ?: "");
        fprintf(f, "%s", dec->tipo == COMPLETA ? "S" : "N");
        /* TODO: resultado imposto, 1 - pagar, 2 - restituicao */
        fprintf(f, "%s", dec->restituicao ? "2" : (dec->pagar ? "1" : "0"));
@@ -72,7 +81,7 @@ static void gera_header(struct declaracao *dec, FILE *f)
         * outros. */
        fprintf(f, "%d", dec->retido ? 1 : 0);
        fprintf(f, "0"); /* TODO: mudanca endereco */
-       fprintf(f, "%s", dec->contribuinte.cep);
+       fprintf(f, "%-8.8s", dec->contribuinte.cep ?: "");
        fprintf(f, "0"); /* TODO: debito 1a quota */
        fprintf(f, "%-3.3s", dec->banco ? : "000"); /* no banco */
        fprintf(f, "%-4.4s", dec->agencia ? : "0000"); /* agencia */
@@ -92,18 +101,20 @@ static void gera_header(struct declaracao *dec, FILE *f)
        fprintf(f, "%-14.14s", rendimento_cnpj_ordenado(dec, 1)); /* CNPJ maior 2 */
        fprintf(f, "%-14.14s", rendimento_cnpj_ordenado(dec, 2)); /* CNPJ maior 3 */
        fprintf(f, "%-14.14s", rendimento_cnpj_ordenado(dec, 3)); /* CNPJ maior 4 */
-       fprintf(f, "%-11.11s", ""); /* CPF Dependente 1 */
-       fprintf(f, "%-8.8s", ""); /* DN Dependente 1 */
-       fprintf(f, "%-11.11s", ""); /* CPF Dependente 2 */
-       fprintf(f, "%-8.8s", ""); /* DN Dependente 2 */
-       fprintf(f, "%-11.11s", ""); /* CPF Dependente 3 */
-       fprintf(f, "%-8.8s", ""); /* DN Dependente 3 */
-       fprintf(f, "%-11.11s", ""); /* CPF Dependente 4 */
-       fprintf(f, "%-8.8s", ""); /* DN Dependente 4 */
-       fprintf(f, "%-11.11s", ""); /* CPF Dependente 5 */
-       fprintf(f, "%-8.8s", ""); /* DN Dependente 5 */
-       fprintf(f, "%-11.11s", ""); /* CPF Dependente 6 */
-       fprintf(f, "%-8.8s", ""); /* DN Dependente 6 */
+       /* CPF e DN de dependentes 1 a 6 */
+       for (i = 1; i <= 6; i++) {
+               struct dependente *dependente = list_get(dec->dependentes, i - 1);
+               if (dependente && dependente->cpf && dependente->cpf[0]) {
+                       fprintf(f, "%-11.11s", dependente->cpf);
+               } else {
+                       fprintf(f, "%-11.11s", "");
+               }
+               if (dependente && dependente->dn && dependente->dn[0]) {
+                       fprintf(f, "%-8.8s", dependente->dn);
+               } else {
+                       fprintf(f, "%-8.8s", "");
+               }
+       }
        /* medico maior, TODO: outros códigos */
        fprintf(f, "%-14.14s", medico_cnpj_ordenado(dec, 0));
        /* medico maior 2, TODO: outros códigos */
@@ -119,9 +130,9 @@ static void gera_header(struct declaracao *dec, FILE *f)
        fprintf(f, "%03d", dec->obrigatoria); /* criterio obrigatoriedade */
        fprintf(f, "%013lld", totais_get(dec, "RENDPJ")); /* Total tributavel */
        /* CNPJ previdencia */
-       fprintf(f, "%-14.14s", pagamento_cnpj_ordenado(dec, 36, 0));
+       fprintf(f, "%-14.14s", inss_cnpj_ordenado(dec, 0));
        /* CNPJ previdencia 2 */
-       fprintf(f, "%-14.14s", pagamento_cnpj_ordenado(dec, 36, 1));
+       fprintf(f, "%-14.14s", inss_cnpj_ordenado(dec, 1));
        /* Total isentos */
        fprintf(f, "%013lld", totais_get(dec, "ISENTOS"));
        /* Total exclusivo */
@@ -154,6 +165,27 @@ static void gera_header(struct declaracao *dec, FILE *f)
 
        /* Fim das mudanças de 2015 */
 
+       /* Mudanças de 2016 */
+
+       if (dec->ano == 2016) {
+               /* CNPJ maior pagamento dedutível */
+               fprintf(f, "%-14.14s", pagamento_cnpj_ordenado(dec, 0));
+               /* CNPJ maior pagamento dedutível */
+               fprintf(f, "%-14.14s", pagamento_cnpj_ordenado(dec, 1));
+               /* CNPJ maior pagamento dedutível */
+               fprintf(f, "%-14.14s", pagamento_cnpj_ordenado(dec, 2));
+               /* CNPJ maior pagamento dedutível */
+               fprintf(f, "%-14.14s", pagamento_cnpj_ordenado(dec, 3));
+               /* CNPJ maior pagamento dedutível */
+               fprintf(f, "%-14.14s", pagamento_cnpj_ordenado(dec, 4));
+               /* CNPJ maior pagamento dedutível */
+               fprintf(f, "%-14.14s", pagamento_cnpj_ordenado(dec, 5));
+               /* TODO: CNPJ maior pagamento FUNPRESP */
+               fprintf(f, "%-14.14s", "");
+       }
+
+       /* Fim das mudanças de 2016 */
+
        fprintf(f, "   "); /* Teste PGD, FILLER2 */
 }
 
@@ -173,13 +205,21 @@ static void gera_contribuinte(struct declaracao *dec, FILE *f)
        fprintf(f, "%-2.2s", dec->contribuinte.uf);
        fprintf(f, "   "); /* TODO: código exterior */
        fprintf(f, "105"); /* TODO: código país */
-       fprintf(f, "%-100.100s", ""); /* TODO: FILLER3 */
-       fprintf(f, "%-4.4s", ""); /* TODO: FILLER1 */
-       fprintf(f, "%-8.8s", ""); /* TODO: FILLER2 */
-       fprintf(f, "%-4.4s", dec->contribuinte.ddd);
-       fprintf(f, "%-9.9s", dec->contribuinte.telefone);
+       if (dec->ano == 2015) {
+               fprintf(f, "%-100.100s", ""); /* FILLER3 */
+               fprintf(f, "%-4.4s", ""); /* FILLER1 */
+               fprintf(f, "%-8.8s", ""); /* FILLER2 */
+       } else if (dec->ano == 2016) {
+               fprintf(f, "%-90.90s", ""); /* FILLER3 */
+               /* TODO: NIT/PIS/PASEP de Pessoa Física no exterior */
+               fprintf(f, "%-11.11s", "");
+               /* CPF do cônjuge */
+               fprintf(f, "%-11.11s", dec->conjuge.cpf ?: "");
+       }
+       fprintf(f, "%-4.4s", dec->contribuinte.ddd ?: "");
+       fprintf(f, "%-9.9s", dec->contribuinte.telefone ?: "");
        fprintf(f, "%-8.8s", dec->contribuinte.dn);
-       fprintf(f, "%-13.13s", dec->contribuinte.titulo_eleitor);
+       fprintf(f, "%-13.13s", dec->contribuinte.titulo_eleitor ?: "");
        fprintf(f, "%03d", dec->contribuinte.ocupacao_principal);
        fprintf(f, "%02d", dec->contribuinte.natureza_ocupacao);
        fprintf(f, "%d", dec->pagar ? 1 : 0); /* TODO/FIXME: qnt quotas */
@@ -201,6 +241,8 @@ static void gera_contribuinte(struct declaracao *dec, FILE *f)
        fprintf(f, "%-10.10s", dec->recibo ?: ""); /* Recibo última declaração ano anterior */
        fprintf(f, "A"); /* Declaração de Ajuste */
        fprintf(f, "%-11.11s", ""); /* TODO: CPF procurador */
+       if (dec->ano == 2016)
+               fprintf(f, "%-20.20s", ""); /* TODO: registro profissional */
 }
 
 static void gera_simples(struct declaracao *dec, FILE *f)
@@ -258,7 +300,11 @@ static void gera_totais_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", dec->pagar); /* TODO: valor quota */
        fprintf(f, "%013lld", totais_get(dec, "ISENTOS")); /* rendimentos isentos */
        fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOS")); /* rendimentos tributação exclusiva */
-       fprintf(f, "%013lld", dec->conjuge.total); /* conjuge */
+       if (dec->ano == 2015) {
+               fprintf(f, "%013lld", dec->conjuge.total); /* conjuge */
+       } else if (dec->ano == 2016) {
+               fprintf(f, "%013lld", 0); /* FILLER */
+       }
        fprintf(f, "%013lld", 0); /* TODO: rendimento PJ dependente */
        fprintf(f, "%013lld", 0); /* TODO: imposto retido dependente */
        fprintf(f, "%013lld", 0); /* TODO: imposto ganhos de capital */
@@ -316,8 +362,10 @@ static void gera_completa(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: carnê-leão - dependente */
        fprintf(f, "%013lld", totais_get(dec, "PREVIDENCIA")); /* TODO: contribuição previdenciária privada */
        fprintf(f, "%013lld", 0); /* TODO: contribuição FAPI */
-       fprintf(f, "%013lld", totais_get(dec, "INSS")); /* TODO: INSS titular */
-       fprintf(f, "%013lld", 0); /* TODO: INSS dependente */
+       /* INSS titular, TODO (2016): sem RRA */
+       fprintf(f, "%013lld", totais_get(dec, "INSS"));
+       /* TODO: INSS dependente, TODO (2016): sem RRA */
+       fprintf(f, "%013lld", 0);
        fprintf(f, "%013lld", totais_get(dec, "DECIMOTERCEIRO")); /* TODO: 13o titular */
        fprintf(f, "%013lld", 0); /* TODO: 13o dependente */
        fprintf(f, "%05d", 0); /* TODO: dependentes com instrucao */
@@ -329,6 +377,12 @@ static void gera_completa(struct declaracao *dec, FILE *f)
        /* IRPF-2015-1.3 gera este valor como 0, antes era dec->devido */
        fprintf(f, "%013lld", 0); /* TODO: imposto devido sem rendimento exterior */
        fprintf(f, "%013lld", 0); /* TODO: limite imposto pago exterior */
+       if (dec->ano == 2016) {
+               /* TODO: valor até o limite da FUNPRESP */
+               fprintf(f, "%013lld", 0);
+               /* TODO: valor acima do limite da FUNPRESP */
+               fprintf(f, "%013lld", 0);
+       }
 }
 
 static void gera_totais_completa(struct declaracao *dec, FILE *f)
@@ -341,7 +395,9 @@ static void gera_totais_completa(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF dependente */
        fprintf(f, "%013lld", 0); /* TODO: resultado atividade rural */
        fprintf(f, "%013lld", totais_get(dec, "RENDPJ")); /* TODO: total rendimentos tributáveis */
+       /* TODO (2016): somar FUNPRESP até o limite */
        fprintf(f, "%013lld", totais_get(dec, "INSS")); /* previdencia oficial */
+       /* TODO (2016): somar FUNPRESP acima do limite */
        fprintf(f, "%013lld", totais_get(dec, "PREVIDENCIA")); /* previdencia privada */
        fprintf(f, "%013lld", totais_get(dec, "DEPENDENTES")); /* deducao dependentes */
        fprintf(f, "%013lld", 0); /* TODO: deducao instrucao */
@@ -373,7 +429,11 @@ static void gera_totais_completa(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", totais_get(dec, "BENS")); /* total bens ano base */
        fprintf(f, "%013lld", 0); /* TODO: total dívidas ano anterior */
        fprintf(f, "%013lld", 0); /* TODO: total dívidas ano base */
-       fprintf(f, "%013lld", dec->conjuge.total); /* conjuge */
+       if (dec->ano == 2015) {
+               fprintf(f, "%013lld", dec->conjuge.total); /* conjuge */
+       } else if (dec->ano == 2016) {
+               fprintf(f, "%013lld", 0); /* FILLER */
+       }
        fprintf(f, "%013lld", totais_get(dec, "ISENTOS")); /* rendimentos isentos */
        fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOS")); /* rendimentos tributação exclusiva */
        fprintf(f, "%013lld", 0); /* TODO: imposto ganhos de capital */
@@ -488,19 +548,35 @@ static void gera_conjuge(struct declaracao *dec, FILE *f)
        fprintf(f, "%c", dec->conjuge.entregou ? 'S' : 'N');
 }
 
+static int is_trailler_filler(int ano, int i)
+{
+       return i == 44;
+       /* Ano 2016, linha 29 é um FILLER, mas preenchida com múltiplos
+        * 0s. Como esta linha não é gerada na declaração de 2016, não
+        * deve constar aqui, e será contabilizada como 0. */
+       /* || (ano == 2016 && i == 29); */
+}
+
+static int is_trailler_empty(int ano, int i)
+{
+       return (i == 57 || i == 64 || i == 79) ||
+               (ano == 2015 && i == 49);
+}
+
 static void gera_trailler(struct declaracao *dec, FILE *f)
 {
        int i;
        fprintf(f, "T9");
        fprintf(f, "%s", dec->cpf); /* CPF: 11 dígitos */
        fprintf(f, "%06d", dec->linhas[0]);
-       for (i = 16; i < 100; i++)
-               if (i == 44)
+       for (i = 16; i < 100; i++) {
+               if (is_trailler_filler(dec->ano, i))
                        fprintf(f, "%-5.5s", "0"); /* FILLER */
-               else if (i == 49 || i == 57 || i == 64 || i == 79)
+               else if (is_trailler_empty(dec->ano, i))
                        ;
                else
                        fprintf(f, "%05d", dec->linhas[i]);
+       }
 }
 
 static void gera_reciboheader(struct declaracao *dec, FILE *f)
@@ -529,8 +605,8 @@ static void gera_recibodetalhe(struct declaracao *dec, FILE *f)
        fprintf(f, "%-100.100s", ""); /* FILLER */
        fprintf(f, "%-4.4s", ""); /* FILLER */
        fprintf(f, "%-8.8s", ""); /* FILLER */
-       fprintf(f, "%-4.4s", dec->contribuinte.ddd);
-       fprintf(f, "%-9.9s", dec->contribuinte.telefone);
+       fprintf(f, "%-4.4s", dec->contribuinte.ddd ?: "");
+       fprintf(f, "%-9.9s", dec->contribuinte.telefone ?: "");
        fprintf(f, "%s", dec->retifica ? "S" : "N"); /* Retificadora */
        fprintf(f, "%013lld", totais_get(dec, "RENDPJ")); /* Total tributavel */
        fprintf(f, "%013lld", dec->devido); /* Imposto devido */
@@ -579,15 +655,19 @@ static void gera_pagamento(struct declaracao *dec, FILE *f)
        fprintf(f, "26");
        fprintf(f, "%s", dec->cpf);
        fprintf(f, "%02d", p->codigo);
-       fprintf(f, "%05d", 0); /* TODO: chave dependente */
+       fprintf(f, "%05d", p->dependente);
        fprintf(f, "%-14.14s", p->cnpj);
        fprintf(f, "%-60.60s", p->nome);
        fprintf(f, "%-11.11s", ""); /* TODO: NIT */
        fprintf(f, "%013lld", p->pagamento);
        fprintf(f, "%013lld", p->reembolso);
+       if (dec->ano == 2016) {
+               /* TODO: contribuição do ente público patrocinador (FUNPRESP?) */
+               fprintf(f, "%013lld", 0);
+       }
        fprintf(f, "%d", strlen(p->cnpj) == 11 ? 1 : 2);
-       /* Titular (T), Dependente (D), Alimentando (A), FIXME */
-       fprintf(f, "T");
+       /* Titular (T), Dependente (D), Alimentando (A), FIXME Alimentando */
+       fprintf(f, "%c", p->dependente ? 'D' : 'T');
 }
 
 static void gera_isento(struct declaracao *dec, FILE *f, int codigo)
@@ -595,13 +675,25 @@ static void gera_isento(struct declaracao *dec, FILE *f, int codigo)
        struct isento *i;
        i = isento_get(dec, codigo, dec->linhas[codigo]);
        fprintf(f, "%02d", codigo);
-       fprintf(f, "%-11.11s", dec->cpf); /* Titular, TODO: dependente */
+       fprintf(f, "%-11.11s", dec->cpf); /* Titular */
        fprintf(f, "%05d", dec->linhas[codigo] + 1); /* Chave */
-       fprintf(f, "%c", 'T'); /* FIXME: dependente */
+       /* Titular (T), Dependente (D), Alimentando (A), FIXME Alimentando */
+       fprintf(f, "%c", i->dependente ? 'D' : 'T');
        fprintf(f, "%-14.14s", i->cnpj);
        fprintf(f, "%-60.60s", i->nome);
        fprintf(f, "%013lld", i->valor);
-       fprintf(f, "%-11.11s", dec->cpf);
+       if (i->dependente) {
+               struct dependente *d;
+               d = list_get(dec->dependentes, i->dependente - 1);
+               fprintf(f, "%-11.11s", d ? d->cpf : "");
+       } else {
+               fprintf(f, "%-11.11s", dec->cpf);
+       }
+}
+
+static void gera_doacao(struct declaracao *dec, FILE *f)
+{
+       gera_isento(dec, f, 82);
 }
 
 static void gera_plr(struct declaracao *dec, FILE *f)
@@ -633,6 +725,10 @@ static void gera_dependente(struct declaracao *dec, FILE *f)
        fprintf(f, "%-11.11s", d->cpf);
        /* TODO: Indicador de saída */
        fprintf(f, " ");
+       if (dec->ano == 2016) {
+               /* TODO: NIT/PIS/PASEP de Pessoa Física no exterior */
+               fprintf(f, "%-11.11s", "");
+       }
 }
 
 static void gera_bem(struct declaracao *dec, FILE *f)
@@ -777,8 +873,10 @@ static int gera(struct declaracao *dec, char *filename)
                W(gera_rendimento);
        }
 
-       W(gera_isentos);
-       W(gera_exclusivos);
+       if (totais_get(dec, "ISENTOS"))
+               W(gera_isentos);
+       if (totais_get(dec, "EXCLUSIVOS"))
+               W(gera_exclusivos);
 
        for (i = 0; (dependente = list_get(dec->dependentes, i)); i++) {
                W(gera_dependente);
@@ -790,7 +888,7 @@ static int gera(struct declaracao *dec, char *filename)
                W(gera_bem);
        }
 
-       if (dec->conjuge.cpf)
+       if (dec->ano == 2015 && dec->conjuge.cpf)
                W(gera_conjuge);
 
        /* Rendimentos isentos e com tributação exclusiva */
@@ -802,6 +900,7 @@ static int gera(struct declaracao *dec, char *filename)
                        break; \
                W(fn); \
        }
+       IW(gera_doacao, 82);
        IW(gera_plr, 96);
        IW(gera_poupanca, 98);
        IW(gera_aplicacoes, 99);
@@ -830,7 +929,7 @@ static int run_gera(struct declaracao *dec, char **args, int argc)
 {
        if (argc != 2)
                return -EINVAL;
-       if (dec->ano != 2015)
+       if (!ANO_VALIDO(dec->ano))
                return -EINVAL;
        return gera(dec, args[1]);
 }