New: Can filter of payment type in bank transaction list

ChangeLog

@@ -5,6 +5,7 @@ $Id$
 
 ***** ChangeLog for 3.1 compared to 3.0 *****
 For users:
+- New: Can filter of payment type in bank transaction list.
 - New: Status is visible into user list.
 - New: Support BSB code for bank account in australia.
 - New: Can set date of payment for autocreate invoice/payment when 

htdocs/compta/bank/account.php

@@ -214,6 +214,12 @@ if ($account || $_GET["ref"])
         $param.='&thirdparty='.urlencode($_REQUEST["thirdparty"]);
         $mode_search = 1;
     }
+    if ($_REQUEST["paiementtype"])
+    {
+        $sql_rech.=" AND b.fk_type = '".$db->escape($_REQUEST["paiementtype"])."'";
+        $param.='&paiementtype='.urlencode($_REQUEST["paiementtype"]);
+        $mode_search = 1;
+    }
 
     $sql = "SELECT count(*) as nb";
     $sql.= " FROM ".MAIN_DB_PREFIX."bank_account as ba";
@@ -415,7 +421,12 @@ if ($account || $_GET["ref"])
     print '<input type="hidden" name="account" value="' . $acct->id . '">';
 
     print '<tr class="liste_titre">';
-    print '<td colspan="3">&nbsp;</td>';
+    print '<td colspan="2">&nbsp;</td>';
+    print '<td>';
+    //$filtertype=array('TIP'=>'TIP','PRE'=>'PRE',...)
+    $filtertype='';
+    print $html->select_types_paiements($_REQUEST['paiementtype'],'paiementtype',$filtertype,2,1,1,8);
+    print '</td>';
     print '<td><input type="text" class="flat" name="req_nb" value="'.$_REQUEST["req_nb"].'" size="2"></td>';
     print '<td><input type="text" class="flat" name="req_desc" value="'.$_REQUEST["req_desc"].'" size="24"></td>';
     print '<td><input type="text" class="flat" name="thirdparty" value="'.$_REQUEST["thirdparty"].'" size="14"></td>';

htdocs/core/class/html.form.class.php

@@ -1681,12 +1681,13 @@ class Form
      *      Return list of payment methods
      *      @param      selected        Id du mode de paiement pre-selectionne
      *      @param      htmlname        Nom de la zone select
-     *      @param      filtertype      To filter on field type in llx_c_paiement
+     *      @param      filtertype      To filter on field type in llx_c_paiement (array('code'=>xx,'label'=>zz))
-     *      @param      format          0=id+libelle, 1=code+code, 2=code+libelle
+     *      @param      format          0=id+libelle, 1=code+code, 2=code+libelle, 3=id+code
      *      @param      empty			1=peut etre vide, 0 sinon
      * 		@param		noadmininfo		0=Add admin info, 1=Disable admin info
+     *      @param      maxlength       Max length of label
      */
-    function select_types_paiements($selected='',$htmlname='paiementtype',$filtertype='',$format=0, $empty=0, $noadmininfo=0)
+    function select_types_paiements($selected='',$htmlname='paiementtype',$filtertype='',$format=0, $empty=0, $noadmininfo=0,$maxlength=0)
     {
         global $langs,$user;
 
@@ -1712,13 +1713,15 @@ class Form
             if ($format == 0) print '<option value="'.$id.'"';
             if ($format == 1) print '<option value="'.$arraytypes['code'].'"';
             if ($format == 2) print '<option value="'.$arraytypes['code'].'"';
+            if ($format == 3) print '<option value="'.$id.'"';
             // Si selected est text, on compare avec code, sinon avec id
             if (preg_match('/[a-z]/i', $selected) && $selected == $arraytypes['code']) print ' selected="selected"';
             elseif ($selected == $id) print ' selected="selected"';
             print '>';
-            if ($format == 0) $value=$arraytypes['label'];
+            if ($format == 0) $value=($maxlength?dol_trunc($arraytypes['label'],$maxlength):$arraytypes['label']);
             if ($format == 1) $value=$arraytypes['code'];
-            if ($format == 2) $value=$arraytypes['label'];
+            if ($format == 2) $value=($maxlength?dol_trunc($arraytypes['label'],$maxlength):$arraytypes['label']);
+            if ($format == 3) $value=$arraytypes['code'];
             print $value?$value:'&nbsp;';
             print '</option>';
         }