Merge branch '2021.0_1075515' into '2021.0'

[Projekt: xRM-Sales][TicketNr.: 1075451][Besuchsvorschlag => neuer Wochenplaneintrag => Person wird nicht eingetragen]

See merge request xrm/basic!710

entity/VisitPlanEntry_entity/VisitPlanEntry_entity.aod

@@ -210,6 +210,7 @@
       <consumer>Persons</consumer>
       <linkedContext>Person</linkedContext>
       <mandatory v="true" />
+      <valueProcess>%aditoprj%/entity/VisitPlanEntry_entity/entityfields/contact_id/valueProcess.js</valueProcess>
       <displayValueProcess>%aditoprj%/entity/VisitPlanEntry_entity/entityfields/contact_id/displayValueProcess.js</displayValueProcess>
     </entityField>
     <entityConsumer>

entity/VisitPlanEntry_entity/entityfields/contact_id/valueProcess.js

+import("Contact_lib");
+import("Sql_lib");
+import("system.logging");
+import("system.neon");
+import("system.result");
+import("system.vars");
+
+if (vars.get("$sys.recordstate") == neon.OPERATINGSTATE_NEW && (vars.get("$this.value") == null || vars.get("$this.value") == undefined))
+{
+    var isPersonContact = newSelect("PERSON.PERSONID").from("PERSON")
+        .join("CONTACT", "PERSON.PERSONID = CONTACT.PERSON_ID")
+        .whereIfSet("CONTACT.CONTACTID", vars.get("$param.ContactId_param")).cell()
+
+    if(isPersonContact)
+    {
+        result.string(vars.get("$param.ContactId_param"));
+    }
+}
\ No newline at end of file