1 \NeedsTeXFormat{LaTeX2e}
2 \ProvidesPackage{kiviletter}[2020/04/24 Letter Layouts for Kivitendo]
5 \DeclareOption{reffields}{\@kivi@infoboxfalse}
6 \DeclareOption{infobox}{\@kivi@infoboxtrue}
9 \DeclareOption*{\PassOptionsToPackage{\CurrentOption}{scrletter}}
14 \RequirePackage{expl3}
15 \RequirePackage{iftex}
16 \KOMAoptions{fontsize=12pt}
17 % Schriftart, Eingabelayout der Tastatur
19 \RequirePackage[utf8]{inputenc}% Nur notwendig, wenn Basis älter als TL2018
20 \RequirePackage[T1]{fontenc}
21 \RequirePackage{lmodern}
23 \RequirePackage{fontspec}
26 %\RequirePackage{xltabular}
27 \RequirePackage{tabularx}
28 \RequirePackage{longtable}
29 \RequirePackage{booktabs}
30 \RequirePackage{graphicx}
33 \RequirePackage{eurosym}
34 \DeclareUnicodeCharacter{20AC}{\euro}
37 \RequirePackage[fromlogo,fromalign=right,
38 firstfoot=false,%Für einheitliche Randeinstellungen
41 \LoadLetterOption{DIN}
43 \newkomavar{transaction}
44 \newkomavar[\lieferschein{}~\nr]{delivery}
45 \newkomavar[\angebot{}~\nr]{quote}
47 \newkomavar{projectID}
52 \dim_new:N \g_kivi_margin_dim
53 \dim_gset:Nn \g_kivi_margin_dim {\useplength{toaddrhpos}}
54 \geometry{a4paper,margin=\g_kivi_margin_dim,heightrounded}
56 \int_new:N \l_kivi_tmp_int
57 \bool_new:N \l_kivi_tmp_bool
58 \bool_new:N \g_kivi_TableFoot_bool
59 \dim_new:N \g_kivi_orig@textheight_dim
62 \newsavebox{\shippingAddressBox}
67 hoffset=\useplength{toaddrhpos},
68 voffset=\dimexpr\useplength{toaddrvpos}+\useplength{toaddrheight}+4\baselineskip,%sep to shippingaddressbox
69 contents={\usebox\shippingAddressBox}
70 ]{kivitendo.shippingaddress}
72 \newpairofpagestyles{kivitendo.letter}{}
74 \renewcommand*{\letterpagestyle}{kivitendo.letter}
76 \DeclareNewPageStyleByLayers{kivitendo.letter.first}{
77 kivitendo.shippingaddress,
78 plain.kivitendo.letter.head.odd,plain.kivitendo.letter.head.even,plain.kivitendo.letter.head.oneside,%
79 plain.kivitendo.letter.foot.odd,plain.kivitendo.letter.foot.even,plain.kivitendo.letter.foot.oneside,%
82 \setkomavar{backaddress}{\firma\ $\cdot$ \strasse\ $\cdot$ \ort}
84 \setkomavar{firsthead}{
86 \rlap{\usekomavar{fromlogo}}%
90 \@setplength{locwidth}{6cm}
93 \dim_new:N \l_kivi_tab_desc_leftskip_dim
97 \cs_new:Nn \__kivi_set_colwidth:nn {
98 \dim_set:cn {l_kivi_tab_#1_dim} {#2}
102 \cs_new:Nn \__kivi_initialize_columns: {
103 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
104 \bool_if_exist:cF {l_kivi_col_##1_bool}
106 \bool_new:c {l_kivi_col_##1_bool}
107 \dim_new:c {l_kivi_tab_##1_dim}
108 \keys_define:nn {kivi/PricingTable} {
110 ##1 / true .code:n = \bool_set_true:c {l_kivi_col_##1_bool},
111 ##1 / false .code:n = \bool_set_false:c {l_kivi_col_##1_bool},
112 ##1 / unknown .code:n = {
113 \bool_set_true:c {l_kivi_col_##1_bool}
114 \dim_set:cn {l_kivi_tab_##1_dim} {####1}
116 ##1 .default:n = true,
117 ##1 .initial:n = true,
118 ##1 / header .prop_put:c = {l_kivi_col_##1_prop},
119 ##1 / colspec .prop_put:c = {l_kivi_col_##1_prop},
125 \clist_new:N \g_kivi_pricingtable_col_clist
127 \keys_define:nn {kivi/PricingTable} {
129 \clist_gset:Nn \g_kivi_pricingtable_col_clist {#1}
130 \__kivi_initialize_columns:,
131 columns .initial:n = {pos, id, desc, amount, price, pricetotal},
134 % set default values for colwidth
135 \keys_set:nn {kivi/PricingTable} {
142 pos/header=\position,
143 id/header=\artikelnummer,
144 desc/header=\bezeichnung,
145 amount/header=\menge,
146 price/header=\einzelpreis,
147 pricetotal/header=\gesamtpreis,
148 price / colspec = Price,
149 pricetotal / colspec = Price ,
152 \dim_new:N \g_kivi_tabcolsep_dim
153 \dim_gset:Nn \g_kivi_tabcolsep_dim {.5\tabcolsep}
155 \cs_new:Nn \__kivi_calc_desc_column: {
156 \dim_zero:N \l_kivi_tab_desc_leftskip_dim
157 \dim_zero:N \l_kivi_tab_desc_dim
158 \bool_set_false:N \l_tmpa_bool
159 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
160 \tl_if_eq:nnTF {##1} {desc} {
161 \dim_set:Nn \l_kivi_tab_desc_dim {
162 \textwidth-\l_kivi_tab_desc_leftskip_dim
164 \bool_set_true:N \l_tmpa_bool
167 \bool_if:NTF \l_tmpa_bool {
168 \bool_if:cT {l_kivi_col_##1_bool} {
169 \dim_sub:Nn \l_kivi_tab_desc_dim {
170 \dim_use:c {l_kivi_tab_##1_dim}+2\g_kivi_tabcolsep_dim
174 \bool_if:cT {l_kivi_col_##1_bool} {
175 \dim_add:Nn \l_kivi_tab_desc_leftskip_dim {
176 \dim_use:c {l_kivi_tab_##1_dim}+2\g_kivi_tabcolsep_dim
184 \newcolumntype{P}[1]{>{\raggedleft\arraybackslash}p{#1}<{\__kivi_tab_column_currency:}}
186 \RequirePackage{tcolorbox}
187 \tcbuselibrary{breakable, skins}
189 \tcb@new@skin{kivi@LT}{base@unbroken,%
190 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
191 skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
192 underlay~first~and~middle={
193 \node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
194 \node[anchor=south] at (interior.south) {\csname box_use:c\endcsname {g_kivi_LT@foot_box}};
196 underlay~unbroken~and~last={
197 \node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
198 \node[anchor=south] at (interior.south) {\csname box_use:c\endcsname {g_kivi_LT@lastfoot_box}};
204 bottom=\box_ht:N \g_kivi_LT@foot_box+\box_dp:N \g_kivi_LT@foot_box + \aboverulesep,
205 top=\box_ht:N \g_kivi_LT@head_box+\box_dp:N \g_kivi_LT@head_box +\belowrulesep,
209 \tcb@new@skin{kivi@LT@first}{base@first,%
210 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
211 skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
214 \tcb@new@skin{kivi@LT@middle}{base@middle,%
215 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
216 skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
219 \tcb@new@skin{kivi@LT@last}{base@last,%
220 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
221 skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
224 \tcbset{kivi@LT/.style={skin=kivi@LT}}%
228 \seq_new:N \l_kivi_PricingTable_seq
229 \seq_new:N \l_kivi_columns_seq
230 \seq_new:N \g_kivi_extraDescription_seq
231 \newcommand{\FakeTable}[1]{
233 \seq_set_split:Nnn \l_kivi_PricingTable_seq {\tabularnewline} {#1}
234 \seq_remove_all:Nn \l_kivi_PricingTable_seq {}
236 \setlength{\parskip}{\c_zero_dim}
237 \let\ExtraDescription\__kivi_addExtraDescription:n
238 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
239 \seq_map_inline:Nn \l_kivi_PricingTable_seq {
240 \seq_set_split:Nnn \l_kivi_columns_seq {&} {##1}
241 \seq_gclear:N \g_kivi_extraDescription_seq
242 \exp_args:Nnx \use:n {\tabular[t]}\g_kivi_Pricing_colspec_tl
243 \seq_pop_left:NN \__l_FakeTable_columns_seq \l_tmpa_tl
244 \seq_item:Nn \l_kivi_columns_seq {\l_tmpa_tl}
245 \seq_map_inline:Nn \__l_FakeTable_columns_seq {
246 &\seq_item:Nn \l_kivi_columns_seq {####1}
249 \seq_if_empty:NTF \g_kivi_extraDescription_seq
253 \setlength{\hsize}{\dimexpr\l_kivi_tab_desc_dim+\l_kivi_tab_desc_leftskip_dim}
254 \setlength{\leftskip}{\l_kivi_tab_desc_leftskip_dim}
255 \usekomafont{extraDescription}
256 \seq_use:Nn \g_kivi_extraDescription_seq {\\}
265 \seq_new:N \__l_FakeTable_columns_seq
266 \cs_new:Nn \__kivi_setup_FakeTable: {
267 \seq_clear:N \__l_FakeTable_columns_seq
268 \int_zero:N \l_tmpa_int
269 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
270 \int_incr:N \l_tmpa_int
271 \bool_if:cT {l_kivi_col_##1_bool} {\seq_put_right:Nx \__l_FakeTable_columns_seq {\int_use:N \l_tmpa_int}}
275 \tl_new:N \g_kivi_Pricing_colspec_tl
276 \tl_gset:Nn \g_kivi_Pricing_colspec_tl {
278 \bool_if:NT \l_kivi_col_pos_bool {p{\l_kivi_tab_pos_dim}}
279 \bool_if:NT \l_kivi_col_id_bool {p{\l_kivi_tab_id_dim}}
280 p{\l_kivi_tab_desc_dim}
281 \bool_if:NT \l_kivi_col_amount_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_amount_dim}}}
282 \bool_if:NT \l_kivi_col_price_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_price_dim}<{\__kivi_tab_column_currency:}}}
283 \bool_if:NT \l_kivi_col_pricetotal_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_pricetotal_dim}<{\__kivi_tab_column_currency:}}}
287 \cs_new:Nn \__kivi_tab_column_currency: {\,\currency}
288 \def\tabcurrency{\__kivi_tab_column_currency:}
289 \cs_set:Nn \__kivi_tab_column_header_currency: {}
290 \cs_set_eq:NN \__kivi_tab_column_body_currency: \__kivi_tab_column_currency:
292 \clist_map_inline:nn {head, foot, firsthead, lastfoot} {%TODO reduce
293 \box_new:c {g_kivi_LT@#1_box}
296 \newkomafont{PricingTableHeader}{\bfseries}
298 \cs_new:Nn \__kivi_setup_LT_boxes: {
299 \__kivi_calc_desc_column:
300 \hbox_gset:Nn \g_kivi_LT@head_box {
301 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
302 \exp_args:Nnx \use:n {\tabular[b]}\g_kivi_Pricing_colspec_tl
303 \__kivi_PricingTabular_header:
306 \hbox_gset:Nn \g_kivi_LT@foot_box {
308 \begin{tabular*}{\textwidth}{@{\extracolsep{\fill}}r@{}}
310 \strut\weiteraufnaechsterseite
314 \hbox_gset:Nn \g_kivi_LT@lastfoot_box {
315 \raisebox{\dimexpr\depth+\baselineskip}[0pt][0pt]{
316 \begin{tabular*}{\textwidth}{@{\extracolsep{\fill}}r@{}}
324 %Macht es sinn hier eine Variante zu machen, in der alle Spalten Belegbar sind?
325 \newenvironment{PricingTotal}{
328 \tabular[t]{@{}p{\dim_eval:n {\linewidth-\l_kivi_tab_pricetotal_dim-2\tabcolsep}}P{\l_kivi_tab_pricetotal_dim}@{}}
335 \newcommand*\ExtraDescription{
336 \PackageError{kiviletter}{The~command~\string\ExtraDescription\space~may~be~only~used~inside~the~\string\FakeTable\space~environment.}{See~documentation~for~details}
340 \cs_new:Nn \__kivi_addExtraDescription:n {\seq_gput_right:Nn \g_kivi_extraDescription_seq {#1}}
342 \newenvironment{PricingTabular}[1][]{
344 \dim_set:Nn \parskip {\c_zero_dim}
345 \tl_if_empty:nF {#1} {\keys_set:nn {kivi/PricingTable} {#1}}
346 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
347 \__kivi_calc_desc_column:
348 \exp_args:Nx \longtable \g_kivi_Pricing_colspec_tl
350 \__kivi_PricingTabular_header:
353 \rlap{\makebox[\textwidth][r]{\weiteraufnaechsterseite}}\\
362 \cs_set:Nn \__kivi_PricingTabular_header: {
364 \cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_header_currency:
365 \bool_set_false:N \l_tmpa_bool
366 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
367 \bool_if:cT {l_kivi_col_##1_bool} {
368 \bool_if:NT \l_tmpa_bool {&}
369 \bool_set_true:N \l_tmpa_bool
370 \usekomafont{PricingTableHeader}
371 \prop_item:cn {l_kivi_col_##1_prop} {header}
374 \cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_body_currency:
379 \RequirePackage{xltabular}
381 \keys_define:nn {kivi/SimpleTabular} {
382 colspec .tl_set:N =\l_kivi_SimpleTabular_colspec_tl,
383 colspec .initial:n = {rrX},
384 headline .tl_set:N = \l_kivi_SimpleTabular_headline_tl,
385 headline .initial:n = {\bfseries\position & \bfseries\menge & \bfseries\bezeichnung},
388 \newcommand*{\SetupSimpleTabular}[1]{\keys_set:nn {kivi/SimpleTabular} {#1}}
389 \newcommand*{\SetupPricingTabular}[1]{\keys_set:nn {kivi/PricingTable} {#1}}
391 \newenvironment{SimpleTabular}[1][]
393 \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}}}
394 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
395 \dim_set:Nn \parskip {\c_zero_dim}
396 \tl_put_right:Nn \l_kivi_SimpleTabular_colspec_tl {@{}}
397 \tl_put_left:Nn \l_kivi_SimpleTabular_colspec_tl {@{}}
398 \exp_args:NnV \xltabular{\linewidth}\l_kivi_SimpleTabular_colspec_tl
400 \cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_header_currency:
401 \l_kivi_SimpleTabular_headline_tl
403 \noalign{\cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_body_currency:}
407 \rlap{\makebox[\textwidth][r]{\weiteraufnaechsterseite}}\\
413 \def\@currenvir{tabularx}
417 %PricingTabular* kann automatisch spalten ignorieren
418 % \begin{PricingTabular*}[id=false]
419 % deaktiviert damit die Spalte der Produktnummer
420 % analog ist dies für pos, amount, price, pricetotal möglich.
421 % Die Spalte der Bezeichnung ist nicht deaktivierbar
422 \newenvironment{PricingTabular*}[1][]{
423 \tl_if_empty:nF {#1} {\keys_set:nn {kivi/PricingTable} {#1}}
424 \__kivi_setup_LT_boxes:
425 \__kivi_setup_FakeTable:
426 \dim_set:Nn \parskip {\c_zero_dim}
427 \PricingTabularBox\ignorespaces
428 }{\endPricingTabularBox}
430 \newtcolorbox{PricingTabularBox}{breakable,skin=kivi@LT}
435 \setkomavar{location}{
436 \Ifkomavarempty{transaction}{}{
438 \usekomavar{transaction}
442 \begin{tabularx}{\useplength{locwidth}}{@{}l<{:}>{\raggedleft\arraybackslash}X@{}}
443 \usekomavar*{date}&\usekomavar{date}\\
444 \Ifkomavarempty{myref}{}{
445 \usekomavar*{myref}&\usekomavar{myref}\\
447 \kundennummer&\usekomavar{customer}\\
448 \Ifkomavarempty{yourref}{}{
449 \usekomavar*{yourref}&\usekomavar{yourref}\\
451 \Ifkomavarempty{delivery}{}{
452 \usekomavar*{delivery}&\usekomavar{delivery}\\
454 \Ifkomavarempty{quote}{}{
455 \usekomavar*{quote}&\usekomavar{quote}\\
457 \Ifkomavarempty{orderID}{}{\auftragsnummer&\usekomavar{orderID}\\}
458 \Ifkomavarempty{projectID}{}{\projektnummer&\usekomavar{projectID}\\}
459 \ansprechpartner&\usekomavar{fromname}
460 \Ifkomavarempty{fromphone}{}{\\\textTelefon&\usekomavar{fromphone}}
461 \Ifkomavarempty{fromemail}{}{\\\textEmail&\usekomavar{fromemail}}
466 \ifdim\ht\shippingAddressBox>\z@
467 \@addtoplength{refvpos}{\dimexpr\ht\shippingAddressBox+\dp\shippingAddressBox}
468 \@addtoplength{refvpos}{4\baselineskip}%sep between address boxes
474 %Fallback for older KOMA-Script-Versions
475 \cs_if_exist:NF \Ifstr {\let\Ifstr\ifstr}
476 \cs_if_exist:NF \Ifkomavarempty {\let\Ifkomavarempty\ifkomavarempty}
478 %Definitionen für die insettings.tex
480 \newcommand*{\setupIdentpath}[1]{
481 \int_set:Nn \l_kivi_tmp_int {1}
482 \bool_set_true:N \l_kivi_tmp_bool
483 \bool_while_do:Nn \l_kivi_tmp_bool {
484 \file_if_exist:nTF {firma\int_use:N \l_kivi_tmp_int/ident.tex}
486 \exp_args:Nf \str_if_in:nnTF {#1} {Firma\int_use:N \l_kivi_tmp_int}
488 \newcommand*{\identpath}{firma\int_use:N \l_kivi_tmpa_int}
489 \bool_set_false:N \l_kivi_tmp_bool
491 {\int_incr:N \l_kivi_tmp_int}
494 \bool_set_false:N \l_kivi_tmp_bool
495 \newcommand*{\identpath}{firma}
500 \newcommand*{\setupCurrencyConfig}[2]{
501 \tl_new:N \g_kivi_currency_tl
502 \exp_args:Nf \str_if_in:nnT {#2} {USD} {\tl_gset:Nn \g_kivi_currency_tl {usd}}
503 \exp_args:Nf \str_if_in:nnT {#2} {CHF} {\tl_gset:Nn \g_kivi_currency_tl {chf}}
504 \exp_args:Nf \str_if_in:nnT {#2} {EUR} {\tl_gset:Nn \g_kivi_currency_tl {euro}}
505 \tl_if_empty:NT \g_kivi_currency_tl {
506 \tl_gset:Nn \g_kivi_currency_tl {default}
507 \edef \currency {\tl_to_str:N \lxcurrency}
509 \input{#1/\g_kivi_currency_tl _account.tex}
515 \renewcommand*{\raggedsignature}{\raggedright}
517 \newkomafont{extraDescription}{}