BVB1#88438 bvb1.processemail ondersteunt nu ook de standaardmelding objectregistratie.
svn path=/Customer/trunk/; revision=68733
This commit is contained in:
@@ -119,7 +119,17 @@ AS
|
||||
defaultstdmelding := 1861;
|
||||
kkey_att := 1;
|
||||
kkey_mail := 4661;
|
||||
WHEN UPPER (pto) LIKE 'OBJECTREGISTRATIE@%'
|
||||
THEN
|
||||
defaultstdmelding := 1981;
|
||||
kkey_att := 1;
|
||||
kkey_mail := 4661;
|
||||
ELSE
|
||||
NULL;
|
||||
END CASE;
|
||||
|
||||
IF defaultstdmelding IS NOT NULL
|
||||
THEN
|
||||
-- suggested extensions:
|
||||
-- check for MLDUSE-write autorisations
|
||||
-- parse the subject to find an appropriate stdmelding, if uniquely possible
|
||||
@@ -173,9 +183,7 @@ AS
|
||||
|
||||
mld.setmeldingstatus (newkey, 2, sender);
|
||||
END;
|
||||
ELSE
|
||||
NULL;
|
||||
END CASE;
|
||||
END IF;
|
||||
|
||||
IF errormsg IS NOT NULL
|
||||
THEN
|
||||
|
||||
Reference in New Issue
Block a user