Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 44

changes.mady.by.user Carolina Andrea Kossoy

Gravado em

comparado com

Nova versão 45

changes.mady.by.user Carolina Andrea Kossoy

Gravado em

Chave

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

...

Fórmula

Operación

Fórmula

Secuencia

1a Expresión

Op. 1

2a Expresión

Resultado

Interpretación

Operación

Fórmula

Secuencia

1a Expresión

Op. 1

2a Expresión

Resultado

Interpretación

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 NuevaE40IAG000009NAUX_01SUMANAUX_04NAUX_01Suma la cantidad de meses correspondiente a la fecha de pago (variable NAUX_04) a la variable NAUX_01
Fórmula NuevaE40IAG000010CONT_02ETIQUETA


Fórmula NuevaE40IAG000011
SIG_DEP

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


Fórmula NuevaE40IAG000013
MUEVENAUX_01UNIDADESMueve la variable NAUX_01 a UNIDADES
Fórmula NuevaE40IAG000014##VALOR HIJO INCAPPOR MES


Fórmula NuevaE40IAG000015
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 NuevaE40IAG000016ELEMENTO_01HASTA_MENORIGUALANOMESPROC
Fórmula NuevaE40IAG000017ELEMENTO_02HASTA_MAYORIGUALANOMESPROC
Fórmula NuevaE40IAG000018ELEMENTO_03HASTA_IGUALSRVCOD1357
Fórmula NuevaE40IAG000019
MUEVEELEMENTO_05IAGHIJODIS
Fórmula NuevaE40IAG000020IAGHIJODISDIVIDE12IAGHIJODISDivide el tope con valor anual por 12 para mensualizarlo
Fórmula NuevaE40IAG000021##PORCENTAJE DEDUCCION



Fórmula NuevaE40IAG000022TIPODEDUCSI_IGUAL"2"PORC_DEDSi el tipo de dependiente es "2-Hijo 50%" entonces va a la etiqueta PORC_DED
Fórmula NuevaE40IAG000023
MUEVE1NAUX_03Si no, asigna 1 a la variable NAUX_03 (multiplicador de porcentaje)
Fórmula NuevaE40IAG000024
SALTA
GRABA_HIJOContinúa en la etiqueta GRABA_HIJO
Fórmula NuevaE40IAG000025PORC_DEDETIQUETA


Fórmula NuevaE40IAG000026
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 NuevaE40IAG000027##CONTINUA LASVALIDACIONES


Fórmula NuevaE40IAG000028GRABA_HIJOETIQUETA


Fórmula NuevaE40IAG000029IAGHIJODISMULTIPLICANAUX_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 NuevaE40IAG000030NAUX_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 NuevaE40IAG000031
MUEVENAUX_02IMPORTEMueve la variable NAUX_01 a IMPORTE
Fórmula NuevaE40IAG000032FINALETIQUETA


Fórmula NuevaE40IAG000033#TRACE_OFF 


...

  • 955IAG -I.A.G. Deducción Cónyuge Acum:

Operación

Fórmula

Secuencia

1a Expresión

Op. 1

2a Expresión

Resultado

Interpretación

Se agrega955IAG000001#TRACE_ON


Sin cambios955IAG000002NOCALCULASI_IGUAL1FINAL
Sin cambios955IAG000003IAGNOPROCSI_IGUAL2FINALSi tiene el mnemónico en IAGNOPROC = 2, entonces no calcula esta deducción
Sin cambios955IAG000004
LEE_DEP

Lee los dependientes con parentesco CONYUGE ("C"), sino continúa con la etiqueta NEXT
Sin cambios955IAG000005PARENTESCOSI_DIFERENTE'C'NEXT
Se modifica955IAG000006## DESGLOSO FECHA DE PAGO


Se corrige título
Sin cambios955IAG000007
ANOFECHAPAGONAUX_00Extrae el año de la fecha de pago
Sin cambios955IAG000008
MESFECHAPAGONAUX_12Extrae el mes de la fecha de pago
Se modifica955IAG000009##DESGLOSO FECHA BAJA


Se corrige título
Sin cambios955IAG000010
ANOFECBAJDEDNAUX_01Extrae el año de la fecha de baja de la deducción (mnemónico FECBAJDED: campo RB_DTBAIXA de la tabla de Dependientes SRB)
Sin cambios955IAG000011
MESFECBAJDEDNAUX_10Extrae el mes de la fecha de baja de la deducción (mnemónico FECBAJDED: campo RB_DTBAIXA de la tabla de Dependientes SRB)
Se modifica955IAG000012##DESGLOSO FECHA INICIO


Se corrige título
Sin cambios955IAG000013
ANOFECINIDEDNAUX_03Extrae el año de la fecha de baja de la deducción (mnemónico FECBAJDED: campo RB_DATAINI de la tabla de Dependientes SRB)
Sin cambios955IAG000014
MESFECINIDEDNAUX_11Extrae el mes de la fecha de baja de la deducción (mnemónico FECINIDED: campo RB_DATAINI de la tabla de Dependientes SRB)
Se agrega955IAG000015##VALOR TOPE MENSUALCONYUGE


Se agrega955IAG000016
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)
Se agrega955IAG000017ELEMENTO_01HASTA_MENORIGUALANOMESPROC
Se agrega955IAG000018ELEMENTO_02HASTA_MAYORIGUALANOMESPROC
Se agrega955IAG000019ELEMENTO_03HASTA_IGUALSRVCOD1357
Se agrega955IAG000020
MUEVEELEMENTO_05IAGDEDCON
Se agrega955IAG000021IAGDEDCONDIVIDE12IAGDEDCONDivide el tope con valor anual por 12 para mensualizarlo
Sin cambios955IAG000022##CONTINUA CON LASVALIDACIONES


Sin cambios955IAG000023
MUEVEIAGDEDCONNAUX_17Mueve el valor del mnemónico IAGDEDCON a la variable NAUX_17
Sin cambios955IAG000024FECINIDEDSI_MAYORFECHAPAGONEXTValida si la fecha de inicio de la deducción (mnemónico FECINIDED) es mayor a la fecha de pago (mnemónico FECHAPAGO), sigue en la etiqueta NEXT
Sin cambios955IAG000025FECBAJDEDSI_IGUALVACIOPROCALTASi la fecha de baja de la deducción (mnemónico FECBAJDED) no tiene valor, continúa en la etiqueta PROCALTA
Sin cambios955IAG000026## ANO BAJA <  ANO PAGO



Sin cambios955IAG000027NAUX_01SI_MENORNAUX_00NEXTSi el año de fecha de baja (variable NAUX_01) es menor al año de fecha de pago (variable NAUX_00), sigue en la etiqueta NEXT
Sin cambios955IAG000028##ANO BAJA = ANO PAGO



Sin cambios955IAG000029NAUX_00SI_IGUALNAUX_01PROCBAJASi el año de fecha de baja (variable NAUX_01) es igual al año de fecha de pago (variable NAUX_00), sigue en la etiqueta PROCBAJA
Sin cambios955IAG000030## PROCESA X BAJA



Sin cambios955IAG000031PROCBAJAETIQUETA


Sin cambios955IAG000032
MUEVENAUX_10NAUX_15Mueve el mes de la fecha de baja (variable NAUX_10) a la variable NAUX_15
Sin cambios955IAG000033NAUX_01SI_MAYORNAUX_03GRABASi el año de fecha de baja (variable NAUX_01) es mayor al año de fecha de baja (variable NAUX_03), sigue en la etiqueta GRABA
Sin cambios955IAG000034NAUX_10RESTANAUX_11NAUX_15Se realiza la diferencia entre el mes de la fecha de baja (variable NAUX_10) y mes de la fecha de inicio de la deducción (variable NAUX_11) y guarda el resultado en la variable NAUX_15
Sin cambios955IAG000035NAUX_15SUMA1NAUX_15
Sin cambios955IAG000036
SALTA
GRABASalta a la etiqueta GRABA
Sin cambios955IAG000037##PROCESA ALTA



Sin cambios955IAG000038PROCALTAETIQUETA


Sin cambios955IAG000039
MUEVENAUX_12NAUX_15Mueve el mes de la fecha de pago (variable NAUX_12) a la variable NAUX_15
Sin cambios955IAG000040NAUX_03SI_MENORNAUX_00GRABASi el año de fecha de baja de la deducción (variable NAUX_03) es menor al año de fecha de pago (variable NAUX_00), sigue en la etiqueta GRABA
Sin cambios955IAG000041NAUX_12RESTANAUX_11NAUX_15Se realiza la diferencia entre el mes de la fecha de pago (variable NAUX_12) y mes de la fecha de inicio de la deducción (variable NAUX_11) y guarda el resultado en la variable NAUX_15
Sin cambios955IAG000042NAUX_15SUMA1NAUX_15
Sin cambios955IAG000043
SALTA
GRABASalta a la etiqueta GRABA
Sin cambios955IAG000044## GRABA CONCEPTO



Sin cambios955IAG000045GRABAETIQUETA


Sin cambios955IAG000046
MUEVENAUX_15NAUX_16Mueve el valor de la variable NAUX_15 a la variable NAUX_16
Sin cambios955IAG000047NAUX_16MULTIPLICANAUX_17NAUX_17Obtiene el valor de la deducción proporcionada al mes de pago o al mes de baja, si es anterior
Se elimina955IAG
IMPORTESI_MAYOR0GRABA2No procede porque no se cargó la incidencia anteriormente
Sin cambios955IAG000048
MUEVENAUX_16UNIDADESMueve la cantidad de meses pagados a UNIDADES
Sin cambios955IAG000049
MUEVENAUX_17IMPORTEMueve el monto de la deducción calculada a IMPORTE
Se elimina955IAG

SALTA
NEXTNo aplica
Se elimina955IAG
##


No aplica
Se elimina955IAG
GRABA2ETIQUETA

No aplica
Se elimina955IAG
IMPORTESUMANAUX_17IMPORTENo aplica
Se elimina955IAG
UNIDADESSUMANAUX_16UNIDADESNo aplica
Sin cambios955IAG000050##



Sin cambios955IAG000051NEXTETIQUETA


Sin cambios955IAG000052
SIG_DEP

Continúa el ciclo con el próximo dependiente
Sin cambios955IAG000053FINALETIQUETA


Se agrega955IAG000054#TRACE_OFF


...