|
\NeedsTeXFormat{LaTeX2e}
|
|
\ProvidesPackage{kiviletter}[2020/04/24 Letter Layouts for Kivitendo]
|
|
|
|
\newif\if@kivi@infobox
|
|
\DeclareOption{reffields}{\@kivi@infoboxfalse}
|
|
\DeclareOption{infobox}{\@kivi@infoboxtrue}
|
|
\@kivi@infoboxtrue
|
|
|
|
\ProcessOptions\relax
|
|
|
|
|
|
\RequirePackage{expl3}
|
|
\RequirePackage{iftex}
|
|
\KOMAoptions{fontsize=12pt}
|
|
% Schriftart, Eingabelayout der Tastatur
|
|
\ifPDFTeX
|
|
\RequirePackage[utf8]{inputenc}% Nur notwendig, wenn Basis älter als TL2018
|
|
\RequirePackage[T1]{fontenc}
|
|
\RequirePackage{lmodern}
|
|
\else
|
|
\RequirePackage{fontspec}
|
|
\fi
|
|
|
|
%\RequirePackage{xltabular}
|
|
\RequirePackage{tabularx}
|
|
\RequirePackage{longtable}
|
|
\RequirePackage{booktabs}
|
|
\PassOptionsToPackage{table}{xcolor}
|
|
|
|
\RequirePackage{xcolor}
|
|
\RequirePackage{graphicx}
|
|
|
|
\ifPDFTeX
|
|
\RequirePackage{eurosym}
|
|
\DeclareUnicodeCharacter{20AC}{\euro}
|
|
\fi
|
|
|
|
\RequirePackage[fromlogo,fromalign=right,
|
|
firstfoot=false,%Für einheitliche Randeinstellungen
|
|
refline=nodate,
|
|
]{scrletter}
|
|
\LoadLetterOption{DIN}
|
|
|
|
\newkomavar{transaction}
|
|
\newkomavar[\lieferschein{}~\nr]{delivery}
|
|
\newkomavar[\angebot{}~\nr]{quote}
|
|
\newkomavar{orderID}
|
|
\newkomavar{projectID}
|
|
|
|
\usepackage{geometry}
|
|
|
|
\ExplSyntaxOn
|
|
\dim_new:N \g_kivi_margin_dim
|
|
\dim_gset:Nn \g_kivi_margin_dim {\useplength{toaddrhpos}}
|
|
\geometry{a4paper,margin=\g_kivi_margin_dim,heightrounded}
|
|
\savegeometry{kivi.letter@default}
|
|
%Scratch variables
|
|
\int_new:N \l_kivi_tmp_int
|
|
\bool_new:N \l_kivi_tmp_bool
|
|
\bool_new:N \g_kivi_TableFoot_bool
|
|
\dim_new:N \g_kivi_orig@textheight_dim
|
|
\ExplSyntaxOff
|
|
|
|
\newsavebox{\shippingAddressBox}
|
|
|
|
|
|
\DeclareNewLayer[
|
|
foreground,
|
|
hoffset=\useplength{toaddrhpos},
|
|
voffset=\dimexpr\useplength{toaddrvpos}+\useplength{toaddrheight}+4\baselineskip,%sep to shippingaddressbox
|
|
contents={\usebox\shippingAddressBox}
|
|
]{kivitendo.shippingaddress}
|
|
|
|
|
|
\ExplSyntaxOn
|
|
\AtBeginLetter{\dim_gset:Nn \g_kivi_orig@textheight_dim {\textheight}}
|
|
\ExplSyntaxOff
|
|
|
|
\newpairofpagestyles{kivitendo.letter}{}
|
|
\renewcommand*{\letterpagestyle}{kivitendo.letter}
|
|
|
|
\DeclareNewPageStyleByLayers{kivitendo.letter.PricingTable}{
|
|
kivitendo.TableHead,
|
|
kivitendo.TableFoot
|
|
kivitendo.letter.head.odd,kivitendo.letter.head.even,kivitendo.letter.head.oneside,%
|
|
kivitendo.letter.foot.odd,kivitendo.letter.foot.even,kivitendo.letter.foot.oneside,%
|
|
}
|
|
\DeclareNewPageStyleByLayers{kivitendo.letter.first}{
|
|
kivitendo.shippingaddress,
|
|
kivitendo.TableFoot,
|
|
kivitendo.letter.head.odd,kivitendo.letter.head.even,kivitendo.letter.head.oneside,%
|
|
kivitendo.letter.foot.odd,kivitendo.letter.foot.even,kivitendo.letter.foot.oneside,%
|
|
}
|
|
|
|
\setkomavar{backaddress}{\firma\ $\cdot$ \strasse\ $\cdot$ \ort}
|
|
|
|
\setkomavar{firsthead}{
|
|
\if@logo
|
|
\rlap{\usekomavar{fromlogo}}%
|
|
\fi
|
|
}
|
|
|
|
\@setplength{locwidth}{6cm}
|
|
|
|
\ExplSyntaxOn
|
|
\dim_new:N \l_kivi_tab_desc_leftskip_dim
|
|
|
|
|
|
|
|
\cs_new:Nn \__kivi_set_colwidth:nn {
|
|
\dim_set:cn {l_kivi_tab_#1_dim} {#2}
|
|
}
|
|
|
|
|
|
\cs_new:Nn \__kivi_initialize_columns: {
|
|
\clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
|
|
\bool_if_exist:cF {l_kivi_col_##1_bool}
|
|
{
|
|
\bool_new:c {l_kivi_col_##1_bool}
|
|
\dim_new:c {l_kivi_tab_##1_dim}
|
|
\keys_define:nn {kivi/PricingTable} {
|
|
##1 .choice:,
|
|
##1 / true .code:n = \bool_set_true:c {l_kivi_col_##1_bool},
|
|
##1 / false .code:n = \bool_set_false:c {l_kivi_col_##1_bool},
|
|
##1 / unknown .code:n = {
|
|
\bool_set_true:c {l_kivi_col_##1_bool}
|
|
\dim_set:cn {l_kivi_tab_##1_dim} {####1}
|
|
},
|
|
##1 .default:n = true,
|
|
##1 .initial:n = true,
|
|
##1 / header .prop_put:c = {l_kivi_col_##1_prop},
|
|
##1 / colspec .prop_put:c = {l_kivi_col_##1_prop},
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
\clist_new:N \g_kivi_pricingtable_col_clist
|
|
|
|
\keys_define:nn {kivi/PricingTable} {
|
|
columns .code:n =
|
|
\clist_gset:Nn \g_kivi_pricingtable_col_clist {#1}
|
|
\__kivi_initialize_columns:,
|
|
columns .initial:n = {pos, id, desc, amount, price, pricetotal},
|
|
}
|
|
|
|
% set default values for colwidth
|
|
\keys_set:nn {kivi/PricingTable} {
|
|
pos=5ex,
|
|
id=4em,
|
|
amount=5em,
|
|
price=7em,
|
|
pricetotal=7em,
|
|
% desc=auto,
|
|
pos/header=\position,
|
|
id/header=\artikelnummer,
|
|
desc/header=\bezeichnung,
|
|
amount/header=\menge,
|
|
price/header=\einzelpreis,
|
|
pricetotal/header=\gesamtpreis,
|
|
price / colspec = Price,
|
|
pricetotal / colspec = Price ,
|
|
}
|
|
|
|
\dim_new:N \g_kivi_tabcolsep_dim
|
|
\dim_gset:Nn \g_kivi_tabcolsep_dim {.5\tabcolsep}
|
|
|
|
\cs_new:Nn \__kivi_calc_desc_column: {
|
|
\dim_zero:N \l_kivi_tab_desc_leftskip_dim
|
|
\dim_zero:N \l_kivi_tab_desc_dim
|
|
\bool_set_false:N \l_tmpa_bool
|
|
\clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
|
|
\tl_if_eq:nnTF {##1} {desc} {
|
|
\dim_set:Nn \l_kivi_tab_desc_dim {
|
|
\textwidth-\l_kivi_tab_desc_leftskip_dim
|
|
}
|
|
\bool_set_true:N \l_tmpa_bool
|
|
|
|
}{
|
|
\bool_if:NTF \l_tmpa_bool {
|
|
\bool_if:cT {l_kivi_col_##1_bool} {
|
|
\dim_sub:Nn \l_kivi_tab_desc_dim {
|
|
\dim_use:c {l_kivi_tab_##1_dim}+2\g_kivi_tabcolsep_dim
|
|
}
|
|
}
|
|
}{
|
|
\bool_if:cT {l_kivi_col_##1_bool} {
|
|
\dim_add:Nn \l_kivi_tab_desc_leftskip_dim {
|
|
\dim_use:c {l_kivi_tab_##1_dim}+2\g_kivi_tabcolsep_dim
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
\newcolumntype{P}[1]{>{\raggedleft\arraybackslash}p{#1}<{\__kivi_tab_column_currency:}}
|
|
|
|
\RequirePackage{tcolorbox}
|
|
\tcbuselibrary{breakable, skins}
|
|
|
|
\tcb@new@skin{kivi@LT}{base@unbroken,%
|
|
frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
|
|
skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
|
|
underlay~first~and~middle={
|
|
\node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
|
|
\node[anchor=south] at (interior.south) {\csname box_use:c\endcsname {g_kivi_LT@foot_box}};
|
|
},
|
|
underlay~unbroken~and~last={
|
|
\node[anchor=north] at (interior.north) {\csname box_use:c\endcsname {g_kivi_LT@head_box}};
|
|
},
|
|
boxsep=0pt,
|
|
boxrule=0pt,
|
|
left=0pt,
|
|
right=0pt,
|
|
bottom=\box_ht:N \g_kivi_LT@foot_box+\box_dp:N \g_kivi_LT@foot_box + \aboverulesep,
|
|
top=\box_ht:N \g_kivi_LT@head_box+\box_dp:N \g_kivi_LT@head_box +\belowrulesep,
|
|
parbox=false,
|
|
}
|
|
|
|
\tcb@new@skin{kivi@LT@first}{base@first,%
|
|
frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
|
|
skin~first=kivi@LT@first,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
|
|
}
|
|
|
|
\tcb@new@skin{kivi@LT@middle}{base@middle,%
|
|
frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
|
|
skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@middle,
|
|
}
|
|
|
|
\tcb@new@skin{kivi@LT@last}{base@last,%
|
|
frame~engine=empty,interior~titled~engine=empty,interior~engine=empty,segmentation~engine=empty,title~engine=empty,%
|
|
skin~first=kivi@LT@middle,skin~middle=kivi@LT@middle,skin~last=kivi@LT@last,
|
|
}
|
|
|
|
\tcbset{kivi@LT/.style={skin=kivi@LT}}%
|
|
|
|
|
|
|
|
\seq_new:N \l_kivi_PricingTable_seq
|
|
\seq_new:N \l_kivi_columns_seq
|
|
\seq_new:N \g_kivi_extraDescription_seq
|
|
\newcommand{\FakeTable}[1]{
|
|
\par
|
|
\seq_set_split:Nnn \l_kivi_PricingTable_seq {\tabularnewline} {#1}
|
|
\seq_remove_all:Nn \l_kivi_PricingTable_seq {}
|
|
\begingroup
|
|
\setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
|
|
\seq_map_inline:Nn \l_kivi_PricingTable_seq {
|
|
\seq_set_split:Nnn \l_kivi_columns_seq {&} {##1}
|
|
\seq_gclear:N \g_kivi_extraDescription_seq
|
|
\exp_args:Nnx \use:n {\tabular[t]}\g_kivi_Pricing_colspec_tl
|
|
\seq_pop_left:NN \__l_FakeTable_columns_seq \l_tmpa_tl
|
|
\seq_item:Nn \l_kivi_columns_seq {\l_tmpa_tl}
|
|
\seq_map_inline:Nn \__l_FakeTable_columns_seq {
|
|
&\seq_item:Nn \l_kivi_columns_seq {####1}
|
|
}
|
|
\endtabular
|
|
\seq_if_empty:NTF \g_kivi_extraDescription_seq
|
|
{\par}
|
|
{\par
|
|
\begingroup
|
|
\setlength{\hsize}{\dimexpr\l_kivi_tab_desc_dim+\l_kivi_tab_desc_leftskip_dim}
|
|
\setlength{\leftskip}{\l_kivi_tab_desc_leftskip_dim}
|
|
\seq_use:Nn \g_kivi_extraDescription_seq {\\}
|
|
\par\nointerlineskip
|
|
\endgroup
|
|
}
|
|
}
|
|
\endgroup
|
|
}
|
|
|
|
|
|
\seq_new:N \__l_FakeTable_columns_seq
|
|
\cs_new:Nn \__kivi_setup_FakeTable: {
|
|
\seq_clear:N \__l_FakeTable_columns_seq
|
|
\int_zero:N \l_tmpa_int
|
|
\clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
|
|
\int_incr:N \l_tmpa_int
|
|
\bool_if:cT {l_kivi_col_##1_bool} {\seq_put_right:Nx \__l_FakeTable_columns_seq {\int_use:N \l_tmpa_int}}
|
|
}
|
|
}
|
|
|
|
\tl_new:N \g_kivi_Pricing_colspec_tl
|
|
\tl_gset:Nn \g_kivi_Pricing_colspec_tl {
|
|
@{}
|
|
\bool_if:NT \l_kivi_col_pos_bool {p{\l_kivi_tab_pos_dim}}
|
|
\bool_if:NT \l_kivi_col_id_bool {p{\l_kivi_tab_id_dim}}
|
|
p{\l_kivi_tab_desc_dim}
|
|
\bool_if:NT \l_kivi_col_amount_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_amount_dim}}}
|
|
\bool_if:NT \l_kivi_col_price_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_price_dim}<{\__kivi_tab_column_currency:}}}
|
|
\bool_if:NT \l_kivi_col_pricetotal_bool {\exp_not:n {>{\raggedleft\arraybackslash}p{\l_kivi_tab_pricetotal_dim}<{\__kivi_tab_column_currency:}}}
|
|
@{}
|
|
}
|
|
|
|
\cs_new:Nn \__kivi_tab_column_currency: {\,\currency}
|
|
\cs_set:Nn \__kivi_tab_column_header_currency: {}
|
|
\cs_set_eq:NN \__kivi_tab_column_body_currency: \__kivi_tab_column_currency:
|
|
|
|
\clist_map_inline:nn {head, foot, firsthead, lastfoot} {%TODO reduce
|
|
\box_new:c {g_kivi_LT@#1_box}
|
|
}
|
|
|
|
\newkomafont{PricingTableHeader}{\bfseries}
|
|
|
|
\cs_new:Nn \__kivi_setup_LT_boxes: {
|
|
\__kivi_calc_desc_column:
|
|
\hbox_gset:Nn \g_kivi_LT@head_box {
|
|
\setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
|
|
\exp_args:Nnx \use:n {\tabular[b]}\g_kivi_Pricing_colspec_tl
|
|
\__kivi_PricingTabular_header:
|
|
\endtabular
|
|
}
|
|
\hbox_gset:Nn \g_kivi_LT@foot_box {
|
|
\raisebox{\depth}{
|
|
\begin{tabular*}{\textwidth}{@{\extracolsep{\fill}}r@{}}
|
|
\midrule
|
|
\strut\weiteraufnaechsterseite
|
|
\end{tabular*}
|
|
}
|
|
}
|
|
}
|
|
|
|
|
|
%Macht es sinn hier eine Variante zu machen, in der alle Spalten Belegbar sind?
|
|
\newenvironment{PricingTotal}{
|
|
\par
|
|
\vspace{-\ht\strutbox}
|
|
\unskip
|
|
\tabular[t]{@{}p{\dim_eval:n {\linewidth-\l_kivi_tab_pricetotal_dim-2\tabcolsep}}P{\l_kivi_tab_pricetotal_dim}@{}}
|
|
\midrule
|
|
}{
|
|
\bottomrule\endtabular
|
|
}
|
|
|
|
\newcommand{\ExtraDescription}[1]{\seq_gput_right:Nn \g_kivi_extraDescription_seq {#1}}
|
|
|
|
\newenvironment{PricingTabular}[1][]{
|
|
\begingroup
|
|
\setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
|
|
\__kivi_calc_desc_column:
|
|
\exp_args:Nx \longtable \g_kivi_Pricing_colspec_tl
|
|
% Tabellenkopf
|
|
\__kivi_PricingTabular_header:
|
|
\endhead
|
|
\midrule
|
|
\multicolumn{6}{@{}r@{}}{\weiteraufnaechsterseite}\\
|
|
\endfoot
|
|
}{
|
|
\endlongtable
|
|
\endgroup
|
|
}
|
|
|
|
\cs_set:Nn \__kivi_PricingTabular_header: {
|
|
\toprule
|
|
\cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_header_currency:
|
|
\bool_set_false:N \l_tmpa_bool
|
|
\clist_map_inline:Nn \g_kivi_pricingtable_col_clist {
|
|
\bool_if:cT {l_kivi_col_##1_bool} {
|
|
\bool_if:NT \l_tmpa_bool {&}
|
|
\bool_set_true:N \l_tmpa_bool
|
|
\usekomafont{PricingTableHeader}
|
|
\prop_item:cn {l_kivi_col_##1_prop} {header}
|
|
}
|
|
}
|
|
\cs_gset_eq:NN \__kivi_tab_column_currency: \__kivi_tab_column_body_currency:
|
|
\\
|
|
\midrule
|
|
}
|
|
|
|
\RequirePackage{xltabular}
|
|
|
|
|
|
\newenvironment{SimpleTabular}[1][\bfseries\position & \bfseries\menge & \bfseries\bezeichnung]
|
|
{
|
|
\setlength{\tabcolsep}{\g_kivi_tabcolsep_dim}
|
|
\xltabular{\linewidth}{@{}rrX@{}}
|
|
\toprule
|
|
#1\\
|
|
\midrule\\\endhead
|
|
\midrule
|
|
\multicolumn{3}{@{}>{\raggedright}p{\linewidth}@{}}{\weiteraufnaechsterseite}\\
|
|
\endfoot
|
|
\bottomrule
|
|
\endlastfoot
|
|
\ignorespaces
|
|
}{
|
|
\def\@currenvir{tabularx}
|
|
\endxltabular
|
|
}
|
|
|
|
%PricingTabular* kann automatisch spalten ignorieren
|
|
% \begin{PricingTabular*}[id=false]
|
|
% deaktiviert damit die Spalte der Produktnummer
|
|
% analog ist dies für pos, amount, price, pricetotal möglich.
|
|
% Die Spalte der Bezeichnung ist nicht deaktivierbar
|
|
\newenvironment{PricingTabular*}[1][]{
|
|
\bool_gset_true:N \g_kivi_inTable_bool
|
|
\tl_if_empty:nF {#1} {\keys_set:nn {kivi/PricingTable} {#1}}
|
|
\__kivi_setup_LT_boxes:
|
|
\__kivi_setup_FakeTable:
|
|
\PricingTabularBox\ignorespaces
|
|
}{\endPricingTabularBox}
|
|
|
|
\newtcolorbox{PricingTabularBox}{breakable,skin=kivi@LT}
|
|
|
|
|
|
|
|
\if@kivi@infobox
|
|
\setkomavar{location}{
|
|
\ifkomavarempty{transaction}{}{
|
|
\bfseries
|
|
\usekomavar{transaction}
|
|
}
|
|
\par
|
|
\medskip
|
|
\begin{tabularx}{\useplength{locwidth}}{@{}l<{:}>{\raggedleft\arraybackslash}X@{}}
|
|
\usekomavar*{date}&\usekomavar{date}\\
|
|
\ifkomavarempty{myref}{}{
|
|
\usekomavar*{myref}&\usekomavar{myref}\\
|
|
}
|
|
\kundennummer&\usekomavar{customer}\\
|
|
\ifkomavarempty{yourref}{}{
|
|
\usekomavar*{yourref}&\usekomavar{yourref}\\
|
|
}
|
|
\ifkomavarempty{delivery}{}{
|
|
\usekomavar*{delivery}&\usekomavar{delivery}\\
|
|
}
|
|
\ifkomavarempty{quote}{}{
|
|
\usekomavar*{quote}&\usekomavar{quote}\\
|
|
}
|
|
\ifkomavarempty{orderID}{}{\auftragsnummer&\usekomavar{orderID}\\}
|
|
\ifkomavarempty{projectID}{}{\projektnummer&\usekomavar{projectID}\\}
|
|
\ansprechpartner&\usekomavar{fromname}
|
|
\ifkomavarempty{fromphone}{}{\\\textTelefon&\usekomavar{fromphone}}
|
|
\ifkomavarempty{fromemail}{}{\\\textEmail&\usekomavar{fromemail}}
|
|
\end{tabularx}
|
|
}
|
|
\removereffields
|
|
\AtBeginLetter{
|
|
\ifdim\ht\shippingAddressBox>\z@
|
|
\@addtoplength{refvpos}{\dimexpr\ht\shippingAddressBox+\dp\shippingAddressBox}
|
|
\@addtoplength{refvpos}{4\baselineskip}%sep between address boxes
|
|
\fi
|
|
}
|
|
\ExplSyntaxOff
|
|
\fi
|
|
|
|
|
|
|
|
\renewcommand*{\raggedsignature}{\raggedright}
|
|
|
|
\endinput
|