gera: Principal fonte pagadora na linha de contribuinte.

diff --git a/gera.c b/gera.c
index 3eb15c5..0de65ac 100644 (file)
--- a/gera.c
+++ b/gera.c
@@ -191,7 +191,8 @@ static void gera_contribuinte(struct declaracao *dec, FILE *f)
        fprintf(f, "%-2.2s", dec->dvconta); /* DV conta */
        fprintf(f, "N"); /* TODO: débito automático */
        fprintf(f, "0"); /* TODO: débito primeira quota */
-       fprintf(f, "%-14.14s", ""); /* TODO: CNPJ principal fonte */
+       /* CNPJ principal fonte */
+       fprintf(f, "%-14.14s", rendimento_cnpj_ordenado(dec, 0));
        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 */