% allgemeine Voreinstellungen
% ****************************************************************
\pagestyle{scrheadings}

\ExplSyntaxOn
% Daten speichern
% ****************************************************************
\tl_new:N \l_funktionsbezeichnung_tl
\tl_new:N \l_gliederungName_tl
\tl_new:N \l_adresse_tl
\tl_new:N \l_ort_tl
\tl_new:N \l_telefon_tl
\tl_new:N \l_telefax_tl
\tl_new:N \l_email_tl
\tl_new:N \l_webseite_tl

\NewDocumentCommand{\funktionsbezeichnung}{m}{\tl_set:Nn \l_funktionsbezeichnung_tl {#1}}
\NewDocumentCommand{\gliederungName}{m}{\tl_set:Nn \l_gliederungName_tl {#1}}
\NewDocumentCommand{\adresse}{m}{\tl_set:Nn \l_adresse_tl {#1}}
\NewDocumentCommand{\ort}{m}{\tl_set:Nn \l_ort_tl {#1}}
\NewDocumentCommand{\telefon}{m}{\tl_set:Nn \l_telefon_tl {#1}}
\NewDocumentCommand{\telefax}{m}{\tl_set:Nn \l_telefax_tl {#1}}
\NewDocumentCommand{\email}{m}{\tl_set:Nn \l_email_tl {#1}}
\NewDocumentCommand{\webseite}{m}{\tl_set:Nn \l_webseite_tl {#1} \renewcommand\bauchbinde@link{#1}}

%Titeldefinitionen überschreiben
\def\title#1{\gdef\@title{#1}\gdef\thetitle{#1}}
\def\subtitle#1{\gdef\@subtitle{#1}\gdef\thesubtitle{#1}}

\NewDocumentCommand{\startMitteilungsteil}{}{
    \clearpage
    \freigestellterAdlerWasserzeichen%
    \begin{flushright}
        \textbf{\large{\@author}}\\
        \begin{footnotesize}
            \tl_use:N \l_funktionsbezeichnung_tl \par
            \tl_if_empty:NTF \l_gliederungName_tl {}{\tl_use:N \l_gliederungName_tl \\}
            \tl_if_empty:NTF \l_adresse_tl {}{\tl_use:N \l_adresse_tl \\}
            \tl_if_empty:NTF \l_ort_tl {}{\tl_use:N \l_ort_tl \\}
            \tl_if_empty:NTF \l_telefon_tl {}{Telefon:~\tl_use:N \l_telefon_tl \\}
            \tl_if_empty:NTF \l_telefax_tl {}{Telefax:~\tl_use:N \l_telefax_tl \\}
            \tl_if_empty:NTF \l_email_tl {}{E-Mail:~\tl_use:N \l_email_tl \\}
            \tl_if_empty:NTF \l_webseite_tl {}{Internet: \tl_use:N \l_webseite_tl}
        \end{footnotesize}
    \end{flushright}
    \begin{center}
        \Huge{\textbf{\thetitle}}
    \end{center}%
    \ifthenelse{\isundefined{\thesubtitle}}{}{
        \begin{center}
            \large{\textbf{\thesubtitle}}
        \end{center}
    }
}
% Start des Dokuments festlegen
% ****************************************************************
\AtBeginDocument{
    \ifthenelse{\boolean{dlrg@message@serienfunktion}}{}{\startMitteilungsteil}
}%
\ExplSyntaxOff

% Fußzeile festlegen
% ****************************************************************
\setkomafont{pagefoot}{\normalfont}
\cfoot{\bauchbinde{}}
