retabled.internal — edu.byu.odh/retabled2 1

ALL-DATA clj/s

atom? clj/s

(atom? a)

ducktype an atom as something dereferable

check-for-duplicates clj/s

(check-for-duplicates table-id)

curate-entries clj/s

(curate-entries {:as args :keys [paging-controls entries SORT FILTER]})

CURRENT-DATA clj/s

DEFAULT-PAGE-ATOM clj/s

default-page-atom clj/s

default-paging clj/s

(default-paging table-id)

Set up a local atom and define paging functions with reference to it

default-paging-info clj/s

exceptions clj/s

generate-rows clj/s

(generate-rows {:as args :keys [controls entries SORT FILTER table-id]})

Generate all the rows of the table from entries, according to controls

generate-table-id clj/s

(generate-table-id table-id)

generate-theads clj/s

(generate-theads {:as args
                  :keys [controls paging-controls SORT FILTER table-id]})

generate the table headers

paging clj/s

(paging paging-controls entries)

Limit view of entries to a given screen. If paging-controls is falsy, do not filter.

PAGING-INFO clj/s

render-header-fields clj/s

(render-header-fields {:as args :keys [controls SORT FILTER table-id]})

render-screen-controls clj/s

(render-screen-controls
  {:as paging-controls
   :keys [get-current-screen get-amount set-amount set-current-screen
          set-final-screen get-final-screen r-content rr-content f-content
          ff-content left-bar-content right-bar-content num-columns
          entries-option align show-total-pages?]
   :or {num-columns 100}}
  table-scroll-bar
  table-id)

Render the controls to edit this screen for results

TABLE-NAME-COUNT clj/s

update-all-data! clj/s

(update-all-data! table-id entries)

update-current-data! clj/s

(update-current-data! table-id entries)

update-default-entries-per-page! clj/s

(update-default-entries-per-page! controls table-id)

update-paging-info! clj/s

(update-paging-info! table-id)