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

AAIT#75947 Voor kenmerken bij facturen ontbreekt het transportrapportje

Browse Source 
svn path=/Database/trunk/; revision=59746
This commit is contained in:
Erik Groener
2023-03-24 08:41:20 +00:00
parent d2489396f6
commit ccd41b5c73
5 changed files with 147 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
FAC/FAC_INI.SRC
View File

@@ -2458,6 +2458,8 @@ DEF_RAPPORT('WEB_PRSSYS', 0, 'fac_v_exp_flex_mld', 'TRANSPORT: Flexkenme
'TRANSPORT: Flex properties Calls', 'Export of flex properties for MLD (per department (type)/report/order type)')
DEF_RAPPORT('WEB_PRSSYS', 0, 'fac_v_exp_flex_cnt', 'TRANSPORT: Flexkenmerken Contracten', 'Exporteren van flexkenmerken voor CNT (per contractsoort)',
'TRANSPORT: Flex properties Contracts', 'Export of flex properties for CNT (per contract type)')
DEF_RAPPORT('WEB_PRSSYS', 0, 'fac_v_exp_flex_fin', 'TRANSPORT: Flexkenmerken Facturen', 'Exporteren van flexkenmerken voor FIN',
'TRANSPORT: Flex properties Invoices', 'Export of flex properties for FIN')
DEF_RAPPORT('WEB_FACTAB', 0, 'fac_v_usage_statistics', 'Gebruik statistieken 90 dagen', 'Basisrapport voor gebruik statistieken',
'Use statistics for 90 days', 'Basic report for usage statistics')
DEF_RAPPORT('WEB_FACTAB', 0, 'fac_v_usage_statistics_all', 'Gebruik statistieken historisch', 'Historisch gebruik statistieken',

104
FAC/FAC_PACF.SRC
View File

@@ -17171,6 +17171,9 @@ BEGIN
AND UPPER (v_deflevel3) = 'OBJECTSOORT'
THEN
flexmodule := 'INS';
ELSIF UPPER (v_deflevel1) = 'FACTUUR'
THEN
flexmodule := 'FIN';
END IF;
END IF;
ELSE
@@ -17250,7 +17253,8 @@ BEGIN
cnt_discipline,
ins_discipline,
ins_srtgroep,
ins_srtdeel -- 45
ins_srtdeel, -- 45
kenmerk_module
)
VALUES (
SUBSTR (v_fac_kenmerkdomein_omschr, 1, 255), -- 1
@@ -17297,7 +17301,8 @@ BEGIN
v_cnt_discipline,
v_ins_discipline,
v_ins_srtgroep,
v_ins_srtdeel -- 45
v_ins_srtdeel, -- 45
flexmodule
);
v_count_import := v_count_import + 1;
@@ -17408,7 +17413,7 @@ BEGIN
ELSIF rec.ins_discipline IS NOT NULL THEN
flexmodule := 'INS';
ELSE
flexmodule := 'MLD';
flexmodule := rec.kenmerk_module; -- MLD, FIN, ...
END IF;
v_kenmerkdomein_key := NULL;
@@ -18351,6 +18356,99 @@ BEGIN
fac.imp_writelog (p_import_key, 'I', 'Kenmerk bijgewerkt', v_desc || ' (' || v_kenmerk_key || ')');
END IF;
WHEN 'FIN' THEN
-- Bestaat dit kenmerk al?
v_desc := rec.kenmerk_omschr;
v_errormsg := 'Fout bij bepalen kenmerk ' || v_desc;
SELECT COUNT (*), MIN(fin_kenmerk_key)
INTO v_count, v_kenmerk_key
FROM fin_kenmerk
WHERE (fin_kenmerk_omschrijving = rec.kenmerk_omschr
OR (rec.kenmerk_omschr IS NULL AND fin_kenmerk_omschrijving IS NULL));
IF (v_count = 0)
THEN
-- Bestaat nog niet --> aanmaken
v_errormsg := 'Fout bij toevoegen kenmerk ' || v_desc;
INSERT INTO fin_kenmerk (
fin_kenmerk_kenmerktype,
fin_kenmerk_systeem,
fin_kenmerk_lengte,
fin_kenmerk_dec,
fin_kenmerk_nmin,
fin_kenmerk_nmax,
fin_kenmerk_dimensie,
fin_kenmerk_type,
fin_kenmerk_verplicht,
fin_kenmerk_volgnr,
fin_kenmerk_groep,
fin_kenmerk_default,
fin_kenmerk_verwijder,
fin_kenmerk_toonbaar,
fin_kenmerk_uniek,
fin_kenmerk_hint,
fin_kenmerk_regexp,
fin_kenmerk_show_expr,
fin_kenmerk_code,
fin_kenmerk_omschrijving
)
VALUES (
rec.srtkenmerk_kenmerktype,
rec.srtkenmerk_systeem,
rec.srtkenmerk_lengte,
rec.srtkenmerk_dec,
rec.srtkenmerk_nmin,
rec.srtkenmerk_nmax,
rec.srtkenmerk_dimensie,
rec.kenmerk_type,
fac.safe_to_number (rec.kenmerk_verplicht),
fac.safe_to_number (rec.kenmerk_volgnummer),
fac.safe_to_number (rec.kenmerk_groep),
rec.kenmerk_default,
TO_DATE (rec.kenmerk_verwijder, 'YYYY-MM-DD HH24:MI:SS'),
fac.safe_to_number (rec.kenmerk_toonbaar),
fac.safe_to_number (rec.kenmerk_uniek),
rec.kenmerk_hint,
rec.kenmerk_regexp,
rec.kenmerk_show_expr,
rec.kenmerk_code,
rec.kenmerk_omschr
)
RETURNING fin_kenmerk_key
INTO v_kenmerk_key;
fac.imp_writelog (p_import_key, 'I', 'Kenmerk toegevoegd', v_desc || ' (' || v_kenmerk_key || ')');
ELSE
-- Bestaat al wel --> updaten (dat kan ook verwijderen zijn!)
v_errormsg := 'Fout bij bijwerken kenmerk ' || v_desc;
UPDATE fin_kenmerk
SET fin_kenmerk_kenmerktype = rec.srtkenmerk_kenmerktype,
fin_kenmerk_systeem = rec.srtkenmerk_systeem,
fin_kenmerk_lengte = rec.srtkenmerk_lengte,
fin_kenmerk_dec = rec.srtkenmerk_dec,
fin_kenmerk_nmin = rec.srtkenmerk_nmin,
fin_kenmerk_nmax = rec.srtkenmerk_nmax,
fin_kenmerk_dimensie = rec.srtkenmerk_dimensie,
fin_kenmerk_type = rec.kenmerk_type,
fin_kenmerk_verplicht = fac.safe_to_number (rec.kenmerk_verplicht),
fin_kenmerk_groep = fac.safe_to_number (rec.kenmerk_groep),
fin_kenmerk_volgnr = fac.safe_to_number (rec.kenmerk_volgnummer),
fin_kenmerk_default = rec.kenmerk_default,
fin_kenmerk_verwijder = TO_DATE (rec.kenmerk_verwijder, 'YYYY-MM-DD HH24:MI:SS'),
fin_kenmerk_toonbaar = fac.safe_to_number (rec.kenmerk_toonbaar),
fin_kenmerk_uniek = fac.safe_to_number (rec.kenmerk_uniek),
fin_kenmerk_hint = rec.kenmerk_hint,
fin_kenmerk_regexp = rec.kenmerk_regexp,
fin_kenmerk_show_expr = rec.kenmerk_show_expr,
fin_kenmerk_code = rec.kenmerk_code,
fin_kenmerk_omschrijving = rec.kenmerk_omschr
WHERE fin_kenmerk_key = v_kenmerk_key
AND fin_kenmerk_verwijder IS NULL;
fac.imp_writelog (p_import_key, 'I', 'Kenmerk bijgewerkt', v_desc || ' (' || v_kenmerk_key || ')');
END IF;
END CASE;
END;

3
FAC/FAC_TAB.SRC
View File

@@ -1762,7 +1762,8 @@ CREATE_TABLE(fac_imp_flex, 0)
ins_discipline VARCHAR2(255),
ins_srtgroep VARCHAR2(255),
ins_srtdeel VARCHAR2(255),
kenmerk_wissen NUMBER(1)
kenmerk_wissen NUMBER(1),
kenmerk_module VARCHAR2(3)
);
CREATE_TABLE (fac_kenmwaarden, 0)

40
FAC/FAC_VIE.SRC
View File

@@ -2258,8 +2258,46 @@ AS
AND fut.fac_usrtab_key(+) = kmd.fac_usrtab_key
AND sc.ctr_discipline_key = cdp.ctr_ins_discipline_key);
CREATE_VIEW(fac_v_exp_flex_fin, 0)
AS
SELECT fac_kenmerkdomein_omschrijving,
fac_kenmerkdomein_objectnaam,
fac_kenmerkdomein_kolomnaam,
fac_kenmerkdomein_kolomtxt,
fac_usrtab_naam,
NULL srtkenmerk_code,
NULL srtkenmerk_omschrijving,
km.fin_kenmerk_kenmerktype srtkenmerk_kenmerktype,
km.fin_kenmerk_systeem srtkenmerk_systeem,
km.fin_kenmerk_lengte srtkenmerk_lengte,
km.fin_kenmerk_dec srtkenmerk_dec,
km.fin_kenmerk_nmin srtkenmerk_nmin,
km.fin_kenmerk_nmax srtkenmerk_nmax,
km.fin_kenmerk_dimensie srtkenmerk_dimensie,
km.fin_kenmerk_type kenmerk_type,
NULL kenmerk_niveau,
km.fin_kenmerk_verplicht kenmerk_verplicht,
km.fin_kenmerk_groep kenmerk_groep,
km.fin_kenmerk_volgnr kenmerk_volgnummer,
km.fin_kenmerk_default kenmerk_default,
km.fin_kenmerk_toonbaar kenmerk_toonbaar,
km.fin_kenmerk_uniek kenmerk_uniek,
km.fin_kenmerk_hint kenmerk_hint,
km.fin_kenmerk_regexp kenmerk_regexp,
km.fin_kenmerk_show_expr kenmerk_show_expr,
km.fin_kenmerk_code kenmerk_code,
km.fin_kenmerk_omschrijving kenmerk_omschr,
TO_CHAR (km.fin_kenmerk_verwijder, 'YYYY-MM-DD HH24:MI:SS') kenmerk_verwijder,
NULL factuur
FROM fin_kenmerk km,
fac_kenmerkdomein kmd,
fac_usrtab fut
WHERE km.fac_kenmerkdomein_key = kmd.fac_kenmerkdomein_key(+)
AND kmd.fac_usrtab_key = fut.fac_usrtab_key(+)
AND km.fin_kenmerk_verwijder IS NULL
AND kmd.fac_kenmerkdomein_verwijder IS NULL;
-- Rapporten worden niet standaard aangemaakt bij gebruikerrs
-- Rapporten worden niet standaard aangemaakt bij gebruikers
CREATE_VIEW(fac_v_rap_lcl_lang, 0) AS
SELECT nl.fac_locale_xsl_label fclt_f_label,
nl.fac_locale_xsl_module module,

3
_UP/DB44to45.src
View File

@@ -220,6 +220,9 @@ UPDATE fac_localeitems
WHERE fac_localeitems_dialect_id = 'MLD_TYPEOPDR_KEY'
AND fac_localeitems_lcl = 'lcl_menu_mld_fe_3';
/////////////////////////////////////////////////////////////////////////////////////////// AAIT#75947
ALTER TABLE fac_imp_flex ADD kenmerk_module VARCHAR2(3);
/////////////////////////////////////////////////////////////////////////////////////////// FCLT#00000
REGISTERONCE('$Id$')