NPO-Accounting/payroll-import
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Remove --pay-invoice-no and replace with retirement invoice value

Browse source 
Rosanne advised we were showing TODO-PAY-INVOICE when it should be
TODO-RETIREMENT-INVOICE.
This commit is contained in:
Ben Sturmfels 2024-02-23 10:22:44 +11:00
parent 77b603a1dd
commit 6ac0a45273
Signed by: bsturmfels
GPG key ID: 023C05E2C9C068F0
1 changed files with 2 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/core.clj
View file

@ -19,8 +19,6 @@
:default 0M] :default 0M]
[nil "--pay-receipt-no REFERENCE" "Payroll receipt number, eg. \"rt:111/222\"" [nil "--pay-receipt-no REFERENCE" "Payroll receipt number, eg. \"rt:111/222\""
:default "TODO-PAY-RECEIPT"] :default "TODO-PAY-RECEIPT"]
[nil "--pay-invoice-no REFERENCE" "Payroll invoice number, eg. \"rt:111/222\""
:default "TODO-PAY-INVOICE"]
[nil "--fees-receipt-no REFERENCE" "Paychex fees receipt number, eg. \"rt:111/222\"" [nil "--fees-receipt-no REFERENCE" "Paychex fees receipt number, eg. \"rt:111/222\""
:default "TODO-FEES-RECEIPT"] :default "TODO-FEES-RECEIPT"]
[nil "--fees-invoice-no REFERENCE" "Paychex fees invoice number, eg. \"rt:111/222\"" [nil "--fees-invoice-no REFERENCE" "Paychex fees invoice number, eg. \"rt:111/222\""
@ -33,13 +31,13 @@
(defn -main [& args] (defn -main [& args]
(let [{:keys [options _arguments _errors summary]} (parse-opts args cli-options) (let [{:keys [options _arguments _errors summary]} (parse-opts args cli-options)
{:keys [date period pay-receipt-no pay-invoice-no total-fees fees-receipt-no fees-invoice-no retirement-receipt-no retirement-invoice-no]} options] {:keys [date period pay-receipt-no total-fees fees-receipt-no fees-invoice-no retirement-receipt-no retirement-invoice-no]} options]
(when (:help options) (when (:help options)
(println summary) (println summary)
(System/exit 0)) (System/exit 0))
(let [data (import/read-csv (:csv options)) (let [data (import/read-csv (:csv options))
imported (concat (import/payroll date period pay-receipt-no data) imported (concat (import/payroll date period pay-receipt-no data)
(import/individual-taxes date period pay-receipt-no pay-invoice-no data) (import/individual-taxes date period pay-receipt-no retirement-invoice-no data)
(import/employer-taxes date period pay-receipt-no data) (import/employer-taxes date period pay-receipt-no data)
(import/payroll-fees date period fees-receipt-no fees-invoice-no total-fees data) (import/payroll-fees date period fees-receipt-no fees-invoice-no total-fees data)
(import/retirement date period retirement-receipt-no retirement-invoice-no data))] (import/retirement date period retirement-receipt-no retirement-invoice-no data))]