   2. or a list of named param-value maps
   Return a lazy list of integers, each being the number of rows affected."
   [^String sql batch-args]
+  (sp/verify-writable)
   (let [args1        (first batch-args)
         is-map       (map? args1)
         is-seq       (or (coll? args1) (mu/array? args1))

(defn insert-give-id
  "Insert row and return generated ID."
  [^SimpleJdbcInsert sji row]
  ;; sji.withTableName("tableName")
  ;; .executeAndReturnKey(/* Map<String, Object> */ row); // Number
  (try

(defn update
  "Execute update-query and return integer result (number of rows affected)."
  ([^String sql args]
    (sp/verify-writable)
    (with-query-args [qargs args]
      (show-sql sql)
      (.update (get-sjt) sql qargs)))
