Skip to content
Snippets Groups Projects

Compare revisions

Changes are shown as if the source revision was being merged into the target revision. Learn more about comparing revisions.

Source

Select target project
No results found

Target

Select target project
  • vaclab/ptb-latex
  • andre.waehlisch/ptb-latex
2 results
Show changes
\documentclass[de, 2020]{vl-versandauftrag}
\WorkingGroup{7.54}
\TelefonExtension{}
\Date{2020-09-14}
\Referee{AG 7.54}
\Purchaser{Beate Prußeit}
\CostUnit{7500}
\FinanceUnit{}
\Account{XYZ}
\SAPNo{4102024, 7.5-1V-20-59}
\IndicationOfValue{2880,75}
\CalibrationCosts{17,95}
\ShippingName{INFICON GmbH}
\ShippingContact{Merhawi Mehreteab}
\ShippingPhone{+49 221 56788-548}
\ShippingEmail{Merhawi.Mehreteab@inficon.com}
\ShippingStreet{Bonner Str. 498}
\ShippingTown{Köln}
\ShippingZipcode{50968}
\ShippingLand{}
\ModeOfTransport{Abholung wird vom Empfänger veranlasst}
\ModeOfTransport{* TNT}
\ShippingCustomerID{987654321}
\ShippingType{1}% 0=Standard, 1=Übernacht-Express, 2=andere
\ShippingPayment{1}% 0=frei, 1=unfrei, 2=Kostenbescheid
\Content{None SN: None, Zubehör}
\LabelInflammable{true}
\LabelGlas{true}
\LabelSensitive{true}
\LabelTop{true}
\LabelDangerous{true}
\Insurance{true}% Standard: false
\begin{document}
\end{document}
%---------------------------
\ProvidesFile{vl-versandauftrag-2019.clo}
[2019/01/29 Versandauftrag (2019er Definitionen)]
[2019/07/09 Versandauftrag (2019er Definitionen)]
\AddToShipoutPictureBG{%
\frenchspacing
......@@ -36,7 +36,7 @@
\put( 62bp,\vl@tempdimc){Org.-Einheit, Sachbearbeiter}%
\put(232bp,\vl@tempdimc){Telefon: 030/3481}%
\put(310bp,\vl@tempdimc){Datum}%
\put(395bp,\vl@tempdimc){Versandauftrag wurde ausgefüllt von}%
%%%\put(395bp,\vl@tempdimc){Versandauftrag wurde ausgefüllt von}%
\vl@tempdimc=728bp %
\normalsize
\put(62bp,\vl@tempdimc){\textbf{Versand über Lager Berlin:}}%
......@@ -58,8 +58,8 @@
{andere:}}%
\put(233bp,606bp){\checkBox[\ifInsurance 1\else 0\fi]%
{Kunde wünscht Versicherung}}%
\put(233bp,586bp){\checkBox[1]{Kosten werden vom Laboratorium} per
\textbf{Kostenbescheid}}%
\put(233bp,586bp){\checkBox[1]{Kosten werden vom Laboratorium per
\textbf{Kostenbescheid}}}%
\put(249bp,576bp){eingezogen}%
\footnotesize
\vl@tempdima=62bp %
......@@ -114,7 +114,12 @@
\ttfamily\normalsize
\vl@tempdimc=744bp % -14bp
\put(\vl@tempdima,\vl@tempdimc){\vl@WorkingGroup,~\vl@Referee}%
\put(395bp,\vl@tempdimc){\vl@Purchaser}%
\put(395bp,757bp){%
\parbox[t]{146bp}{%
\vl@Purchaser\\[-1ex]
\texttt{vacuum.cal@ptb.de}%
}
}%
\put(232bp,\vl@tempdimc){\vl@TelefonExtension}%
\put(310bp,\vl@tempdimc){\vl@Date}%
\vl@tempdimc=547bp % -14bp
......
\ProvidesFile{vl-versandauftrag-2020.clo}
[2021/04/08 Versandauftrag (2020er Definitionen)]
\AddToShipoutPictureBG{%
\frenchspacing
\AtPageLowerLeft{%
\linethickness{0.6bp}%
\vl@tempdima=57bp %
\vl@tempdimb=58bp %
\put(\vl@tempdima,\vl@tempdimb){\framebox(\textwidth,\textheight){}}%
% dünne waagerechte Linien
\put(\vl@tempdima,767bp){\line(1,0){\textwidth}}%
\put(\vl@tempdima,739bp){\line(1,0){\textwidth}}%
\put(\vl@tempdima,630bp){\line(1,0){\textwidth}}% "Zahlungsart"
\put(\vl@tempdima,570bp){\line(1,0){\textwidth}}% nach "Kostenbescheid"
\put(\vl@tempdima,542bp){\line(1,0){340bp}}% nach "Kostenstelle"
%%%%
\put(\vl@tempdima,514bp){\line(1,0){\textwidth}}% nach "Wertangabe"
\put(\vl@tempdima,406bp){\line(1,0){\textwidth}}% vor "Inhalt"
\put(\vl@tempdima,205bp){\line(1,0){\textwidth}}%
\put(\vl@tempdima,104bp){\line(1,0){\textwidth}}%
\put(\vl@tempdima, 81bp){\line(1,0){\textwidth}}%
% dünne senkrechte Linien
\put(227bp,630bp){\line(0,1){137bp}}% hinter "Sachbearbeiter"
\put(305bp,739bp){\line(0,1){60bp}}% hinter "Telefon"
\put(389bp,739bp){\line(0,1){28bp}}% hinter "Datum"
\put(245bp,82bp){\line(0,1){22bp}}% vor "Verpackt durch"
\put(290bp,\vl@tempdimb){\line(0,1){23bp}}% vor "Unterschrift"
\put(213bp,514bp){\line(0,1){56bp}}% vor "Finanzstelle"
\put(397bp,514bp){\line(0,1){56bp}}% vor "Kosten der Kalibrierung"
\put(407bp,81bp){\line(0,1){60bp}}% vor "Gewicht"
% Feste Beschriftung
\put(57bp,780bp){\parbox[c][32bp]{247bp}{\centering\bfseries\vl@mainTitle}}%
\put(321bp,786bp){\large Physikalisch-Technische Bundesanstalt}%
\put(343bp,772bp){\large Abbestraße 2--12, 10587 Berlin}%
\footnotesize
\vl@tempdimc=758bp %
\put( 62bp,\vl@tempdimc){Org.-Einheit, Sachbearbeiter}%
\put(232bp,\vl@tempdimc){Telefon: 030/3481}%
\put(310bp,\vl@tempdimc){Datum}%
\put(395bp,\vl@tempdimc){Versandauftrag wurde ausgefüllt von}%
\vl@tempdimc=728bp %
\normalsize
\put(62bp,\vl@tempdimc){\textbf{Versand per:}}%
\iffalse
\put(62bp,709bp){\checkBox{\textbf{Transportunternehmen}}}%
\put(77bp,689bp){\checkBox{Logiline}}%
\put(77bp,675bp){\checkBox{TNT}}%
\put(77bp,661bp){\checkBox{UPS}}%
\put(77bp,647bp){\checkBox{FedEx}}%
\put(77bp,633bp){\checkBox{Post/DHL Express
(unfreier}}%
\put(94bp,622bp){Versand nur ins Inland)}%
\put(77bp,606bp){\checkBox[\vl@SelCompany{5}]{}}%
\fi
\ifShippingCompany
\put(62bp,709bp){\checkBox[1]{\textbf{Transportunternehmen}}}%
\put(77bp,689bp){\checkBox[1]{\vl@ModeOfTransport}}%
\put(62bp,667bp){\textbf{Kundennr.:}~\texttt{\vl@ShippingCustomerID}}%
\else
\put(62bp,709bp){%
\checkBox[1]{\parbox[t]{141bp}{\setstretch{1}%
\textbf{\vl@ModeOfTransport}}}%
}%
\fi
\ifInsurance
\put(62bp,636bp){\checkBox[1]{Kunde wünscht Versicherung}}%
\fi
\put(233bp,\vl@tempdimc){\textbf{Zustellungsart:}}%
\put(233bp,709bp){\checkBox[\ifnum\c@vl@ShippingType=0 1\else0\fi]%
{Standard \scriptsize(2--3 Tage)}}%
\put(233bp,689bp){\checkBox[\ifnum\c@vl@ShippingType=1 1\else0\fi]%
{Übernacht-Express}}%
\put(233bp,667bp){\checkBox[\ifnum\c@vl@ShippingType=2 1\else0\fi]%
{andere:}}%
\vl@tempdima=62bp %
\vl@tempdimc=561bp %
\small
\put(\vl@tempdima,620bp){Angaben zur Zahlungsart:}%
\put(62bp,600bp){\checkBox[\ifnum\c@vl@ShippingPayment=0 1\else0\fi]%
{\textbf{frei}~(Kosten trägt die PTB)}}%
\put(62bp,590bp){\footnotesize Begründung}%
\put(220bp,600bp){\checkBox[\ifnum\c@vl@ShippingPayment=1 1\else0\fi]%
{\textbf{unfrei}~(Empfänger zahlt)}}%
\put(370bp,600bp){\checkBox[\ifnum\c@vl@ShippingPayment=2 1\else0\fi]%
{Kosten werden vom Laboratorium}}%
\put(386bp,590bp){per \textbf{Kostenbescheid} eingezogen}%
\footnotesize
\put(\vl@tempdima,\vl@tempdimc){Kostenstelle}%
\put(218bp,\vl@tempdimc){Finanzstelle}%
\put(401bp,\vl@tempdimc){Kosten der Kalibrierung}%
\vl@tempdimc=533bp %
\put(\vl@tempdima,\vl@tempdimc){ggf. SAP-Auftragsnummer}%
\put(218bp,\vl@tempdimc){Wertangabe}%
%%%\put(401bp,\vl@tempdimc){PSP-Element}%
\normalsize
\vl@tempdimc=502bp %
\put(\vl@tempdima,\vl@tempdimc){Empfänger (Name, Straße, PLZ, Ort, Land)
Zustellungen an ein Postfach sind nicht möglich!}%
\put(\vl@tempdima,393bp){Inhalt:}%
\put(\vl@tempdima,194bp){Sendung mit folgendem \textbf{Warnhinweis} versehen:}
\put(\vl@tempdima,173bp){\checkBox[\ifInflammable 1\else 0\fi]{Feuergefährlich!}}%
\put(167bp,173bp){\checkBox[\ifGlas 1\else 0\fi]{Vorsicht Glas!}}%
\put(258bp,173bp){\checkBox[\ifSensitive 1\else 0\fi]{Vorsicht! Empfindliche}}%
\put(274bp,163bp){Elektrogeräte}%
\put(386bp,173bp){\checkBox[\ifTop 1\else 0\fi]{Oben}}%
\put(402bp,163bp){Nicht stürzen!}%
\put(478bp,173bp){\checkBox[\ifDangerous 1\else 0\fi]{Gefahrgut}}%
\put(193bp,145bp){{\large\textbf{Nur von der Versandstelle auszufüllen}}}
\footnotesize
\vl@tempdimc=132bp %
\put(\vl@tempdima,\vl@tempdimc){Verpackung}%
\begingroup
\vl@tempdimc=111bp %
\put(\vl@tempdima,\vl@tempdimc){\line(1,0){26bp}}%
\large
\put(105bp,\vl@tempdimc){\checkBox{Karton}}%
\put(168bp,\vl@tempdimc){\checkBox{Kiste}}%
\put(220bp,\vl@tempdimc){\checkBox{Palette}}%
\put(281bp,\vl@tempdimc){\checkBox{Versandtasche}}%
\endgroup
\put(412bp,\vl@tempdimc){Gewicht}%
\put(468bp,112bp){{\large kg}}%
\vl@tempdimc=94bp %
\put(\vl@tempdima,\vl@tempdimc){Eingang bei Z.1533 am}%
\put(250bp,\vl@tempdimc){Verpackt durch}%
\put(412bp,\vl@tempdimc){Abgesandt am}%
\vl@tempdimc=72bp %
\put(\vl@tempdima,\vl@tempdimc){Frachtbriefnummer:}%
\put(295bp,\vl@tempdimc){Unterschrift}%
% ...
% Variable Beschriftung
%
\vl@tempdima=62bp %
\begingroup
\ttfamily\normalsize
\vl@tempdimc=744bp % -14bp
\put(\vl@tempdima,\vl@tempdimc){\vl@WorkingGroup,~\vl@Purchaser}%
\put(395bp,757bp){
\parbox[t]{146bp}{%
\ \\[-1ex]
\texttt{\vl@PurchaserEmail}%
}
}%
\put(232bp,\vl@tempdimc){\vl@TelefonExtension}%
\put(310bp,\vl@tempdimc){\vl@Date}%
\vl@tempdimc=547bp % -14bp
\put(\vl@tempdima,\vl@tempdimc){\vl@CostUnit}%
\put(218bp,\vl@tempdimc){\vl@FinanceUnit}%
\put(401bp,\vl@tempdimc){\vl@CalibrationCosts}%
\vl@tempdimc=518bp %
\put(\vl@tempdima,\vl@tempdimc){\vl@SAPNo}%
\put(218bp,\vl@tempdimc){\vl@IndicationOfValue}%
%%%\put(401bp,\vl@tempdimc){\vl@CalibrationCosts}%
\put(\vl@tempdima,485bp){%
\parbox[t]{0.975\textwidth}{%
\setstretch{1}%
\vl@ShippingName \\
\vl@ShippingContact \\
\vl@ShippingStreet \\
\vl@ShippingZipcode~\vl@ShippingTown \\
\vl@ShippingLand
}%
}%
\put(300bp,425bp){%
\parbox[t]{.56\textwidth}{%
\setstretch{1}%
\@tempswafalse
\ifx\vl@ShippingEmail\@empty\else
\@tempswatrue
\fi
\ifx\vl@ShippingPhone\@empty\else
\@tempswatrue
\fi
\if@tempswa
\begin{tabular}{@{}l@{~}l@{}}%
\multicolumn{1}{@{}l@{}}{\rlap{%
\negthinspace\negthinspace\parbox{244bp}{\hrulefill}}} \\
\ifx\vl@ShippingEmail\@empty\else
E-Mail: & \expandafter\url\expandafter{\vl@ShippingEmail} \\
\fi
\ifx\vl@ShippingPhone\@empty\else
Telefon: & \vl@ShippingPhone
\fi
\end{tabular}\\[.5em]
\fi
}%
}
\put(\vl@tempdima,375bp){\lfitbox[t]{477bp}{162bp}{\setstretch{1.2}%
\begin{sloppypar}\vl@Content\end{sloppypar}}}%
\endgroup
}
\AtPageLowerLeft{%
\put(57bp,58bp){%
\linethickness{1.4bp}%
\framebox(\textwidth,99bp){}%
\put(0,83bp){\line(-1,0){\textwidth}}%
}
}
}%
\endinput
\ProvidesFile{vl-versandauftrag-2.clo}[Definitionen f. luaLaTeX/XeLaTeX]
\ProvidesFile{vl-versandauftrag-new-engines}[2021/06/14 Fontdef. luaLaTeX/XeLaTeX]
\RequirePackage{fontspec}
\setsansfont[Ligatures=TeX]{TeX Gyre Pagella}
%\setsansfont[Ligatures=TeX]{texgyreheros}
\setsansfont{texgyreheros}[
Ligatures=TeX,
Extension=.otf,
UprightFont=*-regular,
BoldFont=*-bold,
ItalicFont=*-italic,
BoldItalicFont=*-bolditalic]
\setmonofont{AnonymousPro-Regular}[%
Extension = .ttf,
BoldFont = AnonymousPro-Bold,
......@@ -17,3 +24,9 @@
\newunicodechar{^^^^00ad}{\-}% 'SOFT HYPHEN'
\endinput
\RequirePackage[utf8]{inputenc}
\RequirePackage[T1]{fontenc}
\RequirePackage{textcomp}
\RequirePackage{lmodern}
\RequirePackage{tgheros}
\RequirePackage[ttdefault=true,scale=1.034]{AnonymousPro}
\ProvidesFile{vl-versandauftrag-1.clo}[Definitionen f. pdfLaTeX]
\ProvidesFile{vl-versandauftrag-old-engines}[2021/06/14 Fontdef. pdfLaTeX]
\RequirePackage[utf8]{inputenc}
\RequirePackage[T1]{fontenc}
......
......@@ -2,20 +2,23 @@
\listfiles
\NeedsTeXFormat{LaTeX2e}[1999/12/01]
\ProvidesClass{vl-versandauftrag}
[2019/11/07 v0.2d Dokumentenklasse (RN/PTB)]
[2022/04/28 v0.3e Dokumentenklasse (RN/PTB)]
\newcommand*\vl@lang{english}
\newcommand*\vl@version{2018}
\DeclareOption{de}{\def\vl@lang{ngerman}}
\DeclareOption{german}{\def\vl@lang{ngerman}}
\DeclareOption{ngerman}{\def\vl@lang{ngerman}}
\DeclareOption{en}{\def\vl@lang{english}}
\DeclareOption{2017}{\def\vl@version{2017}}
\DeclareOption{2018}{\def\vl@version{2018}}
\DeclareOption{2019}{\def\vl@version{2019}}
\DeclareOption{2020}{\def\vl@version{2020}}
\DeclareOption*{\PassOptionsToClass{\CurrentOption}{scrartcl}}
\ProcessOptions\relax
\PassOptionsToPackage{paper=a4,pagesize}{typearea}
......@@ -23,12 +26,10 @@
,fontsize=10pt
]{scrartcl}
\RequirePackage{ifxetex,ifluatex,setspace,url}
\RequirePackage{iftex,setspace,url}
\setstretch{1.5}
\newif\ifXeOrLua \XeOrLuafalse
\ifxetex\XeOrLuatrue\else\ifluatex\XeOrLuatrue\fi\fi
\ifXeOrLua% XeLaTeX oder luaLaTeX
\iftutex% XeLaTeX oder luaLaTeX
\input{vl-versandauftrag-new-engines.clo}
\else
\input{vl-versandauftrag-old-engines.clo}
......@@ -59,6 +60,7 @@
\let\vl@tempdime=\@clnht
\let\vl@tempdimf=\@dashdim
\newcommand\vl@tempa{}
\newcommand\vl@tempb{}
\newdimen\vl@fontdim
\newdimen\vl@upperfontdim
......@@ -144,8 +146,11 @@
\newcommand*\EU[1]{}% nur wegen Kompatibilität zur 2017er Version
\newcommand*\ShippingComment[1]{}
\newcommand*\vl@PSP{}
\newcommand*\PSP[1]{\vl@setcommand{vl@PSP}{#1}}
\newcommand*\Account[1]{}% dummy
\newcommand*\Value[1]{}% dummy
\newcommand*\vl@CalibrationCosts{}
\newcommand*\CalibrationCosts[1]{\vl@setcommand{vl@CalibrationCosts}{#1}}
\newcommand*\vl@ShippingNo{}
\newcommand*\ShippingNo[1]{\vl@setcommand{vl@ShippingNo}{#1}}
\newcommand*\vl@ShippingName{}
......@@ -170,12 +175,10 @@
\newcommand*\CostUnit[1]{\vl@setcommand{vl@CostUnit}{#1}}
\newcommand*\vl@FinanceUnit{}
\newcommand*\FinanceUnit[1]{\vl@setcommand{vl@FinanceUnit}{#1}}
\newcommand*\vl@Account{}
\newcommand*\Account[1]{\vl@setcommand{vl@Account}{#1}}
\newcommand*\vl@SAPNo{}
\newcommand*\SAPNo[1]{\vl@setcommand{vl@SAPNo}{#1}}
\newcommand*\vl@Value{}
\newcommand*\Value[1]{\vl@setcommand{vl@Value}{#1}}
\newcommand*\vl@IndicationOfValue{}
\newcommand*\IndicationOfValue[1]{\vl@setcommand{vl@IndicationOfValue}{#1}}
\newcommand*\vl@WorkingGroup{}
\newcommand*\WorkingGroup[1]{\vl@setcommand{vl@WorkingGroup}{#1}}
\newcommand*\vl@TelefonExtension{}
......@@ -188,20 +191,42 @@
\newcommand*\Purchaser[1]{\vl@setcommand{vl@Purchaser}{#1}}
\newcommand*\vl@Referee{}
\newcommand*\Referee[1]{\vl@setcommand{vl@Referee}{#1}}
\newcommand*\vl@DateOfArrival{}
\newcommand*\vl@DateOfArrival{}% wird nicht benutzt
\newif\ifDateOfArrival \DateOfArrivalfalse
\newcommand*\DateOfArrival[1]{%
\vl@setcommand{vl@DateOfArrival}{#1}%
\ifx\@empty\vl@DateOfArrival\else\DateOfArrivaltrue\fi
}
\newif\ifShippingCompany \ShippingCompanyfalse
\newcommand*\vl@ModeOfTransport{}
\newcommand*\ModeOfTransport[1]{%
\ifx\relax#1\relax\else
\expandafter\@ModeOfTransport#1 \@nil
\fi
}
\newcommand*\@ModeOfTransport{}
\def\@ModeOfTransport#1 #2\@nil{%
\def\vl@tempa{#2}%
\if#1*%
\ShippingCompanytrue
\edef\vl@tempb{\noexpand\vl@setcommand{vl@ModeOfTransport}{\vl@tempa}}%
\vl@tempb
\else
\ShippingCompanyfalse
\vl@setcommand{vl@ModeOfTransport}{#1 #2}%
\fi
}
\newcommand*\vl@ShippingCustomerID{}
\newcommand*\ShippingCustomerID[1]{\vl@setcommand{vl@ShippingCustomerID}{#1}}
\newcounter{vl@TransportType} \setcounter{vl@TransportType}{0}
\newcommand*\TransportType[1]{\vl@setcounter{vl@TransportType}{#1}}
\newcounter{vl@Shippingtype} \setcounter{vl@Shippingtype}{0}
\newcommand*\ShippingType[1]{\vl@setcounter{vl@Shippingtype}{#1}}
\newcounter{vl@ShippingType} \setcounter{vl@ShippingType}{0}
\newcommand*\ShippingType[1]{\vl@setcounter{vl@ShippingType}{#1}}
\newcounter{vl@ShippingCompany} \setcounter{vl@ShippingCompany}{4}
\newcommand*\ShippingCompany[1]{\vl@setcounter[4]{vl@ShippingCompany}{#1}}
\newcounter{vl@ShippingPayment} \setcounter{vl@ShippingPayment}{0}
\newcounter{vl@ShippingPayment} \setcounter{vl@ShippingPayment}{2}
\newcommand*\ShippingPayment[1]{\vl@setcounter{vl@ShippingPayment}{#1}}
\newif\ifInsurance \Insurancefalse
......@@ -217,10 +242,14 @@
\newif\ifDangerous \Dangerousfalse
\newcommand*\LabelDangerous[1]{\vl@setboolean{Dangerous}{#1}}
\newcommand*\vl@PurchaserEmail{vacuum.cal@ptb.de}
\newcommand*\PurchaserEmail[1]{\vl@setcommand{vl@PurchaserEmail}{#1}}
\newcommand*\vl@mainTitle{}
\newcommand\vl@mainTitle@i{\huge Versandauftrag}
\newcommand\vl@mainTitle@ii{\normalsize\relscale{1.65} Versandauftrag\par{}
\normalsize --~Kopie für Versender~--}
\AtBeginDocument{%
\def\vl@mainTitle{\vl@mainTitle@i}
......