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

FSN#39055 BCS/2000 functionaliteit in FACILITOR - customization

Browse Source 
svn path=/Customer/trunk/; revision=33980
This commit is contained in:
Erik Groener
2017-05-23 14:40:46 +00:00
parent a3879f9bb0
commit e3f0f30329
1 changed files with 12 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
TWYN/twyn.sql
View File

@@ -759,6 +759,7 @@ AS
s_onderdeel_nr VARCHAR2 (256); --038 ONNUMMER :onderdeel nummer
s_contract_nr VARCHAR2 (256); --067 CONUMMER
s_contract_volgnr VARCHAR2 (256); --068 COSUBNUMME
s_contract_kenmerk VARCHAR2 (256); --087 COKENMERK
BEGIN
fac.imp_getfield (v_newline, c_delim, v_factuur_nr);
fac.imp_getfield (v_newline, c_delim, v_factuur_volgnr);
@@ -797,6 +798,7 @@ AS
fac.imp_getfield_nr(v_searchline, c_delim, 38, s_onderdeel_nr);
fac.imp_getfield_nr(v_searchline, c_delim, 67, s_contract_nr);
fac.imp_getfield_nr(v_searchline, c_delim, 68, s_contract_volgnr);
fac.imp_getfield_nr(v_searchline, c_delim, 87, s_contract_kenmerk);
p_factuur_nr := fac.safe_To_Integer(v_factuur_nr);
p_factuur_volgnr := fac.safe_To_Integer(v_factuur_volgnr);
INSERT INTO twyn_imp_factuur
@@ -814,6 +816,7 @@ AS
bgt_factuur_status,
bgt_contract_nr,
bgt_contract_volgnr,
bgt_contract_referentie,
bgt_discipline_code,
bgt_project_code,
bgt_kostenrubriek_code,
@@ -835,6 +838,7 @@ AS
v_factuur_status,
s_contract_nr,
s_contract_volgnr,
s_contract_kenmerk,
s_project_nummer,
s_subproject_code,
s_rubriek_nr,
@@ -1048,7 +1052,7 @@ AS
SELECT mld_opdr_key
INTO a_opdr_key
FROM mld_opdr
WHERE mld_opdr_id = TO_CHAR(p_contract_nr)
WHERE mld_opdr_ordernr = TO_CHAR(p_contract_nr)
AND mld_opdr_bedrijfopdr_volgnr = TO_CHAR(p_contract_volgnr);
EXCEPTION
WHEN NO_DATA_FOUND THEN
@@ -1967,7 +1971,7 @@ AS
( l_rec.prs_kostenplaats_nr
, l_rec.prs_kostenplaats_oms
, TO_CHAR(l_rec.prs_kostenplaats_nr)
, 'BGT'
, 'PRJ'
, a_kostenplaatsgrp_key
)
RETURNING prs_kostenplaats_key INTO a_kostenplaats_key;
@@ -2056,6 +2060,7 @@ AS
l_opdr_key mld_opdr.mld_opdr_key%TYPE;
l_factuur_key fin_factuur.fin_factuur_key%TYPE;
l_btw_key fin_btwtabelwaarde.fin_btwtabelwaarde_key%TYPE;
l_refnr fin_factuur.fin_factuur_nr%TYPE;
l_kosten_keys KOSTEN_KEYS;
l_count_f NUMBER (10) := 0;
BEGIN
@@ -2071,6 +2076,10 @@ AS
, l_rec.prs_kostensoort_code);
l_opdr_key := get_opdr_key( l_rec.bgt_contract_nr
, l_rec.bgt_contract_volgnr);
l_refnr := l_rec.bgt_factuur_refnr;
IF (l_refnr = '' OR l_refnr IS NULL) THEN
l_refnr := 'F_' || l_rec.bgt_factuur_nr ||'.'|| l_rec.bgt_factuur_volgnr;
END IF;
IF (l_opdr_key > -1) THEN
g_errormsg := 'Fout bij toevoegen factuur['|| l_rec.bgt_factuur_nr ||']';
--
@@ -2087,7 +2096,7 @@ AS
, fin_factuur_statuses_key
)
VALUES
( l_rec.bgt_factuur_refnr
( l_refnr
, l_rec.bgt_factuur_datum
, TO_CHAR(l_rec.bgt_factuur_datum, 'yyyy-mm')
, l_rec.bgt_factuur_omschr