DoliModules\Adherent\Controller\AdherentController::subscription()

Complexity

Conditions	106
Paths	> 20000

Size

Total Lines	409
Code Lines	261

Duplication

Lines	0
Ratio	0 %

Importance

Changes

0

<?php
    public function subscription()
    {
        global $conf;
        global $db;
        global $user;
        global $hookmanager;
        global $user;
        global $menumanager;
        global $langs;

        $langs->loadLangs(["companies", "bills", "members", "users", "mails", 'other']);

        $action = GETPOST('action', 'aZ09');
        $confirm = GETPOST('confirm', 'alpha');
        $contextpage = GETPOST('contextpage', 'aZ09');
        $optioncss = GETPOST('optioncss', 'aZ'); // Option for the css output (always '' except when 'print')

        $id = GETPOSTINT('rowid') ? GETPOSTINT('rowid') : GETPOSTINT('id');
        $rowid = $id;
        $ref = GETPOST('ref', 'alphanohtml');
        $typeid = GETPOSTINT('typeid');
        $cancel = GETPOST('cancel');

// Load variable for pagination
        $limit = GETPOSTINT('limit') ? GETPOSTINT('limit') : $conf->liste_limit;
        $sortfield = GETPOST('sortfield', 'aZ09comma');
        $sortorder = GETPOST('sortorder', 'aZ09comma');
        $page = GETPOSTISSET('pageplusone') ? (GETPOSTINT('pageplusone') - 1) : GETPOSTINT("page");
        if (empty($page) || $page == -1) {
            $page = 0;
        }     // If $page is not defined, or '' or -1
        $offset = $limit * $page;
        $pageprev = $page - 1;
        $pagenext = $page + 1;

// Default sort order (if not yet defined by previous GETPOST)
        if (!$sortfield) {
            $sortfield = "c.rowid";
        }
        if (!$sortorder) {
            $sortorder = "DESC";
        }

        $object = new Adherent($db);
        $extrafields = new ExtraFields($db);
        $adht = new AdherentType($db);

// fetch optionals attributes and labels
        $extrafields->fetch_name_optionals_label($object->table_element);

        $errmsg = '';

// Initialize technical object to manage hooks of page. Note that conf->hooks_modules contains array of hook context
        $hookmanager->initHooks(['subscription']);

// PDF
        $hidedetails = (GETPOSTINT('hidedetails') ? GETPOSTINT('hidedetails') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_DETAILS') ? 1 : 0));
        $hidedesc = (GETPOSTINT('hidedesc') ? GETPOSTINT('hidedesc') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_DESC') ? 1 : 0));
        $hideref = (GETPOSTINT('hideref') ? GETPOSTINT('hideref') : (getDolGlobalString('MAIN_GENERATE_DOCUMENTS_HIDE_REF') ? 1 : 0));

        $datefrom = 0;
        $dateto = 0;
        $paymentdate = -1;

// Fetch object
        if ($id > 0 || !empty($ref)) {
            // Load member
            $result = $object->fetch($id, $ref);

            // Define variables to know what current user can do on users
            $canadduser = ($user->admin || $user->hasRight("user", "user", "creer"));
            // Define variables to know what current user can do on properties of user linked to edited member
            if ($object->user_id) {
                // $User is the user who edits, $object->user_id is the id of the related user in the edited member
                $caneditfielduser = ((($user->id == $object->user_id) && $user->hasRight("user", "self", "creer"))
                    || (($user->id != $object->user_id) && $user->hasRight("user", "user", "creer")));
                $caneditpassworduser = ((($user->id == $object->user_id) && $user->hasRight("user", "self", "password"))
                    || (($user->id != $object->user_id) && $user->hasRight("user", "user", "password")));
            }
        }

// Define variables to determine what the current user can do on the members
        $canaddmember = $user->hasRight('adherent', 'creer');
// Define variables to determine what the current user can do on the properties of a member
        if ($id) {
            $caneditfieldmember = $user->hasRight('adherent', 'creer');
        }

// Security check
        $result = restrictedArea($user, 'adherent', $object->id, '', '', 'socid', 'rowid', 0);


        /*
         *  Actions
         */

        $parameters = [];
        $reshook = $hookmanager->executeHooks('doActions', $parameters, $object, $action);
        if ($reshook < 0) {
            setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
        }

// Create third party from a member
        if (empty($reshook) && $action == 'confirm_create_thirdparty' && $confirm == 'yes' && $user->hasRight('societe', 'creer')) {
            if ($result > 0) {
                // Creation of thirdparty
                $company = new Societe($db);
                $result = $company->create_from_member($object, GETPOST('companyname', 'alpha'), GETPOST('companyalias', 'alpha'), GETPOST('customercode', 'alpha'));

                if ($result < 0) {
                    $langs->load("errors");
                    setEventMessages($company->error, $company->errors, 'errors');
                } else {
                    $action = 'addsubscription';
                }
            } else {
                setEventMessages($object->error, $object->errors, 'errors');
            }
        }

        if (empty($reshook) && $action == 'setuserid' && ($user->hasRight('user', 'self', 'creer') || $user->hasRight('user', 'user', 'creer'))) {
            $error = 0;
            if (!$user->hasRight('user', 'user', 'creer')) {    // If can edit only itself user, we can link to itself only
                if (GETPOSTINT("userid") != $user->id && GETPOSTINT("userid") != $object->user_id) {
                    $error++;
                    setEventMessages($langs->trans("ErrorUserPermissionAllowsToLinksToItselfOnly"), null, 'errors');
                }
            }

            if (!$error) {
                if (GETPOSTINT("userid") != $object->user_id) {  // If link differs from currently in database
                    $result = $object->setUserId(GETPOSTINT("userid"));
                    if ($result < 0) {
                        dol_print_error(null, $object->error);
                    }
                    $action = '';
                }
            }
        }

        if (empty($reshook) && $action == 'setsocid') {
            $error = 0;
            if (!$error) {
                if (GETPOSTINT('socid') != $object->fk_soc) {    // If link differs from currently in database
                    $sql = "SELECT rowid FROM " . MAIN_DB_PREFIX . "adherent";
                    $sql .= " WHERE fk_soc = '" . GETPOSTINT('socid') . "'";
                    $resql = $db->query($sql);
                    if ($resql) {
                        $obj = $db->fetch_object($resql);
                        if ($obj && $obj->rowid > 0) {
                            $othermember = new Adherent($db);
                            $othermember->fetch($obj->rowid);
                            $thirdparty = new Societe($db);
                            $thirdparty->fetch(GETPOSTINT('socid'));
                            $error++;
                            setEventMessages($langs->trans("ErrorMemberIsAlreadyLinkedToThisThirdParty", $othermember->getFullName($langs), $othermember->login, $thirdparty->name), null, 'errors');
                        }
                    }

                    if (!$error) {
                        $result = $object->setThirdPartyId(GETPOSTINT('socid'));
                        if ($result < 0) {
                            dol_print_error(null, $object->error);
                        }
                        $action = '';
                    }
                }
            }
        }

        if ($user->hasRight('adherent', 'cotisation', 'creer') && $action == 'subscription' && !$cancel) {
            $error = 0;

            $langs->load("banks");

            $result = $object->fetch($rowid);
            $result = $adht->fetch($object->typeid);

            // Subscription information
            $datesubscription = 0;
            $datesubend = 0;
            $defaultdelay = !empty($adht->duration_value) ? $adht->duration_value : 1;
            $defaultdelayunit = !empty($adht->duration_unit) ? $adht->duration_unit : 'y';
            $paymentdate = ''; // Do not use 0 here, default value is '' that means not filled where 0 means 1970-01-01
            if (GETPOSTINT("reyear") && GETPOSTINT("remonth") && GETPOSTINT("reday")) {
                $datesubscription = dol_mktime(0, 0, 0, GETPOSTINT("remonth"), GETPOSTINT("reday"), GETPOSTINT("reyear"));
            }
            if (GETPOSTINT("endyear") && GETPOSTINT("endmonth") && GETPOSTINT("endday")) {
                $datesubend = dol_mktime(0, 0, 0, GETPOSTINT("endmonth"), GETPOSTINT("endday"), GETPOSTINT("endyear"));
            }
            if (GETPOSTINT("paymentyear") && GETPOSTINT("paymentmonth") && GETPOSTINT("paymentday")) {
                $paymentdate = dol_mktime(0, 0, 0, GETPOSTINT("paymentmonth"), GETPOSTINT("paymentday"), GETPOSTINT("paymentyear"));
            }
            $amount = price2num(GETPOST("subscription", 'alpha')); // Amount of subscription
            $label = GETPOST("label");

            // Payment information
            $accountid = GETPOSTINT("accountid");
            $operation = GETPOST("operation", "alphanohtml"); // Payment mode
            $num_chq = GETPOST("num_chq", "alphanohtml");
            $emetteur_nom = GETPOST("chqemetteur");
            $emetteur_banque = GETPOST("chqbank");
            $option = GETPOST("paymentsave");
            if (empty($option)) {
                $option = 'none';
            }
            $sendalsoemail = GETPOST("sendmail", 'alpha');

            // Check parameters
            if (!$datesubscription) {
                $error++;
                $langs->load("errors");
                $errmsg = $langs->trans("ErrorBadDateFormat", $langs->transnoentitiesnoconv("DateSubscription"));
                setEventMessages($errmsg, null, 'errors');
                $action = 'addsubscription';
            }
            if (GETPOST('end') && !$datesubend) {
                $error++;
                $langs->load("errors");
                $errmsg = $langs->trans("ErrorBadDateFormat", $langs->transnoentitiesnoconv("DateEndSubscription"));
                setEventMessages($errmsg, null, 'errors');
                $action = 'addsubscription';
            }
            if (!$datesubend) {
                $datesubend = dol_time_plus_duree(dol_time_plus_duree($datesubscription, $defaultdelay, $defaultdelayunit), -1, 'd');
            }
            if (($option == 'bankviainvoice' || $option == 'bankdirect') && !$paymentdate) {
                $error++;
                $errmsg = $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("DatePayment"));
                setEventMessages($errmsg, null, 'errors');
                $action = 'addsubscription';
            }

            // Check if a payment is mandatory or not
            if ($adht->subscription) {  // Member type need subscriptions
                if (!is_numeric($amount)) {
                    // If field is '' or not a numeric value
                    $errmsg = $langs->trans("ErrorFieldRequired", $langs->transnoentities("Amount"));
                    setEventMessages($errmsg, null, 'errors');
                    $error++;
                    $action = 'addsubscription';
                } else {
                    // If an amount has been provided, we check also fields that becomes mandatory when amount is not null.
                    if (isModEnabled('bank') && GETPOST("paymentsave") != 'none') {
                        if (GETPOST("subscription")) {
                            if (!GETPOST("label")) {
                                $errmsg = $langs->trans("ErrorFieldRequired", $langs->transnoentities("Label"));
                                setEventMessages($errmsg, null, 'errors');
                                $error++;
                                $action = 'addsubscription';
                            }
                            if (GETPOST("paymentsave") != 'invoiceonly' && !GETPOST("operation")) {
                                $errmsg = $langs->trans("ErrorFieldRequired", $langs->transnoentities("PaymentMode"));
                                setEventMessages($errmsg, null, 'errors');
                                $error++;
                                $action = 'addsubscription';
                            }
                            if (GETPOST("paymentsave") != 'invoiceonly' && !(GETPOSTINT("accountid") > 0)) {
                                $errmsg = $langs->trans("ErrorFieldRequired", $langs->transnoentities("FinancialAccount"));
                                setEventMessages($errmsg, null, 'errors');
                                $error++;
                                $action = 'addsubscription';
                            }
                        } else {
                            if (GETPOSTINT("accountid")) {
                                $errmsg = $langs->trans("ErrorDoNotProvideAccountsIfNullAmount");
                                setEventMessages($errmsg, null, 'errors');
                                $error++;
                                $action = 'addsubscription';
                            }
                        }
                    }
                }
            }

            // Record the subscription then complementary actions
            if (!$error && $action == 'subscription') {
                $db->begin();

                // Create subscription
                $crowid = $object->subscription($datesubscription, $amount, $accountid, $operation, $label, $num_chq, $emetteur_nom, $emetteur_banque, $datesubend);
                if ($crowid <= 0) {
                    $error++;
                    $errmsg = $object->error;
                    setEventMessages($object->error, $object->errors, 'errors');
                }

                if (!$error) {
                    $result = $object->subscriptionComplementaryActions($crowid, $option, $accountid, $datesubscription, $paymentdate, $operation, $label, $amount, $num_chq, $emetteur_nom, $emetteur_banque);
                    if ($result < 0) {
                        $error++;
                        setEventMessages($object->error, $object->errors, 'errors');
                    } else {
                        // If an invoice was created, it is into $object->invoice
                    }
                }

                if (!$error) {
                    $db->commit();
                } else {
                    $db->rollback();
                    $action = 'addsubscription';
                }

                if (!$error) {
                    setEventMessages("SubscriptionRecorded", null, 'mesgs');
                }

                // Send email
                if (!$error) {
                    // Send confirmation Email
                    if ($object->email && $sendalsoemail) {   // $object is 'Adherent'
                        $parameters = [
                            'datesubscription' => $datesubscription,
                            'amount' => $amount,
                            'ccountid' => $accountid,
                            'operation' => $operation,
                            'label' => $label,
                            'num_chq' => $num_chq,
                            'emetteur_nom' => $emetteur_nom,
                            'emetteur_banque' => $emetteur_banque,
                            'datesubend' => $datesubend,
                        ];
                        $reshook = $hookmanager->executeHooks('sendMail', $parameters, $object, $action); // Note that $action and $object may have been modified by some hooks
                        if ($reshook < 0) {
                            setEventMessages($hookmanager->error, $hookmanager->errors, 'errors');
                        }

                        if (empty($reshook)) {
                            $subject = '';
                            $msg = '';

                            // Send subscription email
                            include_once DOL_DOCUMENT_ROOT . '/core/class/html.formmail.class.php';
                            $formmail = new FormMail($db);
                            // Set output language
                            $outputlangs = new Translate('', $conf);
                            $outputlangs->setDefaultLang(empty($object->thirdparty->default_lang) ? $mysoc->default_lang : $object->thirdparty->default_lang);

The variable $mysoc seems to be never defined.

                            // Load traductions files required by page
                            $outputlangs->loadLangs(["main", "members"]);

                            // Get email content from template
                            $arraydefaultmessage = null;
                            $labeltouse = getDolGlobalString('ADHERENT_EMAIL_TEMPLATE_SUBSCRIPTION');

                            if (!empty($labeltouse)) {
                                $arraydefaultmessage = $formmail->getEMailTemplate($db, 'member', $user, $outputlangs, 0, 1, $labeltouse);
                            }

                            if (!empty($labeltouse) && is_object($arraydefaultmessage) && $arraydefaultmessage->id > 0) {
                                $subject = $arraydefaultmessage->topic;
                                $msg = $arraydefaultmessage->content;
                            }

                            $substitutionarray = getCommonSubstitutionArray($outputlangs, 0, null, $object);
                            complete_substitutions_array($substitutionarray, $outputlangs, $object);
                            $subjecttosend = make_substitutions($subject, $substitutionarray, $outputlangs);
                            $texttosend = make_substitutions(dol_concatdesc($msg, $adht->getMailOnSubscription()), $substitutionarray, $outputlangs);

                            // Attach a file ?
                            $file = '';
                            $listofpaths = [];
                            $listofnames = [];
                            $listofmimes = [];
                            if (is_object($object->invoice) && (!is_object($arraydefaultmessage) || intval($arraydefaultmessage->joinfiles))) {
                                $invoicediroutput = $conf->facture->dir_output;
                                $fileparams = dol_most_recent_file($invoicediroutput . '/' . $object->invoice->ref, preg_quote($object->invoice->ref, '/') . '[^\-]+');
                                $file = $fileparams['fullname'];

                                $listofpaths = [$file];
                                $listofnames = [basename($file)];
                                $listofmimes = [dol_mimetype($file)];
                            }

                            $moreinheader = 'X-Dolibarr-Info: send_an_email by adherents/subscription.php' . "\r\n";

                            $result = $object->sendEmail($texttosend, $subjecttosend, $listofpaths, $listofmimes, $listofnames, "", "", 0, -1, '', $moreinheader);
                            if ($result < 0) {
                                $errmsg = $object->error;
                                setEventMessages($object->error, $object->errors, 'errors');
                            } else {
                                setEventMessages($langs->trans("EmailSentToMember", $object->email), null, 'mesgs');
                            }
                        }
                    } else {
                        setEventMessages($langs->trans("NoEmailSentToMember"), null, 'mesgs');
                    }
                }

                // Clean some POST vars
                if (!$error) {
                    $_POST["subscription"] = '';
                    $_POST["accountid"] = '';
                    $_POST["operation"] = '';
                    $_POST["label"] = '';
                    $_POST["num_chq"] = '';
                }
            }
        }


        /*
         * View
         */

        require_once realpath(BASE_PATH . '/../Dolibarr/Modules/Adherent/Views/subscription.php');

        $db->close();
        return true;
    }