AAIT#78367 -- inkoopinterface en kenmerken voor afsluiting boekjaar
svn path=/Customer/; revision=62234
This commit is contained in:
Jos Migo
234
onces/AA/AAXX/AAXX#78367_kenmerken_bedrijf.sql
Normal file
234
onces/AA/AAXX/AAXX#78367_kenmerken_bedrijf.sql
Normal file
@@ -0,0 +1,234 @@
|
||||
--
|
||||
-- $Id$
|
||||
--
|
||||
-- ONCESCRIPT om binnen de klantomgevingen met inkoopinterface bij het bedrijf de financiele kenmerken aan te maken
|
||||
|
||||
DEFINE thisfile = 'AAXX#78367_kenmerken_bedrijf.SQL'
|
||||
DEFINE dbuser = 'AAXX'
|
||||
|
||||
SET ECHO ON
|
||||
SET DEFINE ON
|
||||
COLUMN fcltlogfile NEW_VALUE fcltlogfile NOPRINT;
|
||||
COLUMN fcltcusterr NEW_VALUE fcltcusterr NOPRINT;
|
||||
WHENEVER SQLERROR CONTINUE;
|
||||
SELECT adm.getscriptspoolfile('&thisfile') AS fcltlogfile FROM DUAL;
|
||||
SPOOL &fcltlogfile
|
||||
WHENEVER SQLERROR EXIT;
|
||||
SELECT adm.checkscriptcust('&dbuser') AS fcltcusterr FROM DUAL;
|
||||
WHENEVER SQLERROR CONTINUE;
|
||||
PROMPT &fcltcusterr
|
||||
SET DEFINE OFF
|
||||
|
||||
------ payload begin ------
|
||||
|
||||
DECLARE
|
||||
v_errormsg VARCHAR (200);
|
||||
v_errorhint VARCHAR (200);
|
||||
oracle_err_num NUMBER;
|
||||
oracle_err_mes VARCHAR2 (150);
|
||||
currentversion fac_module.fac_module_version%TYPE;
|
||||
v_aanduiding VARCHAR (100);
|
||||
v_count NUMBER;
|
||||
|
||||
-- Per klantomgeving te vullen
|
||||
v_cust_code VARCHAR2 (100) := 'xxxx' ;
|
||||
|
||||
--- Overige
|
||||
v_prs_kenmerk_key_boekdatum NUMBER (10);
|
||||
v_prs_kenmerk_key_auto_run NUMBER (10);
|
||||
|
||||
BEGIN
|
||||
|
||||
-- klantcode
|
||||
SELECT upper(fac_version_cust)
|
||||
INTO v_cust_code
|
||||
FROM fac_version;
|
||||
|
||||
-- Klantomgevingen met fac_api_name = 'MARX_FIN_FACTUUR' zijn: 'AAAR', 'AADS', 'AAES', 'AAGN', 'AAIT', 'AASA', 'EXPO', 'INLO', 'NMMS', 'RABO', 'REME', 'SMKA'
|
||||
|
||||
IF v_cust_code IN ('AAXX', 'AAAR', 'AADS', 'AAES', 'AAGN', 'AAIT', 'AASA', 'EXPO', 'INLO', 'NMMS', 'RABO', 'REME', 'SMKA') THEN
|
||||
|
||||
|
||||
-- Aanmaken bedrijfskenmerken
|
||||
|
||||
INSERT INTO prs_kenmerk (prs_kenmerk_niveau,
|
||||
prs_kenmerk_volgnr,
|
||||
prs_kenmerk_omschrijving,
|
||||
prs_kenmerk_hint,
|
||||
prs_kenmerk_dimensie,
|
||||
prs_kenmerk_kenmerktype,
|
||||
prs_kenmerk_verplicht,
|
||||
prs_kenmerk_groep,
|
||||
prs_kenmerk_toonbaar,
|
||||
prs_kenmerk_systeem,
|
||||
prs_kenmerk_inlijst,
|
||||
prs_kenmerk_lengte,
|
||||
prs_kenmerk_dec,
|
||||
prs_kenmerk_nmin,
|
||||
prs_kenmerk_nmax,
|
||||
prs_srtperslid_key,
|
||||
fac_kenmerkdomein_key,
|
||||
prs_kenmerk_default,
|
||||
prs_kenmerk_show_expr,
|
||||
prs_kenmerk_regexp,
|
||||
prs_kenmerk_code,
|
||||
fac_functie_key)
|
||||
VALUES ('B',
|
||||
300,
|
||||
'Financieel 2.0',
|
||||
NULL,
|
||||
NULL,
|
||||
'l',
|
||||
NULL,
|
||||
0,
|
||||
NULL,
|
||||
0,
|
||||
0,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
'fa-circle-euro',
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL) ;
|
||||
|
||||
|
||||
SELECT MAX(prs_kenmerk_key)
|
||||
INTO v_prs_kenmerk_key_boekdatum
|
||||
FROM prs_kenmerk
|
||||
WHERE prs_kenmerk_code = 'EXACT_BOEKDATUM' AND prs_kenmerk_verwijder IS NULL AND prs_kenmerk_niveau = 'B' ;
|
||||
|
||||
IF v_prs_kenmerk_key_boekdatum IS NULL
|
||||
THEN
|
||||
|
||||
INSERT INTO prs_kenmerk (prs_kenmerk_niveau,
|
||||
prs_kenmerk_volgnr,
|
||||
prs_kenmerk_omschrijving,
|
||||
prs_kenmerk_hint,
|
||||
prs_kenmerk_dimensie,
|
||||
prs_kenmerk_kenmerktype,
|
||||
prs_kenmerk_verplicht,
|
||||
prs_kenmerk_groep,
|
||||
prs_kenmerk_toonbaar,
|
||||
prs_kenmerk_systeem,
|
||||
prs_kenmerk_inlijst,
|
||||
prs_kenmerk_lengte,
|
||||
prs_kenmerk_dec,
|
||||
prs_kenmerk_nmin,
|
||||
prs_kenmerk_nmax,
|
||||
prs_srtperslid_key,
|
||||
fac_kenmerkdomein_key,
|
||||
prs_kenmerk_default,
|
||||
prs_kenmerk_show_expr,
|
||||
prs_kenmerk_regexp,
|
||||
prs_kenmerk_code,
|
||||
fac_functie_key)
|
||||
VALUES (
|
||||
'B',
|
||||
305,
|
||||
'Boekjaar klant afgerond - T/M',
|
||||
'Voor de inkoopinterface worden alle verplichtingen die voor deze datum liggen NIET meegenomen naar EXACT'
|
||||
|| CHR(10) || CHR(13)
|
||||
|| 'Bepaling boekjaar:'
|
||||
|| CHR(10)
|
||||
|| '- Contract-startdatum' || CHR(10)
|
||||
|| '- Opdrachtdatum' || CHR(10)
|
||||
|| '- Besteldatum',
|
||||
NULL,
|
||||
'D',
|
||||
NULL,
|
||||
0,
|
||||
NULL,
|
||||
0,
|
||||
1,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
'EXACT_BOEKDATUM',
|
||||
NULL) ;
|
||||
|
||||
END IF;
|
||||
|
||||
SELECT MAX(prs_kenmerk_key)
|
||||
INTO v_prs_kenmerk_key_auto_run
|
||||
FROM prs_kenmerk
|
||||
WHERE prs_kenmerk_code = 'EXACT_INKOOPRUN' AND prs_kenmerk_verwijder IS NULL AND prs_kenmerk_niveau = 'B' ;
|
||||
|
||||
IF v_prs_kenmerk_key_auto_run IS NULL
|
||||
THEN
|
||||
|
||||
|
||||
INSERT INTO prs_kenmerk (prs_kenmerk_niveau,
|
||||
prs_kenmerk_volgnr,
|
||||
prs_kenmerk_omschrijving,
|
||||
prs_kenmerk_hint,
|
||||
prs_kenmerk_dimensie,
|
||||
prs_kenmerk_kenmerktype,
|
||||
prs_kenmerk_verplicht,
|
||||
prs_kenmerk_groep,
|
||||
prs_kenmerk_toonbaar,
|
||||
prs_kenmerk_systeem,
|
||||
prs_kenmerk_inlijst,
|
||||
prs_kenmerk_lengte,
|
||||
prs_kenmerk_dec,
|
||||
prs_kenmerk_nmin,
|
||||
prs_kenmerk_nmax,
|
||||
prs_srtperslid_key,
|
||||
fac_kenmerkdomein_key,
|
||||
prs_kenmerk_default,
|
||||
prs_kenmerk_show_expr,
|
||||
prs_kenmerk_regexp,
|
||||
prs_kenmerk_code,
|
||||
fac_functie_key)
|
||||
VALUES (
|
||||
'B',
|
||||
310,
|
||||
'Inkoopinterface - Automatisch',
|
||||
'Dagelijks om 19:00 wordt er automatische voor de omgeving een inkooprun gedraaid',
|
||||
NULL,
|
||||
'V',
|
||||
NULL,
|
||||
0,
|
||||
NULL,
|
||||
0,
|
||||
1,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
NULL,
|
||||
'EXACT_INKOOPRUN',
|
||||
NULL) ;
|
||||
|
||||
END IF;
|
||||
|
||||
END IF;
|
||||
|
||||
END;
|
||||
/
|
||||
|
||||
------ payload end ------
|
||||
|
||||
SET DEFINE OFF
|
||||
BEGIN adm.systrackscriptId ('$Id$', 1); END;
|
||||
/
|
||||
|
||||
COMMIT;
|
||||
SET ECHO OFF
|
||||
SPOOL OFF
|
||||
SET DEFINE ON
|
||||
PROMPT Logfile of this upgrade is: &fcltlogfile
|
||||
Reference in New Issue
Block a user