print '<td class="liste_titre"> </td>'; print '<td class="liste_titre" align="right"><input type="image" class="liste_titre" src="'.DOL_URL_ROOT.'/theme/'.$conf->theme.'/img/search.png" name="button_search" value="'.dol_escape_htmltag($langs->trans("Search")).'" title="'.dol_escape_htmltag($langs->trans("Search")).'"></td>'; print '</tr>'; print '</form>'; $var=True; while ($i < min($num,$conf->liste_limit)) { $obj = $db->fetch_object($result); $var=!$var; print "<tr $bc[$var]><td>"; print $ligne->LibStatut($obj->statut_ligne,2); print " "; print '<a href="'.DOL_URL_ROOT.'/compta/prelevement/ligne.php?id='.$obj->rowid_ligne.'">'; print substr('000000'.$obj->rowid_ligne, -6); print '</a></td>'; print '<td>'; print $bon->LibStatut($obj->statut,2); print " "; print '<a href="fiche.php?id='.$obj->rowid.'">'.$obj->ref."</a></td>\n"; print '<td><a href="'.DOL_URL_ROOT.'/compta/facture.php?facid='.$obj->facid.'">'; print img_object($langs->trans("ShowBill"),"bill");
$sql .= " WHERE pl.fk_prelevement_bons = " . $prev_id; $sql .= " GROUP BY pl.statut"; $resql = $db->query($sql); if ($resql) { $num = $db->num_rows($resql); $i = 0; print_fiche_titre($langs->trans("StatisticsByLineStatus"), '', ''); print "\n<!-- debut table -->\n"; print '<table class="noborder" width="100%" cellspacing="0" cellpadding="4">'; print '<tr class="liste_titre">'; print '<td>' . $langs->trans("Status") . '</td><td align="right">' . $langs->trans("Amount") . '</td><td align="right">%</td></tr>'; $var = false; while ($i < $num) { $row = $db->fetch_row($resql); print "<tr " . $bc[$var] . "><td>"; print $ligne->LibStatut($row[1], 1); print '</td><td align="right">'; print price($row[0]); print '</td><td align="right">'; print round($row[0] / $bon->amount * 100, 2) . " %"; print '</td>'; print "</tr>\n"; $var = !$var; $i++; } print "</table>"; $db->free($resql); } else { print $db->error() . ' ' . $sql; } }
$head[$h][0] = DOL_URL_ROOT . '/compta/prelevement/ligne.php?id=' . $id; $head[$h][1] = $langs->trans("Card"); $hselected = $h; $h++; if ($id) { $lipre = new LignePrelevement($db, $user); if ($lipre->fetch($id) == 0) { $bon = new BonPrelevement($db); $bon->fetch($lipre->bon_rowid); dol_fiche_head($head, $hselected, $langs->trans("StandingOrder")); print '<table class="border" width="100%">'; print '<tr><td width="20%">' . $langs->trans("WithdrawalsReceipts") . '</td><td>'; print $bon->getNomUrl(1) . '</td></tr>'; print '<tr><td width="20%">' . $langs->trans("Date") . '</td><td>' . dol_print_date($bon->datec, 'day') . '</td></tr>'; print '<tr><td width="20%">' . $langs->trans("Amount") . '</td><td>' . price($lipre->amount) . '</td></tr>'; print '<tr><td width="20%">' . $langs->trans("Status") . '</td><td>' . $lipre->LibStatut($lipre->statut, 1) . '</td></tr>'; if ($lipre->statut == 3) { $rej = new RejetPrelevement($db, $user); $resf = $rej->fetch($lipre->id); if ($resf == 0) { print '<tr><td width="20%">' . $langs->trans("RefusedReason") . '</td><td>' . $rej->motif . '</td></tr>'; print '<tr><td width="20%">' . $langs->trans("RefusedData") . '</td><td>'; if ($rej->date_rejet == 0) { /* Historique pour certaines install */ print $langs->trans("Unknown"); } else { print dol_print_date($rej->date_rejet, 'day'); } print '</td></tr>'; print '<tr><td width="20%">' . $langs->trans("RefusedInvoicing") . '</td><td>' . $rej->invoicing . '</td></tr>'; } else {
$head[$h][1] = $langs->trans("Card"); $hselected = $h; $h++; if ($id) { $lipre = new LignePrelevement($db, $user); if ($lipre->fetch($id) == 0) { $bon = new BonPrelevement($db); $bon->fetch($lipre->bon_rowid); dol_fiche_head($head, $hselected, $langs->trans("StandingOrder")); print '<table class="border" width="100%">'; print '<tr><td width="20%">' . $langs->trans("WithdrawalReceipt") . '</td><td>'; print '<a href="fiche.php?id=' . $lipre->bon_rowid . '">' . $lipre->bon_ref . '</a></td></tr>'; print '<tr><td width="20%">' . $langs->trans("Date") . '</td><td>' . dol_print_date($bon->datec, 'day') . '</td></tr>'; print '<tr><td width="20%">' . $langs->trans("Amount") . '</td><td>' . price($lipre->amount) . '</td></tr>'; print '<tr><td width="20%">' . $langs->trans("Status") . '</td><td>'; print $lipre->LibStatut($lipre->statut, 1) . '</td></tr>'; if ($lipre->statut == 3) { $rej = new RejetPrelevement($db, $user); $resf = $rej->fetch($lipre->id); if ($resf == 0) { print '<tr><td width="20%">' . $langs->trans("RefusedReason") . '</td><td>' . $rej->motif . '</td></tr>'; print '<tr><td width="20%">' . $langs->trans("RefusedData") . '</td><td>'; if ($rej->date_rejet == 0) { /* Historique pour certaines install */ print $langs->trans("Unknown"); } else { print dol_print_date($rej->date_rejet, 'day'); } print '</td></tr>'; print '<tr><td width="20%">' . $langs->trans("RefusedInvoicing") . '</td><td>' . $rej->invoicing . '</td></tr>'; } else {
$num = $db->num_rows($result); $i = 0; print_barre_liste($langs->trans("WithdrawsRefused"), $page, $_SERVER["PHP_SELF"], $urladd, $sortfield, $sortorder, '', $num); print "\n<!-- debut table -->\n"; print '<table class="noborder" width="100%" cellspacing="0" cellpadding="4">'; print '<tr class="liste_titre">'; print_liste_field_titre($langs->trans("Line"), $_SERVER["PHP_SELF"], "p.ref", '', $urladd); print_liste_field_titre($langs->trans("ThirdParty"), $_SERVER["PHP_SELF"], "s.nom", '', $urladd); print_liste_field_titre($langs->trans("Reason"), $_SERVER["PHP_SELF"], "pr.motif", "", $urladd); print "</tr>\n"; $var = True; $total = 0; while ($i < min($num, $conf->liste_limit)) { $obj = $db->fetch_object($result); print "<tr " . $bc[$var] . "><td>"; print $ligne->LibStatut($obj->statut, 2) . ' '; print '<a href="' . DOL_URL_ROOT . '/compta/prelevement/ligne.php?id=' . $obj->rowid . '">'; print substr('000000' . $obj->rowid, -6) . "</a></td>"; print '<td><a href="' . DOL_URL_ROOT . '/comm/card.php?socid=' . $obj->socid . '">' . stripslashes($obj->nom) . "</a></td>\n"; print '<td>' . $rej->motifs[$obj->motif] . '</td>'; print "</tr>\n"; $var = !$var; $i++; } print "</table>"; $db->free($result); } else { dol_print_error($db); } llxFooter(); $db->close();