version 7
Correction pour le budget de merde
ALLOCFAM.TXEMP
Avant
si (
(([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
ou (CONSTANTE(GENERAL.ANNEE_PAYE)<2026)
)
alors (
si (
([V_NEWAGCP.CUMREMUAF]>[V_NEWAGCP.TXSMICAF]*[V_NEWAGCP.CUMSMICPRO3112])
et ([V_NEWAGCP.CUMREMUAF]>0)
et ([V_NEWAGCP.CUMSMICPRO3112]>0)
)
alors (LISTEGEN(TX_ALLOCF;0001))
sinon (0)
)
sinon (LISTEGEN(TX_ALLOCF;0001))
Après
si (CONSTANTE(GENERAL.ANNEE_PAYE)>=2026)
alors (
LISTEGEN(TX_ALLOCF;0001)
)
sinon (
si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
alors (
si (
(([V_NEWAGCP.CUMREMUAF]) > ([V_NEWAGCP.TXSMICMAL]*[V_NEWAGCP.CUMSMICPRO3112]))
et ([V_NEWAGCP.CUMREMUAF]>0)
et ([V_NEWAGCP.CUMSMICPRO3112]>0)
)
alors (0)
sinon (LISTEGEN(TX_ALLOCF;0001))
)
sinon (LISTEGEN(TX_ALLOCF;0001))
)
ALLOCFAMREDUIT
Avant
si (
(([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
ou (CONSTANTE(GENERAL.ANNEE_PAYE)<2026)
)
alors (
si (
([V_NEWAGCP.CUMREMUAF]>[V_NEWAGCP.TXSMICAF]*[V_NEWAGCP.CUMSMICPRO3112])
et ([V_NEWAGCP.CUMREMUAF]>0)
et ([V_NEWAGCP.CUMSMICPRO3112]>0)
)
alors (0)
sinon (LISTEGEN(TX_ALLOCF;0002))
)
sinon (0)
Après
si (CONSTANTE(GENERAL.ANNEE_PAYE)>=2026)
alors (
0
)
sinon (
si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
alors (
si (
(([V_NEWAGCP.CUMREMUAF]) > ([V_NEWAGCP.TXSMICMAL]*[V_NEWAGCP.CUMSMICPRO3112]))
et ([V_NEWAGCP.CUMREMUAF]>0)
et ([V_NEWAGCP.CUMSMICPRO3112]>0)
)
alors (0)
sinon (LISTEGEN(TX_ALLOCF;0002))
)
sinon (0)
)
BC_MALCOMP25
Avant
declarer (PASADREMU)
affecter (PASADREMU;[AGCPITREMU.MONTANT]*[AD_HNEXO.BASE]/([AD_HEXO.BASE]+[AD_HNEXO.BASE])
)
si (
(([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
ou (CONSTANTE(GENERAL.ANNEE_PAYE)<2026)
)
alors (
si (
(([V_NEWAGCP.CUMREMUAF]) > ([V_NEWAGCP.TXSMICMAL]*[V_NEWAGCP.CUMSMICPRO3112]))
et ([V_NEWAGCP.CUMREMUAF]>0)
et ([V_NEWAGCP.CUMSMICPRO3112]>0)
)
alors (
f_histoclotsit([BC_BRUT_URSAFF.MONTANT])+ [BC_BRUT_URSAFF.MONTANT]
- f_histoclotsit([BC_MALCOMP25.MONTANT])
)
sinon (
f_histoclotsit([BC_MALCOMP25.MONTANT])*(-1)
)
)
sinon (
si (CONSTANTE(CONTRAT.TYPESALARIE)=5)
alors (:PASADREMU)
sinon ([BC_BRUT_URSAFF.MONTANT])
)
Après
declarer (REMU)
affecter (REMU;si (CONSTANTE(CONTRAT.TYPESALARIE)=5)
alors ([AGCPITREMU.MONTANT]*[AD_HNEXO.BASE]/([AD_HEXO.BASE]+[AD_HNEXO.BASE]))
sinon ([BC_BRUT_URSAFF.MONTANT])
)
si (CONSTANTE(GENERAL.ANNEE_PAYE)>=2026)
alors (
:remu
)
sinon (
si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
alors (
si (
(([V_NEWAGCP.CUMREMUAF]) > ([V_NEWAGCP.TXSMICMAL]*[V_NEWAGCP.CUMSMICPRO3112]))
et ([V_NEWAGCP.CUMREMUAF]>0)
et ([V_NEWAGCP.CUMSMICPRO3112]>0)
)
alors (
f_histoclotsit([BC_BRUT_URSAFF.MONTANT])+ [BC_BRUT_URSAFF.MONTANT]
- f_histoclotsit([BC_MALCOMP25.MONTANT])
)
sinon (
f_histoclotsit([BC_MALCOMP25.MONTANT])*(-1)
)
)
sinon (:remu)
)
MALCOMP25.TXEMP
La passer en non modifiable
Dans le budget il faudra l'enlever et la remettre
Avant
si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
alors (
si ([MALCOMP25.BASE]>0)
alors (6)
sinon ( si (([BC_BRUT_STA.MONTANT]>0) et (CONSTANTE(CONTRAT.DSNNATURE)=29))
alors (6)
sinon (0)
)
)
sinon (6
)
Après
si (CONSTANTE(GENERAL.ANNEE_PAYE)>=2026)
alors (
6
)
sinon (
si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
alors (
si ([MALCOMP25.BASE]>0)
alors (6)
sinon ( si (([BC_BRUT_STA.MONTANT]>0) et (CONSTANTE(CONTRAT.DSNNATURE)=29))
alors (6)
sinon (0)
)
)
sinon (6)
)