MARX#89967 De contactgegevens (naam, telnrs, mailadressen) van de aanvrager van de melding overal onderdrukken

svn path=/Mareon/trunk/; revision=69820
This commit is contained in:
Marcel Bourseau
2025-07-18 18:26:37 +00:00
parent 9790b9cfa0
commit e5092a9571
2 changed files with 119 additions and 61 deletions

View File

@@ -46,6 +46,19 @@ SELECT 75, 5, 5, 'O', 1, 1, 54 FROM DUAL;
INSERT INTO mld_kenmerk (mld_kenmerk_key, mld_srtkenmerk_key, mld_typeopdr_key, mld_kenmerk_niveau, mld_kenmerk_rolcode, mld_kenmerk_toonbaar, mld_kenmerk_volgnummer)
SELECT 76, 18, 5, 'O', 1, 1, 56 FROM DUAL;
-- MARX#89967 De contactgegevens (naam, telnrs, mailadressen) van de aanvrager van de melding overal onderdrukken
INSERT INTO prs_kenmerk (prs_kenmerk_key, prs_kenmerk_niveau, prs_kenmerk_volgnr, prs_kenmerk_rolcode, prs_kenmerk_omschrijving, prs_kenmerk_kenmerktype, prs_kenmerk_lengte, prs_kenmerk_nmin, prs_kenmerk_nmax, prs_kenmerk_hint)
SELECT 77, 'B', 10, 1, 'Verwerken meldergegevens','N', 3, 0, 2, 'Uitleg: 0 of leeg = persoonsgegevens van melder (naam, telnr, mail) worden overal getoond, dus in Mareon en op de opdrachtbon, 1 = worden niet in Mareon overgenomen, 2= worden wel in Mareon overgenomen maar komen niet op de bon terecht'
FROM DUAL;
-- Kleine correctie (en losstaand van dit ticket): we halen $ van gelijksoortig kenmerk (key 11) van de omschrijving '$Verwerken eenheidsprijzen' eraf, en stellen minimum (0) en maximum (2) in.
UPDATE prs_kenmerk
SET prs_kenmerk_omschrijving = 'Verwerken eenheidsprijzen',
prs_kenmerk_nmin = 0,
prs_kenmerk_nmax = 2
WHERE prs_kenmerk_key = 13;
------ payload end ------

View File

@@ -1288,6 +1288,18 @@ SET DEFINE OFF
w_prs_perslid_apikey
FROM mar_v_woco_x_lev;
--MARX#89967 De contactgegevens (naam, telnrs, mailadressen) van de aanvrager van de melding overal onderdrukken
CREATE OR REPLACE VIEW mar_v_bedrijf_verwerkmelder
(
prs_bedrijf_key,
prs_bedrijf_naam,
prs_bedrijf_verwerkmelder
)
AS
SELECT b.prs_bedrijf_key, b.prs_bedrijf_naam, COALESCE (fac.safe_to_number (kl.prs_kenmerklink_waarde), 0)
FROM prs_bedrijf b, prs_kenmerklink kl
WHERE kl.prs_kenmerk_key(+) = 77 AND kl.prs_link_key(+) = b.prs_bedrijf_key AND kl.prs_kenmerklink_niveau(+) = 'B';
CREATE OR REPLACE VIEW mar_v_bedrijf_verwerkprijzen
(
prs_bedrijf_key,
@@ -2749,6 +2761,7 @@ SET DEFINE OFF
v_prs_perslid_key NUMBER (10);
v_woco_prs_bedrijf_key NUMBER (10);
v_prs_bedrijf_verwerkmelder NUMBER (10);
v_prs_bedrijf_verwerkprijzen NUMBER (10);
@@ -3066,6 +3079,16 @@ SET DEFINE OFF
FROM mar_v_bedrijf_push_NQ
WHERE prs_bedrijf_key = v_woco_prs_bedrijf_key;
--MARX#89967 De contactgegevens (naam, telnrs, mailadressen) van de aanvrager van de melding overal onderdrukken
v_errorhint :=
'Setting Verwerken meldergegevens van opdrachtgever van import '
|| p_import_key
|| ' niet gevonden, er is geen melding/opdracht aangemaakt';
SELECT prs_bedrijf_verwerkmelder
INTO v_prs_bedrijf_verwerkmelder
FROM mar_v_bedrijf_verwerkmelder
WHERE prs_bedrijf_key = v_woco_prs_bedrijf_key;
v_errorhint :=
'Setting $Verwerken eenheidsprijzen van opdrachtgever van import '
|| p_import_key
@@ -3172,18 +3195,62 @@ SET DEFINE OFF
v_huisnr := rec_ax.mld_melding_cust_huisnr;
v_huisnr_toev := rec_ax.mld_melding_cust_huisnr2;
mar_get_straat_huinrs (v_straatnaam, v_huisnr, v_huisnr_toev);
v_errorhint :=
'Fout bij check verschil van melder bij opdracht(key)' || p_mld_opdr_key || '(' || v_mld_opdr_id || ')';
v_count_differences :=
v_count_differences
+ mar_diff_varchar (v_mld_melding_huurder,
rec_ax.mld_melding_cust_name,
p_mld_opdr_key,
v_prs_perslid_key,
'Contactpersoon');
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_name, v_mld_melding_key, rec_ax.mld_melding_cust_name);
IF v_prs_bedrijf_verwerkmelder <> 1
THEN
v_errorhint :=
'Fout bij check verschil van melder bij opdracht(key)' || p_mld_opdr_key || '(' || v_mld_opdr_id || ')';
v_count_differences :=
v_count_differences
+ mar_diff_varchar (v_mld_melding_huurder,
rec_ax.mld_melding_cust_name,
p_mld_opdr_key,
v_prs_perslid_key,
'Contactpersoon');
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_name, v_mld_melding_key, rec_ax.mld_melding_cust_name);
v_errorhint :=
'Fout bij check verschil van telefoonnr bij opdracht(key)'
|| p_mld_opdr_key
|| '('
|| v_mld_opdr_id
|| ')';
v_count_differences :=
v_count_differences
+ mar_diff_varchar (v_mld_melding_telefoonnr,
rec_ax.mld_melding_cust_telefoonnr,
p_mld_opdr_key,
v_prs_perslid_key,
'Telefoonnr');
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_telefoonnr,
v_mld_melding_key,
rec_ax.mld_melding_cust_telefoonnr);
v_errorhint :=
'Fout bij check verschil van mobielnr bij opdracht(key)' || p_mld_opdr_key || '(' || v_mld_opdr_id || ')';
v_count_differences :=
v_count_differences
+ mar_diff_varchar (v_mld_melding_mobiel,
rec_ax.mld_melding_cust_mobielnr,
p_mld_opdr_key,
v_prs_perslid_key,
'Mobielnr');
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_mobielnr, v_mld_melding_key, rec_ax.mld_melding_cust_mobielnr);
v_errorhint :=
'Fout bij check verschil van e-mail bij opdracht(key)' || p_mld_opdr_key || '(' || v_mld_opdr_id || ')';
v_count_differences :=
v_count_differences
+ mar_diff_varchar (v_mld_melding_email,
rec_ax.mld_melding_cust_email,
p_mld_opdr_key,
v_prs_perslid_key,
'E-mail');
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_email, v_mld_melding_key, rec_ax.mld_melding_cust_email);
END IF;
v_errorhint :=
'Fout bij check verschil van straat bij opdracht(key)' || p_mld_opdr_key || '(' || v_mld_opdr_id || ')';
v_count_differences :=
@@ -3247,44 +3314,7 @@ SET DEFINE OFF
'Plaats');
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_plaats, v_mld_melding_key, rec_ax.mld_melding_cust_plaats);
v_errorhint :=
'Fout bij check verschil van telefoonnr bij opdracht(key)'
|| p_mld_opdr_key
|| '('
|| v_mld_opdr_id
|| ')';
v_count_differences :=
v_count_differences
+ mar_diff_varchar (v_mld_melding_telefoonnr,
rec_ax.mld_melding_cust_telefoonnr,
p_mld_opdr_key,
v_prs_perslid_key,
'Telefoonnr');
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_telefoonnr,
v_mld_melding_key,
rec_ax.mld_melding_cust_telefoonnr);
v_errorhint :=
'Fout bij check verschil van mobielnr bij opdracht(key)' || p_mld_opdr_key || '(' || v_mld_opdr_id || ')';
v_count_differences :=
v_count_differences
+ mar_diff_varchar (v_mld_melding_mobiel,
rec_ax.mld_melding_cust_mobielnr,
p_mld_opdr_key,
v_prs_perslid_key,
'Mobielnr');
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_mobielnr, v_mld_melding_key, rec_ax.mld_melding_cust_mobielnr);
v_errorhint :=
'Fout bij check verschil van e-mail bij opdracht(key)' || p_mld_opdr_key || '(' || v_mld_opdr_id || ')';
v_count_differences :=
v_count_differences
+ mar_diff_varchar (v_mld_melding_email,
rec_ax.mld_melding_cust_email,
p_mld_opdr_key,
v_prs_perslid_key,
'E-mail');
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_email, v_mld_melding_key, rec_ax.mld_melding_cust_email);
v_errorhint :=
'Fout bij check verschil van locatieaanduiding bij opdracht(key)' || p_mld_opdr_key || '(' || v_mld_opdr_id || ')';
@@ -6196,6 +6226,7 @@ SET DEFINE OFF
v_prs_perslid_key NUMBER (10);
v_lev_prs_bedrijf_key NUMBER (10);
v_woco_prs_bedrijf_key NUMBER (10);
v_prs_bedrijf_verwerkmelder NUMBER (10);
v_prs_bedrijf_verwerkprijzen NUMBER (10);
v_mld_opdr_updates_allowed NUMBER (10);
@@ -6457,11 +6488,21 @@ SET DEFINE OFF
FROM mar_v_woco_perslid
WHERE prs_perslid_key = v_prs_perslid_key;
--MARX#89967 De contactgegevens (naam, telnrs, mailadressen) van de aanvrager van de melding overal onderdrukken
v_errorhint :=
'Setting $Verwerken eenheidsprijzen van opdrachtgever van import '
'Setting Verwerken meldergegevens van opdrachtgever van import '
|| p_import_key
|| ' niet gevonden, er is geen melding/opdracht aangemaakt';
SELECT prs_bedrijf_verwerkmelder
INTO v_prs_bedrijf_verwerkmelder
FROM mar_v_bedrijf_verwerkmelder
WHERE prs_bedrijf_key = v_woco_prs_bedrijf_key;
v_errorhint :=
'Setting Verwerken eenheidsprijzen van opdrachtgever van import '
|| p_import_key
|| ' niet gevonden, er is geen melding/opdracht aangemaakt';
SELECT prs_bedrijf_verwerkprijzen
INTO v_prs_bedrijf_verwerkprijzen
FROM mar_v_bedrijf_verwerkprijzen
@@ -6607,9 +6648,20 @@ SET DEFINE OFF
v_huisnr := rec_ax.mld_melding_cust_huisnr;
v_huisnr_toev := rec_ax.mld_melding_cust_huisnr2;
mar_get_straat_huinrs (v_straatnaam, v_huisnr, v_huisnr_toev);
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_name, v_mld_melding_key, rec_ax.mld_melding_cust_name);
--MARX#89967 De contactgegevens (naam, telnrs, mailadressen) van de aanvrager van de melding overal onderdrukken
IF v_prs_bedrijf_verwerkmelder <> 1
THEN
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_name, v_mld_melding_key, rec_ax.mld_melding_cust_name);
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_telefoonnr,
v_mld_melding_key,
rec_ax.mld_melding_cust_telefoonnr);
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_mobielnr,
v_mld_melding_key,
rec_ax.mld_melding_cust_mobielnr);
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_email, v_mld_melding_key, rec_ax.mld_melding_cust_email);
END IF;
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_straatnaam, v_mld_melding_key, v_straatnaam);
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_huisnr, v_mld_melding_key, v_huisnr);
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_huisnr_toev, v_mld_melding_key, v_huisnr_toev);
@@ -6617,13 +6669,6 @@ SET DEFINE OFF
v_mld_melding_key,
rec_ax.mld_melding_cust_postcode);
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_plaats, v_mld_melding_key, rec_ax.mld_melding_cust_plaats);
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_telefoonnr,
v_mld_melding_key,
rec_ax.mld_melding_cust_telefoonnr);
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_mobielnr,
v_mld_melding_key,
rec_ax.mld_melding_cust_mobielnr);
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_email, v_mld_melding_key, rec_ax.mld_melding_cust_email);
mld.upsertmeldingkenmerk (c_kenmerk_key_cust_object_oms,
v_mld_melding_key,
rec_ax.mld_melding_cust_object_omschr);