Skip to content
Snippets Groups Projects
Commit 7d0f1ffb authored by Rolf Niepraschk's avatar Rolf Niepraschk
Browse files

Allerlei

parent 2455b24d
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 107 additions and 73 deletions
antragsbestaetigung/antragsbestaetigung-test-de.pdf
+ 0
− 0
View file @ 7d0f1ffb
No preview for this file type
antragsbestaetigung/antragsbestaetigung-test-de.tex
+ 30
− 27
View file @ 7d0f1ffb
...@@ -3,33 +3,36 @@ ...@@ -3,33 +3,36 @@
\missingEntries{ 17 } \missingEntries{ 17 }
\yourref{4711-0815} \handledby{Ute Becker}%{{DB}}
\yourmail{2015-05-08} \myref{7.5-1V-17-54}%{{DB}}
%%%\mymail{}%{{DB}}
\handledby{Dr. Karl Jousten} \myphone{7467}%{{DB}}?
\myref{7.5-1V-15-05} \myfax{7490}%{{DB}}?
\mymail{2015-05-14} \myemail{Ute.Becker@ptb.de}%{{DB}}
\myphone{7316}
\myfax{7777} \yourref{4711-0815}%{{DB}}
\myemail{Karl.Jousten@ptb.de} \yourmail{2017-07-14}%{{DB}}
\KindOfEnquiry{E-Mail}%{{DB}}?
\DateOfApplication{2015-04-23} \DateOfEnquiry{}%{{DB}}
\KindOfEnquiry{E-Mail}
\DateOfEnquiry{}% wenn leer, dann identisch zu \DateOfApplication \Company{INFICON GmbH}%{{DB}}
\Name{Christian Scherer}%{{DB}}
\Company{Oerlikon Leybold Vakuum GmbH} \Street{Postfach 51 07 60}%{{DB}} zusätzl. Makro \POB (Post Office Box)?
\Name{Hans-Günter Eichner} \Zipcode{50943}%{{DB}}
\Street{Bonner Str. 498} \Town{Köln}%{{DB}}
\Zipcode{50968} \Land{}%{{DB}} Leer, wenn Deutschland
\Town{Köln}
\Land{} \Device{{Testleck gegen Atmosphäre Helium},
{Testleck gegen Atmosphäre R134a}}%{{DB}}
\Device{CDG 1\,Torr} %^-- besser zu enumerate-Liste wandeln
\Condition{Mondschein} \Condition{\SI{23+-0.5}{\degreeCelsius}}%{{DB}}
\ScheduleDate{2015-07-13} \ScheduleDate{2017-08-28}%{{DB}}
\Fee{1789.98} \Fee{1626.98}
\date{2015-05-26} \subject{Antragsbestätigung %{{DB}}
7.5-1V-17-54}
\date{2017-07-18}%{{DB}}
\begin{document} \begin{document}
\end{document} \end{document}
antragsbestaetigung/ptb-confirm-de.lco
+ 3
− 3
View file @ 7d0f1ffb
\ProvidesFile{ptb-confirm-de.lco}[2015/05/26 v0.1a (ptb-confirm, german)] \ProvidesFile{ptb-confirm-de.lco}[2017/12/04 v0.1b (ptb-confirm, german)]
\makeatletter \makeatletter
\opening{} \opening{}
Aufgrund Ihres Antrags vom \vl@DateOfApplication{}, hier eingegangen per Aufgrund Ihres Antrags vom \usekomavar{yourmail}, hier eingegangen per
\vl@KindOfEnquiry{} am \vl@DateOfEnquiry{}, führt die PTB folgende \vl@KindOfEnquiry{} am \vl@DateOfEnquiry{}, führt die PTB folgende
Kalibrierung durch: Kalibrierung durch:
\medskip\noindent \medskip\noindent
\begin{tabular}{@{}l@{~~}l@{}} \begin{tabular}{@{}l@{~~}l@{}}
Gerät: & \vl@Device \\ Gerät(e): & \vl@Device \\
Kalibrierbedingungen: & \vl@Condition \\ Kalibrierbedingungen: & \vl@Condition \\
Vorgesehenes Datum: & \vl@ScheduleDate \\ Vorgesehenes Datum: & \vl@ScheduleDate \\
Gebühr: & \vl@Fee\,€ \\ Gebühr: & \vl@Fee\,€ \\
......
antragsbestaetigung/ptb-confirm-en.lco
+ 3
− 3
View file @ 7d0f1ffb
\ProvidesFile{ptb-confirm-en.lco}[2015/05/26 v0.1a (ptb-confirm, englisch)] \ProvidesFile{ptb-confirm-en.lco}[2017/12/04 v0.1b (ptb-confirm, englisch)]
\makeatletter \makeatletter
\opening{} \opening{}
According to your order of \vl@DateOfApplication{}, received here via According to your order of \usekomavar{yourmail}, received here via
\vl@KindOfEnquiry{} on \vl@DateOfEnquiry{}, PTB will carry out the following \vl@KindOfEnquiry{} on \vl@DateOfEnquiry{}, PTB will carry out the following
calibration: calibration:
\medskip\noindent \medskip\noindent
\begin{tabular}{@{}l@{~~}l@{}} \begin{tabular}{@{}l@{~~}l@{}}
Device: & \vl@Device \\ Device(s): & \vl@Device \\
Calibration conditions: & \vl@Condition \\ Calibration conditions: & \vl@Condition \\
Scheduled date: & \vl@ScheduleDate \\ Scheduled date: & \vl@ScheduleDate \\
Calibration fee: & \vl@Fee\,€ \\ Calibration fee: & \vl@Fee\,€ \\
......
antragsbestaetigung/ptb-confirm.cls
+ 22
− 13
View file @ 7d0f1ffb
...@@ -4,7 +4,10 @@ ...@@ -4,7 +4,10 @@
\NeedsTeXFormat{LaTeX2e}[1999/12/01] \NeedsTeXFormat{LaTeX2e}[1999/12/01]
\ProvidesClass{ptb-confirm} \ProvidesClass{ptb-confirm}
[2016/11/17 v0.1b PTB-Brief-Klasse (RN)] [2017/12/04 v0.2a Bestaetigung (RN)]
\RequirePackage{eso-pic,graphicx,xcolor}
\RequirePackage{trimspaces,amsmath}
\DeclareOption*{\PassOptionsToClass{\CurrentOption}{ptbletter}} \DeclareOption*{\PassOptionsToClass{\CurrentOption}{ptbletter}}
...@@ -14,19 +17,26 @@ ...@@ -14,19 +17,26 @@
,BLN ,BLN
]{ptbletter} ]{ptbletter}
\RequirePackage{eso-pic,graphicx,xcolor} \RequirePackage{siunitx-PTB}
\providecommand*\vl@tempa{}
\providecommand*\vl@tempb{}
\providecommand*\vl@tempc{}
\providecommand*\vl@tempd{}
\providecommand*\vl@tempe{}
\newcommand*\vl@setcommand[3][]{% #1=default (opt.), #2=macro, #3=value \newcommand*\vl@setcommand[3][]{% #1=default (opt.), #2=macro, #3=value
\edef\vl@tempa{\trim@spaces@noexp{#3}}% \edef\vl@tempa{\trim@spaces@noexp{#3}}%
\expandafter\protected@xdef\csname #2\endcsname{% \expandafter\protected@xdef\csname #2\endcsname{%
\ifx\@empty\vl@tempa #1\else\vl@tempa\fi}% \ifx\@empty\vl@tempa #1\else\vl@tempa\fi}%
} }
\newcommand*\vl@Setcommand[2]{% #1=macro, #2=value
\@namedef{#1}{#2}%
}
\RequirePackage{trimspaces,siunitx}
\newcommand*\DateOfApplication[1]{\vl@setcommand{vl@DateOfApplication}{#1}}
\newcommand*\KindOfEnquiry[1]{\vl@setcommand{vl@KindOfEnquiry}{#1}} \newcommand*\KindOfEnquiry[1]{\vl@setcommand{vl@KindOfEnquiry}{#1}}
\newcommand*\DateOfEnquiry[1]{\vl@setcommand[\vl@DateOfApplication]{vl@DateOfEnquiry}{#1}} \newcommand*\DateOfEnquiry[1]{%
\vl@setcommand[\usekomavar{yourmail}]{vl@DateOfEnquiry}{#1}}
\newcommand*\Company[1]{\vl@setcommand{vl@Company}{#1}} \newcommand*\Company[1]{\vl@setcommand{vl@Company}{#1}}
\newcommand*\Name[1]{\vl@setcommand{vl@Name}{#1}} \newcommand*\Name[1]{\vl@setcommand{vl@Name}{#1}}
\newcommand*\Street[1]{\vl@setcommand{vl@Street}{#1}} \newcommand*\Street[1]{\vl@setcommand{vl@Street}{#1}}
...@@ -34,12 +44,11 @@ ...@@ -34,12 +44,11 @@
\newcommand*\Town[1]{\vl@setcommand{vl@Town}{#1}} \newcommand*\Town[1]{\vl@setcommand{vl@Town}{#1}}
\newcommand*\Land[1]{\vl@setcommand{vl@Land}{#1}} \newcommand*\Land[1]{\vl@setcommand{vl@Land}{#1}}
\newcommand*\Device[1]{\vl@setcommand{vl@Device}{#1}} \newcommand*\Device[1]{\vl@setcommand{vl@Device}{#1}}
\newcommand*\Condition[1]{\vl@setcommand{vl@Condition}{#1}} \newcommand*\Condition[1]{\vl@Setcommand{vl@Condition}{#1}}
\newcommand*\ScheduleDate[1]{\vl@setcommand{vl@ScheduleDate}{#1}} \newcommand*\ScheduleDate[1]{\vl@setcommand{vl@ScheduleDate}{#1}}
\newcommand*\Fee[1]{\vl@setcommand{vl@Fee}{\num{#1}}} \newcommand*\Fee[1]{\vl@Setcommand{vl@Fee}{\num{#1}}}
\newcommand*\missingEntries[1]{\vl@setcommand{vl@missingEntries}{#1}} \newcommand*\missingEntries[1]{\vl@setcommand{vl@missingEntries}{#1}}
\newcommand*\vl@DateOfApplication{}
\newcommand*\vl@KindOfEnquiry{} \newcommand*\vl@KindOfEnquiry{}
\newcommand*\vl@DateOfEnquiry{} \newcommand*\vl@DateOfEnquiry{}
\newcommand*\vl@Company{} \newcommand*\vl@Company{}
...@@ -73,12 +82,12 @@ ...@@ -73,12 +82,12 @@
\ifx\vl@Land\@empty\else \bigskip \\ \textls[75]{\MakeUppercase{\vl@Land}} \fi \ifx\vl@Land\@empty\else \bigskip \\ \textls[75]{\MakeUppercase{\vl@Land}} \fi
} }
\iflanguage{ngerman}{% \iflanguage{ngerman}{%
\sisetup{locale=DE} %\sisetup{locale=DE}
\subject{Antragsbestätigung}% \subject{Antragsbestätigung~\usekomavar{myref}}%
\input{ptb-confirm-de.lco}% \input{ptb-confirm-de.lco}%
}{% }{%
\sisetup{locale=UK} %\sisetup{locale=UK}
\subject{Confirmation of Order}% \subject{Confirmation of Order~\usekomavar{myref}}%
\input{ptb-confirm-en.lco}% \input{ptb-confirm-en.lco}%
}% }%
\end{letter} \end{letter}
......
kalibrierschein/siunitx-PTB.sty
+ 22
− 14
View file @ 7d0f1ffb
...@@ -2,7 +2,13 @@ ...@@ -2,7 +2,13 @@
\ProvidesPackage{siunitx-PTB}[2017/12/01 v0.1b Addionions to `siunitx'' (PTB/RN)] \ProvidesPackage{siunitx-PTB}[2017/12/01 v0.1b Addionions to `siunitx'' (PTB/RN)]
\RequirePackage{siunitx} \RequirePackage{amsmath,siunitx}
\providecommand*\vl@tempa{}
\providecommand*\vl@tempb{}
\providecommand*\vl@tempc{}
\providecommand*\vl@tempd{}
\providecommand*\vl@tempe{}
\DeclareSIUnit\torr{torr} \DeclareSIUnit\torr{torr}
\DeclareSIUnit\mbar{mbar} \DeclareSIUnit\mbar{mbar}
...@@ -45,24 +51,24 @@ ...@@ -45,24 +51,24 @@
\let\ke@orig@SI=\SI \let\ke@orig@SI=\SI
\renewcommand*\SI[2][]{% tolerant gegenüber "?" statt Zahl \renewcommand*\SI[2][]{% tolerant gegenüber "?" statt Zahl
\def\ks@tempa{#1}% \def\vl@tempa{#1}%
\edef\ks@tempb{\trim@spaces{#2}}% \edef\vl@tempb{\trim@spaces{#2}}%
\ks@SI@i \ks@SI@i
} }
\newcommand*\ks@SI@i[2][]{% \newcommand*\ks@SI@i[2][]{%
\def\ks@tempc{?}% \def\vl@tempc{?}%
\ifx\ks@tempb\ks@tempc \ifx\vl@tempb\vl@tempc
\ensuremath{\textbf{??}}\,\si[#1]{#2}% \ensuremath{\textbf{??}}\,\si[#1]{#2}%
\else \else
\edef\ks@tempe{\noexpand\ke@orig@SI[\ks@tempa]{\ks@tempb}[#1]{#2}}% \edef\vl@tempe{\noexpand\ke@orig@SI[\vl@tempa]{\vl@tempb}[#1]{#2}}%
\ks@tempe \vl@tempe
\fi \fi
} }
\let\ke@orig@num=\num \let\ke@orig@num=\num
\renewcommand*\num[1]{% tolerant gegenüber "?" statt Zahl \renewcommand*\num[1]{% tolerant gegenüber "?" statt Zahl
\edef\ks@tempb{\trim@spaces{#1}}% \edef\vl@tempb{\trim@spaces{#1}}%
\def\ks@tempc{?}% \def\vl@tempc{?}%
\ifx\ks@tempb\ks@tempc \ifx\vl@tempb\vl@tempc
\ensuremath{\textbf{??}}% \ensuremath{\textbf{??}}%
\else \else
\ke@orig@num{#1}% \ke@orig@num{#1}%
...@@ -70,10 +76,12 @@ ...@@ -70,10 +76,12 @@
} }
\RequirePackage{iflang} \RequirePackage{iflang}
\IfLanguageName{ngerman}{% \AtBeginDocument{%
\AtBeginDocument{\sisetup{locale=DE}} \IfLanguageName{ngerman}{
}{% \sisetup{locale=DE}
\AtBeginDocument{\sisetup{locale=UK}} }{%
\sisetup{locale=UK}
}
} }
\endinput \endinput
......
ptbletter/ptbletter.cls
+ 27
− 13
View file @ 7d0f1ffb
...@@ -4,7 +4,7 @@ ...@@ -4,7 +4,7 @@
\NeedsTeXFormat{LaTeX2e}[1999/12/01] \NeedsTeXFormat{LaTeX2e}[1999/12/01]
\ProvidesClass{ptbletter} \ProvidesClass{ptbletter}
[2017/12/01 v0.2b PTB-Brief-Klasse (RN)] [2017/12/04 v0.2c PTB-Brief-Klasse (RN)]
\let\ptb@tempdima=\@ovxx \let\ptb@tempdima=\@ovxx
\let\ptb@tempdimb=\@ovyy \let\ptb@tempdimb=\@ovyy
...@@ -73,9 +73,22 @@ ...@@ -73,9 +73,22 @@
% TODO: Mathematik? % TODO: Mathematik?
\ifXeOrLua% XeLaTeX oder luaLaTeX \ifXeOrLua% XeLaTeX oder luaLaTeX
\RequirePackage{fontspec} \RequirePackage{fontspec}
\RequirePackage{unicode-math}
\AtBeginDocument{% ??? \AtBeginDocument{% ???
\setromanfont{TeX Gyre Pagella}[Scale=1,Ligatures=TeX] \setromanfont{texgyrepagella}[
\setsansfont{TeX Gyre Heros}[Scale=MatchUppercase,Ligatures=TeX] Ligatures=TeX,
Extension=.otf,
UprightFont=*-regular,
BoldFont=*-bold,
ItalicFont=*-italic,
BoldItalicFont=*-bolditalic]
\setsansfont{texgyreheros}[
Ligatures=TeX,
Extension=.otf,
UprightFont=*-regular,
BoldFont=*-bold,
ItalicFont=*-italic,
BoldItalicFont=*-bolditalic]
} }
\RequirePackage[TT={Scale=0.85}]{dejavu-otf} \RequirePackage[TT={Scale=0.85}]{dejavu-otf}
\iffalse \iffalse
...@@ -111,18 +124,19 @@ ...@@ -111,18 +124,19 @@
\RequirePackage[\ptb@lang]{babel} \RequirePackage[\ptb@lang]{babel}
\RequirePackage{iflang} \RequirePackage{iflang}
\IfLanguageName{ngerman}{% \AtBeginDocument{%
\RequirePackage[babel=once,german=guillemets]{csquotes} \IfLanguageName{ngerman}{
}{% \RequirePackage[babel=once,german=guillemets]{csquotes}
\RequirePackage[babel=once]{csquotes} }{%
\useshorthands*{"} \RequirePackage[babel=once]{csquotes}
\useshorthands*{"}
}
\MakeAutoQuote{»}{«}
\defineshorthand{"`}{\openautoquote}
\defineshorthand{"'}{\closeautoquote}
} }
\MakeAutoQuote{»}{«}
\defineshorthand{"`}{\openautoquote}
\defineshorthand{"'}{\closeautoquote}
\AtEndOfClass{\shorthandon{"}}
\RequirePackage{amsmath,siunitx-PTB} \AtEndOfClass{\shorthandon{"}}
\@setplength{toaddrhpos}{72bp} \@setplength{toaddrhpos}{72bp}
\@setplength{toaddrvpos}{124bp} \@setplength{toaddrvpos}{124bp}
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment