NEW cloning attendee from attendee card with new parameters

htdocs/core/class/commonobject.class.php

@@ -1443,16 +1443,17 @@ public function add_contact($fk_socpeople, $type_contact, $source = 'external',
 	/**
 	 *    Copy contact from one element to current
 	 *
-	 *    @param    CommonObject    $objFrom    Source element
-	 *    @param    'internal'|'external'	$source	Nature of contact ('internal' or 'external')
+	 *    @param    CommonObject    		$objFrom    Source element
+	 *    @param    'internal'|'external'	$source		Nature of contact ('internal' or 'external')
+	 *    @param	int<0,1>				$notrigger	0=launch triggers after, 1=disable triggers
 	 *    @return   int                         >0 if OK, <0 if KO
 	 */
-	public function copy_linked_contact($objFrom, $source = 'internal')
+	public function copy_linked_contact($objFrom, $source = 'internal', $notrigger = 0)
 	{
 		// phpcs:enable
 		$contacts = $objFrom->liste_contact(-1, $source);
 		foreach ($contacts as $contact) {
-			if ($this->add_contact($contact['id'], $contact['fk_c_type_contact'], $contact['source']) < 0) {
+			if ($this->add_contact($contact['id'], $contact['fk_c_type_contact'], $contact['source'], $notrigger) < 0) {
 				return -1;
 			}
 		}
@@ -5189,6 +5190,39 @@ public function getCanvas($id = 0, $ref = '')
 		}
 	}
 
+	/**
+	 *	fetch object link Relationtype By Values, not id
+	 *
+	 *  @param		int		$fk_source		source id of object we link from
+	 *  @param		string	$sourcetype		type of the source object
+	 *  @param		int		$fk_target		target id of object we link to
+	 *  @param		string	$targettype 	type of the target object
+	 *	@return 	string|null			    Return integer <0 if KO, >0 if OK
+	 */
+	public function getRelationtypeByValues($fk_source, $sourcetype, $fk_target, $targettype)
+	{
+		$sql = "SELECT relationtype FROM";
+		$sql .= " ".MAIN_DB_PREFIX.'element_element';
+		$sql .= " WHERE fk_source=".((int) $fk_source);
+		$sql .= " AND sourcetype='".$this->db->escape($sourcetype)."'";
+		$sql .= " AND fk_target=".((int) $fk_target);
+		$sql .= " AND targettype='".$this->db->escape($targettype)."'";
+
+		dol_syslog(__METHOD__, LOG_DEBUG);
+		$result = $this->db->query($sql);
+		if ($result) {
+			$obj = $this->db->fetch_object($result);
+			if ($obj) {
+				return $obj->relationtype;
+			} else {
+				$this->error = $this->db->error();
+				return null;
+			}
+		} else {
+			$this->error = $this->db->error();
+			return null;
+		}
+	}
 
 	/**
 	 * 	Get special code of a line
@@ -11556,7 +11590,7 @@ public function deleteLineCommon(User $user, $idline, $notrigger = 0)
 	 *	@param	User	$user			Object user that modify
 	 *  @param	int		$status			New status to set (often a constant like self::STATUS_XXX)
 	 *  @param	int		$notrigger		1=Does not execute triggers, 0=Execute triggers
-	 *  @param  string  $triggercode    Trigger code to use
+	 *  @param  string  $triggercode    Trigger code to use, 'auto' will make it try to find the right triggercode to use based on the status to change to.
 	 *	@return	int						Return integer <0 if KO, >0 if OK
 	 *  @see setStatut()
 	 */
@@ -11566,6 +11600,10 @@ public function setStatusCommon($user, $status, $notrigger = 0, $triggercode = '
 
 		$this->db->begin();
 
+		if ($triggercode == 'auto' && isset($this->list_possible_triggercode)) {
+			$triggercode = isset($this->list_possible_triggercode[$status]) ? $this->list_possible_triggercode[$status] : '';
+			dol_syslog(get_class($this).' change to status='.$status.' uses triggercode='.$triggercode, LOG_DEBUG);
+		}
 		$statusfield = 'status';
 		if (in_array($this->element, array('don', 'donation', 'shipping', 'project_task'))) {
 			$statusfield = 'fk_statut';

htdocs/core/class/html.form.class.php

@@ -10655,6 +10655,7 @@ public function showLinkedObjectBlock($object, $morehtmlright = '', $compatibleI
 
 			$nboftypesoutput = 0;
 
+			print '<!-- foreach linkedObjects -->';
 			foreach ($object->linkedObjects as $objecttype => $objects) {
 				$tplpath = $element = $subelement = $objecttype;
 

htdocs/core/class/html.formprojet.class.php

@@ -934,6 +934,93 @@ public function selectInvoiceAndLine($selectedInvoiceId = 0, $selectedLineId = 0
 		return $out;
 	}
 
+	/**
+	 * Output a form with Multi Selection of event organisation 4 cloning
+	 *
+	 * @param 	string 		$page 		Page - if empty no form tags are printed, else they are
+	 * @param	string		$htmlname	Name of HTML field
+	 * @param 	string 		$title 		Text above the multi select form., default is '' and not shown, could be a <h4>...</h4>
+	 * @param	int[] 	$status_list 	List of event organisations
+	 * @param	int[] 		$toplist 	List of event organisations
+	 * @param 	string 		$toptext 	Text in top/main optgroup (optional) - default is '' and not shown
+	 * @param	int 		$size 		How high the table should be in lines, default is 8
+	 * @param	string 		$morecss 	More css
+	 * @param	int			$nooutput 	No print output. Return it only.
+	 *
+	 * @return 	string 					HTML
+	 */
+	public function formMultiSelectEventOrg4Clone($page, $htmlname, $title = '', $status_list = array(), $toplist = array(), $toptext = '', $size = 8, $morecss = '', $nooutput = 0)
+	{
+		dol_syslog(__METHOD__.'::', LOG_DEBUG);
+		global $langs;
+		$langs->load("mails");
+
+		$out = '';
+		if (!empty($page)) {
+			$out .= '<form action="'.$page.'">';
+		}
+		if (!empty($title)) {
+			$out .= $title;
+		}
+
+		$out .= '<div id="select_'.$htmlname.'">';
+		$out .= '<select class="select" name="select_'.$htmlname.'[]" id="select_'.$htmlname.'" multiple size="'.$size.'" style="'.$morecss.'">';
+
+		foreach ($toplist as $key => $value) {
+			$project_id = $value["rowid"];
+			$project_title = $value["title"];
+			$out .= '    <option class="option" value="'.$project_id.'">'.$project_title.'</option>';
+		}
+
+		$out .= '</select>';
+		$out .= '</div>';
+
+		$out .= '<br>';
+		$out .= '<input type="checkbox" id="verbosereporting" name="verbosereporting" value="1"><label for="verbosereporting">'.$langs->trans("Show").' '.$langs->trans("ListOf", $langs->trans("CloneOf", $langs->trans("Attendee"))).'</label><br>';
+		$out .= '<div id="oldobject_status">';
+		$out .= '<label for="oldobject_status"><h4>'.$langs->trans("Source").' &mdash; '.$langs->trans("SetToStatus").'</h4></label>';
+		$out .= '<select class="select" name="oldobject_status" id="oldobject_status" size="6">';
+		$out .= '    <option class="option" value="-1" selected>'.$langs->trans("IsBefore").'</option>';
+		$out .= '    <option class="option" value="" disabled>&mdash;&mdash;&mdash;</option>';
+		foreach ($status_list as $key => $value) {
+			$out .= '    <option class="option" value="'.$key.'">'.$value.'</option>';
+		}
+		$out .= '</select>';
+		$out .= '</div><br>';
+
+		$out .= '<div id="newobject_status">';
+		$out .= '<label for="newobject_status"><h4>'.$langs->trans("Clone").' &mdash; '.$langs->trans("SetToStatus").'</h4></label>';
+		$out .= '<select class="select" name="newobject_status" id="newobject_status" size="6">';
+		$out .= '    <option class="option" value="-1" selected>'.$langs->trans("Copy").'</option>';
+		$out .= '    <option class="option" value="" disabled>&mdash;&mdash;&mdash;</option>';
+		foreach ($status_list as $key => $value) {
+			$out .= '    <option class="option" value="'.$key.'">'.$value.'</option>';
+		}
+		$out .= '</select>';
+		$out .= '</div>';
+
+		$actionname = $htmlname;
+		$out .= '<div id="massmail_selection_buttons_'.$htmlname.'"><br>';
+		$out .= '<input type="hidden" name="massaction" value="confirm_preclone">';
+		$out .= '<input type="checkbox" id="notrigger" name="notrigger" value="1" checked><label for="notrigger">'.$langs->trans("NoTrigger").' '.$langs->trans("CloneOf", $langs->trans("Attendee")).'</label><br>';
+		$out .= '<input type="checkbox" id="objlink" name="objlink" value="1" checked><label for="objlink">'.$langs->trans("Create").' '.$langs->trans("LinkedObject").'</label><br><br>';
+		$out .= '<!-- 2 buttons Add and Cancel -->';
+		$out .= '<input type="submit" class="butAction button-add small reposition" id="button_clone_attendee" name="button_clone_attendee" value="'.$langs->trans("Clone").'">';
+		$out .= '<input type="submit" class="button button-cancel reposition" id="cancel" name="cancel" value="'.$langs->trans("Cancel").'" />';
+		$out .= '</div><br>';
+
+		if (!empty($page)) {
+			$out .= '</form>';
+		}
+
+		if (empty($nooutput)) {
+			print $out;
+			return '';
+		} else {
+			return $out;
+		}
+	}
+
 	/**
 	 *  Output html select to select opportunity status
 	 *

htdocs/core/class/objectlink.class.php

@@ -232,6 +232,7 @@ public function delete($user, $notrigger = 0)
 	 */
 	public function create($user, $fk_source, $sourcetype, $fk_target, $targettype, $relationtype = null, $notrigger = 0)
 	{
+		dol_syslog(__METHOD__, LOG_DEBUG);
 		global $conf, $langs;
 		$error = 0;
 
@@ -280,8 +281,8 @@ public function create($user, $fk_source, $sourcetype, $fk_target, $targettype,
 		} else {
 			$sql .= " (fk_source, sourcetype, fk_target, targettype )";
 		}
-		$sql .= " VALUES (".((int) $this->fk_source).", '".$this->db->escape($sourcetype)."', ";
-		$sql .= ((int) $this->fk_target).", '".$this->db->escape($targettype)."'";
+		$sql .= " VALUES (".((int) $fk_source).", '".$this->db->escape($sourcetype)."', ";
+		$sql .= ((int) $fk_target).", '".$this->db->escape($targettype)."'";
 		if ($relationtype) {
 			$sql .= ", '".$this->db->escape($relationtype)."'";
 		}
@@ -310,12 +311,19 @@ public function create($user, $fk_source, $sourcetype, $fk_target, $targettype,
 	 */
 	private function _makeobject($objectid, $objecttype)
 	{
+		dol_syslog(__METHOD__, LOG_DEBUG);
 		if ($objecttype == 'adherent') {
 			require_once DOL_DOCUMENT_ROOT.'/adherents/class/adherent.class.php';
 			$newobject = new Adherent($this->db);
 			$result = $newobject->fetch($objectid);
 			return $result;
 		}
+		if ($objecttype == 'conferenceorboothattendee') {
+			require_once DOL_DOCUMENT_ROOT.'/eventorganization/class/conferenceorboothattendee.class.php';
+			$newobject = new ConferenceOrBoothAttendee($this->db);
+			$result = $newobject->fetch($objectid);
+			return $result;
+		}
 		if ($objecttype == 'commande') {
 			require_once DOL_DOCUMENT_ROOT.'/commande/class/commande.class.php';
 			$newobject = new Commande($this->db);

htdocs/core/tpl/massactions_pre.tpl.php

@@ -50,6 +50,7 @@
  * @var string $action
  * @var string $massaction
  * @var string $modelmail
+ * @var int $projectid
  * @var string $sendto
  * @var string $topicmail
  * @var string $trackid
@@ -65,6 +66,7 @@
 @phan-var-force int[] $toselect
 @phan-var-force ?string $uploaddir
 @phan-var-force int<0,1> $withmaindocfilemail
+@phan-var-force int $projectid
 @phan-var-force string $sendto
 @phan-var-force string $massaction
 @phan-var-force int[] $arrayofselected
@@ -374,6 +376,44 @@
 	print dol_get_fiche_end();
 }
 
+if ($massaction == 'preclone') {
+	dol_syslog('massactions_pre.tpl.php::if massaction == preclone', LOG_DEBUG);
+	$langs->loadLangs(array("eventorganization", "admin", "projects"));
+	require_once DOL_DOCUMENT_ROOT.'/core/class/html.formprojet.class.php';
+	$formprojet = new FormProjets($db);
+	require_once DOL_DOCUMENT_ROOT.'/projet/class/project.class.php';
+	$projectstatic = new Project($db);
+	if (!isset($projectid)) {
+		$projectid = 0;
+	}
+	if (isset($projectstatic->date_start_event)) {
+		$fromdate = $projectstatic->date_start_event;
+	} else {
+		$fpresult = $projectstatic->fetch($projectid);
+		if ($fpresult) {
+			$fromdate = $projectstatic->date_start_event;
+		} else {
+			setEventMessages($langs->trans("ErrorRefNotFound", $langs->trans("Project")), null, 'errors');
+			dol_syslog('massaction_pre.tpl.php::failed fetching project='.$projectid, LOG_ERR);
+			$fromdate = 0;
+		}
+	}
+
+	$project_list = $projectstatic->fetchEventOrgIds($user, 1, $fromdate, 1);
+	$status_list = array();
+	foreach ($objecttmp->list_possible_status as $statusid) {
+		$status_list[$statusid] = $objecttmp->LibStatut($statusid, 1);
+	}
+	$htmlname = 'eventorg';
+	$page = '';
+	$size = (int) round(3 + log(count($project_list)));
+	$toptext = $langs->trans("EventOrganization").' &mdash; '.$langs->trans("ExtrafieldCheckBoxFromList");
+	$title = '<h4><label for="eventOrg_selection_choices_'.$htmlname.'">'.$toptext.':</label></h4>';
+	$formprojet->formMultiSelectEventOrg4Clone($page, $htmlname, $title, $status_list, $project_list, $toptext, $size, 'width: 100%;');
+
+	print '<br>';
+}
+
 if ($massaction == 'edit_extrafields') {
 	require_once DOL_DOCUMENT_ROOT.'/core/class/extrafields.class.php';
 	$elementtype = $objecttmp->element;

htdocs/eventorganization/class/conferenceorboothattendee.class.php

@@ -58,6 +58,16 @@ class ConferenceOrBoothAttendee extends CommonObject
 	const STATUS_USED = 5;					// was present, presence confirmed, no more entrances can be done using this ticket
 	const STATUS_CANCELED = 9;
 
+	/**
+	 * @var array<int, int> list of possible statuses for this object
+	 */
+	public $list_possible_status = [self::STATUS_DRAFT, self::STATUS_VALIDATED, self::STATUS_USED, self::STATUS_CANCELED];
+
+	/**
+	 * @var array<int, string> list of possible triggercode for this object
+	 */
+	public $list_possible_triggercode = [self::STATUS_DRAFT => 'CONFERENCEORBOOTHATTENDEE_UNVALIDATE', self::STATUS_VALIDATED => 'CONFERENCEORBOOTHATTENDEE_VALIDATE', self::STATUS_USED => 'CONFERENCEORBOOTHATTENDEE_USED', self::STATUS_CANCELED => 'CONFERENCEORBOOTHATTENDEE_CANCEL'];
+
 	/**
 	 *  'type' field format ('integer', 'integer:ObjectClass:PathToClass[:AddCreateButtonOrNot[:Filter]]', 'sellist:TableName:LabelFieldName[:KeyFieldName[:KeyFieldParent[:Filter]]]', 'varchar(x)', 'double(24,8)', 'real', 'price', 'text', 'text:none', 'html', 'date', 'datetime', 'timestamp', 'duration', 'mail', 'phone', 'url', 'password')
 	 *         Note: Filter can be a string like "(t.ref:like:'SO-%') or (t.date_creation:<:'20160101') or (t.nature:is:NULL)"
@@ -314,9 +324,12 @@ public function create(User $user, $notrigger = 0)
 	 *
 	 * @param  	User 	$user      	User that creates
 	 * @param  	int 	$fromid     Id of object to clone
-	 * @return 	mixed 				New object created, <0 if KO
+	 * @param	int 	$notrigger	0=launch triggers after, 1=disable triggers
+	 * @param	int 	$nolink		0=make link between source and clone, 1=do not link
+	 * @param	array<string, mixed>	$changes	Default empty array else array[field] = value, naturally not id/rowid, but this could be used to create the clone in a different fk_project: $changes["fk_project"] = $newprojectid
+	 * @return ConferenceOrBoothAttendee|int
 	 */
-	public function createFromClone(User $user, $fromid)
+	public function createFromClone(User $user, $fromid, $notrigger = 0, $nolink = 0, $changes = array())
 	{
 		global $langs, $extrafields;
 		$error = 0;
@@ -337,6 +350,24 @@ public function createFromClone(User $user, $fromid)
 		//foreach($this->lines as $line)
 		//	$line->fetch_optionals();
 
+		// handle changes to fields
+		foreach ($changes as $key => $value) {
+			if ($key == "fields") {
+				dol_syslog('this->fields MUST NOT BE CHANGED', LOG_ERR);
+				$this->error = 'this->fields MUST NOT BE CHANGED';
+				return -2;
+			} elseif (array_key_exists((string) $key, $this->fields)) {
+				dol_syslog('key='.$key.' changed from '.$object->$key, LOG_DEBUG);
+				$object->$key = $value;
+				dol_syslog('key='.$key.' changed to '.$value, LOG_DEBUG);
+			} else {
+				$error++;
+				dol_syslog('key='.$key.' was not found in $this->fields', LOG_ERR);
+				$this->error = 'key='.$key.' was not found in $this->fields';
+				return -3;
+			}
+		}
+
 		// Reset some properties
 		unset($object->id);
 		unset($object->fk_user_creat);
@@ -362,26 +393,26 @@ public function createFromClone(User $user, $fromid)
 
 		// Create clone
 		$object->context['createfromclone'] = 'createfromclone';
-		$result = $object->createCommon($user);
+		$result = $object->createCommon($user, $notrigger);
 		if ($result < 0) {
 			$error++;
 			$this->setErrorsFromObject($object);
 		} else {
 			$object->ref = (string) $object->id;
-			$result = $object->update($user);
+			$result = $object->update($user, $notrigger);
 		}
 
 		if (!$error) {
 			// copy internal contacts
-			if ($this->copy_linked_contact($object, 'internal') < 0) {
+			if ($this->copy_linked_contact($object, 'internal', $notrigger) < 0) {
 				$error++;
 			}
 		}
 
 		if (!$error) {
 			// copy external contacts if same company
 			if (!empty($this->fk_soc) && $this->fk_soc == $object->socid) {
-				if ($this->copy_linked_contact($object, 'external') < 0) {
+				if ($this->copy_linked_contact($object, 'external', $notrigger) < 0) {
 					$error++;
 				}
 			}
@@ -392,6 +423,20 @@ public function createFromClone(User $user, $fromid)
 		// End
 		if (!$error) {
 			$this->db->commit();
+
+			require_once DOL_DOCUMENT_ROOT.'/core/class/objectlink.class.php';
+			$staticobjectlink = new ObjectLink($this->db);
+			if (!$nolink) {
+				$linkresult = $staticobjectlink->create($user, $this->id, $this->element, $object->id, $object->element, 'clone', $notrigger);
+				if ($linkresult) {
+					return $object;
+				} else {
+					dol_syslog('Failed to objectlink clone + source='.$this->id.' '.$staticobjectlink->error, LOG_ERR);
+					$this->db->rollback();
+					$this->error = $staticobjectlink->error;
+					return -1;
+				}
+			}
 			return $object;
 		} else {
 			$this->db->rollback();