LaTeX Forum

\documentclass[fontsize=10pt,headings=small]{scrreprt} 
\usepackage[english, ngerman]{babel} 
\usepackage[latin1]{inputenc} 
\usepackage[T1]{fontenc} 
\usepackage{blindtext}
\renewcommand{\Blindtext}{%
	Dies hier ist ein Blindtext zum Testen von Textausgaben.
	Wer diesen Text liest, ist selbst schuld.%
}
\usepackage{lmodern}

\usepackage{calc,ifthen,xstring}% benötigt
%\usepackage{scrbase}% nur bei Nicht-KOMA-Klassen nötig 

% Funktion zur Überprüfung auf Inhalt
\makeatletter 
	\def\ifEmpty#1{\def\@temp{#1}\ifx\@temp\@empty} 
\makeatother

% Sprachabhängige Bezeichner können mit babel-Option umgeschaltet werden
% Option/Sprache: ngerman
\newcaptionname{ngerman}{\NumTerm}{Nr.\,}% vor Nummer
\newcaptionname{ngerman}{\YearTerm}{}% vor Jahr
\newcaptionname{ngerman}{\ContTerm}{Enthält:}% vor "Enthält"-Text
\newcaptionname{ngerman}{\ContAOTerm}{Enthält u.\,a.:}% vor "Enthält u.a."-Text
\newcaptionname{ngerman}{\InTerm}{Darin:}% vor "Darin"-Text
\newcaptionname{ngerman}{\PlaceTerm}{}% vor Standord
\newcaptionname{ngerman}{\TitleTerm}{}% vor Titel/Thema
% Option/Sprache: english
\newcaptionname{english}{\NumTerm}{No.\,}
\newcaptionname{english}{\YearTerm}{}
\newcaptionname{english}{\ContTerm}{Contains:}
\newcaptionname{english}{\ContAOTerm}{Contains o/a:}% k.a. wie da dir Abkürzung sein müsste. amogst others?
\newcaptionname{english}{\InTerm}{Inside:}
\newcaptionname{english}{\PlaceTerm}{}
\newcaptionname{english}{\TitleTerm}{}

% Schriften
\newcommand{\TitleFont}[1]{\textsf{\textbf{#1}}}
\newcommand{\TitleLabelFont}[1]{\textbf{#1}}
\newcommand{\LabelFont}[1]{\textsf{#1}}
\newcommand{\ExtraFont}[1]{\textit{#1}}
\newcommand{\PlaceFont}[1]{\begingroup\footnotesize{#1}\endgroup}

% Zähler für lfd. Numer
\newcounter{nummer}
\renewcommand{\thenummer}{\arabic{nummer}}

% Höhe des Abstandes zwischen Blöcken, dadurch einheitlich änderbar
\newlength{\abstand}\setlength{\abstand}{1\baselineskip}

% Breite der Einrückung, dadurch einheitlich änderbar
\newlength{\einrueck}\setlength{\einrueck}{1em}

% Hilfsmaß für Minipage
\newlength{\MinipageWidth}
\setlength{\MinipageWidth}{\linewidth}
\addtolength{\MinipageWidth}{-\einrueck}
\newlength{\TEMPHELPLENGTH}\settowidth{\TEMPHELPLENGTH}{\ContAOTerm}
\addtolength{\MinipageWidth}{-\TEMPHELPLENGTH}


% Befehl für Datensätze
\newcommand{\data}[8][]{\noindent 
\parbox{\linewidth}{
   % Nummer Ausgeben, wenn kein opt. Arg. gegeben
   \ifEmpty{#1}\refstepcounter{nummer}\NumTerm\thenummer\else%
   	\IfBeginWith{#1}{!}{\StrGobbleLeft{#1}{1}}{\NumTerm#1}%
   \fi%
   \hfill%
   % Jahr ausgeben, falls vorhanden
   \ifEmpty{#2}\else\YearTerm#2\fi%
   \\[\abstand]%
   % Thema/Titel ausgeben, falls vorhanden
   \ifEmpty{#3}\else\hspace*{\einrueck}\TitleLabelFont{\TitleTerm}\TitleFont{#3}\\[\abstand]\fi%
   % "Darin" ausgeben, falls vorhanden
   \ifEmpty{#4}\else\hspace*{\einrueck}\LabelFont{\InTerm}\hfill%
   \begin{minipage}[t]{\MinipageWidth}#4\end{minipage}%
   \\[\abstand]\fi%
   % "Enthält" ausgeben, falls vorhanden
   \ifEmpty{#5}\else\hspace*{\einrueck}\LabelFont{\ContTerm}\hfill%
   \begin{minipage}[t]{\MinipageWidth}#5\end{minipage}%
   \\[\abstand]\fi%
   % "Enthält u.a." ausgeben, falls vorhanden
   \ifEmpty{#6}\else\hspace*{\einrueck}\LabelFont{\ContAOTerm}\hfill%
   \begin{minipage}[t]{\MinipageWidth}#6\end{minipage}%
   \\[\abstand]\fi%
   % Extratext ausgeben, falls vorhanden
   \ifEmpty{#7}\else\hspace*{\einrueck}%
   \begin{minipage}[t]{\MinipageWidth+\TEMPHELPLENGTH}\ExtraFont{#7}\end{minipage}%
   \\[\abstand]\fi%
   % Standort ausgeben, falls vorhanden
   \ifEmpty{#8}\else\hspace*{\einrueck}\PlaceFont{\LabelFont{\PlaceTerm}#8}\fi%
   \\[2\abstand]
}%
} 
% #1: Lfde Nr (optional), #2: Jahr, #3: Titel/Thema, #4: "Darin", #5: "Enthält",
% #6: "Enthält u.a." #7: "Extratext", #8: Standort
% wird #1 angegeben, wird auch der \NumTerm vorangestellt, außer das Argument beginnt mit eine
% Ausrufezeichen !, dann wird dieses Abgeschnitten und der Rest des Arguments ausgegeben.
% Wird ein ! gebraucht muss man zwei angeben
% Bsp. [4] --> "Nr. 4"
%      [Nummer 4] --> "Nr. Nummer 4"
%      [!Nummer 4] --> "Nummer 4"
%      [!! Nummer 4] --> "! Nummer 4"



\begin{document} 
\chapter{Grund und Boden} 
\section{Beispiele für Ausgabe} 

\data{1934}{Teilungsplan Schröder}{\blindtext}{\Blindtext}{\Blindtext}{\Blindtext}{2 Fasz. -- RGBl. XII/6, 18 bis 20}

\data{1934}{Teilungsplan Schröder}{}{\Blindtext}{\Blindtext}{\Blindtext}{2 Fasz. -- RGBl. XII/6, 18 bis 20}

\data{1934}{Teilungsplan Schröder}{\blindtext}{}{\Blindtext}{\Blindtext}{2 Fasz. -- RGBl. XII/6, 18 bis 20}

\data{1934}{Teilungsplan Schröder}{\blindtext}{\Blindtext}{}{\Blindtext}{2 Fasz. -- RGBl. XII/6, 18 bis 20}

\data{1934}{Teilungsplan Schröder}{\blindtext}{\Blindtext}{\Blindtext}{}{2 Fasz. -- RGBl. XII/6, 18 bis 20}

\data{1934}{Teilungsplan Schröder}{\blindtext}{\Blindtext}{\Blindtext}{\Blindtext}{}

\section{Beispiele für opt. Argument} 

\data{1934}{Teilungsplan Schröder}{}{}{\Blindtext}{\Blindtext}{2 Fasz. -- RGBl. XII/6, 18 bis 20}

\data[4]{1934}{Teilungsplan Schröder}{}{}{\Blindtext}{\Blindtext}{2 Fasz. -- RGBl. XII/6, 18 bis 20}

\data[Nummer 4]{1934}{Teilungsplan Schröder}{}{}{\Blindtext}{\Blindtext}{2 Fasz. -- RGBl. XII/6, 18 bis 20}

\data[!Nummer 4]{1934}{Teilungsplan Schröder}{}{}{\Blindtext}{\Blindtext}{2 Fasz. -- RGBl. XII/6, 18 bis 20}

\data[!! Nummer 4]{1934}{Teilungsplan Schröder}{}{}{\Blindtext}{\Blindtext}{2 Fasz. -- RGBl. XII/6, 18 bis 20}
\end{document}