Usa última versão IRPF 2017

[cascardo/declara.git] / lib / gera.c

diff --git a/lib/gera.c b/lib/gera.c
index 212ca95..6cf116e 100644 (file)
--- a/lib/gera.c
+++ b/lib/gera.c
@@ -1,5 +1,5 @@
 /*
- *  Copyright (C) 2015-2016  Thadeu Lima de Souza Cascardo <cascardo@minaslivre.org>
+ *  Copyright (C) 2015-2017  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
@@ -44,6 +44,8 @@ static void gera_header(struct declaracao *dec, FILE *f)
                fprintf(f, "2500"); /* Código */
        else if (dec->ano == 2016)
                fprintf(f, "2600"); /* Código */
+       else if (dec->ano == 2017)
+               fprintf(f, "2700"); /* Código */
        fprintf(f, "%s", dec->retifica ? "1" : "0"); /* Retificadora */
        fprintf(f, "%s", dec->cpf); /* CPF: 11 dígitos */
        fprintf(f, "   "); /* Filler */
@@ -52,6 +54,8 @@ static void gera_header(struct declaracao *dec, FILE *f)
                fprintf(f, "130"); /* Versão IRPF */
        else if (dec->ano == 2016)
                fprintf(f, "110"); /* Versão IRPF */
+       else if (dec->ano == 2017)
+               fprintf(f, "110"); /* Versão IRPF */
        fprintf(f, "%-60.60s", dec->nome);
        fprintf(f, "%-2.2s", dec->contribuinte.uf ?: "");
        fprintf(f, "%s", "0000000000"); /* FIXME: hash */
@@ -123,12 +127,15 @@ static void gera_header(struct declaracao *dec, FILE *f)
        fprintf(f, "%-11.11s", ""); /* CPF inventariante */
        fprintf(f, "%-40.40s", dec->contribuinte.municipio);
        fprintf(f, "%-60.60s", dec->nome);
-       fprintf(f, "%-11.11s", ""); /* CPF empregada */
+       if (dec->ano == 2017)
+               fprintf(f, "%010u ", crc32(0, dec->cpf, 11)); /* hash CPF */
+       else
+               fprintf(f, "%-11.11s", ""); /* CPF empregada, FILLER */
        fprintf(f, "%-12.12s", sistema_get_mac(dec));
        fprintf(f, "%08d", 0); /* Data saída */
        fprintf(f, "%-11.11s", ""); /* CPF procurador */
        fprintf(f, "%03d", dec->obrigatoria); /* criterio obrigatoriedade */
-       fprintf(f, "%013lld", totais_get(dec, "RENDPJ")); /* Total tributavel */
+       fprintf(f, "%013lld", totais_get(dec, "RENDTRIB")); /* Total tributavel */
        /* CNPJ previdencia */
        fprintf(f, "%-14.14s", inss_cnpj_ordenado(dec, 0));
        /* CNPJ previdencia 2 */
@@ -167,7 +174,7 @@ static void gera_header(struct declaracao *dec, FILE *f)
 
        /* Mudanças de 2016 */
 
-       if (dec->ano == 2016) {
+       if (dec->ano >= 2016) {
                /* CNPJ maior pagamento dedutível */
                fprintf(f, "%-14.14s", pagamento_cnpj_ordenado(dec, 0));
                /* CNPJ maior pagamento dedutível */
@@ -209,7 +216,7 @@ static void gera_contribuinte(struct declaracao *dec, FILE *f)
                fprintf(f, "%-100.100s", ""); /* FILLER3 */
                fprintf(f, "%-4.4s", ""); /* FILLER1 */
                fprintf(f, "%-8.8s", ""); /* FILLER2 */
-       } else if (dec->ano == 2016) {
+       } else if (dec->ano >= 2016) {
                fprintf(f, "%-90.90s", ""); /* FILLER3 */
                /* TODO: NIT/PIS/PASEP de Pessoa Física no exterior */
                fprintf(f, "%-11.11s", "");
@@ -241,8 +248,12 @@ 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)
+       if (dec->ano >= 2016)
                fprintf(f, "%-20.20s", ""); /* TODO: registro profissional */
+       if (dec->ano >= 2017) {
+               fprintf(f, "%-11.11s", ""); /* TODO: celular */
+               fprintf(f, "%s", dec->conjuge.cpf ? "S" : "N");
+       }
 }
 
 static void gera_simples(struct declaracao *dec, FILE *f)
@@ -260,15 +271,17 @@ static void gera_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: retido na fonte (Lei 11.033) */
        fprintf(f, "%013lld", 0); /* TODO: 13o. dependentes */
        fprintf(f, "%013lld", 0); /* TODO: lucros dependentes */
-       fprintf(f, "%013lld", totais_get(dec, "ISENTOSDEP")); /* isentos dependentes */
+       /* BUG IRPF: O IRPF imprime 0 aqui mesmo com doações e poupança. */
+       /* fprintf(f, "%013lld", totais_get(dec, "ISENTOSDEP")); */
+       fprintf(f, "%013lld", 0); /* isentos dependentes */
        fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSDEP")); /* exclusivos dependentes */
        fprintf(f, "%-13.13s", ""); /* FILLER */
        fprintf(f, "%-13.13s", ""); /* FILLER */
-       fprintf(f, "%013lld", 0); /* TODO: rendimentos PF */
+       fprintf(f, "%013lld", totais_get(dec, "RENDPF")); /* rendimentos PF */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF dependentes */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF exterior */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF ext. depend. */
-       fprintf(f, "%013lld", 0); /* TODO: carnê-leão PF? */
+       fprintf(f, "%013lld", totais_get(dec, "RENDPF")); /* TODO: carnê-leão PF? */
        fprintf(f, "%013lld", 0); /* TODO: carnê-leão dependentes */
        fprintf(f, "%013lld", totais_get(dec, "DEPENDENTES")); /* dedução dependentes */
        fprintf(f, "%013lld", 0); /* TODO: previdência RRA */
@@ -284,7 +297,7 @@ static void gera_totais_simples(struct declaracao *dec, FILE *f)
 {
        fprintf(f, "18");
        fprintf(f, "%s", dec->cpf); /* CPF: 11 dígitos */
-       fprintf(f, "%013lld", totais_get(dec, "RENDPJ")); /* TODO: rendimentos tributáveis */
+       fprintf(f, "%013lld", totais_get(dec, "RENDTRIB")); /* rendimentos tributáveis */
        /* desconto simplificado */
        fprintf(f, "%013lld", totais_get(dec, "DESCONTO"));
         /* base de cálculo */
@@ -292,7 +305,7 @@ static void gera_totais_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", dec->devido); /* imposto devido */
        fprintf(f, "%013lld", dec->retido); /* imposto retido */
        fprintf(f, "%013lld", 0); /* TODO: imposto complementar */
-       fprintf(f, "%013lld", 0); /* TODO: carnê-leão */
+       fprintf(f, "%013lld", totais_get(dec, "RENDPF")); /* TODO: carnê-leão */
        fprintf(f, "%013lld", 0); /* TODO: imposto retido Lei 11.033 */
        fprintf(f, "%013lld", dec->restituicao); /* imposto a restituir */
        fprintf(f, "%013lld", dec->pagar); /* imposto pagar */
@@ -302,7 +315,7 @@ static void gera_totais_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOS")); /* rendimentos tributação exclusiva */
        if (dec->ano == 2015) {
                fprintf(f, "%013lld", dec->conjuge.total); /* conjuge */
-       } else if (dec->ano == 2016) {
+       } else if (dec->ano >= 2016) {
                fprintf(f, "%013lld", 0); /* FILLER */
        }
        fprintf(f, "%013lld", 0); /* TODO: rendimento PJ dependente */
@@ -317,7 +330,7 @@ static void gera_totais_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", totais_get(dec, "ISENTOSDEP")); /* rendimentos isentos dependentes */
        fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSTIT")); /* tributação exclusiva titular */
        fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSDEP")); /* tributação exclusiva dependentes */
-       fprintf(f, "%013lld", 0); /* TODO: total não tributável */
+       fprintf(f, "%013lld", 0); /* TODO: total não tributável AR */
        fprintf(f, "%013lld", 0); /* TODO: total dívidas ano anterior */
        fprintf(f, "%013lld", 0); /* TODO: total dívidas ano base */
        fprintf(f, "%013lld", 0); /* TODO: retido fonte Lei 11.033 */
@@ -368,16 +381,16 @@ static void gera_completa(struct declaracao *dec, FILE *f)
        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 */
+       fprintf(f, "%05d", totais_get(dec, "DEPSINSTRUCAO")); /* dependentes com instrucao */
        fprintf(f, "%05d", 0); /* TODO: alimentandos com instrucao */
-       fprintf(f, "%013lld", 0); /* TODO: rendimentos PF titular */
+       fprintf(f, "%013lld", totais_get(dec, "RENDPFTIT")); /* TODO: rendimentos PF titular */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF dependente */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF exterior titular */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF exterior dependente */
        /* 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) {
+       if (dec->ano >= 2016) {
                /* TODO: valor até o limite da FUNPRESP */
                fprintf(f, "%013lld", 0);
                /* TODO: valor acima do limite da FUNPRESP */
@@ -391,16 +404,16 @@ static void gera_totais_completa(struct declaracao *dec, FILE *f)
        fprintf(f, "%s", dec->cpf); /* CPF: 11 dígitos */
        /* FIXME: completar campos */
        fprintf(f, "%013lld", totais_get(dec, "RENDPJTIT")); /* rendimentos PJ titular */
-       fprintf(f, "%013lld", 0); /* TODO: rendimentos PF titular */
+       fprintf(f, "%013lld", totais_get(dec, "RENDPFTIT")); /* TODO: rendimentos PF titular */
        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 */
+       fprintf(f, "%013lld", totais_get(dec, "RENDTRIB")); /* 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 */
+       fprintf(f, "%013lld", totais_get(dec, "INSTRUCAO")); /* deducao instrucao */
        fprintf(f, "%013lld", totais_get(dec, "MEDICAS")); /* despesas medicas */
        fprintf(f, "%013lld", 0); /* TODO: pensao */
        fprintf(f, "%013lld", 0); /* TODO: pensao escritura publica */
@@ -414,7 +427,7 @@ static void gera_totais_completa(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", dec->devido); /* TODO: imposto devido menos patronal */
        fprintf(f, "%013lld", dec->devido); /* TODO: imposto devido mais RRA */
        fprintf(f, "%013lld", dec->retido); /* imposto na fonte */
-       fprintf(f, "%013lld", 0); /* TODO: carne leao */
+       fprintf(f, "%013lld", totais_get(dec, "RENDPF")); /* TODO: carne leao */
 
        fprintf(f, "%013lld", 0); /* TODO: imposto complementar */
        fprintf(f, "%013lld", 0); /* TODO: imposto pago exterior */
@@ -431,7 +444,7 @@ static void gera_totais_completa(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: total dívidas ano base */
        if (dec->ano == 2015) {
                fprintf(f, "%013lld", dec->conjuge.total); /* conjuge */
-       } else if (dec->ano == 2016) {
+       } else if (dec->ano >= 2016) {
                fprintf(f, "%013lld", 0); /* FILLER */
        }
        fprintf(f, "%013lld", totais_get(dec, "ISENTOS")); /* rendimentos isentos */
@@ -477,7 +490,7 @@ static void gera_isentos(struct declaracao *dec, FILE *f)
        fprintf(f, "%-11.11s", dec->cpf);
        fprintf(f, "%013lld", 0); /* TODO: bolsa de estudo */
        fprintf(f, "%013lld", 0); /* TODO: pecúlio de previdência privada */
-       fprintf(f, "%013lld", 0); /* TODO: FGTS, aviso prévio indenizado */
+       fprintf(f, "%013lld", totais_get(dec, "INDENIZACOES")); /* FGTS, aviso prévio indenizado */
        fprintf(f, "%013lld", 0); /* TODO: ganho de capital isento */
        fprintf(f, "%013lld", 0); /* TODO: lucros e dividendos */
        fprintf(f, "%013lld", 0); /* TODO: atividade rural */
@@ -500,7 +513,7 @@ static void gera_isentos(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: GC total informado */
        fprintf(f, "%013lld", 0); /* TODO: GC total transportado */
        fprintf(f, "%013lld", 0); /* TODO: imposto renda anos anteriores */
-       fprintf(f, "%013lld", 0); /* TODO: rencimentos assalariados moeda estrangeira */
+       fprintf(f, "%013lld", 0); /* TODO: rendimentos assalariados moeda estrangeira */
        fprintf(f, "%013lld", 0); /* TODO: bonificações ações */
        fprintf(f, "%013lld", 0); /* TODO: médicos residentes */
        fprintf(f, "%013lld", 0); /* TODO: volutários da Copa */
@@ -608,7 +621,7 @@ static void gera_recibodetalhe(struct declaracao *dec, FILE *f)
        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", totais_get(dec, "RENDTRIB")); /* Total tributavel */
        fprintf(f, "%013lld", dec->devido); /* Imposto devido */
        fprintf(f, "%013lld", dec->restituicao); /* Imposto a restituir */
        fprintf(f, "%013lld", dec->pagar); /* Imposto a pagar */
@@ -661,7 +674,7 @@ static void gera_pagamento(struct declaracao *dec, FILE *f)
        fprintf(f, "%-11.11s", ""); /* TODO: NIT */
        fprintf(f, "%013lld", p->pagamento);
        fprintf(f, "%013lld", p->reembolso);
-       if (dec->ano == 2016) {
+       if (dec->ano >= 2016) {
                /* TODO: contribuição do ente público patrocinador (FUNPRESP?) */
                fprintf(f, "%013lld", 0);
        }
@@ -696,11 +709,26 @@ static void gera_doacao(struct declaracao *dec, FILE *f)
        gera_isento(dec, f, 82);
 }
 
+static void gera_indenizacoes(struct declaracao *dec, FILE *f)
+{
+       gera_isento(dec, f, 93);
+}
+
 static void gera_plr(struct declaracao *dec, FILE *f)
 {
        gera_isento(dec, f, 96);
 }
 
+static void gera_outrosisentos(struct declaracao *dec, FILE *f)
+{
+       struct isento *i;
+       int codigo = 97;
+       i = isento_get(dec, codigo, dec->linhas[codigo]);
+       gera_isento(dec, f, codigo);
+       fprintf(f, "%d", i->exclusivo == 0 ? 1 : 2);
+       fprintf(f, "%-60.60s", i->descricao);
+}
+
 static void gera_poupanca(struct declaracao *dec, FILE *f)
 {
        gera_isento(dec, f, 98);
@@ -725,7 +753,7 @@ 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) {
+       if (dec->ano >= 2016) {
                /* TODO: NIT/PIS/PASEP de Pessoa Física no exterior */
                fprintf(f, "%-11.11s", "");
        }
@@ -832,7 +860,7 @@ static void insert_hash(struct declaracao *dec, char *irpf)
 static int gera(struct declaracao *dec, char *filename)
 {
        FILE *f;
-       int r;
+       int r = 0;
        int i;
        struct rendimento *rendimento;
        struct isento *isento;
@@ -857,8 +885,12 @@ static int gera(struct declaracao *dec, char *filename)
        } while (0);
 
        f = fopen(filename, "w");
-       if (!f)
+       if (!f) {
+               r = -errno;
+               dec_set_error(dec, "Não foi possível abrir arquivo %s: %s.",
+                             filename, strerror(errno));
                goto out_file;
+       }
        memset(dec->linhas, 0, sizeof(dec->linhas));
        W(gera_header);
        W(gera_contribuinte);
@@ -901,7 +933,9 @@ static int gera(struct declaracao *dec, char *filename)
                W(fn); \
        }
        IW(gera_doacao, 82);
+       IW(gera_indenizacoes, 93);
        IW(gera_plr, 96);
+       IW(gera_outrosisentos, 97);
        IW(gera_poupanca, 98);
        IW(gera_aplicacoes, 99);
 
@@ -927,10 +961,16 @@ out_file:
 
 static int run_gera(struct declaracao *dec, char **args, int argc)
 {
-       if (argc != 2)
+       if (argc != 2) {
+               dec_set_error(dec, "Comando %s recebe um nome de arquivo como parâmetro.",
+                             args[0]);
                return -EINVAL;
-       if (!ANO_VALIDO(dec->ano))
+       }
+       if (!ANO_VALIDO(dec->ano)) {
+               dec_set_error(dec, "Comando %s não suporta ano %d.",
+                             args[0], dec->ano);
                return -EINVAL;
+       }
        return gera(dec, args[1]);
 }