Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 58

changes.mady.by.user Carolina Andrea Kossoy_

Gravado em

comparado com

Nova versão 59

changes.mady.by.user Carolina Andrea Kossoy_

Gravado em

Chave

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

...

Código

Orden

1ra Expresión

Operando

2da Expresión

Resultado

Comentario

88APRO000001NOCALCULASI_IGUAL1FINAL
88APRO000002PERTIPONOMSI_IGUAL"LIQ"CTRL_LIQSi es tipo de procedimiento LIQ, va a la etiqueta CTRL_LIQ
88APRO000003PERTIPONOMSI_IGUAL"RES"CTRL_RESControl para tipo de procedimiento RES
88APRO000004
SALTA
FINALSi no es tipo de procedimiento LIQ, no calcula nada y finaliza la fórmula
88APRO000005CTRL_RESETIQUETA

Acumula el mismo concepto (88A) del mes y si ya se calculó la provisión sale del cálculo
88APRO000006
ANOPERFECINIANO_INI_ACU
88APRO000007
ANOPERFECFINANO_FIN_ACU
88APRO000008
FILTRO_ACUM


88APRO000009PERMESPERSUMA_IMPORTESPERMESPERNAUX_11
88APRO000010NAUX_11SI_DIFERENTE0FINAL
88APRO000011CTRL_LIQETIQUETA


88APRO000012#JORNALESCONTROLA QUESEA 2DA QUINCENA

88APRO000013
DIAPERFECININAUX_10Obtiene día de la fecha de inicio de periodo de liquidación
88APRO000014PROTIPPROSI_DIFERENTE"J"CONT_CALCValida si el proceso es "J- Jornal" 
88APRO000015NAUX_10SI_MENOR16FINALValida que sea segunda quincena (el el periodo comience el 16 del mes), sino no realiza el cálculo, en el caso del personal jornal.
88APRO000016CONT_CALCETIQUETA


88APRO000017#DIAS DE BASE SAC



88APRO000018
MESPERFECINIMESPROCESODetermina mes de proceso
88APRO000019
MUEVEMESPROCESONAUX_12Se realiza un cambio de variable por control de Segundo Semestre
88APRO000020MESPROCESOSI_MENOR7CALC_DIASSi el mes de proceso es mayor a 6, se resta 6, ya que vuelve a iniciar el semestre para SAC, guardando la cantidad de meses del semestre en la variable NAUX_12
88APRO000020000021MESPROCESORESTA6MESPROCESONAUX_12
88APRO000021000022CALC_DIASETIQUETA

88APRO00002200002330MULTIPLICAMESPROCESONAUX_12NAUX_03Multiplica 30 por mes de proceso cantidad de meses del semestre que se esté liquidando
88APRO000023000024CONT_01ETIQUETA


88APRO000024000025#DETERMINA EL MEJORSUELDODEL SEMESTRE

88APRO000025000026
ANOPERFECINIANO_INI_ACU
88APRO000026000027
ANOPERFECFINANO_FIN_ACU
88APRO000027000028
FILTRO_ACUM


88APRO000028000029"1"FILTRO_ACUMCBSESAC
Valida todos los conceptos con el campo Base SAC en "1- Si" de los acumulados anteriores
88APRO000029000030PERMESPERSUMA_IMPORTESPERMESPERNAUX_01Suma los conceptos del mismo mes de registros históricos (tabla RG7)
88APRO000030000031
MUEVE"V"TP_SUMA_MOVLI
88APRO000031000032"1"SUMA_MOVLICBSESACNAUX_02Valida todos los conceptos con el campo Base SAC en "1- Si"
88APRO000032000033NAUX_01SUMANAUX_02NAUX_05Suma los conceptos del mismo mes de la liquidación actual
88APRO000033000034CONT_02ETIQUETA


88APRO000034000035MESINISACSTRTOVAL2NAUX_01Guarda mes inicial del semestre, indicado en el Periodo de Liquidación
88APRO000035000036
MUEVEMESINISACCAUX_01Mueve mes inicial de SAC del semestre (mnemónico MESINISAC) vigente a variable alfanumérica
88APRO000036000037
MUEVEMESFINSACCAUX_02Mueve mes final de SAC del semestre (mnemónico MESFINSAC) vigente a variable alfanumérica
88APRO000037000038MESFINSACSTRTOVAL2NAUX_08Guarda mes final de SAC en variable numérica NAUX_08
88APRO000038000039MESINISACSTRTOVAL2NAUX_09Guarda mes inicial de SAC en variable numérica NAUX_09
88APRO000039000040MESPROCESOSI_MENORNAUX_09FINALCompara si el mes de proceso es menor que el mes inicial de SAC (para el segundo semestre es necesario)
88APRO000040000041CICLOETIQUETA


88APRO000041000042
FILTRO_ACUM


88APRO000042000043"1"FILTRO_ACUMCBSESAC
Valida todos los conceptos con el campo Base SAC en "1- Si"
88APRO000043000044CAUX_01SUMA_IMPORTESCAUX_01NAUX_04Suma los conceptos del mismo mes de registros históricos (tabla RG7)
88APRO000044000045NAUX_04SI_MENORNAUX_05CONT_03
88APRO000045000046
MUEVENAUX_04NAUX_05Guarda el mayor sueldo para comparar en la variable NAUX_05
88APRO000046000047
MUEVE0NAUX_04Pone en cero la variable NAUX_04 para comparar contra el siguiente mes
88APRO000047000048CONT_03ETIQUETA


88APRO000048000049NAUX_01SUMA1NAUX_01Incrementa en uno el mes a evaluar en el ciclo
88APRO000049000050NAUX_01VALTOSTR2CAUX_01Convierte el contenido de la variable numérica en alfanumérica
88APRO000050000051#COMPRUEBAMES ACTUAL


88APRO000051000052NAUX_01SI_MAYORNAUX_08FINCICLOSi el mes de proceso es menor al mes mayor al mes fin del semestre, sale del ciclo
88APRO000052000053MESPROCESOSI_MENORNAUX_01FINCICLOSi el mes de proceso es menor al mes más 1, entonces sale del ciclo
88APRO000053000054
SALTA
CICLO
88APRO000054000055FINCICLOETIQUETA


88APRO000055000056
MUEVENAUX_03UNIDADES
88APRO000056000057#SE OBTIENEPROVISION SACHASTA EL MESACTUAL
88APRO000057000058NAUX_05MULTIPLICAUNIDADESNAUX_01Multiplica el mejor sueldo (NAUX_05) por la cantidad de unidades calculadas para SAC (UNIDADES)
88APRO000058000059NAUX_01DIVIDE360NAUX_06Divide el resultado por 360 y guarda el resultado en la variable NAUX_06
88APRO000059000060
MUEVENAUX_06IMPORTESe mueve lo obtenido en la variable NAUX_06 a IMPORTE
88APRO000060000061
MUEVEIMPORTEPROVSACGuarda la provisión de SACdel mes actual en el mnemónico  en el mnemónico PROVSAC.
88APRO000061000062FINALETIQUETA


88BPRO - PROV SAC CCSS

...

Código

Orden

1ra Expresión

Operando

2da Expresión

Resultado

Comentario

88CPRO000001NOCALCULASI_IGUAL1FINAL
88CPRO000002PERTIPONOMSI_IGUAL"LIQ"CTRL_LIQSi es tipo de procedimiento LIQ, va a la etiqueta CTRL_LIQ
88CPRO000003PERTIPONOMSI_IGUAL"RES"CTRL_RESControl para tipo de procedimiento RES
88CPRO000004
SALTA
FINALSi no es tipo de procedimiento LIQ, no calcula nada y finaliza la fórmula
88CPRO000005CTRL_RESETIQUETA

Acumula el mismo concepto (88C) del mes y si ya se calculó la provisión sale del cálculo
88CPRO000006
ANOPERFECINIANO_INI_ACU
88CPRO000007
ANOPERFECFINANO_FIN_ACU
88CPRO000008
FILTRO_ACUM

88CPRO000009PERMESPERSUMA_IMPORTESPERMESPERNAUX_08
88CPRO000010NAUX_08SI_DIFERENTE0FINAL
88CPRO000011CTRL_LIQETIQUETA


88CPRO000012#CALCULA ANTIGUEDAD



88CPRO000013
MUEVEEMPFECINGDAUX_00Mueve fecha de ingreso a variable DAUX_00
88CPRO000014
MUEVEPERFECFINDAUX_01Mueve fecha de fin de periodo tratado a variable DAUX_01
88CPRO000015DAUX_01RESTADAUX_00NAUX_13Resta ambas fechas y obtiene antigüedad sin truncar en días
88CPRO000016NAUX_13SUMA1NAUX_13
88CPRO000017NAUX_13DIVIDE365NAUX_13Obtiene antigüedad en años sin truncar
88CPRO000018# ANTIGUEDAD: NAUX_13


Realiza validaciones de antigüedad cuando es menos de 1 año, calcula la cantidad de días en base a la tabla S011 y no utiliza la tabla SRF (Control Dias Derecho) y cuando es mayor a 1 año de antigüedad, utiliza ya el saldo de días de derecho.
88CPRO000019NAUX_13SI_MAYOR0.6ANIO_ACTUAL
88CPRO000020VALIDA_INGRESOETIQUETA

88CPRO000021
ANOEMPFECINGNAUX_15
88CPRO000022
ANOPERFECFINNAUX_16
88CPRO000023NAUX_15SI_MENORNAUX_16PASA_ANIO
88CPRO000024
MESEMPFECINGNAUX_17
88CPRO000025NAUX_17SI_MENOR6PASA_ANIO
88CPRO000026
SALTA
MENOR_6_MESES
88CPRO000027PASA_ANIOETIQUETA

88CPRO000028
MUEVE1NAUX_13
88CPRO000029
SALTA
ANIO_ACTUAL
88CPRO000030MENOR_6_MESESETIQUETA

88CPRO0000311REDONDEANAUX_13NAUX_14
88CPRO000032NAUX_14MULTIPLICA10NAUX_14
88CPRO000033NAUX_14MULTIPLICA30NAUX_14
88CPRO000034NAUX_14DIVIDE20NAUX_14
88CPRO0000350REDONDEANAUX_14NAUX_14
88CPRO000036
MUEVENAUX_14DIASDERVAC
88CPRO000037
SALTA
CONT_CALC_01
88CPRO000038ANIO_ACTUALETIQUETA

88CPRO0000390REDONDEANAUX_13NAUX_13
88CPRO000040
BUSCATABLA_S011
88CPRO000041ELEMENTO_03HASTA_MAYORIGUALNAUX_13
88CPRO000042
MUEVEELEMENTO_04DIASDERVAC
88CPRO000043CONT_CALC_01ETIQUETA

88CPRO000044
MUEVEINCIMPINCIMPORTE
88CPRO000045
MUEVEIMPORTEDIAPROVVACMueve dicho importe al mnemónico DIAPROVVAC
88CPRO000046INCIMPINCSI_DIFERENTE0CONT_00Si no se carga por novedad se calcula el valor día de vacaciones para provisión
88CPRO000047#VALIDA QUE SEA2DA. QUINCENA


88CPRO000048PROTIPPROSI_DIFERENTE"J"CONT_CALCValida si el proceso es "J- Jornal" 
88CPRO000049
DIAPERFECININAUX_06Obtiene día de la fecha de inicio de periodo de liquidación y lo guarda en la variable NAUX_06
88CPRO000050NAUX_06SI_MENOR16FINALValida que sea segunda quincena (el periodo comience el 16 del mes), sino no realiza el cálculo, en el caso del personal jornal.
88CPRO000051#ACUMULA OTRAS LIQEN EL MES


88CPRO000052CONT_CALCETIQUETA


88CPRO000053
ANOPERFECINIANO_INI_ACUObtiene año de la fecha de inicio de periodo
88CPRO000054
ANOPERFECFINANO_FIN_ACUObtiene año de la fecha de fin de periodo
88CPRO000055
FILTRO_ACUM


88CPRO000056"1"FILTRO_ACUMCBSEVAC
Selecciona todos los conceptos marcados como base de vacaciones Bse Val Vac (RV_BVALVAC) igual a "1- Sí", liquidadas y acumuladas en la tabla RG7 (Acumulados Históricos)
88CPRO000057PERMESPERSUMA_IMPORTESPERMESPERNAUX_07Obtiene los registros del mes tratado en la liquidación actual
88CPRO000058#ACUMULA LO DE LALIQ ACTUAL


88CPRO000059
MUEVE"V"TP_SUMA_MOVLIIndica que va a tomar los valores de los conceptos usados en la función que sigue abajo
88CPRO000060"1"SUMA_MOVLICBSEVACNAUX_01Valida todos los conceptos con el campo Base Vacaciones en "1- Sí" y lo guarda en la variable NAUX_01
88CPRO000061NAUX_01SUMANAUX_07NAUX_01Suma a lo acumulado en la liquidación actual, lo liquidado anteriormente en el mes
88CPRO000062#SUMA PRV A BSE FIJA


Se suma promedio de 6 meses de conceptos variables a la base fija de vacaciones ya calculada
88CPRO000063NAUX_01SUMAPRVPROVACNAUX_01
88CPRO000064NAUX_01DIVIDE25DIAPROVVACObtiene el valor día de vacaciones (DIAPROVVAC) dividiendo la base de vacaciones por 25
88CPRO000065CONT_00ETIQUETA


88CPRO000066#ELIGE TIPO DIADE DERECHO


88CPRO000067DIADERPRVASI_IGUAL"1"CONT_01Se elige si trabajar con días de derecho totales o saldo de días de derecho (campo RCJ_PROVVA)
88CPRO000068#ARMA FECHASPARA SACARLOS SALDOS
Se construyen las fechas para realizar los rangos hasta el periodo anterior (al 31/12 del año anterior al año actual) 
88CPRO000069
ANOPERFECFINNAUX_09
88CPRO000070NAUX_09MULTIPLICA10000NAUX_10
88CPRO000071NAUX_09RESTA1NAUX_09
88CPRO000072NAUX_09MULTIPLICA10000NAUX_09
88CPRO000073NAUX_09SUMA1231NAUX_09
88CPRO000074
CONVIERTE_FECHANAUX_09FECVACPANT
88CPRO000075TODOS_LOS_DIASDIAS_DERECHOFECVACPANTNAUX_11Calcula los días de saldo hasta el periodo anterior
88CPRO000076
MUEVENAUX_11DIADERPANTSe guarda lo obtenido hasta el periodo anterior en el mnemónico DIADERPANT
88CPRO000077CONT_01ETIQUETA


88CPRO000078
MUEVEDIASDERVACUNIDADESObtiene los días de derecho del empleado (mnemónico DIASDERVAC)
88CPRO000079#CALCULAPROVISION VAC.


88CPRO000080
MESPERFECINIMESPROCESOObtiene mes de proceso actual (mnemónico  MESPROCESO)
88CPRO000081DIAPROVVACMULTIPLICADIASDERVACNAUX_02Valoriza los días de derecho, multiplicando la cantidad de dias de derecho (mnemónico DIASDERVAC) por el valor del día de vacaciones para provisión (mnemónico DIAPROVVAC) y lo guarda en la variable NAUX_02
88CPRO000082NAUX_02DIVIDE12NAUX_03Divide este valor por 12 y lo almacena en la variable NAUX_03
88CPRO000083NAUX_03MULTIPLICAMESPROCESONAUX_04Multiplica este valor llevado a mes por la cantidad de meses del año (mnemónico MESPROCESO)
88CPRO000084
MUEVENAUX_04IMPORTEMueve a IMPORTE el resultado obtenido
88CPRO000085
MUEVEIMPORTEPROVVACMueve el importe resultante al mnemónico PROVVAC
88CPRO000086FINALETIQUETA


88DPRO - PROV VAC PER ACT CCSS

...

Código

Orden

1ra Expresión

Operando

2da Expresión

Resultado

Comentario

88FPRO000001NOCALCULASI_IGUAL1FINAL
88FPRO000002#DIAS DE DERECHOPERIODOANTERIOR

88FPRO000003
MUEVEDIADERPANTUNIDADESMueve a las unidades el mnemónico obtenido en el concepto 88C (DIADERPANT), que tiene el saldo de vacaciones de periodos anteriores
88FPRO000004#CALCULAPROVISION VAC.PER. ANTERIORES

88FPRO000005DIAPROVVACMULTIPLICADIADERPANTNAUX_02Valoriza los días de derecho, multiplicando la cantidad de dias de derecho (mnemónico DIADERPANT) por el valor del día de vacaciones para provisión (mnemónico DIAPROVVAC) y lo guarda en la variable NAUX_02
88FPRO000006
MUEVENAUX_02IMPORTE
88FPRO000007
MUEVEIMPORTEPROVVAANTSe guarda el importe en el mnemónico PROVVAANT, para ser utilizado en las contribuciones
88FPRO000008FINALETIQUETA


88GPRO - PROV VAC ANT CCSS

...

Valida si el empleado tiene una antigüedad menor a 6 meses, para que el promedio tome el divisor correctoCONT_05

Código

Orden

1ra Expresión

Operando

2da Expresión

Resultado


88HPRO000001NOCALCULASI_IGUAL1FINAL
88HPRO000002#REPORTA BSE VARDEL PERIODO


88HPRO000003'1'SUMA_MOVLICBSEVARIABNAUX_03Suma la base variable de la liquidación actual, donde debe estar asignado en la tabla de Conceptos (SRV) el campo RV_REMVAR = '1- Sí'
88HPRO000004
MESPERFECININAUX_00
88HPRO000005#MES ANTERIOR



88HPRO000006PROCRIPRVSI_DIFERENTE'1'CONT_00Valida meses de inicio y fin de acumulados a promediar
88HPRO000007NAUX_00RESTA5MESINIPRV
88HPRO000008MESINIPRVRESTA6MESINI2PRV
88HPRO000009
MUEVENAUX_00MESFINPRV
88HPRO000010CONT_00ETIQUETA

88HPRO000011# MES ACTUAL


88HPRO000012PROCRIPRVSI_DIFERENTE'2'CONT_01
88HPRO000013NAUX_00RESTA5MESINIPRV
88HPRO000014MESINIPRVRESTA6MESINI2PRV
88HPRO000015
MUEVENAUX_00MESFINPRV
88HPRO000016CONT_01ETIQUETA


88HPRO000017# ASIGNA ANIO INI Y FIN



88HPRO000018
ANOPERFECINIANO_INI_ACUDetermina año de inicio y fin de acumulados a promediar
88HPRO000019
ANOPERFECFINANO_FIN_ACU
88HPRO000020MESINIPRVSI_MAYOR0CONT_02
88HPRO000021
ANOPERFECININAUX_10
88HPRO000022NAUX_10RESTA1ANO_INI_ACU
88HPRO00002312SUMAMESINIPRVMESINIPRVRealiza comprobaciones para determinar mes de inicio y fin de base para promedio de 6 y 12 meses
88HPRO000024CONT_02ETIQUETA

88HPRO000025MESINI2PRVSI_MAYOR0CONT_03
88HPRO00002612SUMAMESINI2PRVMESINI2PRV
88HPRO000027CONT_03ETIQUETA

88HPRO000028MESFINPRVSI_MAYOR0CONT_04
88HPRO00002912SUMAMESFINPRVMESFINPRV
88HPRO000030CONT_04ETIQUETA

88HPRO000031MESINIPRVVALTOSTR2CAUX_01
88HPRO000032MESFINPRVVALTOSTR2CAUX_02
88HPRO000033MESINI2PRVVALTOSTR2CAUX_03
88HPRO000034# ACUMULA 6 MESES


Realiza el acumulado para base de promedio de 6 meses
88HPRO000035
FILTRO_ACUM

88HPRO000036'1'FILTRO_ACUMCBSEVARIAB
88HPRO000037CAUX_01SUMA_IMPORTESCAUX_02NAUX_10
88HPRO000038NAUX_06SUMANAUX_10NAUX_06
88HPRO000039NAUX_06SUMANAUX_03NAUX_06
88HPRO000040#ACUMULA 12 MESES


Realiza el acumulado para base de promedio de 12 meses
88HPRO000041
FILTRO_ACUM

88HPRO000042'1'FILTRO_ACUMCBSEVARIAB
88HPRO000043CAUX_03SUMA_IMPORTESCAUX_02NAUX_11
88HPRO000044NAUX_12SUMANAUX_11NAUX_12
88HPRO000045NAUX_03SUMANAUX_12NAUX_12
88HPRO000046# CALCULA CANTIDAD DEMESES QUETRABAJO EL EMPLEADO

88HPRO000047
ANOMUEVEEMPFECINGNAUXDAUX_1301
88HPRO000048
ANOMUEVEPERFECFINNAUXDAUX_1402
88HPRO000049NAUX_13SI_IGUALNAUX_14#CALCULAANTIGUEDADDEL EMPLEADO
Valida la antigüedad del empleado para colocar el divisor correcto, si es ingresante en el periodo, debe colocar la cantidad de meses que corresponda, si no ha cumplido los 6 meses al momento de calcular el promedio.
88HPRO000050CONTDAUX_0502ETIQUETARESTA88HPRO000051MESEMPFECINGDAUX_01NAUX_1513
88HPRO000052000051CAUXNAUX_0113STRTOVALSUMA21NAUX_1613
88HPRO000053000052NAUX_15SI_MENOR13DIVIDE365NAUX_16CONT_0613
88HPRO000054000053CONT_061ETIQUETAREDONDEA88HPRO000055NAUX_15RESTA13NAUX_16NAUX_1713
88HPRO000056NAUX_17SI_MENOR0000054#VALIDA SI TIENE6 MESESDE ANTIGUEDADCONT_07
88HPRO000057000055NAUX_17SI_MAYOR6CONT_0788HPRO000058SALTACONT_0888HPRO000059CONT_07ETIQUETA88HPRO000060MUEVE6NAUX_1788HPRO000061CONT_0813SI_MAYOR0.6CONT_05
88HPRO000056NAUX_13ETIQUETA88HPRO000062NAUX_17SI_IGUAL0.6PROMCONT_6_M05
88HPRO000063000057CAUXNAUX_0213STRTOVALMULTIPLICA210NAUX_1814
88HPRO000064000058NAUX_1814SUMA1NAUX_17NAUX_17
88HPRO000065NAUX_17SUMA1NAUX_17
_14
88HPRO000059
SALTA
PROM_6_M
88HPRO000060CONT_05ETIQUETA

88HPRO000061
MUEVE6NAUX_14
88HPRO000062
SALTA
PROM_6_M
88HPRO00006388HPRO000066PROM_6_METIQUETA

88HPRO000067000064NAUX_06DIVIDENAUX_1714NAUX_06Realiza el promedio de 6 meses
88HPRO000068000065
MUEVENAUX_06IMPORTEGuarda el promedio en Importe IMPORTE
88HPRO000069000066
MUEVEIMPORTEPRVPROVACGuarda el importe en el mnemónico PROPROVAC para ser utilizado posteriormente
88HPRO000067
MUEVENAUX_14UNIDADESGuarda el divisor en UNIDADES
88HPRO000068000070FINALETIQUETA


Conceptos por Proceso (SRM)

...