| | | 1 | | namespace FAU.Logica.Services; |
| | | 2 | | |
| | | 3 | | using FAU.Logica.DTOs; |
| | | 4 | | |
| | | 5 | | /// <summary> |
| | | 6 | | /// Calculadora IRPF stateless. |
| | | 7 | | /// Implementa la lógica de cálculo de deducciones IRPF y aplicación de franjas progresivas. |
| | | 8 | | /// No accede a la BD - recibe todos los datos por parámetro. |
| | | 9 | | /// |
| | | 10 | | /// Flujo: |
| | | 11 | | /// 1. CalcularDeducciones() - calcula aportes, hijos, cónyuge, profesional |
| | | 12 | | /// 2. AplicarFranjas() - aplica 7 franjas progresivas a la base imponible neta |
| | | 13 | | /// 3. Calcular() - orquesta el flujo completo y devuelve ResultadoIrpf |
| | | 14 | | /// </summary> |
| | | 15 | | public class IrpfCalculator |
| | | 16 | | { |
| | | 17 | | /// <summary> |
| | | 18 | | /// Calcula todas las deducciones IRPF en el orden correcto. |
| | | 19 | | /// Orden: (1) aportes, (2) dependientes, (3) profesional. |
| | | 20 | | /// </summary> |
| | | 21 | | public DetalleDeduccionesResultado CalcularDeducciones( |
| | | 22 | | decimal ingresoGravado, |
| | | 23 | | decimal montepio, |
| | | 24 | | decimal fonasa, |
| | | 25 | | decimal frl, |
| | | 26 | | List<DeduccionDto> deducciones, |
| | | 27 | | ParametrosIrpfDto parametros) |
| | | 28 | | { |
| | 10 | 29 | | var resultado = new DetalleDeduccionesResultado(); |
| | | 30 | | |
| | | 31 | | // 1. Deducción por aportes jubilatorios |
| | 10 | 32 | | resultado.Aportes = montepio + fonasa + frl; |
| | | 33 | | |
| | | 34 | | // 2. Deducción por dependientes (hijos y cónyuge) |
| | 10 | 35 | | var bpcAnual = parametros.BpcMensual * 12; |
| | | 36 | | |
| | 30 | 37 | | foreach (var deduccion in deducciones) |
| | | 38 | | { |
| | 5 | 39 | | if (deduccion.Tipo == "hijo_menor") |
| | | 40 | | { |
| | | 41 | | // 20 BPC anuales / 12 meses para hijo menor |
| | 2 | 42 | | resultado.Hijos += deduccion.Cantidad * (parametros.BpcMensual * 20 / 12); |
| | | 43 | | } |
| | 3 | 44 | | else if (deduccion.Tipo == "hijo_discapacidad") |
| | | 45 | | { |
| | | 46 | | // 40 BPC anuales / 12 meses para hijo con discapacidad |
| | 1 | 47 | | resultado.Hijos += deduccion.Cantidad * (parametros.BpcMensual * 40 / 12); |
| | | 48 | | } |
| | 2 | 49 | | else if (deduccion.Tipo == "conyuge_sin_ingresos") |
| | | 50 | | { |
| | | 51 | | // 20 BPC anuales / 12 meses para cónyuge sin ingresos |
| | 2 | 52 | | if (deduccion.Cantidad > 0) |
| | | 53 | | { |
| | 2 | 54 | | resultado.Conyuge = parametros.BpcMensual * 20 / 12; |
| | | 55 | | } |
| | | 56 | | } |
| | | 57 | | } |
| | | 58 | | |
| | | 59 | | // 3. Deducción profesional |
| | | 60 | | // Determinar tasa: 8% (0.08) si base >= umbral BPC, 14% (0.14) si < umbral BPC |
| | 10 | 61 | | var umbralEnPesos = parametros.UmbralDeduccionBpc * parametros.BpcMensual; |
| | 10 | 62 | | var tasaProfesional = ingresoGravado >= umbralEnPesos |
| | 10 | 63 | | ? parametros.TasaDeduccionAlta // 0.08 |
| | 10 | 64 | | : parametros.TasaDeduccionBaja; // 0.14 |
| | | 65 | | |
| | 10 | 66 | | resultado.Profesional = ingresoGravado * tasaProfesional; |
| | | 67 | | |
| | 10 | 68 | | return resultado; |
| | | 69 | | } |
| | | 70 | | |
| | | 71 | | /// <summary> |
| | | 72 | | /// Aplica las 7 franjas progresivas IRPF a la base imponible neta. |
| | | 73 | | /// Retorna (TotalIrpf, DetallePorFranja[]). |
| | | 74 | | /// </summary> |
| | | 75 | | public (decimal TotalIrpf, List<DetalleFranjaResultado> Detalles) AplicarFranjas( |
| | | 76 | | decimal baseImponibleNeta, |
| | | 77 | | List<FranjaIrpfCalculoDto> franjas, |
| | | 78 | | decimal bpcMensual) |
| | | 79 | | { |
| | 9 | 80 | | var totalIrpf = decimal.Zero; |
| | 9 | 81 | | var detalles = new List<DetalleFranjaResultado>(); |
| | | 82 | | |
| | | 83 | | // Clampear a 0 si es negativa |
| | 9 | 84 | | if (baseImponibleNeta < 0) |
| | | 85 | | { |
| | 1 | 86 | | baseImponibleNeta = 0; |
| | | 87 | | } |
| | | 88 | | |
| | 9 | 89 | | var restante = baseImponibleNeta; |
| | | 90 | | |
| | 107 | 91 | | foreach (var franja in franjas.OrderBy(f => f.NumeroFranja)) |
| | | 92 | | { |
| | 23 | 93 | | if (restante <= 0) |
| | 7 | 94 | | break; |
| | | 95 | | |
| | | 96 | | // Calcular rango de la franja en pesos |
| | 16 | 97 | | var limiteInf = franja.DesdeBpc * bpcMensual; |
| | 16 | 98 | | var limiteSup = franja.HastaBpc.HasValue |
| | 16 | 99 | | ? franja.HastaBpc.Value * bpcMensual |
| | 16 | 100 | | : decimal.MaxValue; |
| | | 101 | | |
| | 16 | 102 | | var ancho = limiteSup - limiteInf; |
| | | 103 | | |
| | | 104 | | // Monto que cae en esta franja |
| | 16 | 105 | | var montoEnFranja = Math.Min(restante, ancho); |
| | 16 | 106 | | if (montoEnFranja < 0) |
| | 0 | 107 | | montoEnFranja = 0; |
| | | 108 | | |
| | | 109 | | // IRPF en esta franja |
| | 16 | 110 | | var impuestoFranja = montoEnFranja * franja.Tasa; |
| | | 111 | | |
| | 16 | 112 | | if (montoEnFranja > 0) |
| | | 113 | | { |
| | 16 | 114 | | detalles.Add(new DetalleFranjaResultado |
| | 16 | 115 | | { |
| | 16 | 116 | | FranjaId = franja.FranjaId, |
| | 16 | 117 | | NumeroFranja = franja.NumeroFranja, |
| | 16 | 118 | | BaseFranja = montoEnFranja, |
| | 16 | 119 | | Tasa = franja.Tasa, |
| | 16 | 120 | | Impuesto = impuestoFranja |
| | 16 | 121 | | }); |
| | | 122 | | |
| | 16 | 123 | | totalIrpf += impuestoFranja; |
| | | 124 | | } |
| | | 125 | | |
| | 16 | 126 | | restante -= ancho; |
| | | 127 | | } |
| | | 128 | | |
| | 9 | 129 | | return (totalIrpf, detalles); |
| | | 130 | | } |
| | | 131 | | |
| | | 132 | | /// <summary> |
| | | 133 | | /// Calcula IRPF completo: deducciones + aplicación de franjas. |
| | | 134 | | /// Orquesta el flujo completo y retorna ResultadoIrpf con todos los datos. |
| | | 135 | | /// </summary> |
| | | 136 | | public ResultadoIrpf Calcular(CalcularIrpfRequest request) |
| | | 137 | | { |
| | | 138 | | // 1. Calcular deducciones |
| | 5 | 139 | | var deducciones = CalcularDeducciones( |
| | 5 | 140 | | request.IngresoGravados, |
| | 5 | 141 | | request.Montepio, |
| | 5 | 142 | | request.Fonasa, |
| | 5 | 143 | | request.Frl, |
| | 5 | 144 | | request.Deducciones, |
| | 5 | 145 | | request.Parametros); |
| | | 146 | | |
| | | 147 | | // 2. Calcular base imponible neta |
| | 5 | 148 | | var totalDeducciones = deducciones.Aportes + deducciones.Hijos + deducciones.Conyuge + deducciones.Profesional; |
| | 5 | 149 | | var baseImponibleNeta = request.IngresoGravados - totalDeducciones; |
| | | 150 | | |
| | | 151 | | // Clampear a 0 si es negativa |
| | 5 | 152 | | if (baseImponibleNeta < 0) |
| | 2 | 153 | | baseImponibleNeta = 0; |
| | | 154 | | |
| | | 155 | | // 3. Aplicar franjas |
| | 5 | 156 | | var (totalIrpf, detalleFranjas) = AplicarFranjas( |
| | 5 | 157 | | baseImponibleNeta, |
| | 5 | 158 | | request.Franjas, |
| | 5 | 159 | | request.Parametros.BpcMensual); |
| | | 160 | | |
| | | 161 | | // 4. Determinar tasa de deducción profesional (para trazabilidad) |
| | 5 | 162 | | var umbralEnPesos = request.Parametros.UmbralDeduccionBpc * request.Parametros.BpcMensual; |
| | 5 | 163 | | var tasaProfesional = request.IngresoGravados >= umbralEnPesos |
| | 5 | 164 | | ? request.Parametros.TasaDeduccionAlta |
| | 5 | 165 | | : request.Parametros.TasaDeduccionBaja; |
| | | 166 | | |
| | | 167 | | // 5. Retornar resultado completo |
| | 5 | 168 | | return new ResultadoIrpf |
| | 5 | 169 | | { |
| | 5 | 170 | | IngresoGravado = request.IngresoGravados, |
| | 5 | 171 | | Deducciones = deducciones, |
| | 5 | 172 | | TasaDeduccionProfesional = tasaProfesional, |
| | 5 | 173 | | TotalDeducciones = totalDeducciones, |
| | 5 | 174 | | BaseImponibleNeta = baseImponibleNeta, |
| | 5 | 175 | | TotalIrpf = totalIrpf, |
| | 5 | 176 | | DetallePorFranja = detalleFranjas |
| | 5 | 177 | | }; |
| | | 178 | | } |
| | | 179 | | } |