TWYN#83949 niet kunnen verwijderen kostensoortgroepen

svn path=/Database/trunk/; revision=65037

FAC/FAC_PACX.SRC

@@ -10718,8 +10718,10 @@ AS
          SELECT prs_kostensoort_key
            FROM prs_kostensoort
           WHERE prs_kostensoortgrp_key = p_key;
-      v_oms      prs_kostensoortgrp.prs_kostensoortgrp_oms%TYPE;
-      v_altcode  prs_kostensoortgrp.prs_kostensoortgrp_altcode%TYPE;
+
+      v_oms        prs_kostensoortgrp.prs_kostensoortgrp_oms%TYPE;
+      v_altcode    prs_kostensoortgrp.prs_kostensoortgrp_altcode%TYPE;
+      v_verwijder  prs_kostensoortgrp.prs_kostensoortgrp_verwijder%TYPE;
    BEGIN
       IF p_key IS NOT NULL
       THEN
@@ -10730,14 +10732,17 @@ AS
          --
          SELECT prs_kostensoortgrp_altcode
               , prs_kostensoortgrp_oms
+              , prs_kostensoortgrp_verwijder
            INTO v_altcode
               , v_oms
+              , v_verwijder
            FROM prs_kostensoortgrp
           WHERE prs_kostensoortgrp_key = p_key;
          createopentag ('kostengroep');
          createxmltagvalue ('key', mynumbertochar (p_key));
          createxmltagvalue ('code', v_altcode);
          createxmltagvalue ('name', v_oms);
+         mydatetochar ('verwijder', v_verwijder);
          FOR rec1 IN c_soort
          LOOP
             create_prs_kostensoort_node (rec1.prs_kostensoort_key, TRUE);

PRS/PRS_TAB.SRC

@@ -1346,7 +1346,9 @@ CREATE_TABLE(prs_kostensoortgrp,0) (
        VARCHAR2(60)
        NOT NULL,
    prs_kostensoortgrp_altcode
-       VARCHAR2(60)
+       VARCHAR2(60),
+   prs_kostensoortgrp_verwijder
+       DATE
 );
 
 CREATE_TABLE(prs_kostensoort,0) (

_UP/DB47to48.src

@@ -403,6 +403,9 @@ UPDATE fac_setting
    SET fac_setting_pvalue = NULL
  WHERE fac_setting_name = 'fac_reserved_number1';
 
+/////////////////////////////////////////////////////////////////////////////////////////// TWYN#83949
+ALTER TABLE prs_kostensoortgrp ADD prs_kostensoortgrp_verwijder DATE;
+
 /////////////////////////////////////////////////////////////////////////////////////////// FCLT#00000
 
 REGISTERONCE('$Id$')