From 631fba6022e7e7247234a7dc1b7e0e089206fa2e Mon Sep 17 00:00:00 2001
From: Arthur Egberink <arthur.egberink@aareon.nl>
Date: Wed, 16 Jul 2025 08:32:59 +0000
Subject: [PATCH] YASK#89896 Kolom aanvrager toegevoegd aan de import en
 doorbelastingsrapport.

svn path=/Customer/trunk/; revision=69787
---
 YASK/yask.sql | 19 +++++++++++++++++--
 1 file changed, 17 insertions(+), 2 deletions(-)

diff --git a/YASK/yask.sql b/YASK/yask.sql
index b717c2143..307df43e1 100644
--- a/YASK/yask.sql
+++ b/YASK/yask.sql
@@ -1780,6 +1780,7 @@ SELECT rrr.res_reservering_key || '/' || rrr.res_rsv_ruimte_volgnr    reserverin
        TRUNC (rrr.res_rsv_ruimte_van)                                 reserveringdatum,
        flx.getflex ('RES', 401, rrr.res_rsv_ruimte_key)               resnummer,
        flx.getflex ('RES', 641, rrr.res_rsv_ruimte_key)               contactpersoon,
+       flx.getflex ('RES', 681, rrr.res_rsv_ruimte_key)               aanvrager,
        k.prs_kostenplaats_nr                                          kostenplaatsnr,
        k.prs_kostenplaats_omschrijving                                kostenplaatsoms,
        ks.prs_kostensoort_oms,
@@ -5411,6 +5412,7 @@ AS
     v_gebouw_key                   NUMBER(10);
     v_leverancier                  VARCHAR2 (1000);
     v_contactpersoon               VARCHAR2 (1000);
+    v_aanvrager                    VARCHAR2 (1000);
 BEGIN
    -- Eerst opruiming
 
@@ -5437,6 +5439,7 @@ BEGIN
          fac.imp_getfield (v_newline, v_fielddelimitor, v_gebouw_code);
          fac.imp_getfield (v_newline, v_fielddelimitor, v_leverancier);
          fac.imp_getfield (v_newline, v_fielddelimitor, v_contactpersoon);
+         fac.imp_getfield (v_newline, v_fielddelimitor, v_aanvrager);
 
          -- voeg nieuwe records toe
          -- en wijzig bestaande records
@@ -5534,7 +5537,8 @@ BEGIN
                                                 bedrag_nul,
                                                 gebouw_key,
                                                 leverancier,
-                                                contactpersoon)
+                                                contactpersoon,
+                                                aanvrager)
                   VALUES (v_startdatum,
                           v_einddatum,
                           v_id,
@@ -5546,7 +5550,8 @@ BEGIN
                           v_bedrag_nul,
                           v_gebouw_key,
                           v_leverancier,
-                          v_contactpersoon);
+                          v_contactpersoon,
+                          v_aanvrager);
          END IF;
       END;
    END LOOP;
@@ -5857,6 +5862,16 @@ BEGIN
       
       v_errorhint := 'Zet het kenmerk CONTACTPERSOON';
       FLX.setflex ('RES', v_kenmerk_key, v_rsv_ruimte_key, NULL, rec.contactpersoon);
+
+      -- Kenmerk toevoegen met contactpersoon
+      v_errorhint := 'Zoek het kenmerk AANVRAGER';
+      SELECT res_kenmerk_key
+        INTO v_kenmerk_key
+        FROM res_kenmerk
+       WHERE res_kenmerk_code = 'AANVRAGER';
+      
+      v_errorhint := 'Zet het kenmerk AANVRAGER';
+      FLX.setflex ('RES', v_kenmerk_key, v_rsv_ruimte_key, NULL, rec.aanvrager);
       
       -- Nu nog de catering toevoegen
       v_errorhint := 'Voeg de catering toe';