Saltar a contenido

Nóminas

Información General

Propiedad Valor
ID 48b24e31-ada5-4487-9534-5f15a41c21c2
Tabla PostgreSQL tpr_40678791
Etiqueta Plural Nóminas
Texto principal automatico No
Sección Lista Lista - Nóminas (9d0c2f92-a196-4cfe-a4f0-3d1ad360d3f2)
Sección Base Base - Nóminas (cb489269-8359-4f67-90e9-f7c5fd8b2ac8)

Campos

Total de campos: 35 (10 del sistema, 25 personalizados)

Campos del Sistema

Campo Tipo Rol Columna PostgreSQL Relación Atributos
ID Relación - id Nóminas -
Nombre Texto - nombre - -
Fecha Alta Dato Fecha Y Hora - fecha - -
Editado Fecha Y Hora - fecham - -
Eliminado Sí/No - eliminado - -
Usuario Creador del dato Relación - usuarioid Base - Entidades -
Sección (Relación Sistema) Relación - plantillapid - 🔴 Obligatorio
Posición (Orden) Decimal - posicion - -
Modificado Sí/No - modificado - -
Fecha Indice Actividad Fecha Y Hora - fechaia - -

Campos Personalizados

Campo Tipo Pestaña Columna Atributos Notas
Hora local Hora Registro pr_406787912 🔒 Bloqueado, 👁 Oculto -
Fecha Alta del registro Fecha Y Hora Registro pr_406787914 🔴 Obligatorio Autorrellenado (Siempre): Fecha y Hora actual
Destinador Relación General pr_406787915 🔒 Bloqueado, 👁 Oculto -
Nómina Archivo Relación General pr_406787917 - -
Estado Relación General pr_406787922 - -
Nómina de Empleado Relación General pr_406787931 🔴 Obligatorio -
Fecha Dato Fecha Y Hora Registro pr_406787911 🔴 Obligatorio Autorrellenado (Siempre): Fecha y Hora actual
Autor del alta Relación Registro pr_406787910 🔴 Obligatorio Autorrellenado (Siempre): Campo (Sesión): La Entidad ( ID* )
Tipo Relación General pr_406787918 - -
Desde Fecha General pr_50678792 🔴 Obligatorio -
Hasta Fecha General pr_50678791 🔴 Obligatorio -
Asiento contable Relación General pr_10679031 - -
Total Pago en Especie Decimal Parámetros pr_20679051 🔒 Bloqueado, 📊 Cualquier valor numérico -
Total Devengos Decimal Parámetros pr_20679055 🔒 Bloqueado, 📊 Cualquier valor numérico -
Líquido a Percibir Decimal Parámetros pr_20679057 🔒 Bloqueado, 📊 Cualquier valor numérico -
Total Retenciones Empleado Decimal Parámetros pr_206790510 🔒 Bloqueado, 📊 Cualquier valor numérico -
Total Retenciones Empresa Decimal Parámetros pr_20679052 🔒 Bloqueado, 📊 Cualquier valor numérico -
Total Gastos Empresa Decimal Parámetros pr_206790511 🔒 Bloqueado, 📊 Cualquier valor numérico -
Total Deducciones Empleado Decimal Parámetros pr_20679059 🔒 Bloqueado, 📊 Cualquier valor numérico -
Observaciones Texto Parámetros pr_10679061 - -
Fecha Contable Fecha General pr_50678793 - -
ID Interna Entero General pr_20743541001 🔒 Bloqueado, 📊 Cualquier valor numérico -
Pago TGSS Decimal Parámetros pr_10743553 🔒 Bloqueado, 📊 Cualquier valor numérico -
Pago AEAT Decimal Parámetros pr_10743554 🔒 Bloqueado, 📊 Cualquier valor numérico -
Pago Terceros Decimal Parámetros pr_30743551 🔒 Bloqueado, 📊 Cualquier valor numérico -

Scripts

Total de scripts: 7

Código de Scripts

Lógica de negocio ejecutada en los formularios automáticamente

Campo_Click

if C.ReferenciaNominaDeEmpleado = ''
    F.MsgBox('Debe seleccionar un empleado',1)
    salir
end if




F.DataListLoad(S.Sections.Nominas.ID,1,1)
F.DataListLoadAddFilter(S.Sections.Nominas.ID,S.Fields.Nominas.ReferenciaNominaDeEmpleado.ID,'=',C.ReferenciaNominaDeEmpleado)
F.DataListLoadSetOrder(S.Sections.Nominas.ID,S.Fields.Nominas.Hasta.ID,1)
F.ProcessDataList_Ini(S.Sections.Nominas.ID)



    C.Desde = F.Date_AddMonths(I.Nominas.Desde,1)
    C.Hasta = F.Date_FromDatetime(F.Date_GoToEndOfMonth(C.Desde))


    F.DataListLoad(S.Sections.NominasLista.ID,1,111)
    F.DataListLoadAddFilter(S.Sections.NominasLista.ID,S.Fields.NominasLista.RelacionElementoContenedorListador.ID,'=',I.Nominas.ID)
    F.ProcessDataList_Ini(S.Sections.NominasLista.ID)

        F.AgregarElemento_Iniciar(S.Sections.NominasLista.ID)
        F.AgregarElemento_Valor(S.Fields.NominasLista.ReferenciaTipo.ID,I.NominasLista.ReferenciaTipo)
        F.AgregarElemento_Valor(S.Fields.NominasLista.TextoPrincipal.ID,I.NominasLista.TextoPrincipal)
        F.AgregarElemento_Valor(S.Fields.NominasLista.ImporteImporte.ID,I.NominasLista.ImporteImporte)
        F.AgregarElemento_Valor(S.Fields.NominasLista.Detalles.ID,I.NominasLista.Detalles)

        F.AgregarElemento_Valor(S.Fields.NominasLista.ReferenciaCuentaHaber.ID,I.NominasLista.ReferenciaCuentaHaber)
        F.AgregarElemento_Valor(S.Fields.NominasLista.ReferenciaCuentaDebe.ID,I.NominasLista.ReferenciaCuentaDebe)
        F.AgregarElemento_FinalizarYAceptar()


    F.ProcessDataList_End 



F.ProcessDataList_End

Campos utilizados: - Botón

Campo_Cambiado

if C.Desde <> ''
    C.Hasta = F.Date_FromDatetime(F.Date_GoToEndOfMonth(C.Desde))
    C.TextoPrincipal = F.Concat(C.ReferenciaNominaDeEmpleado.TextoPrincipal,' - ',F.Month(C.Hasta),' de ',F.Year(C.Hasta))
end if

Campos utilizados: - Nóminas > Desde

Campo_Cambiado

if C.ReferenciaNominaDeEmpleado <> ''

    F.DataListLoad(S.Sections.Nominas.ID,1,1)
    F.DataListLoadAddFilter(S.Sections.Nominas.ID,S.Fields.Nominas.ReferenciaNominaDeEmpleado.ID,'=',C.ReferenciaNominaDeEmpleado)
    F.DataListLoadSetOrder(S.Sections.Nominas.ID,S.Fields.Nominas.Hasta.ID,1)
    F.ProcessDataList_Ini(S.Sections.Nominas.ID)



        C.Desde = F.Date_AddMonths(I.Nominas.Desde,1)
        C.Hasta = F.Date_FromDatetime(F.Date_GoToEndOfMonth(C.Desde))

    F.ProcessDataList_End 
end if

Campos utilizados: - Nóminas > Nómina de Empleado

Campo_Cambiado

C.FechaDato = F.Date_GoToStartDay(C.Hasta)

Campos utilizados: - Nóminas > Hasta

Campo_PreAgregarRelacion

F.Guardar

F.CopiarAgregarRelacion(S.Fields.AsientosContables.ReferenciaNomina.ID,C.ID)

Campos utilizados: - Nóminas > Asiento contable

Campo_ComboAplicarFiltro

F.CampoDesplegableAplicarFiltro(S.Fields.Empleados.EmpleadoActivo.ID,'=',1)

Campos utilizados: - Nóminas > Nómina de Empleado

Formulario_TickRecalculo

num totalDevengos = 0
num totalDevengosAfectaNeto = 0
num totalDeduccionesEmpleado = 0
num totalRetencionesEmpleado = 0
num totalRetencionesEmpresa = 0
num totalGastosEmpresa = 0
num totalPagoEnEspecie = 0
num liquidoAPercibir = 0

num totalTGSS
num totalAEAT
num totalTerceros

F.CargarListado()
F.ProcessDataList_Ini(S.Sections.NominasLista.ID)


    num importe = I.NominasLista.ImporteImporte
    num tipoConcepto = I.NominasLista.TipoConcepto 
    num esPagoEnEspecie = I.NominasLista.Especie 



    if V.importe < 0 
        V.importe = V.importe * -1
    end if 



    if v.tipoConcepto = S.Enums.conceptonominatipo.retencionempresa or v.tipoConcepto = S.Enums.conceptonominatipo.retencionempleado


        if I.NominasLista.DestinoPagoRetencion = S.Enums.retenciondestino.aeat 
            V.totalAEAT = V.totalAEAT + V.importe 
        elseif I.NominasLista.DestinoPagoRetencion = S.Enums.retenciondestino.tgss 
            V.totalTGSS = V.totalTGSS + V.importe 
        elseif I.NominasLista.DestinoPagoRetencion = S.Enums.retenciondestino.terceros 
            V.totalTerceros = V.totalTerceros + V.importe 
        end if 

    end if 



    if v.tipoConcepto = S.Enums.conceptonominatipo.devengo

        v.totalDevengos = v.totalDevengos + v.importe

        if I.NominasLista.AfectaAlNeto
            V.totalDevengosAfectaNeto = V.totalDevengosAfectaNeto + V.importe 
        end if


        if v.esPagoEnEspecie
            v.totalPagoEnEspecie = v.totalPagoEnEspecie + v.importe
        end if

    elseif v.tipoConcepto = S.Enums.conceptonominatipo.deduccionempleado

        v.totalDeduccionesEmpleado = v.totalDeduccionesEmpleado + v.importe 

    elseif v.tipoConcepto = S.Enums.conceptonominatipo.retencionempleado

        v.totalRetencionesEmpleado = v.totalRetencionesEmpleado + v.importe 

    elseif v.tipoConcepto = S.Enums.conceptonominatipo.retencionempresa

        v.totalRetencionesEmpresa = v.totalRetencionesEmpresa + v.importe


    end if



F.ProcessDataList_End()






v.totalGastosEmpresa = v.totalRetencionesEmpresa + v.totalDevengos
v.liquidoAPercibir = v.totalDevengosAfectaNeto - v.totalDeduccionesEmpleado - V.totalRetencionesEmpleado 


v.totalDeduccionesEmpleado = v.totalDeduccionesEmpleado
v.totalRetencionesEmpleado = v.totalRetencionesEmpleado

v.totalRetencionesEmpresa = v.totalRetencionesEmpresa
v.totalPagoEnEspecie = v.totalPagoEnEspecie


C.ImportePagoTGSS = V.totalTGSS 
C.ImportePagoAEAT = V.totalAEAT 
C.ImportePagoTerceros = V.totalTerceros 

C.ImporteTotalDevengos = V.totalDevengos 
C.ImporteTotalGastosEmpresa = V.totalGastosEmpresa
C.ImporteLiquidoAPercibir = V.liquidoAPercibir

C.ImporteTotalDeduccionesEmpleado = V.totalDeduccionesEmpleado 
C.ImporteTotalRetencionesEmpleado = V.totalRetencionesEmpleado 

C.ImporteTotalRetencionesEmpresa = V.totalRetencionesEmpresa
C.ImporteTotalPagoEnEspecie = V.totalPagoEnEspecie

← Volver al índice