Árvore de páginas

02. DATOS GENERALES


Línea de producto: Microsiga Protheus.
Segmento:Servicios - Mercado Internacional.
Módulo:SIGAGPE - Gestión de Personal.
Función:

    

Rutina(s)Nombre TécnicoFecha del Parche
GPEM042Cálculo Rescisión Mod. II
07/04/2020
GPEM031Cálculo de Vacaciones Mod. II07/04/2020
GPEM040Cálculo de Rescisión07/04/2020

   

Paquete:

007316 - Actualización al Diccionario de Datos.

007157 - Mantenimiento de Menús.

Issue:DMINA-7527/DMINA-9182
Versión:12.1.17 |12.1.23 | 12.1.25 | 12.1.27

02. SITUACIÓN/REQUISITO

Se solicita la localización de la rutina Liquidación de Contratos (GPEM042) para el país Perú.

03. SOLUCIÓN

Se realizan modificaciones en las rutina Cálculo Rescisión Mod. II (GPEM042), Cálculo de Vacaciones Mod. II (GPEM031) y Cálculo de Rescisión (GPEM040); para garantizar el correcto funcionamiento de la rutina Liquidación de Contratos utilizada en el país Perú.

También se realizan modificaciones al diccionario, que pueden ser visualizadas en la sección "04 - Diccionario de Datos" y fueron las siguientes:

  • Se agrega al menú la opción de la rutina Liquidación de Contratos.
  • Se modifican los campos de la tabla Rescisiones (SRG).
  • Se agrega la consulta T17PER.


  1. Realizar un respaldo del Diccionario de Datos.
  2. Aplicar las modificaciones mencionadas en la sección "04 - Diccionario de Datos" o aplicar el update del pacote "007316".
  3. Realizar un backup del repositorio (RPO).
  4. Aplicar la solución del parche correspondiente al issue DMINA-7527.
  5. Crear un empleado.
  1. Ingresar al módulo Gestión de Personal (SIGAGPE).
  2. Ingresar a la rutina Liquidación de Contratos (GPEM042), ubicada en "Miscelanea | Cálculos".
  3. Seleccionar al empleado creado anteriormente.
  4. Dar clic en el botón "Incluir".
  5. Informar los campos obligatorios.
  6. Dar clic en la opción "Calcular Rescisión", ubicada en "Otras acciones".
  7. Dar clic en la opción "Aplicar Rescisión", ubicada en "Otras acciones".
  8. Confirmar que el registro se ha grabado correctamente.

04. DICCIONARIO DE DATOS

Nota:

  • Es importante que se realicen las siguientes modificaciones al diccionario de datos como se muestra a continuación, debido a que la rutina fue localizada; y con ello se garantiza el correcto funcionamiento de la misma.

Configuración de opción en Menú:


MenúMiscelánea
Sub-menúCálculos
Nombre de la RutinaLiquidación de Contrato
ProgramaGPEM042
MóduloSIGAGPE
TipoFunción Protheus

Creación de Consulta Estándar en el archivo "SXB – Consulta Estándar":


AliasTipoSecuenciaColumnaDescripciónContenido
T17PER101REMotivo Fin ContratoRCC
T17PER20101
GP310SXB("ST17", "CODIGO")
T17PER501

VAR_IXB

Creación y Modificación de campos en el archivo "SX3 - Campos", para Tabla SRG:


Campo RG_MAT


Orden02
TipoC
Tamaño6
Decimal0
TítuloMatrícula
DescripciónNúmero de la Matrícula
Formato999999
Validación
UsadoSi
InicializadorSRA->RA_MAT
Consulta
BrowseNo
Visual
Contexto
ObligatorioSi
Opciones
When
Ini. Browse
Grupo de Campos121
Carpeta1
Check SQL#RG_MAT <>' '
HelpEn este campo debe ser tipeado: Número de la Matrícula


Campo RG_NOME


Orden03
TipoC
Tamaño30
Decimal0
TítuloNombre
DescripciónNombre del empleado
Formato@!
Validación
Usado
InicializadorSRA->RA_NOME
Consulta
BrowseSi
VisualVisualizar
ContextoVirtual
ObligatorioSi
Opciones
When
Ini. BrowsePosicione("SRA",1,RG_FILIAL+RG_MAT,"RA_NOME")
Grupo de Campos
Carpeta1
Check SQL
HelpEste campo debe mostrar el nombre del empleado.


Campo RG_PROCES


Orden04
TipoC
Tamaño5
Decimal0
TítuloCod. Proceso
DescripciónCódigo del Proceso
Formato@!
Validación
Usado
InicializadorSRA->RA_PROCES
Consulta
BrowseSi
VisualVisualizar
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpInforme el Código del Proceso.


Campo RG_ROTEIR


Orden05
TipoC
Tamaño3
Decimal0
TítuloProced. Calc
DescripciónProcedimiento de Cálculo
Formato@!
ValidaciónVazio() .Or. ExistCpo("SRY")
Usado
Inicializador
ConsultaSRY
BrowseSi
VisualAlterar
ContextoReal
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpInforme el procedimiento de cálculo.


Campo RG_PERIODO


Orden06
TipoC
Tamaño6
Decimal0
TítuloPeriodo
DescripciónPeriodo
Formato@!
ValidaciónExistCpo("RCH",M->RG_PROCES+M->RG_PERIODO)
Usado
Inicializador
ConsultaRCHRES
BrowseSi
VisualAlterar
ContextoReal
ObligatorioSi
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpInforme el periodo.


Campo RG_SEMANA


Orden07
TipoC
Tamaño2
Decimal0
TítuloN° Pago
DescripciónNúmero de Pago
Formato99
ValidaciónEntre(" ","52")
Usado
Inicializador
Consulta
BrowseSi
VisualAlterar
ContextoReal
ObligatorioSi
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpInforme el número de pago.


Campo RG_DESCTPR


Orden08
TipoC
Tamaño30
Decimal0
TítuloDesc.TP.Resc
DescripciónDescripc. Tipo Rescisión
Formato@!
Validación
Usado
InicializadorIf(Inclui,"",fDescRCC("ST17",M->RG_TIPORES,1,2,3,110))
ConsultaT17PER
BrowseSi
VisualVisualizar
ContextoVirtual
Obligatorio
Opciones
When
Ini. BrowsefDesc("SRX","32"+SRG->RG_TIPORES,"RX_TXT",30,SRA->RA_FILIAL)
Grupo de Campos
Carpeta
Check SQL
HelpDescripción del tipo de rescisión.


Campo RG_DATADEM


Orden09
TipoD
Tamaño8
Decimal0
Título

Fc. Despido

DescripciónFecha de Despido
FormatofCargaDFerias()
Validación
Usado
Inicializador
Consulta
BrowseSi
VisualAlterar
Contexto
ObligatorioSi
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL#RG_DATADEM<>' '
HelpEn este campo debe ser tipeado: Fecha de Despido.


Campo RG_TIPORES


Orden10
TipoC
Tamaño2
Decimal0
TítuloTipo Resc.
DescripciónTipo de Rescisión
Formato@!
ValidaciónValidRcc("ST17", M->RG_TIPORES,1,2)
Usado
Inicializador

IIF(!EMPTY(SRA->RA_TIPFIN ),SRA->RA_TIPFIN, " ")

ConsultaT17PER
BrowseSi
VisualAlterar
Contexto
ObligatorioSi
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL#RG_TIPORES<>' '
HelpEn este campo debe ser tipeado: Tipo de Liquidación Final.


Campo RG_DTGERAR


Orden11
TipoD
Tamaño8
Decimal0
TítuloFch Generac
DescripciónFch Generac. en planilla
Formato
ValidaciónfChkDtGer()
Usado
InicializadordDataBase
Consulta
BrowseSi
Visual
Contexto
ObligatorioSi
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta1
Check SQL#RG_DTGERAR<>' '
HelpEn este campo debe digitarse la Fecha de Generación en la Planilla. Debe estar dentro del mismo Mes/Año de la Planilla Abierta y/o no puede ser mayor que el Mes/Año de la Fecha de Despido.


Campo RG_DTAVISO


Orden12
TipoD
Tamaño8
Decimal0
TítuloFecha aviso
DescripciónFecha de aviso previo
Formato
ValidaciónfAtAvProj()
Usado
Inicializador
Consulta
BrowseSi
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta1
Check SQL
HelpEn este campo debe digitarse la fecha del aviso previo, si el tipo de aviso no es el trabajado, debe informarse la misma fecha del despido.


Campo RG_EFETIVA


Orden13
TipoC
Tamaño1
Decimal0
TítuloEstado
DescripciónEstado de rescisión
Formato@!
ValidaciónPertence("12345")
Usado
Inicializador"1"
Consulta
BrowseSi
Visual
Contexto
Obligatorio
Opciones1=Aprobado(no calculado);2=Calculado;3=Cerrado(aplicado);4=Impreso;5=Pago
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpInforme si la rescisión se efectivó.


Campo RG_RESCOMP


Orden14
TipoC
Tamaño1
Decimal0
TítuloResc. Compl.
DescripciónRescisión Complementaria
Formato@!
Validación
Usado
Inicializador"1"
Consulta
BrowseSi
VisualVisualizar
Contexto
Obligatorio
Opciones1= Rescisión normal; 2= Rescisión complementaria; 3= Rescisión complementaria fuera del mes
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help

Informe el tipo de rescisión:

1= Rescisión normal;

2= Rescisión complementaria;

3= Rescisión complementaria fuera del mes


Campo RG_DFERVEN


Orden15
TipoN
Tamaño6
Decimal2
TítuloDiasVac.Ven.
DescripciónDias vacaciones vencidas
Formato@E 999.99
Validación
Usado
Inicializador
Consulta
BrowseSi
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpEn este campo deben digitarse Días de Vacaciones Vencidos.


Campo RG_DFERPRO


Orden16
TipoN
Tamaño6
Decimal2
TítuloDiasVac.Pro.
DescripciónDias vacaciones proporci.
Formato@E 999.99
Validación
Usado
Inicializador
Consulta
BrowseSi
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpEn este campo debe ser tipeado: Días de Vacaciones Proporc.


Campo RG_DATAHOM


Orden17
TipoD
Tamaño8
Decimal0
TítuloFc. Homologa
DescripciónFecha de Homologación
Formato
Validación
UsadoNo
Inicializador
Consulta
BrowseSi
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL#RG_DATAHOM<>' '
HelpEn este campo debe ser tipeado: Fecha de la Homologación.


Campo RG_DAVISO


Orden18
TipoN
Tamaño6
Decimal2
TítuloAviso previo
DescripciónDías de aviso previo
Formato@E 999.99
ValidaciónGp40VldAvP()
Usado
Inicializador
Consulta
BrowseSi
VisualAlterar
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta1
Check SQL
HelpEn este campo debe ser tipeado: Días de Preaviso.


Campo RG_DTPAGO


Orden19
TipoD
Tamaño8
Decimal0
TítuloFecha Pago
DescripciónFecha de Pago
Formato
Validación
Usado
Inicializador
Consulta
BrowseSi
Visual
Contexto
Obligatorio
Opciones
WhenInclui
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpInforme la fecha de pago de la rescisión.


Campo RG_MEDATU


Orden20
TipoC
Tamaño1
Decimal0
TítuloMes p/Prom
DescripciónConsiderar Mes para Prom
Formato@!
ValidaciónPertence("SN")
UsadoNo
Inicializador"N"
Consulta
BrowseSi
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpEn este campo debe ser tipeado: "S" Considera los conceptos de Liquid. Final para promedio por sindicato; "N" No Considera los conceptos de la Liquidación Final.


Campo RG_NORMAL


Orden21
TipoN
Tamaño6
Decimal0
TítuloHrs Normales
DescripciónHoras Normales de trabajo
Formato@E 999.99
ValidaciónM->RG_NORMAL > 0.00
UsadoNo
InicializadorNormal
Consulta
BrowseSi
VisualVisualizar
ContextoReal
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpInforme las Horas Trabajadas del empleado para cálculo del DSR sobre horas en la Liquidación Final.


Campo RG_DESCANS


Orden22
TipoN
Tamaño6
Decimal2
TítuloHrs. D.S.R.
DescripciónHoras de D.S.R.
Formato@E 999.99
ValidaciónM->RG_DESCANS > 0.00
UsadoNo
InicializadorDescanso
Consulta
BrowseSi
VisualVisualizar
ContextoReal
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpInforme las Horas relativas a los Desc. Sem. Remun. del empleado en el mes de la Liquidación Final.


Campo RG_SALMES


Orden23
TipoN
Tamaño12
Decimal2
TítuloSalario Mes
DescripciónSalario Mensual
Formato@E 999,999,999.99
ValidaciónPositivo()
UsadoNo
Inicializador
Consulta
BrowseSi
VisualVisualizar
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpEn este campo debe ser tipeado: Sueldo Mensual.


Campo RG_SALDIA


Orden24
TipoN
Tamaño12
Decimal2
TítuloSalario Día
DescripciónSalario Día
Formato@E 999,999,999.99
ValidaciónPositivo()
UsadoNo
Inicializador
Consulta
BrowseSi
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpEn este campo debe ser tipeado: Sueldo Día.


Campo RG_SALHORA


Orden25
TipoN
Tamaño12
Decimal2
TítuloSalario Hora
DescripciónSalario Hora
Formato@E 999,999,999.99
ValidaciónPositivo()
UsadoNo
Inicializador
Consulta
BrowseSi
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpEn este campo debe ser tipeado: Sueldo Hora.


Campo RG_STSAPL


Orden26
TipoC
Tamaño1
Decimal0
TítuloEstatus
DescripciónEstatus Aplicación
Formato@!
Validación
Usado
Inicializador
Consulta
BrowseNo
VisualVisualizar
ContextoReal
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpEstatus de la aplicación.


Campo RG_APLROT


Orden27
TipoC
Tamaño3
Decimal0
TítuloProced. Apl.
DescripciónProcedimiento Aplicación
Formato@!
Validación
Usado
Inicializador
Consulta
BrowseSi
VisualVisualizar
ContextoReal
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpEste campo debe contener el procedimiento con el que se realizó la aplicación de rescisión.


Campo RG_APLPER


Orden28
TipoC
Tamaño6
Decimal0
TítuloPeriodo Apl.
DescripciónPeriodo Aplicación
Formato@!
ValidaciónVazio() .Or. ExistCpo("SRY")
Usado
Inicializador
Consulta
BrowseSi
VisualVisualizar
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpEste campo debe contener el periodo con el que se realizó la aplicación de rescisión.


Campo RG_APLNPG


Orden29
TipoC
Tamaño2
Decimal0
TítuloNum.Pago Apl
DescripciónNum. Pago Aplicación
Formato@!
Validación
Usado
Inicializador
Consulta
BrowseSi
VisualVisualizar
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpEste campo debe presentar el número de pago del periodo de aplicación de la resicisión.


Campo RG_RHEXP


Orden30
TipoC
Tamaño6
Decimal0
TítuloContr.Exp.RH
DescripciónControl de Exportación R
Formato
Validación
UsadoNo
Inicializador
Consulta
Browse
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpEn este campo se almacena la fecha de la exportacion para la aplicacion Totvs Control de acceso.


Campo RG_PDRESC


Orden31
TipoC
Tamaño1
Decimal0
TítuloCon.Res.Comp
DescripciónConceptos Res. Complement
Formato@!
Validación
Usado
Inicializador"1"
Consulta
BrowseNo
VisualVisualizar
ContextoReal
Obligatorio
Opciones1=Todos;2=Solo aviso;3=Aviso + Conceptos rescisorios
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpPara los casos en que se concedió el reajuste por acuerdo laboral, y la fecha del acuerdo laboral sea superior a la fecha de despido del empleado, informe los conceptos que deben calcularse en las rescisiones complementarias por acuerdo laboral: 1=Todos, Todo concepto de la rescisión original que no se haya Generado, Informado o provenga del módulo SIGAPON. 2=Solo Aviso, Todos los conceptos de la rescisión original que sean de aviso previo, siempre y cuando el reajuste se haya concedido hasta la fecha proyectada del aviso previo, el valor calculado será proporcional a los días de aviso en el mes del acuerdo laboral. 3=Aviso + Conceptos rescisorios, Todos los conceptos de la rescisión original menos el concepto de saldo del sueldo.


Campo RG_NOVSUBS


Orden32
TipoN
Tamaño14
Decimal2
TítuloNuevo Subsid
DescripciónValor nuevo subsidio
Formato

@E 99,999,999,999.99

Validación
UsadoNo
Inicializador
Consulta
BrowseSi
VisualAlterar
ContextoReal
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
HelpNuevo sueldo del jubilado, en la rescisión por jubilación. Este valor se llevará a SRA - RA_SALARIO, en la concreción de la rescisión.