1 \NeedsTeXFormat{LaTeX2e}
2 \ProvidesPackage{kiviletter}[2019/10/10 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}
20 \RequirePackage{fontspec}
23 %\RequirePackage{xltabular}
24 \RequirePackage{tabularx}
25 \RequirePackage{longtable}
26 \RequirePackage{booktabs}
27 \PassOptionsToPackage{table}{xcolor}
29 \RequirePackage{xcolor}
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}
55 \savegeometry{kivi.letter@default}
57 \int_new:N \l_kivi_tmp_int
58 \bool_new:N \l_kivi_tmp_bool
59 \bool_new:N \g_kivi_TableFoot_bool
60 \dim_new:N \g_kivi_orig@textheight_dim
61 \int_new:N \g_PricingTabular_firstpage_int
64 \newsavebox{\shippingAddressBox}
69 hoffset=\useplength{toaddrhpos},
70 voffset=\dimexpr\useplength{toaddrvpos}+\useplength{toaddrheight}+4\baselineskip,
71 contents={\usebox\shippingAddressBox}
72 ]{kivitendo.shippingaddress}
79 hoffset=\g_kivi_margin_dim,
80 voffset=\g_kivi_margin_dim,
82 height=\box_ht:N \g_kivi_LT@head_box,
83 contents={\box_use:N \g_kivi_LT@head_box},
84 ]{kivitendo.TableHead}
91 voffset=\dim_eval:n {\paperheight-\g_kivi_margin_dim},
92 height=\box_ht:N \g_kivi_LT@foot_box,
93 contents=\bool_if:NT \g_kivi_TableFoot_bool {\box_use:N \g_kivi_LT@foot_box},
95 ]{kivitendo.TableFoot}
97 \AtBeginLetter{\dim_gset:Nn \g_kivi_orig@textheight_dim {\textheight}}
100 \newpairofpagestyles{kivitendo.letter}{}
101 \renewcommand*{\letterpagestyle}{kivitendo.letter}
103 \DeclareNewPageStyleByLayers{kivitendo.letter.PricingTable}{
106 kivitendo.letter.head.odd,kivitendo.letter.head.even,kivitendo.letter.head.oneside,%
107 kivitendo.letter.foot.odd,kivitendo.letter.foot.even,kivitendo.letter.foot.oneside,%
109 \DeclareNewPageStyleByLayers{kivitendo.letter.first}{
110 kivitendo.shippingaddress,
112 kivitendo.letter.head.odd,kivitendo.letter.head.even,kivitendo.letter.head.oneside,%
113 kivitendo.letter.foot.odd,kivitendo.letter.foot.even,kivitendo.letter.foot.oneside,%
116 \setkomavar{backaddress}{\firma\ $\cdot$ \strasse\ $\cdot$ \ort}
118 \setkomavar{firsthead}{
120 \rlap{\usekomavar{fromlogo}}%
124 \@setplength{locwidth}{6cm}
127 \dim_new:N \g_kivi_tab_pos_dim
128 \dim_gset:Nn \g_kivi_tab_pos_dim {3.5ex}
129 \dim_new:N \g_kivi_tab_id_dim
130 \dim_gset:Nn \g_kivi_tab_id_dim {4em}
131 \dim_new:N \g_kivi_tab_num_dim
132 \dim_gset:Nn \g_kivi_tab_num_dim {5em}
133 \dim_new:N \g_kivi_tab_price_dim
134 \dim_gset:Nn \g_kivi_tab_price_dim {7em}
135 \dim_new:N \g_kivi_tab_desc_dim
137 \dim_new:N \g_kivi_tabcolsep_dim
138 \dim_gset:Nn \g_kivi_tabcolsep_dim {.5\tabcolsep}
139 \newcommand*{\CalcTabCols}{
140 \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}
143 \newcolumntype{P}{>{\raggedleft\arraybackslash}p{\g_kivi_tab_price_dim}<{\,\currency}}
146 \RequirePackage{tcolorbox}
147 \tcbuselibrary{breakable, skins}
148 \seq_new:N \l_kivi_PricingTable_seq
149 \seq_new:N \g_kivi_extraDescription_seq
150 \newcommand{\FakeTable}[1]{
153 \seq_set_split:Nnn \l_kivi_PricingTable_seq {\tabularnewline} {#1}
155 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
156 \seq_map_inline:Nn \l_kivi_PricingTable_seq {
157 \seq_gclear:N \g_kivi_extraDescription_seq
158 \exp_args:NnV \use:n {\tabular[t]}\g_kivi_Pricing_colspec_tl
161 \seq_if_empty:NTF \g_kivi_extraDescription_seq
162 {\par\nointerlineskip}
163 {\par\nointerlineskip
166 left=\dim_eval:n {\g_kivi_tab_pos_dim+ \g_kivi_tab_id_dim +4\g_kivi_tabcolsep_dim},
167 right=\dim_eval:n {\g_kivi_tab_num_dim+ 2\g_kivi_tab_price_dim +6\g_kivi_tabcolsep_dim},top=0pt,bottom=0pt,
170 lines~before~break=1,
172 \seq_use:Nn \g_kivi_extraDescription_seq {\\}
181 \tl_new:N \g_kivi_Pricing_colspec_tl
182 \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}@{}}
185 \clist_map_inline:nn {head, foot, firsthead, lastfoot} {%TODO reduce
186 \box_new:c {g_kivi_LT@#1_box}
190 \csname kivi_setup_LT_boxes:\endcsname
192 hmargin=\g_kivi_margin_dim,
193 top=\dim_eval:n {\g_kivi_margin_dim + \box_ht:N \g_kivi_LT@head_box},
194 bottom=\dim_eval:n {\g_kivi_margin_dim + \box_ht:N \g_kivi_LT@foot_box},
196 \savegeometry{kivi.letter@table}
197 \loadgeometry{kivi.letter@default}
200 \cs_new:Nn \kivi_setup_LT_boxes: {
202 \hbox_gset:Nn \g_kivi_LT@head_box {
203 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
204 \exp_args:NnV \use:n {\tabular[b]}\g_kivi_Pricing_colspec_tl
206 \bfseries\position & \bfseries\artikelnummer & \bfseries\bezeichnung & \bfseries\menge &\multicolumn{1}{P}{\bfseries\einzelpreis}&\multicolumn{1}{P@{}}{\bfseries\gesamtpreis}\\
210 \hbox_gset:Nn \g_kivi_LT@foot_box {
212 \begin{tabular*}{\textwidth}{@{\extracolsep{\fill}}r@{}}
214 \strut\weiteraufnaechsterseite
221 %Macht es sinn hier eine Variante zu machen, in der alle Spalten Belegbar sind?
222 \newenvironment{PricingTotal}{
223 \tabular[t]{@{}p{\dim_eval:n {\linewidth-\g_kivi_tab_price_dim-2\tabcolsep}}P@{}}
226 \bottomrule\endtabular
229 \newcommand{\ExtraDescription}[1]{\seq_gput_right:Nn \g_kivi_extraDescription_seq {#1}}
231 \newenvironment{PricingTabular}[1][]{
233 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
235 \exp_args:NV \longtable \g_kivi_Pricing_colspec_tl
238 \bfseries\position & \bfseries\artikelnummer & \bfseries\bezeichnung & \bfseries\menge &\multicolumn{1}{P}{\bfseries\einzelpreis}&\multicolumn{1}{P@{}}{\bfseries\gesamtpreis}\\
242 \multicolumn{6}{@{}r@{}}{\weiteraufnaechsterseite}\\
249 \RequirePackage{xltabular}
252 \newenvironment{SimpleTabular}[1][\bfseries\position & \bfseries\menge & \bfseries\bezeichnung]
254 \setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
255 \xltabular{\linewidth}{@{}rrX@{}}
260 \multicolumn{3}{@{}>{\raggedright}p{\linewidth}@{}}{\weiteraufnaechsterseite}\\
266 \def\@currenvir{tabularx}
271 \usepackage{afterpage}
273 \cs_new:cpn {PricingTabular*}{
274 \bool_gset_true:N \g_kivi_inTable_bool
276 \@nameuse{Gm@restore@@kivi.letter@table}%
279 \def \@currenvir {PricingTabular*}\edef \@currenvline {\on@line }
280 \int_gset:Nn \g_PricingTabular_firstpage_int {\c@page}
281 \addtolength{\vsize}{-\box_ht:N \g_kivi_LT@foot_box}
285 \bool_gset_true:N \g_kivi_TableFoot_bool
286 \pagestyle{kivitendo.letter.PricingTable}
287 \leavevmode\box_use:N \g_kivi_LT@head_box
288 \par\nointerlineskip\ignorespaces
291 \cs_new:cpn {endPricingTabular*} {
292 \int_compare:nNnF \g_PricingTabular_firstpage_int = \c@page {\thispagestyle{kivitendo.letter.PricingTable}}
293 \bool_gset_false:N \g_kivi_TableFoot_bool
294 \@nameuse{Gm@restore@@kivi.letter@default}
296 \bool_gset_true:N \g_kivi_restore_geometry_bool
298 \kivi_conditional_restore_geometry:
302 \cs_new:Nn \kivi_conditional_restore_geometry: {
303 \bool_if:NT \g_kivi_restore_geometry_bool
305 \@nameuse{Gm@restore@@kivi.letter@default}
308 \bool_gset_false:N \g_kivi_restore_geometry_bool
314 \setkomavar{location}{
315 \ifkomavarempty{transaction}{}{
317 \usekomavar{transaction}
321 \begin{tabularx}{\useplength{locwidth}}{@{}l<{:}>{\raggedleft\arraybackslash}X@{}}
322 \usekomavar*{date}&\usekomavar{date}\\
323 \ifkomavarempty{myref}{}{
324 \usekomavar*{myref}&\usekomavar{myref}\\
326 \kundennummer&\usekomavar{customer}\\
327 \ifkomavarempty{yourref}{}{
328 \usekomavar*{yourref}&\usekomavar{yourref}\\
330 \ifkomavarempty{delivery}{}{
331 \usekomavar*{delivery}&\usekomavar{delivery}\\
333 \ifkomavarempty{quote}{}{
334 \usekomavar*{quote}&\usekomavar{quote}\\
336 \ifkomavarempty{orderID}{}{\auftragsnummer&\usekomavar{orderID}\\}
337 \ifkomavarempty{projectID}{}{\projektnummer&\usekomavar{projectID}\\}
338 \ansprechpartner&\usekomavar{fromname}
339 \ifkomavarempty{fromphone}{}{\\\textTelefon&\usekomavar{fromphone}}
340 \ifkomavarempty{fromemail}{}{\\\textEmail&\usekomavar{fromemail}}
345 \ifdim\ht\shippingAddressBox>\z@
346 \addtoplength{refvpos}{\ht\shippingAddressBox}
347 \addtoplength{refvpos}{4\baselineskip}
355 \renewcommand*{\raggedsignature}{\raggedright}