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

UWVA#718

Browse Source 
svn path=/Customer/trunk/; revision=13123
This commit is contained in:
Peter Feij
2006-11-29 10:17:04 +00:00
parent 69683c60cb
commit d9bb1e0296
2 changed files with 12 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
UWVA/Once/uwva4615to6.sql
View File

@@ -1,6 +1,6 @@
SET ECHO ON
SPOOL xuwva4615to6.lst
PROMPT $Revision: 8 $
PROMPT $Revision: 9 $
-- UWVA#693
UPDATE web_user_mess_text SET web_user_mess_text_code='UPDMLD' WHERE web_user_mess_text_code='UPDMLx';
@@ -82,8 +82,8 @@ INSERT INTO FAC_USRRAP
-- UWVA#718
UPDATE prs_kostenplaats
SET prs_kostenplaats_nr = SUBSTR ('INACTIEF:' || prs_kostenplaats_nr, 1, 30)
WHERE prs_kostenplaats_verwijder IS NOT NULL AND prs_kostenplaats_nr NOT LIKE 'INACTIEF:%';
SET prs_kostenplaats_omschrijving = SUBSTR ('INACTIEF:' || prs_kostenplaats_omschrijving, 1, 60)
WHERE prs_kostenplaats_verwijder IS NOT NULL AND prs_kostenplaats_omschrijving NOT LIKE 'INACTIEF:%';
COMMIT ;

19
UWVA/uwva.sql
View File

@@ -1,7 +1,7 @@
-- Script containing customer specific configuration sql statements for UWVA: UWV Amsterdam
-- (c) 2005-2006 Facilitor Projects vof
-- $Revision: 99 $
-- $Modtime: 22-11-06 12:35 $
-- $Revision: 100 $
-- $Modtime: 29-11-06 11:58 $
--
-- Support: +31 53 4800700
@@ -492,7 +492,7 @@ BEGIN
INTO currentversion
FROM fac_module;
fac.imp_writelog (p_applname, p_applrun, 'I', 'Facilitor KPN import version ' || currentversion, '$Revision: 99 $');
fac.imp_writelog (p_applname, p_applrun, 'I', 'Facilitor KPN import version ' || currentversion, '$Revision: 100 $');
-- How many active records are now present?
SELECT COUNT (*)
@@ -583,7 +583,7 @@ BEGIN
SELECT k.prs_kostenplaats_key
INTO lkostenplaatskey
FROM prs_kostenplaats k
WHERE REPLACE(k.prs_kostenplaats_upper,'INACTIEF:','') = UPPER (rc.afdeling);
WHERE k.prs_kostenplaats_upper = UPPER (rc.afdeling);
EXCEPTION
WHEN NO_DATA_FOUND
THEN
@@ -611,7 +611,7 @@ BEGIN
SELECT MIN (k.prs_kostenplaats_key)
INTO lkostenplaatskey
FROM prs_kostenplaats k
WHERE REPLACE(k.prs_kostenplaats_upper,'INACTIEF:','') = UPPER (rc.afdeling);
WHERE k.prs_kostenplaats_upper = UPPER (rc.afdeling);
END;
END;
@@ -662,9 +662,8 @@ BEGIN
WHERE prs_kostenplaats_key = lkostenplaatskey;
ELSE
UPDATE prs_kostenplaats
SET prs_kostenplaats_omschrijving = rc.omschrijving,
prs_kostenplaats_verwijder = SYSDATE,
prs_kostenplaats_nr = SUBSTR ('INACTIEF:' || prs_kostenplaats_nr, 1, 30)
SET prs_kostenplaats_omschrijving = SUBSTR ('INACTIEF:' || rc.omschrijving, 1, 60),
prs_kostenplaats_verwijder = SYSDATE
WHERE prs_kostenplaats_key = lkostenplaatskey AND prs_kostenplaats_verwijder IS NULL;
l_inactivated := (1 = 1);
@@ -1574,7 +1573,7 @@ BEGIN
INTO currentversion
FROM fac_module;
fac.imp_writelog (p_applname, p_applrun, 'I', 'Facilitor PVIEW import version ' || currentversion, '$Revision: 99 $');
fac.imp_writelog (p_applname, p_applrun, 'I', 'Facilitor PVIEW import version ' || currentversion, '$Revision: 100 $');
-- -- #Import
SELECT DECODE (COUNT (*), 0, 1, COUNT (*)) -- DECODE ivm vermijden deling door 0
@@ -5452,7 +5451,7 @@ BEGIN
INTO currentversion
FROM fac_module;
fac.imp_writelog (p_applname, p_applrun, 'I', 'Facilitor BUDGETH import version ' || currentversion, '$Revision: 99 $');
fac.imp_writelog (p_applname, p_applrun, 'I', 'Facilitor BUDGETH import version ' || currentversion, '$Revision: 100 $');
FOR NEXT_RECORD IN c_cursor
LOOP