{
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 21:
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;
}
{
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);
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 = {
return 0;
}
-char * pagamento_cnpj_ordenado(struct declaracao *dec, int codigo, int n)
+char * pagamento_cnpj_ordenado_cond(struct declaracao *dec,
+ int (*cond)(struct pagamento *), int n)
{
struct pagamento *pagamento;
int i;
int j = 0;
for (i = 0; (pagamento = list_get(dec->pagamentos, i)); i++) {
- if (pagamento->codigo == codigo && j++ == n)
+ if (cond(pagamento) && j++ == n)
break;
}
if (!pagamento)
return pagamento->cnpj;
}
-static int pagamento_medico(int codigo)
+static int always(struct pagamento *pagamento)
+{
+ return pagamento != NULL;
+}
+
+char * pagamento_cnpj_ordenado(struct declaracao *dec, int n)
+{
+ return pagamento_cnpj_ordenado_cond(dec, always, n);
+}
+
+static int pagamento_medico(struct pagamento *pagamento)
{
- switch (codigo) {
+ switch (pagamento->codigo) {
case 10:
case 21:
case 26:
return 0;
}
-char * medico_cnpj_ordenado(struct declaracao *dec, int n)
+int pagamento_instrucao(struct pagamento *pagamento)
{
- struct pagamento *pagamento;
- int i;
- int j = 0;
- for (i = 0; (pagamento = list_get(dec->pagamentos, i)); i++) {
- if (pagamento_medico(pagamento->codigo) && j++ == n)
- break;
+ switch (pagamento->codigo) {
+ case 1:
+ return 1;
+ default:
+ return 0;
}
- if (!pagamento)
- return "";
- return pagamento->cnpj;
+ return 0;
+}
+
+char * medico_cnpj_ordenado(struct declaracao *dec, int n)
+{
+ return pagamento_cnpj_ordenado_cond(dec, pagamento_medico, n);
+}
+
+static int pagamento_inss(struct pagamento *pagamento)
+{
+ return pagamento->codigo == 36;
+}
+
+char *inss_cnpj_ordenado(struct declaracao *dec, int n)
+{
+ return pagamento_cnpj_ordenado_cond(dec, pagamento_inss, n);
}