1 \NeedsTeXFormat{LaTeX2e}
2 \ProvidesPackage{kiviletter}[2020/04/24 Letter Layouts for Kivitendo]
6 \DeclareOption{reffields}{\@kivi@infoboxfalse}
7 \DeclareOption{infobox}{\@kivi@infoboxtrue}
8 \DeclareOption{nofooter}{\@kivi@footerfalse}
9 \DeclareOption{footer}{\@kivi@footertrue}
13 \DeclareOption*{\PassOptionsToPackage{\CurrentOption}{scrletter}}
18 \RequirePackage{expl3}
19 \RequirePackage{xparse}
20 \RequirePackage{iftex}
21 \KOMAoptions{fontsize=12pt}
22 % Schriftart, Eingabelayout der Tastatur
24 \RequirePackage[utf8]{inputenc}% Nur notwendig, wenn Basis älter als TL2018
25 \RequirePackage[T1]{fontenc}
26 \RequirePackage{lmodern}
28 \RequirePackage{eurosym}
29 \DeclareUnicodeCharacter{20AC}{\euro}
31 \RequirePackage{fontspec}
34 \RequirePackage{xltabular}
35 \RequirePackage{booktabs}
36 \RequirePackage{graphicx}
40 \RequirePackage[fromlogo,fromalign=right,
41 firstfoot=false,%Für einheitliche Randeinstellungen
44 \LoadLetterOption{DIN}
46 \newkomavar{transaction}
47 \newkomavar[\lieferschein{}~\nr]{delivery}
48 \newkomavar[\angebot{}~\nr]{quote}
49 \newkomavar[\auftragsnummer]{orderID}
50 \newkomavar[\projektnummer]{projectID}
51 \setkomavar*{fromphone}{\textTelefon}
52 \setkomavar*{fromemail}{\textEmail}
53 \setkomavar*{fromfax}{\textFax}
54 \setkomavar*{customer}{\kundennummer}
60 \dim_new:N \g_kivi_margin_dim
61 \dim_gset:Nn \g_kivi_margin_dim {\useplength{toaddrhpos}}
62 \geometry{a4paper,margin=\g_kivi_margin_dim,heightrounded}
64 \int_new:N \l_kivi_tmp_int
65 \bool_new:N \l_kivi_tmp_bool
66 \bool_new:N \g_kivi_TableFoot_bool
67 \dim_new:N \g_kivi_orig@textheight_dim
70 \newsavebox{\shippingAddressBox}
75 hoffset=\useplength{toaddrhpos},
76 voffset=\dimexpr\useplength{toaddrvpos}+\useplength{toaddrheight}+4\baselineskip,%sep to shippingaddressbox
77 contents={\usebox\shippingAddressBox}
78 ]{kivitendo.shippingaddress}
80 \newpairofpagestyles{kivitendo.letter}{}
82 \renewcommand*{\letterpagestyle}{kivitendo.letter}
84 \DeclareNewPageStyleByLayers{kivitendo.letter.first}{
85 kivitendo.shippingaddress,
86 plain.kivitendo.letter.head.odd,plain.kivitendo.letter.head.even,plain.kivitendo.letter.head.oneside,%
87 plain.kivitendo.letter.foot.odd,plain.kivitendo.letter.foot.even,plain.kivitendo.letter.foot.oneside,%
90 \setkomavar{backaddress}{\firma\ $\cdot$ \strasse\ $\cdot$ \ort}
92 \setkomavar{firsthead}{
94 \rlap{\usekomavar{fromlogo}}%
98 \@setplength{locwidth}{6cm}
101 \dim_new:N \l_kivi_tab_desc_leftskip_dim
105 \cs_new:Nn \__kivi_set_colwidth:nn {
106 \dim_set:cn {l_kivi_tab_#1_dim} {#2}
110 \cs_new:Nn \__kivi_initialize_columns: {
111 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
112 \bool_if_exist:cF {l_kivi_col_##1_bool}
114 \bool_new:c {l_kivi_col_##1_bool}
115 \dim_new:c {l_kivi_tab_##1_dim}
116 \keys_define:nn {kivi/PricingTable} {
118 ##1 / true .code:n = \bool_set_true:c {l_kivi_col_##1_bool},
119 ##1 / false .code:n = \bool_set_false:c {l_kivi_col_##1_bool},
120 ##1 / unknown .code:n = {
121 \bool_set_true:c {l_kivi_col_##1_bool}
122 \dim_set:cn {l_kivi_tab_##1_dim} {####1}
124 ##1 .default:n = true,
125 ##1 .initial:n = true,
126 ##1 / header .prop_put:c = {l_kivi_col_##1_prop},
127 ##1 / colspec .prop_put:c = {l_kivi_col_##1_prop},
133 \clist_new:N \g_kivi_pricingtable_col_clist
135 \keys_define:nn {kivi/PricingTable} {
137 \clist_gset:Nn \g_kivi_pricingtable_col_clist {#1}
138 \__kivi_initialize_columns:,
139 columns .initial:n = {pos, id, desc, amount, price, pricetotal},
140 unknown .code:n = \keys_set:no {kivi/Tabular} {\l_keys_key_str=#1}
143 % set default values for colwidth
144 \keys_set:nn {kivi/PricingTable} {
151 pos/header=\position,
152 id/header=\artikelnummer,
153 desc/header=\bezeichnung,
154 amount/header=\menge,
155 price/header=\einzelpreis,
156 pricetotal/header=\gesamtpreis,
157 price / colspec = Price,
158 pricetotal / colspec = Price ,
161 \dim_new:N \g_kivi_tabcolsep_dim
162 \dim_gset:Nn \g_kivi_tabcolsep_dim {.5\tabcolsep}
164 \prg_new_conditional:Nnn \kivi_if_Price_col:n {T} {
165 \prop_get:cnN {l_kivi_col_#1_prop} {colspec} \l_tmpa_tl
166 \exp_args:NV \tl_if_eq:nnTF \l_tmpa_tl {Price}
172 \cs_new:Nn \__kivi_calc_desc_column: {
173 \dim_zero:N \l_kivi_tab_desc_leftskip_dim
174 \dim_zero:N \l_kivi_tab_desc_dim
175 \bool_set_false:N \l_tmpa_bool
176 \tl_gclear:N \g_kivi_Pricing_colspec_tl
177 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
178 \tl_if_eq:nnTF {##1} {desc} {
179 \dim_set:Nn \l_kivi_tab_desc_dim {
180 \textwidth-\l_kivi_tab_desc_leftskip_dim
182 \bool_set_true:N \l_tmpa_bool
183 \tl_gput_right:Nn \g_kivi_Pricing_colspec_tl {p{\l_kivi_tab_desc_dim}}
185 \bool_if:cT {l_kivi_col_##1_bool} {
186 \bool_if:NTF \l_tmpa_bool {
187 \dim_sub:Nn \l_kivi_tab_desc_dim {
188 \dim_use:c {l_kivi_tab_##1_dim}+2\g_kivi_tabcolsep_dim
191 \dim_add:Nn \l_kivi_tab_desc_leftskip_dim {
192 \dim_use:c {l_kivi_tab_##1_dim}+2\g_kivi_tabcolsep_dim
195 \tl_gput_right:Nn \g_kivi_Pricing_colspec_tl {K{\dim_use:c {l_kivi_tab_##1_dim}}}
196 \kivi_if_Price_col:nT {##1} {\tl_gput_right:Nn \g_kivi_Pricing_colspec_tl {<{\__kivi_tab_column_currency:}}}
200 \tl_gput_left:Nn \g_kivi_Pricing_colspec_tl {@{}}
201 \tl_gput_right:Nn \g_kivi_Pricing_colspec_tl {@{}}
204 \newcolumntype{K}[1]{>{\raggedleft\arraybackslash}p{#1}}
205 \newcolumntype{P}[1]{K{#1}<{\__kivi_tab_column_currency:}}
207 \RequirePackage{tcolorbox}
208 \tcbuselibrary{breakable, skins}
210 \tcb@new@skin{kivi@LT}{base@unbroken,%
211 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
212 skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
213 underlay~first~and~middle={
214 \node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
215 \node[anchor=south] at (interior.south) {\csname box_use:c\endcsname {g_kivi_LT@foot_box}};
217 underlay~unbroken~and~last={
218 \node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
219 \node[anchor=south] at (interior.south) {\csname box_use:c\endcsname {g_kivi_LT@lastfoot_box}};
225 bottom=\box_ht:N \g_kivi_LT@foot_box+\box_dp:N \g_kivi_LT@foot_box + \aboverulesep,
226 top=\box_ht:N \g_kivi_LT@head_box+\box_dp:N \g_kivi_LT@head_box +\belowrulesep,
230 \tcb@new@skin{kivi@LT@first}{base@first,%
231 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
232 skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
235 \tcb@new@skin{kivi@LT@middle}{base@middle,%
236 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
237 skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
240 \tcb@new@skin{kivi@LT@last}{base@last,%
241 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
242 skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
245 \tcbset{kivi@LT/.style={skin=kivi@LT}}%
249 \seq_new:N \l_kivi_PricingTable_seq
250 \seq_new:N \l_kivi_columns_seq
251 \seq_new:N \g_kivi_extraDescription_seq
252 \newcommand{\FakeTable}[1]{
254 \seq_set_split:Nnn \l_kivi_PricingTable_seq {\tabularnewline} {#1}
255 \seq_remove_all:Nn \l_kivi_PricingTable_seq {}
257 \setlength{\parskip}{\c_zero_dim}
258 \let\ExtraDescription\__kivi_addExtraDescription:n
259 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
260 \seq_map_inline:Nn \l_kivi_PricingTable_seq {
261 \seq_set_split:Nnn \l_kivi_columns_seq {&} {##1}
262 \seq_gclear:N \g_kivi_extraDescription_seq
263 \exp_args:Nnx \use:n {\tabular[t]}\g_kivi_Pricing_colspec_tl
264 \seq_pop_left:NN \__l_FakeTable_columns_seq \l_tmpa_tl
265 \seq_item:Nn \l_kivi_columns_seq {\l_tmpa_tl}
266 \seq_map_inline:Nn \__l_FakeTable_columns_seq {
267 &\seq_item:Nn \l_kivi_columns_seq {####1}
270 \seq_if_empty:NTF \g_kivi_extraDescription_seq
274 \setlength{\hsize}{\dimexpr\l_kivi_tab_desc_dim+\l_kivi_tab_desc_leftskip_dim}
275 \setlength{\leftskip}{\l_kivi_tab_desc_leftskip_dim}
276 \usekomafont{extraDescription}
277 \seq_use:Nn \g_kivi_extraDescription_seq {\\}
286 \seq_new:N \__l_FakeTable_columns_seq
287 \cs_new:Nn \__kivi_setup_FakeTable: {
288 \seq_clear:N \__l_FakeTable_columns_seq
289 \int_zero:N \l_tmpa_int
290 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
291 \int_incr:N \l_tmpa_int
292 \bool_if:cT {l_kivi_col_##1_bool} {\seq_put_right:Nx \__l_FakeTable_columns_seq {\int_use:N \l_tmpa_int}}
296 \tl_new:N \g_kivi_Pricing_colspec_tl
297 \tl_gset:Nn \g_kivi_Pricing_colspec_tl {
299 \bool_if:NT \l_kivi_col_pos_bool {p{\l_kivi_tab_pos_dim}}
300 \bool_if:NT \l_kivi_col_id_bool {p{\l_kivi_tab_id_dim}}
301 p{\l_kivi_tab_desc_dim}
302 \bool_if:NT \l_kivi_col_amount_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_amount_dim}}}
303 \bool_if:NT \l_kivi_col_price_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_price_dim}<{\__kivi_tab_column_currency:}}}
304 \bool_if:NT \l_kivi_col_pricetotal_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_pricetotal_dim}<{\__kivi_tab_column_currency:}}}
308 \cs_new_protected:Nn \__kivi_tab_column_currency: {\,\currency}
309 \def\tabcurrency{\__kivi_tab_column_currency:}
310 \cs_set:Nn \__kivi_tab_column_header_currency: {}
311 \cs_set_eq:NN \__kivi_tab_column_body_currency: \__kivi_tab_column_currency:
313 \clist_map_inline:nn {head, foot, firsthead, lastfoot} {%TODO reduce
314 \box_new:c {g_kivi_LT@#1_box}
317 \newkomafont{PricingTableHeader}{\bfseries}
319 \cs_new:Nn \__kivi_setup_LT_boxes: {
320 \__kivi_calc_desc_column:
321 \hbox_gset:Nn \g_kivi_LT@head_box {
322 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
323 \exp_args:Nnx \use:n {\tabular[b]}\g_kivi_Pricing_colspec_tl
324 \__kivi_PricingTabular_header:
327 \hbox_gset:Nn \g_kivi_LT@foot_box {
329 \begin{tabular*}{\textwidth}{@{\extracolsep{\fill}}r@{}}
331 \strut\weiteraufnaechsterseite
335 \hbox_gset:Nn \g_kivi_LT@lastfoot_box {
336 \raisebox{\dimexpr\depth+\baselineskip}[0pt][0pt]{
337 \begin{tabular*}{\textwidth}{@{\extracolsep{\fill}}r@{}}
345 %Macht es sinn hier eine Variante zu machen, in der alle Spalten Belegbar sind?
346 \newenvironment{PricingTotal}{
349 \tabular[t]{@{}p{\dim_eval:n {\linewidth-\l_kivi_tab_pricetotal_dim-2\tabcolsep}}P{\l_kivi_tab_pricetotal_dim}@{}}
356 \newcommand*\ExtraDescription{
357 \PackageError{kiviletter}{The~command~\string\ExtraDescription\space~may~be~only~used~inside~the~\string\FakeTable\space~environment.}{See~documentation~for~details}
361 \cs_new:Nn \__kivi_addExtraDescription:n {\seq_gput_right:Nn \g_kivi_extraDescription_seq {#1}}
363 \newenvironment{PricingTabular}[1][]{
365 \dim_set:Nn \parskip {\c_zero_dim}
366 \tl_if_empty:nF {#1} {\keys_set:nn {kivi/PricingTable} {#1}}
367 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
368 \__kivi_calc_desc_column:
369 \exp_args:Nx \longtable \g_kivi_Pricing_colspec_tl
371 \__kivi_PricingTabular_header:
374 \rlap{\makebox[\textwidth][r]{\weiteraufnaechsterseite}}\\
383 \cs_set:Nn \__kivi_PricingTabular_header: {
385 \cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_header_currency:
386 \bool_set_false:N \l_tmpa_bool
387 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
388 \bool_if:cT {l_kivi_col_##1_bool} {
389 \bool_if:NT \l_tmpa_bool {&}
390 \bool_set_true:N \l_tmpa_bool
391 \usekomafont{PricingTableHeader}
392 \prop_item:cn {l_kivi_col_##1_prop} {header}
395 \cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_body_currency:
401 \keys_define:nn {kivi/SimpleTabular} {
402 colspec .tl_set:N =\l_kivi_SimpleTabular_colspec_tl,
403 colspec .initial:n = {rrX},
404 headline .tl_set:N = \l_kivi_SimpleTabular_headline_tl,
405 headline .initial:n = {\bfseries\position & \bfseries\menge & \bfseries\bezeichnung},
406 \keys_define:nn {kivi/Tabular} {
407 color-rows .bool_gset:N = \g__kivi_Tabular_rowcolor_bool ,
408 color-rows .initial:n = false,
409 color-rows .default:n = true,
410 rowcolor-odd .tl_gset:N = \g__kivi_Tabular_rowcolor_odd_tl,
411 rowcolor-odd .initial:n = black!10,
412 rowcolor-even .tl_gset:N = \g__kivi_Tabular_rowcolor_even_tl,
413 rowcolor-even .initial:n =,
414 rowcolor-header .tl_gset:N = \g__kivi_Tabular_rowcolor_header_tl,
415 rowcolor-header .initial:n = black!35,
416 rowcolor-total .tl_gset:N = \g__kivi_Tabular_rowcolor_PricingTotal_tl,
417 rowcolor-total .initial:n = black!35,
418 rowsep .tl_set:N =\g__kivi_Tabular_rowsep_tl,
419 hrule .meta:n = {rowsep=\midrule}
422 \newcommand*{\SetupSimpleTabular}[1]{\keys_set:nn {kivi/SimpleTabular} {#1}}
423 \newcommand*{\SetupPricingTabular}[1]{\keys_set:nn {kivi/PricingTable} {#1}}
425 \newenvironment{SimpleTabular}[1][]
427 \tl_if_in:nnTF {#1} {=} {\keys_set:nn {kivi/SimpleTabular} {#1}} {\tl_if_empty:nF {#1} {\tl_set:Nn \l_kivi_SimpleTabular_headline_tl {#1}}}
428 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
429 \dim_set:Nn \parskip {\c_zero_dim}
430 \tl_put_right:Nn \l_kivi_SimpleTabular_colspec_tl {@{}}
431 \tl_put_left:Nn \l_kivi_SimpleTabular_colspec_tl {@{}}
432 \exp_args:NnV \xltabular{\linewidth}\l_kivi_SimpleTabular_colspec_tl
434 \cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_header_currency:
435 \l_kivi_SimpleTabular_headline_tl
437 \noalign{\cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_body_currency:}
441 \rlap{\makebox[\textwidth][r]{\weiteraufnaechsterseite}}\\
447 \def\@currenvir{tabularx}
451 %PricingTabular* kann automatisch spalten ignorieren
452 % \begin{PricingTabular*}[id=false]
453 % deaktiviert damit die Spalte der Produktnummer
454 % analog ist dies für pos, amount, price, pricetotal möglich.
455 % Die Spalte der Bezeichnung ist nicht deaktivierbar
456 \newenvironment{PricingTabular*}[1][]{
457 \tl_if_empty:nF {#1} {\keys_set:nn {kivi/PricingTable} {#1}}
458 \__kivi_setup_LT_boxes:
459 \__kivi_setup_FakeTable:
460 \dim_set:Nn \parskip {\c_zero_dim}
461 \PricingTabularBox\ignorespaces
462 }{\endPricingTabularBox}
464 \newtcolorbox{PricingTabularBox}{breakable,skin=kivi@LT}
470 \NewDocumentCommand{\locationentry}{som}{
471 \Ifkomavarempty{#3}{}{
479 \hbox_set:Nn \l_tmpa_box {\usekomavar{#3}}
480 \dim_compare:nTF {\box_wd:N \l_tmpa_box>\linewidth}
481 {\newline\hspace*{\fill}\llap}
483 {\box_use:N \l_tmpa_box\strut}
490 \parbox[t]{\dimexpr\linewidth-\hangindent}{
492 \usekomavar{#3}\strut
501 \setkomavar{location}{
502 \Ifkomavarempty{transaction}{}{
504 \usekomavar{transaction}
508 \parbox{\useplength{locwidth}}{
510 \locationentry{myref}
511 \locationentry{customer}
512 \locationentry{yourref}
513 \locationentry{delivery}
514 \locationentry{quote}
515 \locationentry{orderID}
516 \locationentry{projectID}
517 \locationentry[\ansprechpartner]{fromname}
518 \locationentry{fromphone}
519 \locationentry*{fromemail}
524 \ifdim\ht\shippingAddressBox>\z@
525 \@addtoplength{refvpos}{\dimexpr\ht\shippingAddressBox+\dp\shippingAddressBox}
526 \@addtoplength{refvpos}{4\baselineskip}%sep between address boxes
532 %Fallback for older KOMA-Script-Versions
533 \cs_if_exist:NF \Ifstr {\let\Ifstr\ifstr}
534 \cs_if_exist:NF \Ifkomavarempty {\let\Ifkomavarempty\ifkomavarempty}
536 %Definitionen für die insettings.tex
538 \newcommand*{\setupIdentpath}[1]{
539 \int_set:Nn \l_kivi_tmp_int {1}
540 \bool_set_true:N \l_kivi_tmp_bool
541 \bool_while_do:Nn \l_kivi_tmp_bool {
542 \file_if_exist:nTF {firma\int_use:N \l_kivi_tmp_int/ident.tex}
544 \exp_args:Nf \str_if_in:nnTF {#1} {Firma\int_use:N \l_kivi_tmp_int}
546 \newcommand*{\identpath}{firma\int_use:N \l_kivi_tmpa_int}
547 \bool_set_false:N \l_kivi_tmp_bool
549 {\int_incr:N \l_kivi_tmp_int}
552 \bool_set_false:N \l_kivi_tmp_bool
553 \newcommand*{\identpath}{firma}
558 \newcommand*{\setupCurrencyConfig}[2]{
559 \tl_new:N \g_kivi_currency_tl
560 \exp_args:Nf \str_if_in:nnT {#2} {USD} {\tl_gset:Nn \g_kivi_currency_tl {usd}}
561 \exp_args:Nf \str_if_in:nnT {#2} {CHF} {\tl_gset:Nn \g_kivi_currency_tl {chf}}
562 \exp_args:Nf \str_if_in:nnT {#2} {EUR} {\tl_gset:Nn \g_kivi_currency_tl {euro}}
563 \tl_if_empty:NT \g_kivi_currency_tl {
564 \tl_gset:Nn \g_kivi_currency_tl {default}
565 \edef \currency {\tl_to_str:N \lxcurrency}
567 \input{#1/\g_kivi_currency_tl _account.tex}
573 \renewcommand*{\raggedsignature}{\raggedright}
575 \newkomafont{extraDescription}{}