From: Thadeu Lima de Souza Cascardo <cascardo@cascardo.eti.br>
Date: Sat, 25 Jul 2015 20:35:51 +0000 (-0300)
Subject: Suporta indicadores de segurança, imposto pago e antecipado.
X-Git-Url: http://git.cascardo.eti.br/?p=cascardo%2Fdeclara.git;a=commitdiff_plain;h=9778f83ee7024d04712c79a7c520e7b5fbc5fb28

Suporta indicadores de segurança, imposto pago e antecipado.

Foi observada uma divergência no valor do indicador de segurança entre
uma declaração retificadora e uma vazia, com apenas recibo anterior. O
mesmo para os valores de imposto pago e antecipado.

Utilizando o código do IRPF Livre, foi constatado que também devem ser
considerados no futuro os casos de Carnê Leão, Lei 11.033 e outros.
---

diff --git a/gera.c b/gera.c
index 9129148..ac4b1c2 100644
--- a/gera.c
+++ b/gera.c
@@ -55,9 +55,14 @@ static void gera_header(struct declaracao *dec, FILE *f)
 	fprintf(f, "%d", dec->obrigatoria); /* TODO: obrigatoria entrega */
 	fprintf(f, "%013lld", dec->devido); /* imposto devido, carne-leao, complementar dos dependentes */
 	fprintf(f, "%-10.10s", dec->recibo ?: ""); /* recibo ex. anterior */
-	fprintf(f, "2"); /* TODO: indicador seguranca */
-	fprintf(f, "00"); /* TODO: indicador imposto pago */
-	fprintf(f, "0"); /* TODO: indicador imposto antecipado */
+	/* Indicador de segurança: 0 se retificadora, 2 se recibo
+	 * anterior, se não 1. */
+	fprintf(f, "%d", dec->retifica ? 0 : (dec->recibo ? 2 : 1));
+	/* Indicador imposto pago, TODO: carnê leão e Lei 11.033. */
+	fprintf(f, "%02d", dec->retido ? 1 : 0);
+	/* Indicador imposto antecipado, TODO: carnê leão, Lei 11.033,
+	 * outros. */
+	fprintf(f, "%d", dec->retido ? 1 : 0);
 	fprintf(f, "0"); /* TODO: mudanca endereco */
 	fprintf(f, "%s", dec->contribuinte.cep);
 	fprintf(f, "0"); /* TODO: debito 1a quota */