BAMG#85636 Uitbreiding BAMG#83299 met diverse verlengingstermijnen

svn path=/Database/trunk/; revision=68572

CNT/CNT_PAC.SRC

@@ -294,15 +294,19 @@ CREATE OR REPLACE PACKAGE BODY cnt AS
               INTO next_termijn
                  , next_einddatum
               FROM cnt_verlengschema 
+             WHERE cnt_verlengschema_einddatum =
+                   (SELECT MIN(cnt_verlengschema_einddatum)
+                      FROM cnt_verlengschema 
                      WHERE cnt_contract_key = cnt_verloopt.cnt_contract_key
-               AND cnt_verlengschema_einddatum = cnt_verloopt.dtnieuw;
-            --
+                       AND cnt_verlengschema_einddatum > cnt_verloopt.dtnieuw
+                   );
+
             UPDATE cnt_contract
                SET cnt_contract_verleng_termijn = next_termijn
-                 , cnt_contract_looptijd_tot = next_einddatum 
              WHERE cnt_contract_key = cnt_verloopt.cnt_contract_key;
          EXCEPTION
             WHEN NO_DATA_FOUND THEN NULL;
+               -- Laat laatste verlengtermijn staan als er geen volgende in het schema gevonden kan worden.
          END;
       END LOOP;
    END;