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 \g_kivi_tab_pos_dim
107 \dim_gset:Nn \g_kivi_tab_pos_dim {3.5ex}
108 \dim_new:N \g_kivi_tab_id_dim
109 \dim_gset:Nn \g_kivi_tab_id_dim {4em}
110 \dim_new:N \g_kivi_tab_num_dim
111 \dim_gset:Nn \g_kivi_tab_num_dim {5em}
112 \dim_new:N \g_kivi_tab_price_dim
113 \dim_gset:Nn \g_kivi_tab_price_dim {7em}
114 \dim_new:N \g_kivi_tab_desc_dim
116 \dim_new:N \g_kivi_tabcolsep_dim
117 \dim_gset:Nn \g_kivi_tabcolsep_dim {.5\tabcolsep}
118 \newcommand*{\CalcTabCols}{
119 \dim_gset:Nn \g_kivi_tab_desc_dim {\textwidth-\g_kivi_tab_pos_dim -\g_kivi_tab_id_dim-\g_kivi_tab_num_dim - 2\g_kivi_tab_price_dim - 10\g_kivi_tabcolsep_dim}
122 \newcolumntype{P}{>{\raggedleft\arraybackslash}p{\g_kivi_tab_price_dim}<{\,\currency}}
124 \RequirePackage{tcolorbox}
125 \tcbuselibrary{breakable, skins}
127 \tcb@new@skin{kivi@LT}{base@unbroken,%
128 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
129 skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
130 underlay~first~and~middle={
131 \node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
132 \node[anchor=south] at (interior.south) {\csname box_use:c\endcsname {g_kivi_LT@foot_box}};
134 underlay~unbroken~and~last={
135 \node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
141 bottom=\box_ht:N \g_kivi_LT@foot_box+\box_dp:N \g_kivi_LT@foot_box,
142 top=\box_ht:N \g_kivi_LT@head_box+\box_dp:N \g_kivi_LT@head_box,
146 \tcb@new@skin{kivi@LT@first}{base@first,%
147 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
148 skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
151 \tcb@new@skin{kivi@LT@middle}{base@middle,%
152 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
153 skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
156 \tcb@new@skin{kivi@LT@last}{base@last,%
157 frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
158 skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
161 \tcbset{kivi@LT/.style={skin=kivi@LT}}%
165 \seq_new:N \l_kivi_PricingTable_seq
166 \seq_new:N \g_kivi_extraDescription_seq
167 \newcommand{\FakeTable}[1]{
170 \seq_set_split:Nnn \l_kivi_PricingTable_seq {\tabularnewline} {#1}
172 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
173 \seq_map_inline:Nn \l_kivi_PricingTable_seq {
174 \seq_gclear:N \g_kivi_extraDescription_seq
175 \exp_args:NnV \use:n {\tabular[t]}\g_kivi_Pricing_colspec_tl
178 \seq_if_empty:NTF \g_kivi_extraDescription_seq
179 {\par\nointerlineskip}
180 {\par\nointerlineskip
183 left=\dim_eval:n {\g_kivi_tab_pos_dim+ \g_kivi_tab_id_dim +4\g_kivi_tabcolsep_dim},
184 right=\dim_eval:n {\g_kivi_tab_num_dim+ 2\g_kivi_tab_price_dim +6\g_kivi_tabcolsep_dim},top=0pt,bottom=0pt,
187 lines~before~break=1,
189 \seq_use:Nn \g_kivi_extraDescription_seq {\\}
198 \tl_new:N \g_kivi_Pricing_colspec_tl
199 \tl_gset:Nn \g_kivi_Pricing_colspec_tl {@{}p{\g_kivi_tab_pos_dim}p{\g_kivi_tab_id_dim}p{\g_kivi_tab_desc_dim}>{\raggedleft\arraybackslash}p{\g_kivi_tab_num_dim}*2{P}@{}}
202 \clist_map_inline:nn {head, foot, firsthead, lastfoot} {%TODO reduce
203 \box_new:c {g_kivi_LT@#1_box}
207 \cs_new:Nn \kivi_setup_LT_boxes: {
209 \hbox_gset:Nn \g_kivi_LT@head_box {
210 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
211 \exp_args:NnV \use:n {\tabular[b]}\g_kivi_Pricing_colspec_tl
213 \bfseries\position & \bfseries\artikelnummer & \bfseries\bezeichnung & \bfseries\menge &\multicolumn{1}{P}{\bfseries\einzelpreis}&\multicolumn{1}{P@{}}{\bfseries\gesamtpreis}\\
217 \hbox_gset:Nn \g_kivi_LT@foot_box {
219 \begin{tabular*}{\textwidth}{@{\extracolsep{\fill}}r@{}}
221 \strut\weiteraufnaechsterseite
228 %Macht es sinn hier eine Variante zu machen, in der alle Spalten Belegbar sind?
229 \newenvironment{PricingTotal}{
230 \tabular[t]{@{}p{\dim_eval:n {\linewidth-\g_kivi_tab_price_dim-2\tabcolsep}}P@{}}
233 \bottomrule\endtabular
236 \newcommand{\ExtraDescription}[1]{\seq_gput_right:Nn \g_kivi_extraDescription_seq {#1}}
238 \newenvironment{PricingTabular}[1][]{
240 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
242 \exp_args:NV \longtable \g_kivi_Pricing_colspec_tl
245 \bfseries\position & \bfseries\artikelnummer & \bfseries\bezeichnung & \bfseries\menge &\multicolumn{1}{P}{\bfseries\einzelpreis}&\multicolumn{1}{P@{}}{\bfseries\gesamtpreis}\\
249 \multicolumn{6}{@{}r@{}}{\weiteraufnaechsterseite}\\
256 \RequirePackage{xltabular}
259 \newenvironment{SimpleTabular}[1][\bfseries\position & \bfseries\menge & \bfseries\bezeichnung]
261 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
262 \xltabular{\linewidth}{@{}rrX@{}}
267 \multicolumn{3}{@{}>{\raggedright}p{\linewidth}@{}}{\weiteraufnaechsterseite}\\
273 \def\@currenvir{tabularx}
277 \newenvironment{PricingTabular*}[1][]{
278 \bool_gset_true:N \g_kivi_inTable_bool
279 \tl_if_empty:nF {#1} {\keys_set:nn {kivi/PricingTable} {#1}}
280 \__kivi_setup_LT_boxes:
281 \__kivi_setup_FakeTable:
282 \PricingTabularBox\ignorespaces
283 }{\endPricingTabularBox}
285 \newtcolorbox{PricingTabularBox}{breakable,skin=kivi@LT}
290 \setkomavar{location}{
291 \ifkomavarempty{transaction}{}{
293 \usekomavar{transaction}
297 \begin{tabularx}{\useplength{locwidth}}{@{}l<{:}>{\raggedleft\arraybackslash}X@{}}
298 \usekomavar*{date}&\usekomavar{date}\\
299 \ifkomavarempty{myref}{}{
300 \usekomavar*{myref}&\usekomavar{myref}\\
302 \kundennummer&\usekomavar{customer}\\
303 \ifkomavarempty{yourref}{}{
304 \usekomavar*{yourref}&\usekomavar{yourref}\\
306 \ifkomavarempty{delivery}{}{
307 \usekomavar*{delivery}&\usekomavar{delivery}\\
309 \ifkomavarempty{quote}{}{
310 \usekomavar*{quote}&\usekomavar{quote}\\
312 \ifkomavarempty{orderID}{}{\auftragsnummer&\usekomavar{orderID}\\}
313 \ifkomavarempty{projectID}{}{\projektnummer&\usekomavar{projectID}\\}
314 \ansprechpartner&\usekomavar{fromname}
315 \ifkomavarempty{fromphone}{}{\\\textTelefon&\usekomavar{fromphone}}
316 \ifkomavarempty{fromemail}{}{\\\textEmail&\usekomavar{fromemail}}
321 \ifdim\ht\shippingAddressBox>\z@
322 \addtoplength{refvpos}{\dimexpr\ht\shippingAddressBox+\dp\shippingAddressBox}
323 \addtoplength{refvpos}{4\baselineskip}%sep between address boxes
331 \renewcommand*{\raggedsignature}{\raggedright}