diff --git a/_pkgdown.yml b/_pkgdown.yml
index e09130b..e68fda2 100644
--- a/_pkgdown.yml
+++ b/_pkgdown.yml
@@ -38,6 +38,8 @@ navbar:
href: articles/pkgdown_letter_example3.html
- text: Example 4
href: articles/pkgdown_letter_example4.html
+ - text: Example 5
+ href: articles/pkgdown_letter_example5.html
template:
params:
diff --git a/inst/rmarkdown/templates/pdf/resources/maintainersDelight.lco b/inst/rmarkdown/templates/pdf/resources/maintainersDelight.lco
index 213c5ac..4b2260e 100644
--- a/inst/rmarkdown/templates/pdf/resources/maintainersDelight.lco
+++ b/inst/rmarkdown/templates/pdf/resources/maintainersDelight.lco
@@ -6,7 +6,7 @@
% Options --------------------------------------------------------------------
\KOMAoptions{%
parskip=half, % half line skip between paragraphs
- firstfoot=false, % no footer
+ firstfoot=true, % no footer
enlargefirstpage, % longer first page works well with no footer
refline=narrow, % adjust refline with text body
backaddress=plain % do not underline backaddress in address window
@@ -65,6 +65,8 @@
% Signature
\let\raggedsignature\raggedright
+% Footer
+\@setplength{firstfoothpos}{30mm}
% Custom Letter Head ----------------------------------------------------------
\setkomavar{firsthead}{%
@@ -80,3 +82,13 @@
}
}
}
+
+% Custom Footer ----------------------------------------------------------
+% Taken from https://gitlab.com/yuvallanger/worg/-/blob/b0ac61fb701135a77c8b5fad13c788010bbb2acb/exporters/koma-letter-export.org
+% Banking information in the footer
+\setkomavar{firstfoot}{%
+ \footnotesize
+ \parbox[b]{\linewidth}{%
+ \centering\def\\{ \textbullet{} }\ifkomavarempty{frombank}{}{{\def\\{,\nobreakspace\@ogobble}\usekomavar{frombank}}\\}%
+ }%
+}
diff --git a/inst/rmarkdown/templates/pdf/resources/template.tex b/inst/rmarkdown/templates/pdf/resources/template.tex
index 039f7db..5f72fa2 100755
--- a/inst/rmarkdown/templates/pdf/resources/template.tex
+++ b/inst/rmarkdown/templates/pdf/resources/template.tex
@@ -244,6 +244,7 @@
\setkomavar{fromurl}{$return-url$}
$endif$
+
$if(date)$\setkomavar{date}{$date$}$endif$
$if(yourref)$\setkomavar{yourref}{$yourref$}$endif$
$if(yourmail)$\setkomavar{yourmail}{$yourmail$}$endif$
@@ -253,6 +254,12 @@
$if(place)$\setkomavar{place}{$place$}$endif$
$if(subject)$\setkomavar{subject}{$subject$}$endif$
$if(author)$\setkomavar{fromname}{$author$}$endif$
+
+
+$if(bank)$
+\setkomavar{frombank}{$for(bank)$$bank$$sep$\\$endfor$}
+$endif$
+
$if(return-address)$
\setkomavar{fromaddress}{$for(return-address)$$return-address$$sep$\\$endfor$}
$endif$
diff --git a/vignettes/letter_example5.Rmd b/vignettes/letter_example5.Rmd
new file mode 100644
index 0000000..0f23485
--- /dev/null
+++ b/vignettes/letter_example5.Rmd
@@ -0,0 +1,101 @@
+---
+author: Winkel van Sinkel
+address:
+- Fancy Work
+- Vleutensebaan 435
+- 7009 ZZ Haarlem
+- Netherlands
+subject: FACTUUR
+customer: '060101'
+invoice: '000003'
+lang: nl
+bank:
+- 'KVK: 12345678'
+- 'Btw-id: NL123456789B01'
+- 'IBAN: NL99ABCD0123456789'
+- 'BIC: AAAABBCCDD'
+params:
+ bank_num: 'IBAN: NL99ABCD0123456789'
+ invoice_num: '000001'
+ customer_num: '060101'
+return-address:
+- Modelstraat 12
+- 3017 KH Amsterdam
+- Netherlands
+return-email: somebody@gmail.com
+return-phone: '03012345'
+return-url: https
+date: '`r format(Sys.Date(), "%d %B, %Y")`'
+
+output:
+ komaletter::komaletter:
+ extra_dependencies: ["tabu", "booktabs"]
+
+vignette: >
+ %\VignetteIndexEntry{komaletter example letter 5}
+ %\VignetteKeywords{komaletter,vignette}
+ %\VignettePackage{komaletter}
+ %\VignetteEngine{knitr::rmarkdown}
+ %\VignetteEncoding{UTF-8}
+---
+
+
+```{r setup, include = FALSE}
+knitr::opts_chunk$set(echo = FALSE)
+```
+
+
+**Geleverd op `r format(as.Date("2021-09-08"), "%d %B, %Y")`:**
+
+
+```{r, eval=FALSE}
+# make a bill with bookkeeper
+# install.packages("devtools")
+# devtools::install_github("MartinSchobben/bookkeeper")
+bill <- bookkeeper::add_bill_entry(
+ c(
+ "Tekstproductie (80 uur à € 70)",
+ "Ontwerp (vaste prijs)",
+ "10 foto’s à € 150",
+ "Vormgeving (30 uur à € 60)",
+ "1 kg Suiker"
+ ),
+ c(21, 21, 21, 21, 9),
+ "€",
+ c(5600, 1250, 1500, 1800, 3),
+ "service",
+ .save = FALSE
+)
+# make bill
+bill <- bookkeeper::make_bill(lang = "nl", .save = FALSE, .bill = bill)
+# kable output bill
+bookkeeper::kable_bill(bill)
+```
+
+\begingroup\fontsize{10}{12}\selectfont
+
+\begin{tabu} to \linewidth {>{\raggedright\arraybackslash}p{30em}>{\centering\arraybackslash}p{5em}>{\centering\arraybackslash}p{2em}>{\raggedleft\arraybackslash}p{4em}}
+\toprule
+Tekstproductie (80 uur à € 70) & Btw 21 \% & € & 5600.00\\
+Ontwerp (vaste prijs) & Btw 21 \% & € & 1250.00\\
+10 foto’s à € 150 & Btw 21 \% & € & 1500.00\\
+Vormgeving (30 uur à € 60) & Btw 21 \% & € & 1800.00\\
+1 kg Suiker & Btw 9 \% & € & 3.00\\
+\midrule
+\addlinespace
+Subtotaal & & € & 10153.00\\
+\hspace{1em}Btw 21 \% & & € & 2131.50\\
+\hspace{1em}Btw 9 \% & & € & 0.27\\
+\midrule
+\textbf{Totaal} & \textbf{} & \textbf{€} & \textbf{12284.77}\\
+\midrule
+\bottomrule
+\end{tabu}
+\endgroup{}
+
+
+\vspace{3em}
+
+
+Betaling graag binnen 14 dagen na factuurdatum op `r params$bank_num` onder vermelding van het factuurnummer: `r params$invoice_num` en het klantnummer: `r params$customer_num`.
+
diff --git a/vignettes/pkgdown_letter_example5.Rmd b/vignettes/pkgdown_letter_example5.Rmd
new file mode 100644
index 0000000..22515fb
--- /dev/null
+++ b/vignettes/pkgdown_letter_example5.Rmd
@@ -0,0 +1,34 @@
+---
+title: "Example 5"
+description: "Invoice"
+output: html_document
+---
+
+Generate an invoice with bank details.
+
+
+
+### RMarkdown of Letter
+
+
+````markdown
+```{r cars, results='asis', echo=FALSE}
+md <- readLines('letter_example5.Rmd')[!grepl('\\\\|vignette', x=readLines('letter_example5.Rmd'))]
+md <- sub('r, eval=FALSE', 'r', x = md)
+cat(paste(md, collapse ='\n'))
+```
+````
+
+
+
+### Resulting PDF Letter
+
+PDF rendered via `rmarkdown::render()` or the RStudio Knit button from RMarkdown document above.
+
+```{r render-pdf, include=FALSE}
+rmarkdown::render("letter_example5.Rmd", output_file="pkgdown_ex5.pdf", output_dir='.')
+pdftools::pdf_convert(pdf='pkgdown_ex5.pdf', dpi=150, format="jpeg", pages=1, filenames="pkgdown_ex5.jpg")
+```
+
+