NEW Add API to get types of expense reports

htdocs/api/class/api_setup.class.php

@@ -554,6 +554,70 @@ class Setup extends DolibarrApi
         return $list;
     }
 
+
+    /**
+     * Get the list of Expense Report types.
+     *
+     * @param string    $sortfield  Sort field
+     * @param string    $sortorder  Sort order
+     * @param int       $limit      Number of items per page
+     * @param int       $page       Page number (starting from zero)
+     * @param string    $module     To filter on module
+     * @param int       $active     Event's type is active or not {@min 0} {@max 1}
+     * @param string    $sqlfilters Other criteria to filter answers separated by a comma. Syntax example "(t.code:like:'A%') and (t.active:>=:0)"
+     * @return array				List of expense report types
+     *
+     * @url     GET dictionary/expensereport_types
+     *
+     * @throws RestException
+     */
+    public function getListOfExpenseReportsTypes($sortfield = "code", $sortorder = 'ASC', $limit = 100, $page = 0, $module = '', $active = 1, $sqlfilters = '')
+    {
+    	$list = array();
+
+    	$sql = "SELECT id, code, label, accountancy_code, active, module, position";
+    	$sql .= " FROM ".MAIN_DB_PREFIX."c_type_fees as t";
+    	$sql .= " WHERE t.active = ".$active;
+    	if ($module)    $sql .= " AND t.module LIKE '%".$this->db->escape($module)."%'";
+    	// Add sql filters
+    	if ($sqlfilters)
+    	{
+    		if (!DolibarrApi::_checkFilters($sqlfilters))
+    		{
+    			throw new RestException(503, 'Error when validating parameter sqlfilters '.$sqlfilters);
+    		}
+    		$regexstring = '\(([^:\'\(\)]+:[^:\'\(\)]+:[^:\(\)]+)\)';
+    		$sql .= " AND (".preg_replace_callback('/'.$regexstring.'/', 'DolibarrApi::_forge_criteria_callback', $sqlfilters).")";
+    	}
+
+
+    	$sql .= $this->db->order($sortfield, $sortorder);
+
+    	if ($limit) {
+    		if ($page < 0) {
+    			$page = 0;
+    		}
+    		$offset = $limit * $page;
+
+    		$sql .= $this->db->plimit($limit, $offset);
+    	}
+
+    	$result = $this->db->query($sql);
+
+    	if ($result) {
+    		$num = $this->db->num_rows($result);
+    		$min = min($num, ($limit <= 0 ? $num : $limit));
+    		for ($i = 0; $i < $min; $i++) {
+    			$list[] = $this->db->fetch_object($result);
+    		}
+    	} else {
+    		throw new RestException(503, 'Error when retrieving list of expense report types : '.$this->db->lasterror());
+    	}
+
+    	return $list;
+    }
+
+
     /**
      * Get the list of contacts types.
      *