Version 3

Anomalie calcul allocation familiale pour ZRR

ALLOCFAM.TXEMP

Avant

declarer (MTAV2025)
affecter (MTAV2025;
               si (
                  (([V_NEWAGCP.CUMREMUAF]) >  ([V_NEWAGCP.TXSMICMAL]*[V_NEWAGCP.CUMSMICPRO3112]))
                   et ([V_NEWAGCP.CUMREMUAF]>0)
                   et ([V_NEWAGCP.CUMSMICPRO3112]>0)
                  )
               alors (LISTEGEN(TX_ALLOCF;0001))
               sinon (0)
         )
si (CONSTANTE(CONTRAT.TYPESALARIE)=5)
alors (LISTEGEN(TX_ALLOCF;0001))
sinon (
      si ([AGCPEXO.BASE]=1)
      alors (
            :MTAV2025
            )
      sinon (
            si (([PLAFONDSECU.NUMCAS]=2) et  (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
            alors ( :MTAV2025)
            sinon (LISTEGEN(TX_ALLOCF;0001))
            )
      )

Après

declarer (MTAV2025)
affecter (MTAV2025;
               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)
         )
si (CONSTANTE(CONTRAT.TYPESALARIE)=5)
alors (LISTEGEN(TX_ALLOCF;0001))
sinon (
      si ([AGCPEXO.BASE]=1)
      alors (
            :MTAV2025
            )
      sinon (
            si (([PLAFONDSECU.NUMCAS]=2) et  (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
            alors ( :MTAV2025)
            sinon (LISTEGEN(TX_ALLOCF;0001))
            )
      )

ALLOCFAMREDUIT.TXEMP

Avant

declarer (MTAV2025)
affecter (MTAV2025;
               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))
         )
si ([AGCPEXO.BASE]=1)
alors (
      si (CONSTANTE(CONTRAT.TYPESALARIE)=5)
      alors (
            LISTEGEN(TX_ALLOCF;0002)
            )
      sinon (
            :MTAV2025
            )
      )
sinon (
      si (([PLAFONDSECU.NUMCAS]=2) et  (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
      alors ( :MTAV2025)
      sinon (0)
      )

Après

declarer (MTAV2025)
affecter (MTAV2025;
               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))
         )
si ([AGCPEXO.BASE]=1)
alors (
      si (CONSTANTE(CONTRAT.TYPESALARIE)=5)
      alors (
            LISTEGEN(TX_ALLOCF;0002)
            )
      sinon (
            :MTAV2025
            )
      )
sinon (
      si (([PLAFONDSECU.NUMCAS]=2) et  (CONSTANTE(CONTRAT.ANNEE_CLOTURE)<2026))
      alors ( :MTAV2025)
      sinon (0)
      )