From 616b7e0b51bf1e6e719923986d6160bb6cacb01e Mon Sep 17 00:00:00 2001
From: Erik Groener <erik.groener@aareon.nl>
Date: Tue, 1 Dec 2020 14:23:35 +0000
Subject: [PATCH] UWVA#63361 FIP: Afmeldteksten importbestand

svn path=/Database/trunk/; revision=49029
---
 FAC/FAC_PACF.SRC |  4 ++--
 MLD/MLD_VIE.SRC  | 52 +++++++++++++++++++++++++++---------------------
 2 files changed, 31 insertions(+), 25 deletions(-)

diff --git a/FAC/FAC_PACF.SRC b/FAC/FAC_PACF.SRC
index 11144cac..913d73cc 100644
--- a/FAC/FAC_PACF.SRC
+++ b/FAC/FAC_PACF.SRC
@@ -7057,8 +7057,8 @@ BEGIN
          THEN
             IF     UPPER (v_afmeldtekst_naam) = 'AFMELDTEKSTNAAM'
                AND UPPER (v_afmeldtekst_oms) = 'AFMELDTEKSTOMSCHRIJVING'
-               AND UPPER (v_discipline_key) = 'DISCIPLINE_KEY'
-               AND UPPER (v_stdmelding_key) = 'STDMELDING_KEY'
+               AND UPPER (v_discipline_key) = 'DISCIPLINE KEY'
+               AND UPPER (v_stdmelding_key) = 'STDMELDING KEY'
                AND UPPER (v_afmeldtekst_usefor) = 'AFMELDTEKSTUSEFOR'
             THEN
                header_is_valid := 1;
diff --git a/MLD/MLD_VIE.SRC b/MLD/MLD_VIE.SRC
index de371af4..06d423ae 100644
--- a/MLD/MLD_VIE.SRC
+++ b/MLD/MLD_VIE.SRC
@@ -669,42 +669,48 @@ CREATE_VIEW(mld_v_rap_expimp_afmtxt, 0)
    fclt_x_discipline_key,
    fclt_x_stdmelding_key,
    discipline_key,
-   stdmelding_key
+   stdmelding_key,
+   afmeldtekstusefor
 )
 AS
-   SELECT t.mld_afmeldtekst_naam,
-          t.mld_afmeldtekst_omschrijving,
-             md.ins_discipline_omschrijving
+   SELECT t.mld_afmeldtekst_naam
+        , t.mld_afmeldtekst_omschrijving
+        , md.ins_discipline_omschrijving
           || ' [key='
           || TO_CHAR (sm.mld_ins_discipline_key)
-          || ']',
-             sm.mld_stdmelding_omschrijving
+          || ']'
+        , sm.mld_stdmelding_omschrijving
           || ' [key='
           || TO_CHAR (sm.mld_stdmelding_key)
-          || ']',
-          sm.mld_ins_discipline_key,
-          t.mld_stdmelding_key
-     FROM mld_afmeldtekst t, mld_stdmelding sm, mld_discipline md
-    WHERE     t.mld_stdmelding_key IS NOT NULL
-          AND t.mld_stdmelding_key = sm.mld_stdmelding_key
-          AND sm.mld_ins_discipline_key = md.ins_discipline_key
-   UNION ALL
-   SELECT t.mld_afmeldtekst_naam,
-          t.mld_afmeldtekst_omschrijving,
-          DECODE (
+          || ']'
+        , sm.mld_ins_discipline_key
+        , t.mld_stdmelding_key
+        , mld_afmeldtekst_usefor
+     FROM mld_afmeldtekst t
+        , mld_stdmelding sm
+        , mld_discipline md
+    WHERE t.mld_stdmelding_key IS NOT NULL
+      AND t.mld_stdmelding_key = sm.mld_stdmelding_key
+      AND sm.mld_ins_discipline_key = md.ins_discipline_key
+   UNION
+   SELECT t.mld_afmeldtekst_naam
+        , t.mld_afmeldtekst_omschrijving
+        , DECODE (
              md.ins_discipline_key,
              NULL,
              NULL,
                 md.ins_discipline_omschrijving
              || ' [key='
              || TO_CHAR (md.ins_discipline_key)
-             || ']'),
-          NULL,
-          md.ins_discipline_key,
-          NULL
-     FROM mld_afmeldtekst t, mld_discipline md
+             || ']')
+        , NULL
+        , md.ins_discipline_key
+        , NULL
+        , mld_afmeldtekst_usefor
+     FROM mld_afmeldtekst t
+        , mld_discipline md
     WHERE t.mld_stdmelding_key IS NULL
-          AND t.mld_ins_discipline_key = md.ins_discipline_key(+);
+      AND t.mld_ins_discipline_key = md.ins_discipline_key(+);
 
 ---- KTO views + rapportages
 CREATE_VIEW(mld_v_kto_vragen, 0)