Version 2

Correction de la fonction F_AGCPSMICMENS

Avant

si ((CONSTANTE(GENERAL.MOIS_PAYE)>=MACALCULER) et (MDEBUT<=MACALCULER))
alors (
        si (MACALCULER=CONSTANTE(GENERAL.MOIS_PAYE))
        alors (
               (
                HREMU
                /
               CONSTANTE(CONTRAT.HORAIRECOLLECTIF)*CONSTANTE(GENERAL.SMICMENS)
               )
               *
               HORBASE/1607
               )
        sinon (
               (
                 histocumulsitu(HREMU;MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE);MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE))
                 /
                 CONSTANTE(CONTRAT.HORAIRECOLLECTIF)*CONSTANTEHIS(GENERAL.SMICMENS;MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE))
               )
               *
               histocumulsitu(HORBASE;MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE);MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE))
               /
               (1607
                *
                si (OKREMUH=-1)
                alors (1)
                sinon (
                       histocumulsitu(OKREMUH;MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE);MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE))
                      )
                )
              )
       )
sinon (0)

Après

si ((CONSTANTE(GENERAL.MOIS_PAYE)>=MACALCULER) et (MDEBUT<=MACALCULER))
alors (
        si (MACALCULER=CONSTANTE(GENERAL.MOIS_PAYE))
        alors (
               (
                HREMU
                /
               CONSTANTE(CONTRAT.HORAIRECOLLECTIF)*CONSTANTE(GENERAL.SMICMENS)
               )
               *
               HORBASE/1607
               )
        sinon (
        declarer(MT)
        Affecter(MT;
                   (
                     histocumulsitu(HREMU;MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE);MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE))
                     /
                     CONSTANTE(CONTRAT.HORAIRECOLLECTIF)*CONSTANTEHIS(GENERAL.SMICMENS;MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE))
                   )
                   *
                   histocumulsitu(HORBASE;MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE);MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE))
                 )
               :MT
               /
               (1607
                *
                si (OKREMUH=-1)
                alors (1)
                sinon (
                       histocumulsitu(OKREMUH;MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE);MACALCULER;CONSTANTE(GENERAL.ANNEE_PAYE))
                      )
                )
              )
       )
sinon (0)