Newer
Older
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
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