CWTD#36142 e-mail uit Outlook omzetten naar meldingen in FM Portal servicedesk

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

CWTD/cwtd.sql

@@ -1217,7 +1217,8 @@ CREATE OR REPLACE PROCEDURE cwtd_processemail ( pfrom      IN VARCHAR2,
                                                 pto        IN VARCHAR2,
                                                 psubject   IN VARCHAR2,
                                                 pbody      IN VARCHAR2,
-                                                psessionid IN VARCHAR2)
+                                                psessionid IN VARCHAR2,
+                                                puserkey   IN NUMBER DEFAULT NULL)
 AS
    v_count              NUMBER;
    sender               prs_perslid.prs_perslid_key%TYPE;
@@ -1336,6 +1337,11 @@ BEGIN
             END IF;
 
             mld.setmeldingstatus (newkey, 2, sender);
+            INSERT INTO fac_result (
+               fac_result_sessionid,
+               fac_result_naam,
+               fac_result_waarde)
+            VALUES (psessionid, 'maillog', 'Geregistreerd onder melding ' || newkey);
          END;
       ELSE
          NULL;