diff --git a/VOLK/volk.sql b/VOLK/volk.sql index 11d30dd71..26e9a3ec5 100644 --- a/VOLK/volk.sql +++ b/VOLK/volk.sql @@ -1701,6 +1701,48 @@ BEGIN RETURNING mld_melding_key INTO v_newkey; + -- Find the lowest volgnummer of the Folder-flexfield. + SELECT MIN (k1.mld_kenmerk_key) + INTO v_folder_kkey + FROM mld_stdmelding sm1, + ins_tab_discipline td1, + mld_kenmerk k1, + mld_srtkenmerk sk1, + mld_melding m + WHERE m.mld_stdmelding_key = sm1.mld_stdmelding_key + AND m.mld_melding_key = v_newkey + AND sm1.mld_ins_discipline_key = td1.ins_discipline_key + AND k1.mld_kenmerk_verwijder IS NULL + AND k1.mld_srtkenmerk_key = sk1.mld_srtkenmerk_key + AND sk1.mld_srtkenmerk_kenmerktype = 'M' + AND ( ( k1.mld_stdmelding_key = + sm1.mld_stdmelding_key + AND k1.mld_kenmerk_niveau = 'S') + OR ( k1.mld_stdmelding_key = + td1.ins_discipline_key + AND k1.mld_kenmerk_niveau = 'D') + OR ( k1.mld_stdmelding_key = + td1.ins_srtdiscipline_key + AND k1.mld_kenmerk_niveau = 'T') + OR (k1.mld_kenmerk_niveau = 'A')); + + IF v_folder_kkey IS NOT NULL + THEN + INSERT INTO fac_result (fac_result_sessionid, + fac_result_naam, + fac_result_waarde) + VALUES ( + psessionid, + 'kenmerkpath', + 'MLD\M' + || TO_CHAR (TRUNC (v_newkey / 1000), 'FM0000') + || '___\M' + || v_newkey + || '\' + || v_folder_kkey + || '\'); + END IF; + INSERT INTO fac_result (fac_result_sessionid, fac_result_naam, fac_result_waarde)