1 \NeedsTeXFormat{LaTeX2e}
2 \ProvidesPackage{kiviletter}[2020/04/24 Letter Layouts for Kivitendo]
5 \DeclareOption{reffields}{\@kivi@infoboxfalse}
6 \DeclareOption{infobox}{\@kivi@infoboxtrue}
12 \RequirePackage{expl3}
13 \RequirePackage{iftex}
14 \KOMAoptions{fontsize=12pt}
15 % Schriftart, Eingabelayout der Tastatur
17 \RequirePackage[utf8]{inputenc}% Nur notwendig, wenn Basis älter als TL2018
18 \RequirePackage[T1]{fontenc}
19 \RequirePackage{lmodern}
21 \RequirePackage{fontspec}
24 %\RequirePackage{xltabular}
25 \RequirePackage{tabularx}
26 \RequirePackage{longtable}
27 \RequirePackage{booktabs}
28 \RequirePackage{graphicx}
31 \RequirePackage{eurosym}
32 \DeclareUnicodeCharacter{20AC}{\euro}
35 \RequirePackage[fromlogo,fromalign=right,
36 firstfoot=false,%Für einheitliche Randeinstellungen
39 \LoadLetterOption{DIN}
41 \newkomavar{transaction}
42 \newkomavar[\lieferschein{}~\nr]{delivery}
43 \newkomavar[\angebot{}~\nr]{quote}
45 \newkomavar{projectID}
50 \dim_new:N \g_kivi_margin_dim
51 \dim_gset:Nn \g_kivi_margin_dim {\useplength{toaddrhpos}}
52 \geometry{a4paper,margin=\g_kivi_margin_dim,heightrounded}
53 \savegeometry{kivi.letter@default}
55 \int_new:N \l_kivi_tmp_int
56 \bool_new:N \l_kivi_tmp_bool
57 \bool_new:N \g_kivi_TableFoot_bool
58 \dim_new:N \g_kivi_orig@textheight_dim
61 \newsavebox{\shippingAddressBox}
66 hoffset=\useplength{toaddrhpos},
67 voffset=\dimexpr\useplength{toaddrvpos}+\useplength{toaddrheight}+4\baselineskip,%sep to shippingaddressbox
68 contents={\usebox\shippingAddressBox}
69 ]{kivitendo.shippingaddress}
73 \AtBeginLetter{\dim_gset:Nn \g_kivi_orig@textheight_dim {\textheight}}
76 \newpairofpagestyles{kivitendo.letter}{}
77 \renewcommand*{\letterpagestyle}{kivitendo.letter}
79 \DeclareNewPageStyleByLayers{kivitendo.letter.PricingTable}{
82 kivitendo.letter.head.odd,kivitendo.letter.head.even,kivitendo.letter.head.oneside,%
83 kivitendo.letter.foot.odd,kivitendo.letter.foot.even,kivitendo.letter.foot.oneside,%
85 \DeclareNewPageStyleByLayers{kivitendo.letter.first}{
86 kivitendo.shippingaddress,
88 kivitendo.letter.head.odd,kivitendo.letter.head.even,kivitendo.letter.head.oneside,%
89 kivitendo.letter.foot.odd,kivitendo.letter.foot.even,kivitendo.letter.foot.oneside,%
92 \setkomavar{backaddress}{\firma\ $\cdot$ \strasse\ $\cdot$ \ort}
94 \setkomavar{firsthead}{
96 \rlap{\usekomavar{fromlogo}}%
100 \@setplength{locwidth}{6cm}
103 \dim_new:N \l_kivi_tab_desc_leftskip_dim
107 \cs_new:Nn \__kivi_set_colwidth:nn {
108 \dim_set:cn {l_kivi_tab_#1_dim} {#2}
112 \cs_new:Nn \__kivi_initialize_columns: {
113 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
114 \bool_if_exist:cF {l_kivi_col_##1_bool}
116 \bool_new:c {l_kivi_col_##1_bool}
117 \dim_new:c {l_kivi_tab_##1_dim}
118 \keys_define:nn {kivi/PricingTable} {
120 ##1 / true .code:n = \bool_set_true:c {l_kivi_col_##1_bool},
121 ##1 / false .code:n = \bool_set_false:c {l_kivi_col_##1_bool},
122 ##1 / unknown .code:n = {
123 \bool_set_true:c {l_kivi_col_##1_bool}
124 \dim_set:cn {l_kivi_tab_##1_dim} {####1}
126 ##1 .default:n = true,
127 ##1 .initial:n = true,
128 ##1 / header .prop_put:c = {l_kivi_col_##1_prop},
129 ##1 / colspec .prop_put:c = {l_kivi_col_##1_prop},
135 \clist_new:N \g_kivi_pricingtable_col_clist
137 \keys_define:nn {kivi/PricingTable} {
139 \clist_gset:Nn \g_kivi_pricingtable_col_clist {#1}
140 \__kivi_initialize_columns:,
141 columns .initial:n = {pos, id, desc, amount, price, pricetotal},
144 % set default values for colwidth
145 \keys_set:nn {kivi/PricingTable} {
152 pos/header=\position,
153 id/header=\artikelnummer,
154 desc/header=\bezeichnung,
155 amount/header=\menge,
156 price/header=\einzelpreis,
157 pricetotal/header=\gesamtpreis,
158 price / colspec = Price,
159 pricetotal / colspec = Price ,
162 \dim_new:N \g_kivi_tabcolsep_dim
163 \dim_gset:Nn \g_kivi_tabcolsep_dim {.5\tabcolsep}
165 \cs_new:Nn \__kivi_calc_desc_column: {
166 \dim_zero:N \l_kivi_tab_desc_leftskip_dim
167 \dim_zero:N \l_kivi_tab_desc_dim
168 \bool_set_false:N \l_tmpa_bool
169 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
170 \tl_if_eq:nnTF {##1} {desc} {
171 \dim_set:Nn \l_kivi_tab_desc_dim {
172 \textwidth-\l_kivi_tab_desc_leftskip_dim
174 \bool_set_true:N \l_tmpa_bool
177 \bool_if:NTF \l_tmpa_bool {
178 \bool_if:cT {l_kivi_col_##1_bool} {
179 \dim_sub:Nn \l_kivi_tab_desc_dim {
180 \dim_use:c {l_kivi_tab_##1_dim}+2\g_kivi_tabcolsep_dim
184 \bool_if:cT {l_kivi_col_##1_bool} {
185 \dim_add:Nn \l_kivi_tab_desc_leftskip_dim {
186 \dim_use:c {l_kivi_tab_##1_dim}+2\g_kivi_tabcolsep_dim
194 \newcolumntype{P}[1]{>{\raggedleft\arraybackslash}p{#1}<{\__kivi_tab_column_currency:}}
196 \RequirePackage{tcolorbox}
197 \tcbuselibrary{breakable, skins}
199 \tcb@new@skin{kivi@LT}{base@unbroken,%
200 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
201 skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
202 underlay~first~and~middle={
203 \node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
204 \node[anchor=south] at (interior.south) {\csname box_use:c\endcsname {g_kivi_LT@foot_box}};
206 underlay~unbroken~and~last={
207 \node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
208 \node[anchor=south] at (interior.south) {\csname box_use:c\endcsname {g_kivi_LT@lastfoot_box}};
214 bottom=\box_ht:N \g_kivi_LT@foot_box+\box_dp:N \g_kivi_LT@foot_box + \aboverulesep,
215 top=\box_ht:N \g_kivi_LT@head_box+\box_dp:N \g_kivi_LT@head_box +\belowrulesep,
219 \tcb@new@skin{kivi@LT@first}{base@first,%
220 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
221 skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
224 \tcb@new@skin{kivi@LT@middle}{base@middle,%
225 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
226 skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
229 \tcb@new@skin{kivi@LT@last}{base@last,%
230 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
231 skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
234 \tcbset{kivi@LT/.style={skin=kivi@LT}}%
238 \seq_new:N \l_kivi_PricingTable_seq
239 \seq_new:N \l_kivi_columns_seq
240 \seq_new:N \g_kivi_extraDescription_seq
241 \newcommand{\FakeTable}[1]{
243 \seq_set_split:Nnn \l_kivi_PricingTable_seq {\tabularnewline} {#1}
244 \seq_remove_all:Nn \l_kivi_PricingTable_seq {}
246 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
247 \seq_map_inline:Nn \l_kivi_PricingTable_seq {
248 \seq_set_split:Nnn \l_kivi_columns_seq {&} {##1}
249 \seq_gclear:N \g_kivi_extraDescription_seq
250 \exp_args:Nnx \use:n {\tabular[t]}\g_kivi_Pricing_colspec_tl
251 \seq_pop_left:NN \__l_FakeTable_columns_seq \l_tmpa_tl
252 \seq_item:Nn \l_kivi_columns_seq {\l_tmpa_tl}
253 \seq_map_inline:Nn \__l_FakeTable_columns_seq {
254 &\seq_item:Nn \l_kivi_columns_seq {####1}
257 \seq_if_empty:NTF \g_kivi_extraDescription_seq
261 \setlength{\hsize}{\dimexpr\l_kivi_tab_desc_dim+\l_kivi_tab_desc_leftskip_dim}
262 \setlength{\leftskip}{\l_kivi_tab_desc_leftskip_dim}
263 \seq_use:Nn \g_kivi_extraDescription_seq {\\}
272 \seq_new:N \__l_FakeTable_columns_seq
273 \cs_new:Nn \__kivi_setup_FakeTable: {
274 \seq_clear:N \__l_FakeTable_columns_seq
275 \int_zero:N \l_tmpa_int
276 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
277 \int_incr:N \l_tmpa_int
278 \bool_if:cT {l_kivi_col_##1_bool} {\seq_put_right:Nx \__l_FakeTable_columns_seq {\int_use:N \l_tmpa_int}}
282 \tl_new:N \g_kivi_Pricing_colspec_tl
283 \tl_gset:Nn \g_kivi_Pricing_colspec_tl {
285 \bool_if:NT \l_kivi_col_pos_bool {p{\l_kivi_tab_pos_dim}}
286 \bool_if:NT \l_kivi_col_id_bool {p{\l_kivi_tab_id_dim}}
287 p{\l_kivi_tab_desc_dim}
288 \bool_if:NT \l_kivi_col_amount_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_amount_dim}}}
289 \bool_if:NT \l_kivi_col_price_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_price_dim}<{\__kivi_tab_column_currency:}}}
290 \bool_if:NT \l_kivi_col_pricetotal_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_pricetotal_dim}<{\__kivi_tab_column_currency:}}}
294 \cs_new:Nn \__kivi_tab_column_currency: {\,\currency}
295 \cs_set:Nn \__kivi_tab_column_header_currency: {}
296 \cs_set_eq:NN \__kivi_tab_column_body_currency: \__kivi_tab_column_currency:
298 \clist_map_inline:nn {head, foot, firsthead, lastfoot} {%TODO reduce
299 \box_new:c {g_kivi_LT@#1_box}
302 \newkomafont{PricingTableHeader}{\bfseries}
304 \cs_new:Nn \__kivi_setup_LT_boxes: {
305 \__kivi_calc_desc_column:
306 \hbox_gset:Nn \g_kivi_LT@head_box {
307 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
308 \exp_args:Nnx \use:n {\tabular[b]}\g_kivi_Pricing_colspec_tl
309 \__kivi_PricingTabular_header:
312 \hbox_gset:Nn \g_kivi_LT@foot_box {
314 \begin{tabular*}{\textwidth}{@{\extracolsep{\fill}}r@{}}
316 \strut\weiteraufnaechsterseite
320 \hbox_gset:Nn \g_kivi_LT@lastfoot_box {
321 \raisebox{\dimexpr\depth+\baselineskip}[0pt][0pt]{
322 \begin{tabular*}{\textwidth}{@{\extracolsep{\fill}}r@{}}
330 %Macht es sinn hier eine Variante zu machen, in der alle Spalten Belegbar sind?
331 \newenvironment{PricingTotal}{
333 \vspace{-\ht\strutbox}
335 \tabular[t]{@{}p{\dim_eval:n {\linewidth-\l_kivi_tab_pricetotal_dim-2\tabcolsep}}P{\l_kivi_tab_pricetotal_dim}@{}}
341 \newcommand{\ExtraDescription}[1]{\seq_gput_right:Nn \g_kivi_extraDescription_seq {#1}}
343 \newenvironment{PricingTabular}[1][]{
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}
382 \newenvironment{SimpleTabular}[1][\bfseries\position & \bfseries\menge & \bfseries\bezeichnung]
384 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
385 \xltabular{\linewidth}{@{}rrX@{}}
390 \rlap{\makebox[\textwidth][r]{\weiteraufnaechsterseite}}\\
396 \def\@currenvir{tabularx}
400 %PricingTabular* kann automatisch spalten ignorieren
401 % \begin{PricingTabular*}[id=false]
402 % deaktiviert damit die Spalte der Produktnummer
403 % analog ist dies für pos, amount, price, pricetotal möglich.
404 % Die Spalte der Bezeichnung ist nicht deaktivierbar
405 \newenvironment{PricingTabular*}[1][]{
406 \tl_if_empty:nF {#1} {\keys_set:nn {kivi/PricingTable} {#1}}
407 \__kivi_setup_LT_boxes:
408 \__kivi_setup_FakeTable:
409 \PricingTabularBox\ignorespaces
410 }{\endPricingTabularBox}
412 \newtcolorbox{PricingTabularBox}{breakable,skin=kivi@LT}
417 \setkomavar{location}{
418 \ifkomavarempty{transaction}{}{
420 \usekomavar{transaction}
424 \begin{tabularx}{\useplength{locwidth}}{@{}l<{:}>{\raggedleft\arraybackslash}X@{}}
425 \usekomavar*{date}&\usekomavar{date}\\
426 \ifkomavarempty{myref}{}{
427 \usekomavar*{myref}&\usekomavar{myref}\\
429 \kundennummer&\usekomavar{customer}\\
430 \ifkomavarempty{yourref}{}{
431 \usekomavar*{yourref}&\usekomavar{yourref}\\
433 \ifkomavarempty{delivery}{}{
434 \usekomavar*{delivery}&\usekomavar{delivery}\\
436 \ifkomavarempty{quote}{}{
437 \usekomavar*{quote}&\usekomavar{quote}\\
439 \ifkomavarempty{orderID}{}{\auftragsnummer&\usekomavar{orderID}\\}
440 \ifkomavarempty{projectID}{}{\projektnummer&\usekomavar{projectID}\\}
441 \ansprechpartner&\usekomavar{fromname}
442 \ifkomavarempty{fromphone}{}{\\\textTelefon&\usekomavar{fromphone}}
443 \ifkomavarempty{fromemail}{}{\\\textEmail&\usekomavar{fromemail}}
448 \ifdim\ht\shippingAddressBox>\z@
449 \@addtoplength{refvpos}{\dimexpr\ht\shippingAddressBox+\dp\shippingAddressBox}
450 \@addtoplength{refvpos}{4\baselineskip}%sep between address boxes
458 \renewcommand*{\raggedsignature}{\raggedright}