Histórico da Página
...
- 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:
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
- 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
237ASP 000003 #VALIDA QUE EL TIPO DE SALARIO SEA BASICO 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'
237ASP 000072 MUEVE EMPSALARIO IMPORTE 237ASP 000073 FINAL ETIQUETA 237ASP 000074 # 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
238ASP 000003 #VALIDA QUE EL TIPO DE SALARIO SEA INTEGRAL 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
238ASP 000036 0 REDONDEA EMPSALARIO EMPSALARIO Se 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
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas