CONN#20985/MVH

CONN#20963/AEG

svn path=/Customer/trunk/; revision=14864
This commit is contained in:
Arthur Egberink
2011-07-12 14:41:10 +00:00
parent 866451e0d0
commit a8a28c7efe

View File

@@ -1,7 +1,7 @@
-- Script containing customer specific configuration sql statements for CONN: Connexxion
-- (c) 2005-2010 SG|facilitor bv
-- $Revision: 173 $
-- $Modtime: 30-06-11 16:26 $
-- $Revision: 174 $
-- $Modtime: 12-07-11 16:35 $
--
-- Support: +31 53 4800710
@@ -4446,7 +4446,7 @@ BEGIN
FROM DUAL;
fac.imp_writelog (p_applname, p_applrun, 'S',
'Cxx factuurimport $Revision: 173 $', '');
'Cxx factuurimport $Revision: 174 $', '');
OPEN cfactuur;
IF cfactuur%ISOPEN THEN
@@ -7571,7 +7571,9 @@ BEGIN
fac.imp_getfield (v_newline, v_fielddelimitor, v_eindtotaal);
IF header_is_valid = 0 THEN
IF upper(v_locatie) = 'LOCATIE'
IF upper(v_locatie) = 'LOCATIE'
AND upper(v_adres) = 'ADRES'
AND upper(v_eindtotaal) = 'EINDTOTAAL'
THEN
header_is_valid := 1;
END IF;
@@ -7633,7 +7635,17 @@ END;
CREATE OR REPLACE PROCEDURE conn_update_budget (p_applname IN VARCHAR2, p_applrun IN VARCHAR2)
AS
BEGIN
UPDATE conn_imp_budget SET importrun = NULL WHERE importrun IS NOT NULL;
-- kijk in de bestaande tabel (b) of er records met dezelfde periode voorkomen als zojust geimporteerd (i).
DELETE conn_imp_budget b
WHERE importrun IS NULL
AND EXISTS (SELECT locatie
FROM conn_imp_budget i
WHERE i.budget = b.budget
AND i.importrun is not null);
UPDATE conn_imp_budget
SET importrun = NULL
WHERE importrun IS NOT NULL;
END;
/
@@ -7695,7 +7707,9 @@ BEGIN
fac.imp_getfield (v_newline, v_fielddelimitor, v_bedrag);
IF header_is_valid = 0 THEN
IF upper(v_locatie) = 'LOCATIE'
IF upper(v_locatie) = 'LOCATIE'
AND upper(v_jaar) = 'JAAR'
AND upper(v_bedrag) = 'BEDRAG'
THEN
header_is_valid := 1;
END IF;
@@ -7791,10 +7805,10 @@ AS
UPPER(divisie) divisie,
periode jaar,
0 maand,
huur,
afschrijving,
servicekosten
FROM conn_imp_budget b
coalesce(huur,0) huur,
coalesce(afschrijving,0) afschrijving,
coalesce(servicekosten,0) servicekosten
FROM conn_imp_budget b WHERE importrun IS NULL
UNION ALL
SELECT locatie || (select ' - ' || alg_locatie_omschrijving from alg_v_aanweziglocatie where alg_locatie_code = locatie),
divisie,
@@ -7810,8 +7824,8 @@ AS
0 huur,
0 afschrijving,
bedrag servicekosten
FROM conn_imp_kosten
WHERE kostensoort = 'Fac.kosten'
FROM conn_imp_kosten WHERE importrun IS NULL
AND kostensoort = 'Fac.kosten'
UNION ALL
SELECT locatie,
UPPER(divisie) divisie,
@@ -7820,8 +7834,8 @@ AS
bedrag huur,
0 afschrijving,
0 servicekosten
FROM conn_imp_kosten
WHERE kostensoort = 'Huur')
FROM conn_imp_kosten WHERE importrun IS NULL
AND kostensoort = 'Huur')
GROUP BY locatie,
divisie,
jaar,
@@ -7838,10 +7852,10 @@ AS
UPPER(divisie) divisie,
fac.safe_to_number (periode) jaar,
0 maand,
huur,
afschrijving,
servicekosten
FROM conn_imp_budget b
coalesce(huur,0) huur,
coalesce(afschrijving,0) afschrijving,
coalesce(servicekosten,0) servicekosten
FROM conn_imp_budget b WHERE importrun IS NULL
UNION ALL
SELECT locatie,
UPPER(divisie) divisie,
@@ -7850,8 +7864,8 @@ AS
0 huur,
0 afschrijving,
bedrag * (-1) servicekosten
FROM conn_imp_kosten
WHERE kostensoort = 'Fac.kosten'
FROM conn_imp_kosten WHERE importrun IS NULL
AND kostensoort = 'Fac.kosten'
UNION ALL
SELECT locatie,
UPPER(divisie) divisie,
@@ -7860,8 +7874,8 @@ AS
bedrag * (-1) huur,
0 afschrijving,
0 servicekosten
FROM conn_imp_kosten
WHERE kostensoort = 'Huur')
FROM conn_imp_kosten WHERE importrun IS NULL
AND kostensoort = 'Huur')
GROUP BY locatie, divisie, jaar
ORDER BY 1,
2,
@@ -8275,6 +8289,56 @@ GROUP BY bd.ins_discipline_omschrijving, pf.prs_perslid_naam_full, fp.fac_prof
ORDER BY 1, 2;
--CONN#20985
/* Formatted on 8-7-2011 11:22:44 (QP5 v5.115.810.9015) */
CREATE OR REPLACE VIEW conn_v_rap_bes_artikel_expimp
(
fclt_f_catalogusnaam,
artikelbedrijf,
catalogusaanmaak,
artikelnummer,
artikelgroepomschrijving,
artikelomschrijving,
artikelprijs,
artikeleenheid,
artikelimage,
artikelveelvoud,
artikelbtw,
artikelvervaldatum,
artikelinkoopprijs,
artikelminimum
)
AS
SELECT td.ins_discipline_omschrijving,
b.prs_bedrijf_naam,
TO_CHAR (td.ins_discipline_aanmaak, 'yyyymmdd'),
sd.bes_srtdeel_nr,
sg.bes_srtgroep_omschrijving,
sd.bes_srtdeel_omschrijving,
TO_CHAR (sd.bes_srtdeel_prijs),
sd.bes_srtdeel_eenheid,
sd.bes_srtdeel_image,
TO_CHAR (sd.bes_srtdeel_veelvoud),
TO_CHAR (COALESCE (sd.bes_srtdeel_btw, 0)),
TO_CHAR (
COALESCE (sd.bes_srtdeel_vervaldatum,
TO_DATE ('31-12-2099', 'dd-mm-yyyy')),
'yyyymmdd'
),
TO_CHAR (sd.bes_srtdeel_inkprijs),
NULL
FROM ins_tab_discipline td,
bes_srtgroep sg,
bes_srtdeel sd,
prs_bedrijf b
WHERE td.ins_discipline_module = 'BES'
AND td.ins_discipline_verwijder IS NULL
AND td.ins_discipline_key = sg.ins_discipline_key
AND sg.bes_srtgroep_verwijder IS NULL
AND sg.bes_srtgroep_key = sd.bes_srtgroep_key
AND sd.bes_srtdeel_verwijder IS NULL
AND sd.prs_bedrijf_key = b.prs_bedrijf_key;
/* Formatted on 20-6-2011 16:56:16 (QP5 v5.115.810.9015) */
CREATE OR REPLACE VIEW conn_v_rap_inspectieobj_expimp
(
@@ -10699,10 +10763,10 @@ EXCEPTION
END conn_update_inspectieobj;
/
BEGIN fac.registercustversion('CONN', 46); END;
BEGIN fac.registercustversion('CONN', 47); END;
/
BEGIN adm.systrackscript('$Workfile: conn.sql $', '$Revision: 173 $', 0); END;
BEGIN adm.systrackscript('$Workfile: conn.sql $', '$Revision: 174 $', 0); END;
/
COMMIT;