Add get_db_id_by_full_clause with a list of bind

David RENÉ
1 parent 284fba03
Showing 1 changed file with 18 additions and 0 deletions Show diff stats
controller/hk_sql_utils.anubis
@@ -310,6 +310,24 @@ public define List(DB_id)
   get_db_ids_by_full_clause(db, table_name, id_col, full_clause, [])
 .
  
+public define Maybe(DB_id)
+  get_db_id_by_full_clause
+  (
+    SQLite3DataBase db,
+    String          table_name,
+    String          id_col,
+    String          full_clause,
+    List(SQLite3Bind) binds
+  )=
+  with the_list = get_db_ids_by_full_clause(db, table_name, id_col, full_clause, binds),
+  println("list size "+length(the_list));
+  if the_list is
+  {
+    []      then failure,
+    [h . _] then success(h)
+  }
+.
+  
 public define Maybe(Int)
   get_mb_id_by_clause
   (