38 lines
1.1 KiB
Org Mode
38 lines
1.1 KiB
Org Mode
|
:PROPERTIES:
|
||
|
:ID: b2a4956b-0fcb-4809-b191-e29eb086367f
|
||
|
:END:
|
||
|
#+title: 2022-05-23
|
||
|
* [[id:d06d3ab4-c2d0-47c3-aae1-4395567fc3d2][Normalizing tags]] in production
|
||
|
:PROPERTIES:
|
||
|
:header-args:sql: :engine postgresql :cmdline "-U postgres postgres" :dir /docker:postgres: :exports both :cache yes :eval no-export
|
||
|
:END:
|
||
|
|
||
|
#+CAPTION: Find the next set of least affected accounts
|
||
|
#+begin_src sql
|
||
|
SELECT COUNT(*)
|
||
|
FROM accounts
|
||
|
WHERE NOT normalized AND total <= 50
|
||
|
#+end_src
|
||
|
|
||
|
#+RESULTS[3b91f19494773258001c8f81134f9b930f7a5898]:
|
||
|
| count |
|
||
|
|-------|
|
||
|
| 708 |
|
||
|
#+CAPTION: Find the next set of least affected accounts
|
||
|
#+NAME: 03-less-than-equal-to-fifty
|
||
|
#+begin_src sql :results silent
|
||
|
SELECT account_id
|
||
|
FROM accounts
|
||
|
WHERE NOT normalized AND total <= 50
|
||
|
#+end_src
|
||
|
|
||
|
#+begin_src emacs-lisp :var accounts=03-less-than-equal-to-fifty :results file :eval no-export
|
||
|
(let ((filename "~/git/normalize_account_tags/production/03-less-than-equal-to-fifty"))
|
||
|
(with-temp-file filename
|
||
|
(insert (s-join "\n" (-map #'car accounts))))
|
||
|
filename)
|
||
|
#+end_src
|
||
|
|
||
|
#+RESULTS:
|
||
|
[[file:~/git/normalize_account_tags/production/03-less-than-equal-to-fifty]]
|