NYBU#84471 Tijd op 15 juli - nieuwe huurovereenkomsten
svn path=/Customer/trunk/; revision=65880
This commit is contained in:
Suzan Wiegerinck
213
NYBU/nybu.sql
213
NYBU/nybu.sql
@@ -3390,7 +3390,6 @@ AS
|
||||
-- fac_usrtab CODA_BTW 42
|
||||
-- fac_usrtab CODA_OMS 43
|
||||
|
||||
|
||||
CREATE OR REPLACE PROCEDURE nybu_bereken_factuurregels (
|
||||
p_applname IN VARCHAR2,
|
||||
p_run IN DATE,
|
||||
@@ -4420,6 +4419,9 @@ AS
|
||||
v_betreft VARCHAR (20);
|
||||
v_refnr VARCHAR (20);
|
||||
v_kostensoort prs_kostensoort.prs_kostensoort_oms%TYPE;
|
||||
v_sk_meubilair NUMBER (11,5);
|
||||
v_sk_overig NUMBER (11,5);
|
||||
|
||||
BEGIN
|
||||
-- Buffer en log leegmaken
|
||||
DELETE nybu_huur_buffer;
|
||||
@@ -4647,6 +4649,13 @@ BEGIN
|
||||
AND oms.fac_usrdata_code = 'Rent';
|
||||
|
||||
--- SERVICEKOSTEN ---
|
||||
--- NYBU#84471 Servicekosten worden uitgesplits in electra, gas, water (was voorheen servicekosten) / overige zaken en diensten / meubilair en stoffering
|
||||
v_sk_overig := rec.overige_diensten;
|
||||
v_sk_meubilair := rec.meubilair_stoffering;
|
||||
|
||||
--- als de overige diensten en meubilair 0 EUR zijn dan heeft dit contract nog geen splitsing in de kosten
|
||||
IF v_sk_overig = 0 AND v_sk_meubilair = 0
|
||||
THEN
|
||||
v_errormsg := 'Archiefregel servicekosten aanmaken';
|
||||
|
||||
-- Plaats in archief
|
||||
@@ -4706,8 +4715,200 @@ BEGIN
|
||||
WHERE oms.fac_usrtab_key = 43
|
||||
AND btw.fac_usrdata_key =
|
||||
oms.fac_usrdata_parentkey
|
||||
AND oms.fac_usrdata_code = 'ServCost';
|
||||
AND oms.fac_usrdata_code = 'ServCost';
|
||||
|
||||
ELSE
|
||||
|
||||
v_errormsg := 'Archiefregel electra, gas, water aanmaken';
|
||||
|
||||
INSERT INTO nybu_huur_buffer (betreft,
|
||||
datum_export,
|
||||
periode,
|
||||
isMutatie,
|
||||
deb_nr,
|
||||
achternaam,
|
||||
naam_full,
|
||||
prs_perslid_key,
|
||||
cnt_contract_nr,
|
||||
cnt_contract_key,
|
||||
kamer,
|
||||
alg_ruimte_key,
|
||||
omschrijving,
|
||||
kpn_code_afd,
|
||||
kpn_code_proj,
|
||||
prs_kostensoort_refcode,
|
||||
btw_code,
|
||||
btw_perc,
|
||||
bedrag)
|
||||
SELECT v_betreft,
|
||||
p_run,
|
||||
p_periode,
|
||||
0,
|
||||
COALESCE (rec.budget_service, rec.codanr),
|
||||
rec.achternaam,
|
||||
rec.naam,
|
||||
rec.prs_perslid_key,
|
||||
rec.cnt_contract_nr_versie,
|
||||
rec.cnt_contract_key,
|
||||
rec.kamer,
|
||||
rec.alg_ruimte_key,
|
||||
oms.fac_usrdata_omschr
|
||||
|| ' '
|
||||
|| v_curPeriodeNaam,
|
||||
rec.kpngrp,
|
||||
rec.kpn,
|
||||
rec.kostensoort,
|
||||
--v_kostensoort,
|
||||
btw.fac_usrdata_omschr,
|
||||
fac.safe_to_number (btw.fac_usrdata_code),
|
||||
-- Te betalen kosten = aantal dagen samen met roommate * gedeelde servicekosten
|
||||
-- + aantal dagen alleen/met partner gehuurd * volle servicekosten
|
||||
TRUNC (
|
||||
v_dagen_roommate
|
||||
/ v_curPeriodeDagen
|
||||
* rec.servicekosten
|
||||
/ 2
|
||||
+ (v_aantal_dagen - v_dagen_roommate)
|
||||
/ v_curPeriodeDagen
|
||||
* rec.servicekosten,
|
||||
2)
|
||||
FROM fac_usrdata oms, fac_usrdata btw
|
||||
WHERE oms.fac_usrtab_key = 43
|
||||
AND btw.fac_usrdata_key =
|
||||
oms.fac_usrdata_parentkey
|
||||
AND oms.fac_usrdata_code = 'ElectraGasWater';
|
||||
|
||||
END IF;
|
||||
|
||||
|
||||
IF v_sk_overig > 0
|
||||
THEN
|
||||
v_errormsg := 'Archiefregel overige zaken en diensten aanmaken';
|
||||
|
||||
-- Plaats in archief
|
||||
-- met juiste kostenplaatsen en -soorten, omschrijving
|
||||
INSERT INTO nybu_huur_buffer (betreft,
|
||||
datum_export,
|
||||
periode,
|
||||
isMutatie,
|
||||
deb_nr,
|
||||
achternaam,
|
||||
naam_full,
|
||||
prs_perslid_key,
|
||||
cnt_contract_nr,
|
||||
cnt_contract_key,
|
||||
kamer,
|
||||
alg_ruimte_key,
|
||||
omschrijving,
|
||||
kpn_code_afd,
|
||||
kpn_code_proj,
|
||||
prs_kostensoort_refcode,
|
||||
btw_code,
|
||||
btw_perc,
|
||||
bedrag)
|
||||
SELECT v_betreft,
|
||||
p_run,
|
||||
p_periode,
|
||||
0,
|
||||
COALESCE (rec.budget_service, rec.codanr),
|
||||
rec.achternaam,
|
||||
rec.naam,
|
||||
rec.prs_perslid_key,
|
||||
rec.cnt_contract_nr_versie,
|
||||
rec.cnt_contract_key,
|
||||
rec.kamer,
|
||||
rec.alg_ruimte_key,
|
||||
oms.fac_usrdata_omschr
|
||||
|| ' '
|
||||
|| v_curPeriodeNaam,
|
||||
rec.kpngrp,
|
||||
rec.kpn,
|
||||
rec.kostensoort,
|
||||
--v_kostensoort,
|
||||
btw.fac_usrdata_omschr,
|
||||
fac.safe_to_number (btw.fac_usrdata_code),
|
||||
-- Te betalen kosten = aantal dagen samen met roommate * gedeelde servicekosten
|
||||
-- + aantal dagen alleen/met partner gehuurd * volle servicekosten
|
||||
TRUNC (
|
||||
v_dagen_roommate
|
||||
/ v_curPeriodeDagen
|
||||
* rec.overige_diensten
|
||||
/ 2
|
||||
+ (v_aantal_dagen - v_dagen_roommate)
|
||||
/ v_curPeriodeDagen
|
||||
* rec.overige_diensten,
|
||||
2)
|
||||
FROM fac_usrdata oms, fac_usrdata btw
|
||||
WHERE oms.fac_usrtab_key = 43
|
||||
AND btw.fac_usrdata_key =
|
||||
oms.fac_usrdata_parentkey
|
||||
AND oms.fac_usrdata_code = 'OvgZakenDiensten';
|
||||
END IF;
|
||||
|
||||
IF v_sk_meubilair > 0
|
||||
THEN
|
||||
v_errormsg := 'Archiefregel meubilair en stoffering aanmaken';
|
||||
|
||||
-- Plaats in archief
|
||||
-- met juiste kostenplaatsen en -soorten, omschrijving
|
||||
INSERT INTO nybu_huur_buffer (betreft,
|
||||
datum_export,
|
||||
periode,
|
||||
isMutatie,
|
||||
deb_nr,
|
||||
achternaam,
|
||||
naam_full,
|
||||
prs_perslid_key,
|
||||
cnt_contract_nr,
|
||||
cnt_contract_key,
|
||||
kamer,
|
||||
alg_ruimte_key,
|
||||
omschrijving,
|
||||
kpn_code_afd,
|
||||
kpn_code_proj,
|
||||
prs_kostensoort_refcode,
|
||||
btw_code,
|
||||
btw_perc,
|
||||
bedrag)
|
||||
SELECT v_betreft,
|
||||
p_run,
|
||||
p_periode,
|
||||
0,
|
||||
COALESCE (rec.budget_service, rec.codanr),
|
||||
rec.achternaam,
|
||||
rec.naam,
|
||||
rec.prs_perslid_key,
|
||||
rec.cnt_contract_nr_versie,
|
||||
rec.cnt_contract_key,
|
||||
rec.kamer,
|
||||
rec.alg_ruimte_key,
|
||||
oms.fac_usrdata_omschr
|
||||
|| ' '
|
||||
|| v_curPeriodeNaam,
|
||||
rec.kpngrp,
|
||||
rec.kpn,
|
||||
rec.kostensoort,
|
||||
--v_kostensoort,
|
||||
btw.fac_usrdata_omschr,
|
||||
fac.safe_to_number (btw.fac_usrdata_code),
|
||||
-- Te betalen kosten = aantal dagen samen met roommate * gedeelde servicekosten
|
||||
-- + aantal dagen alleen/met partner gehuurd * volle servicekosten
|
||||
TRUNC (
|
||||
v_dagen_roommate
|
||||
/ v_curPeriodeDagen
|
||||
* rec.meubilair_stoffering
|
||||
/ 2
|
||||
+ (v_aantal_dagen - v_dagen_roommate)
|
||||
/ v_curPeriodeDagen
|
||||
* rec.meubilair_stoffering,
|
||||
2)
|
||||
FROM fac_usrdata oms, fac_usrdata btw
|
||||
WHERE oms.fac_usrtab_key = 43
|
||||
AND btw.fac_usrdata_key =
|
||||
oms.fac_usrdata_parentkey
|
||||
AND oms.fac_usrdata_code = 'MeubilairStoff';
|
||||
END IF;
|
||||
|
||||
--- PARTNERCHARGE ---
|
||||
IF (v_dagen_roommate > 0 OR rec.partner_naam IS NOT NULL)
|
||||
THEN
|
||||
@@ -6577,7 +6778,11 @@ AS
|
||||
OR UPPER (omschrijving) LIKE
|
||||
'%ADDITIONAL COSTS%'
|
||||
OR UPPER (omschrijving) LIKE '%ADD. COSTS%'
|
||||
OR UPPER (omschrijving) LIKE '%PARTNER CHARGE%')
|
||||
OR UPPER (omschrijving) LIKE '%PARTNER CHARGE%'
|
||||
OR UPPER (omschrijving) LIKE '%ELECTRA, GAS, WATER%'
|
||||
OR UPPER (omschrijving) LIKE '%OVERIGE ZAKEN EN DIENSTEN%'
|
||||
OR UPPER (omschrijving) LIKE '%MEUBILAIR EN STOFFERING%'
|
||||
)
|
||||
AND ismutatie = 0)
|
||||
SELECT nw.*,
|
||||
COALESCE (oud.bedrag, 0) bedrag_oud,
|
||||
@@ -6743,8 +6948,6 @@ EXCEPTION
|
||||
END nybu_select_huur_mutaties;
|
||||
/
|
||||
|
||||
|
||||
|
||||
----- Rapportages --------------------------------
|
||||
|
||||
-- Toont de inhoud van de factuurbuffer (voor controle van gegenereerde factuurregels
|
||||
|
||||
Reference in New Issue
Block a user