30require
'../../main.inc.php';
38require_once DOL_DOCUMENT_ROOT.
'/compta/prelevement/class/bonprelevement.class.php';
39require_once DOL_DOCUMENT_ROOT.
'/compta/prelevement/class/ligneprelevement.class.php';
40require_once DOL_DOCUMENT_ROOT.
'/compta/bank/class/account.class.php';
43$langs->loadLangs(array(
'banks',
'withdrawals',
'companies',
'categories'));
45$action =
GETPOST(
'action',
'aZ09') ?
GETPOST(
'action',
'aZ09') :
'view';
46$massaction =
GETPOST(
'massaction',
'alpha');
48$confirm =
GETPOST(
'confirm',
'alpha');
49$cancel =
GETPOST(
'cancel',
'alpha');
50$toselect =
GETPOST(
'toselect',
'array:int');
51$contextpage =
GETPOST(
'contextpage',
'aZ') ?
GETPOST(
'contextpage',
'aZ') :
'directdebitcredittransferlinelist';
52$backtopage =
GETPOST(
'backtopage',
'alpha');
53$optioncss =
GETPOST(
'optioncss',
'aZ');
60$sortfield =
GETPOST(
'sortfield',
'aZ09comma');
61$sortorder =
GETPOST(
'sortorder',
'aZ09comma');
63if (empty($page) || $page < 0 ||
GETPOST(
'button_search',
'alpha') ||
GETPOST(
'button_removefilter',
'alpha')) {
67$offset = $limit * $page;
74 $sortfield = ($type ==
'bank-transfer' ?
"datec" :
"p.datec");
77$search_line =
GETPOST(
'search_line',
'alpha');
78$search_bon =
GETPOST(
'search_bon',
'alpha');
79$search_code =
GETPOST(
'search_code',
'alpha');
80$search_company =
GETPOST(
'search_company',
'alpha');
88$hookmanager->initHooks(array(
'withdrawalsreceiptslineslist'));
93 $socid = $user->socid;
95if ($type ==
'bank-transfer') {
96 $result =
restrictedArea($user,
'paymentbybanktransfer',
'',
'',
'');
106if (
GETPOST(
'button_removefilter_x',
'alpha') ||
GETPOST(
'button_removefilter.x',
'alpha') ||
GETPOST(
'button_removefilter',
'alpha')) {
110 $search_company =
"";
121$title = $langs->trans(
"WithdrawalsLines");
122if ($type ==
'bank-transfer') {
123 $title = $langs->trans(
"CreditTransferLines");
127$sql =
"SELECT p.rowid, p.ref, p.statut as status, p.datec";
128$sql .=
" , f.rowid as facid, f.ref as invoiceref, f.total_ttc";
129$sql .=
" , s.rowid as socid, s.nom as name, s.code_client, s.code_fournisseur, s.email";
130$sql .=
" , pl.amount, pl.statut as statut_ligne, pl.rowid as rowid_ligne";
134$sql .=
" FROM ".MAIN_DB_PREFIX.
"prelevement_bons as p";
135$sql .=
" , ".MAIN_DB_PREFIX.
"prelevement_lignes as pl";
136$sql .=
" , ".MAIN_DB_PREFIX.
"prelevement as pf";
137if ($type ==
'bank-transfer') {
138 $sql .=
" , ".MAIN_DB_PREFIX.
"facture_fourn as f";
140 $sql .=
" , ".MAIN_DB_PREFIX.
"facture as f";
142$sql .=
" , ".MAIN_DB_PREFIX.
"societe as s";
143$sql .=
" WHERE pl.fk_prelevement_bons = p.rowid";
144$sql .=
" AND pf.fk_prelevement_lignes = pl.rowid";
145if ($type ==
'bank-transfer') {
146 $sql .=
" AND pf.fk_facture_fourn = f.rowid";
148 $sql .=
" AND pf.fk_facture = f.rowid";
150$sql .=
" AND f.fk_soc = s.rowid";
151$sql .=
" AND f.entity IN (".getEntity(
'invoice').
")";
153 $sql .=
" AND s.rowid = ".((int) $socid);
156 $sql .=
" AND pl.rowid = '".$db->escape($search_bon).
"'";
161if ($type ==
'bank-transfer') {
170if ($search_company) {
174if ($type ==
'bank-transfer') {
177 $sql .=
" SELECT p.rowid, p.ref, p.statut as status, p.datec";
178 $sql .=
", sl.rowid as facid, sl.ref as invoiceref, sl.amount";
179 $sql .=
", u.rowid as socid, CONCAT(u.firstname, ' ', u.lastname) as name, u.ref_employee as code_client, NULL as code_fournisseur, u.email";
180 $sql .=
", pl.amount, pl.statut as statut_ligne, pl.rowid as rowid_ligne";
182 $sql .=
" FROM ".MAIN_DB_PREFIX.
"prelevement_bons as p";
183 $sql .=
" , ".MAIN_DB_PREFIX.
"prelevement_lignes as pl";
184 $sql .=
" , ".MAIN_DB_PREFIX.
"prelevement as pf";
185 $sql .=
" , ".MAIN_DB_PREFIX.
"salary as sl";
186 $sql .=
" , ".MAIN_DB_PREFIX.
"user as u";
188 $sql .=
" WHERE pl.fk_prelevement_bons = p.rowid";
189 $sql .=
" AND pf.fk_prelevement_lignes = pl.rowid";
190 $sql .=
" AND pf.fk_salary = sl.rowid";
191 $sql .=
" AND sl.fk_user = u.rowid";
192 $sql .=
" AND sl.entity IN (".getEntity(
'invoice').
")";
194 $sql .=
" AND s.rowid = ".((int) $socid);
197 $sql .=
" AND pl.rowid = '".$db->escape($search_bon).
"'";
202 if ($type ==
'bank-transfer') {
211 if ($search_company) {
212 $sql .=
natural_search(array(
"u.firstname",
"u.lastname"), $search_company);
216$nbtotalofrecords =
'';
219 if ($type ==
'bank-transfer') {
220 $sqlforcount =
"SELECT COUNT(*) as nbtotalofrecords FROM (" . $sql .
") AS combined_results";
222 $sqlforcount = preg_replace(
'/^'.preg_quote($sqlfields,
'/').
'/',
'SELECT COUNT(*) as nbtotalofrecords', $sql);
223 $sqlforcount = preg_replace(
'/GROUP BY .*$/',
'', $sqlforcount);
226 $resql =
$db->query($sqlforcount);
228 $objforcount =
$db->fetch_object($resql);
229 $nbtotalofrecords = $objforcount->nbtotalofrecords;
234 if (($page * $limit) > (
int) $nbtotalofrecords) {
242$sql .=
$db->order($sortfield, $sortorder);
244 $sql .=
$db->plimit($limit + 1, $offset);
247$resql =
$db->query($sql);
253$num =
$db->num_rows($resql);
258llxHeader(
'', $title, $help_url,
'', 0, 0,
'',
'',
'',
'bodyforlist');
260$arrayofselected = is_array($toselect) ? $toselect : array();
263$param .=
"&statut=".urlencode($statut);
264$param .=
"&search_bon=".urlencode($search_bon);
265if ($type ==
'bank-transfer') {
266 $param .=
'&type=bank-transfer';
269 $param .=
'&mode='.urlencode($mode);
271if (!empty($contextpage) && $contextpage != $_SERVER[
"PHP_SELF"]) {
272 $param .=
'&contextpage='.urlencode($contextpage);
274if ($limit > 0 && $limit !=
$conf->liste_limit) {
275 $param .=
'&limit='.((int) $limit);
277if ($optioncss !=
'') {
278 $param .=
'&optioncss='.urlencode($optioncss);
281$arrayofmassactions = array(
285$massactionbutton = $form->selectMassAction(
'', $arrayofmassactions);
287print
'<form method="POST" id="searchFormList" action="'.$_SERVER[
"PHP_SELF"].
'">'.
"\n";
288print
'<input type="hidden" name="token" value="'.newToken().
'">';
289if ($optioncss !=
'') {
290 print
'<input type="hidden" name="optioncss" value="'.$optioncss.
'">';
292print
'<input type="hidden" name="formfilteraction" id="formfilteraction" value="list">';
293print
'<input type="hidden" name="action" value="list">';
294print
'<input type="hidden" name="sortfield" value="'.$sortfield.
'">';
295print
'<input type="hidden" name="sortorder" value="'.$sortorder.
'">';
296print
'<input type="hidden" name="page" value="'.$page.
'">';
297print
'<input type="hidden" name="contextpage" value="'.$contextpage.
'">';
298print
'<input type="hidden" name="page_y" value="">';
299print
'<input type="hidden" name="mode" value="'.$mode.
'">';
302 print
'<input type="hidden" name="type" value="'.$type.
'">';
306$newcardbutton .=
dolGetButtonTitle($langs->trans(
'ViewList'),
'',
'fa fa-bars imgforviewmode', $_SERVER[
"PHP_SELF"].
'?mode=common'.preg_replace(
'/(&|\?)*mode=[^&]+/',
'', $param),
'', ((empty($mode) || $mode ==
'common') ? 2 : 1), array(
'morecss'=>
'reposition'));
307$newcardbutton .=
dolGetButtonTitle($langs->trans(
'ViewKanban'),
'',
'fa fa-th-list imgforviewmode', $_SERVER[
"PHP_SELF"].
'?mode=kanban'.preg_replace(
'/(&|\?)*mode=[^&]+/',
'', $param),
'', ($mode ==
'kanban' ? 2 : 1), array(
'morecss'=>
'reposition'));
309print_barre_liste($title, $page, $_SERVER[
"PHP_SELF"], $param, $sortfield, $sortorder, $massactionbutton, $num, $nbtotalofrecords,
'generic', 0, $newcardbutton,
'', $limit, 0, 0, 1);
316$parameters = array();
317$reshook = $hookmanager->executeHooks(
'printFieldPreListTitle', $parameters, $object, $action);
318if (empty($reshook)) {
319 $moreforfilter .= $hookmanager->resPrint;
321 $moreforfilter = $hookmanager->resPrint;
324if (!empty($moreforfilter)) {
325 print
'<div class="liste_titre liste_titre_bydiv centpercent">';
326 print $moreforfilter;
330$varpage = empty($contextpage) ? $_SERVER[
"PHP_SELF"] : $contextpage;
331$htmlofselectarray = $form->multiSelectArrayWithCheckbox(
'selectedfields', $arrayfields, $varpage,
$conf->main_checkbox_left_column);
332$selectedfields = ($mode !=
'kanban' ? $htmlofselectarray :
'');
333$selectedfields .= (count($arrayofmassactions) ? $form->showCheckAddButtons(
'checkforselect', 1) :
'');
335print
'<div class="div-table-responsive">';
336print
'<table class="tagtable nobottomiftotal liste'.($moreforfilter ?
" listwithfilterbefore" :
"").
'">'.
"\n";
340print
'<tr class="liste_titre_filter">';
342if (
$conf->main_checkbox_left_column) {
343 print
'<td class="liste_titre center maxwidthsearch">';
344 $searchpicto = $form->showFilterButtons(
'left');
348print
'<td class="liste_titre"><input type="text" class="flat" name="search_line" value="'.dol_escape_htmltag($search_line).
'" size="6"></td>';
349print
'<td class="liste_titre"><input type="text" class="flat" name="search_bon" value="'.dol_escape_htmltag($search_bon).
'" size="6"></td>';
350print
'<td class="liste_titre"> </td>';
351print
'<td class="liste_titre"><input type="text" class="flat" name="search_company" value="'.dol_escape_htmltag($search_company).
'" size="6"></td>';
352print
'<td class="liste_titre center"><input type="text" class="flat" name="search_code" value="'.dol_escape_htmltag($search_code).
'" size="6"></td>';
353print
'<td class="liste_titre"> </td>';
354print
'<td class="liste_titre"> </td>';
356if (!
$conf->main_checkbox_left_column) {
357 print
'<td class="liste_titre center maxwidthsearch">';
358 $searchpicto = $form->showFilterButtons();
367$columntitle =
"WithdrawalsReceipts";
368$columntitlethirdparty =
"CustomerCode";
369$columncodethirdparty =
"s.code_client";
370if ($type ==
'bank-transfer') {
371 $columntitle =
"BankTransferReceipts";
372 $columntitlethirdparty =
"SupplierCode";
373 $columncodethirdparty =
"s.code_fournisseur";
378print
'<tr class="liste_titre">';
380if (
$conf->main_checkbox_left_column) {
381 print
getTitleFieldOfList($selectedfields, 0, $_SERVER[
"PHP_SELF"],
'',
'',
'',
'', $sortfield, $sortorder,
'center maxwidthsearch ').
"\n";
388print_liste_field_titre(($type ==
'bank-transfer' ?
"BillsAndSalaries" :
"Bills"), $_SERVER[
"PHP_SELF"],
"f.ref",
'', $param,
'', $sortfield, $sortorder);
392print_liste_field_titre($columntitlethirdparty, $_SERVER[
"PHP_SELF"], $columncodethirdparty,
'', $param,
'', $sortfield, $sortorder,
'center ');
394print_liste_field_titre(
"Date", $_SERVER[
"PHP_SELF"],
"p.datec",
"", $param,
'', $sortfield, $sortorder,
'center ');
396print_liste_field_titre(
"Amount", $_SERVER[
"PHP_SELF"],
"pl.amount",
"", $param,
'', $sortfield, $sortorder,
'right ');
399if (!
$conf->main_checkbox_left_column) {
400 print
getTitleFieldOfList($selectedfields, 0, $_SERVER[
"PHP_SELF"],
'',
'',
'',
'', $sortfield, $sortorder,
'center maxwidthsearch ').
"\n";
412$imaxinloop = ($limit ? min($num, $limit) : $num);
413while ($i < $imaxinloop) {
414 $obj =
$db->fetch_object($resql);
416 $bon->id = $obj->rowid;
417 $bon->ref = $obj->ref;
418 $bon->date_creation =
$db->jdate($obj->datec);
419 $bon->date_tans =
$db->jdate($obj->date_trans);
420 $bon->date_credit =
$db->jdate($obj->date_credit);
421 $bon->amount = $obj->amount;
422 $bon->status = $obj->status;
425 if (
$object->checkIfSalaryBonPrelevement()) {
426 $fullname = explode(
' ', $obj->name);
428 $userstatic->id = $obj->socid;
429 $userstatic->email = $obj->email;
430 $userstatic->firstname = $fullname[0];
431 $userstatic->lastname = isset($fullname[1]) ? $fullname[1] :
'';
434 $company->id = $obj->socid;
435 $company->name = $obj->name;
436 $company->email = $obj->email;
437 $company->code_client = $obj->code_client;
439 if ($mode ==
'kanban') {
441 print
'<tr class="trkanban"><td colspan="'.$savnbfield.
'">';
442 print
'<div class="box-flex-container kanban">';
446 if ($massactionbutton || $massaction) {
448 if (in_array(
$object->id, $arrayofselected)) {
452 print
$object->getKanbanView(
'', array(
'selected' => $selected));
453 if ($i == ($imaxinloop - 1)) {
460 print
'<tr data-rowid="'.$object->id.
'" class="oddeven row-with-select">';
463 if (
$conf->main_checkbox_left_column) {
464 print
'<td class="nowrap center">';
465 if ($massactionbutton || $massaction) {
467 if (in_array(
$object->id, $arrayofselected)) {
470 print
'<input id="cb'.$object->id.
'" class="flat checkforselect" type="checkbox" name="toselect[]" value="'.
$object->id.
'"'.($selected ?
' checked="checked"' :
'').
'>';
478 print $bon->getNomUrl(1);
482 print $line->LibStatut($obj->statut_ligne, 2);
484 print
'<a href="'.DOL_URL_ROOT.
'/compta/prelevement/line.php?id='.$obj->rowid_ligne.($type ==
'bank-transfer' ?
'&type=bank-transfer' :
'').
'">';
485 print substr(
'000000'.$obj->rowid_ligne, -6);
489 print
'<td class="nowraponall">';
490 $link_to_bill =
'/compta/facture/card.php?facid=';
491 $link_title =
'Invoice';
492 $link_picto =
'bill';
493 if ($type ==
'bank-transfer') {
494 if ($bon->checkIfSalaryBonPrelevement()) {
495 $link_to_bill =
'/salaries/card.php?id=';
496 $link_title =
'SalaryInvoice';
497 $link_picto =
'salary';
499 $link_to_bill =
'/fourn/facture/card.php?facid=';
500 $link_title =
'SupplierInvoice';
501 $link_picto =
'supplier_invoice';
504 print
'<a href="'.DOL_URL_ROOT.$link_to_bill.$obj->facid.
'">';
505 print
img_object($langs->trans($link_title), $link_picto);
506 if (!$bon->checkIfSalaryBonPrelevement()) {
507 print
' '.$obj->invoiceref.
"</td>\n";
509 print
' '.(!empty($obj->invoiceref) ? $obj->invoiceref : $obj->facid).
"</td>\n";
515 print
'<td class="tdoverflowmax150">';
516 print(!$bon->checkIfSalaryBonPrelevement() ? $company->getNomUrl(1) : $userstatic->getNomUrl(-1));
519 print
'<td class="center">';
520 $link_to_tab =
'/comm/card.php?socid=';
521 $link_code = $obj->code_client;
522 if ($type ==
'bank-transfer') {
523 $link_to_tab =
'/fourn/card.php?socid=';
524 $link_code = $obj->code_fournisseur;
526 print
'<a href="'.DOL_URL_ROOT.$link_to_tab.$company->id.
'">'.$link_code.
"</a>";
529 print
'<td class="center">'.dol_print_date(
$db->jdate($obj->datec),
'day').
"</td>\n";
531 print
'<td class="nowraponall right"><span class="amount">'.price($obj->amount).
"</span></td>\n";
534 if (!
$conf->main_checkbox_left_column) {
535 print
'<td class="nowrap center">';
536 if ($massactionbutton || $massaction) {
538 if (in_array(
$object->id, $arrayofselected)) {
541 print
'<input id="cb'.$object->id.
'" class="flat checkforselect" type="checkbox" name="toselect[]" value="'.
$object->id.
'"'.($selected ?
' checked="checked"' :
'').
'>';
555 print
'<tr><td colspan="8"><span class="opacitymedium">'.$langs->trans(
"None").
'</span></td></tr>';
560$parameters = array(
'arrayfields' => $arrayfields,
'sql' => $sql);
561$reshook = $hookmanager->executeHooks(
'printFieldListFooter', $parameters, $object, $action);
562print $hookmanager->resPrint;
564print
'</table>'.
"\n";
if(! $sortfield) if(! $sortorder) $object
llxFooter($comment='', $zone='private', $disabledoutputofmessages=0)
Empty footer.
if(!defined('NOREQUIRESOC')) if(!defined( 'NOREQUIRETRAN')) if(!defined('NOTOKENRENEWAL')) if(!defined( 'NOREQUIREMENU')) if(!defined('NOREQUIREHTML')) if(!defined( 'NOREQUIREAJAX')) llxHeader($head='', $title='', $help_url='', $target='', $disablejs=0, $disablehead=0, $arrayofjs='', $arrayofcss='', $morequerystring='', $morecssonbody='', $replacemainareaby='', $disablenofollow=0, $disablenoindex=0)
Empty header.
Class to manage withdrawal receipts.
Class to manage withdrawals.
Class to manage third parties objects (customers, suppliers, prospects...)
Class to manage Dolibarr users.
print_liste_field_titre($name, $file="", $field="", $begin="", $param="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $tooltip="", $forcenowrapcolumntitle=0)
Show title line of an array.
print_barre_liste($title, $page, $file, $options='', $sortfield='', $sortorder='', $morehtmlcenter='', $num=-1, $totalnboflines='', $picto='generic', $pictoisfullpath=0, $morehtmlright='', $morecss='', $limit=-1, $selectlimitsuffix=0, $hidenavigation=0, $pagenavastextinput=0, $morehtmlrightbeforearrow='')
Print a title with navigation controls for pagination.
GETPOSTINT($paramname, $method=0)
Return the value of a $_GET or $_POST supervariable, converted into integer.
dolGetButtonTitle($label, $helpText='', $iconClass='fa fa-file', $url='', $id='', $status=1, $params=array())
Function dolGetButtonTitle : this kind of buttons are used in title in list.
img_object($titlealt, $picto, $moreatt='', $pictoisfullpath=0, $srconly=0, $notitle=0, $allowothertags=array())
Show a picto called object_picto (generic function)
natural_search($fields, $value, $mode=0, $nofirstand=0, $sqltoadd='')
Generate natural SQL search string for a criteria (this criteria can be tested on one or several fiel...
getDolGlobalInt($key, $default=0)
Return a Dolibarr global constant int value.
getTitleFieldOfList($name, $thead=0, $file="", $field="", $begin="", $moreparam="", $moreattrib="", $sortfield="", $sortorder="", $prefix="", $disablesortlink=0, $tooltip='', $forcenowrapcolumntitle=0)
Get title line of an array.
GETPOST($paramname, $check='alphanohtml', $method=0, $filter=null, $options=null, $noreplace=0)
Return value of a param into GET or POST supervariable.
dol_print_error($db=null, $error='', $errors=null)
Displays error message system with all the information to facilitate the diagnosis and the escalation...
restrictedArea(User $user, $features, $object=0, $tableandshare='', $feature2='', $dbt_keyfield='fk_soc', $dbt_select='rowid', $isdraft=0, $mode=0)
Check permissions of a user to show a page and an object.