admin/Customer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

YASK#90697 Locatie gegevens niet aanpassen.

Browse Source 
svn path=/Customer/trunk/; revision=71037
This commit is contained in:
Arthur Egberink
2025-11-24 10:40:58 +00:00
parent be4223e938
commit 8d51f7b3d7
1 changed files with 19 additions and 17 deletions
Download Patch File Download Diff File Expand all files Collapse all files

36
YASK/yask.sql
View File

@@ -4954,8 +4954,8 @@ SELECT mld_melding_key,
AND EXTRACT(YEAR FROM COALESCE(startverrekening, SYSDATE)) <= EXTRACT(YEAR FROM SYSDATE) + p.offset);
-- export / bevriezen contractmutatieopdrachten waarvan de status is afgerond (9)
CREATE OR REPLACE PROCEDURE yask_select_verw_contractmut_opdr (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2)
CREATE OR REPLACE PROCEDURE yask_select_verw_contractmut_opd (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2)
AS
CURSOR c
IS
@@ -4976,8 +4976,8 @@ END;
/
-- om de baseline te zetten.
CREATE OR REPLACE PROCEDURE yask_select_verw_contractmut_melding (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2)
CREATE OR REPLACE PROCEDURE yask_select_verw_contractmut_mld (p_applname IN VARCHAR2,
p_applrun IN VARCHAR2)
AS
CURSOR c
IS
@@ -7856,7 +7856,7 @@ BEGIN
END;
BEGIN
v_locatie_omschrijving := TRIM (SUBSTR (rec.gebouwnaam, INSTR (rec.gebouwnaam, ',') + 2));
v_locatie_omschrijving := SUBSTR(TRIM (SUBSTR (rec.gebouwnaam, INSTR (rec.gebouwnaam, ',') + 2)),1,30);
v_errorhint := 'Opzoeken van het district';
SELECT alg_onrgoed_key
@@ -7913,6 +7913,19 @@ BEGIN
v_district_key,
NULL);
-- We gaan de locatiegegevens alleen aanpassen als de locatie nieuw aangemaakt is. Dit kunnen we zien
-- omdat dan het adres nog niet ingevuld is.
v_errorhint := 'Aanpassen locatiegegevens';
UPDATE alg_locatie
SET alg_locatie_adres = rec.adres,
alg_locatie_postcode = rec.postcode,
alg_locatie_plaats = rec.plaats,
alg_locatie_post_adres = rec.adres,
alg_locatie_post_postcode = rec.postcode,
alg_locatie_post_plaats = rec.plaats
WHERE alg_locatie_key = v_locatie_key
AND alg_locatie_adres IS NULL;
v_errorhint := 'Aanmaken nieuw gebouw'; -- vul direct het dienstniveau van de rabobank in en zet de bezoekersregistratie uit.
INSERT INTO alg_gebouw (alg_locatie_key, alg_gebouw_code, alg_gebouw_naam, alg_srtgebouw_key, mld_dienstniveau_key, alg_gebouw_bez, prs_perslid_key_verantw)
VALUES (v_locatie_key, rec.prp_nr, rec.roepnaam, v_srtgebouw_key_new, v_dienstniveau_key, NULL, v_gebouwverantw_key)
@@ -7928,17 +7941,6 @@ BEGIN
VALUES (v_verdieping_key, 'Algemene ruimte', 606, '0.01');
END;
v_errorhint := 'Aanpassen locatiegegevens';
UPDATE alg_locatie
SET alg_locatie_omschrijving = v_locatie_omschrijving,
alg_locatie_adres = rec.adres,
alg_locatie_postcode = rec.postcode,
alg_locatie_plaats = rec.plaats,
alg_locatie_post_adres = rec.adres,
alg_locatie_post_postcode = rec.postcode,
alg_locatie_post_plaats = rec.plaats
WHERE alg_locatie_key = v_locatie_key;
v_errorhint := 'Aanpassen gebouwkenmerken';
updateFlex (v_gebouw_key, 'G', 'FASE', rec.fase, 1, 1);
updateFlex (v_gebouw_key, 'G', 'VERWINGANG', rec.verwachteingangdatum, 1, 0);
@@ -7968,7 +7970,7 @@ BEGIN
END IF;
EXCEPTION
WHEN NO_DATA_FOUND
WHEN OTHERS
THEN
oracle_err_num := SQLCODE;
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);