BSSC#55692 Facturatieproces
svn path=/Customer/trunk/; revision=51367
This commit is contained in:
Maarten van der Heide
140
BSSC/bssc.sql
140
BSSC/bssc.sql
@@ -15,127 +15,7 @@ SPOOL &fcltlogfile
|
|||||||
SET DEFINE OFF
|
SET DEFINE OFF
|
||||||
|
|
||||||
------ payload begin ------
|
------ payload begin ------
|
||||||
/*
|
|
||||||
CREATE OR REPLACE PACKAGE BSSC
|
|
||||||
IS
|
|
||||||
PROCEDURE freezeevent (p_key IN NUMBER);
|
|
||||||
END;
|
|
||||||
/
|
|
||||||
|
|
||||||
CREATE OR REPLACE PACKAGE BODY BSSC
|
|
||||||
IS
|
|
||||||
PROCEDURE freezeevent (p_key IN NUMBER)
|
|
||||||
AS
|
|
||||||
-- Verwerk reservering/event (in juiste volgorde)!
|
|
||||||
CURSOR c3
|
|
||||||
IS
|
|
||||||
SELECT DISTINCT '[' || TO_CHAR (rra.res_rsv_ruimte_key) || '|' || TO_CHAR (rra.res_rsv_artikel_key) || '] ' aanduiding,
|
|
||||||
rra.res_rsv_ruimte_key,
|
|
||||||
rra.res_rsv_artikel_key,
|
|
||||||
NULL res_rsv_deel_key,
|
|
||||||
rra.res_status_bo_key,
|
|
||||||
rra.res_artikel_key
|
|
||||||
FROM res_v_aanwezigrsv_artikel rra
|
|
||||||
WHERE rra.res_rsv_ruimte_key = p_key
|
|
||||||
UNION ALL
|
|
||||||
SELECT DISTINCT '[' || TO_CHAR (rrd.res_rsv_ruimte_key) || '|' || TO_CHAR (rrd.res_rsv_deel_key) || '] ' aanduiding,
|
|
||||||
rrd.res_rsv_ruimte_key,
|
|
||||||
NULL res_rsv_artikel_key,
|
|
||||||
rrd.res_rsv_deel_key,
|
|
||||||
rrd.res_status_bo_key,
|
|
||||||
rrd.res_deel_key
|
|
||||||
FROM res_v_aanwezigrsv_deel rrd
|
|
||||||
WHERE rrd.res_rsv_ruimte_key = p_key
|
|
||||||
UNION ALL
|
|
||||||
SELECT DISTINCT '[' || TO_CHAR (rrr.res_rsv_ruimte_key) || '] ' aanduiding,
|
|
||||||
rrr.res_rsv_ruimte_key,
|
|
||||||
NULL res_rsv_artikel_key,
|
|
||||||
NULL res_rsv_deel_key,
|
|
||||||
rrr.res_status_bo_key,
|
|
||||||
NULL res_artikel_key
|
|
||||||
FROM res_v_aanwezigrsv_ruimte rrr
|
|
||||||
WHERE rrr.res_rsv_ruimte_key = p_key
|
|
||||||
ORDER BY 3, 4, 2;
|
|
||||||
|
|
||||||
c_applname VARCHAR2 (50) := 'FREEZE_EV';
|
|
||||||
v_errormsg VARCHAR2 (1000);
|
|
||||||
oracle_err_num NUMBER;
|
|
||||||
oracle_err_mes VARCHAR2 (200);
|
|
||||||
--v_status_bo_key NUMBER;
|
|
||||||
BEGIN
|
|
||||||
--v_errormsg := 'Fout bepalen event';
|
|
||||||
|
|
||||||
--SELECT res_status_bo_key
|
|
||||||
-- INTO v_status_bo_key
|
|
||||||
-- FROM res_v_aanwezigrsv_ruimte
|
|
||||||
-- WHERE res_rsv_ruimte_key = p_key;
|
|
||||||
|
|
||||||
--v_errormsg := 'Fout bijwerken status';
|
|
||||||
|
|
||||||
--IF v_status_bo_key = 5 -- Afgemeld
|
|
||||||
--THEN
|
|
||||||
FOR rec IN c3
|
|
||||||
LOOP
|
|
||||||
BEGIN
|
|
||||||
IF rec.res_rsv_artikel_key IS NOT NULL
|
|
||||||
THEN -- Catering-regel
|
|
||||||
IF rec.res_status_bo_key = 5 -- Afgemeld
|
|
||||||
THEN
|
|
||||||
v_errormsg := 'Fout verwerken res_rsv_artikel';
|
|
||||||
|
|
||||||
UPDATE res_rsv_artikel
|
|
||||||
SET res_status_bo_key = 6 -- AV (en zet ook Verwerkt-date)
|
|
||||||
WHERE res_rsv_artikel_key = rec.res_rsv_artikel_key;
|
|
||||||
|
|
||||||
v_errormsg := 'Fout tracken verwerking';
|
|
||||||
|
|
||||||
fac.trackaction ('RESVER', rec.res_rsv_ruimte_key, NULL, NULL, 'Catering verwerkt');
|
|
||||||
END IF;
|
|
||||||
ELSIF rec.res_rsv_deel_key IS NOT NULL
|
|
||||||
THEN -- Voorziening-regel
|
|
||||||
IF rec.res_status_bo_key = 5
|
|
||||||
THEN
|
|
||||||
v_errormsg := 'Fout verwerken res_rsv_deel';
|
|
||||||
|
|
||||||
UPDATE res_rsv_deel
|
|
||||||
SET res_status_bo_key = 6 -- AV (en zet ook Verwerkt-date)
|
|
||||||
WHERE res_rsv_deel_key = rec.res_rsv_deel_key;
|
|
||||||
|
|
||||||
v_errormsg := 'Fout tracken verwerking';
|
|
||||||
|
|
||||||
fac.trackaction ('RESVER', rec.res_rsv_ruimte_key, NULL, NULL, 'Voorziening verwerkt');
|
|
||||||
END IF;
|
|
||||||
ELSE -- Ruimte-regel
|
|
||||||
IF rec.res_status_bo_key = 5 -- Afgemeld
|
|
||||||
THEN
|
|
||||||
v_errormsg := 'Fout verwerken res_rsv_ruimte';
|
|
||||||
|
|
||||||
UPDATE res_rsv_ruimte
|
|
||||||
SET res_status_bo_key = 6 -- AV
|
|
||||||
WHERE res_rsv_ruimte_key = rec.res_rsv_ruimte_key;
|
|
||||||
|
|
||||||
v_errormsg := 'Fout tracken verwerking';
|
|
||||||
|
|
||||||
fac.trackaction ('RESVER', rec.res_rsv_ruimte_key, NULL, NULL, NULL);
|
|
||||||
END IF;
|
|
||||||
END IF;
|
|
||||||
END;
|
|
||||||
END LOOP;
|
|
||||||
--END IF;
|
|
||||||
|
|
||||||
fac.writelog (c_applname, 'S', 'Proces: Event ' || TO_CHAR (p_key) || ' bevroren', '');
|
|
||||||
COMMIT;
|
|
||||||
EXCEPTION
|
|
||||||
WHEN OTHERS
|
|
||||||
THEN
|
|
||||||
oracle_err_num := SQLCODE;
|
|
||||||
oracle_err_mes := SUBSTR (SQLERRM, 1, 100);
|
|
||||||
v_errormsg := v_errormsg || ' ORACLE (error ' || oracle_err_num || '/' || oracle_err_mes || ')';
|
|
||||||
fac.writelog (c_applname, 'E', v_errormsg, '');
|
|
||||||
COMMIT;
|
|
||||||
END freezeevent;
|
|
||||||
END;
|
|
||||||
*/
|
|
||||||
CREATE OR REPLACE VIEW bssc_v_rap_import_log
|
CREATE OR REPLACE VIEW bssc_v_rap_import_log
|
||||||
(
|
(
|
||||||
fclt_f_applicatie,
|
fclt_f_applicatie,
|
||||||
@@ -5290,6 +5170,26 @@ AS
|
|||||||
ON vf.fin_verkoopfactuur_xmlnode = 'contract'
|
ON vf.fin_verkoopfactuur_xmlnode = 'contract'
|
||||||
AND vf.fin_verkoopfactuur_refkey = c.cnt_contract_key;
|
AND vf.fin_verkoopfactuur_refkey = c.cnt_contract_key;
|
||||||
|
|
||||||
|
-- Domein met de financi<63>le mensen die reserveringen, correctiemeldingen en
|
||||||
|
-- incidentele verkoopmeldingen mogen vrijgen om te factureren.
|
||||||
|
CREATE OR REPLACE VIEW bssc_v_vrijgevers
|
||||||
|
(
|
||||||
|
prs_perslid_key,
|
||||||
|
prs_perslid_naam_full,
|
||||||
|
prs_perslid_naam_friendly,
|
||||||
|
prs_perslid_verwijder
|
||||||
|
)
|
||||||
|
AS
|
||||||
|
SELECT pf.prs_perslid_key,
|
||||||
|
pf.prs_perslid_naam_full,
|
||||||
|
pf.prs_perslid_naam_friendly,
|
||||||
|
p.prs_perslid_verwijder
|
||||||
|
FROM fac_gebruikersgroep gg, prs_perslid p, prs_v_perslid_fullnames_all pf
|
||||||
|
WHERE gg.fac_groep_key = 2661 -- SSC Vrijgave voor facturatie
|
||||||
|
AND gg.prs_perslid_key = p.prs_perslid_key
|
||||||
|
AND p.prs_perslid_key = pf.prs_perslid_key
|
||||||
|
AND SUBSTR (p.prs_perslid_oslogin, 1, 1) != '_';
|
||||||
|
|
||||||
CREATE OR REPLACE VIEW BSSC_V_RAP_TE_FACTUREREN
|
CREATE OR REPLACE VIEW BSSC_V_RAP_TE_FACTUREREN
|
||||||
(
|
(
|
||||||
refkey,
|
refkey,
|
||||||
|
|||||||
Reference in New Issue
Block a user