VNOG#86260 -- Verzenddatum GMO via eigen tabel

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

VNOG/vnog.sql

@@ -1444,6 +1444,7 @@ AS
         oracle_err_num   NUMBER;
         oracle_err_mes   VARCHAR2 (200);
         v_aanduiding     VARCHAR2 (200);
+        v_verzenddatum   VARCHAR2 (20);
 
             CURSOR mld IS
           SELECT MAX (i.ins_deel_key), p.prs_perslid_key
@@ -1475,7 +1476,15 @@ AS
                    AND m.mld_melding_status NOT IN (5, 6)                  -- Nog niet afgemeld of archief
             ;
        BEGIN
-          IF TO_CHAR (sysdate, 'DD-MM') = '01-08'
+       
+         SELECT fac_usrdata_omschr
+           INTO v_verzenddatum
+           FROM fac_usrdata
+          WHERE   fac_usrtab_key = 201  -- Instellingen
+              AND fac_usrdata_code = 'GMO'
+              AND fac_usrdata_verwijder IS NULL;
+       
+          IF TO_CHAR (sysdate, 'DD-MM') = v_verzenddatum
            THEN
            FOR rec IN mld
            LOOP