Newer
Older
\NeedsTeXFormat{LaTeX2e}[1999/12/01]
[2018/05/15 v1.0a Dokumentenklasse (RN/PTB)]
\DeclareOption*{\PassOptionsToClass{\CurrentOption}{scrartcl}}
\ProcessOptions\relax
\PassOptionsToPackage{headinclude,usegeometry}{typearea}
,toc=bibliographynumbered
,captions=oneline
\RequirePackage[%
paper=a4paper,
headheight=16mm,
inner=22mm,
%right=16mm,
textwidth=172mm,% 172+22+16=210
\renewcommand*\maketitle[1][1]{%
\begingroup
\centering \noindent\usekomafont{title}
\Large \@title \par \bigskip\medskip
\endgroup
}
\let\ptb@endtabularx=\TX@endtabularx
\RequirePackage{xltabular}
\RequirePackage{amsmath,threeparttable,tabto,grffile}
\RequirePackage{pdflscape,picture,trimspaces,url,varwidth,placeins}
\RequirePackage{longtable,siunitx,ragged2e,ifxetex,ifluatex,relsize}
\let\ptb@tempdima=\@clnwd
\let\ptb@tempdimb=\@clnht
\let\ptb@tempdimc=\@dashdim
\newcommand*\ptb@Devision{}
\newcommand*\ptb@Department{}
\newcommand*\ptb@WorkingGroup{}
\newcommand*\ptb@Object{}
\newcommand*\ptb@Ident{}
\newcommand*\ptb@Edition{}
\newcommand*\ptb@Date{}
\ifxetex
\def\ptb@tempa{1}%
\else
\ifluatex
\def\ptb@tempa{1}%
\fi
\fi
\ifcase\ptb@tempa % pdfTeX
\input{vl-aa-old-engines.clo}
\or % XeTeX oder luaTeX
\input{vl-aa-new-engines.clo}
\RequirePackage[
,final=true
,babel=true
]{microtype}
\RequirePackage[autostyle=true,babel=once,german=guillemets,maxlevel=3]{csquotes}%
\defineshorthand{"`}{\openautoquote}%
\defineshorthand{"'}{\closeautoquote}%
\MakeAutoQuote{»}{«}% Alt Gr + y / Alt Gr + x
\MakeAutoQuote{„}{“}% Alt Gr + v / Alt Gr + b
\newcommand*\Devision[1]{\xdef\ptb@Devision{\trim@spaces{#1}}}
\newcommand*\Department[1]{\xdef\ptb@Department{\trim@spaces{#1}}}
\newcommand*\WorkingGroup[1]{\xdef\ptb@WorkingGroup{\trim@spaces{#1}}}
\newcommand*\Object[1]{\xdef\ptb@Object{\trim@spaces{#1}}}
\newcommand*\Edition[1]{\xdef\ptb@Edition{\trim@spaces{#1}}}
\RequirePackage{tocstyle}
\usetocstyle{allwithdot}
\settocfeature{raggedhook}{\raggedright}% verhindert auch Trennung
\settocfeature{pagenumberbox}{\makebox[1.5em][r]}
\settocfeature{entryhook}{\overfullrule=\z@}
\BeforeStartingTOC[toc]{\microtypesetup{protrusion=false}}
\AfterStartingTOC[toc]{\microtypesetup{protrusion=true}}
\addtokomafont{caption}{\small}
\addtokomafont{captionlabel}{\bfseries\sffamily}
\setcapindent{1em}
\AtBeginDocument{%
\edef\ptb@Ident{\ptb@Department-AA-\ptb@Object}%
\edef\ptb@Date{\@date}%
\date{}%
}
\newcolumntype{C}{>{\centering\arraybackslash}X}
\newcolumntype{R}{>{\RaggedRight\arraybackslash}X}
\newcommand\varbox[2][\linewidth]{%
\begin{varwidth}{#1}\nointerlineskip\strut#2\strut\end{varwidth}\strut}
\newcommand\varboxC[2][\linewidth]{\varbox[#1]{\Centering#2}}
\newcommand*\ptb@head@even{%
\begin{picture}(0,0)
\linethickness{\ptb@rulewidth}%
\put(0,-2.5mm){\line(1,0){\textwidth}}%
\end{picture}
\normalfont\sffamily\bfseries\large
PTB\hfill Qualit\"atsmanagement-Arbeitsanweisung\hfill\ptb@Ident
\begin{picture}(0,0)
\linethickness{\ptb@rulewidth}%
\put(0,-2.5mm){\line(1,0){\textwidth}}%
\end{picture}
\normalfont\sffamily\bfseries\large
\ptb@Ident \hfill Qualit\"atsmanagement-Arbeitsanweisung \hfill PTB
\newcommand*\ptb@first@foot{%
\raisebox{-4bp}[0pt][0pt]{%
\let\TX@endtabularx=\ptb@endtabularx
\normalfont\sffamily\tiny\extrarowheight=.3\baselineskip
\arrayrulewidth=\ptb@rulewidth \extratabsurround=0pt %
\renewcommand\tabularxcolumn[1]{m{##1}}%
\begin{tabularx}{\textwidth}[b]{@{}|C|C|C|c|c|c|@{}} \firsthline
Abteilung~\ptb@Devision, Fachbereich~\ptb@Department \\
\varboxC{Geprüft: \\ Leiter~\ptb@Department \\~}
\varboxC{Seite von Seiten \\ \thepage~von \ztotpages\\~}
\tabularnewline
&&&&& \tabularnewline
&&&&& \tabularnewline
am:~\dotfill
&
am:~\dotfill
&
am:~\dotfill
&
&& \tabularnewline \lasthline
\end{tabularx}%
\endgroup
}%
}
\newcommand*\ptb@foot@even{%
\begingroup
\let\TX@endtabularx=\ptb@endtabularx
\normalfont\sffamily\tiny\extrarowheight=.3\baselineskip
\arrayrulewidth=\ptb@rulewidth \extratabsurround=0pt %
\renewcommand*\tabularxcolumn[1]{m{##1}}%
\begin{tabularx}{\textwidth}[b]{@{}|C|C|C|C|C|@{}} \firsthline
\varboxC{Erstellt: \\ Abteilung~\ptb@Devision, Fachbereich~\ptb@Department}
\varboxC{Seite von Seiten \\ \thepage~von \ztotpages}
\tabularnewline \lasthline
\end{tabularx}%
\endgroup
}
\newcommand*\ptb@foot@odd{%
\begingroup
\let\TX@endtabularx=\ptb@endtabularx
\normalfont\sffamily\tiny\extrarowheight=.3\baselineskip
\arrayrulewidth=\ptb@rulewidth \extratabsurround=0pt %
\renewcommand*\tabularxcolumn[1]{m{##1}}%
\begin{tabularx}{\textwidth}[b]{@{}|C|C|C|C|C|@{}} \firsthline
\varboxC{Seite von Seiten \\ \thepage~von \ztotpages}
\varboxC{Erstellt: \\ Abteilung~\ptb@Devision, Fachbereich~\ptb@Department}
\RequirePackage[manualmark,draft=false]{scrlayer-scrpage}
\pagestyle{scrheadings}
\clearpairofpagestyles
\cehead{\ptb@head@even}
\cohead{\ptb@head@odd}
\cefoot{\ptb@foot@even}
\cofoot{\ifnum\c@page=\@ne\ptb@first@foot\else\ptb@foot@odd\fi}
\setkomafont{pageheadfoot}{\normalfont\normalsize}
\RequirePackage{enumitem}
\setlist{leftmargin=*}
\setlist[1]{labelindent=1em}
\renewcommand{\floatpagefraction}{.9}
\renewcommand{\textfraction}{.1}
\renewcommand{\topfraction}{.9}
\renewcommand{\bottomfraction}{.5}
\setcounter{topnumber}{3}
\setcounter{bottomnumber}{1}
\setcounter{totalnumber}{5}
\renewcommand{\dbltopfraction}{.8}
\renewcommand{\dblfloatpagefraction}{.6}
% Einzelne Abbildungen nicht auf dem leeren Blatt zentrieren.
\@fptop=0pt %
\sisetup{% Formatierung von Maßzahlen (z.B. Spaltentyp "S" in Tabellen)
,retain-zero-exponent=true
,retain-unity-mantissa=true
,add-decimal-zero=true
,add-integer-zero=true
,zero-decimal-to-integer=false
}
\addtokomafont{title}{\sisetup{detect-weight=true, detect-family=true}}
\addtokomafont{disposition}{\sisetup{detect-weight=true, detect-family=true}}
\RedeclareSectionCommand[
,tocindent=3em
,tocnumwidth=3.5em
]{section}
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
\RequirePackage{marginnote}
\DeclareRobustCommand\note{%
% Normalform = Horizontale Notiz;
% #1 = vertikale Verschiebung (ohne Einheit: Anzahl Zeilen)
% Sternform = Um 90 Grad gedrehte Notiz;
% #1 = Breite (ohne Einheit: Anzahl mm, ohne Angabe: 3\marginparwidth)
\@ifstar{\@tempswatrue\note@i}{\@tempswafalse\note@i}%
}
\newcommand*\note@i[1][\z@]{%
\note@ii[#1]%
}
\newcommand*\note@ii{}
\def\note@ii[#1]#2{%
\begingroup{}
\if@tempswa
\unitlength=1mm\relax
\else
\unitlength=\baselineskip
\fi
\@ovro#1\unitlength
\if@tempswa
\@ovri=\ifdim\@ovro=\z@ 3\marginparwidth\else\@ovro\fi
\@ovro=\z@
\def\x{\rotatebox[origin=c]{90}{\makebox[0pt][c]{%
\parbox{\@ovri}{\baselineskip=0pt\RaggedRight\hspace{0pt}#2}}}}%
\else
\def\x{\baselineskip=0pt\RaggedRight\hspace{0pt}#2}%
\fi
\overfullrule=\z@
\marginnote{\x}[\@ovro]%
\endgroup
\ignorespaces% problematisch!
}
% Für Parameter #1 Angabe mit und ohne Einheit ermöglichen.
\picture@redefine\note@ii{[&1]}
\renewcommand*\marginfont{\normalfont\normalsize\itshape\color{red}}
\RequirePackage[final]{hyperref}