KFNS#37965 Strukton-koppeling/Afhandeltekst niet meer naar melding

svn path=/Customer/trunk/; revision=31717

KFHT/kfht.sql

@@ -1,9 +1,22 @@
--- Script containing customer specific db-configuration for KFHT.
--- (c) 2014 SG|facilitor bv
 --
--- Support: +31 53 4800700
-set echo on
-spool xkfht.lst
+-- $Id$
+--
+-- Script containing customer specific db-configuration for KFHT.
+
+DEFINE thisfile = 'KFHT.SQL'
+DEFINE dbuser   = '^KFHT'
+DEFINE custid   = 'KFHT'
+
+SET ECHO ON
+SET DEFINE ON
+COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
+WHENEVER SQLERROR EXIT;
+SELECT adm.scriptspoolfile('&dbuser', '&thisfile') AS fcltlogfile FROM DUAL;
+WHENEVER SQLERROR CONTINUE;
+SPOOL &fcltlogfile
+SET DEFINE OFF
+
+------ payload begin ------
 
 -- Import vanuit Strukton
 /* Formatted on 22-5-2015 11:52:44 (QP5 v5.136.908.31019) */
@@ -404,10 +417,11 @@ BEGIN
                   MLD.setopdrachtstatus (v_opdr_key, 1, c_user_key); -- Strukton
                   MLD.updatemeldingstatusAV (v_mld_key, 0, c_user_key, 0);
                END IF;
--- KFNS#37965: Niet meer melding bijwerken (en afmelden was ook al niet meer)!
-/*
+
                IF rec.status = 6 AND v_opdr_status <> 6
                THEN
+-- KFNS#37965: Niet meer melding bijwerken (en afmelden was ook al niet meer)!
+/*
                   v_errormsg := 'Fout bijwerken Opmerking (melding).';
 
                   UPDATE mld_melding m
@@ -452,11 +466,10 @@ BEGIN
                                  AND m.mld_melding_status IN (4, 7))
                          niet_opgelost
                    WHERE aanw_opdr > 0 AND open_opdr = 0;
-
+*/
                   -- Sinds AADO#30922 wordt de melding niet meer automatisch afgemeld.
                   MLD.updatemeldingstatusAV (v_mld_key, 0, c_user_key, 0);
                END IF;
-*/
             END IF;
          END IF;
 
@@ -902,9 +915,14 @@ BEGIN
 END;
 /
 
-BEGIN adm.systrackscriptId('$Id$', 0); END;
+------ payload end   ------
+
+SET DEFINE OFF
+BEGIN adm.systrackscriptId ('$Id$', 0); END;
 /
-BEGIN fac.registercustversion('KFHT', 5); END;
-/
-commit;
-spool off
+
+COMMIT;
+SET ECHO OFF
+SPOOL OFF
+SET DEFINE ON
+PROMPT Logfile of this upgrade is: &fcltlogfile