* Copyright (C) 2024 MDW * * 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 htdocs/public/opensurvey/index.php * \ingroup opensurvey * \brief Public file to show onpen surveys */ if (!defined('NOLOGIN')) { define("NOLOGIN", 1); // This means this output page does not require to be logged. } if (!defined('NOCSRFCHECK')) { define("NOCSRFCHECK", 1); // We accept to go on this page from external web site. } if (!defined('NOIPCHECK')) { define('NOIPCHECK', '1'); // Do not check IP defined into conf $dolibarr_main_restrict_ip } if (!defined('NOBROWSERNOTIF')) { define('NOBROWSERNOTIF', '1'); } // Load Dolibarr environment require '../../main.inc.php'; require_once DOL_DOCUMENT_ROOT.'/opensurvey/class/opensurveysondage.class.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/security.lib.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/company.lib.php'; require_once DOL_DOCUMENT_ROOT.'/core/lib/payments.lib.php'; // Load translation files required by the page $langs->loadLangs(array("companies", "other", "opensurveys")); // Get parameters $action = GETPOST('action', 'aZ09'); $cancel = GETPOST('cancel', 'alpha'); $SECUREKEY = GETPOST("securekey"); $entity = GETPOSTINT('entity') ? GETPOSTINT('entity') : $conf->entity; $backtopage = ''; $suffix = ""; // 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 < 0 || GETPOST('button_search', 'alpha') || GETPOST('button_removefilter', 'alpha')) { $page = 0; } // If $page is not defined, or '' or -1 or if we click on clear filters $offset = $limit * $page; $pageprev = $page - 1; $pagenext = $page + 1; if (GETPOST('btn_view')) { unset($_SESSION['email_customer']); } if (isset($_SESSION['email_customer'])) { $email = $_SESSION['email_customer']; } $object = new Opensurveysondage($db); // Define $urlwithroot //$urlwithouturlroot=preg_replace('/'.preg_quote(DOL_URL_ROOT,'/').'$/i','',trim($dolibarr_main_url_root)); //$urlwithroot=$urlwithouturlroot.DOL_URL_ROOT; // This is to use external domain name found into config file $urlwithroot = DOL_MAIN_URL_ROOT; // This is to use same domain name than current. For Paypal payment, we can use internal URL like localhost. // Security check if (!isModEnabled('opensurvey')) { httponly_accessforbidden('Module Opensurvey not enabled'); } /* * Actions */ // None /* * View */ $head = ''; if (getDolGlobalString('MAIN_OPENSURVEY_CSS_URL')) { $head = ''."\n"; } $conf->dol_hide_topmenu = 1; $conf->dol_hide_leftmenu = 1; if (!getDolGlobalString('OPENSURVEY_ENABLE_PUBLIC_INTERFACE')) { $langs->load("errors"); print '
'.$langs->trans('ErrorPublicInterfaceNotEnabled').'
'; $db->close(); exit(); } $arrayofjs = array(); $arrayofcss = array(); $replacemainarea = (empty($conf->dol_hide_leftmenu) ? '
' : '').'
'; llxHeader($head, $langs->trans("Surveys"), '', '', 0, 0, '', '', '', 'onlinepaymentbody', $replacemainarea, 1, 1); print ''."\n"; print '
'."\n"; print '
'."\n"; print ''."\n"; print ''."\n"; print ''."\n"; print ''."\n"; print ''."\n"; print ''; print "\n"; print ''."\n"; // Show logo (search order: logo defined by ONLINE_SIGN_LOGO_suffix, then ONLINE_SIGN_LOGO_, then small company logo, large company logo, theme logo, common logo) // Define logo and logosmall $logosmall = $mysoc->logo_small; $logo = $mysoc->logo; $paramlogo = 'ONLINE_OPENSURVEY_LOGO_'.$suffix; if (getDolGlobalString($paramlogo)) { $logosmall = getDolGlobalString($paramlogo); } elseif (getDolGlobalString('ONLINE_OPENSURVEY_LOGO')) { $logosmall = getDolGlobalString('ONLINE_OPENSURVEY_LOGO_'); } //print ''."\n"; // Define urllogo $urllogo = ''; $urllogofull = ''; if (!empty($logosmall) && is_readable($conf->mycompany->dir_output.'/logos/thumbs/'.$logosmall)) { $urllogo = DOL_URL_ROOT.'/viewimage.php?modulepart=mycompany&entity='.$conf->entity.'&file='.urlencode('logos/thumbs/'.$logosmall); $urllogofull = $dolibarr_main_url_root.'/viewimage.php?modulepart=mycompany&entity='.$conf->entity.'&file='.urlencode('logos/thumbs/'.$logosmall); } elseif (!empty($logo) && is_readable($conf->mycompany->dir_output.'/logos/'.$logo)) { $urllogo = DOL_URL_ROOT.'/viewimage.php?modulepart=mycompany&entity='.$conf->entity.'&file='.urlencode('logos/'.$logo); $urllogofull = $dolibarr_main_url_root.'/viewimage.php?modulepart=mycompany&entity='.$conf->entity.'&file='.urlencode('logos/'.$logo); } // Output html code for logo if ($urllogo) { print '
'; print '
'; print ''; print '
'; if (!getDolGlobalString('MAIN_HIDE_POWERED_BY')) { print '
'.$langs->trans("PoweredBy").'
'; } print '
'; } if (getDolGlobalString('OPENSURVEY_IMAGE_PUBLIC_INTERFACE')) { print '
'; print ''; print '
'; } $results = $object->fetchAll($sortorder, $sortfield, 0, 0, '(status:=:1)'); $now = dol_now(); if (is_array($results)) { if (empty($results)) { print '
'; print $langs->trans("NoSurvey"); } else { print '


'; print ''.$langs->trans("ListOfOpenSurveys").''; print '


'; print '
'; foreach ($results as $survey) { $object = $survey; print ''."\n"; // Output payment summary form print ''."\n"; print '
'; print '
'; $error = 0; $found = true; // Label print $langs->trans("Label").' : '; print ''.dol_escape_htmltag($object->title).'
'; // Date print $langs->trans("DateExpected").' : '; print ''; if ($object->date_fin > $now) { print dol_print_date($object->date_fin, 'day'); } else { print $langs->trans("ASAP"); } print '
'; // Description //print $langs->trans("Description").' : '; print '
'; print '
'; print dol_htmlwithnojs(dol_string_onlythesehtmltags(dol_htmlentitiesbr($object->commentaires), 1, 1, 1)); //print dol_escape_htmltag($object->commentaires); print '
'; print '
'; print '
'."\n"; print "\n"; if ($action != 'dosubmit') { if ($found && !$error) { // We are in a management option and no error } else { dol_print_error_email('ERRORSUBMITAPPLICATION'); } } else { // Print } print '
'."\n"; print '



'."\n"; } } } else { dol_print_error($db, $object->error, $object->errors); } print '
'."\n"; print '
'."\n"; print '
'; htmlPrintOnlineFooter($mysoc, $langs); llxFooter('', 'public'); $db->close();