Exibir origem

01.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écnico	Fecha del Parche
GPEM042	Cálculo Rescisión Mod. II	07/04/2020
GPEM031	Cálculo de Vacaciones Mod. II	07/04/2020
GPEM040	Cálculo de Rescisión	07/04/2020

Pacote:

007316 - Actualización al Diccionario de Datos.

007157 - Mantenimiento de Menús.

Issue:

DMINA-7527

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.

Realizar un respaldo del Diccionario de Datos.
Aplicar las modificaciones mencionadas en la sección "04 - Diccionario de Datos" o aplicar el update del pacote "007316".
Realizar un backup del repositorio (RPO).
Aplicar la solución del parche correspondiente al issue DMINA-7527.
Crear un empleado.

Ingresar al módulo Financiero (SIGAGPE).
Ingresar a la rutina Liquidación de Contratos (GPEM042), ubicada en "Miscelanea | Cálculos".
Seleccionar al empleado creado anteriormente.
Dar clic en el botón "Incluir".
Informar los campos obligatorios.
Dar clic en la opción "Calcular Rescisión", ubicada en "Otras acciones".
Dar clic en la opción "Aplicar Rescisión", ubicada en "Otras acciones".
Confirmar que el registro se ha grabado correctamente.

<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}

.aui-tabs.horizontal-tabs>.tabs-menu>.menu-item.active-tab a::after { 
	background: #FF9900; !important 
}

.menu-item.active-tab { 
	border-bottom: none !important; 
}

</style>

04. DICCIONARIO DE DATOS

Es importante que se realicén 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 Rutina	Liquidación de Contrato
Programa	GPEM042
Módulo	SIGAGPE
Tipo	Función Protheus

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

Alias	Tipo	Secuencia	Columna	Descripción	Contenido
T17PER	1	01	RE	Motivo Fin Contrato	RCC
T17PER	2	01	01		GP310SXB("ST17", "CODIGO")
T17PER	5	01			VAR_IXB

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

Campo RG_MAT

Orden	02
Tipo	C
Tamaño	6
Decimal	0
Título	Matrícula
Descripción	Número de la Matrícula
Formato	999999
Validación
Usado	Si
Inicializador	SRA->RA_MAT
Consulta
Browse	No
Visual
Contexto
Obligatorio	Si
Opciones
When
Ini. Browse
Grupo de Campos	121
Carpeta	1
Check SQL	#RG_MAT <>' '
Help	En este campo debe ser tipeado: Número de la Matrícula

Campo RG_NOME

Orden	03
Tipo	C
Tamaño	30
Decimal	0
Título	Nombre
Descripción	Nombre del empleado
Formato	@!
Validación
Usado
Inicializador	SRA->RA_NOME
Consulta
Browse	Si
Visual	Visualizar
Contexto	Virtual
Obligatorio	Si
Opciones
When
Ini. Browse	Posicione("SRA",1,RG_FILIAL+RG_MAT,"RA_NOME")
Grupo de Campos
Carpeta	1
Check SQL
Help	Este campo debe mostrar el nombre del empleado.

Campo RG_PROCES

Orden	04
Tipo	C
Tamaño	5
Decimal	0
Título	Cod. Proceso
Descripción	Código del Proceso
Formato	@!
Validación
Usado
Inicializador	SRA->RA_PROCES
Consulta
Browse	Si
Visual	Visualizar
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	Informe el Código del Proceso.

Campo RG_ROTEIR

Orden	05
Tipo	C
Tamaño	3
Decimal	0
Título	Proced. Calc
Descripción	Procedimiento de Cálculo
Formato	@!
Validación	Vazio() .Or. ExistCpo("SRY")
Usado
Inicializador
Consulta	SRY
Browse	Si
Visual	Alterar
Contexto	Real
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	Informe el procedimiento de cálculo.

Campo RG_PERIODO

Orden	06
Tipo	C
Tamaño	6
Decimal	0
Título	Periodo
Descripción	Periodo
Formato	@!
Validación	ExistCpo("RCH",M->RG_PROCES+M->RG_PERIODO)
Usado
Inicializador
Consulta	RCHRES
Browse	Si
Visual	Alterar
Contexto	Real
Obligatorio	Si
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	Informe el periodo.

Campo RG_SEMANA

Orden	07
Tipo	C
Tamaño	2
Decimal	0
Título	N° Pago
Descripción	Número de Pago
Formato	99
Validación	Entre(" ","52")
Usado
Inicializador
Consulta
Browse	Si
Visual	Alterar
Contexto	Real
Obligatorio	Si
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	Informe el número de pago.

Campo RG_DESCTPR

Orden	08
Tipo	C
Tamaño	30
Decimal	0
Título	Desc.TP.Resc
Descripción	Descripc. Tipo Rescisión
Formato	@!
Validación
Usado
Inicializador	If(Inclui,"",fDescRCC("ST17",M->RG_TIPORES,1,2,3,110))
Consulta	T17PER
Browse	Si
Visual	Visualizar
Contexto	Virtual
Obligatorio
Opciones
When
Ini. Browse	fDesc("SRX","32"+SRG->RG_TIPORES,"RX_TXT",30,SRA->RA_FILIAL)
Grupo de Campos
Carpeta
Check SQL
Help	Descripción del tipo de rescisión.

Campo RG_DATADEM

Orden	09
Tipo	D
Tamaño	8
Decimal	0
Título	Fc. Despido
Descripción	Fecha de Despido
Formato	fCargaDFerias()
Validación
Usado
Inicializador
Consulta
Browse	Si
Visual	Alterar
Contexto
Obligatorio	Si
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL	#RG_DATADEM<>' '
Help	En este campo debe ser tipeado: Fecha de Despido.

Campo RG_TIPORES

Orden	10
Tipo	C
Tamaño	2
Decimal	0
Título	Tipo Resc.
Descripción	Tipo de Rescisión
Formato	@!
Validación	ValidRcc("ST17", M->RG_TIPORES,1,2)
Usado
Inicializador	IIF(!EMPTY(SRA->RA_TIPFIN ),SRA->RA_TIPFIN, " ")
Consulta	T17PER
Browse	Si
Visual	Alterar
Contexto
Obligatorio	Si
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL	#RG_TIPORES<>' '
Help	En este campo debe ser tipeado: Tipo de Liquidación Final.

Campo RG_DTGERAR

Orden	11
Tipo	D
Tamaño	8
Decimal	0
Título	Fch Generac
Descripción	Fch Generac. en planilla
Formato
Validación	fChkDtGer()
Usado
Inicializador	dDataBase
Consulta
Browse	Si
Visual
Contexto
Obligatorio	Si
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta	1
Check SQL	#RG_DTGERAR<>' '
Help	En 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

Orden	12
Tipo	D
Tamaño	8
Decimal	0
Título	Fecha aviso
Descripción	Fecha de aviso previo
Formato
Validación	fAtAvProj()
Usado
Inicializador
Consulta
Browse	Si
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta	1
Check SQL
Help	En 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

Orden	13
Tipo	C
Tamaño	1
Decimal	0
Título	Estado
Descripción	Estado de rescisión
Formato	@!
Validación	Pertence("12345")
Usado
Inicializador	"1"
Consulta
Browse	Si
Visual
Contexto
Obligatorio
Opciones	1=Aprobado(no calculado);2=Calculado;3=Cerrado(aplicado);4=Impreso;5=Pago
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	Informe si la rescisión se efectivó.

Campo RG_RESCOMP

Orden	14
Tipo	C
Tamaño	1
Decimal	0
Título	Resc. Compl.
Descripción	Rescisión Complementaria
Formato	@!
Validación
Usado
Inicializador	"1"
Consulta
Browse	Si
Visual	Visualizar
Contexto
Obligatorio
Opciones	1= 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

Orden	15
Tipo	N
Tamaño	6
Decimal	2
Título	DiasVac.Ven.
Descripción	Dias vacaciones vencidas
Formato	@E 999.99
Validación
Usado
Inicializador
Consulta
Browse	Si
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	En este campo deben digitarse Días de Vacaciones Vencidos.

Campo RG_DFERPRO

Orden	16
Tipo	N
Tamaño	6
Decimal	2
Título	DiasVac.Pro.
Descripción	Dias vacaciones proporci.
Formato	@E 999.99
Validación
Usado
Inicializador
Consulta
Browse	Si
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	En este campo debe ser tipeado: Días de Vacaciones Proporc.

Campo RG_DATAHOM

Orden	17
Tipo	D
Tamaño	8
Decimal	0
Título	Fc. Homologa
Descripción	Fecha de Homologación
Formato
Validación
Usado	No
Inicializador
Consulta
Browse	Si
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL	#RG_DATAHOM<>' '
Help	En este campo debe ser tipeado: Fecha de la Homologación.

Campo RG_DAVISO

Orden	18
Tipo	N
Tamaño	6
Decimal	2
Título	Aviso previo
Descripción	Días de aviso previo
Formato	@E 999.99
Validación	Gp40VldAvP()
Usado
Inicializador
Consulta
Browse	Si
Visual	Alterar
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta	1
Check SQL
Help	En este campo debe ser tipeado: Días de Preaviso.

Campo RG_DTPAGO

Orden	19
Tipo	D
Tamaño	8
Decimal	0
Título	Fecha Pago
Descripción	Fecha de Pago
Formato
Validación
Usado
Inicializador
Consulta
Browse	Si
Visual
Contexto
Obligatorio
Opciones
When	Inclui
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	Informe la fecha de pago de la rescisión.

Campo RG_MEDATU

Orden	20
Tipo	C
Tamaño	1
Decimal	0
Título	Mes p/Prom
Descripción	Considerar Mes para Prom
Formato	@!
Validación	Pertence("SN")
Usado	No
Inicializador	"N"
Consulta
Browse	Si
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	En 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

Orden	21
Tipo	N
Tamaño	6
Decimal	0
Título	Hrs Normales
Descripción	Horas Normales de trabajo
Formato	@E 999.99
Validación	M->RG_NORMAL > 0.00
Usado	No
Inicializador	Normal
Consulta
Browse	Si
Visual	Visualizar
Contexto	Real
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	Informe las Horas Trabajadas del empleado para cálculo del DSR sobre horas en la Liquidación Final.

Campo RG_DESCANS

Orden	22
Tipo	N
Tamaño	6
Decimal	2
Título	Hrs. D.S.R.
Descripción	Horas de D.S.R.
Formato	@E 999.99
Validación	M->RG_DESCANS > 0.00
Usado	No
Inicializador	Descanso
Consulta
Browse	Si
Visual	Visualizar
Contexto	Real
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	Informe las Horas relativas a los Desc. Sem. Remun. del empleado en el mes de la Liquidación Final.

Campo RG_SALMES

Orden	23
Tipo	N
Tamaño	12
Decimal	2
Título	Salario Mes
Descripción	Salario Mensual
Formato	@E 999,999,999.99
Validación	Positivo()
Usado	No
Inicializador
Consulta
Browse	Si
Visual	Visualizar
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help	En este campo debe ser tipeado: Sueldo Mensual.

Campo RG_SALDIA

Orden	24
Tipo	N
Tamaño	12
Decimal	2
Título	Salario Día
Descripción	Salario Día
Formato	@E 999,999,999.99
Validación	Positivo()
Usado	No
Inicializador
Consulta
Browse	Si
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help

Campo RG_SALHORA

Orden	25
Tipo	N
Tamaño	12
Decimal	2
Título	Salario Hora
Descripción	Salario Hora
Formato	@E 999,999,999.99
Validación	Positivo()
Usado	No
Inicializador
Consulta
Browse	Si
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help

Campo RG_STSAPL

Orden	26
Tipo	C
Tamaño	1
Decimal	0
Título	Estatus
Descripción	Estatus Aplicación
Formato	@!
Validación
Usado
Inicializador
Consulta
Browse	No
Visual	Visualizar
Contexto	Real
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help

Campo RG_APLROT

Orden	27
Tipo	C
Tamaño	3
Decimal	0
Título	Proced. Apl.
Descripción	Procedimiento Aplicación
Formato	@!
Validación
Usado
Inicializador
Consulta
Browse	Si
Visual	Visualizar
Contexto	Real
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help

Campo RG_APLPER

Orden	28
Tipo	C
Tamaño	6
Decimal	0
Título	Periodo Apl.
Descripción	Periodo Aplicación
Formato	@!
Validación	Vazio() .Or. ExistCpo("SRY")
Usado
Inicializador
Consulta
Browse	Si
Visual	Visualizar
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help

Campo RG_APLNPG

Orden	29
Tipo	C
Tamaño	2
Decimal	0
Título	Num.Pago Apl
Descripción	Num. Pago Aplicación
Formato	@!
Validación
Usado
Inicializador
Consulta
Browse	Si
Visual	Visualizar
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help

Campo RG_RHEXP

Orden	30
Tipo	C
Tamaño	6
Decimal	0
Título	Contr.Exp.RH
Descripción	Control de Exportación R
Formato
Validación
Usado	No
Inicializador
Consulta
Browse
Visual
Contexto
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help

Campo RG_PDRESC

Orden	31
Tipo	C
Tamaño	1
Decimal	0
Título	Con.Res.Comp
Descripción	Conceptos Res. Complement
Formato	@!
Validación
Usado
Inicializador	"1"
Consulta
Browse	No
Visual	Visualizar
Contexto	Real
Obligatorio
Opciones	1=Todos;2=Solo aviso;3=Aviso + Conceptos rescisorios
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help

Campo RG_NOVSUBS

Orden	32
Tipo	N
Tamaño	14
Decimal	2
Título	Nuevo Subsid
Descripción	Valor nuevo subsidio
Formato	@E 99,999,999,999.99
Validación
Usado	No
Inicializador
Consulta
Browse	Si
Visual	Alterar
Contexto	Real
Obligatorio
Opciones
When
Ini. Browse
Grupo de Campos
Carpeta
Check SQL
Help