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 \PassOptionsToPackage{table}{xcolor}
30 \RequirePackage{xcolor}
31 \RequirePackage{graphicx}
34 \RequirePackage{eurosym}
35 \DeclareUnicodeCharacter{20AC}{\euro}
38 \RequirePackage[fromlogo,fromalign=right,
39 firstfoot=false,%Für einheitliche Randeinstellungen
42 \LoadLetterOption{DIN}
44 \newkomavar{transaction}
45 \newkomavar[\lieferschein{}~\nr]{delivery}
46 \newkomavar[\angebot{}~\nr]{quote}
48 \newkomavar{projectID}
53 \dim_new:N \g_kivi_margin_dim
54 \dim_gset:Nn \g_kivi_margin_dim {\useplength{toaddrhpos}}
55 \geometry{a4paper,margin=\g_kivi_margin_dim,heightrounded}
56 \savegeometry{kivi.letter@default}
58 \int_new:N \l_kivi_tmp_int
59 \bool_new:N \l_kivi_tmp_bool
60 \bool_new:N \g_kivi_TableFoot_bool
61 \dim_new:N \g_kivi_orig@textheight_dim
64 \newsavebox{\shippingAddressBox}
69 hoffset=\useplength{toaddrhpos},
70 voffset=\dimexpr\useplength{toaddrvpos}+\useplength{toaddrheight}+4\baselineskip,%sep to shippingaddressbox
71 contents={\usebox\shippingAddressBox}
72 ]{kivitendo.shippingaddress}
76 \AtBeginLetter{\dim_gset:Nn \g_kivi_orig@textheight_dim {\textheight}}
79 \newpairofpagestyles{kivitendo.letter}{}
80 \renewcommand*{\letterpagestyle}{kivitendo.letter}
82 \DeclareNewPageStyleByLayers{kivitendo.letter.PricingTable}{
85 kivitendo.letter.head.odd,kivitendo.letter.head.even,kivitendo.letter.head.oneside,%
86 kivitendo.letter.foot.odd,kivitendo.letter.foot.even,kivitendo.letter.foot.oneside,%
88 \DeclareNewPageStyleByLayers{kivitendo.letter.first}{
89 kivitendo.shippingaddress,
91 kivitendo.letter.head.odd,kivitendo.letter.head.even,kivitendo.letter.head.oneside,%
92 kivitendo.letter.foot.odd,kivitendo.letter.foot.even,kivitendo.letter.foot.oneside,%
95 \setkomavar{backaddress}{\firma\ $\cdot$ \strasse\ $\cdot$ \ort}
97 \setkomavar{firsthead}{
99 \rlap{\usekomavar{fromlogo}}%
103 \@setplength{locwidth}{6cm}
106 \dim_new:N \l_kivi_tab_desc_leftskip_dim
110 \cs_new:Nn \__kivi_set_colwidth:nn {
111 \dim_set:cn {l_kivi_tab_#1_dim} {#2}
115 \cs_new:Nn \__kivi_initialize_columns: {
116 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
117 \bool_if_exist:cF {l_kivi_col_##1_bool}
119 \bool_new:c {l_kivi_col_##1_bool}
120 \dim_new:c {l_kivi_tab_##1_dim}
121 \keys_define:nn {kivi/PricingTable} {
123 ##1 / true .code:n = \bool_set_true:c {l_kivi_col_##1_bool},
124 ##1 / false .code:n = \bool_set_false:c {l_kivi_col_##1_bool},
125 ##1 / unknown .code:n = {
126 \bool_set_true:c {l_kivi_col_##1_bool}
127 \dim_set:cn {l_kivi_tab_##1_dim} {####1}
129 ##1 .default:n = true,
130 ##1 .initial:n = true,
131 ##1 / header .prop_put:c = {l_kivi_col_##1_prop},
132 ##1 / colspec .prop_put:c = {l_kivi_col_##1_prop},
138 \clist_new:N \g_kivi_pricingtable_col_clist
140 \keys_define:nn {kivi/PricingTable} {
142 \clist_gset:Nn \g_kivi_pricingtable_col_clist {#1}
143 \__kivi_initialize_columns:,
144 columns .initial:n = {pos, id, desc, amount, price, pricetotal},
147 % set default values for colwidth
148 \keys_set:nn {kivi/PricingTable} {
155 pos/header=\position,
156 id/header=\artikelnummer,
157 desc/header=\bezeichnung,
158 amount/header=\menge,
159 price/header=\einzelpreis,
160 pricetotal/header=\gesamtpreis,
161 price / colspec = Price,
162 pricetotal / colspec = Price ,
165 \dim_new:N \g_kivi_tabcolsep_dim
166 \dim_gset:Nn \g_kivi_tabcolsep_dim {.5\tabcolsep}
168 \cs_new:Nn \__kivi_calc_desc_column: {
169 \dim_zero:N \l_kivi_tab_desc_leftskip_dim
170 \dim_zero:N \l_kivi_tab_desc_dim
171 \bool_set_false:N \l_tmpa_bool
172 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
173 \tl_if_eq:nnTF {##1} {desc} {
174 \dim_set:Nn \l_kivi_tab_desc_dim {
175 \textwidth-\l_kivi_tab_desc_leftskip_dim
177 \bool_set_true:N \l_tmpa_bool
180 \bool_if:NTF \l_tmpa_bool {
181 \bool_if:cT {l_kivi_col_##1_bool} {
182 \dim_sub:Nn \l_kivi_tab_desc_dim {
183 \dim_use:c {l_kivi_tab_##1_dim}+2\g_kivi_tabcolsep_dim
187 \bool_if:cT {l_kivi_col_##1_bool} {
188 \dim_add:Nn \l_kivi_tab_desc_leftskip_dim {
189 \dim_use:c {l_kivi_tab_##1_dim}+2\g_kivi_tabcolsep_dim
197 \newcolumntype{P}[1]{>{\raggedleft\arraybackslash}p{#1}<{\__kivi_tab_column_currency:}}
199 \RequirePackage{tcolorbox}
200 \tcbuselibrary{breakable, skins}
202 \tcb@new@skin{kivi@LT}{base@unbroken,%
203 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
204 skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
205 underlay~first~and~middle={
206 \node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
207 \node[anchor=south] at (interior.south) {\csname box_use:c\endcsname {g_kivi_LT@foot_box}};
209 underlay~unbroken~and~last={
210 \node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
216 bottom=\box_ht:N \g_kivi_LT@foot_box+\box_dp:N \g_kivi_LT@foot_box + \aboverulesep,
217 top=\box_ht:N \g_kivi_LT@head_box+\box_dp:N \g_kivi_LT@head_box +\belowrulesep,
221 \tcb@new@skin{kivi@LT@first}{base@first,%
222 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
223 skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
226 \tcb@new@skin{kivi@LT@middle}{base@middle,%
227 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
228 skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
231 \tcb@new@skin{kivi@LT@last}{base@last,%
232 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
233 skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
236 \tcbset{kivi@LT/.style={skin=kivi@LT}}%
240 \seq_new:N \l_kivi_PricingTable_seq
241 \seq_new:N \l_kivi_columns_seq
242 \seq_new:N \g_kivi_extraDescription_seq
243 \newcommand{\FakeTable}[1]{
245 \seq_set_split:Nnn \l_kivi_PricingTable_seq {\tabularnewline} {#1}
246 \seq_remove_all:Nn \l_kivi_PricingTable_seq {}
248 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
249 \seq_map_inline:Nn \l_kivi_PricingTable_seq {
250 \seq_set_split:Nnn \l_kivi_columns_seq {&} {##1}
251 \seq_gclear:N \g_kivi_extraDescription_seq
252 \exp_args:Nnx \use:n {\tabular[t]}\g_kivi_Pricing_colspec_tl
253 \seq_pop_left:NN \__l_FakeTable_columns_seq \l_tmpa_tl
254 \seq_item:Nn \l_kivi_columns_seq {\l_tmpa_tl}
255 \seq_map_inline:Nn \__l_FakeTable_columns_seq {
256 &\seq_item:Nn \l_kivi_columns_seq {####1}
259 \seq_if_empty:NTF \g_kivi_extraDescription_seq
263 \setlength{\hsize}{\dimexpr\l_kivi_tab_desc_dim+\l_kivi_tab_desc_leftskip_dim}
264 \setlength{\leftskip}{\l_kivi_tab_desc_leftskip_dim}
265 \seq_use:Nn \g_kivi_extraDescription_seq {\\}
274 \seq_new:N \__l_FakeTable_columns_seq
275 \cs_new:Nn \__kivi_setup_FakeTable: {
276 \seq_clear:N \__l_FakeTable_columns_seq
277 \int_zero:N \l_tmpa_int
278 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
279 \int_incr:N \l_tmpa_int
280 \bool_if:cT {l_kivi_col_##1_bool} {\seq_put_right:Nx \__l_FakeTable_columns_seq {\int_use:N \l_tmpa_int}}
284 \tl_new:N \g_kivi_Pricing_colspec_tl
285 \tl_gset:Nn \g_kivi_Pricing_colspec_tl {
287 \bool_if:NT \l_kivi_col_pos_bool {p{\l_kivi_tab_pos_dim}}
288 \bool_if:NT \l_kivi_col_id_bool {p{\l_kivi_tab_id_dim}}
289 p{\l_kivi_tab_desc_dim}
290 \bool_if:NT \l_kivi_col_amount_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_amount_dim}}}
291 \bool_if:NT \l_kivi_col_price_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_price_dim}<{\__kivi_tab_column_currency:}}}
292 \bool_if:NT \l_kivi_col_pricetotal_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_pricetotal_dim}<{\__kivi_tab_column_currency:}}}
296 \cs_new:Nn \__kivi_tab_column_currency: {\,\currency}
297 \cs_set:Nn \__kivi_tab_column_header_currency: {}
298 \cs_set_eq:NN \__kivi_tab_column_body_currency: \__kivi_tab_column_currency:
300 \clist_map_inline:nn {head, foot, firsthead, lastfoot} {%TODO reduce
301 \box_new:c {g_kivi_LT@#1_box}
304 \newkomafont{PricingTableHeader}{\bfseries}
306 \cs_new:Nn \__kivi_setup_LT_boxes: {
307 \__kivi_calc_desc_column:
308 \hbox_gset:Nn \g_kivi_LT@head_box {
309 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
310 \exp_args:Nnx \use:n {\tabular[b]}\g_kivi_Pricing_colspec_tl
311 \__kivi_PricingTabular_header:
314 \hbox_gset:Nn \g_kivi_LT@foot_box {
316 \begin{tabular*}{\textwidth}{@{\extracolsep{\fill}}r@{}}
318 \strut\weiteraufnaechsterseite
325 %Macht es sinn hier eine Variante zu machen, in der alle Spalten Belegbar sind?
326 \newenvironment{PricingTotal}{
328 \vspace{-\ht\strutbox}
330 \tabular[t]{@{}p{\dim_eval:n {\linewidth-\l_kivi_tab_pricetotal_dim-2\tabcolsep}}P{\l_kivi_tab_pricetotal_dim}@{}}
333 \bottomrule\endtabular
336 \newcommand{\ExtraDescription}[1]{\seq_gput_right:Nn \g_kivi_extraDescription_seq {#1}}
338 \newenvironment{PricingTabular}[1][]{
340 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
341 \__kivi_calc_desc_column:
342 \exp_args:Nx \longtable \g_kivi_Pricing_colspec_tl
344 \__kivi_PricingTabular_header:
347 \multicolumn{6}{@{}r@{}}{\weiteraufnaechsterseite}\\
354 \cs_set:Nn \__kivi_PricingTabular_header: {
356 \cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_header_currency:
357 \bool_set_false:N \l_tmpa_bool
358 \clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
359 \bool_if:cT {l_kivi_col_##1_bool} {
360 \bool_if:NT \l_tmpa_bool {&}
361 \bool_set_true:N \l_tmpa_bool
362 \usekomafont{PricingTableHeader}
363 \prop_item:cn {l_kivi_col_##1_prop} {header}
366 \cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_body_currency:
371 \RequirePackage{xltabular}
374 \newenvironment{SimpleTabular}[1][\bfseries\position & \bfseries\menge & \bfseries\bezeichnung]
376 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
377 \xltabular{\linewidth}{@{}rrX@{}}
382 \multicolumn{3}{@{}>{\raggedright}p{\linewidth}@{}}{\weiteraufnaechsterseite}\\
388 \def\@currenvir{tabularx}
392 %PricingTabular* kann automatisch spalten ignorieren
393 % \begin{PricingTabular*}[id=false]
394 % deaktiviert damit die Spalte der Produktnummer
395 % analog ist dies für pos, amount, price, pricetotal möglich.
396 % Die Spalte der Bezeichnung ist nicht deaktivierbar
397 \newenvironment{PricingTabular*}[1][]{
398 \bool_gset_true:N \g_kivi_inTable_bool
399 \tl_if_empty:nF {#1} {\keys_set:nn {kivi/PricingTable} {#1}}
400 \__kivi_setup_LT_boxes:
401 \__kivi_setup_FakeTable:
402 \PricingTabularBox\ignorespaces
403 }{\endPricingTabularBox}
405 \newtcolorbox{PricingTabularBox}{breakable,skin=kivi@LT}
410 \setkomavar{location}{
411 \ifkomavarempty{transaction}{}{
413 \usekomavar{transaction}
417 \begin{tabularx}{\useplength{locwidth}}{@{}l<{:}>{\raggedleft\arraybackslash}X@{}}
418 \usekomavar*{date}&\usekomavar{date}\\
419 \ifkomavarempty{myref}{}{
420 \usekomavar*{myref}&\usekomavar{myref}\\
422 \kundennummer&\usekomavar{customer}\\
423 \ifkomavarempty{yourref}{}{
424 \usekomavar*{yourref}&\usekomavar{yourref}\\
426 \ifkomavarempty{delivery}{}{
427 \usekomavar*{delivery}&\usekomavar{delivery}\\
429 \ifkomavarempty{quote}{}{
430 \usekomavar*{quote}&\usekomavar{quote}\\
432 \ifkomavarempty{orderID}{}{\auftragsnummer&\usekomavar{orderID}\\}
433 \ifkomavarempty{projectID}{}{\projektnummer&\usekomavar{projectID}\\}
434 \ansprechpartner&\usekomavar{fromname}
435 \ifkomavarempty{fromphone}{}{\\\textTelefon&\usekomavar{fromphone}}
436 \ifkomavarempty{fromemail}{}{\\\textEmail&\usekomavar{fromemail}}
441 \ifdim\ht\shippingAddressBox>\z@
442 \@addtoplength{refvpos}{\dimexpr\ht\shippingAddressBox+\dp\shippingAddressBox}
443 \@addtoplength{refvpos}{4\baselineskip}%sep between address boxes
451 \renewcommand*{\raggedsignature}{\raggedright}