From 7a73b62b6cdfcca711ab1d27d7ce0a384e45d3c9 Mon Sep 17 00:00:00 2001
From: niepra01 <rolf.niepraschk@ptb.de>
Date: Tue, 26 May 2015 15:31:42 +0200
Subject: [PATCH] Allerlei

---
 .../antragsbestaetigung-test.tex              | 29 +++--------
 antragsbestaetigung/antragsbestaetigung.cls   | 20 --------
 antragsbestaetigung/ptb-confirm-de.lco        | 40 +++++++++++++++
 antragsbestaetigung/ptb-confirm-en.lco        |  3 ++
 antragsbestaetigung/ptb-confirm.cls           | 49 +++++++++++++++++++
 ptbletter/ptbletter.cls                       | 19 ++++---
 6 files changed, 112 insertions(+), 48 deletions(-)
 delete mode 100644 antragsbestaetigung/antragsbestaetigung.cls
 create mode 100644 antragsbestaetigung/ptb-confirm-de.lco
 create mode 100644 antragsbestaetigung/ptb-confirm-en.lco
 create mode 100644 antragsbestaetigung/ptb-confirm.cls

diff --git a/antragsbestaetigung/antragsbestaetigung-test.tex b/antragsbestaetigung/antragsbestaetigung-test.tex
index 53b41ab..5da8a53 100644
--- a/antragsbestaetigung/antragsbestaetigung-test.tex
+++ b/antragsbestaetigung/antragsbestaetigung-test.tex
@@ -1,36 +1,21 @@
 
-\documentclass[en]{antragsbestaetigung}
-
-\usepackage{blindtext}
+\documentclass[de]{ptb-confirm}
 
 \yourref{4711-0815}
 \yourmail{2015-05-08}
 
-\handledby{Peter Silie}
+\handledby{Dr. Karl Jousten}
 \myref{7.5-1V-15-05}
 \mymail{2015-05-14}
 \myphone{7316}
 \myfax{7777}
-\myemail{Peter.Silie@ptb.de}
+\myemail{Karl.Jousten@ptb.de}
 
-\subject{Test der \LaTeX-Dokumentenklasse "`ptbletter"'}
+\DateOfApplication{2015-04-23}
+\KindOfEnquiry{E-Mail}
+\DateOfEnquiry{}% wenn leer, dann identisch zu \DateOfApplication
 
-\date{2015-05-21}
+\date{2015-05-26}
 
 \begin{document}
-
-\begin{letter}{%
-Ellen Bogen \\
-Dorfstraße 1\\
-12345 Musterhausen
-}
-
-\opening{Sehr geehrte Frau Bogen,}
-
-\blindtext[12]
-
-\encl{BlaBla}
-
-\end{letter}
-
 \end{document}
diff --git a/antragsbestaetigung/antragsbestaetigung.cls b/antragsbestaetigung/antragsbestaetigung.cls
deleted file mode 100644
index d425e8e..0000000
--- a/antragsbestaetigung/antragsbestaetigung.cls
+++ /dev/null
@@ -1,20 +0,0 @@
-% Rolf Niepraschk, Rolf.Niepraschk@ptb.de
-
-\setcounter{errorcontextlines}{100}  \listfiles
-
-\NeedsTeXFormat{LaTeX2e}[1999/12/01]
-\ProvidesClass{ptbletter}
-    [2015/05/26 v0.1a PTB-Brief-Klasse (RN)]
-
-%\DeclareOption{de}{\def\ptb@lang{main=ngerman}}
-
-\DeclareOption*{\PassOptionsToClass{\CurrentOption}{ptbletter}}
-
-\ProcessOptions\relax
-
-\LoadClass[%
-,BLN
-]{ptbletter}
-
-
-\endinput
diff --git a/antragsbestaetigung/ptb-confirm-de.lco b/antragsbestaetigung/ptb-confirm-de.lco
new file mode 100644
index 0000000..c1d1b8f
--- /dev/null
+++ b/antragsbestaetigung/ptb-confirm-de.lco
@@ -0,0 +1,40 @@
+\ProvidesFile{ptb-confirm-de.lco}[2015/05/26 v0.1a german (ptb-confirm.cls)]
+
+\makeatletter
+
+\opening{}
+
+Aufgrund Ihres Antrags vom \vl@DateOfApplication{}, hier eingegangen per
+\vl@KindOfEnquiry{} am \vl@DateOfEnquiry{}, führt die PTB folgende
+Kalibrierung durch:
+
+\medskip\noindent
+\begin{tabular}{@{}ll@{}}
+Gerät: & ??? \\
+Kalibrierbedingungen: & ??? \\
+Vorgesehenes Datum: & ??? \\
+Gebühr:  & ???\,€ \\
+\end{tabular}
+
+\medskip\noindent Ihr Antrag wird mit einem separaten Kostenbescheid
+abgerechnet. Die Höhe der festen Gebühr (Durchschnittsgebühr) basiert auf der
+Kostenverordnung für Nutzleistungen in der derzeit gültigen Fassung.
+Überschreitet der Arbeitsaufwand für Ihr Gerät den für die Durchschnittsgebühr
+ermittelten Arbeitsaufwand um mehr als 25\,\%, erfolgt eine Kostenermittlung
+nach tatsächlichem Aufwand.
+
+Die Verfahrensweise der PTB richtet sich nach verwaltungsrechtlichen
+Bestimmungen. Allgemeine Geschäftsbedingungen eines Antragstellers können nicht
+akzeptiert werden.
+
+Bitte haben Sie dafür Verständnis, dass wir zu unserer Sicherheit und zur
+Betriebsbereitschaft unserer Primärnormale keine Kalibrierung beginnen können,
+bevor nicht die beigelegte Erklärung unterschrieben an uns zurückgesandt ist.
+
+\closing{\MFg}
+
+\noindent Im Auftrag \par\medskip\noindent\usekomavar{handledby}
+
+\makeatother
+
+\endinput
diff --git a/antragsbestaetigung/ptb-confirm-en.lco b/antragsbestaetigung/ptb-confirm-en.lco
new file mode 100644
index 0000000..a5c9bae
--- /dev/null
+++ b/antragsbestaetigung/ptb-confirm-en.lco
@@ -0,0 +1,3 @@
+\ProvidesFile{ptb-confirm-de.lco}[2015/05/26 v0.1a english (ptb-confirm.cls)]
+
+\endinput
diff --git a/antragsbestaetigung/ptb-confirm.cls b/antragsbestaetigung/ptb-confirm.cls
new file mode 100644
index 0000000..f09793f
--- /dev/null
+++ b/antragsbestaetigung/ptb-confirm.cls
@@ -0,0 +1,49 @@
+% Rolf Niepraschk, Rolf.Niepraschk@ptb.de
+
+\setcounter{errorcontextlines}{100}  \listfiles
+
+\NeedsTeXFormat{LaTeX2e}[1999/12/01]
+\ProvidesClass{ptb-confirm}
+    [2015/05/26 v0.1a PTB-Brief-Klasse (RN)]
+
+\DeclareOption*{\PassOptionsToClass{\CurrentOption}{ptbletter}}
+
+\ProcessOptions\relax
+
+\LoadClass[%
+,BLN
+]{ptbletter}
+
+\newcommand*\vl@setcommand[3][]{%  #1=default (opt.), #2=macro, #3=value
+  \edef\vl@tempa{\trim@spaces@noexp{#3}}%
+  \expandafter\protected@xdef\csname #2\endcsname{%
+    \ifx\@empty\vl@tempa #1\else\vl@tempa\fi}%
+}
+
+\RequirePackage{trimspaces}
+
+\newcommand*\DateOfApplication[1]{\vl@setcommand{vl@DateOfApplication}{#1}}
+\newcommand*\KindOfEnquiry[1]{\vl@setcommand{vl@KindOfEnquiry}{#1}}
+\newcommand*\DateOfEnquiry[1]{\vl@setcommand[\vl@DateOfApplication]{vl@DateOfEnquiry}{#1}}
+
+\newcommand*\vl@DateOfApplication{}
+\newcommand*\vl@KindOfEnquiry{}
+\newcommand*\vl@DateOfEnquiry{}
+
+\AtBeginDocument{%
+  \begin{letter}{%
+  Ellen Bogen \\
+  Dorfstraße 1\\
+  12345 Musterhausen
+  }
+    \iflanguage{ngerman}{%
+      \subject{Antragsbestätigung}%
+      \input{ptb-confirm-de.lco}%
+    }{%
+      \subject{Confirmation of Order}%
+      \input{ptb-confirm-en.lco}%
+    }%
+  \end{letter}
+}%
+
+\endinput
diff --git a/ptbletter/ptbletter.cls b/ptbletter/ptbletter.cls
index 86429b7..16dcabc 100644
--- a/ptbletter/ptbletter.cls
+++ b/ptbletter/ptbletter.cls
@@ -14,7 +14,9 @@
 \let\ptb@tempdimf=\@dashdim
 
 \newif\ifptb@BLN \ptb@BLNtrue
-\newif\ifptb@serif \ptb@seriffalse
+\newif\ifptb@serif \ptb@seriftrue
+
+\newcommand*\ptb@lang{main=ngerman}
 
 \DeclareOption{german}{\def\ptb@lang{main=ngerman}}
 \DeclareOption{ngerman}{\def\ptb@lang{main=ngerman}}
@@ -120,7 +122,7 @@
 \@setplength{lochpos}{-354bp}% "-" --> vom linken Blattand aus
 \@setplength{locvpos}{146bp}%      --> vom oberen Blattand aus
 \@setplength{locwidth}{212bp}
-\@setplength{locheight}{135bp}
+\@setplength{locheight}{139bp}
 
 %\@setplength{refaftervskip}{75bp}
 
@@ -298,8 +300,13 @@
   \fi
 }
 
-\newcommand*\MFG{Mit freundlichen Gr\"u\ss en}
-
-\newcommand*\MHG{Mit herzlichen Gr\"u\ss en}
-
+\iflanguage{ngerman}{%
+  \newcommand*\MFG{Mit freundlichen Gr\"u\ss en}
+  \newcommand*\MFg{Mit freundlichem Gru\ss}
+  \newcommand*\MHG{Mit herzlichen Gr\"u\ss en}
+}{%
+  \newcommand*\MFG{Yours sincerely}
+  \newcommand*\MFg{Sincerely}
+  \newcommand*\MHG{With kind regards}
+}
 \endinput
-- 
GitLab