CVGZ#68953 Als er geen fiatteringsvrijstelling is ingevuld, is er dus geen vrijstelling van fiattering

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

MLD/MLD_PAC.SRC

@@ -1511,6 +1511,11 @@ CREATE OR REPLACE PACKAGE BODY mld AS
             RETURN;
       END;
 
+      IF l_mld_typeopdr_fvs IS NULL
+      THEN
+         l_mld_typeopdr_fvs := 0;
+      END IF;
+
       -- Moet er gefiatteerd worden?
       IF l_mld_stdmelding_autoorderamnt < l_mld_typeopdr_fvs
       THEN
@@ -1862,11 +1867,11 @@ CREATE OR REPLACE PACKAGE BODY mld AS
       IF l_mld_stdmelding_autoorderamnt > l_mld_disc_params_bestellimiet OR l_mld_stdmelding_autoorderamnt > l_mld_typeopdr_gvs
       THEN
         mld.setopdrachtstatus(l_new_opdr_key, 10, NULL);   -- Ter goedkeuring.
-      ELSIF l_for_approval AND l_prs_kostenplaats_fiat = 1 AND l_mld_stdmelding_autoorderamnt >= l_mld_typeopdr_fvs
+      ELSIF l_for_approval AND l_prs_kostenplaats_fiat = 1 AND l_mld_stdmelding_autoorderamnt > l_mld_typeopdr_fvs -- We moeten fiatteren en er is geen (of een te lage) fiatteringsvrijstelling
       THEN
            mld.setopdrachtstatus(l_new_opdr_key, 3, NULL);   -- Ter fiattering.
       ELSE
-        -- Hoge fiat vrijstelling, fiattering toch niet nodig.
+        -- Fiatteren niet nodig.
         mld.setopdrachtstatus(l_new_opdr_key, 5, NULL);   -- Uitgegeven.
         -- mld.trackuitvoerende(opdr_key, uitvoerende, opdr_status_key);
         SELECT CASE