From b87ee454dc08ba1608e569a5bdeb86522b66eb3a Mon Sep 17 00:00:00 2001
From: Arthur Egberink <arthur.egberink@aareon.nl>
Date: Fri, 22 Nov 2024 14:49:16 +0000
Subject: [PATCH] YAXX#83574 Bij het verwerken van de factuur worden nu de
 opdrachten op afgerond gezet.

svn path=/Customer/trunk/; revision=67158
---
 VBXX/vbxx.sql | 25 ++++++++++++++++++++++++-
 1 file changed, 24 insertions(+), 1 deletion(-)

diff --git a/VBXX/vbxx.sql b/VBXX/vbxx.sql
index 32d7fc60d..f552c2972 100644
--- a/VBXX/vbxx.sql
+++ b/VBXX/vbxx.sql
@@ -4225,7 +4225,7 @@ CREATE OR REPLACE PROCEDURE vbxx_select_verwerk_exact (
 AS
    CURSOR c_fact
    IS
-     SELECT DISTINCT f.fin_factuur_key
+     SELECT DISTINCT f.fin_factuur_key, fg.mld_opdr_key
        FROM vbxx_exp_factuur f,
             vbxx_v_factuur_gegevens fg
       WHERE     f.fin_factuur_key = fg.fin_factuur_key
@@ -4241,6 +4241,7 @@ AS
    v_bestand        VARCHAR2(12);
    v_logdate        DATE;
    v_volgnr         NUMBER;
+   v_statusopdr_key NUMBER;
 BEGIN
    v_errormsg := 'Geen akties';
    v_aanvrager := 3; -- Facilitor
@@ -4261,6 +4262,28 @@ BEGIN
 
          fac.trackaction ('FINVER', rec1.fin_factuur_key, v_aanvrager, NULL, NULL);
 
+         -- als opdrachtkey is not null
+         IF rec1.mld_opdr_key IS NOT NULL
+         THEN
+            SELECT mld_statusopdr_key
+              INTO v_statusopdr_key
+              FROM mld_opdr
+             WHERE mld_opdr_key = rec1.mld_opdr_key;
+            
+            --als status != afgemeld (6) en afgerond (9)
+            IF v_statusopdr_key <> 6 AND v_statusopdr_key <> 9
+            THEN
+               -- set status op geleverd
+               MLD.setopdrachtstatus (rec1.mld_opdr_key, 6, NULL);
+            END IF;
+            -- als status != afgerond (9)
+            IF v_statusopdr_key <> 9
+            THEN
+               -- set status op 9
+               MLD.setopdrachtstatus (rec1.mld_opdr_key, 9, NULL);
+            END IF;
+         END IF;
+ 
          INSERT INTO fac_rapport (fac_rapport_node,
                                   fac_rapport_volgnr,
                                   fac_rapport_regel)