Version 3 : RGDU : Allocation Familiale

Le calcul de l'allocation familiale

Plus de régularisation en 2026.

Plus d'alloc taux réduit non plus

BC_REG_ALLOC

Avant

declarer (TXSMIC)
affecter (TXSMIC;
         si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2025))
         alors (3.5)
         sinon (3.3)
         )
si (
   ([V_NEWAGCP.CUMREMUAF]<=(:TXSMIC*[V_NEWAGCP.CUMSMICPRO3112]))
   ou ([V_NEWAGCP.CUMREMUAF]<=0)
   ou ([V_NEWAGCP.CUMSMICPRO3112]<=0)
)
alors (
       histocumulsitu([V_ALLOC.BASEALLOC])*(-1)
       -histocumulsitu([BC_REG_ALLOC.MONTANT])
       )
sinon (
      histocumulsitu([V_ALLOC.BASEALLOCRED])
      +histocumulsitu([BC_REG_ALLOCRE.MONTANT])
      )

Après

si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
alors (
      declarer (TXSMIC)
      affecter (TXSMIC;
               si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2025))
               alors (3.5)
               sinon (3.3)
               )
      si (
         ([V_NEWAGCP.CUMREMUAF]<=(:TXSMIC*[V_NEWAGCP.CUMSMICPRO3112]))
         ou ([V_NEWAGCP.CUMREMUAF]<=0)
         ou ([V_NEWAGCP.CUMSMICPRO3112]<=0)
         )
      alors (
            histocumulsitu([V_ALLOC.BASEALLOC])*(-1)
            -histocumulsitu([BC_REG_ALLOC.MONTANT])
            )
      sinon (
            histocumulsitu([V_ALLOC.BASEALLOCRED])
            +histocumulsitu([BC_REG_ALLOCRE.MONTANT])
            )
      )
sinon (0
      )

ALLOCFAMREDUIT.TXEMP

Avant

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))

Après

si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<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)

ALLOCFAM.TXEMP

Avant

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)

Après

si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<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 (0)

ALLOCFAMCOMP.TXEMP

Avant

si (
    ([V_NEWAGCP.CUMREMUAF]>[V_NEWAGCP.TXSMICAF]*[V_NEWAGCP.CUMSMICPRO3112])
    et ([V_NEWAGCP.CUMREMUAF]>0)
    et ([V_NEWAGCP.CUMSMICPRO3112]>0)
    )
alors (0) sinon (1.80)

Après

si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<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 (1.80)
      )
sinon (0)

ALLOCFAMCOMPNEG.TXEMP

Avant

si (
   ([V_NEWAGCP.CUMREMUAF]>[V_NEWAGCP.TXSMICAF]*[V_NEWAGCP.CUMSMICPRO3112])
   et ([V_NEWAGCP.CUMREMUAF]>0)
   et ([V_NEWAGCP.CUMSMICPRO3112]>0)
   )
alors (0) sinon (-1.80)

Après

si (([PLAFONDSECU.NUMCAS]=2) et (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<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 (-1.80)
      )
sinon (0)

V_ALLOC

Toujours calculé à False

Mise à zéro de toutes les formules sauf BASEALLOC