Adiciona valores para cálculo referente a exercício 2017.

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

diff --git a/lib/gera.c b/lib/gera.c
index 93c30b9..a496190 100644 (file)
--- a/lib/gera.c
+++ b/lib/gera.c
@@ -35,6 +35,8 @@
 
 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 */
@@ -99,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 */
@@ -247,8 +251,8 @@ static void gera_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%s", dec->cpf); /* CPF: 11 dígitos */
        fprintf(f, "%013lld", 0); /* TODO: carnê leão */
        fprintf(f, "%013lld", 0); /* TODO: lucros e dividendos */
-       /* rendimentos isentos */
-       fprintf(f, "%013lld", totais_get(dec, "ISENTOS"));
+       /* rendimentos isentos titular */
+       fprintf(f, "%013lld", totais_get(dec, "ISENTOSTIT"));
        /* rendimentos tributação exclusiva, exceto décimo terceiro */
        fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOS_SEM_13o"));
        /* 13o. */
@@ -256,8 +260,10 @@ 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", 0); /* TODO: isentos dependentes */
-       fprintf(f, "%013lld", 0); /* TODO: exclusivos 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 */
@@ -266,7 +272,7 @@ static void gera_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF ext. depend. */
        fprintf(f, "%013lld", 0); /* TODO: carnê-leão PF? */
        fprintf(f, "%013lld", 0); /* TODO: carnê-leão dependentes */
-       fprintf(f, "%013lld", totais_get(dec, "DEPENDENTES")); /* TODO: dedução dependentes */
+       fprintf(f, "%013lld", totais_get(dec, "DEPENDENTES")); /* dedução dependentes */
        fprintf(f, "%013lld", 0); /* TODO: previdência RRA */
        fprintf(f, "%013lld", 0); /* TODO: previdência RRA dependentes */
        fprintf(f, "%013lld", 0); /* TODO: pensão RRA */
@@ -310,10 +316,10 @@ static void gera_totais_simples(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", totais_get(dec, "BENSANTERIOR")); /* total bens ano anterior */
        fprintf(f, "%013lld", totais_get(dec, "BENS")); /* total bens ano base */
        fprintf(f, "%013lld", totais_get(dec, "ISENTOSTIT")); /* rendimentos isentos titular */
-       fprintf(f, "%013lld", 0); /* TODO: rendimentos isentos dependentes */
-       fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSTIT")); /* TODO: tributação exclusiva titular */
-       fprintf(f, "%013lld", 0); /* TODO: tributação exclusiva dependentes */
-       fprintf(f, "%013lld", 0); /* TODO: total não tributável */
+       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 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 */
@@ -364,7 +370,7 @@ 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", 0); /* TODO: rendimentos PF dependente */
@@ -396,7 +402,7 @@ static void gera_totais_completa(struct declaracao *dec, FILE *f)
        /* 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 */
@@ -441,9 +447,9 @@ static void gera_totais_completa(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: imposto moeda estrangeira */
        fprintf(f, "%013lld", 0); /* TODO: imposto ganhos capital moeda */
        fprintf(f, "%013lld", totais_get(dec, "ISENTOSTIT")); /* rendimentos isentos titular */
-       fprintf(f, "%013lld", 0); /* TODO: rendimentos isentos dependentes */
+       fprintf(f, "%013lld", totais_get(dec, "ISENTOSDEP")); /* rendimentos isentos dependentes */
        fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSTIT")); /* TODO: tributação exclusiva titular */
-       fprintf(f, "%013lld", 0); /* TODO: tributação exclusiva dependentes */
+       fprintf(f, "%013lld", totais_get(dec, "EXCLUSIVOSDEP")); /* tributação exclusiva dependentes */
        fprintf(f, "%013lld", 0); /* TODO: doações campanha */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF exigibilidade suspensa titular */
        fprintf(f, "%013lld", 0); /* TODO: rendimentos PF exigibilidade suspensa dependentes */
@@ -473,7 +479,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 */
@@ -481,7 +487,7 @@ static void gera_isentos(struct declaracao *dec, FILE *f)
        fprintf(f, "%013lld", 0); /* TODO: pensão por invalidez */
        fprintf(f, "%013lld", totais_get(dec, "POUPANCA"));
        fprintf(f, "%013lld", 0); /* TODO: sócio ou titular de empresa */
-       fprintf(f, "%013lld", 0); /* TODO: herança, transferências patrimoniais */
+       fprintf(f, "%013lld", totais_get(dec, "DOACOES")); /* herança, transferências patrimoniais */
        fprintf(f, "%013lld", 0); /* TODO: outros rendimentos isentos */
        fprintf(f, "%-60.60s", ""); /* FILLER1 */
        fprintf(f, "%-13.13s", ""); /* FILLER2 */
@@ -496,7 +502,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 */
@@ -651,7 +657,7 @@ 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 */
@@ -662,8 +668,8 @@ static void gera_pagamento(struct declaracao *dec, FILE *f)
                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)
@@ -671,13 +677,30 @@ 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_indenizacoes(struct declaracao *dec, FILE *f)
+{
+       gera_isento(dec, f, 93);
 }
 
 static void gera_plr(struct declaracao *dec, FILE *f)
@@ -884,6 +907,8 @@ static int gera(struct declaracao *dec, char *filename)
                        break; \
                W(fn); \
        }
+       IW(gera_doacao, 82);
+       IW(gera_indenizacoes, 93);
        IW(gera_plr, 96);
        IW(gera_poupanca, 98);
        IW(gera_aplicacoes, 99);