FCLT#75963 -- RWS inzage geven in de urenbesteding via Logcenter

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

LOGC/logc.sql

@@ -1175,6 +1175,13 @@ BEGIN
                                           'Regel wordt overgeslagen!');
                     END IF;
 
+                    -- Debeteuren die via Protinus lopen geven we een suffix met de klantcode
+                    -- Anders kunnen we de klanten geen rechten geven om de eigen uren te mogen inzien.
+                    IF v_Debiteur = '2002888'
+                    THEN
+                       v_Debiteur := v_Debiteur || '-' || SUBSTR(v_Omschrijving,1,4);
+                    END IF;
+
                     -- We gaan eerst de kostenplaats aanpassen
                     IF v_ongeldig = 0
                     THEN
@@ -1236,7 +1243,7 @@ BEGIN
                                    Omschrijving =
                                        SUBSTR (v_Omschrijving, 1, 100),
                                    Status = SUBSTR (v_Status, 1, 1),
-                                   Debiteur = SUBSTR (v_Debiteur, 1, 10),
+                                   Debiteur = SUBSTR (v_Debiteur, 1, 15),
                                    PlanWorktime =
                                        FAC.safe_to_number (v_PlanWorktime),
                                    ActualWorktime =