?i»?
Current Path : /home/scgforma/www/soctest/htdocs/opensurvey/ |
Current File : /home/scgforma/www/soctest/htdocs/opensurvey/card.php |
<?php /* Copyright (C) 2013-2015 Laurent Destailleur <eldy@users.sourceforge.net> * Copyright (C) 2014 Marcos GarcĂa <marcosgdf@gmail.com> * Copyright (C) 2018 FrĂ©dĂ©ric France <frederic.france@netlogic.fr> * * 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 <http://www.gnu.org/licenses/>. */ /** * \file htdocs/opensurvey/card.php * \ingroup opensurvey * \brief Page to edit survey */ require '../main.inc.php'; require_once DOL_DOCUMENT_ROOT."/core/lib/admin.lib.php"; require_once DOL_DOCUMENT_ROOT."/core/lib/files.lib.php"; require_once DOL_DOCUMENT_ROOT."/core/class/doleditor.class.php"; require_once DOL_DOCUMENT_ROOT."/opensurvey/class/opensurveysondage.class.php"; require_once DOL_DOCUMENT_ROOT."/opensurvey/fonctions.php"; // Security check if (!$user->rights->opensurvey->read) accessforbidden(); // Initialisation des variables $action=GETPOST('action', 'aZ09'); $cancel=GETPOST('cancel', 'alpha'); $numsondage = ''; if (GETPOST('id')) { $numsondage = GETPOST('id', 'alpha'); } $object=new Opensurveysondage($db); $result=$object->fetch(0, $numsondage); if ($result <= 0) { dol_print_error($db, $object->error); exit; } $expiredate=dol_mktime(0, 0, 0, GETPOST('expiremonth'), GETPOST('expireday'), GETPOST('expireyear')); /* * Actions */ $parameters = array('id' => $numsondage); $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'); if (empty($reshook)) { if ($cancel) $action=''; // Delete if ($action == 'delete_confirm') { // Security check if (!$user->rights->opensurvey->write) accessforbidden(); $result=$object->delete($user, '', $numsondage); header('Location: '.dol_buildpath('/opensurvey/list.php', 1)); exit(); } // Close if ($action == 'close') { $object->status = Opensurveysondage::STATUS_CLOSED; $object->update($user); } // Reopend if ($action == 'reopen') { $object->status = Opensurveysondage::STATUS_VALIDATED; $object->update($user); } // Update if ($action == 'update') { // Security check if (!$user->rights->opensurvey->write) accessforbidden(); $error=0; if (! GETPOST('nouveautitre')) { setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Title")), null, 'errors'); $error++; $action = 'edit'; } if (! $error) { $object->titre = GETPOST('nouveautitre', 'nohtml'); $object->commentaires = GETPOST('nouveauxcommentaires', 'nohtml'); $object->description = GETPOST('nouveauxcommentaires', 'nohtml'); $object->mail_admin = GETPOST('nouvelleadresse', 'alpha'); $object->date_fin = $expiredate; $object->allow_comments = GETPOST('cancomment', 'alpha') == 'on' ? true : false; $object->allow_spy = GETPOST('canseeothersvote', 'alpha') == 'on' ? true : false; $object->mailsonde = GETPOST('mailsonde', 'alpha') == 'on' ? true : false; $res=$object->update($user); if ($res < 0) { setEventMessages($object->error, $object->errors, 'errors'); $action='edit'; } } } // Add comment if (GETPOST('ajoutcomment')) { $error=0; if (! GETPOST('comment')) { $error++; setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Comment")), null, 'errors'); } if (! GETPOST('commentuser')) { $error++; setEventMessages($langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("User")), null, 'errors'); } if (! $error) { $comment = GETPOST("comment"); $comment_user = GETPOST('commentuser'); $resql = $object->addComment($comment, $comment_user); if (! $resql) { setEventMessages($langs->trans('ErrorInsertingComment'), null, 'errors'); } } } // Delete comment $idcomment=GETPOST('deletecomment', 'int'); if ($idcomment) { // Security check if (!$user->rights->opensurvey->write) accessforbidden(); $resql = $object->deleteComment($idcomment); } if ($action == 'edit') { // Security check if (!$user->rights->opensurvey->write) accessforbidden(); } } /* * View */ $form=new Form($db); if ($object->fk_user_creat) { $userstatic = new User($db); $userstatic->fetch($object->fk_user_creat); } $title = $object->titre." - ".$langs->trans('Card'); $helpurl = ''; $arrayofjs=array(); $arrayofcss=array('/opensurvey/css/style.css'); llxHeader('', $title, $helpurl, 0, 0, 0, $arrayofjs, $arrayofcss); // Define format of choices $toutsujet=explode(",", $object->sujet); $listofanswers=array(); foreach ($toutsujet as $value) { $tmp=explode('@', $value); $listofanswers[]=array('label'=>$tmp[0],'format'=>($tmp[1]?$tmp[1]:'checkbox')); } $toutsujet=str_replace("@", "<br>", $toutsujet); $toutsujet=str_replace("°", "'", $toutsujet); print '<form name="updatesurvey" action="'.$_SERVER["PHP_SELF"].'?id='.$numsondage.'" method="POST">'."\n"; print '<input type="hidden" name="action" value="update">'; $head = opensurvey_prepare_head($object); dol_fiche_head($head, 'general', $langs->trans("Survey"), -1, DOL_URL_ROOT.'/opensurvey/img/object_opensurvey.png', 1); $morehtmlref = ''; $linkback = '<a href="'.DOL_URL_ROOT.'/opensurvey/list.php?restore_lastsearch_values=1">'.$langs->trans("BackToList").'</a>'; dol_banner_tab($object, 'id', $linkback, 1, 'id_sondage', 'id_sondage', $morehtmlref); print '<div class="fichecenter">'; print '<div class="underbanner clearboth"></div>'; print '<table class="border tableforfield centpercent">'; // Type $type=($object->format=="A")?'classic':'date'; print '<tr><td class="titlefield">'.$langs->trans("Type").'</td><td colspan="2">'; print img_picto('', dol_buildpath('/opensurvey/img/'.($type == 'classic'?'chart-32.png':'calendar-32.png'), 1), 'width="16"', 1); print ' '.$langs->trans($type=='classic'?"TypeClassic":"TypeDate").'</td></tr>'; // Title print '<tr><td>'; $adresseadmin=$object->mail_admin; print $langs->trans("Title") .'</td><td colspan="2">'; if ($action == 'edit') { print '<input type="text" name="nouveautitre" style="width: 95%" value="'.dol_escape_htmltag(dol_htmlentities($object->titre)).'">'; } else print dol_htmlentities($object->titre); print '</td></tr>'; // Description print '<tr><td class="tdtop">'.$langs->trans("Description") .'</td><td colspan="2">'; if ($action == 'edit') { $doleditor=new DolEditor('nouveauxcommentaires', dol_htmlentities($object->commentaires), '', 120, 'dolibarr_notes', 'In', 1, 1, 1, ROWS_7, '90%'); $doleditor->Create(0, ''); } else { print (dol_textishtml($object->commentaires)?$object->commentaires:dol_nl2br($object->commentaires, 1, true)); } print '</td></tr>'; // EMail //If linked user, then emails are going to be sent to users' email if (!$object->fk_user_creat) { print '<tr><td>'.$langs->trans("EMail") .'</td><td colspan="2">'; if ($action == 'edit') { print '<input type="text" name="nouvelleadresse" size="40" value="'.$object->mail_admin.'">'; } else print dol_print_email($object->mail_admin, 0, 0, 1); print '</td></tr>'; } // Receive an email with each vote print '<tr><td>'.$langs->trans('ToReceiveEMailForEachVote').'</td><td colspan="2">'; if ($action == 'edit') { print '<input type="checkbox" name="mailsonde" '.($object->mailsonde?'checked="checked"':'').'">'; } else { print yn($object->mailsonde); //If option is active and linked user does not have an email, we show a warning if ($object->fk_user_creat && $object->mailsonde) { if (!$userstatic->email) { print ' '.img_warning($langs->trans('NoEMail')); } } } print '</td></tr>'; // Users can comment print '<tr><td>'.$langs->trans('CanComment').'</td><td colspan="2">'; if ($action == 'edit') { print '<input type="checkbox" name="cancomment" '.($object->allow_comments?'checked="checked"':'').'">'; } else print yn($object->allow_comments); print '</td></tr>'; // Users can see others vote print '<tr><td>'.$langs->trans('CanSeeOthersVote').'</td><td colspan="2">'; if ($action == 'edit') { print '<input type="checkbox" name="canseeothersvote" '.($object->allow_spy?'checked="checked"':'').'">'; } else print yn($object->allow_spy); print '</td></tr>'; // Expire date print '<tr><td>'.$langs->trans('ExpireDate').'</td><td colspan="2">'; if ($action == 'edit') print $form->selectDate($expiredate?$expiredate:$object->date_fin, 'expire', 0, 0, 0, '', 1, 0); else { print dol_print_date($object->date_fin, 'day'); if ($object->date_fin && $object->date_fin < dol_now() && $object->status == Opensurveysondage::STATUS_VALIDATED) print img_warning($langs->trans("Expired")); } print '</td></tr>'; // Author print '<tr><td>'; print $langs->trans("Author") .'</td><td colspan="2">'; if ($object->fk_user_creat) { print $userstatic->getLoginUrl(1); } else { print dol_htmlentities($object->nom_admin); } print '</td></tr>'; // Link print '<tr><td>'.img_picto('', 'object_globe.png').' '.$langs->trans("UrlForSurvey", '').'</td><td colspan="2">'; // 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 $url=$urlwithroot.'/public/opensurvey/studs.php?sondage='.$object->id_sondage; print '<input type="text" style="width: 60%" '.($action == 'edit' ? 'disabled' : '').' id="opensurveyurl" name="opensurveyurl" value="'.$url.'">'; if ($action != 'edit') print ajax_autoselect("opensurveyurl", $url); print '</td></tr>'; print '</table>'; print '</div>'; dol_fiche_end(); if ($action == 'edit') { print '<div class="center">'; print '<input type="submit" class="button" name="save" value="'.dol_escape_htmltag($langs->trans("Save")).'">'; print ' '; print '<input type="submit" class="button" name="cancel" value="'.dol_escape_htmltag($langs->trans("Cancel")).'">'; print '</div>'; } print '</form>'."\n"; /* * Barre d'actions */ print '<div class="tabsAction">'; if ($action != 'edit' && $user->rights->opensurvey->write) { //Modify button print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=edit&id=' . $numsondage . '">'.$langs->trans("Modify") . '</a>'; if ($object->status == Opensurveysondage::STATUS_VALIDATED) { //Close button print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=close&id=' . $numsondage . '">'.$langs->trans("Close") . '</a>'; } if ($object->status == Opensurveysondage::STATUS_CLOSED) { //Opened button print '<a class="butAction" href="'.$_SERVER["PHP_SELF"].'?action=reopen&id=' . $numsondage . '">'.$langs->trans("ReOpen") . '</a>'; } //Delete button print '<a class="butActionDelete" href="'.$_SERVER["PHP_SELF"].'?suppressionsondage=1&id='.$numsondage.'&action=delete">'.$langs->trans('Delete').'</a>'; } print '</div>'; if ($action == 'delete') { print $form->formconfirm($_SERVER["PHP_SELF"].'?&id='.$numsondage, $langs->trans("RemovePoll"), $langs->trans("ConfirmRemovalOfPoll", $id), 'delete_confirm', '', '', 1); } print '<br>'; print '<form name="formulaire5" action="#" method="POST">'."\n"; print load_fiche_titre($langs->trans("CommentsOfVoters"), '', ''); // Comment list $comments = $object->getComments(); if ($comments) { foreach ($comments as $comment) { if ($user->rights->opensurvey->write) { print '<a href="'.dol_buildpath('/opensurvey/card.php', 1).'?deletecomment='.$comment->id_comment.'&id='.$numsondage.'"> '.img_picto('', 'delete.png').'</a> '; } print dol_htmlentities($comment->usercomment).': '.dol_nl2br(dol_htmlentities($comment->comment))." <br>"; } } else { print $langs->trans("NoCommentYet").'<br>'; } print '<br>'; // Add comment if ($object->allow_comments) { print $langs->trans("AddACommentForPoll") . '<br>'; print '<textarea name="comment" rows="2" class="quatrevingtpercent"></textarea><br>'."\n"; print $langs->trans("Name") .': <input type="text" size="50" name="commentuser" value="'.$user->getFullName($langs).'"><br>'."\n"; print '<input type="submit" class="button" name="ajoutcomment" value="'.dol_escape_htmltag($langs->trans("AddComment")).'"><br>'."\n"; if (isset($erreur_commentaire_vide) && $erreur_commentaire_vide=="yes") { print "<font color=#FF0000>" . $langs->trans("ErrorFieldRequired", $langs->transnoentitiesnoconv("Name")) . "</font>"; } } print '</form>'; // End of page llxFooter(); $db->close();