Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

  • Las fórmulas utilizadas en el cálculo del procedimiento ASP (Aumento de Salario por Porcentaje), se muestran a continuación; así como su mecánica de cálculo:
    1. Fórmulas utilizadas:

      Origen

      Código

      Descripción

      Desc. 2

      Recompilar

      Modelo

      S_

      REFASP

      REFERENCIAS AUMENTO POR %

      ASP

      1

      2

      S_

      237ASP

      AUMENTO SALARIO POR % BASICO

      ASP

      1

      2

      S_

      238ASP

      AUMENTO SALARIO POR % INTEGRAL

      ASP

      1

      2

         

    2. Detalle de las fórmulas:
      • REFASP - Referencia Aumento por %

        Fórmula

        Secuencia

        1a Expresión

        Op. 1

        2a Expresión

        Resultado

        Comentario

        REFASP

        000001

        #

        TRACE_ON




        REFASP

        000002

        # VALIDA SI ESTA ACTIVO




        No calcula empleados inactivos o que ingresaron en fecha posterior a la fecha de aumento.

        REFASP

        000003


        MUEVE

        1

        NOCALCULA

        REFASP

        000004

        EMPSTATUS

        SI_IGUAL

        "D"

        FINAL

        REFASP

        000005

        EMPFECING

        SI_MAYOR

        PERFECFIN

        FINAL

        REFASP

        000006


        MUEVE

        0

        NOCALCULA

        REFASP

        000007

        #OBTIENE SAL MINIMOS




        Obtiene SMMLV de la tabla S007 y columna 3.

        REFASP

        000008


        BUSCA

        TABLA_S007


        REFASP

        000009

        ELEMENTO_01

        HASTA_MAYOR

        0


        REFASP

        000010


        MUEVE

        ELEMENTO_03

        SALMINMES

        REFASP

        000011

        #OBTIENE FACTOR

        PRESTACIONAL



        Obtiene SMMLV para Salarios Integrales = SMMLV * 13.

        REFASP

        000012

        SALMINMES

        MULTIPLICA

        13

        SALMININTM

        REFASP

        000013

        FINAL

        ETIQUETA




        REFASP

        000014

        #

        TRACE_OFF




           

      • 237ASP - Aumento Salario por % Básico

        Fórmula

        Secuencia

        1a Expresión

        Op. 1

        2a Expresión

        Resultado

        Comentario

        237ASP

        000001

        #

        TRACE_ON




        237ASP

        000002

        NOCALCULA

        SI_IGUAL

        1

        FINAL


        237ASP000003#VALIDA QUE EL TIPO DESALARIO SEABASICO
        Inicia sección de validaciones para los Tipos de Salario.

        237ASP

        000004

        EMPTIPOSAL

        SI_IGUAL

        '2'

        FINAL

        Si es un salario integral no calcula en esta fórmula.

        237ASP

        000005

        EMPTIPOSAL

        SI_IGUAL

        '4'

        FINAL

        237ASP

        000006

        #% POR PORCENTAJE





        237ASP

        000007

        CONPORCEN

        SI_IGUAL

        0

        CONT_00

        El % de aumento se registra en el campo de % del catálogo de conceptos. Si este está en cero, salta a la validación de si es el incremento por función o por incidencia.

        237ASP

        000008


        MUEVE

        EMPSALARIO

        EMPSALANT

        Mueve el salario actual, al campo de salario anterior en el maestro de empleados.

        237ASP

        000009

        CONPORCEN

        DIVIDE

        100

        NAUX_00

        Salario = Salario + Salario * % Aumento del Concepto.

        237ASP

        000010

        EMPSALARIO

        MULTIPLICA

        NAUX_00

        NAUX_00

        237ASP

        000011

        EMPSALARIO

        SUMA

        NAUX_00

        EMPSALARIO

        237ASP

        000012


        MUEVE

        1

        NAUX_01

        237ASP

        000013


        SALTA


        CONT_03

        237ASP

        000014

        CONT_00

        ETIQUETA



        237ASP

        000015

        #INCREMENTO

        POR FUNCION



        Si el origen del salario es la función (RCJ_ORISDO)

        • Salario Anterior = Salario
        • Salario = Salario de la Función

        237ASP

        000016

        PROORISDO

        SI_DIFERENTE

        '2'

        CONT_01

        237ASP

        000017

        FUNSALARIO

        SI_IGUAL

        0

        FINAL

        237ASP

        000018


        MUEVE

        EMPSALARIO

        EMPSALANT

        237ASP

        000019


        MUEVE

        FUNSALARIO

        EMPSALARIO

        237ASP

        000020


        MUEVE

        1

        NAUX_01

        237ASP

        000021


        SALTA


        CONT_03

        237ASP

        000022

        CONT_01

        ETIQUETA



        237ASP

        000023

        #POR INCIDENCIA




        Si no fue por % del concepto ni por función, y se tiene un importe por incidencia

        • Salario Anterior = Salario
        • Salario = Importe Incidencia

        237ASP

        000024

        INCIMPINC

        SI_IGUAL

        0

        CONT_02

        237ASP

        000025


        MUEVE

        EMPSALARIO

        EMPSALANT

        237ASP

        000026


        MUEVE

        INCIMPINC

        EMPSALARIO

        237ASP

        000027


        MUEVE

        1

        NAUX_01

        237ASP

        000028

        CONT_02

        ETIQUETA




        237ASP

        000029

        NAUX_01

        SI_IGUAL

        0

        FINAL


        237ASP

        000030

        # VALIDA

        INCREMENTO



        Valida que el nuevo salario no sea menor que el SMMLV.

        237ASP

        000031

        EMPSALARIO

        SI_MAYOR

        SALMINMES

        CONT_03

        237ASP

        000032


        MUEVE

        SALMINMES

        EMPSALARIO

        237ASP

        000033

        CONT_03

        ETIQUETA



        237ASP

        000034

        EMPSALANT

        SI_IGUAL

        EMPSALARIO

        FINAL


        237ASP

        000035

        CONT_04

        ETIQUETA




        237ASP

        000036

        0

        REDONDEA

        EMPSALARIO

        EMPSALARIO

        Realiza el redondeo sin decimales al mnemónico EMPSALARIO.

        237ASP

        000037

        #GRABA SRA




        Asigna los valores del maestro de empleados faltantes:

        • Tipo de Modificación = '002'.
        • Periodo Modificación = Periodo en ejecución.
        • Número Pago Modificación = Número de Pago en ejecución.
        • Fecha de Modificación: Fecha de Pago del Periodo.

        Graba la información en la tabla SRA cuando se Habilita la opción de Grabación.

        237ASP

        000038


        MUEVE

        "002"

        EMPTIPMODS

        237ASP

        000039


        MUEVE

        PERFECPAG

        EMPFECAUM

        237ASP

        000040


        MUEVE

        PERPERIOD

        EMPPERAUM

        237ASP

        000041


        MUEVE

        PERNUMPAG

        EMPPAGAUM

        237ASP

        000042


        GRABA

        'SRA'


        237ASP

        000043

        #GRABA RCP




        Asigna los valores de Trayectoria Labora:

        • Fecha de Movimiento: Fecha de Pago del Periodo.
        • Periodo Movimiento = Periodo en ejecución
        • Número Pago Movimiento = Número de Pago en ejecución.
        • Tipo de Movimiento = '05'
        • Tipo de Modificación = '002'
        • Si la categoría de la función es M o A o C o P o E
          • Salario Mensual= Salario de Empleado
          • Salario Diario = Salario Mensual / 30
        • Si la categoría de la función es D
          • Salario Mensual= Salario de Empleado / 30
          • Salario Diario = Salario Mensual
        • Si la categoría de la función es H
          • Salario Mensual= Salario de Empleado * 240
          • Salario Diario = Salario Mensual / 30

        Graba la información en la tabla RCP cuando se Habilita la opción de Grabación.

        237ASP

        000044


        MUEVE

        PERFECPAG

        TRAFECMOV

        237ASP

        000045


        MUEVE

        PERPERIOD

        TRAPERMOV

        237ASP

        000046


        MUEVE

        PERNUMPAG

        TRANPGMOV

        237ASP

        000047


        MUEVE

        '05'

        TRATIPOMOV

        237ASP

        000048


        MUEVE

        '002'

        TRATIPMODS

        237ASP

        000049


        MUEVE

        EMPSALARIO

        TRASALMES

        237ASP

        000050

        EMPSALARIO

        DIVIDE

        30

        TRASALDIA

        237ASP

        000051

        EMPCATFUN

        SI_IGUAL

        'M'

        CONT_05

        237ASP

        000052

        EMPCATFUN

        SI_IGUAL

        'A'

        CONT_05

        237ASP

        000053

        EMPCATFUN

        SI_IGUAL

        'C'

        CONT_05

        237ASP

        000054

        EMPCATFUN

        SI_IGUAL

        'P'

        CONT_05

        237ASP

        000055

        EMPCATFUN

        SI_IGUAL

        'E'

        CONT_05

        237ASP

        000056


        MUEVE

        EMPSALARIO

        TRASALDIA

        237ASP

        000057

        EMPSALARIO

        MULTIPLICA

        30

        TRASALMES

        237ASP

        000058

        EMPCATFUN

        SI_IGUAL

        'D'

        CONT_05

        237ASP

        000059

        EMPSALARIO

        MULTIPLICA

        240

        TRASALMES

        237ASP

        000060

        TRASALMES

        DIVIDE

        30

        TRASALDIA

        237ASP

        000061

        CONT_05

        ETIQUETA



        237ASP

        000062


        GRABA

        'RCP'


        237ASP

        000063

        # GRABA SR7-SR3




        Asigna los valores del histórico de Salarios:

        • Tipo de Modificación = '002'
        • Concepto: '000'
        • Valor = Salario
        • Valor Anterior = Salario Anterior
        • Fecha de Aumento: Fecha de Pago del Periodo.

        Graba la información en las tablas SR3/SR7 cuando se Habilita la opción de Grabación.

        237ASP

        000064


        MUEVE

        PERFECPAG

        HSDDATA

        237ASP

        000065


        MUEVE

        '002'

        HSDTIPO

        237ASP

        000066


        MUEVE

        '000'

        HSDPD

        237ASP

        000067


        MUEVE

        EMPSALARIO

        HSDVALOR

        237ASP

        000068


        MUEVE

        EMPSALANT

        HSDANTEAUM

        237ASP

        000069


        MUEVE

        PERFECPAG

        HSEDATA

        237ASP

        000070


        MUEVE

        '002'

        HSETIPO

        237ASP

        000071

        GRABA

        'SR7/SR3'


        237ASP000072
        MUEVEEMPSALARIOIMPORTE
        237ASP000073FINALETIQUETA


        237ASP000074#TRACE_OFF


           

      • 238ASP - Aumento Salario por % Integral

        Fórmula

        Secuencia

        1a Expresión

        Op. 1

        2a Expresión

        Resultado

        Comentario

        238ASP

        000001

        #

        TRACE_ON




        238ASP

        000002

        NOCALCULA

        SI_IGUAL

        1

        FINAL


        238ASP000003#VALIDA QUE EL TIPO DESALARIO SEAINTEGRAL
        Inicia sección de validaciones para los Tipos de Salario.

        238ASP

        000004

        EMPTIPOSAL

        SI_IGUAL

        '1'

        FINAL

        Se valida que los empleados tengan el Tipo de Salario como Integral, en caso contrario, no se realiza el cálculo.

        238ASP

        000005

        EMPTIPOSAL

        SI_IGUAL

        '3'

        FINAL

        238ASP

        000006

        #% POR PORCENTAJE




        El % de aumento se registra en el campo de % del catálogo de conceptos. Si este está en cero, salta a la validación de si es el incremento por función o por incidencia.

        Mueve el salario actual, al campo de salario anterior en el maestro de empleados.

        Salario = Salario + Salario * % Aumento del Concepto.

        238ASP

        000007

        CONPORCEN

        SI_IGUAL

        0

        CONT_00

        238ASP

        000008


        MUEVE

        EMPSALARIO

        EMPSALANT

        238ASP

        000009

        CONPORCEN

        DIVIDE

        100

        NAUX_00

        238ASP

        000010

        EMPSALARIO

        MULTIPLICA

        NAUX_00

        NAUX_00

        238ASP

        000011

        EMPSALARIO

        SUMA

        NAUX_00

        EMPSALARIO

        238ASP

        000012


        MUEVE

        1

        NAUX_01

        238ASP

        000013


        SALTA


        CONT_03

        238ASP

        000014

        CONT_00

        ETIQUETA



        238ASP

        000015

        #INCREMENTO

        POR FUNCION



        Si el origen del salario es la función (RCJ_ORISDO)

        • Salario Anterior = Salario
        • Salario = Salario de la Función

        238ASP

        000016

        PROORISDO

        SI_DIFERENTE

        '2'

        CONT_01

        238ASP

        000017

        FUNSALARIO

        SI_IGUAL

        0

        FINAL

        238ASP

        000018


        MUEVE

        EMPSALARIO

        EMPSALANT

        238ASP

        000019


        MUEVE

        FUNSALARIO

        EMPSALARIO

        238ASP

        000020


        MUEVE

        1

        NAUX_01

        238ASP

        000021


        SALTA


        CONT_03

        238ASP

        000022

        CONT_01

        ETIQUETA



        238ASP

        000023

        #POR INCIDENCIA




        Si no fue por % del concepto ni por función, y se tiene un importe por incidencia

        • Salario Anterior = Salario.
        • Salario = Importe Incidencia.

        238ASP

        000024

        INCIMPINC

        SI_IGUAL

        0

        CONT_02

        238ASP

        000025


        MUEVE

        EMPSALARIO

        EMPSALANT

        238ASP

        000026


        MUEVE

        INCIMPINC

        EMPSALARIO

        238ASP

        000027


        MUEVE

        1

        NAUX_01

        238ASP

        000028

        CONT_02

        ETIQUETA



        238ASP

        000029

        NAUX_01

        SI_IGUAL

        0

        FINAL


        238ASP

        000030

        # VALIDA

        INCREMENTO



        Valida que el nuevo salario no sea menor que el SMMLV.

        238ASP

        000031

        EMPSALARIO

        SI_MAYOR

        SALMINMES

        CONT_03

        238ASP

        000032


        MUEVE

        SALMINMES

        EMPSALARIO

        238ASP

        000033

        CONT_03

        ETIQUETA



        238ASP

        000034

        EMPSALANT

        SI_IGUAL

        EMPSALARIO

        FINAL

        238ASP

        000035

        CONT_04

        ETIQUETA



        238ASP0000360REDONDEAEMPSALARIOEMPSALARIOSe agrega redondeo sin decimales al mnemónico EMPSALARIO.

        238ASP

        000037

        #GRABA SRA




        Asigna los valores del maestro de empleados faltantes:

        • Tipo de Modificación = '002'
        • Periodo Modificación = Periodo en ejecución.
        • Número Pago Modificación = Número de Pago en ejecución.
        • Fecha de Modificación: Fecha de Pago del Periodo.

        Graba la información en la tabla SRA cuando se Habilita la opción de Grabación.

        238ASP

        000038


        MUEVE

        "002"

        EMPTIPMODS

        238ASP

        000039


        MUEVE

        PERFECPAG

        EMPFECAUM

        238ASP

        000040


        MUEVE

        PERPERIOD

        EMPPERAUM

        238ASP

        000041


        MUEVE

        PERNUMPAG

        EMPPAGAUM

        238ASP

        000042


        GRABA

        'SRA'


        238ASP

        000043

        #GRABA RCP




        Asigna los valores de Trayectoria Labora:

        • Fecha de Movimiento: Fecha de Pago del Periodo.
        • Periodo Movimiento = Periodo en ejecución
        • Número Pago Movimiento = Número de Pago en ejecución.
        • Tipo de Movimiento = '05'
        • Tipo de Modificación='002'
        • Si la categoría de la función es M o A o C o P o E
          • Salario Mensual= Salario de Empleado
          • Salario Diario = Salario Mensual / 30
        • Si la categoría de la función es D
          • Salario Mensual= Salario de Empleado / 30
          • Salario Diario = Salario Mensual
        • Si la categoría de la función es H
          • Salario Mensual= Salario de Empleado * 240
          • Salario Diario = Salario Mensual / 30

        Graba la información en la tabla RCP cuando se Habilita la opción de Grabación.

        238ASP

        000044


        MUEVE

        PERFECPAG

        TRAFECMOV

        238ASP

        000045


        MUEVE

        PERPERIOD

        TRAPERMOV

        238ASP

        000046


        MUEVE

        PERNUMPAG

        TRANPGMOV

        238ASP

        000047


        MUEVE

        '05'

        TRATIPOMOV

        238ASP

        000048


        MUEVE

        '002'

        TRATIPMODS

        238ASP

        000049


        MUEVE

        EMPSALARIO

        TRASALMES

        238ASP

        000050

        EMPSALARIO

        DIVIDE

        30

        TRASALDIA

        238ASP

        000051

        EMPCATFUN

        SI_IGUAL

        'M'

        CONT_05

        238ASP

        000052

        EMPCATFUN

        SI_IGUAL

        'A'

        CONT_05

        238ASP

        000053

        EMPCATFUN

        SI_IGUAL

        'C'

        CONT_05

        238ASP

        000054

        EMPCATFUN

        SI_IGUAL

        'P'

        CONT_05

        238ASP

        000055

        EMPCATFUN

        SI_IGUAL

        'E'

        CONT_05

        238ASP

        000056


        MUEVE

        EMPSALARIO

        TRASALDIA

        238ASP

        000057

        EMPSALARIO

        MULTIPLICA

        30

        TRASALMES

        238ASP

        000058

        EMPCATFUN

        SI_IGUAL

        'D'

        CONT_05

        238ASP

        000059

        EMPSALARIO

        MULTIPLICA

        240

        TRASALMES

        238ASP

        000060

        TRASALMES

        DIVIDE

        30

        TRASALDIA

        238ASP

        000061

        CONT_05

        ETIQUETA



        238ASP

        000062


        GRABA

        'RCP'


        238ASP

        000063

        # GRABA SR7-SR3




        Asigna los valores del histórico de Salarios:

        • Tipo de Modificación = '002'.
        • Concepto: '000'.
        • Valor = Salario.
        • Valor Anterior = Salario Anterior.
        • Fecha de Aumento: Fecha de Pago del Periodo.

        Graba la información en las tablas SR3/SR7 cuando se Habilita la opción de Grabación.

        238ASP

        000064


        MUEVE

        PERFECPAG

        HSDDATA

        238ASP

        000065


        MUEVE

        '002'

        HSDTIPO

        238ASP

        000066


        MUEVE

        '000'

        HSDPD

        238ASP

        000067


        MUEVE

        EMPSALARIO

        HSDVALOR

        238ASP

        000068


        MUEVE

        EMPSALANT

        HSDANTEAUM

        238ASP

        000069


        MUEVE

        PERFECPAG

        HSEDATA

        238ASP

        000070


        MUEVE

        '002'

        HSETIPO

        238ASP

        000071

        GRABA

        'SR7/SR3'


        238ASP

        000072


        MUEVE

        EMPSALARIO

        IMPORTE


        238ASP

        000073

        FINAL

        ETIQUETA




        238ASP

        000074

        #

        TRACE_OFF




            

...