FSN#38916 FACFAC Superuser alle tabellen kunnen bekijken

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

MLD/MLD_PAC.SRC

@@ -22,6 +22,7 @@ CREATE OR REPLACE PACKAGE mld AS
   PROCEDURE mld_nextworkflowstep     (p_melding_key        IN NUMBER
                                      ,p_success            IN NUMBER);
   FUNCTION getlowestobjectuitvoer    (p_melding_key        IN NUMBER) RETURN NUMBER;
+  FUNCTION uitvoertijd_to_char       (uitvoertijd          IN MLD_T_UITVOERTIJD) RETURN VARCHAR;
   FUNCTION geteinddatum              (startdate            IN DATE,
                                       stdm_key             IN NUMBER,
                                       prio                 IN NUMBER,
@@ -1612,6 +1613,15 @@ CREATE OR REPLACE PACKAGE BODY mld AS
        RETURN v_actual_uitvoertijd_object;
     END;
 
+    FUNCTION uitvoertijd_to_char (uitvoertijd          IN MLD_T_UITVOERTIJD)
+       RETURN VARCHAR
+    AS BEGIN
+       IF uitvoertijd IS NULL THEN
+           RETURN NULL;
+       END IF;
+       RETURN '(' || uitvoertijd.tijdsduur || '; ' || uitvoertijd.eenheid || ')';
+    END;
+
     -- bereken de SLA-einddatum gegeven onderstaande info
     FUNCTION geteinddatum (startdate            IN DATE,
                            stdm_key             IN NUMBER,