CONN#16584

svn path=/Customer/trunk/; revision=14035

CONN/Once/CONN16584.sql

@@ -0,0 +1,92 @@
+--  CONN16584.sql
+--  Eenmalig script om een aantal kostensoorten te hernoemen
+--  Dat zijn gedefinieerde kostensoorten die niet met de hand konden worden hernoemd.
+--
+SET ECHO ON
+SET DEFINE OFF
+SPOOL xconn16584.lst
+PROMPT $Revision: 1 $
+
+-- Essentie: voor elk van de aangegeven paren (OUD, NIEUW):
+-- UPDATE fin_factuur SET prs_kostensoort_key=NEW WHERE prs_kostensoort_key=OUD;
+-- UPDATE ins_tab_discipline SET prs_kostensoort_key=NEW WHERE prs_kostensoort_key=OUD;
+-- UPDATE mld_stdmelding SET prs_kostensoort_key=NEW WHERE prs_kostensoort_key=OUD;
+-- DELETE FROM prs_kostensoort WHERE prs_kostensoort_key=OUD;
+
+CREATE OR REPLACE PROCEDURE sgf_conn16584 (oud IN NUMBER, nieuw IN NUMBER)
+AS
+BEGIN
+   UPDATE   fin_factuur
+      SET   prs_kostensoort_key = nieuw
+    WHERE   prs_kostensoort_key = oud;
+
+   UPDATE   ins_tab_discipline
+      SET   prs_kostensoort_key = nieuw
+    WHERE   prs_kostensoort_key = oud;
+
+   UPDATE   mld_stdmelding
+      SET   prs_kostensoort_key = nieuw
+    WHERE   prs_kostensoort_key = oud;
+  
+  DELETE FROM prs_kostensoort WHERE prs_kostensoort_key = oud;
+
+END;
+/
+-- We gebruiken key 2 (weet zeker dat die vrij is) voor een VERVALLEN kostenplaats
+INSERT INTO prs_kostensoort (prs_kostensoort_key, prs_kostensoort_oms, prs_kostensoort_opmerking, prs_kostensoort_refcode) VALUES (2, 'N0000', 'VERVALLLEN', 'VERVALLLEN');
+
+BEGIN SGF_CONN16584(    363 ,   461 ); END;
+/
+BEGIN SGF_CONN16584(    361 ,   461 ); END;
+/
+BEGIN SGF_CONN16584(    362 ,   461 ); END;
+/
+BEGIN SGF_CONN16584(    65  ,   22  ); END;
+/
+BEGIN SGF_CONN16584(    66  ,   61  ); END;
+/
+BEGIN SGF_CONN16584(    228 ,   226 ); END;
+/
+BEGIN SGF_CONN16584(    230 ,   76  ); END;
+/
+BEGIN SGF_CONN16584(    501 ,   236 ); END;
+/
+BEGIN SGF_CONN16584(    237 ,   2); END;
+/
+BEGIN SGF_CONN16584(    80  ,   2); END;
+/
+BEGIN SGF_CONN16584(    240 ,   42  ); END;
+/
+BEGIN SGF_CONN16584(    241 ,   506 ); END;
+/
+BEGIN SGF_CONN16584(    245 ,   81  ); END;
+/
+BEGIN SGF_CONN16584(    246 ,   81  ); END;
+/
+BEGIN SGF_CONN16584(    270 ,   269 ); END;
+/
+BEGIN SGF_CONN16584(    271 ,   269 ); END;
+/
+BEGIN SGF_CONN16584(    279 ,   276 ); END;
+/
+BEGIN SGF_CONN16584(    286 ,   2); END;
+/
+BEGIN SGF_CONN16584(    293 ,   264 ); END;
+/
+BEGIN SGF_CONN16584(    295 ,   273 ); END;
+/
+BEGIN SGF_CONN16584(    296 ,   273 ); END;
+/
+BEGIN SGF_CONN16584(    507 ,   226 ); END;
+/
+BEGIN SGF_CONN16584(    401 ,   364 ); END;
+/
+BEGIN SGF_CONN16584(    402 ,   364 ); END;
+/
+BEGIN SGF_CONN16584(    301 ,   83  ); END;
+/
+COMMIT;
+
+DROP PROCEDURE sgf_conn16584;
+
+SPOOL OFF