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

setcounter robuster

parent 249e6ed8
Branches
No related tags found
No related merge requests found
No preview for this file type
\documentclass[ngerman]{vl-versandauftrag}
% TODO: Wird zweite Seite mit Titel "Versandauftrag -- Kopie für Versender --"
% benötigt?
\WorkingGroup{7.54}
\TelefonExtension{7216}
\Date{2015-04-21}
......@@ -28,7 +25,7 @@
\TransportType{0}
% Standard: 0 ("Transportunternehmen"); 1="Kundenveranlassung", 2="PTB"
\ShippingCompany{1}% nur relevant, wenn TransportType=0
\ShippingCompany{0}% nur relevant, wenn TransportType=0
% Standard: 4 ("DHL"); 0="Logiline", 1="TNT", 2="UPS", 3="FedEx", 5="Sonstige"
\ShippingNo{4711-0815}% nur relevant, wenn TransportType=0
\ShippingType{1}% Standard: 0 ("Standard"); 1="Express", 2="Special"
......
\ProvidesFile{vl-versandauftrag-1.clo}[Definitionen pdfLaTeX]
\ProvidesFile{vl-versandauftrag-1.clo}[Definitionen f. pdfLaTeX]
\RequirePackage[utf8]{inputenc}
\RequirePackage[T1]{fontenc}
......@@ -8,7 +8,6 @@
\RequirePackage[ttdefault=true,scale=1.034]{AnonymousPro}
%\RequirePackage[scaled=1.05]{zlmtt}% ist lmodern!
% TODO: Evtl. auslagern in "vl-versandauftrag-8bit.clo"
\DeclareUnicodeCharacter{202F}{\,}% 'NARROW NO-BREAK SPACE'
\DeclareUnicodeCharacter{2009}{\,\hspace{0pt}}% 'THIN SPACE'
\DeclareUnicodeCharacter{00AD}{\-}% 'SOFT HYPHEN'
......
\ProvidesFile{vl-versandauftrag-1.clo}[Definitionen luaLaTeX/XeLaTeX]
\ProvidesFile{vl-versandauftrag-1.clo}[Definitionen f. luaLaTeX/XeLaTeX]
\RequirePackage{fontspec}
\setsansfont[Ligatures=TeX]{TeXGyreHeros}
......@@ -9,6 +9,7 @@
BoldItalicFont = AnonymousPro-BoldItalic,
Scale = MatchLowercase
]
%\setmonofont[Scale=1.05]{Latin Modern Mono}
\RequirePackage{newunicodechar}
\newunicodechar{^^^^202f}{\,}% 'NARROW NO-BREAK SPACE' (\u202F, 8239)
......
......@@ -2,7 +2,7 @@
\listfiles
\NeedsTeXFormat{LaTeX2e}[1999/12/01]
\ProvidesClass{vl-versandauftrag}
[2015/04/23 v0.1d Dokumentenklasse (RN/PTB)]
[2015/04/23 v0.1e Dokumentenklasse (RN/PTB)]
\DeclareOption*{\PassOptionsToClass{\CurrentOption}{scrartcl}}
\ProcessOptions\relax
\PassOptionsToPackage{paper=a4,pagesize}{typearea}
......@@ -36,13 +36,17 @@
\let\vl@tempdima=\@ovxx
\let\vl@tempdimb=\@ovyy
\let\vl@tempdimc=\@ovdx
\newcommand\vl@tempa{}
\newcommand*\vl@setcounter[3]{% #1=counter, #2=default, #3=value
\edef\vl@tempa{\trim@spaces{#3}}%
\setcounter{#1}{\ifx\@empty\vl@tempa #2\else\vl@tempa\fi}%
}
\newif\ifInland \Inlandtrue
\newcommand*\Inland[1]{\expandafter\csname Inland\trim@spaces{#1}\endcsname}
\newif\ifEU \EUtrue
\newcommand*\EU[1]{\expandafter\csname EU\trim@spaces{#1}\endcsname}
\newcounter{vl@Shippingtype} \setcounter{vl@Shippingtype}{0}
\newcommand*\ShippingType[1]{\setcounter{vl@Shippingtype}{#1}}
\newcommand*\vl@ShippingNo{}
\newcommand*\ShippingNo[1]{\xdef\vl@ShippingNo{\trim@spaces@noexp{#1}}}
\newcommand*\vl@ShippingName{}
......@@ -83,11 +87,13 @@
\newcommand*\Referee[1]{\xdef\vl@Referee{#1}}
\newcounter{vl@TransportType} \setcounter{vl@TransportType}{0}
\newcommand*\TransportType[1]{\setcounter{vl@TransportType}{#1}}
\newcommand*\TransportType[1]{\vl@setcounter{vl@TransportType}{0}{#1}}
\newcounter{vl@Shippingtype} \setcounter{vl@Shippingtype}{0}
\newcommand*\ShippingType[1]{\vl@setcounter{vl@Shippingtype}{0}{#1}}
\newcounter{vl@ShippingCompany} \setcounter{vl@ShippingCompany}{4}
\newcommand*\ShippingCompany[1]{\setcounter{vl@ShippingCompany}{#1}}
\newcommand*\ShippingCompany[1]{\vl@setcounter{vl@ShippingCompany}{4}{#1}}
\newcounter{vl@ShippingPayment} \setcounter{vl@ShippingPayment}{0}
\newcommand*\ShippingPayment[1]{\setcounter{vl@ShippingPayment}{#1}}
\newcommand*\ShippingPayment[1]{\vl@setcounter{vl@ShippingPayment}{0}{#1}}
\newif\ifInflammable \Inflammablefalse
\newcommand*\LabelInflammable[1]{\expandafter\csname Inflammable\trim@spaces{#1}\endcsname}
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment