Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 16

changes.mady.by.user Carolina Andrea Kossoy

Gravado em

comparado com

Nova versão 17

changes.mady.by.user Carolina Andrea Kossoy

Gravado em

Chave

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

...

000023000024000025

Operación

Fórmula

Secuencia

1a Expresión

Op. 1

2a Expresión

Resultado

Interpretación

Fórmula NuevaE40IAG000001#TRACE_ON


Fórmula NuevaE40IAG000002NOCALCULASI_IGUAL1FINAL
Fórmula NuevaE40IAG000003IAGNOPROCSI_IGUAL2FINALSi tiene el mnemónico en IAGNOPROC = 2, entonces no calcula esta deducción
Fórmula NuevaE40IAG000004
MUEVE0NAUX_01Mueve cero a la variable NAUX_01, para inicializarla
Fórmula NuevaE40IAG000005
MESFECHAPAGONAUX_04Asigna el mes de pago a la variable NAUX_04
Fórmula NuevaE40IAG000006
LEE_DEP

Lee la tabla SRB (Dependientes)
Fórmula NuevaE40IAG000007NAUX_01SI_MAYOR0CONTINUA_CALCSi ya acumuló meses de un Hijo Discapacitado, entonces continúa el cálculo
Fórmula NuevaE40IAG000008PARENTESCOSI_DIFERENTE'D'FINALSi el mnemónico PARENTESCO <> 'D' (campo RB_GRAUPAR <> 'D' - Hijo Discapacitado) finaliza el cálculo
Fórmula NuevaE40IAG000008000009NAUX_01SUMANAUX_04NAUX_01Suma la cantidad de meses correspondiente a la fecha de pago (variable NAUX_04) a la variable NAUX_01
Fórmula NuevaE40IAG000009000010CONT_02ETIQUETA


Fórmula NuevaE40IAG000010000011
SIG_DEP

Continúa el ciclo con el próximo dependiente
Fórmula NuevaE40IAG000012CONTINUA_CALCETIQUETA


Fórmula NuevaE40IAG000011000013
MUEVENAUX_01UNIDADESMueve la variable NAUX_01 a UNIDADES
Fórmula NuevaE40IAG000012000014##VALOR HIJO INCAPPOR MES


Fórmula NuevaE40IAG000013000015
BUSCATABLA_S050
Busca en la tabla S050 (Topes Deducciones IAG) el valor de la deducción indicada según el campo RV_COD1357 - Cod F1357)
Fórmula NuevaE40IAG000014000016ELEMENTO_01HASTA_MENORIGUALANOMESPROC
Fórmula NuevaE40IAG000015000017ELEMENTO_02HASTA_MAYORIGUALANOMESPROC
Fórmula NuevaE40IAG000016000018ELEMENTO_03HASTA_IGUALSRVCOD1357
Fórmula NuevaE40IAG000017000019
MUEVEELEMENTO_05IAGHIJODIS
Fórmula NuevaE40IAG000018000020IAGHIJODISDIVIDE12IAGHIJODISDivide el tope con valor anual por 12 para mensualizarlo
Fórmula NuevaE40IAG000019000021##PORCENTAJE DEDUCCION



Fórmula NuevaE40IAG000020000022TIPODEDUCSI_IGUAL"2"PORC_DEDSi el tipo de dependiente es "2-Hijo 50%" entonces va a la etiqueta PORC_DED
Fórmula NuevaE40IAG000021000023
MUEVE1NAUX_03Si no, asigna 1 a la variable NAUX_03 (multiplicador de porcentaje)
Fórmula NuevaE40IAG000022000024
SALTA
GRABA_HIJOContinúa en la etiqueta GRABA_HIJO
Fórmula NuevaE40IAG
000025PORC_DEDETIQUETA


Fórmula NuevaE40IAG
000026
MUEVE0.5NAUX_03Si el tipo de dependiente es "2-Hijo 50%" entonces asigna 0.5 a la variable NAUX_03, para reducir al 50% la deducción
Fórmula NuevaE40IAG
000027##CONTINUA LASVALIDACIONES


Fórmula NuevaE40IAG000026000028GRABA_HIJOETIQUETA


Fórmula NuevaE40IAG000027000029IAGHIJODISMULTIPLICANAUX_01NAUX_02Multiplica la cantidad de meses que corresponde (variable NAUX_01) por el tope de deducción mensual por hijo discapacitado (mnemónico IAGHIJODIS) y lo almacena en la variable NAUX_02
Fórmula NuevaE40IAG000028000030NAUX_02MULTIPLICANAUX_03NAUX_02Multiplica la variable NAUX_02 (valor proporcional de la deducción de hijo obtenida) por el mnemónico EMPPORDEP (porcentaje que le corresponde por hijo al empleado) y guarda el resutado en la variable NAUX_02
Fórmula NuevaE40IAG000029000031
MUEVENAUX_02IMPORTEMueve la variable NAUX_01 a IMPORTE
Fórmula NuevaE40IAG000030000032FINALETIQUETA


Fórmula NuevaE40IAG000031000033#TRACE_OFF 


      

Card documentos
InformacaoSolución disponible para Protheus versión 12.1.33 (con garantía extendida), 12.1.2210 (con garantía extendida) o superiores.
Titulo¡IMPORTANTE!

...