Pagamento de psicólogo é despesa médica.

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

diff --git a/lib/pagamento.c b/lib/pagamento.c
index 1e91115..7dc0e95 100644 (file)
--- a/lib/pagamento.c
+++ b/lib/pagamento.c
@@ -31,11 +31,17 @@ static int pagamento_totais_update(struct declaracao *dec, struct pagamento *pag
 {
        int r;
        r = totais_add(dec, "PAGAMENTOS", pagamento->pagamento);
-       r += totais_add(dec, "PAGAMENTOSTIT", pagamento->pagamento);
        r += totais_add(dec, "REEMBOLSOS", pagamento->reembolso);
-       r += totais_add(dec, "REEMBOLSOSTIT", pagamento->reembolso);
+       if (pagamento->dependente) {
+               r += totais_add(dec, "PAGAMENTOSDEP", pagamento->pagamento);
+               r += totais_add(dec, "REEMBOLSOSDEP", pagamento->reembolso);
+       } else {
+               r += totais_add(dec, "PAGAMENTOSTIT", pagamento->pagamento);
+               r += totais_add(dec, "REEMBOLSOSTIT", pagamento->reembolso);
+       }
        switch (pagamento->codigo) {
        case 10:
+       case 12:
        case 21:
        case 26:
                r += totais_add(dec, "MEDICAS", pagamento->pagamento - pagamento->reembolso);
@@ -69,23 +75,27 @@ static int pagamento_cmp(void *p1, void *p2)
        return 0;
 }
 
-static struct pagamento * pagamento_new(char **args)
+static struct pagamento * pagamento_new(char **args, int argc)
 {
        struct pagamento *pagamento;
        int r = 0;
        pagamento = malloc(sizeof(*pagamento));
-       pagamento->cnpj = strdup(args[2]);
-       pagamento->nome = strdup(args[3]);
-       /* TODO: consertar set_int para funcionar como set_llong */
-       r += set_int(args, 2, &pagamento->codigo);
+       r += set_int(args[1], &pagamento->codigo);
+       r += set_string(args[2], &pagamento->cnpj);
+       r += set_string(args[3], &pagamento->nome);
        r += set_llong(args[4], &pagamento->pagamento);
        r += set_llong(args[5], &pagamento->reembolso);
-       if (!pagamento->cnpj || !pagamento->nome) {
+       if (r < 0 || pagamento->codigo < 0 ||
+           pagamento->pagamento < 0 || pagamento->reembolso < 0) {
                pagamento_free(pagamento);
                return NULL;
        }
-       if (r < 0 || pagamento->codigo < 0 ||
-           pagamento->pagamento < 0 || pagamento->reembolso < 0) {
+       if (argc == 7) {
+               r = set_int(args[6], &pagamento->dependente);
+       } else {
+               pagamento->dependente = 0;
+       }
+       if (r < 0 || pagamento->dependente < 0) {
                pagamento_free(pagamento);
                return NULL;
        }
@@ -96,11 +106,15 @@ static int run_pagamento(struct declaracao *dec, char **args, int argc)
 {
        struct pagamento *pagamento;
        int r;
-       if (argc != 6)
+       if (argc != 6 && argc != 7)
                return -EINVAL;
-       pagamento = pagamento_new(args);
+       pagamento = pagamento_new(args, argc);
        if (!pagamento)
                return -ENOMEM;
+       if (pagamento->dependente > list_size(dec->dependentes)) {
+               pagamento_free(pagamento);
+               return -EINVAL;
+       }
        r = list_insert_ordered(&dec->pagamentos, pagamento, pagamento_cmp);
        if (r < 0) {
                pagamento_free(pagamento);
@@ -119,8 +133,8 @@ void pagamento_salva(struct declaracao *dec, FILE *f)
        int i;
        struct pagamento *j;
        for (i = 0; j = list_get(dec->pagamentos, i); i++)
-               fprintf(f, "pagamento %d \"%s\" \"%s\" %lld %lld\n",
-                       j->codigo, j->cnpj, j->nome, j->pagamento, j->reembolso);
+               fprintf(f, "pagamento %d \"%s\" \"%s\" %lld %lld %d\n",
+                       j->codigo, j->cnpj, j->nome, j->pagamento, j->reembolso, j->dependente);
 }
 
 static struct cmd cmd_pagamento = {
@@ -163,6 +177,7 @@ static int pagamento_medico(struct pagamento *pagamento)
 {
        switch (pagamento->codigo) {
        case 10:
+       case 12:
        case 21:
        case 26:
                return 1;
@@ -172,6 +187,17 @@ static int pagamento_medico(struct pagamento *pagamento)
        return 0;
 }
 
+int pagamento_instrucao(struct pagamento *pagamento)
+{
+       switch (pagamento->codigo) {
+       case 1:
+               return 1;
+       default:
+               return 0;
+       }
+       return 0;
+}
+
 char * medico_cnpj_ordenado(struct declaracao *dec, int n)
 {
        return pagamento_cnpj_ordenado_cond(dec, pagamento_medico, n);