dan/invoices
1
0
Fork 0
mirror of https://github.com/mruwnik/invoices.git synced 2025-06-08 13:24:43 +02:00
Code Issues Packages Projects Releases Wiki Activity

Skip payment details if no bank account provided

Browse Source
This commit is contained in:
Daniel O'Connell 2019-10-08 21:27:42 +02:00
parent 9fef8fa107
commit db19761124
1 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
src/invoices/pdf.clj
View File

@ -73,10 +73,15 @@
[:spacer] [:spacer]
[:line] [:line]
[:table {:border false :padding 0 :spacing 0 :num-cols 6} [:table {:border false :padding 0 :spacing 0 :num-cols 6}
[(format-param "data wystawienia") (-> when .toString format-value) (format-param "sposób płatności") (format-value "Przelew")] (concat [(format-param "data wystawienia") (-> when .toString format-value)]
[(format-param "data sprzedaży") (-> when .toString format-value) (format-param "bank") (format-value (:bank seller))] (if-not (:account seller) ["" "" ""]
[(format-param "termin płatności") (-> when (.plusDays 14) .toString format-value) (format-param "numer konta") (format-value (:account seller))]] [(format-param "sposób płatności") (format-value "Przelew")]))
(concat [(format-param "data sprzedaży") (-> when .toString format-value)]
(if-not (:account seller) ["" "" ""]
[(format-param "bank") (format-value (:bank seller))]))
(concat [(format-param "termin płatności") (-> when (.plusDays 14) .toString format-value)]
(if-not (:account seller) ["" "" ""]
[(format-param "numer konta") (format-value (:account seller))]))]
(concat (concat
[:table [:table
{:header [{:background-color [216 247 249]} "Lp." [:cell {:colspan 4} "Nazwa"] "Ilość" "Cena netto" "Stawka VAT" "Kwota VAT" "Wartość brutto"] {:header [{:background-color [216 247 249]} "Lp." [:cell {:colspan 4} "Nazwa"] "Ilość" "Cena netto" "Stawka VAT" "Kwota VAT" "Wartość brutto"]