'."\n";
+
+ // Common attributes
+ //$keyforbreak='fieldkeytoswitchonsecondcolumn'; // We change column just before this field
+ //unset($object->fields['fk_project']); // Hide field already shown in banner
+ //unset($object->fields['fk_member']); // Hide field already shown in banner
+ include DOL_DOCUMENT_ROOT.'/core/tpl/commonfields_view.tpl.php';
+
+ // End of subscription date
+ $fadherent = new Adherent($db);
+ $fadherent->fetch($object->fk_member);
+ print '
'.$langs->trans("SubscriptionEndDate").'
';
+ if ($fadherent->datefin) {
+ print dol_print_date($fadherent->datefin, 'day');
+ if ($fadherent->hasDelay()) {
+ print " ".img_warning($langs->trans("Late"));
+ }
+ } else {
+ if (!$adht->subscription) {
+ print $langs->trans("SubscriptionNotRecorded");
+ if ($fadherent->statut > 0) {
+ print " ".img_warning($langs->trans("Late")); // Display a delay picto only if it is not a draft and is not canceled
+ }
+ } else {
+ print $langs->trans("SubscriptionNotReceived");
+ if ($fadherent->statut > 0) {
+ print " ".img_warning($langs->trans("Late")); // Display a delay picto only if it is not a draft and is not canceled
+ }
+ }
+ }
+ print '
';
+
+ // Other attributes. Fields from hook formObjectOptions and Extrafields.
+ include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_view.tpl.php';
+
+ print '
\n \n\n \n\n __(Sincerely)__ \n __[MAIN_INFO_SOCIETE_NOM]__ \n \n');
+ALTER TABLE llx_adherent ADD COLUMN url varchar(255) NULL AFTER email;
ALTER TABLE llx_facture_fourn ADD COLUMN date_closing datetime DEFAULT NULL after date_valid;
ALTER TABLE llx_facture_fourn ADD COLUMN fk_user_closing integer DEFAULT NULL after fk_user_valid;
diff --git a/htdocs/langs/en_US/admin.lang b/htdocs/langs/en_US/admin.lang
index d803593bc3e..c03a3739d6a 100644
--- a/htdocs/langs/en_US/admin.lang
+++ b/htdocs/langs/en_US/admin.lang
@@ -1434,6 +1434,7 @@ MemberMainOptions=Main options
AdherentLoginRequired= Manage a Login for each member
AdherentMailRequired=Email required to create a new member
MemberSendInformationByMailByDefault=Checkbox to send mail confirmation to members (validation or new subscription) is on by default
+MemberCreateAnExternalUserForSubscriptionValidated=Create an external user login for each new member subscription validated
VisitorCanChooseItsPaymentMode=Visitor can choose from available payment modes
MEMBER_REMINDER_EMAIL=Enable automatic reminder by email of expired subscriptions. Note: Module %s must be enabled and correctly setup to send reminders.
MembersDocModules=Document templates for documents generated from member record
diff --git a/htdocs/langs/en_US/main.lang b/htdocs/langs/en_US/main.lang
index b6d2e4c4ef8..d91989190e0 100644
--- a/htdocs/langs/en_US/main.lang
+++ b/htdocs/langs/en_US/main.lang
@@ -1072,6 +1072,7 @@ ValidFrom=Valid from
ValidUntil=Valid until
NoRecordedUsers=No users
ToClose=To close
+ToRefuse=To refuse
ToProcess=To process
ToApprove=To approve
GlobalOpenedElemView=Global view
@@ -1126,6 +1127,7 @@ UpdateForAllLines=Update for all lines
OnHold=On hold
Civility=Civility
AffectTag=Affect Tag
+CreateExternalUser=Create external user
ConfirmAffectTag=Bulk Tag Affect
ConfirmAffectTagQuestion=Are you sure you want to affect tags to the %s selected record(s)?
CategTypeNotFound=No tag type found for type of records
diff --git a/htdocs/langs/en_US/members.lang b/htdocs/langs/en_US/members.lang
index 5bd1a545bfa..6f5e47591f3 100644
--- a/htdocs/langs/en_US/members.lang
+++ b/htdocs/langs/en_US/members.lang
@@ -213,3 +213,4 @@ SendReminderForExpiredSubscription=Send reminder by email to members when subscr
MembershipPaid=Membership paid for current period (until %s)
YouMayFindYourInvoiceInThisEmail=You may find your invoice attached to this email
XMembersClosed=%s member(s) closed
+XExternalUserCreated=%s external user(s) created
diff --git a/htdocs/langs/en_US/partnership.lang b/htdocs/langs/en_US/partnership.lang
index 7681449755e..df9619533de 100644
--- a/htdocs/langs/en_US/partnership.lang
+++ b/htdocs/langs/en_US/partnership.lang
@@ -16,41 +16,65 @@
#
# Generic
#
-ModulePartnershipName = Partnership management
-PartnershipDescription = Module Partnership management
+ModulePartnershipName=Partnership management
+PartnershipDescription=Module Partnership management
PartnershipDescriptionLong= Module Partnership management
#
# Menu
#
-NewPartnership = New Partnership
-ListOfPartnerships = List of partnership
+NewPartnership=New Partnership
+ListOfPartnerships=List of partnership
#
# Admin page
#
-PartnershipSetup = Partnership setup
-PartnershipAbout = About Partnership
-PartnershipAboutPage = Partnership about page
-
+PartnershipSetup=Partnership setup
+PartnershipAbout=About Partnership
+PartnershipAboutPage=Partnership about page
+partnershipforthirdpartyormember=Partnership is for a 'thirdparty' or for a 'member'
+PARTNERSHIP_IS_MANAGED_FOR=Partnership managed for
+PARTNERSHIP_BACKLINKS_TO_CHECK=Backlinks to check
+PARTNERSHIP_NBDAYS_AFTER_MEMBER_EXPIRATION_BEFORE_CANCEL=Nb of days before cancel status of partnership when subscription is expired
#
# Object
#
+DeletePartnership=Delete a partnership
+PartnershipDedicatedToThisThirdParty=Partnership dedicated to this third party
+PartnershipDedicatedToThisMember=Partnership dedicated to this member
DatePartnershipStart=Start date
DatePartnershipEnd=End date
+ReasonDecline=Decline reason
+ReasonDeclineOrCancel=Decline reason
+PartnershipAlreadyExist=Partnership already exist
+ShowPartnership=Show partnership
+BacklinkNotFoundOnPartnerWebsite=Backlink not found on partner website
+ConfirmClosePartnershipAsk=Are you sure you want to cancel this partnership?
#
# Template Mail
#
+SendingEmailOnPartnershipWillSoonBeCanceled=Partnership will soon be canceled
+SendingEmailOnPartnershipRefused=Partnership refused
+SendingEmailOnPartnershipAccepted=Partnership accepted
+SendingEmailOnPartnershipCanceled=Partnership canceled
+YourPartnershipWillSoonBeCanceledTopic=Partnership will soon be canceled
+YourPartnershipRefusedTopic=Partnership refused
+YourPartnershipAcceptedTopic=Partnership accepted
+YourPartnershipCanceledTopic=Partnership canceled
+
+YourPartnershipWillSoonBeCanceledContent=We inform you that your partnership will soon be canceled (Backlink not found)
+YourPartnershipRefusedContent=We inform you that your partnership request has been refused.
+YourPartnershipAcceptedContent=We inform you that your partnership request has been accepted.
+YourPartnershipCanceledContent=We inform you that your partnership has been canceled.
#
# Status
#
-PartnershipDraft = Draft
-PartnershipAccepted = Accepted
-PartnershipRefused = Refused
-PartnershipCanceled = Canceled
-
+PartnershipDraft=Draft
+PartnershipAccepted=Accepted
+PartnershipRefused=Refused
+PartnershipCanceled=Canceled
PartnershipManagedFor=Partners are
\ No newline at end of file
diff --git a/htdocs/partnership/admin/about.php b/htdocs/partnership/admin/about.php
new file mode 100644
index 00000000000..0d3fb11c4e3
--- /dev/null
+++ b/htdocs/partnership/admin/about.php
@@ -0,0 +1,101 @@
+
+ * Copyright (C) 2021 Dorian Laurent
+ *
+ * This program is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation, either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program. If not, see .
+ */
+
+/**
+ * \file partnership/admin/about.php
+ * \ingroup partnership
+ * \brief About page of module Partnership.
+ */
+
+// Load Dolibarr environment
+$res = 0;
+// Try main.inc.php into web root known defined into CONTEXT_DOCUMENT_ROOT (not always defined)
+if (!$res && !empty($_SERVER["CONTEXT_DOCUMENT_ROOT"])) {
+ $res = @include $_SERVER["CONTEXT_DOCUMENT_ROOT"]."/main.inc.php";
+}
+// Try main.inc.php into web root detected using web root calculated from SCRIPT_FILENAME
+$tmp = empty($_SERVER['SCRIPT_FILENAME']) ? '' : $_SERVER['SCRIPT_FILENAME']; $tmp2 = realpath(__FILE__); $i = strlen($tmp) - 1; $j = strlen($tmp2) - 1;
+while ($i > 0 && $j > 0 && isset($tmp[$i]) && isset($tmp2[$j]) && $tmp[$i] == $tmp2[$j]) {
+ $i--; $j--;
+}
+if (!$res && $i > 0 && file_exists(substr($tmp, 0, ($i + 1))."/main.inc.php")) {
+ $res = @include substr($tmp, 0, ($i + 1))."/main.inc.php";
+}
+if (!$res && $i > 0 && file_exists(dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php")) {
+ $res = @include dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php";
+}
+// Try main.inc.php using relative path
+if (!$res && file_exists("../../main.inc.php")) {
+ $res = @include "../../main.inc.php";
+}
+if (!$res && file_exists("../../../main.inc.php")) {
+ $res = @include "../../../main.inc.php";
+}
+if (!$res) {
+ die("Include of main fails");
+}
+
+// Libraries
+require_once DOL_DOCUMENT_ROOT.'/core/lib/admin.lib.php';
+require_once DOL_DOCUMENT_ROOT.'/core/lib/functions2.lib.php';
+require_once '../lib/partnership.lib.php';
+
+// Translations
+$langs->loadLangs(array("errors", "admin", "partnership@partnership"));
+
+// Access control
+if (!$user->admin) {
+ accessforbidden();
+}
+
+// Parameters
+$action = GETPOST('action', 'aZ09');
+$backtopage = GETPOST('backtopage', 'alpha');
+
+
+/*
+ * Actions
+ */
+
+
+/*
+ * View
+ */
+
+$form = new Form($db);
+
+$page_name = "PartnershipAbout";
+llxHeader('', $langs->trans($page_name));
+
+// Subheader
+$linkback = ''.$langs->trans("BackToModuleList").'';
+
+print load_fiche_titre($langs->trans($page_name), $linkback, 'title_setup');
+
+// Configuration header
+$head = partnershipAdminPrepareHead();
+print dol_get_fiche_head($head, 'about', '', 0, 'partnership@partnership');
+
+require_once DOL_DOCUMENT_ROOT.'/core/modules/modPartnership.class.php';
+$tmpmodule = new modPartnership($db);
+print $tmpmodule->getDescLong();
+
+// Page end
+print dol_get_fiche_end();
+llxFooter();
+$db->close();
diff --git a/htdocs/partnership/admin/setup.php b/htdocs/partnership/admin/setup.php
index aac962ede72..d681274106c 100644
--- a/htdocs/partnership/admin/setup.php
+++ b/htdocs/partnership/admin/setup.php
@@ -82,36 +82,21 @@ include DOL_DOCUMENT_ROOT.'/core/actions_setmoduleoptions.inc.php';
if ($action == 'setting') {
require_once DOL_DOCUMENT_ROOT."/core/modules/modPartnership.class.php";
- $partnership = new modPartnership($db);
- $value = GETPOST('managed_for', 'alpha');
-
-
- $modulemenu = ($value == 'member') ? 'member' : 'thirdparty';
+ $modulemenu = (GETPOST('PARTNERSHIP_IS_MANAGED_FOR', 'alpha') == 'member') ? 'member' : 'thirdparty';
$res = dolibarr_set_const($db, "PARTNERSHIP_IS_MANAGED_FOR", $modulemenu, 'chaine', 0, '', $conf->entity);
- $partnership->tabs = array();
- if ($modulemenu == 'member') {
- $partnership->tabs[] = array('data'=>'member:+partnership:Partnership:partnership:$user->rights->partnership->read:/partnership/partnership.php?socid=__ID__');
- $fk_mainmenu = "members";
- } else {
- $partnership->tabs[] = array('data'=>'thirdparty:+partnership:Partnership:partnership:$user->rights->partnership->read:/partnership/partnership.php?socid=__ID__');
- $fk_mainmenu = "companies";
- }
-
- foreach ($partnership->menu as $key => $menu) {
- $partnership->menu[$key]['mainmenu'] = $fk_mainmenu;
-
- if ($menu['leftmenu'] == 'partnership')
- $partnership->menu[$key]['fk_menu'] = 'fk_mainmenu='.$fk_mainmenu;
- else $partnership->menu[$key]['fk_menu'] = 'fk_mainmenu='.$fk_mainmenu.',fk_leftmenu=partnership';
- }
+ $partnership = new modPartnership($db);
$error += $partnership->delete_tabs();
$error += $partnership->insert_tabs();
$error += $partnership->delete_menus();
$error += $partnership->insert_menus();
+
+ if (GETPOST("PARTNERSHIP_NBDAYS_AFTER_MEMBER_EXPIRATION_BEFORE_CANCEL", 'int'))
+ dolibarr_set_const($db, "PARTNERSHIP_NBDAYS_AFTER_MEMBER_EXPIRATION_BEFORE_CANCEL", GETPOST("PARTNERSHIP_NBDAYS_AFTER_MEMBER_EXPIRATION_BEFORE_CANCEL", 'int'), 'chaine', 0, '', $conf->entity);
+ dolibarr_set_const($db, "PARTNERSHIP_BACKLINKS_TO_CHECK", GETPOST("PARTNERSHIP_BACKLINKS_TO_CHECK"), 'chaine', 0, '', $conf->entity);
}
if ($action) {
@@ -120,6 +105,8 @@ if ($action) {
} else {
setEventMessages($langs->trans("SetupNotError"), null, 'errors');
}
+ header("Location: ".$_SERVER['PHP_SELF']);
+ exit;
}
/*
@@ -154,19 +141,48 @@ print '';
print '
';
-// Default partnership price base type
-print '
';
diff --git a/htdocs/partnership/class/partnership.class.php b/htdocs/partnership/class/partnership.class.php
index 1dab8890050..a42e12fd412 100644
--- a/htdocs/partnership/class/partnership.class.php
+++ b/htdocs/partnership/class/partnership.class.php
@@ -100,26 +100,7 @@ class Partnership extends CommonObject
/**
* @var array Array with all fields and their property. Do not use it as a static var. It may be modified by constructor.
*/
- public $fields=array(
- 'rowid' => array('type'=>'integer', 'label'=>'TechnicalID', 'enabled'=>'1', 'position'=>1, 'notnull'=>1, 'visible'=>0, 'noteditable'=>'1', 'index'=>1, 'css'=>'left', 'comment'=>"Id"),
- 'ref' => array('type'=>'varchar(128)', 'label'=>'Ref', 'enabled'=>'1', 'position'=>10, 'notnull'=>1, 'visible'=>4, 'noteditable'=>'1', 'default'=>'(PROV)', 'index'=>1, 'searchall'=>1, 'showoncombobox'=>'1', 'comment'=>"Reference of object"),
- 'fk_soc' => array('type'=>'integer:Societe:societe/class/societe.class.php:1:status=1 AND entity IN (__SHARED_ENTITIES__)', 'label'=>'ThirdParty', 'enabled'=>'1', 'position'=>50, 'notnull'=>-1, 'visible'=>1, 'index'=>1,),
- 'note_public' => array('type'=>'html', 'label'=>'NotePublic', 'enabled'=>'1', 'position'=>61, 'notnull'=>0, 'visible'=>0,),
- 'note_private' => array('type'=>'html', 'label'=>'NotePrivate', 'enabled'=>'1', 'position'=>62, 'notnull'=>0, 'visible'=>0,),
- 'date_creation' => array('type'=>'datetime', 'label'=>'DateCreation', 'enabled'=>'1', 'position'=>500, 'notnull'=>1, 'visible'=>-2,),
- 'tms' => array('type'=>'timestamp', 'label'=>'DateModification', 'enabled'=>'1', 'position'=>501, 'notnull'=>0, 'visible'=>-2,),
- 'fk_user_creat' => array('type'=>'integer:User:user/class/user.class.php', 'label'=>'UserAuthor', 'enabled'=>'1', 'position'=>510, 'notnull'=>1, 'visible'=>-2, 'foreignkey'=>'user.rowid',),
- 'fk_user_modif' => array('type'=>'integer:User:user/class/user.class.php', 'label'=>'UserModif', 'enabled'=>'1', 'position'=>511, 'notnull'=>-1, 'visible'=>-2,),
- 'last_main_doc' => array('type'=>'varchar(255)', 'label'=>'LastMainDoc', 'enabled'=>'1', 'position'=>600, 'notnull'=>0, 'visible'=>0,),
- 'import_key' => array('type'=>'varchar(14)', 'label'=>'ImportId', 'enabled'=>'1', 'position'=>1000, 'notnull'=>-1, 'visible'=>-2,),
- 'model_pdf' => array('type'=>'varchar(255)', 'label'=>'Model pdf', 'enabled'=>'1', 'position'=>1010, 'notnull'=>-1, 'visible'=>0,),
- 'status' => array('type'=>'smallint', 'label'=>'Status', 'enabled'=>'1', 'position'=>1000, 'notnull'=>1, 'visible'=>4, 'default'=>0, 'index'=>1, 'arrayofkeyval'=>array('0'=>'Draft', '1'=>'Validated', '2'=>'Refused', '9'=>'Canceled'),),
- 'fk_member' => array('type'=>'integer:Adherent:adherents/class/adherent.class.php:1', 'label'=>'Member', 'enabled'=>'1', 'position'=>51, 'notnull'=>-1, 'visible'=>1, 'index'=>1,),
- 'date_partnership_start' => array('type'=>'datetime', 'label'=>'DatePartnershipStart', 'enabled'=>'1', 'position'=>52, 'notnull'=>1, 'visible'=>1,),
- 'date_partnership_end' => array('type'=>'datetime', 'label'=>'DatePartnershipEnd', 'enabled'=>'1', 'position'=>53, 'notnull'=>1, 'visible'=>1,),
- 'count_last_url_check_error' => array('type'=>'integer', 'label'=>'CountLastUrlCheckError', 'enabled'=>'1', 'position'=>63, 'notnull'=>0, 'visible'=>-2, 'default'=>'0',),
- 'reason_decline_or_cancel' => array('type'=>'text', 'label'=>'ReasonDeclineOrCancel', 'enabled'=>'1', 'position'=>64, 'notnull'=>0, 'visible'=>-2,),
- );
+ public $fields=array();
public $rowid;
public $ref;
public $fk_soc;
@@ -137,6 +118,7 @@ class Partnership extends CommonObject
public $date_partnership_start;
public $date_partnership_end;
public $count_last_url_check_error;
+ public $last_check_backlink;
public $reason_decline_or_cancel;
// END MODULEBUILDER PROPERTIES
@@ -188,12 +170,39 @@ class Partnership extends CommonObject
$this->db = $db;
+ $this->fields=array(
+ 'rowid' => array('type'=>'integer', 'label'=>'TechnicalID', 'enabled'=>'1', 'position'=>1, 'notnull'=>1, 'visible'=>0, 'noteditable'=>'1', 'index'=>1, 'css'=>'left', 'comment'=>"Id"),
+ 'ref' => array('type'=>'varchar(128)', 'label'=>'Ref', 'enabled'=>'1', 'position'=>10, 'notnull'=>1, 'visible'=>4, 'noteditable'=>'1', 'default'=>'(PROV)', 'index'=>1, 'searchall'=>1, 'showoncombobox'=>'1', 'comment'=>"Reference of object"),
+ 'entity' => array('type' => 'integer', 'label' => 'Entity', 'default' => 1, 'enabled' => 1, 'visible' => -2, 'notnull' => 1, 'position' => 15, 'index' => 1),
+ 'note_public' => array('type'=>'html', 'label'=>'NotePublic', 'enabled'=>'1', 'position'=>61, 'notnull'=>0, 'visible'=>0,),
+ 'note_private' => array('type'=>'html', 'label'=>'NotePrivate', 'enabled'=>'1', 'position'=>62, 'notnull'=>0, 'visible'=>0,),
+ 'date_creation' => array('type'=>'datetime', 'label'=>'DateCreation', 'enabled'=>'1', 'position'=>500, 'notnull'=>1, 'visible'=>-2,),
+ 'tms' => array('type'=>'timestamp', 'label'=>'DateModification', 'enabled'=>'1', 'position'=>501, 'notnull'=>0, 'visible'=>-2,),
+ 'fk_user_creat' => array('type'=>'integer:User:user/class/user.class.php', 'label'=>'UserAuthor', 'enabled'=>'1', 'position'=>510, 'notnull'=>1, 'visible'=>-2, 'foreignkey'=>'user.rowid',),
+ 'fk_user_modif' => array('type'=>'integer:User:user/class/user.class.php', 'label'=>'UserModif', 'enabled'=>'1', 'position'=>511, 'notnull'=>-1, 'visible'=>-2,),
+ 'last_main_doc' => array('type'=>'varchar(255)', 'label'=>'LastMainDoc', 'enabled'=>'1', 'position'=>600, 'notnull'=>0, 'visible'=>0,),
+ 'import_key' => array('type'=>'varchar(14)', 'label'=>'ImportId', 'enabled'=>'1', 'position'=>1000, 'notnull'=>-1, 'visible'=>-2,),
+ 'model_pdf' => array('type'=>'varchar(255)', 'label'=>'Model pdf', 'enabled'=>'1', 'position'=>1010, 'notnull'=>-1, 'visible'=>0,),
+ 'date_partnership_start' => array('type'=>'date', 'label'=>'DatePartnershipStart', 'enabled'=>'1', 'position'=>52, 'notnull'=>1, 'visible'=>1,),
+ 'date_partnership_end' => array('type'=>'date', 'label'=>'DatePartnershipEnd', 'enabled'=>'1', 'position'=>53, 'notnull'=>1, 'visible'=>1,),
+ 'status' => array('type'=>'smallint', 'label'=>'Status', 'enabled'=>'1', 'position'=>54, 'notnull'=>0, 'visible'=>2, 'index'=>1, 'arrayofkeyval'=>array('-1'=>'','0'=>$langs->trans('Draft'), '1'=>$langs->trans('Accepted'), '2'=>$langs->trans('Refused'), '9'=>$langs->trans('Canceled')),),
+ 'count_last_url_check_error' => array('type'=>'integer', 'label'=>'CountLastUrlCheckError', 'enabled'=>'1', 'position'=>63, 'notnull'=>0, 'visible'=>-2, 'default'=>'0',),
+ 'last_check_backlink' => array('type'=>'datetime', 'label'=>'LastCheckBacklink', 'enabled'=>'1', 'position'=>65, 'notnull'=>0, 'visible'=>-2,),
+ 'reason_decline_or_cancel' => array('type'=>'text', 'label'=>'ReasonDeclineOrCancel', 'enabled'=>'1', 'position'=>64, 'notnull'=>0, 'visible'=>-2,),
+ );
+
+ if ($conf->global->PARTNERSHIP_IS_MANAGED_FOR == 'member') {
+ $this->fields['fk_member'] = array('type'=>'integer:Adherent:adherents/class/adherent.class.php:1', 'label'=>'Member', 'enabled'=>'1', 'position'=>50, 'notnull'=>-1, 'visible'=>1, 'index'=>1,);
+ } else {
+ $this->fields['fk_soc'] = array('type'=>'integer:Societe:societe/class/societe.class.php:1:status=1 AND entity IN (__SHARED_ENTITIES__)', 'label'=>'ThirdParty', 'enabled'=>'1', 'position'=>50, 'notnull'=>-1, 'visible'=>1, 'index'=>1,);
+ }
+
if (empty($conf->global->MAIN_SHOW_TECHNICAL_ID) && isset($this->fields['rowid'])) {
$this->fields['rowid']['visible'] = 0;
}
- if (empty($conf->multicompany->enabled) && isset($this->fields['entity'])) {
- $this->fields['entity']['enabled'] = 0;
- }
+ // if (empty($conf->multicompany->enabled) && isset($this->fields['entity'])) {
+ // $this->fields['entity']['enabled'] = 0;
+ // }
// Example to show how to set values of fields definition dynamically
/*if ($user->rights->partnership->read) {
@@ -229,6 +238,7 @@ class Partnership extends CommonObject
*/
public function create(User $user, $notrigger = false)
{
+ $this->status = 0;
return $this->createCommon($user, $notrigger);
}
@@ -333,20 +343,97 @@ class Partnership extends CommonObject
/**
* Load object in memory from the database
+ * Get object from database. Get also lines.
*
- * @param int $id Id object
- * @param string $ref Ref
- * @return int <0 if KO, 0 if not found, >0 if OK
+ * @param int $id Id of object to load
+ * @param string $ref Ref of object
+ * @param int $fk_soc_or_member fk_soc or fk_member
+ * @return int >0 if OK, <0 if KO, 0 if not found
*/
- public function fetch($id, $ref = null)
+ public function fetch($id, $ref = null, $fk_soc_or_member = null)
{
- $result = $this->fetchCommon($id, $ref);
- if ($result > 0 && !empty($this->table_element_line)) {
- $this->fetchLines();
+ global $conf;
+
+ // Check parameters
+ if (empty($id) && empty($ref) && empty($fk_soc_or_member)) {
+ return -1;
+ }
+
+ $sql = 'SELECT p.rowid, p.ref, p.fk_soc, p.fk_member, p.status';
+ $sql .= ', p.entity, p.date_partnership_start, p.date_partnership_end, p.date_creation';
+ $sql .= ', p.fk_user_creat, p.tms, p.fk_user_modif, p.fk_user_modif';
+ $sql .= ', p.note_private, p.note_public';
+ $sql .= ', p.last_main_doc, p.count_last_url_check_error, p.last_check_backlink, p.reason_decline_or_cancel';
+ $sql .= ', p.import_key, p.model_pdf';
+
+ $sql .= ' FROM '.MAIN_DB_PREFIX.'partnership as p';
+
+ if ($id) {
+ $sql .= " WHERE p.rowid=".$id;
+ } else {
+ $sql .= " WHERE p.entity IN (0,".getEntity('partnership').")"; // Dont't use entity if you use rowid
+ }
+
+ if ($ref) {
+ $sql .= " AND p.ref='".$this->db->escape($ref)."'";
+ }
+
+ if ($fk_soc_or_member) {
+ $sql .= ' AND';
+ if ($conf->global->PARTNERSHIP_IS_MANAGED_FOR == 'member')
+ $sql .= ' p.fk_member = ';
+ else $sql .= ' p.fk_soc = ';
+ $sql .= $fk_soc_or_member;
+ $sql .= ' ORDER BY p.date_partnership_end DESC';
+ }
+
+ dol_syslog(get_class($this)."::fetch", LOG_DEBUG);
+ $result = $this->db->query($sql);
+ if ($result) {
+ $obj = $this->db->fetch_object($result);
+ if ($obj) {
+ $this->id = $obj->rowid;
+ $this->entity = $obj->entity;
+ $this->rowid = $obj->rowid;
+ $this->ref = $obj->ref;
+ $this->fk_soc = $obj->fk_soc;
+ $this->fk_member = $obj->fk_member;
+ $this->status = $obj->status;
+ $this->date_partnership_start = $this->db->jdate($obj->date_partnership_start);
+ $this->date_partnership_end = $this->db->jdate($obj->date_partnership_end);
+ $this->date_creation = $this->db->jdate($obj->date_creation);
+ $this->fk_user_creat = $obj->fk_user_creat;
+ $this->tms = $obj->tms;
+ $this->fk_user_modif = $obj->fk_user_modif;
+ $this->note_private = $obj->note_private;
+ $this->note_public = $obj->note_public;
+ $this->last_main_doc = $obj->last_main_doc;
+ $this->count_last_url_check_error = $obj->count_last_url_check_error;
+ $this->last_check_backlink = $this->db->jdate($obj->last_check_backlink);
+ $this->reason_decline_or_cancel = $obj->reason_decline_or_cancel;
+ $this->import_key = $obj->import_key;
+ $this->model_pdf = $obj->model_pdf;
+
+ $this->lines = array();
+
+ // Retrieve all extrafield
+ // fetch optionals attributes and labels
+ $this->fetch_optionals();
+
+ $this->db->free($result);
+
+ return 1;
+ } else {
+ // $this->error = 'Partnership with id '.$id.' not found sql='.$sql;
+ return 0;
+ }
+ } else {
+ $this->error = $this->db->error();
+ return -1;
}
- return $result;
}
+
/**
* Load object lines in memory from the database
*
@@ -765,21 +852,24 @@ class Partnership extends CommonObject
* @param int $notrigger 1=Does not execute triggers, 0=Execute triggers
* @return int <0 if KO, 0=Nothing done, >0 if OK
*/
- public function refused($user, $notrigger = '')
+ public function refused($user, $reasondeclinenote = '', $notrigger = 0)
{
// Protection
- // if ($this->status != self::STATUS_DRAFT) {
- // return 0;
- // }
+ if ($this->status == self::STATUS_REFUSED) {
+ return 0;
+ }
- /*if (! ((empty($conf->global->MAIN_USE_ADVANCED_PERMS) && ! empty($user->rights->partnership->write))
- || (! empty($conf->global->MAIN_USE_ADVANCED_PERMS) && ! empty($user->rights->partnership_advance->validate))))
- {
- $this->error='Permission denied';
- return -1;
- }*/
+ $this->status = self::STATUS_REFUSED;
+ $this->reason_decline_or_cancel = $reasondeclinenote;
- return $this->setStatusCommon($user, self::STATUS_REFUSED, $notrigger, 'PARTNERSHIP_REFUSE');
+ $result = $this->update($user);
+
+ if ($result) {
+ $this->reason_decline_or_cancel = $reasondeclinenote;
+ return 1;
+ }
+
+ return -1;
}
/**
@@ -816,7 +906,7 @@ class Partnership extends CommonObject
public function reopen($user, $notrigger = 0)
{
// Protection
- if ($this->status != self::STATUS_CANCELED) {
+ if ($this->status != self::STATUS_CANCELED && $this->status != self::STATUS_REFUSED) {
return 0;
}
diff --git a/htdocs/partnership/class/partnershiputils.class.php b/htdocs/partnership/class/partnershiputils.class.php
index 61659e6075c..992fca2703e 100644
--- a/htdocs/partnership/class/partnershiputils.class.php
+++ b/htdocs/partnership/class/partnershiputils.class.php
@@ -26,16 +26,20 @@
require_once DOL_DOCUMENT_ROOT.'/comm/action/class/actioncomm.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
+require_once DOL_DOCUMENT_ROOT.'/core/lib/geturl.lib.php';
+
dol_include_once('partnership/lib/partnership.lib.php');
+dol_include_once('/partnership/class/partnership.class.php');
-
+require_once DOL_DOCUMENT_ROOT."/societe/class/societe.class.php";
+require_once DOL_DOCUMENT_ROOT.'/adherents/class/adherent.class.php';
/**
* Class with cron tasks of Partnership module
*/
class PartnershipUtils
{
public $db; //!< To store db handler
- public $error; //!< To return error code (or message)
+ public $error; //!< To return error code (or message)
public $errors=array(); //!< To return several error codes (or messages)
@@ -50,33 +54,387 @@ class PartnershipUtils
return 1;
}
-
/**
- * Action executed by scheduler to cancel status of partnership when subscription is expired + x days. (Max number of cancel per call = $conf->global->PARTNERSHIP_MAX_CANCEL_PER_CALL)
+ * Action executed by scheduler to cancel status of partnership when subscription is expired + x days. (Max number of action batch per call = $conf->global->PARTNERSHIP_MAX_EXPIRATION_CANCEL_PER_CALL)
*
* CAN BE A CRON TASK
*
* @return int 0 if OK, <>0 if KO (this function is used also by cron so only 0 is OK)
*/
- public function doCancelStatusOfPartnership()
+ public function doCancelStatusOfMemberPartnership()
{
global $conf, $langs, $user;
- $langs->load("agenda");
+ $managedfor = $conf->global->PARTNERSHIP_IS_MANAGED_FOR;
- $MAXPERCALL = (empty($conf->global->PARTNERSHIP_MAX_CANCEL_PER_CALL) ? 100 : $conf->global->PARTNERSHIP_MAX_CANCEL_PER_CALL); // Limit to 100 per call
+ if ($managedfor != 'member') {
+ return 0; // If option 'PARTNERSHIP_IS_MANAGED_FOR' = 'thirdparty', this cron job does nothing.
+ }
- $error = 0;
- $this->output = '';
- $this->error='';
+ $partnership = new Partnership($this->db);
+ $MAXPERCALL = (empty($conf->global->PARTNERSHIP_MAX_EXPIRATION_CANCEL_PER_CALL) ? 25 : $conf->global->PARTNERSHIP_MAX_EXPIRATION_CANCEL_PER_CALL); // Limit to 25 per call
+ $langs->loadLangs(array("partnership", "member"));
- dol_syslog(__METHOD__." we cancel status of partnership ", LOG_DEBUG);
+ $error = 0;
+ $erroremail = '';
+ $this->output = '';
+ $this->error = '';
+ $partnershipsprocessed = array();
+
+ $gracedelay=$conf->global->PARTNERSHIP_NBDAYS_AFTER_MEMBER_EXPIRATION_BEFORE_CANCEL;
+ if ($gracedelay < 1) {
+ $this->error='BadValueForDelayBeforeCancelCheckSetup';
+ return -1;
+ }
+
+ dol_syslog(get_class($this)."::doCancelStatusOfMemberPartnership cancel expired partnerships with grace delay of ".$gracedelay);
$now = dol_now();
+ $datetotest = dol_time_plus_duree($now, -1 * abs($gracedelay), 'd');
- // En cours de traitement ...
+ $this->db->begin();
+
+ $sql = "SELECT p.rowid, p.fk_member, p.status";
+ $sql .= ", d.datefin, d.fk_adherent_type, dty.subscription";
+ $sql .= " FROM ".MAIN_DB_PREFIX."partnership as p";
+ $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."adherent as d on (d.rowid = p.fk_member)";
+ $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."adherent_type as dty on (dty.rowid = d.fk_adherent_type)";
+ $sql .= " WHERE fk_member > 0";
+ $sql .= " AND (d.datefin < '".$this->db->idate($datetotest)."' AND dty.subscription = 1)";
+ $sql .= " AND p.status = ".$partnership::STATUS_ACCEPTED; // Only accepted not yet canceled
+ $sql .= $this->db->order('d.rowid', 'ASC');
+ // Limit is managed into loop later
+
+ $resql = $this->db->query($sql);
+ if ($resql) {
+ $numofexpiredmembers = $this->db->num_rows($resql);
+
+ $somethingdoneonpartnership = 0;
+ $ifetchpartner = 0;
+ while ($ifetchpartner < $numofexpiredmembers) {
+ $ifetchpartner++;
+
+ $obj = $this->db->fetch_object($resql);
+ if ($obj) {
+ if (! empty($partnershipsprocessed[$obj->rowid])) continue;
+
+ if ($somethingdoneonpartnership >= $MAXPERCALL) {
+ dol_syslog("We reach the limit of ".$MAXPERCALL." partnership processed, so we quit loop for this batch doCancelStatusOfMemberPartnership to avoid to reach email quota.", LOG_WARNING);
+ break;
+ }
+
+ $object = new Partnership($this->db);
+ $object->fetch($obj->rowid);
+
+ // Get expiration date
+ $expirationdate = $obj->datefin;
+
+ if ($expirationdate && $expirationdate < $now) { // If contract expired (we already had a test into main select, this is a security)
+ $somethingdoneonpartnership++;
+
+ $result = $object->cancel($user, 0);
+ // $conf->global->noapachereload = null;
+ if ($result < 0) {
+ $error++;
+ $this->error = $object->error;
+ if (is_array($object->errors) && count($object->errors)) {
+ if (is_array($this->errors)) $this->errors = array_merge($this->errors, $object->errors);
+ else $this->errors = $object->errors;
+ }
+ } else {
+ $partnershipsprocessed[$object->id]=$object->ref;
+
+ // Send an email to inform member
+ $labeltemplate = '(SendingEmailOnPartnershipCanceled)';
+
+ dol_syslog("Now we will send an email to member id=".$object->fk_member." with label ".$labeltemplate);
+
+ // Send deployment email
+ include_once DOL_DOCUMENT_ROOT.'/core/class/html.formmail.class.php';
+ include_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
+ $formmail=new FormMail($this->db);
+
+ // Define output language
+ $outputlangs = $langs;
+ $newlang = '';
+ if ($conf->global->MAIN_MULTILANGS && empty($newlang) && GETPOST('lang_id', 'aZ09')) $newlang = GETPOST('lang_id', 'aZ09');
+ if (! empty($newlang)) {
+ $outputlangs = new Translate("", $conf);
+ $outputlangs->setDefaultLang($newlang);
+ $outputlangs->loadLangs(array('main','member','partnership'));
+ }
+
+ $arraydefaultmessage=$formmail->getEMailTemplate($this->db, 'partnership_send', $user, $outputlangs, 0, 1, $labeltemplate);
+
+ $substitutionarray=getCommonSubstitutionArray($outputlangs, 0, null, $object);
+ complete_substitutions_array($substitutionarray, $outputlangs, $object);
+
+ $subject = make_substitutions($arraydefaultmessage->topic, $substitutionarray, $outputlangs);
+ $msg = make_substitutions($arraydefaultmessage->content, $substitutionarray, $outputlangs);
+ $from = dol_string_nospecial($conf->global->MAIN_INFO_SOCIETE_NOM, ' ', array(",")).' <'.$conf->global->MAIN_INFO_SOCIETE_MAIL.'>';
+
+ $adherent = new Adherent($this->db);
+ $adherent->fetch($object->fk_member);
+ $to = $adherent->email;
+
+ $cmail = new CMailFile($subject, $to, $from, $msg, array(), array(), array(), '', '', 0, 1);
+ $result = $cmail->sendfile();
+ if (! $result || $cmail->error) {
+ $erroremail .= ($erroremail ? ', ' : '').$cmail->error;
+ $this->errors[] = $cmail->error;
+ if (is_array($cmail->errors) && count($cmail->errors) > 0) $this->errors += $cmail->errors;
+ }
+ }
+ }
+ }
+ }
+ } else {
+ $error++;
+ $this->error = $this->db->lasterror();
+ }
+
+ if (! $error) {
+ $this->db->commit();
+ $this->output = $numofexpiredmembers.' expired partnership members found'."\n";
+ if ($erroremail) $this->output.='. Got errors when sending some email : '.$erroremail;
+ } else {
+ $this->db->rollback();
+ $this->output = "Rollback after error\n";
+ $this->output.= $numofexpiredmembers.' expired partnership members found'."\n";
+ if ($erroremail) $this->output.='. Got errors when sending some email : '.$erroremail;
+ }
return ($error ? 1: 0);
}
+
+
+ /**
+ * Action executed by scheduler to check if Dolibarr backlink not found on partner website. (Max number of action batch per call = $conf->global->PARTNERSHIP_MAX_WARNING_BACKLINK_PER_CALL)
+ *
+ * CAN BE A CRON TASK
+ *
+ * @return int 0 if OK, <>0 if KO (this function is used also by cron so only 0 is OK)
+ */
+ public function doWarningOfPartnershipIfDolibarrBacklinkNotfound()
+ {
+ global $conf, $langs, $user;
+
+ $managedfor = $conf->global->PARTNERSHIP_IS_MANAGED_FOR;
+
+ $partnership = new Partnership($this->db);
+ $MAXPERCALL = (empty($conf->global->PARTNERSHIP_MAX_WARNING_BACKLINK_PER_CALL) ? 10 : $conf->global->PARTNERSHIP_MAX_WARNING_BACKLINK_PER_CALL); // Limit to 10 per call
+
+ $langs->loadLangs(array("partnership", "member"));
+
+ $error = 0;
+ $erroremail = '';
+ $this->output = '';
+ $this->error = '';
+ $partnershipsprocessed = array();
+
+ $gracedelay=$conf->global->PARTNERSHIP_NBDAYS_AFTER_MEMBER_EXPIRATION_BEFORE_CANCEL;
+ if ($gracedelay < 1) {
+ $this->error='BadValueForDelayBeforeCancelCheckSetup';
+ return -1;
+ }
+
+ $fk_partner = ($managedfor == 'member') ? 'fk_member' : 'fk_soc';
+
+ dol_syslog(get_class($this)."::doWarningOfPartnershipIfDolibarrBacklinkNotfound Warning of partnership");
+
+ $now = dol_now();
+ $datetotest = dol_time_plus_duree($now, -1 * abs($gracedelay), 'd');
+
+ $this->db->begin();
+
+ $sql = "SELECT p.rowid, p.status, p.".$fk_partner;
+ $sql .= ", p.last_check_backlink";
+
+ $sql .= ', partner.url, partner.email';
+
+ $sql .= " FROM ".MAIN_DB_PREFIX."partnership as p";
+
+ if ($managedfor == 'member') {
+ $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."adherent as partner on (partner.rowid = p.fk_member)";
+ } else {
+ $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as partner on (partner.rowid = p.fk_soc)";
+ }
+
+ $sql .= " WHERE 1 = 1";
+ $sql .= " AND p.".$fk_partner." > 0";
+ $sql .= " AND p.status = ".$partnership::STATUS_ACCEPTED; // Only accepted not yet canceled
+ $sql .= " AND (p.last_check_backlink IS NULL OR p.last_check_backlink <= '".$this->db->idate($now - 7 * 24 * 3600)."')"; // Every week, check that website contains a link to dolibarr.
+ $sql .= $this->db->order('p.rowid', 'ASC');
+ // Limit is managed into loop later
+
+ $resql = $this->db->query($sql);
+ if ($resql) {
+ $numofexpiredmembers = $this->db->num_rows($resql);
+ $somethingdoneonpartnership = 0;
+ $ifetchpartner = 0;
+ while ($ifetchpartner < $numofexpiredmembers) {
+ $ifetchpartner++;
+
+ $obj = $this->db->fetch_object($resql);
+ if ($obj) {
+ if (! empty($partnershipsprocessed[$obj->rowid])) continue;
+
+ if ($somethingdoneonpartnership >= $MAXPERCALL) {
+ dol_syslog("We reach the limit of ".$MAXPERCALL." partnership processed, so we quit loop for this batch doWarningOfPartnershipIfDolibarrBacklinkNotfound to avoid to reach email quota.", LOG_WARNING);
+ break;
+ }
+
+ $backlinkfound = 0;
+
+ $object = new Partnership($this->db);
+ $object->fetch($obj->rowid);
+
+ if ($managedfor == 'member') {
+ $fk_partner = $object->fk_member;
+ } else {
+ $fk_partner = $object->fk_soc;
+ }
+
+ $website = $obj->url;
+
+ if (empty($website)) {
+ $websitenotfound .= ($websitenotfound ? ', ' : '').'Website not found for id="'.$fk_partner.'"'."\n";
+ } else {
+ $backlinkfound = $this->checkDolibarrBacklink($website);
+ }
+
+ if (!$backlinkfound) {
+ $tmpcount = $object->count_last_url_check_error + 1;
+
+ if ($tmpcount > 2 && $tmpcount <= 4) { // Send Warning Email
+ if (!empty($obj->email)) {
+ $emailnotfound .= ($emailnotfound ? ', ' : '').'Email not found for id="'.$fk_partner.'"'."\n";
+ } else {
+ $labeltemplate = '(SendingEmailOnPartnershipWillSoonBeCanceled)';
+
+ dol_syslog("Now we will send an email to partner id=".$fk_partner." with label ".$labeltemplate);
+
+ // Send deployment email
+ include_once DOL_DOCUMENT_ROOT.'/core/class/html.formmail.class.php';
+ include_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
+ $formmail=new FormMail($this->db);
+
+ // Define output language
+ $outputlangs = $langs;
+ $newlang = '';
+ if ($conf->global->MAIN_MULTILANGS && empty($newlang) && GETPOST('lang_id', 'aZ09')) $newlang = GETPOST('lang_id', 'aZ09');
+ if (! empty($newlang)) {
+ $outputlangs = new Translate("", $conf);
+ $outputlangs->setDefaultLang($newlang);
+ $outputlangs->loadLangs(array('main','member','partnership'));
+ }
+
+ $arraydefaultmessage=$formmail->getEMailTemplate($this->db, 'partnership_send', $user, $outputlangs, 0, 1, $labeltemplate);
+
+ $substitutionarray=getCommonSubstitutionArray($outputlangs, 0, null, $object);
+ complete_substitutions_array($substitutionarray, $outputlangs, $object);
+
+ $subject = make_substitutions($arraydefaultmessage->topic, $substitutionarray, $outputlangs);
+ $msg = make_substitutions($arraydefaultmessage->content, $substitutionarray, $outputlangs);
+ $from = dol_string_nospecial($conf->global->MAIN_INFO_SOCIETE_NOM, ' ', array(",")).' <'.$conf->global->MAIN_INFO_SOCIETE_MAIL.'>';
+
+ $to = $obj->email;
+
+ $cmail = new CMailFile($subject, $to, $from, $msg, array(), array(), array(), '', '', 0, 1);
+ $result = $cmail->sendfile();
+ if (! $result || $cmail->error) {
+ $erroremail .= ($erroremail ? ', ' : '').$cmail->error;
+ $this->errors[] = $cmail->error;
+ if (is_array($cmail->errors) && count($cmail->errors) > 0) $this->errors += $cmail->errors;
+ }
+ }
+ } elseif ($tmpcount > 4) { // Cancel Partnership
+ $object->status = $object::STATUS_CANCELED;
+ $object->reason_decline_or_cancel = $langs->trans('BacklinkNotFoundOnPartnerWebsite');
+ }
+
+ $object->count_last_url_check_error = $tmpcount;
+ } else {
+ $object->count_last_url_check_error = 0;
+ $object->reason_decline_or_cancel = '';
+ }
+
+ $partnershipsprocessed[$object->id]=$object->ref;
+
+ $object->last_check_backlink = $this->db->idate($now);
+
+ $object->update($user);
+ }
+ }
+ } else {
+ $error++;
+ $this->error = $this->db->lasterror();
+ }
+
+ if (! $error) {
+ $this->db->commit();
+ $this->output = $numofexpiredmembers.' partnership checked'."\n";
+ if ($erroremail) $this->output.='. Got errors when sending some email : '.$erroremail."\n";
+ if ($emailnotfound) $this->output.='. Email not found for some partner : '.$emailnotfound."\n";
+ if ($websitenotfound) $this->output.='. Website not found for some partner : '.$websitenotfound."\n";
+ } else {
+ $this->db->rollback();
+ $this->output = "Rollback after error\n";
+ $this->output.= $numofexpiredmembers.' partnership checked'."\n";
+ if ($erroremail) $this->output.='. Got errors when sending some email : '.$erroremail."\n";
+ if ($emailnotfound) $this->output.='. Email not found for some partner : '.$emailnotfound."\n";
+ if ($websitenotfound) $this->output.='. Website not found for some partner : '.$websitenotfound."\n";
+ }
+
+ return ($error ? 1: 0);
+ }
+
+ /**
+ * Action to check if Dolibarr backlink not found on partner website
+ *
+ * CAN BE A CRON TASK
+ * @param $website Partner's website
+ * @return int 0 if KO, 1 if OK
+ */
+ public function checkDolibarrBacklink($website = null)
+ {
+ global $conf, $langs, $user;
+
+ $found = 0;
+ $error = 0;
+ $webcontent = '';
+
+ // $website = 'https://nextgestion.com/'; // For Test
+ $tmpgeturl = getURLContent($website);
+ if ($tmpgeturl['curl_error_no']) {
+ $error++;
+ dol_syslog('Error getting '.$website.': '.$tmpgeturl['curl_error_msg']);
+ } elseif ($tmpgeturl['http_code'] != '200') {
+ $error++;
+ dol_syslog('Error getting '.$website.': '.$tmpgeturl['curl_error_msg']);
+ } else {
+ $urlContent = $tmpgeturl['content'];
+ $dom = new DOMDocument();
+ @$dom->loadHTML($urlContent);
+
+ $xpath = new DOMXPath($dom);
+ $hrefs = $xpath->evaluate("//a");
+
+ for ($i = 0; $i < $hrefs->length; $i++) {
+ $href = $hrefs->item($i);
+ $url = $href->getAttribute('href');
+ $url = filter_var($url, FILTER_SANITIZE_URL);
+ if (!filter_var($url, FILTER_VALIDATE_URL) === false) {
+ $webcontent .= $url;
+ }
+ }
+ }
+
+ if ($webcontent && !empty($conf->global->PARTNERSHIP_BACKLINKS_TO_CHECK) && preg_match('/'.$conf->global->PARTNERSHIP_BACKLINKS_TO_CHECK.'/', $webcontent)) {
+ $found = 1;
+ }
+
+ return $found;
+ }
}
diff --git a/htdocs/partnership/partnership_card.php b/htdocs/partnership/partnership_card.php
index 5c2b46415b6..b31ced3556f 100644
--- a/htdocs/partnership/partnership_card.php
+++ b/htdocs/partnership/partnership_card.php
@@ -108,9 +108,7 @@ $search_array_options = $extrafields->getOptionalsFromPost($object->table_elemen
// Initialize array of search criterias
$search_all = GETPOST("search_all", 'alpha');
$search = array();
-if ($conf->global->PARTNERSHIP_IS_MANAGED_FOR == 'member')
- unset($object->fields['fk_soc']);
-else unset($object->fields['fk_member']);
+
foreach ($object->fields as $key => $val) {
if (GETPOST('search_'.$key, 'alpha')) {
$search[$key] = GETPOST('search_'.$key, 'alpha');
@@ -125,21 +123,18 @@ if (empty($action) && empty($id) && empty($ref)) {
include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be include, not include_once.
-$permissiontoread = $user->rights->partnership->read;
-$permissiontoadd = $user->rights->partnership->write; // Used by the include of actions_addupdatedelete.inc.php and actions_lineupdown.inc.php
-$permissiontodelete = $user->rights->partnership->delete || ($permissiontoadd && isset($object->status) && $object->status == $object::STATUS_DRAFT);
-$permissionnote = $user->rights->partnership->write; // Used by the include of actions_setnotes.inc.php
-$permissiondellink = $user->rights->partnership->write; // Used by the include of actions_dellink.inc.php
-$upload_dir = $conf->partnership->multidir_output[isset($object->entity) ? $object->entity : 1];
-
-// Security check - Protection if external user
-//if ($user->socid > 0) accessforbidden();
-//if ($user->socid > 0) $socid = $user->socid;
-//$isdraft = (($object->status == $object::STATUS_DRAFT) ? 1 : 0);
-//restrictedArea($user, $object->element, $object->id, '', '', 'fk_soc', 'rowid', $isdraft);
-//if (empty($conf->partnership->enabled)) accessforbidden();
-//if (empty($permissiontoread)) accessforbidden();
+$permissiontoread = $user->rights->partnership->read;
+$permissiontoadd = $user->rights->partnership->write; // Used by the include of actions_addupdatedelete.inc.php and actions_lineupdown.inc.php
+$permissiontodelete = $user->rights->partnership->delete || ($permissiontoadd && isset($object->status) && $object->status == $object::STATUS_DRAFT);
+$permissionnote = $user->rights->partnership->write; // Used by the include of actions_setnotes.inc.php
+$permissiondellink = $user->rights->partnership->write; // Used by the include of actions_dellink.inc.php
+$upload_dir = $conf->partnership->multidir_output[isset($object->entity) ? $object->entity : 1];
+$managedfor = $conf->global->PARTNERSHIP_IS_MANAGED_FOR;
+if (empty($conf->partnership->enabled)) accessforbidden();
+if (empty($permissiontoread)) accessforbidden();
+if ($object->id > 0 && $object->fk_member > 0 && $managedfor != 'member') accessforbidden();
+if ($object->id > 0 && $object->fk_soc > 0 && $managedfor != 'thirdparty') accessforbidden();
/*
* Actions
@@ -166,6 +161,19 @@ if (empty($reshook)) {
}
}
+ $fk_partner = ($managedfor == 'member') ? GETPOST('fk_member', 'int') : GETPOST('fk_soc', 'int');
+ $obj_partner = ($managedfor == 'member') ? $object->fk_member : $object->fk_soc;
+
+ if ($action == 'add' || ($action == 'update' && $obj_partner != $fk_partner)) {
+ $fpartnership = new Partnership($db);
+
+ $partnershipid = $fpartnership->fetch(0, "", $fk_partner);
+ if ($partnershipid > 0) {
+ setEventMessages($langs->trans('PartnershipAlreadyExist').' : '.$fpartnership->getNomUrl(0, '', 1), '', 'errors');
+ $action = ($action == 'add') ? 'create' : 'edit';
+ }
+ }
+
$triggermodname = 'PARTNERSHIP_MODIFY'; // Name of trigger action code to execute when we modify record
// Actions cancel, add, update, update_extras, confirm_validate, confirm_delete, confirm_deleteline, confirm_clone, confirm_close, confirm_setdraft, confirm_reopen
@@ -214,10 +222,12 @@ if (empty($reshook)) {
if ($object->statut != $object::STATUS_REFUSED) {
$db->begin();
- $result = $object->refused($user, GETPOST('reason_decline_or_cancel', 'alpha'));
+ $result = $object->refused($user, GETPOST('reason_decline_or_cancel', 'restricthtml'));
if ($result < 0) {
setEventMessages($object->error, $object->errors, 'errors');
$error++;
+ } else {
+ $object->reason_decline_or_cancel = GETPOST('reason_decline_or_cancel', 'restricthtml');
}
if (!$error) {
@@ -252,8 +262,14 @@ if (empty($reshook)) {
$autocopy = 'MAIN_MAIL_AUTOCOPY_PARTNERSHIP_TO';
$trackid = 'partnership'.$object->id;
include DOL_DOCUMENT_ROOT.'/core/actions_sendmails.inc.php';
+
+ if (!empty($id) && !empty(GETPOST('confirm'))) {
+ header("Location: ".$_SERVER['PHP_SELF']."?id=".$id);
+ exit;
+ }
}
+if ($object->id > 0 && $object->status == $object::STATUS_REFUSED) $object->fields['reason_decline_or_cancel']['visible'] = 3;
@@ -392,7 +408,7 @@ if ($object->id > 0 && (empty($action) || ($action != 'edit' && $action != 'crea
if ($action == 'close') {
// Create an array for form
$formquestion = array();
- $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ToClose'), $langs->trans('ConfirmCloseAsk', $object->ref), 'confirm_close', $formquestion, 'yes', 1);
+ $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ToClose'), $langs->trans('ConfirmClosePartnershipAsk', $object->ref), 'confirm_close', $formquestion, 'yes', 1);
}
// Reopon confirmation
if ($action == 'reopen') {
@@ -405,7 +421,7 @@ if ($object->id > 0 && (empty($action) || ($action != 'edit' && $action != 'crea
if ($action == 'refuse') {
//Form to close proposal (signed or not)
$formquestion = array(
- array('type' => 'text', 'name' => 'reason_decline_or_cancel', 'label' => $langs->trans("Note"), 'morecss' => 'reason_decline_or_cancel', 'value' => '') // Field to complete private note (not replace)
+ array('type' => 'text', 'name' => 'reason_decline_or_cancel', 'label' => $langs->trans("Note"), 'morecss' => 'reason_decline_or_cancel minwidth400', 'value' => '') // Field to complete private note (not replace)
);
// if (!empty($conf->notification->enabled)) {
@@ -416,7 +432,7 @@ if ($object->id > 0 && (empty($action) || ($action != 'edit' && $action != 'crea
// ));
// }
- $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ReasonDecline'), $text, 'confirm_refuse', $formquestion, '', 1, 250);
+ $formconfirm = $form->formconfirm($_SERVER["PHP_SELF"].'?id='.$object->id, $langs->trans('ToRefuse'), $text, 'confirm_refuse', $formquestion, '', 1, 250);
}
// Confirmation of action xxxx
@@ -489,6 +505,8 @@ if ($object->id > 0 && (empty($action) || ($action != 'edit' && $action != 'crea
}*/
$morehtmlref .= '
';
+ if ($managedfor == 'member') $npfilter .= " AND te.fk_member > 0 "; else $npfilter .= " AND te.fk_soc > 0 ";
+ $object->next_prev_filter = $npfilter;
dol_banner_tab($object, 'ref', $linkback, 1, 'ref', 'ref', $morehtmlref);
@@ -504,6 +522,32 @@ if ($object->id > 0 && (empty($action) || ($action != 'edit' && $action != 'crea
//unset($object->fields['fk_soc']); // Hide field already shown in banner
include DOL_DOCUMENT_ROOT.'/core/tpl/commonfields_view.tpl.php';
+ // End of subscription date
+ if ($managedfor == 'member') {
+ $fadherent = new Adherent($db);
+ $fadherent->fetch($object->fk_member);
+ print '
'.$langs->trans("SubscriptionEndDate").'
';
+ if ($fadherent->datefin) {
+ print dol_print_date($fadherent->datefin, 'day');
+ if ($fadherent->hasDelay()) {
+ print " ".img_warning($langs->trans("Late"));
+ }
+ } else {
+ if (!$adht->subscription) {
+ print $langs->trans("SubscriptionNotRecorded");
+ if ($fadherent->statut > 0) {
+ print " ".img_warning($langs->trans("Late")); // Display a delay picto only if it is not a draft and is not canceled
+ }
+ } else {
+ print $langs->trans("SubscriptionNotReceived");
+ if ($fadherent->statut > 0) {
+ print " ".img_warning($langs->trans("Late")); // Display a delay picto only if it is not a draft and is not canceled
+ }
+ }
+ }
+ print '
';
+ }
+
// Other attributes. Fields from hook formObjectOptions and Extrafields.
include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_view.tpl.php';
@@ -583,7 +627,7 @@ if ($object->id > 0 && (empty($action) || ($action != 'edit' && $action != 'crea
}
// Back to draft
- if ($object->status == $object::STATUS_ACCEPTED) {
+ if ($object->status != $object::STATUS_DRAFT) {
print dolGetButtonAction($langs->trans('SetToDraft'), '', 'default', $_SERVER["PHP_SELF"].'?id='.$object->id.'&action=confirm_setdraft&confirm=yes', '', $permissiontoadd);
}
@@ -600,23 +644,11 @@ if ($object->id > 0 && (empty($action) || ($action != 'edit' && $action != 'crea
}
}
- // Clone
- // print dolGetButtonAction($langs->trans('ToClone'), '', 'default', $_SERVER['PHP_SELF'].'?id='.$object->id.'&socid='.$object->socid.'&action=clone&object=scrumsprint', '', $permissiontoadd);
-
-
- // if ($permissiontoadd) {
- // if ($object->status == $object::STATUS_ENABLED) {
- // print ''.$langs->trans("Disable").''."\n";
- // } else {
- // print ''.$langs->trans("Enable").''."\n";
- // }
- // }
-
// Cancel
if ($permissiontoadd) {
if ($object->status == $object::STATUS_ACCEPTED) {
- print dolGetButtonAction($langs->trans('Cancel'), '', 'default', $_SERVER["PHP_SELF"].'?id='.$object->id.'&action=confirm_close&confirm=yes&token='.newToken(), '', $permissiontoadd);
- } elseif ($object->status == $object::STATUS_CANCELED) {
+ print dolGetButtonAction($langs->trans('Cancel'), '', 'default', $_SERVER["PHP_SELF"].'?id='.$object->id.'&action=close&token='.newToken(), '', $permissiontoadd);
+ } elseif ($object->status > $object::STATUS_ACCEPTED) {
// print ''.$langs->trans("Re-Open").''."\n";
print dolGetButtonAction($langs->trans('Re-Open'), '', 'default', $_SERVER["PHP_SELF"].'?id='.$object->id.'&action=confirm_reopen&confirm=yes&token='.newToken(), '', $permissiontoadd);
}
@@ -624,7 +656,7 @@ if ($object->id > 0 && (empty($action) || ($action != 'edit' && $action != 'crea
// Refuse
if ($permissiontoadd) {
- if ($object->status != $object::STATUS_CANCELED) {
+ if ($object->status != $object::STATUS_CANCELED && $object->status != $object::STATUS_REFUSED) {
print ''.$langs->trans("Refuse").''."\n";
}
}
@@ -685,7 +717,7 @@ if ($object->id > 0 && (empty($action) || ($action != 'edit' && $action != 'crea
}
// Presend form
- $modelmail = 'partnership';
+ $modelmail = 'partnership_send';
$defaulttopic = 'InformationMessage';
$diroutput = $conf->partnership->dir_output;
$trackid = 'partnership'.$object->id;
diff --git a/htdocs/partnership/partnership_list.php b/htdocs/partnership/partnership_list.php
index d0a4738576d..1ae90d0d4cf 100644
--- a/htdocs/partnership/partnership_list.php
+++ b/htdocs/partnership/partnership_list.php
@@ -77,6 +77,7 @@ if (!$res) {
require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/date.lib.php';
require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
+require_once DOL_DOCUMENT_ROOT.'/adherents/class/adherent.class.php';
// load partnership libraries
require_once __DIR__.'/class/partnership.class.php';
@@ -85,7 +86,7 @@ require_once __DIR__.'/class/partnership.class.php';
//dol_include_once('/othermodule/class/otherobject.class.php');
// Load translation files required by the page
-$langs->loadLangs(array("partnership", "other"));
+$langs->loadLangs(array("partnership", "members", "other"));
$action = GETPOST('action', 'aZ09') ?GETPOST('action', 'aZ09') : 'view'; // The action 'add', 'create', 'edit', 'update', 'view', ...
$massaction = GETPOST('massaction', 'alpha'); // The bulk action (combo box choice into lists)
@@ -112,8 +113,9 @@ $pageprev = $page - 1;
$pagenext = $page + 1;
// Initialize technical objects
-$object = new Partnership($db);
-$extrafields = new ExtraFields($db);
+$object = new Partnership($db);
+$extrafields = new ExtraFields($db);
+$adherent = new Adherent($db);
$diroutputmassaction = $conf->partnership->dir_output.'/temp/massgeneration/'.$user->id;
$hookmanager->initHooks(array('partnershiplist')); // Note that conf->hooks_modules contains array
@@ -123,9 +125,9 @@ $extrafields->fetch_name_optionals_label($object->table_element);
$search_array_options = $extrafields->getOptionalsFromPost($object->table_element, '', 'search_');
-if ($conf->global->PARTNERSHIP_IS_MANAGED_FOR == 'member')
- unset($object->fields['fk_soc']);
-else unset($object->fields['fk_member']);
+$managedfor = $conf->global->PARTNERSHIP_IS_MANAGED_FOR;
+
+if ($managedfor != 'member' && $sortfield == 'd.datefin') $sortfield = '';
// Default sort order (if not yet defined by previous GETPOST)
if (!$sortfield) {
@@ -148,6 +150,11 @@ foreach ($object->fields as $key => $val) {
$search[$key.'_dtend'] = dol_mktime(23, 59, 59, GETPOST('search_'.$key.'_dtendmonth', 'int'), GETPOST('search_'.$key.'_dtendday', 'int'), GETPOST('search_'.$key.'_dtendyear', 'int'));
}
}
+$search_filter = GETPOST("search_filter", 'alpha');
+$filter = GETPOST("filter", 'alpha');
+if ($filter) {
+ $search_filter = $filter; // For backward compatibility
+}
// List of fields to search into when doing a "search in all"
$fieldstosearchall = array();
@@ -178,8 +185,8 @@ include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_list_array_fields.tpl.php';
$object->fields = dol_sort_array($object->fields, 'position');
$arrayfields = dol_sort_array($arrayfields, 'position');
-$permissiontoread = $user->rights->partnership->read;
-$permissiontoadd = $user->rights->partnership->write;
+$permissiontoread = $user->rights->partnership->read;
+$permissiontoadd = $user->rights->partnership->write;
$permissiontodelete = $user->rights->partnership->delete;
// Security check
@@ -229,6 +236,7 @@ if (empty($reshook)) {
}
$toselect = '';
$search_array_options = array();
+ $search_filter = "";
}
if (GETPOST('button_removefilter_x', 'alpha') || GETPOST('button_removefilter.x', 'alpha') || GETPOST('button_removefilter', 'alpha')
|| GETPOST('button_search_x', 'alpha') || GETPOST('button_search.x', 'alpha') || GETPOST('button_search', 'alpha')) {
@@ -240,6 +248,38 @@ if (empty($reshook)) {
$objectlabel = 'Partnership';
$uploaddir = $conf->partnership->dir_output;
include DOL_DOCUMENT_ROOT.'/core/actions_massactions.inc.php';
+
+ // Cancel partnership
+ if ($massaction == 'cancel' && $permissiontoadd) {
+ $db->begin();
+
+ $objecttmp = new $objectclass($db);
+ $nbok = 0;
+ foreach ($toselect as $toselectid) {
+ $result = $objecttmp->fetch($toselectid);
+ if ($result > 0) {
+ $result = $objecttmp->cancel($user, 3);
+ if ($result <= 0) {
+ setEventMessages($objecttmp->error, $objecttmp->errors, 'errors');
+ $error++;
+ break;
+ } else {
+ $nbok++;
+ }
+ } else {
+ setEventMessages($objecttmp->error, $objecttmp->errors, 'errors');
+ $error++;
+ break;
+ }
+ }
+
+ if (!$error) {
+ setEventMessages($langs->trans("RecordsModified", $nbok), null, 'mesgs');
+ $db->commit();
+ } else {
+ $db->rollback();
+ }
+ }
}
@@ -263,10 +303,13 @@ $morecss = array();
// --------------------------------------------------------------------
$sql = 'SELECT ';
$sql .= $object->getFieldList('t');
+if ($managedfor == 'member') {
+ $sql .= ', d.datefin, d.fk_adherent_type, dty.subscription';
+}
// Add fields from extrafields
if (!empty($extrafields->attributes[$object->table_element]['label'])) {
foreach ($extrafields->attributes[$object->table_element]['label'] as $key => $val) {
- $sql .= ($extrafields->attributes[$object->table_element]['type'][$key] != 'separate' ? ", ef.".$key.' as options_'.$key.', ' : '');
+ $sql .= ($extrafields->attributes[$object->table_element]['type'][$key] != 'separate' ? ", ef.".$key.' as options_'.$key : '');
}
}
// Add fields from hooks
@@ -278,6 +321,10 @@ $sql .= " FROM ".MAIN_DB_PREFIX.$object->table_element." as t";
if (is_array($extrafields->attributes[$object->table_element]['label']) && count($extrafields->attributes[$object->table_element]['label'])) {
$sql .= " LEFT JOIN ".MAIN_DB_PREFIX.$object->table_element."_extrafields as ef on (t.rowid = ef.fk_object)";
}
+if ($managedfor == 'member') {
+ $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."adherent as d on (d.rowid = t.fk_member)";
+ $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."adherent_type as dty on (dty.rowid = d.fk_adherent_type)";
+}
// Add table from hooks
$parameters = array();
$reshook = $hookmanager->executeHooks('printFieldListFrom', $parameters, $object); // Note that $action and $object may have been modified by hook
@@ -287,6 +334,9 @@ if ($object->ismultientitymanaged == 1) {
} else {
$sql .= " WHERE 1 = 1";
}
+if ($managedfor == 'member')
+ $sql .= " AND fk_member > 0";
+else $sql .= " AND fk_soc > 0";
foreach ($search as $key => $val) {
if (array_key_exists($key, $object->fields)) {
if ($key == 'status' && $search[$key] == -1) {
@@ -316,6 +366,17 @@ foreach ($search as $key => $val) {
}
}
}
+if ($managedfor == 'member') {
+ if ($search_filter == 'withoutsubscription') {
+ $sql .= " AND (d.datefin IS NULL OR dty.subscription = 0)";
+ }
+ if ($search_filter == 'uptodate') {
+ $sql .= " AND (d.datefin >= '".$db->idate($now)."' OR dty.subscription = 0)";
+ }
+ if ($search_filter == 'outofdate') {
+ $sql .= " AND (d.datefin < '".$db->idate($now)."' AND dty.subscription = 1)";
+ }
+}
if ($search_all) {
$sql .= natural_search(array_keys($fieldstosearchall), $search_all);
}
@@ -422,6 +483,9 @@ foreach ($search as $key => $val) {
if ($optioncss != '') {
$param .= '&optioncss='.urlencode($optioncss);
}
+if ($search_filter && $search_filter != '-1') {
+ $param .= "&search_filter=".urlencode($search_filter);
+}
// Add $param from extra fields
include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_list_search_param.tpl.php';
// Add $param from hooks
@@ -431,10 +495,10 @@ $param .= $hookmanager->resPrint;
// List of mass actions available
$arrayofmassactions = array(
- 'cancel'=>img_picto('', 'close_title', 'class="pictofixedwidth"').$langs->trans("Cancel"),
- //'generate_doc'=>img_picto('', 'pdf', 'class="pictofixedwidth"').$langs->trans("ReGeneratePDF"),
- //'builddoc'=>img_picto('', 'pdf', 'class="pictofixedwidth"').$langs->trans("PDFMerge"),
- 'presend'=>img_picto('', 'email', 'class="pictofixedwidth"').$langs->trans("SendByMail"),
+'cancel'=>img_picto('', 'close_title', 'class="pictofixedwidth"').$langs->trans("Cancel"),
+ //'generate_doc'=>img_picto('', 'pdf').$langs->trans("ReGeneratePDF"),
+ //'builddoc'=>img_picto('', 'pdf').$langs->trans("PDFMerge"),
+ 'presend'=>img_picto('', 'email', 'class="pictofixedwidth"').$langs->trans("SendMail"),
);
if ($permissiontodelete) {
$arrayofmassactions['predelete'] = img_picto('', 'delete', 'class="pictofixedwidth"').$langs->trans("Delete");
@@ -461,9 +525,9 @@ print_barre_liste($title, $page, $_SERVER["PHP_SELF"], $param, $sortfield, $sort
// Add code for pre mass action (confirmation or email presend form)
$topicmail = "SendPartnershipRef";
-$modelmail = "partnership";
+$modelmail = "partnership_send";
$objecttmp = new Partnership($db);
-$trackid = 'xxxx'.$object->id;
+$trackid = 'partnership'.$object->id;
include DOL_DOCUMENT_ROOT.'/core/tpl/massactions_pre.tpl.php';
if ($search_all) {
@@ -500,6 +564,11 @@ print '
';
+ }
// Extra fields
include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_list_print_fields.tpl.php';
// Fields from hook
@@ -665,6 +772,7 @@ while ($i < ($limit ? min($num, $limit) : $num)) {
$i++;
}
+if ($managedfor != 'member') $totalarray['nbfield']++; // End of subscription date
// Show total line
include DOL_DOCUMENT_ROOT.'/core/tpl/list_print_total.tpl.php';
@@ -677,6 +785,7 @@ if ($num == 0) {
$colspan++;
}
}
+ if ($managedfor != 'member') $colspan++; // End of subscription date
print '
'.$langs->trans("NoRecordFound").'
';
}
diff --git a/htdocs/public/payment/paymentok.php b/htdocs/public/payment/paymentok.php
index 520a4053000..ffc30467fd1 100644
--- a/htdocs/public/payment/paymentok.php
+++ b/htdocs/public/payment/paymentok.php
@@ -630,6 +630,26 @@ if ($ispaymentok) {
}
$substitutionarray = getCommonSubstitutionArray($outputlangs, 0, null, $object);
+
+ // Create external user
+ if (!empty($conf->global->ADHERENT_CREATE_EXTERNAL_USER_LOGIN)) {
+ $infouserlogin = '';
+ $nuser = new User($db);
+ $tmpuser = dol_clone($object);
+
+ $result = $nuser->create_from_member($tmpuser, $object->login);
+ $newpassword = $nuser->setPassword($user, '');
+
+ if ($result < 0) {
+ $outputlangs->load("errors");
+ $postactionmessages[] = 'Error in create external user : '.$nuser->error;
+ } else {
+ $infouserlogin = $outputlangs->trans("Login").': '.$nuser->login.' '."\n".$outputlangs->trans("Password").': '.$newpassword;
+ $postactionmessages[] = $langs->trans("NewUserCreated", $nuser->login);
+ }
+ $substitutionarray['__MEMBER_USER_LOGIN_INFORMATION__'] = $infouserlogin;
+ }
+
complete_substitutions_array($substitutionarray, $outputlangs, $object);
$subjecttosend = make_substitutions($subject, $substitutionarray, $outputlangs);
$texttosend = make_substitutions(dol_concatdesc($msg, $adht->getMailOnSubscription()), $substitutionarray, $outputlangs);
diff --git a/htdocs/societe/partnership.php b/htdocs/societe/partnership.php
new file mode 100644
index 00000000000..0a5205799a9
--- /dev/null
+++ b/htdocs/societe/partnership.php
@@ -0,0 +1,552 @@
+
+ * Copyright (C) 2021 NextGestion
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program. If not, see .
+ */
+
+/**
+ * \file partnership_card.php
+ * \ingroup partnership
+ * \brief Page to create/edit/view partnership
+ */
+
+//if (! defined('NOREQUIREDB')) define('NOREQUIREDB', '1'); // Do not create database handler $db
+//if (! defined('NOREQUIREUSER')) define('NOREQUIREUSER', '1'); // Do not load object $user
+//if (! defined('NOREQUIRESOC')) define('NOREQUIRESOC', '1'); // Do not load object $mysoc
+//if (! defined('NOREQUIRETRAN')) define('NOREQUIRETRAN', '1'); // Do not load object $langs
+//if (! defined('NOSCANGETFORINJECTION')) define('NOSCANGETFORINJECTION', '1'); // Do not check injection attack on GET parameters
+//if (! defined('NOSCANPOSTFORINJECTION')) define('NOSCANPOSTFORINJECTION', '1'); // Do not check injection attack on POST parameters
+//if (! defined('NOCSRFCHECK')) define('NOCSRFCHECK', '1'); // Do not check CSRF attack (test on referer + on token if option MAIN_SECURITY_CSRF_WITH_TOKEN is on).
+//if (! defined('NOTOKENRENEWAL')) define('NOTOKENRENEWAL', '1'); // Do not roll the Anti CSRF token (used if MAIN_SECURITY_CSRF_WITH_TOKEN is on)
+//if (! defined('NOSTYLECHECK')) define('NOSTYLECHECK', '1'); // Do not check style html tag into posted data
+//if (! defined('NOREQUIREMENU')) define('NOREQUIREMENU', '1'); // If there is no need to load and show top and left menu
+//if (! defined('NOREQUIREHTML')) define('NOREQUIREHTML', '1'); // If we don't need to load the html.form.class.php
+//if (! defined('NOREQUIREAJAX')) define('NOREQUIREAJAX', '1'); // Do not load ajax.lib.php library
+//if (! defined("NOLOGIN")) define("NOLOGIN", '1'); // If this page is public (can be called outside logged session). This include the NOIPCHECK too.
+//if (! defined('NOIPCHECK')) define('NOIPCHECK', '1'); // Do not check IP defined into conf $dolibarr_main_restrict_ip
+//if (! defined("MAIN_LANG_DEFAULT")) define('MAIN_LANG_DEFAULT', 'auto'); // Force lang to a particular value
+//if (! defined("MAIN_AUTHENTICATION_MODE")) define('MAIN_AUTHENTICATION_MODE', 'aloginmodule'); // Force authentication handler
+//if (! defined("NOREDIRECTBYMAINTOLOGIN")) define('NOREDIRECTBYMAINTOLOGIN', 1); // The main.inc.php does not make a redirect if not logged, instead show simple error message
+//if (! defined("FORCECSP")) define('FORCECSP', 'none'); // Disable all Content Security Policies
+//if (! defined('CSRFCHECK_WITH_TOKEN')) define('CSRFCHECK_WITH_TOKEN', '1'); // Force use of CSRF protection with tokens even for GET
+//if (! defined('NOBROWSERNOTIF')) define('NOBROWSERNOTIF', '1'); // Disable browser notification
+
+// Load Dolibarr environment
+$res = 0;
+// Try main.inc.php into web root known defined into CONTEXT_DOCUMENT_ROOT (not always defined)
+if (!$res && !empty($_SERVER["CONTEXT_DOCUMENT_ROOT"])) {
+ $res = @include $_SERVER["CONTEXT_DOCUMENT_ROOT"]."/main.inc.php";
+}
+// Try main.inc.php into web root detected using web root calculated from SCRIPT_FILENAME
+$tmp = empty($_SERVER['SCRIPT_FILENAME']) ? '' : $_SERVER['SCRIPT_FILENAME']; $tmp2 = realpath(__FILE__); $i = strlen($tmp) - 1; $j = strlen($tmp2) - 1;
+while ($i > 0 && $j > 0 && isset($tmp[$i]) && isset($tmp2[$j]) && $tmp[$i] == $tmp2[$j]) {
+ $i--; $j--;
+}
+if (!$res && $i > 0 && file_exists(substr($tmp, 0, ($i + 1))."/main.inc.php")) {
+ $res = @include substr($tmp, 0, ($i + 1))."/main.inc.php";
+}
+if (!$res && $i > 0 && file_exists(dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php")) {
+ $res = @include dirname(substr($tmp, 0, ($i + 1)))."/main.inc.php";
+}
+// Try main.inc.php using relative path
+if (!$res && file_exists("../main.inc.php")) {
+ $res = @include "../main.inc.php";
+}
+if (!$res && file_exists("../../main.inc.php")) {
+ $res = @include "../../main.inc.php";
+}
+if (!$res && file_exists("../../../main.inc.php")) {
+ $res = @include "../../../main.inc.php";
+}
+if (!$res) {
+ die("Include of main fails");
+}
+
+require_once DOL_DOCUMENT_ROOT.'/core/class/html.formcompany.class.php';
+require_once DOL_DOCUMENT_ROOT.'/core/class/html.formfile.class.php';
+require_once DOL_DOCUMENT_ROOT.'/core/class/html.formprojet.class.php';
+require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
+dol_include_once('/partnership/class/partnership.class.php');
+dol_include_once('/partnership/lib/partnership.lib.php');
+
+// Load translation files required by the page
+$langs->loadLangs(array("companies","partnership", "other"));
+
+// Get parameters
+$id = GETPOST('id', 'int');
+$ref = GETPOST('ref', 'alpha');
+$action = GETPOST('action', 'aZ09');
+$confirm = GETPOST('confirm', 'alpha');
+$cancel = GETPOST('cancel', 'aZ09');
+$contextpage = GETPOST('contextpage', 'aZ') ? GETPOST('contextpage', 'aZ') : 'partnershipcard'; // To manage different context of search
+$backtopage = GETPOST('backtopage', 'alpha');
+$backtopageforcancel = GETPOST('backtopageforcancel', 'alpha');
+//$lineid = GETPOST('lineid', 'int');
+
+// Security check
+$socid = GETPOST('socid', 'int');
+if (!empty($user->socid)) {
+ $socid = $user->socid;
+}
+
+$societe = new Societe($db);
+if ($socid > 0) {
+ $societe->fetch($socid);
+}
+
+// Initialize technical objects
+$object = new Partnership($db);
+$extrafields = new ExtraFields($db);
+$diroutputmassaction = $conf->partnership->dir_output.'/temp/massgeneration/'.$user->id;
+$hookmanager->initHooks(array('partnershipthirdparty', 'globalcard')); // Note that conf->hooks_modules contains array
+
+// Fetch optionals attributes and labels
+$extrafields->fetch_name_optionals_label($object->table_element);
+
+$search_array_options = $extrafields->getOptionalsFromPost($object->table_element, '', 'search_');
+
+// Initialize array of search criterias
+$search_all = GETPOST("search_all", 'alpha');
+$search = array();
+
+foreach ($object->fields as $key => $val) {
+ if (GETPOST('search_'.$key, 'alpha')) {
+ $search[$key] = GETPOST('search_'.$key, 'alpha');
+ }
+}
+
+// Load object
+include DOL_DOCUMENT_ROOT.'/core/actions_fetchobject.inc.php'; // Must be include, not include_once.
+
+$permissiontoread = $user->rights->partnership->read;
+$permissiontoadd = $user->rights->partnership->write; // Used by the include of actions_addupdatedelete.inc.php and actions_lineupdown.inc.php
+$permissiontodelete = $user->rights->partnership->delete || ($permissiontoadd && isset($object->status) && $object->status == $object::STATUS_DRAFT);
+$permissionnote = $user->rights->partnership->write; // Used by the include of actions_setnotes.inc.php
+$permissiondellink = $user->rights->partnership->write; // Used by the include of actions_dellink.inc.php
+$usercanclose = $user->rights->partnership->write; // Used by the include of actions_addupdatedelete.inc.php and actions_lineupdown.inc.php
+$upload_dir = $conf->partnership->multidir_output[isset($object->entity) ? $object->entity : 1];
+
+
+if ($conf->global->PARTNERSHIP_IS_MANAGED_FOR != 'thirdparty') accessforbidden();
+if (empty($conf->partnership->enabled)) accessforbidden();
+if (empty($permissiontoread)) accessforbidden();
+if ($action == 'edit' && empty($permissiontoadd)) accessforbidden();
+
+$partnershipid = $object->fetch(0, "", $socid);
+if (empty($action) && empty($partnershipid)) {
+ $action = 'create';
+}
+if (($action == 'update' || $action == 'edit') && $object->status != $object::STATUS_DRAFT && !empty($user->socid)) accessforbidden();
+
+if (empty($socid) && $object) {
+ $socid = $object->fk_soc;
+}
+/*
+ * Actions
+ */
+
+$parameters = array();
+$reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
+if ($reshook < 0) {
+ setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
+}
+
+$date_start = dol_mktime(0, 0, 0, GETPOST('date_partnership_startmonth', 'int'), GETPOST('date_partnership_startday', 'int'), GETPOST('date_partnership_startyear', 'int'));
+$date_end = dol_mktime(0, 0, 0, GETPOST('date_partnership_endmonth', 'int'), GETPOST('date_partnership_endday', 'int'), GETPOST('date_partnership_endyear', 'int'));
+
+if (empty($reshook)) {
+ $error = 0;
+
+ $backtopage = dol_buildpath('/partnership/partnership.php', 1).'?socid='.($socid > 0 ? $socid : '__ID__');
+
+ $triggermodname = 'PARTNERSHIP_MODIFY'; // Name of trigger action code to execute when we modify record
+
+ if ($action == 'add' && $permissiontoread) {
+ $error = 0;
+
+ $db->begin();
+
+ $now = dol_now();
+
+ if (!$error) {
+ $old_start_date = $object->date_partnership_start;
+
+ $object->fk_soc = $socid;
+ $object->date_partnership_start = (!GETPOST('date_partnership_start')) ? '' : $date_start;
+ $object->date_partnership_end = (!GETPOST('date_partnership_end')) ? '' : $date_end;
+ $object->note_public = GETPOST('note_public', 'restricthtml');
+ $object->date_creation = $now;
+ $object->fk_user_creat = $user->id;
+ $object->entity = $conf->entity;
+
+ // Fill array 'array_options' with data from add form
+ $ret = $extrafields->setOptionalsFromPost(null, $object);
+ if ($ret < 0) {
+ $error++;
+ }
+ }
+
+ if (!$error) {
+ $result = $object->create($user);
+ if ($result < 0) {
+ $error++;
+ if ($result == -4) {
+ setEventMessages($langs->trans("ErrorRefAlreadyExists"), null, 'errors');
+ } else {
+ setEventMessages($object->error, $object->errors, 'errors');
+ }
+ }
+ }
+
+ if ($error) {
+ $db->rollback();
+ $action = 'create';
+ } else {
+ $db->commit();
+ }
+ } elseif ($action == 'update' && $permissiontoread) {
+ $error = 0;
+
+ $db->begin();
+
+ $now = dol_now();
+
+ if (!$error) {
+ $object->oldcopy = clone $object;
+
+ $old_start_date = $object->date_partnership_start;
+
+ $object->date_partnership_start = (!GETPOST('date_partnership_start')) ? '' : $date_start;
+ $object->date_partnership_end = (!GETPOST('date_partnership_end')) ? '' : $date_end;
+ $object->note_public = GETPOST('note_public', 'restricthtml');
+ $object->fk_user_creat = $user->id;
+ $object->fk_user_modif = $user->id;
+
+ // Fill array 'array_options' with data from add form
+ $ret = $extrafields->setOptionalsFromPost(null, $object);
+ if ($ret < 0) {
+ $error++;
+ }
+ }
+
+ if (!$error) {
+ $result = $object->update($user);
+ if ($result < 0) {
+ $error++;
+ if ($result == -4) {
+ setEventMessages($langs->trans("ErrorRefAlreadyExists"), null, 'errors');
+ } else {
+ setEventMessages($object->error, $object->errors, 'errors');
+ }
+ }
+ }
+
+ if ($error) {
+ $db->rollback();
+ $action = 'edit';
+ } else {
+ $db->commit();
+ }
+ } elseif ($action == 'confirm_close' || $action == 'update_extras') {
+ include DOL_DOCUMENT_ROOT.'/core/actions_addupdatedelete.inc.php';
+
+ header("Location: ".$_SERVER['PHP_SELF']."?socid=".$socid);
+ exit;
+ }
+
+ // Actions when linking object each other
+ include DOL_DOCUMENT_ROOT.'/core/actions_dellink.inc.php';
+}
+
+$object->fields['fk_soc']['visible'] = 0;
+if ($object->id > 0 && $object->status == $object::STATUS_REFUSED && empty($action)) $object->fields['reason_decline_or_cancel']['visible'] = 1;
+$object->fields['note_public']['visible'] = 1;
+
+/*
+ * View
+ *
+ * Put here all code to build page
+ */
+
+$form = new Form($db);
+$formfile = new FormFile($db);
+
+$title = $langs->trans("Partnership");
+llxHeader('', $title);
+
+$form = new Form($db);
+
+if ($socid) {
+ require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php';
+ require_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php';
+
+ $langs->load("companies");
+
+ $societe = new Societe($db);
+ $result = $societe->fetch($socid);
+
+ if (!empty($conf->notification->enabled)) {
+ $langs->load("mails");
+ }
+ $head = societe_prepare_head($societe);
+
+ print dol_get_fiche_head($head, 'partnership', $langs->trans("ThirdParty"), -1, 'company');
+
+ $linkback = ''.$langs->trans("BackToList").'';
+
+ dol_banner_tab($societe, 'socid', $linkback, ($user->socid ? 0 : 1), 'rowid', 'nom');
+
+ print '
';
+
+ print '';
+ print '
';
+
+ if (!empty($conf->global->SOCIETE_USEPREFIX)) { // Old not used prefix field
+ print '
'."\n";
+
+ // Common attributes
+ //$keyforbreak='fieldkeytoswitchonsecondcolumn'; // We change column just before this field
+ //unset($object->fields['fk_project']); // Hide field already shown in banner
+ //unset($object->fields['fk_soc']); // Hide field already shown in banner
+ include DOL_DOCUMENT_ROOT.'/core/tpl/commonfields_view.tpl.php';
+
+ // Other attributes. Fields from hook formObjectOptions and Extrafields.
+ include DOL_DOCUMENT_ROOT.'/core/tpl/extrafields_view.tpl.php';
+
+ print '