contact: preset language in "new contact"-action

entity/Contact_entity/Contact_entity.aod

@@ -127,6 +127,8 @@
       <title>Language</title>
       <consumer>Languages</consumer>
       <mandatory v="true" />
+      <valueProcess>%aditoprj%/entity/Contact_entity/entityfields/language/valueProcess.js</valueProcess>
+      <displayValueProcess>%aditoprj%/entity/Contact_entity/entityfields/language/displayValueProcess.js</displayValueProcess>
     </entityField>
     <entityConsumer>
       <name>Languages</name>
@@ -189,6 +191,12 @@
         </entityParameter>
       </children>
     </entityConsumer>
+    <entityParameter>
+      <name>LanguageKey_param</name>
+      <valueProcess>%aditoprj%/entity/Contact_entity/entityfields/languagekey_param/valueProcess.js</valueProcess>
+      <expose v="true" />
+      <description>PARAMETER</description>
+    </entityParameter>
   </entityFields>
   <recordContainers>
     <dbRecordContainer>

entity/Contact_entity/entityfields/language/displayValueProcess.js

+import("system.result");
+import("system.vars");
+import("Keyword_lib");
+
+var key = vars.get("$field.LANGUAGE");
+if (key)
+{
+    var res = LanguageKeywordUtils.getViewValue(key);
+    result.string(res);
+}

entity/Contact_entity/entityfields/language/valueProcess.js

+import("system.vars");
+import("system.result");
+
+var key = vars.get("$param.LanguageKey_param");
+result.string(key);
\ No newline at end of file

entity/Contact_entity/entityfields/languagekey_param/valueProcess.js

+import("system.result");
+result.string("deu");
\ No newline at end of file

entity/Person_entity/Person_entity.aod

@@ -725,6 +725,10 @@ Usually this is used for filtering COMMUNICATION-entries by a specified contact
           <name>OwnContactId_param</name>
           <valueProcess>%aditoprj%/entity/Person_entity/entityfields/othercontacts/children/owncontactid_param/valueProcess.js</valueProcess>
         </entityParameter>
+        <entityParameter>
+          <name>LanguageKey_param</name>
+          <valueProcess>%aditoprj%/entity/Person_entity/entityfields/othercontacts/children/languagekey_param/valueProcess.js</valueProcess>
+        </entityParameter>
       </children>
     </entityConsumer>
     <entityField>

entity/Person_entity/entityfields/othercontacts/children/languagekey_param/valueProcess.js

+import("system.result");
+import("system.vars");
+
+var res = vars.get("$field.LANGUAGE");
+result.string(res);
\ No newline at end of file