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