PageRenderTime 47ms CodeModel.GetById 21ms RepoModel.GetById 0ms app.codeStats 0ms

/htdocs/paybox/admin/paybox.php

https://github.com/asterix14/dolibarr
PHP | 227 lines | 148 code | 36 blank | 43 comment | 21 complexity | 9bead9c3630aa0b833c9166c7bc8d198 MD5 | raw file
Possible License(s): LGPL-2.0
  1. <?php
  2. /* Copyright (C) 2004 Rodolphe Quiedeville <rodolphe@quiedeville.org>
  3. * Copyright (C) 2005-2010 Laurent Destailleur <eldy@users.sourceforge.org>
  4. * Copyright (C) 2011 Juanjo Menent <jmenent@2byte.es>
  5. *
  6. * This program is free software; you can redistribute it and/or modify
  7. * it under the terms of the GNU General Public License as published by
  8. * the Free Software Foundation; either version 2 of the License, or
  9. * (at your option) any later version.
  10. *
  11. * This program is distributed in the hope that it will be useful,
  12. * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  14. * GNU General Public License for more details.
  15. *
  16. * You should have received a copy of the GNU General Public License
  17. * along with this program. If not, see <http://www.gnu.org/licenses/>.
  18. */
  19. /**
  20. * \file htdocs/paybox/admin/paybox.php
  21. * \ingroup paybox
  22. * \brief Page to setup paybox module
  23. */
  24. require("../../main.inc.php");
  25. require_once(DOL_DOCUMENT_ROOT."/core/lib/admin.lib.php");
  26. require_once(DOL_DOCUMENT_ROOT."/core/class/doleditor.class.php");
  27. $servicename='PayBox';
  28. $langs->load("admin");
  29. $langs->load("other");
  30. $langs->load("paybox");
  31. if (!$user->admin)
  32. accessforbidden();
  33. $action = GETPOST("action");
  34. if ($action == 'setvalue' && $user->admin)
  35. {
  36. $db->begin();
  37. //$result=dolibarr_set_const($db, "PAYBOX_IBS_DEVISE",$_POST["PAYBOX_IBS_DEVISE"],'chaine',0,'',$conf->entity);
  38. $result=dolibarr_set_const($db, "PAYBOX_CGI_URL_V1", GETPOST("PAYBOX_CGI_URL_V1"),'chaine',0,'',$conf->entity);
  39. if (! $result > 0) $error++;
  40. $result=dolibarr_set_const($db, "PAYBOX_CGI_URL_V2",GETPOST("PAYBOX_CGI_URL_V2"),'chaine',0,'',$conf->entity);
  41. if (! $result > 0) $error++;
  42. $result=dolibarr_set_const($db, "PAYBOX_IBS_SITE",GETPOST("PAYBOX_IBS_SITE"),'chaine',0,'',$conf->entity);
  43. if (! $result > 0) $error++;
  44. $result=dolibarr_set_const($db, "PAYBOX_IBS_RANG",GETPOST("PAYBOX_IBS_RANG"),'chaine',0,'',$conf->entity);
  45. if (! $result > 0) $error++;
  46. $result=dolibarr_set_const($db, "PAYBOX_PBX_IDENTIFIANT",GETPOST("PAYBOX_PBX_IDENTIFIANT"),'chaine',0,'',$conf->entity);
  47. if (! $result > 0) $error++;
  48. $result=dolibarr_set_const($db, "PAYBOX_CREDITOR",GETPOST("PAYBOX_CREDITOR"),'chaine',0,'',$conf->entity);
  49. if (! $result > 0) $error++;
  50. $result=dolibarr_set_const($db, "PAYBOX_CSS_URL",GETPOST("PAYBOX_CSS_URL"),'chaine',0,'',$conf->entity);
  51. if (! $result > 0) $error++;
  52. $result=dolibarr_set_const($db, "PAYBOX_MESSAGE_OK",GETPOST("PAYBOX_MESSAGE_OK"),'chaine',0,'',$conf->entity);
  53. if (! $result > 0) $error++;
  54. $result=dolibarr_set_const($db, "PAYBOX_MESSAGE_KO",GETPOST("PAYBOX_MESSAGE_KO"),'chaine',0,'',$conf->entity);
  55. if (! $result > 0) $error++;
  56. if (! $error)
  57. {
  58. $db->commit();
  59. $mesg='<div class="ok">'.$langs->trans("SetupSaved").'</div>';
  60. }
  61. else
  62. {
  63. $db->rollback();
  64. dol_print_error($db);
  65. }
  66. }
  67. /*
  68. * View
  69. */
  70. $IBS_SITE="1999888"; // Site test
  71. if (empty($conf->global->PAYBOX_IBS_SITE)) $conf->global->PAYBOX_IBS_SITE=$IBS_SITE;
  72. $IBS_RANG="99"; // Rang test
  73. if (empty($conf->global->PAYBOX_IBS_RANG)) $conf->global->PAYBOX_IBS_RANG=$IBS_RANG;
  74. $IBS_DEVISE="978"; // Euro
  75. if (empty($conf->global->PAYBOX_IBS_DEVISE)) $conf->global->PAYBOX_IBS_DEVISE=$IBS_DEVISE;
  76. llxHeader();
  77. $linkback='<a href="'.DOL_URL_ROOT.'/admin/modules.php">'.$langs->trans("BackToModuleList").'</a>';
  78. print_fiche_titre($langs->trans("PayBoxSetup"),$linkback,'setup');
  79. print $langs->trans("PayBoxDesc")."<br>\n";
  80. print '<br>';
  81. print '<form method="post" action="'.$_SERVER["PHP_SELF"].'">';
  82. print '<input type="hidden" name="token" value="'.$_SESSION['newtoken'].'">';
  83. print '<input type="hidden" name="action" value="setvalue">';
  84. $var=true;
  85. print '<table class="nobordernopadding" width="100%">';
  86. print '<tr class="liste_titre">';
  87. print '<td>'.$langs->trans("AccountParameter").'</td>';
  88. print '<td>'.$langs->trans("Value").'</td>';
  89. print "</tr>\n";
  90. $var=!$var;
  91. print '<tr '.$bc[$var].'><td>';
  92. print '<span class="fieldrequired">'.$langs->trans("PAYBOX_PBX_SITE").'</span></td><td>';
  93. print '<input size="32" type="text" name="PAYBOX_IBS_SITE" value="'.$conf->global->PAYBOX_IBS_SITE.'">';
  94. print '<br>'.$langs->trans("Example").': 1999888 ('.$langs->trans("Test").')';
  95. print '</td></tr>';
  96. $var=!$var;
  97. print '<tr '.$bc[$var].'><td>';
  98. print '<span class="fieldrequired">'.$langs->trans("PAYBOX_PBX_RANG").'</span></td><td>';
  99. print '<input size="32" type="text" name="PAYBOX_IBS_RANG" value="'.$conf->global->PAYBOX_IBS_RANG.'">';
  100. print '<br>'.$langs->trans("Example").': 99 ('.$langs->trans("Test").')';
  101. print '</td></tr>';
  102. $var=!$var;
  103. print '<tr '.$bc[$var].'><td>';
  104. print '<span class="fieldrequired">'.$langs->trans("PAYBOX_PBX_IDENTIFIANT").'</span></td><td>';
  105. print '<input size="32" type="text" name="PAYBOX_PBX_IDENTIFIANT" value="'.$conf->global->PAYBOX_PBX_IDENTIFIANT.'">';
  106. print '<br>'.$langs->trans("Example").': 2 ('.$langs->trans("Test").')';
  107. print '</td></tr>';
  108. $var=true;
  109. print '<tr class="liste_titre">';
  110. print '<td>'.$langs->trans("UsageParameter").'</td>';
  111. print '<td>'.$langs->trans("Value").'</td>';
  112. print "</tr>\n";
  113. /*
  114. $var=!$var;
  115. print '<tr '.$bc[$var].'><td>';
  116. print $langs->trans("PAYBOX_IBS_DEVISE").'</td><td>';
  117. print '<input size="32" type="text" name="PAYBOX_IBS_DEVISE" value="'.$conf->global->PAYBOX_IBS_DEVISE.'">';
  118. print '<br>'.$langs->trans("Example").': 978 (EUR)';
  119. print '</td></tr>';
  120. */
  121. /*
  122. $var=!$var;
  123. print '<tr '.$bc[$var].'><td>';
  124. print $langs->trans("PAYBOX_CGI_URL_V1").'</td><td>';
  125. print '<input size="64" type="text" name="PAYBOX_CGI_URL_V1" value="'.$conf->global->PAYBOX_CGI_URL_V1.'">';
  126. print '<br>'.$langs->trans("Example").': http://mysite/cgi-bin/module_linux.cgi';
  127. print '</td></tr>';
  128. */
  129. $var=!$var;
  130. print '<tr '.$bc[$var].'><td>';
  131. print '<span class="fieldrequired">'.$langs->trans("PAYBOX_CGI_URL_V2").'</span></td><td>';
  132. print '<input size="64" type="text" name="PAYBOX_CGI_URL_V2" value="'.$conf->global->PAYBOX_CGI_URL_V2.'">';
  133. print '<br>'.$langs->trans("Example").': http://mysite/cgi-bin/modulev2_redhat72.cgi';
  134. print '</td></tr>';
  135. $var=!$var;
  136. print '<tr '.$bc[$var].'><td>';
  137. print $langs->trans("VendorName").'</td><td>';
  138. print '<input size="64" type="text" name="PAYBOX_CREDITOR" value="'.$conf->global->PAYBOX_CREDITOR.'">';
  139. print '<br>'.$langs->trans("Example").': '.$mysoc->name;
  140. print '</td></tr>';
  141. $var=!$var;
  142. print '<tr '.$bc[$var].'><td>';
  143. print $langs->trans("CSSUrlForPaymentForm").'</td><td>';
  144. print '<input size="64" type="text" name="PAYBOX_CSS_URL" value="'.$conf->global->PAYBOX_CSS_URL.'">';
  145. print '<br>'.$langs->trans("Example").': http://mysite/mycss.css';
  146. print '</td></tr>';
  147. $var=!$var;
  148. print '<tr '.$bc[$var].'><td>';
  149. print $langs->trans("MessageOK").'</td><td>';
  150. $doleditor=new DolEditor('PAYBOX_MESSAGE_OK',$conf->global->PAYBOX_MESSAGE_OK,'',100,'dolibarr_details','In',false,true,true,ROWS_2,60);
  151. $doleditor->Create();
  152. print '</td></tr>';
  153. $var=!$var;
  154. print '<tr '.$bc[$var].'><td>';
  155. print $langs->trans("MessageKO").'</td><td>';
  156. $doleditor=new DolEditor('PAYBOX_MESSAGE_KO',$conf->global->PAYBOX_MESSAGE_KO,'',100,'dolibarr_details','In',false,true,true,ROWS_2,60);
  157. $doleditor->Create();
  158. print '</td></tr>';
  159. print '<tr><td colspan="2" align="center"><br><input type="submit" class="button" value="'.$langs->trans("Modify").'"></td></tr>';
  160. print '</table></form>';
  161. print '<br><br>';
  162. print '<u>'.$langs->trans("FollowingUrlAreAvailableToMakePayments").':</u><br>';
  163. print img_picto('','object_globe.png').' '.$langs->trans("ToOfferALinkForOnlinePaymentOnFreeAmount",$servicename).':<br>';
  164. print '<b>'.DOL_MAIN_URL_ROOT.'/public/paybox/newpayment.php?amount=<i>9.99</i>&tag=<i>your_free_tag</i></b>'."<br>\n";
  165. if ($conf->commande->enabled)
  166. {
  167. print img_picto('','object_globe.png').' '.$langs->trans("ToOfferALinkForOnlinePaymentOnOrder",$servicename).':<br>';
  168. print '<b>'.DOL_MAIN_URL_ROOT.'/public/paybox/newpayment.php?source=order&ref=<i>order_ref</i></b>'."<br>\n";
  169. }
  170. if ($conf->facture->enabled)
  171. {
  172. print img_picto('','object_globe.png').' '.$langs->trans("ToOfferALinkForOnlinePaymentOnInvoice",$servicename).':<br>';
  173. print '<b>'.DOL_MAIN_URL_ROOT.'/public/paybox/newpayment.php?source=invoice&ref=<i>invoice_ref</i></b>'."<br>\n";
  174. // print $langs->trans("SetupPayBoxToHavePaymentCreatedAutomatically",$langs->transnoentitiesnoconv("FeatureNotYetAvailable"))."<br>\n";
  175. }
  176. if ($conf->contrat->enabled)
  177. {
  178. print img_picto('','object_globe.png').' '.$langs->trans("ToOfferALinkForOnlinePaymentOnContractLine",$servicename).':<br>';
  179. print '<b>'.DOL_MAIN_URL_ROOT.'/public/paybox/newpayment.php?source=contractline&ref=<i>contractline_ref</i></b>'."<br>\n";
  180. }
  181. if ($conf->adherent->enabled)
  182. {
  183. print img_picto('','object_globe.png').' '.$langs->trans("ToOfferALinkForOnlinePaymentOnMemberSubscription",$servicename).':<br>';
  184. print '<b>'.DOL_MAIN_URL_ROOT.'/public/paybox/newpayment.php?source=membersubscription&ref=<i>member_ref</i></b>'."<br>\n";
  185. }
  186. print "<br>";
  187. print info_admin($langs->trans("YouCanAddTagOnUrl"));
  188. dol_htmloutput_mesg($mesg);
  189. $db->close();
  190. llxFooter();
  191. ?>