Version 97
Version 1
Voir mail Florence
Modifier la rubrique AGCPEXO pour tester REDZRR
AGCPEXO
Avant
si ((CONSTANTE(CONTRAT.TYPESALARIE)=5)
ou ([REDZRRSECU.TXEMP]<>0))
alors (1)
sinon (0)
Après
si ((CONSTANTE(CONTRAT.TYPESALARIE)=5)
ou ([REDZRRSECU.TXEMP]<>0)
ou ([REDZRR.TXEMP]<>0)
)
alors (1)
sinon (0)
Version 2
Calcul de la rémunération ESAT un TH.
Modification dans le cas ou un TH a aussi un contrat CDI
CPLREMUESAT
Avant
si (CONSTANTE(CONTRAT.TYPESALARIE)=1)
alors ([BC_CPLDDTE.MONTANT])
sinon (0)
Après
si (CONSTANTE(CONTRAT.DSNNATURE)=70)
alors ([BC_CPLDDTE.MONTANT])
sinon (0)
Version 3
Correctif Retraite progressive qui se déclenche quand forfait d'heure à 155h
PBR_CET1_RET
Avant
si (F_HISTOCLOT([PBR_BRUT_RET.MONTANT])+[PBR_BRUT_RET.MONTANT]>F_HISTOCLOT([P_RETPROG.PLMENSA])+[P_RETPROG.PLMENSA])
alors (
F_HISTOCLOT([P_RETPROG.PLMENSA])+[P_RETPROG.PLMENSA]
-F_HISTOCLOT([PBR_CET1_RET.MONTANT])
)
sinon (
F_HISTOCLOT([PBR_CET1_RET.MONTANT])*(-1)
)
Après
si (CONSTANTE(CONTRAT.DSNCOTPLEIN)=2)
alors (
si (F_HISTOCLOT([PBR_BRUT_RET.MONTANT])+[PBR_BRUT_RET.MONTANT]>F_HISTOCLOT([P_RETPROG.PLMENSA])+[P_RETPROG.PLMENSA])
alors (
F_HISTOCLOT([P_RETPROG.PLMENSA])+[P_RETPROG.PLMENSA]
-F_HISTOCLOT([PBR_CET1_RET.MONTANT])
)
sinon (
F_HISTOCLOT([PBR_CET1_RET.MONTANT])*(-1)
)
)
sinon (0)
PBR_CET2_RET
Avant
si (F_HISTOCLOT([PBR_BRUT_RET.MONTANT])+[PBR_BRUT_RET.MONTANT]>F_HISTOCLOT([P_RETPROG.PLMENSA])+[P_RETPROG.PLMENSA])
alors (
F_HISTOCLOT([PBR_BRUT_RET.MONTANT])+[PBR_BRUT_RET.MONTANT]
-F_HISTOCLOT([P_RETPROG.PLMENSA])-[P_RETPROG.PLMENSA]
-F_HISTOCLOT([PBR_CET2_RET.MONTANT])
)
sinon (
F_HISTOCLOT([PBR_CET2_RET.MONTANT])*(-1)
)
Après
si (CONSTANTE(CONTRAT.DSNCOTPLEIN)=2)
alors (
si (F_HISTOCLOT([PBR_BRUT_RET.MONTANT])+[PBR_BRUT_RET.MONTANT]>F_HISTOCLOT([P_RETPROG.PLMENSA])+[P_RETPROG.PLMENSA])
alors (
F_HISTOCLOT([PBR_BRUT_RET.MONTANT])+[PBR_BRUT_RET.MONTANT]
-F_HISTOCLOT([P_RETPROG.PLMENSA])-[P_RETPROG.PLMENSA]
-F_HISTOCLOT([PBR_CET2_RET.MONTANT])
)
sinon (
F_HISTOCLOT([PBR_CET2_RET.MONTANT])*(-1)
)
)
sinon (0)
PBR_TU2_RET
Avant
F_TRANCHEB([PBR_BRUT_RET.MONTANT];[PBR_TU1_RET.MONTANT] ;[PBR_TU2_RET.MONTANT];[P_RETPROG.PLMENSB_3PSS])
Après
si (CONSTANTE(CONTRAT.DSNCOTPLEIN)=2)
alors (
F_TRANCHEB([PBR_BRUT_RET.MONTANT];[PBR_TU1_RET.MONTANT] ;[PBR_TU2_RET.MONTANT];[P_RETPROG.PLMENSB_3PSS])
)
sinon (0)
version 4
V_ZRR.MTREDSECU
Enlever la part mobilité
Avant
[V_ZRR.MTREDUCTION]-[V_ZRR.MTREDTRANSP]-[V_ZRR.MTREDFNAL]
Aprés
[V_ZRR.MTREDUCTION]
-[V_ZRR.MTREDTRANSP]
-[V_ZRR.MTREDTRANSPADD]
-[V_ZRR.MTREDVMRR]
-[V_ZRR.MTREDFNAL]