LOGC#70641 -- Einddatum opnemen in projectoverzicht

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

LOGC/logc.sql

@@ -83,7 +83,7 @@ AS
 END;
 /
 
-CREATE OR REPLACE PROCEDURE logc_monthly 
+CREATE OR REPLACE PROCEDURE logc_monthly
 AS
     v_errorhint          VARCHAR2 (1000);
     v_errormsg           VARCHAR2 (1000);
@@ -796,6 +796,7 @@ IS
     v_ProjektManagerLogin    VARCHAR2 (100);
     v_SalesPersonNr          VARCHAR2 (100);
     v_NameSalesPerson        VARCHAR2 (100);
+    v_EndPlanTxt             VARCHAR2 (100);
     v_prs_kostenplaats_key   NUMBER (10);
 
     v_budgethouder_key       NUMBER (10);
@@ -881,6 +882,10 @@ BEGIN
                                      c_delim,
                                      18,
                                      v_NameSalesPerson);
+                fac.imp_getfield_nr (v_newline,
+                                     c_delim,
+                                     19,
+                                     v_EndPlanTxt);
 
                 IF (header_is_valid = 0)
                 THEN
@@ -1041,6 +1046,18 @@ BEGIN
                             v_ongeldig := 1;
                     END;
 
+                    v_errormsg :=
+                        'v_PlanEndTxt ongeldig ' || v_EndPlanTxt;
+
+                    IF v_EndPlanTxt IS NOT NULL AND FAC.safe_to_date (v_EndPlanTxt,'dd-mm-yyyy') IS NULL
+                    THEN
+                        v_ongeldig := 1;
+                        fac.imp_writelog (p_import_key,
+                                          'E',
+                                          v_aanduiding || v_errormsg,
+                                          'Regel wordt overgeslagen!');
+                    END IF;
+
                     -- We gaan eerst de kostenplaats aanpassen
                     IF v_ongeldig = 0
                     THEN
@@ -1121,6 +1138,7 @@ BEGIN
                                        SUBSTR (v_SalesPersonNr, 1, 10),
                                    NameSalesPerson =
                                        SUBSTR (v_NameSalesPerson, 1, 40),
+                                   End_plan = to_date (v_EndPlanTxt,'dd-mm-yyyy'),
                                    fac_import_key = p_import_key
                              WHERE prs_kostenplaats_key = v_kostenplaats_key;
 
@@ -1226,6 +1244,7 @@ AS
                projectmanager,
            p.namesalesperson
                salesconctact,
+           p.end_plan,
            i.fac_import_datum_gelezen
                syncdate,
            1 dummy
@@ -2522,7 +2541,7 @@ AS
    plan_uitvoertijd_sla||';'||
    melding_datum||';'||
    melding_einddatum_std||';'||
-   melding_accepted||';'||  
+   melding_accepted||';'||
    melding_afgemeld||';'||
    doorlooptijd_werkdgn||';'||
    sla_werkuren||';'||