27 require
'../../main.inc.php';
28 require_once DOL_DOCUMENT_ROOT.
'/compta/prelevement/class/bonprelevement.class.php';
29 require_once DOL_DOCUMENT_ROOT.
'/compta/bank/class/account.class.php';
32 $langs->loadLangs(array(
'banks',
'categories',
'withdrawals'));
34 $contextpage =
GETPOST(
'contextpage',
'aZ') ?
GETPOST(
'contextpage',
'aZ') :
'directdebitcredittransferlist';
36 $type =
GETPOST(
'type',
'aZ09');
38 $limit =
GETPOST(
'limit',
'int') ?
GETPOST(
'limit',
'int') : $conf->liste_limit;
39 $sortfield =
GETPOST(
'sortfield',
'aZ09comma');
40 $sortorder =
GETPOST(
'sortorder',
'aZ09comma');
42 if (empty($page) || $page == -1) {
45 $offset = $limit * $page;
46 $pageprev = $page - 1;
47 $pagenext = $page + 1;
52 $sortfield =
"p.datec";
56 $statut =
GETPOST(
'statut',
'int');
57 $search_ref =
GETPOST(
'search_ref',
'alpha');
58 $search_amount =
GETPOST(
'search_amount',
'alpha');
61 $hookmanager->initHooks(array(
'withdrawalsreceiptslist'));
63 $usercancreate = $user->rights->prelevement->bons->creer;
64 if ($type ==
'bank-transfer') {
65 $usercancreate = $user->rights->paymentbybanktransfer->create;
69 $socid =
GETPOST(
'socid',
'int');
71 $socid = $user->socid;
73 if ($type ==
'bank-transfer') {
74 $result =
restrictedArea($user,
'paymentbybanktransfer',
'',
'',
'');
84 if (
GETPOST(
'button_removefilter_x',
'alpha') ||
GETPOST(
'button_removefilter.x',
'alpha') ||
GETPOST(
'button_removefilter',
'alpha')) {
94 llxHeader(
'', $langs->trans(
"WithdrawalsReceipts"));
96 $sql =
"SELECT p.rowid, p.ref, p.amount, p.statut, p.datec";
97 $sql .=
" FROM ".MAIN_DB_PREFIX.
"prelevement_bons as p";
98 $sql .=
" WHERE p.entity IN (".getEntity(
'invoice').
")";
99 if ($type ==
'bank-transfer') {
100 $sql .=
" AND p.type = 'bank-transfer'";
102 $sql .=
" AND p.type = 'debit-order'";
107 if ($search_amount) {
111 $sql .= $db->order($sortfield, $sortorder);
114 $nbtotalofrecords =
'';
115 if (empty($conf->global->MAIN_DISABLE_FULL_SCANLIST)) {
116 $result = $db->query($sql);
117 $nbtotalofrecords = $db->num_rows($result);
118 if (($page * $limit) > $nbtotalofrecords) {
124 $sql .= $db->plimit($limit + 1, $offset);
126 $result = $db->query($sql);
128 $num = $db->num_rows($result);
132 if (!empty($contextpage) && $contextpage != $_SERVER[
"PHP_SELF"]) {
133 $param .=
'&contextpage='.urlencode($contextpage);
135 if ($type ==
'bank-transfer') {
136 $param .=
'&type=bank-transfer';
138 if ($limit > 0 && $limit != $conf->liste_limit) {
139 $param .=
'&limit='.urlencode($limit);
141 $param .=
"&statut=".urlencode($statut);
143 $selectedfields =
'';
146 if ($usercancreate) {
147 $newcardbutton .=
dolGetButtonTitle($langs->trans(
'NewStandingOrder'),
'',
'fa fa-plus-circle', DOL_URL_ROOT.
'/compta/prelevement/create.php?type='.urlencode($type));
151 print
'<form method="POST" id="searchFormList" action="'.$_SERVER[
"PHP_SELF"].
'">';
152 print
'<input type="hidden" name="token" value="'.newToken().
'">';
153 if ($optioncss !=
'') {
154 print
'<input type="hidden" name="optioncss" value="'.$optioncss.
'">';
156 print
'<input type="hidden" name="formfilteraction" id="formfilteraction" value="list">';
157 print
'<input type="hidden" name="action" value="list">';
158 print
'<input type="hidden" name="sortfield" value="'.$sortfield.
'">';
159 print
'<input type="hidden" name="sortorder" value="'.$sortorder.
'">';
160 print
'<input type="hidden" name="contextpage" value="'.$contextpage.
'">';
162 print
'<input type="hidden" name="type" value="'.$type.
'">';
164 $titlekey =
"WithdrawalsReceipts";
165 $title = $langs->trans(
"WithdrawalsReceipts");
166 if ($type ==
'bank-transfer') {
167 $titlekey =
"BankTransferReceipts";
168 $title = $langs->trans(
"BankTransferReceipts");
171 print_barre_liste($title, $page, $_SERVER[
"PHP_SELF"], $param, $sortfield, $sortorder,
'', $num, $nbtotalofrecords,
'generic', 0, $newcardbutton,
'', $limit, 0, 0, 1);
175 print
'<div class="div-table-responsive">';
176 print
'<table class="tagtable liste'.($moreforfilter ?
" listwithfilterbefore" :
"").
'">'.
"\n";
178 print
'<tr class="liste_titre">';
179 print
'<td class="liste_titre"><input type="text" class="flat maxwidth100" name="search_ref" value="'.dol_escape_htmltag($search_ref).
'"></td>';
180 print
'<td class="liste_titre"> </td>';
181 print
'<td class="liste_titre right"><input type="text" class="flat maxwidth100" name="search_amount" value="'.dol_escape_htmltag($search_amount).
'"></td>';
182 print
'<td class="liste_titre"> </td>';
183 print
'<td class="liste_titre maxwidthsearch">';
184 $searchpicto =
$form->showFilterButtons();
189 print
'<tr class="liste_titre">';
191 print_liste_field_titre(
"Date", $_SERVER[
"PHP_SELF"],
"p.datec",
"", $param,
'', $sortfield, $sortorder,
'center ');
192 print_liste_field_titre(
"Amount", $_SERVER[
"PHP_SELF"],
"p.amount",
"", $param,
'', $sortfield, $sortorder,
'right ');
194 print
getTitleFieldOfList($selectedfields, 0, $_SERVER[
"PHP_SELF"],
"",
'', $param,
'', $sortfield, $sortorder,
'maxwidthsearch center ').
"\n";
200 while ($i < min($num, $limit)) {
201 $obj = $db->fetch_object($result);
203 $directdebitorder->id = $obj->rowid;
204 $directdebitorder->ref = $obj->ref;
205 $directdebitorder->datec = $obj->datec;
206 $directdebitorder->amount = $obj->amount;
207 $directdebitorder->statut = $obj->statut;
209 print
'<tr class="oddeven">';
212 print $directdebitorder->getNomUrl(1);
215 print
'<td class="center">'.dol_print_date($db->jdate($obj->datec),
'day').
"</td>\n";
217 print
'<td class="right"><span class="amount">'.price($obj->amount).
"</span></td>\n";
219 print
'<td class="right">';
220 print $bon->LibStatut($obj->statut, 5);
223 print
'<td class="right"></td>'.
"\n";
229 print
'<tr><td colspan="5"><span class="opacitymedium">'.$langs->trans(
"None").
'</span></td></tr>';