 (defn insert-give-idmap
   "Insert row and return generated ID map (for multiple columns)."
   [^SimpleJdbcInsert sji row]
+  (sp/verify-writable)
   ;; sji.withTableName("tableName")
   ;; .executeAndReturnKeyHolder(/* Map<String, Object> */ row)
   ;; .getKeys(); // Map<String, Object>

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

  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))
