[Resolvido]Cálculo de Imposto de Renda e INSS

Olá amigos, boa tarde!

Estou criando um BD onde preciso realizar o cálculo de IRRF, INSS, dentre outros desconto, sob um rendimento bruto.

Como as tabelas e alíquotas de IR e INSS variam conforme o governo as altera, estou tentando criar (meio que rudimentar a coisa toda) um BD onde o usuário final tenha a liberdade de alterar os valores das tabelas de IR e INSS.

A ideia inicial é utilizar duas tabelas (vide imagem anexada) relacionadas apenas por um número único (01 no caso).

Será que é possível seguir desta forma? Eu quero calcular o campo 'IR' da tabela 'Pagamento' baseado nos campos da tabela 'Imposto'.

Já grato pela atenção de todos!

Boa noite.
Olha é possível fazer isso sim. Seu raciocínio tem fundamento

No caso teria que fazer uns Select Case nos códigos para efetuar esse cálculo junto com Dlookup (Pesquisa)
Tipo:

Código:


Select Case RendimentoBruto

Case Is <= Dlookup("IRFaixa_01_de","Imposto)
    'Aqui você efetua os cálculos
    
Case Dlookup("IRFaixa_01_de","Imposto) To Dlookup("IRFaixa_02_de","Imposto)
    'Aqui você efetua os cálculos

' E assim por diante.
  
End Select



Mais ou menos isso.
Mas eu trabalharia com um único campo na tabela de imposto e fazendo o sistema buscar os valores.

Mas como digo sempre, o ideal é ver esta parte do seu sistema pra gente analisar e ver o que pode ser feito.

No aguardo.

Bom dia Cláudio!

Entendi sua sugestão do Select!

Cheguei a ver um exemplo, aqui no fórum mesmo, onde realmente a pessoa fez esta questão de busca de valores em um único campo.

O exemplo do cara tinha campo de valor mínimo, campo de valor máximo, campo de dedução e campo de alíquota. Os dados ficaram disposto como na imagem da Tabela IR que anexei aqui.

Eu só não conheço a forma que se faz esta busca de valores. O Dlookup faz estas buscas de valores tal qual a forma que você sugeriu?

Bom dia.
Sim, mas não necessariamente da forma que você está fazendo.

Leia antes este tópico por favor.

https://www.maximoaccess.com/t28113-usuarios-nao-postam-banco-de-exemplo

Eis a solução de todos os seus problemas.

https://www.maximoaccess.com/t20706-resolvidoduvida-sobre-como-calcular-o-inss-e-irpf-no-acces#152224

É só procurar amigo.
Aqui sempre têm solução.

Abraço

Pois é Claudio

Justamente este link que você mandou que eu havia acessado.

Vou fazer alguns testes com estes exemplos do link.

Depois que você me falou do Dlookup, aí consegui entender o que fazer!!

Assim que eu conseguir finalizar o BD eu posto aqui para ficar de exemplo, de repente.

Muito grato pela sua atenção!

Valeu!
Achei muito interessante isso.
No aguardo.

Cláudio, bom dia!

Ainda estou trabalhando nestas questões. O cliente decidiu que os cálculos de IRPF e INSS existirão no BD, porém servirão apenas para comparação daquilo que a contabilidade dele envia (vai entender kkk).

De qualquer forma, outra dúvida me surgiu (estou aproveitando esta mesma postagem, não sei se seria este o melhor caminho).

Já fiz buscas com relação à esta dúvida porém não obtive sucesso.

É o seguinte:

Ao inserir o valor de 'Rendimento_bruto' no formulário e os valores nos campos que serão deduzidos deste 'Rendimento_bruto', os cáculos são feitos para mostrar no campo 'Deducoes' os valores que serão "tirados" deste 'Rendimento_bruto' e para mostrar no campo 'Valor_final' o valor que será depositado para aquele determinado funcionário.

Porém, da forma como fiz, estes campos não armazenam o resultado destes cálculos na tabela (tampouco em consulta ou relatório)

De qual maneira eu conseguiria resolver este problema?

Segue o BD.

Bom dia.
Veja se é isso.

O que fiz: No campo "Rendimento_bruto" coloquei no evento Após Atualizar as formulas que você estava usando nos campos "Total_de_deducoes" e "Valor_final"

Assim, toda vez que atualizar ou digitar os valores o sistema vai calcular estes e jogar direto no campo da tabela.

Veja o código como ficou:

Me.Total_de_deducoes = [Somatorio_00] + [Somatorio_01] + [Somatorio_02]
Me.Valor_final = [Rendimento_bruto] - [Total_de_deducoes]


Abraço

Bom dia Claudio,

Neste meio tempo fiquei trabalhando neste fato. Acabei criando um botão que efetua os cálculos após inserir todos os valores.

Comecei a parte onde trabalho a questão de calcular o INSS do funcionário e me vali daquela questão de usar o Select Case, como você havia me informando antes. Criei uma espécie de calculadora, que não armazena a informação (o cliente quer apenas consultar o valor para ver se bate com a contabilidade dele)

Realmente está dando certo!!

Porém, o INSS tem uma peculiaridade: quanto o rendimento superar o valor da última faixa (no caso, este ano, está em R$ 5.189,82), o sistema deve assumir o teto máximo de desconto (e isso ainda não consegui imaginar como fazer ainda).

Por exemplo: o sujeito que teve rendimento de R$ 10.000,00, o máximo de desconto de INSS que ele deve ter é de R$ 570,88 (que refere-se à alíquota de 11% do valor máximo da tabela que é 5.189,82).

Se puder dar uma olhada, um ideia, sei lá rs!

Acabei deixando num registro único (sei que não é o melhor caminho)

Muito grato pela sua atenção!! Segue o banco

Bom dia Cláudio!

Agradeço novamente a você!

Consegui findar o BD, da forma como o cliente solicitou e vou deixá-lo aqui, para referência à quem interessar.

O BD serve para controle de pagamento e possui duas calculadoras simples (uma para INSS e outra para IRRF) que não armazenam valores em campos, apenas mostram os resultados.

Como o INSS é para contribuinte autônomo, fixei nas fórmulas o valor de base (20% do bruto) e a alíquota (11% destes 20%).

No caso do IR (fixei faixas e alíquotas e parcelas à deduzir num único registro, sei que não é o melhor caminho mas foi o que me ocorreu por hora) criei um form que dá a liberdade do usuário alterar as faixas e alíquotas conforme a mudança eventual do Governo.

Espero que sirva para contribuir em algo aos colegas.

Show Eduardo, desculpe mas fiquei sem internet esses dias e só hoje que pude verificar sua dúvida.
Mas se já resolveu está ótimo.
Se não há mais dúvidas em relação ao tópico não esqueça de finalizar.
Abraço e boa sorte!

Tranquilo!

Até mais!