blob: d9fc64992042960eb1e6b93a765efccc2e34fc68 (
plain)
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
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
|
%%
%% This is file `scraddr.sty',
%% generated with the docstrip utility, extended by scrdocstrip.
%%
%% The original source files were:
%%
%% scraddr.dtx (with options: `scraddr')
%% scrlogo.dtx (with options: `logo')
%%
%% Copyright (c) 2006-2013 Markus Kohm [komascript at gmx info]
%%
%% This file was generated from file(s) of the KOMA-Script bundle.
%% ---------------------------------------------------------------
%%
%% It may be distributed under the conditions of the
%% LaTeX Project Public License in the version distributed together
%% with KOMA-Script, see file `lppl.txt' or `lppl-de.txt'.
%%
%% This file may only be distributed together with a copy of the
%% KOMA-Script bundle. You may however distribute the
%% KOMA-Script bundle without all such generated files. See also
%% `lppl.txt' or `lppl-de.txt' for additional information.
%%
%% The list of files belonging to KOMA-Script distribution is given in
%% the file `manifest.txt'. See also `lppl.txt' or `lppl-de.txt' for
%% additional information.
%%
%% If this file is a beta version, you may not be allowed to distribute
%% it. Look at the comments below to see if this is the case.
%%
%% English and German manuals are part of KOMA-Script bundle.
%% ----------------------------------------------------------
%%
%% See `README'.
%%
%% The KOMA-Script bundle (but maybe not this file) was based upon the
%% LaTeX 2.09 Script family created by Frank Neukam 1993 and the LaTeX2e
%% standard classes created by The LaTeX3 Project 1994-1996. You may
%% find a complete unmodified copy of LaTeX2e at
%% <http://www.ctan.org/pub/tex-archive/macros/latex/base/>.
%%
%%% From File: $Id: scraddr.dtx 1380 2013-10-01 15:31:55Z mjk $
\NeedsTeXFormat{LaTeX2e}[1995/12/01]
\ProvidesPackage{scraddr}
[2013/09/30 v1.1c KOMA-Script
package]
\newcommand*{\@adrFIVerror}{}
\DeclareOption{adrFreeIVempty}{\renewcommand*{\@adrFIVerror}{0}}
\DeclareOption{adrFreeIVshow}{\renewcommand*{\@adrFIVerror}{1}}
\DeclareOption{adrFreeIVwarn}{\renewcommand*{\@adrFIVerror}{2}}
\DeclareOption{adrFreeIVstop}{\renewcommand*{\@adrFIVerror}{3}}
\ExecuteOptions{adrFreeIVshow}
\ProcessOptions\relax
\newcommand{\InputAddressFile}[1]{\begingroup
\ifcase\@adrFIVerror
\def\adrentry##1##2##3##4##5##6##7{%
\addrentry{##1}{##2}{##3}{##4}{##5}{##6}{##7}{}}%
\or
\def\adrentry##1##2##3##4##5##6##7##8{%
\addrentry{##1}{##2}{##3}{##4}{##5}{##6}{##7}{%
(entry FreeIV undefined at `##8')}{##8}}%
\or
\def\adrentry##1##2##3##4##5##6##7##8{%
\addrentry{##1}{##2}{##3}{##4}{##5}{##6}{##7}{%
\PackageWarning{scraddr}{%
`##8' was defined using \string\adrentry\MessageBreak
so \string\FreeIV-entry is not defined}}{##8}}%
\else
\def\adrentry##1##2##3##4##5##6##7##8{%
\addrentry{##1}{##2}{##3}{##4}{##5}{##6}{##7}{%
\PackageError{scraddr}{%
\string\FreeIV\space undefined at `##8'}{%
`##8' was defined using \string\adrentry\MessageBreak
so \string\FreeIV-entry is not defined.\MessageBreak
You may continue but you should check output}}{##8}}%
\fi
\providecommand*{\addrchar}[1]{}%
\providecommand*{\adrchar}{\addrchar}%
\def\addrentry##1##2##3##4##5##6##7##8##9{%
\def\@tempa{##9}\ifx\@tempa\@empty\else
\expandafter\gdef\csname ##9.LN\endcsname{##1}
\expandafter\gdef\csname ##9.FN\endcsname{##2}
\expandafter\gdef\csname ##9.A\endcsname{##3}
\expandafter\gdef\csname ##9.P\endcsname{##4}
\expandafter\gdef\csname ##9.FI\endcsname{##5}
\expandafter\gdef\csname ##9.FII\endcsname{##6}
\expandafter\gdef\csname ##9.FIII\endcsname{##7}
\expandafter\gdef\csname ##9.FIV\endcsname{##8}
\fi}
\InputIfFileExists{#1.adr}
{\typeout{Load addressfile: #1.adr.}}
{\PackageError{scraddr}
{File #1.adr not found}
{The addressfile you wanted is not
available}}
\endgroup}
\newcommand*{\Name}[1]{\FirstName{#1}\ \LastName{#1}}
\newcommand*{\FirstName}[1]{\csname #1.FN\endcsname}
\newcommand*{\LastName}[1]{\csname #1.LN\endcsname}
\newcommand*{\Address}[1]{\csname #1.A\endcsname}
\newcommand*{\Telephone}[1]{\csname #1.P\endcsname}
\newcommand*{\FreeI}[1]{\csname #1.FI\endcsname}
\newcommand*{\FreeII}[1]{\csname #1.FII\endcsname}
\newcommand*{\Comment}{}
\newcommand*{\FreeIII}[1]{\csname #1.FIII\endcsname}
\let\Comment\FreeIII
\newcommand*{\FreeIV}[1]{\csname #1.FIV\endcsname}
%%% From File: $Id: scrlogo.dtx 1380 2013-10-01 15:31:55Z mjk $
\@ifundefined{KOMAScript}{%
\DeclareRobustCommand{\KOMAScript}{\textsf{K\kern.05em O\kern.05em%
M\kern.05em A\kern.1em-\kern.1em Script}}}{}
\endinput
%%
%% End of file `scraddr.sty'.
|
