PIVP#81275 -- Exact Ruimtestaat gebouwen/ruimte import aangepast

svn path=/Customer/trunk/; revision=62779
This commit is contained in:
Norbert Wassink
2023-11-30 10:21:33 +00:00
parent d20afd43c6
commit ad2207d368

View File

@@ -2304,6 +2304,7 @@ AS
v_count_import NUMBER;
-- De importvelden:
v_huurder_key NUMBER;
v_huurder_code VARCHAR2(100);
v_huurder_codeoud VARCHAR2(100);
v_huurder_naam VARCHAR2(100);
@@ -2335,10 +2336,10 @@ BEGIN
DELETE FROM fac_imp_onrgoed2;
-- SELECT alg_kenmerk_key INTO v_huurder_kenm_key FROM alg_kenmerk WHERE alg_kenmerk_upper='HUURDER';
SELECT alg_kenmerk_key INTO v_huurder_kenm_key FROM alg_kenmerk WHERE alg_kenmerk_upper='HUURDER' AND alg_kenmerk_verwijder IS NULL;
-- SELECT alg_kenmerk_key INTO v_vvo_kenm_key FROM alg_kenmerk WHERE alg_kenmerk_upper='VVO';
SELECT alg_kenmerk_key INTO v_hrTp_kenm_key FROM alg_kenmerk WHERE alg_kenmerk_upper='VERHUURTYPE';
SELECT alg_kenmerk_key INTO v_vhrbr_kenm_key FROM alg_kenmerk WHERE alg_kenmerk_upper='VERHUURBAAR';
SELECT alg_kenmerk_key INTO v_hrTp_kenm_key FROM alg_kenmerk WHERE alg_kenmerk_upper='VERHUURTYPE' AND alg_kenmerk_verwijder IS NULL;
SELECT alg_kenmerk_key INTO v_vhrbr_kenm_key FROM alg_kenmerk WHERE alg_kenmerk_upper='VERHUURBAAR' AND alg_kenmerk_verwijder IS NULL;
FOR rec IN c
LOOP
@@ -2383,6 +2384,19 @@ BEGIN
v_verhuurtype:=null;
END;
BEGIN
SELECT b.prs_bedrijf_key
INTO v_huurder_key
FROM prs_bedrijf b
WHERE b.prs_leverancier_nr = v_huurder_code
AND b.prs_bedrijf_huurder = 1
AND b.prs_bedrijf_verwijder IS NULL;
EXCEPTION
WHEN NO_DATA_FOUND
THEN
v_huurder_key:=NULL;
END;
/* IF SUBSTR(v_huurder_codeoud,1,2)='DB' THEN
BEGIN
@@ -2404,8 +2418,8 @@ BEGIN
alg_ruimte_bruto_vloeropp,
alg_kenmerkwaarde1,
alg_kenmerkwaarde2,
alg_kenmerkwaarde3
-- alg_kenmerkwaarde4
alg_kenmerkwaarde3,
alg_kenmerkwaarde4
)
VALUES(v_locatie_code,
v_gebouw_code,
@@ -2416,8 +2430,8 @@ BEGIN
v_bvo_nr,
DECODE(v_km_verhuurbaar, NULL, NULL, v_vhrbr_kenm_key||'='||v_km_verhuurbaar),
v_km_vvo,
DECODE(v_km_verhuurtype, NULL, NULL, v_hrTp_kenm_key||'='||v_verhuurtype)
-- DECODE(v_huurder_naam, NULL, NULL, v_huurder_kenm_key||'='||v_huurder_naam)
DECODE(v_km_verhuurtype, NULL, NULL, v_hrTp_kenm_key||'='||v_verhuurtype),
DECODE(v_huurder_naam, NULL, NULL, v_huurder_kenm_key||'='||v_huurder_key)
);
END IF;
END LOOP;