Calculo de impuesto isr de mexico

[Kergan]

Ahora si que estoy quebrandome la cabeza con esto pero confio en que alguien podra ayudarme con esto ya que son unos gurus en este foro .

Necesito desarrollar un procedimiento el cual pueda realizar el cálculo del ISR que debe de ser retenido a una seria de empleados basado en su sueldo.

Para poder calcular el ISR es necesario tener una tabla en la base de datos que contenga la siguiente información:

Código Tabla:

Límite Inferior     Límite Superior         Cuota Fija      % Retención
0.01                496.07                  0               1.92
496.08              4,210.41                9.52            6.40
4,210.42            7,399.42                247.23          10.88
7,399.43            8,601.50                594.24          16.00
8,601.51            10,298.35               786.55          17.92
10,298.36           20,770.29               1,090.62        21.36
20,770.30           32,736.83               3,327.42        23.52
32,736.84           En adelante             6,141.95        30.00
 

Los pasos para el cálculo del ISR son los siguientes:

1. Se ubica el sueldo en la tabla para saber el % y la cuota fija. La ubicación debe de ser entre el Límite inferior y Límite superior.
2. Se resta al sueldo gravable el límite inferior
3. Al resultado se multiplica por el porcentaje (eje. 28%)
4. Al resultado se suma la cuota fija.
5. Y el resultado es el impuesto bruto ISR.

Hasta ahora llevo esto hecho:

Código SQL:

CREATE TABLE Datos_ISR
(   ID_ISR              NUMBER NOT NULL,
    Limite_Inferior     NUMBER NOT NULL,
    Limite_Superior     NUMBER NOT NULL,
    Cuota_Fija          NUMBER NOT NULL,
    Porcentaje          NUMBER NOT NULL);
 

Código SQL:

INSERT INTO Datos_ISR(ID_ISR,Limite_Inferior,Limite_Superior,Cuota_Fija,Porcentaje) VALUES(1,0.01,496.07,0,1.92);
    INSERT INTO Datos_ISR(ID_ISR,Limite_Inferior,Limite_Superior,Cuota_Fija,Porcentaje) VALUES(2,496.08,4210.41,9.52,6.4);
    INSERT INTO Datos_ISR(ID_ISR,Limite_Inferior,Limite_Superior,Cuota_Fija,Porcentaje) VALUES(3,4210.42,7399.42,247.23,10.88);
    INSERT INTO Datos_ISR(ID_ISR,Limite_Inferior,Limite_Superior,Cuota_Fija,Porcentaje) VALUES(4,7399.43,8601.5,594.24,16):
    INSERT INTO Datos_ISR(ID_ISR,Limite_Inferior,Limite_Superior,Cuota_Fija,Porcentaje) VALUES(5,8601.51,10298.35,786.55,17.92);
    INSERT INTO Datos_ISR(ID_ISR,Limite_Inferior,Limite_Superior,Cuota_Fija,Porcentaje) VALUES(6,10298.36,20770.29,1090.62,21.36);
    INSERT INTO Datos_ISR(ID_ISR,Limite_Inferior,Limite_Superior,Cuota_Fija,Porcentaje) VALUES(7,20770.3,32736.83,3327.42,23.52);
    INSERT INTO Datos_ISR(ID_ISR,Limite_Inferior,Limite_Superior,Cuota_Fija,Porcentaje) VALUES(8,32736.84,9999999.00,6141.95,30);
 

Código SQL:

CREATE TABLE Empleados
(   ID_Empleado         NUMBER NOT NULL,
    Nombre_Empleado     NUMBER NOT NULL,
    Sueldo_Gravable     NUMBER NOT NULL,
    Total_ISR           NUMBER NOT NULL,
    Porcentaje          NUMBER NOT NULL,
    Sueldo_Recibido     NUMBER NOT NULL,
    Creado_Por          varchar2(30),
    Fecha_Creacion      DATE);
 

Código SQL:

CREATE OR REPLACE PROCEDURE calculoISR (
    Sueldo_Gravable     IN  NUMBER,
    Sueldo_Recibido     OUT NUMBER,
    Total_ISR           OUT NUMBER,
    Porcentaje          OUT NUMBER
    ) 
AS
 
    Limite_Inferior     NUMBER;
    Cuota_Fija          NUMBER;
 
BEGIN
 
    CASE
    
        WHEN Sueldo_Gravable > 0.01 && Sueldo_Gravable < 496.07 
            THEN SELECT Limite_Inferior, Cuota_Fija
                 INTO   :Limite_Inferior, :Cuota_Fija
                 FROM   Datos_ISR
                 WHERE  ID_ISR = :1;
        WHEN Sueldo_Gravable > 496.08 && Sueldo_Gravable < 4210.41 
            THEN SELECT Limite_Inferior, Cuota_Fija
                 INTO   :Limite_Inferior, :Cuota_Fija
                 FROM   Datos_ISR
                 WHERE  ID_ISR = :2;
    
    END CASE;
                 
        Total_ISR := (Sueldo_Gravable - (Limite_Inferior * Porcentaje) + Cuota_Fija);
        Sueldo_Recibido := Sueldo_Gravable - Total_ISR;
    
END operacion;
/
 

Obviamente tengo incompleto el Procedure no se siquiera si ando cerca lo que necesito es que dando el sueldo_gravable se calculen automaticamente el sueldo_recibido, el Total_ISR y el porcentaje creo que esto ayudaria mucho a la gente de Mexico ya que es un calculo muy comun aqui para las nominas de empleados.

Espero alguien se tome la molestia de por lo menos intentar ayudarme o guiarme hacia la respuesta :P.

[huesos52]

Hola Kergan

Veo que te estas complicando en el PL haciendo uso del CASE.

Mira esto:

Código SQL:

CREATE OR REPLACE PROCEDURE calculoISR (
    Sueldo_Gravable     IN  NUMBER,
    Sueldo_Recibido     OUT NUMBER,
    Total_ISR           OUT NUMBER,
    v_porcentaje          OUT NUMBER
    ) 
AS
 
    v_limite_inferior     NUMBER;
    v_cuota_fija          NUMBER;
 
BEGIN
    
    --Paso 1: Se ubica el sueldo en la tabla para saber el % y la cuota fija. La ubicación debe de ser entre el Límite inferior y Límite superior.
    SELECT limite_inferior,
           cuota_fija,
           porcentaje 
    INTO
           v_limite_inferior,
           v_cuota_fija,
           v_porcentaje
    FROM datos_ISR
    WHERE Sueldo_Gravable BETWEEN limite_inferior AND limite_superior;
    
    --Paso 2: Se resta al sueldo gravable el límite inferior
    Total_ISR := Sueldo_Gravable - v_limite_inferior;
    
    --Paso 3: Al resultado se multiplica por el porcentaje (eje. 28%)
    Total_ISR := Total_ISR * v_porcentaje;
    
    --Paso 4: Al resultado se suma la cuota fija.
    Total_ISR := Total_ISR + v_cuota_fija;
    
    Sueldo_Recibido := Sueldo_Gravable + Total_ISR;
    
END calculoISR;
/
 

En los pasos que mencionas no entendí bien como sale el sueldo recibido. Yo lo puse como la suma del sueldo gravable mas el total ISR.

Para probar el procedimiento puedes ejecutar este bloque anonimo.

Código SQL:

DECLARE
 v_sueldo_gravable NUMBER := &SUELDO;
 v_sueldo_recibido NUMBER;
 v_total_isr NUMBER;
 v_porcentaje NUMBER;
BEGIN
 calculoISR(v_sueldo_gravable, v_sueldo_recibido, v_total_isr,v_porcentaje);
 DBMS_OUTPUT.PUT_LINE('El sueldo recibido es: '||v_sueldo_recibido);
 DBMS_OUTPUT.PUT_LINE('El total ISR es: '||v_total_isr);
 DBMS_OUTPUT.PUT_LINE('El porcentaje es: '||v_porcentaje);
END;
/
 

Ya solo es cuestión que revises los calculos. Soy de Colombia y no tengo idea de que hablas

[Kergan]

Muchisimas gracias por tu ayuda huesos!!!!

creo que con eso ya quedo el procedure solo tuve que cambiar esta parte ya que el ISR es el "Impuesto sobre la renta" que nos quitan a todos los trabajadores Mexicanos sigh jajaaja.

Código SQL:

--Paso 5: Al sueldo gravable se le resta el ISR
    Sueldo_Recibido := Sueldo_Gravable - Total_ISR;
 

Ahora solo me falta alguna manera de que se haga el calculo de los 3 valores cuando inserte un nuevo empleado tengo un trigger que me pone la fecha y el usuario asi:

Código SQL:

CREATE OR REPLACE TRIGGER Creacion_Empleado 
BEFORE INSERT ON Empleados
FOR EACH ROW
 
BEGIN
    
    :NEW.Fecha_Creacion  :=  SYSDATE;
    :NEW.Creado_Por := USER;
 
END Creación_Empleado;
 

Con esto al hacer el insert por ejemplo:

Código SQL:

INSERT INTO Empleados(ID_Empleado,Nombre_Empleado,Sueldo_Gravable) VALUES(1,'Juan Perez',500);
 

Me genera:

Código SQL:

ID_EMPLEADO NOMBRE_EMPLEADO                SUELDO_GRAVABLE  TOTAL_ISR PORCENTAJE
----------- ------------------------------ --------------- ---------- ----------
SUELDO_RECIBIDO CREADO_POR                     FECHA_CR
--------------- ------------------------------ --------
          1 Juan Perez                                 500
                LUIS                           30/05/13
 

Como podria hacerle para que ejecute el procedure y calcule el Sueldo_Recibido, Total_ISR y el Porcentaje?

[huesos52]

Solo tienes que modificar el trigger para que ejecute el procedure.

Código SQL:

CREATE OR REPLACE TRIGGER Creacion_Empleado 
BEFORE INSERT ON Empleados
FOR EACH ROW
 
BEGIN
    
    :NEW.Fecha_Creacion  :=  SYSDATE;
    :NEW.Creado_Por := USER;
    calculoISR(:NEW.Sueldo_Gravable, :NEW.Sueldo_Recibido, :NEW.Total_ISR,:NEW.Porcentaje);
 
END Creacinn_Empleado;
/
 

el :NEW de todos los campos es llenado en el procedure e insertado en la tabla tal cual necesitas.
Recuerda que estos campos en el procedure son de salida. Por lo que entran vacios y salen llenos.

saludos.