YKPN#64864 -- procedure autoorder leverde verkeerde bedrijf op.
svn path=/Customer/trunk/; revision=48855
This commit is contained in:
Norbert Wassink
228
YKPN/ykpn.sql
228
YKPN/ykpn.sql
@@ -1453,7 +1453,6 @@ AS
|
||||
m.mld_melding_status
|
||||
FROM mld_melding m,
|
||||
mld_stdmelding std,
|
||||
prs_dienst d,
|
||||
prs_bedrijfdienstlocatie bdl
|
||||
WHERE m.mld_melding_status IN (2, 3, 4) -- Ingevoerd, Ingezien, Geaccepteerd
|
||||
AND m.mld_stdmelding_key = std.mld_stdmelding_key
|
||||
@@ -1462,6 +1461,7 @@ AS
|
||||
AND mld_melding_datum > SYSDATE - 1 -- voorkom dat oude meldingen ineens verstuurd gaan worden
|
||||
AND mld_melding_datum < SYSDATE - (1 / 96) -- voorkom dat meldingen die nog bezig zijn met aanmaken al aangepast worden.
|
||||
AND std.mld_typeopdr_key IS NOT NULL
|
||||
AND m.mld_alg_locatie_key = bdl.alg_locatie_key
|
||||
AND NOT EXISTS
|
||||
(SELECT mld_melding_key
|
||||
FROM mld_opdr o
|
||||
@@ -2980,10 +2980,10 @@ BEGIN
|
||||
AND k.prs_kostenplaats_nr = i.prs_afdeling_naam);
|
||||
|
||||
-- KPN gebruikt een andere codering voor het gebruik van de partnernaam daarom gaan we deze even omzetten
|
||||
-- KPN code 1 eigennaam wordt 0
|
||||
-- KPN code 2 partnernaam wordt 2
|
||||
-- KPN code 3 partner - eigen naam wordt 1
|
||||
-- KPN code 4 eigen - partner naam wordt 3
|
||||
-- KPN code 1 eigennaam wordt 0
|
||||
-- KPN code 2 partnernaam wordt 2
|
||||
-- KPN code 3 partner - eigen naam wordt 1
|
||||
-- KPN code 4 eigen - partner naam wordt 3
|
||||
UPDATE fac_imp_perslid i
|
||||
SET prs_perslid_naamgebruik_code = DECODE(prs_perslid_naamgebruik_code,1,0,2,2,3,1,4,3,0);
|
||||
|
||||
@@ -8086,88 +8086,88 @@ BEGIN
|
||||
|
||||
IF v_kpi_definitie_categorie1 IS NOT NULL
|
||||
THEN
|
||||
v_kpi_definitie_categorie1 := TRIM (v_kpi_definitie_categorie1);
|
||||
v_kpi_definitie_categorie1 := TRIM (v_kpi_definitie_categorie1);
|
||||
|
||||
IF LENGTH (v_kpi_definitie_categorie1) > 50
|
||||
THEN
|
||||
v_kpi_definitie_categorie1 :=
|
||||
SUBSTR (TRIM (v_kpi_definitie_categorie1), 1, 50);
|
||||
fac.imp_writelog (
|
||||
p_import_key,
|
||||
'W',
|
||||
v_aanduiding,
|
||||
'Categorie 1 wordt afgebroken tot ['
|
||||
|| v_kpi_definitie_categorie1
|
||||
|| ']');
|
||||
END IF;
|
||||
IF LENGTH (v_kpi_definitie_categorie1) > 50
|
||||
THEN
|
||||
v_kpi_definitie_categorie1 :=
|
||||
SUBSTR (TRIM (v_kpi_definitie_categorie1), 1, 50);
|
||||
fac.imp_writelog (
|
||||
p_import_key,
|
||||
'W',
|
||||
v_aanduiding,
|
||||
'Categorie 1 wordt afgebroken tot ['
|
||||
|| v_kpi_definitie_categorie1
|
||||
|| ']');
|
||||
END IF;
|
||||
ELSE
|
||||
v_ongeldig := 1;
|
||||
fac.imp_writelog (p_import_key, 'W', v_aanduiding, 'Categorie 1 mag NIET leeg zijn: deze regel wordt overgeslagen');
|
||||
v_ongeldig := 1;
|
||||
fac.imp_writelog (p_import_key, 'W', v_aanduiding, 'Categorie 1 mag NIET leeg zijn: deze regel wordt overgeslagen');
|
||||
END IF;
|
||||
|
||||
IF v_kpi_definitie_categorie2 IS NOT NULL
|
||||
THEN
|
||||
v_kpi_definitie_categorie2 := TRIM (v_kpi_definitie_categorie2);
|
||||
IF LENGTH (v_kpi_definitie_categorie2) > 50
|
||||
THEN
|
||||
v_kpi_definitie_categorie2 :=
|
||||
SUBSTR (TRIM (v_kpi_definitie_categorie2), 1, 50);
|
||||
fac.imp_writelog (
|
||||
p_import_key,
|
||||
'W',
|
||||
v_aanduiding,
|
||||
'Categorie 2 wordt afgebroken tot ['
|
||||
|| v_kpi_definitie_categorie2
|
||||
|| ']');
|
||||
END IF;
|
||||
ELSE
|
||||
v_ongeldig := 1;
|
||||
fac.imp_writelog (p_import_key, 'W', v_aanduiding, 'Categorie 2 mag NIET leeg zijn: deze regel wordt overgeslagen');
|
||||
v_kpi_definitie_categorie2 := TRIM (v_kpi_definitie_categorie2);
|
||||
IF LENGTH (v_kpi_definitie_categorie2) > 50
|
||||
THEN
|
||||
v_kpi_definitie_categorie2 :=
|
||||
SUBSTR (TRIM (v_kpi_definitie_categorie2), 1, 50);
|
||||
fac.imp_writelog (
|
||||
p_import_key,
|
||||
'W',
|
||||
v_aanduiding,
|
||||
'Categorie 2 wordt afgebroken tot ['
|
||||
|| v_kpi_definitie_categorie2
|
||||
|| ']');
|
||||
END IF;
|
||||
ELSE
|
||||
v_ongeldig := 1;
|
||||
fac.imp_writelog (p_import_key, 'W', v_aanduiding, 'Categorie 2 mag NIET leeg zijn: deze regel wordt overgeslagen');
|
||||
END IF;
|
||||
|
||||
IF v_kpi_definitie_code IS NOT NULL
|
||||
IF v_kpi_definitie_code IS NOT NULL
|
||||
THEN
|
||||
v_kpi_definitie_code := TRIM (v_kpi_definitie_code);
|
||||
IF LENGTH (v_kpi_definitie_code) > 15
|
||||
THEN
|
||||
v_kpi_definitie_code :=
|
||||
SUBSTR (TRIM (v_kpi_definitie_code), 1, 15);
|
||||
fac.imp_writelog (
|
||||
p_import_key,
|
||||
'W',
|
||||
v_aanduiding,
|
||||
'Code wordt afgebroken tot ['
|
||||
|| v_kpi_definitie_code
|
||||
|| ']');
|
||||
END IF;
|
||||
ELSE
|
||||
v_ongeldig := 1;
|
||||
fac.imp_writelog (p_import_key, 'W', v_aanduiding, 'Code mag NIET leeg zijn: deze regel wordt overgeslagen');
|
||||
v_kpi_definitie_code := TRIM (v_kpi_definitie_code);
|
||||
IF LENGTH (v_kpi_definitie_code) > 15
|
||||
THEN
|
||||
v_kpi_definitie_code :=
|
||||
SUBSTR (TRIM (v_kpi_definitie_code), 1, 15);
|
||||
fac.imp_writelog (
|
||||
p_import_key,
|
||||
'W',
|
||||
v_aanduiding,
|
||||
'Code wordt afgebroken tot ['
|
||||
|| v_kpi_definitie_code
|
||||
|| ']');
|
||||
END IF;
|
||||
ELSE
|
||||
v_ongeldig := 1;
|
||||
fac.imp_writelog (p_import_key, 'W', v_aanduiding, 'Code mag NIET leeg zijn: deze regel wordt overgeslagen');
|
||||
END IF;
|
||||
|
||||
IF v_kpi_definitie_omschrijving IS NOT NULL
|
||||
THEN
|
||||
|
||||
v_kpi_definitie_omschrijving := TRIM (v_kpi_definitie_omschrijving);
|
||||
IF LENGTH (v_kpi_definitie_omschrijving) > 60
|
||||
THEN
|
||||
v_kpi_definitie_omschrijving :=
|
||||
SUBSTR (TRIM (v_kpi_definitie_omschrijving), 1, 60);
|
||||
fac.imp_writelog (
|
||||
p_import_key,
|
||||
'W',
|
||||
v_aanduiding,
|
||||
'Omschrijving wordt afgebroken tot ['
|
||||
|| v_kpi_definitie_omschrijving
|
||||
|| ']');
|
||||
END IF;
|
||||
ELSE
|
||||
v_ongeldig := 1;
|
||||
fac.imp_writelog (p_import_key, 'W', v_aanduiding, 'Omschrijving mag NIET leeg zijn: deze regel wordt overgeslagen');
|
||||
v_kpi_definitie_omschrijving := TRIM (v_kpi_definitie_omschrijving);
|
||||
IF LENGTH (v_kpi_definitie_omschrijving) > 60
|
||||
THEN
|
||||
v_kpi_definitie_omschrijving :=
|
||||
SUBSTR (TRIM (v_kpi_definitie_omschrijving), 1, 60);
|
||||
fac.imp_writelog (
|
||||
p_import_key,
|
||||
'W',
|
||||
v_aanduiding,
|
||||
'Omschrijving wordt afgebroken tot ['
|
||||
|| v_kpi_definitie_omschrijving
|
||||
|| ']');
|
||||
END IF;
|
||||
ELSE
|
||||
v_ongeldig := 1;
|
||||
fac.imp_writelog (p_import_key, 'W', v_aanduiding, 'Omschrijving mag NIET leeg zijn: deze regel wordt overgeslagen');
|
||||
END IF;
|
||||
|
||||
v_kpi_definitie_info := TRIM (v_kpi_definitie_info);
|
||||
IF LENGTH (v_kpi_definitie_info) > 4000
|
||||
v_kpi_definitie_info := TRIM (v_kpi_definitie_info);
|
||||
IF LENGTH (v_kpi_definitie_info) > 4000
|
||||
THEN
|
||||
v_kpi_definitie_info :=
|
||||
SUBSTR (TRIM (v_kpi_definitie_info), 1, 4000);
|
||||
@@ -8180,24 +8180,24 @@ BEGIN
|
||||
|| ']');
|
||||
END IF;
|
||||
|
||||
IF v_kpi_definitie_drempels_0 IS NOT NULL AND v_kpi_definitie_drempels_70 IS NOT NULL AND v_kpi_definitie_drempels_90 IS NOT NULL AND v_kpi_definitie_drempels_100 IS NOT NULL
|
||||
THEN
|
||||
v_kpi_definitie_drempels_tot := TRIM (v_kpi_definitie_drempels_0 || '|' || v_kpi_definitie_drempels_70 || '|' || v_kpi_definitie_drempels_90 || '|' || v_kpi_definitie_drempels_100);
|
||||
IF LENGTH (v_kpi_definitie_drempels_tot) > 20
|
||||
THEN
|
||||
v_kpi_definitie_drempels_tot :=
|
||||
SUBSTR (TRIM (v_kpi_definitie_drempels_tot), 1, 20);
|
||||
fac.imp_writelog (
|
||||
p_import_key,
|
||||
'W',
|
||||
v_aanduiding,
|
||||
'Dermpels wordt afgebroken tot ['
|
||||
|| v_kpi_definitie_drempels_tot
|
||||
|| ']');
|
||||
END IF;
|
||||
ELSE
|
||||
v_ongeldig := 1;
|
||||
fac.imp_writelog (p_import_key, 'W', v_aanduiding, 'Alle drempeles MOETEN gevuld zijn: deze regel wordt overgeslagen');
|
||||
IF v_kpi_definitie_drempels_0 IS NOT NULL AND v_kpi_definitie_drempels_70 IS NOT NULL AND v_kpi_definitie_drempels_90 IS NOT NULL AND v_kpi_definitie_drempels_100 IS NOT NULL
|
||||
THEN
|
||||
v_kpi_definitie_drempels_tot := TRIM (v_kpi_definitie_drempels_0 || '|' || v_kpi_definitie_drempels_70 || '|' || v_kpi_definitie_drempels_90 || '|' || v_kpi_definitie_drempels_100);
|
||||
IF LENGTH (v_kpi_definitie_drempels_tot) > 20
|
||||
THEN
|
||||
v_kpi_definitie_drempels_tot :=
|
||||
SUBSTR (TRIM (v_kpi_definitie_drempels_tot), 1, 20);
|
||||
fac.imp_writelog (
|
||||
p_import_key,
|
||||
'W',
|
||||
v_aanduiding,
|
||||
'Dermpels wordt afgebroken tot ['
|
||||
|| v_kpi_definitie_drempels_tot
|
||||
|| ']');
|
||||
END IF;
|
||||
ELSE
|
||||
v_ongeldig := 1;
|
||||
fac.imp_writelog (p_import_key, 'W', v_aanduiding, 'Alle drempeles MOETEN gevuld zijn: deze regel wordt overgeslagen');
|
||||
END IF;
|
||||
|
||||
|
||||
@@ -8206,12 +8206,12 @@ BEGIN
|
||||
THEN
|
||||
BEGIN
|
||||
INSERT INTO YKPN_IMP_KPI_DEFINITIE (
|
||||
KPI_DEFINITIE_CODE,
|
||||
KPI_DEFINITIE_OMSCHRIJVING,
|
||||
KPI_DEFINITIE_INFO,
|
||||
KPI_DEFINITIE_CATEGORIE1,
|
||||
KPI_DEFINITIE_CATEGORIE2,
|
||||
KPI_DEFINITIE_DREMPELS)
|
||||
KPI_DEFINITIE_CODE,
|
||||
KPI_DEFINITIE_OMSCHRIJVING,
|
||||
KPI_DEFINITIE_INFO,
|
||||
KPI_DEFINITIE_CATEGORIE1,
|
||||
KPI_DEFINITIE_CATEGORIE2,
|
||||
KPI_DEFINITIE_DREMPELS)
|
||||
VALUES (v_kpi_definitie_code,
|
||||
v_kpi_definitie_omschrijving,
|
||||
v_kpi_definitie_info,
|
||||
@@ -8305,7 +8305,7 @@ BEGIN
|
||||
|
||||
v_errorhint := 'Fout bij insert van kpi definitie';
|
||||
|
||||
IF rec_ins.kpi_definitie_code IS NOT NULL
|
||||
IF rec_ins.kpi_definitie_code IS NOT NULL
|
||||
AND rec_ins.kpi_definitie_categorie1 IS NOT NULL
|
||||
AND rec_ins.kpi_definitie_categorie2 IS NOT NULL
|
||||
AND rec_ins.kpi_definitie_omschrijving IS NOT NULL
|
||||
@@ -8495,7 +8495,7 @@ CREATE OR REPLACE VIEW ykpn_v_kpi_all
|
||||
AS
|
||||
SELECT * FROM ykpn_v_kpi_kwaliteit
|
||||
--UNION ALL
|
||||
-- SELECT * FROM ykpn_v_kpi_etc
|
||||
-- SELECT * FROM ykpn_v_kpi_etc
|
||||
;
|
||||
|
||||
-- EINDE KPI
|
||||
@@ -9452,8 +9452,8 @@ AS
|
||||
AND p.prs_perslid_key = wpp.prs_perslid_key
|
||||
AND p.prs_perslid_key = pp.prs_perslid_key
|
||||
AND bkw.bez_kenmerk_key = '1020'
|
||||
AND wp.alg_locatie_code = l.alg_locatie_code
|
||||
AND l.alg_locatie_code = wp.alg_locatie_code
|
||||
AND wp.alg_locatie_code = l.alg_locatie_code
|
||||
AND l.alg_locatie_code = wp.alg_locatie_code
|
||||
--AND a.bez_afspraak_datum >= TO_DATE ('01-01-2018', 'DD-MM-YYYY')
|
||||
;
|
||||
|
||||
@@ -12266,7 +12266,7 @@ BEGIN
|
||||
FROM mld_kenmerk
|
||||
WHERE mld_kenmerk_niveau = 'O'
|
||||
AND mld_typeopdr_key = v_typeopdr_key
|
||||
AND mld_srtkenmerk_key = 18; -- Ref. Nr. Leverancier
|
||||
AND mld_srtkenmerk_key = 18; -- Ref. Nr. Leverancier
|
||||
|
||||
YKPN.set_kenmerk('MLD', v_kenmerk_key, v_opdr_key, v_naam, 0);
|
||||
EXCEPTION WHEN OTHERS
|
||||
@@ -12477,7 +12477,7 @@ BEGIN
|
||||
INTO v_stdmelding_key, v_stdmelding_uvt
|
||||
FROM mld_stdmelding sm, prs_kenmerklink kl
|
||||
WHERE kl.prs_link_key = v_perslid_key
|
||||
AND kl.prs_kenmerk_key = 1100 -- Stdmelding kenmerk tbv mail import
|
||||
AND kl.prs_kenmerk_key = 1100 -- Stdmelding kenmerk tbv mail import
|
||||
AND FAC.safe_to_number(kl.prs_kenmerklink_waarde) = sm.mld_stdmelding_key
|
||||
AND sm.mld_stdmelding_verwijder IS NULL;
|
||||
|
||||
@@ -12504,7 +12504,7 @@ BEGIN
|
||||
INTO v_stdmelding2_key, v_stdmelding2_uvt
|
||||
FROM mld_stdmelding sm, prs_kenmerklink kl
|
||||
WHERE kl.prs_link_key = v_perslid_key
|
||||
AND kl.prs_kenmerk_key = 1100 -- Stdmelding kenmerk tbv mail import
|
||||
AND kl.prs_kenmerk_key = 1100 -- Stdmelding kenmerk tbv mail import
|
||||
AND FAC.safe_to_number(kl.prs_kenmerklink_waarde) = sm.mld_stdmelding_key
|
||||
AND sm.mld_stdmelding_verwijder IS NULL;
|
||||
|
||||
@@ -12673,18 +12673,18 @@ BEGIN
|
||||
|
||||
v_errormsg := 'Fout bij toevoegen opdracht';
|
||||
INSERT INTO mld_opdr (mld_melding_key
|
||||
, prs_kostenplaats_key
|
||||
, mld_typeopdr_key
|
||||
, prs_perslid_key
|
||||
, mld_uitvoerende_keys
|
||||
, mld_opdr_datumbegin
|
||||
, mld_opdr_einddatum
|
||||
, mld_opdr_module
|
||||
, mld_opdr_omschrijving
|
||||
, mld_opdr_bedrijfopdr_volgnr
|
||||
, mld_opdr_teverzenden)
|
||||
VALUES ( v_melding_key
|
||||
, NULL
|
||||
, prs_kostenplaats_key
|
||||
, mld_typeopdr_key
|
||||
, prs_perslid_key
|
||||
, mld_uitvoerende_keys
|
||||
, mld_opdr_datumbegin
|
||||
, mld_opdr_einddatum
|
||||
, mld_opdr_module
|
||||
, mld_opdr_omschrijving
|
||||
, mld_opdr_bedrijfopdr_volgnr
|
||||
, mld_opdr_teverzenden)
|
||||
VALUES ( v_melding_key
|
||||
, NULL
|
||||
, v_typeopdr_key
|
||||
, v_perslid_key
|
||||
, v_bedrijf_key
|
||||
|
||||
Reference in New Issue
Block a user