admin/Customer
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

PCHA#64425 Aanpassing GBS import (meldingen zonder korting)

Browse Source 
svn path=/Customer/trunk/; revision=49165
This commit is contained in:
Sander Schepers
2020-12-11 16:48:35 +00:00
parent e32ed2e5e8
commit 9512c39e67
1 changed files with 38 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

45
PCHA/pcha.sql
View File

@@ -1463,6 +1463,7 @@ AS
v_date DATE;
v_sync_bericht6 NUMBER;
v_sync_bericht8 NUMBER;
v_korting NUMBER;
v_count NUMBER;
v_error NUMBER;
v_errormsg VARCHAR2 (100);
@@ -1479,6 +1480,7 @@ BEGIN
v_errormsg := '';
v_sync_bericht6 := 0;
v_sync_bericht8 := 0;
v_korting := 0;
-- Verwijder de Bounce Address Tag Validation
IF pfrom LIKE 'prvs=%'
@@ -1527,6 +1529,21 @@ BEGIN
errormsg := '(0x1452)';
CASE v_tag
WHEN 'MELDINGSGROEP'
THEN
CASE TRIM (UPPER (v_value))
WHEN 'FMIS FTRC (F)'
THEN
v_korting := 1;
WHEN 'FMIS V&G (V)'
THEN
v_korting := 1;
EXIT;
WHEN 'FMIS COMFORT'
THEN
v_korting := 0;
END CASE;
WHEN 'MELDINGSTEKST'
THEN
v_onderwerp := SUBSTR (v_value, 1, 60);
@@ -1550,13 +1567,27 @@ BEGIN
errormsg := '(0x1454)';
BEGIN
-- Zoek omschrijving op in eigen tabel met key 221
SELECT fac_usrdata_prijs
INTO v_stdmelding_key
FROM fac_usrdata
WHERE fac_usrdata_verwijder IS NULL
AND fac_usrdata_upper = TRIM (UPPER (v_value))
AND fac_usrtab_key = 221;
-- Zoek omschrijving op in eigen tabel met key 221 (met korting) of 501 (zonder korting)
CASE v_korting
WHEN 0
THEN
SELECT fac_usrdata_prijs
INTO v_stdmelding_key
FROM fac_usrdata
WHERE fac_usrdata_verwijder IS NULL
AND fac_usrdata_upper =
TRIM (UPPER (v_value))
AND fac_usrtab_key = 501; -- Hier staat de verwijzing naar de Stdmeldingen zonder korting
WHEN 1
THEN
SELECT fac_usrdata_prijs
INTO v_stdmelding_key
FROM fac_usrdata
WHERE fac_usrdata_verwijder IS NULL
AND fac_usrdata_upper =
TRIM (UPPER (v_value))
AND fac_usrtab_key = 221; -- Hier staat de verwijzing naar de Stdmeldingen met korting
END CASE;
EXCEPTION
WHEN NO_DATA_FOUND