AASA#55601: Aangepaste opdracht niet meer te vinden in overzicht fiatteringsverzoeken.

svn path=/Website/branches/v2018.2/; revision=40126

APPL/MLD/mld.inc

@@ -2423,7 +2423,14 @@ mld = {setmeldingstatus:
                     + "     , (SELECT COALESCE(ks.prs_kostensoort_btw, 0)"
                     + "          FROM prs_kostensoort ks"
                     + "         WHERE ks.prs_kostensoort_key = COALESCE(o.prs_kostensoort_key, sm.prs_kostensoort_key, d.prs_kostensoort_key)) inclBTW"
-                    + "     , fac.gettrackinguserkey('ORDFOK', o.mld_opdr_key) mld_opdr_fiat_user"
+                    + "   , CASE"
+                      + "   WHEN mld_opdr_fiatbedrag IS NULL"
+                      // Het veld mld_opdr.mld_opdr_fiatbedrag wordt leeg gemaakt als de setting "mld_opdr_refiat_preference" op 1 staat
+                      // en de goedkeurder heeft aangegeven dat de opdracht opnieuw als een nieuwe opdracht moet worden gefiatteerd.
+                      // Er is dan wel "ORDFOK" tracking aanwezig terwijl de opdracht als nieuw behandeld moet worden (GEEN mld_opdr_fiat_user).
+                      + "   THEN null"
+                      + "   ELSE fac.gettrackinguserkey('ORDFOK', o.mld_opdr_key)"
+                      + "   END mld_opdr_fiat_user"
                     + "     , o.mld_opdr_approved"
                     + "     , o.mld_opdr_approved_refiat"
                     + "     , fac.gettrackingdate('ORDFIA', o.mld_opdr_key) trackdateFIA"

APPL/MLD/opdr_goedkeur.asp

@@ -218,6 +218,14 @@ for (var i = 0; i < ingesloten.length; i++)
         else
         {
           nextstatus = 3; // Ter fiattering(3).
+
+          // Herfiattering waarbij de goedkeurder heeft aangegeven dat de opdracht opnieuw gefiatteerd dient te worden (Setting mld_opdr_refiat_preference = 1).
+          // Fiattering opnieuw ingaan. Het fiatbedrag leeg maken. Opdracht als nieuw fiatteren.
+          var sql_update = "UPDATE mld_opdr"
+                         + "   SET mld_opdr_fiatbedrag = null"
+                         + " WHERE mld_opdr_key = " + opdr_key;
+          Oracle.Execute(sql_update);
+
           // Notificatie aan de fiatteur.
           result.message += "\n" + mld.sendNeedApprovalNotification(opdr_key, approver_key);
         }