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

Neue Option "DS"="Digital Sealing"; Vereinfachung

parent 615d282c
No related branches found
No related tags found
No related merge requests found
\ProvidesFile{IK-2019.clo}[2019/03/07 v1.0d IK class option (RN/PTB)]
% Interne Kalibrierung
\newcommand*\ks@nationalEmblem{\includegraphics[width=62bp]{Adler.pdf}}
\newcommand*\ks@first@signature{}
\newcommand*\ks@first@signature@content{}
\endinput
%%
%% End of file `IK-2019.clo'.
\ProvidesFile{KK-2019.clo}[2020/10/13 v1.0e KK class option (RN/PTB)]
% Kundenkalibrierung
\newcommand*\ks@nationalEmblem{\includegraphics[width=62bp]{Adler.pdf}}
\newcommand*\ks@first@signature{%
\put(\ks@tempdima,\ks@tempdimb){Im Auftrag}%
\put(\ks@tempdima,\ks@tempdimc){\scriptsize\itshape On behalf of PTB}%
}
\newcommand*\ks@first@signature@content{%
\put(\ks@tempdima,\ks@tempdimb){\ks@byOrder}%
}
\endinput
%%
%% End of file `KK-2019.clo'.
\RequirePackage{iftex}
\iftutex\else% any 8-bit-TeX engine
\iftutex\else% one of the UTF8-compatible engines
\@latex@error{works only with `LuaLaTeX' or `XeLaTeX'}{%
type:\MessageBreak
lualatex \jobname.tex\MessageBreak
......@@ -14,45 +14,30 @@
\setcounter{errorcontextlines}{100}
\RequirePackage{ifdraft}
\newcommand*\ks@location{Berlin}
\newcommand*\ks@kalType{KK}
\newcommand*\ks@layout{-2019}% derzeit nicht variabel
\newcommand*\ks@langs{ngerman,main=english}
\newif\ifnoCMC \noCMCfalse
\newif\ifDigitalSealing \DigitalSealingfalse
\newif\ifKK \KKtrue
\newif\iftestreport \testreportfalse
\NeedsTeXFormat{LaTeX2e}[1999/12/01]
\ProvidesClass{kalibrierschein}
[2024/05/02 v0.7b documentclass PTB `Kalibrierschein' (RN/PTB)]
[2024/11/20 v0.8a documentclass PTB `Kalibrierschein' (RN/PTB)]
\DeclareOption{BS}{\def\ks@location{Braunschweig}}
\DeclareOption{BLN}{\def\ks@location{Berlin}}
\DeclareOption{KK}{\edef\ks@kalType{\CurrentOption}}
\DeclareOption{IK}{\edef\ks@kalType{\CurrentOption}}
%\DeclareOption{2015}{\edef\ks@layout{-\CurrentOption}}
\DeclareOption{KK}{\KKtrue}
\DeclareOption{IK}{\KKfalse}
\DeclareOption{german}{\def\ks@langs{english,main=ngerman}}
\DeclareOption{ngerman}{\def\ks@langs{english,main=ngerman}}
\DeclareOption{de}{\def\ks@langs{english,main=ngerman}}
\DeclareOption{english}{\def\ks@langs{ngerman,main=english}}
\DeclareOption{en}{\def\ks@langs{ngerman,main=english}}
\DeclareOption{noCMC}{\noCMCtrue}
\DeclareOption{DS}{\DigitalSealingtrue}
\DeclareOption{testreport}{\testreporttrue}
\DeclareOption*{\PassOptionsToClass{\CurrentOption}{scrartcl}}
\ProcessOptions\relax
\PassOptionsToPackage{paper=a4,pagesize,twoside=false,headinclude}
{typearea}
%Setze die richtige Kennung je nach CMC / Test Report
\iftestreport
\ifnoCMC
\newcommand*\ks@doc@style@code{393 03A m}% Kennung der Word-Vorlage
\else
\newcommand*\ks@doc@style@code{393 03B o}% Kennung der Word-Vorlage
\fi
\else
\ifnoCMC
\newcommand*\ks@doc@style@code{391 00A p}% Kennung der Word-Vorlage
\else
\newcommand*\ks@doc@style@code{391 00B q}% Kennung der Word-Vorlage
\fi
\fi
\PassOptionsToPackage{paper=a4,pagesize,twoside=false,headinclude}{typearea}
\LoadClass[%
,fontsize=11pt
......@@ -113,7 +98,7 @@ footskip=0bp,
\def\tiny{\@setfontsize\tiny\@viipt\@viiipt}
\let\ks@titelpagefont=\normalsize
\RequirePackage{textcomp}% ???
%\RequirePackage{textcomp}% ???
\RequirePackage{url,array,xltabular}
......@@ -138,8 +123,6 @@ footskip=0bp,
\newcommand*\ks@PTB{Physikalisch-Technische Bundesanstalt}
\newcommand*\ks@BSuB{Braunschweig und Berlin}
\RequirePackage{picture}% TODO: noch nötig?
\newdimen\ks@tempdima
\newdimen\ks@tempdimb
\newdimen\ks@tempdimc
......@@ -209,7 +192,7 @@ footskip=0bp,
\definecolor{PTBcolor}{RGB}{0,155,206}% TODO: Besser CMYK?
\input{ks-common.clo}% Titelseiten- und Layout-Definition
\input{\ks@kalType\ks@layout.clo}% Titelseiten- und Layout-Definition
%%%\input{\ks@kalType\ks@layout.clo}% Titelseiten- und Layout-Definition
\newcommand*\ks@type{%
Typ des Ger\"ates}
......
\ProvidesFile{ks-common.clo}[2023/07/04 v0.7a common class option (RN/PTB)]
\ProvidesFile{ks-common.clo}[2024/11/20 v0.8a common class option (RN/PTB)]
%%% Definitionen, die ab 2019 gültig sind.
\newcommand*\ks@nationalEmblem{\includegraphics[width=62bp]{Adler.pdf}}
% Kennung je nach CMC / Test Report
\iftestreport
\ifnoCMC
\newcommand*\ks@doc@style@code{393 03A m}% Kennung der Word-Vorlage
\else
\newcommand*\ks@doc@style@code{393 03B o}% Kennung der Word-Vorlage
\fi
\else
\ifDigitalSealing
\ifnoCMC
\newcommand*\ks@doc@style@code{391 01A}% Kennung der Word-Vorlage
\else
\newcommand*\ks@doc@style@code{391 01B}% Kennung der Word-Vorlage
\fi
\else
\ifnoCMC
\newcommand*\ks@doc@style@code{391 00A p}% Kennung der Word-Vorlage
\else
\newcommand*\ks@doc@style@code{391 00B q}% Kennung der Word-Vorlage
\fi
\fi
\fi
% Wird per \AddToShipoutPicture absolut auf der Seite positioniert.
\newcommand*\ks@printFirstPage{%
......@@ -31,8 +54,8 @@
%------------- Fuss ------------
\normalfont\scriptsize
\put(68,86){\parbox[t]{\textwidth}{%
\iftestreport
Prüfberichte ohne Unterschrift und Siegel haben keine G\"ultigkeit.
\iftestreport
Prüfberichte ohne Unterschrift und Siegel haben keine G\"ultigkeit.
Dieser Prüfbericht darf nur unver\"andert weiterverbreitet\\
werden. Ausz\"uge bed\"urfen der Genehmigung der
Physikalisch-Technischen Bundesanstalt.
......@@ -45,27 +68,44 @@
Physikalisch-Technische Bundesanstalt.
The presented results relate only to\\
the items tested.
%
\else%
%
Kalibrierscheine ohne Unterschrift und Siegel haben keine G\"ultigkeit.
Dieser Kalibrierschein darf nur unver\"andert weiterverbreitet\\
werden. Ausz\"uge bed\"urfen der Genehmigung der
Physikalisch-Technischen Bundesanstalt.
Die dargestellten Ergebnisse beziehen\\
sich nur auf die kalibrierten Gegenstände.\\[.2ex]
\normalfont\itshape
Calibration certificates without signature and seal are not valid.
This calibration certificate may not be reproduced other than in
full. \\ Extracts may be taken only with permission of the
Physikalisch-Technische Bundesanstalt.
The presented results relate only to\\
the items calibrated.
\fi
%
\else%
%
\ifDigitalSealing
Dieser Kalibrierschein wurde automatisiert erstellt und ist ohne
Unterschrift wirksam. Dieser Kalibrierschein darf nur unverändert
weiterver\-breitet werden. Auszüge bedürfen der Genehmigung der
Physikalisch-Technischen Bundesanstalt. Die dargestellten Ergebnisse
beziehen\\
sich nur auf die kalibrierten Gegenstände.\\[.2ex]
\normalfont\itshape
This is a computer-generated Calibration Certificate. No signature is
required. This Calibration Certificate may not be reproduced other\\
than in full. Extracts may be taken only with the permission of the
Physikalisch-Technische Bundesanstalt. The presented results relate\\
only to the items calibrated.
\else
Kalibrierscheine ohne Unterschrift und Siegel haben keine G\"ultigkeit.
Dieser Kalibrierschein darf nur unver\"andert weiterverbreitet\\
werden. Ausz\"uge bed\"urfen der Genehmigung der
Physikalisch-Technischen Bundesanstalt.
Die dargestellten Ergebnisse beziehen\\
sich nur auf die kalibrierten Gegenstände.\\[.2ex]
\normalfont\itshape
Calibration certificates without signature and seal are not valid.
This calibration certificate may not be reproduced other than in
full. \\ Extracts may be taken only with permission of the
Physikalisch-Technische Bundesanstalt.
The presented results relate only to\\
the items calibrated.
\fi
\fi
}}
}
}
% TODO: Bei Positionierung nur absolute Zahlen verwenden (?).
\newcommand\ks@put@main{%
\normalfont\ks@titelpagefont
\ks@tempdima=68bp %
......@@ -140,18 +180,40 @@
\advance\ks@tempdimb-30bp %
%%%\ks@tempdimb=204bp %
\ks@tempdimc=\ks@tempdimb \advance\ks@tempdimc-10bp %
\ks@first@signature
% First signature
\ifKK
\put(\ks@tempdima,\ks@tempdimb){Im Auftrag}%
\put(\ks@tempdima,\ks@tempdimc){\scriptsize\itshape On behalf of PTB}%
\fi
\put(\ks@tempdimd,\ks@tempdimb){\ks@location, \ks@certificateDate}
\put(\ks@tempdime,\ks@tempdimb){Im Auftrag}
\put(\ks@tempdime,\ks@tempdimc){\scriptsize\itshape On behalf of PTB}
\advance\ks@tempdimb-24bp %
\ks@tempdimc=\ks@tempdimb \advance\ks@tempdimc-10bp %
\put(\ks@tempdimd,\ks@tempdimb){Siegel}
\put(\ks@tempdimd,\ks@tempdimc){\scriptsize\itshape Seal}
\ifDigitalSealing
\begingroup
\linethickness{2bp}%
\put(209bp,112bp){%
\framebox(294bp,50bp){}
}
\endgroup
\else
\put(\ks@tempdimd,\ks@tempdimb){Siegel}
\put(\ks@tempdimd,\ks@tempdimc){\scriptsize\itshape Seal}
\fi
%--------------------------------
\advance\ks@tempdimb-40bp %
\ks@first@signature@content
\put(\ks@tempdime,\ks@tempdimb){\ks@examiner}
% First signature content
\ifKK
\ifDigitalSealing
\put(\ks@tempdima,183bp){\ks@byOrder}%
\put(\ks@tempdime,183bp){\ks@examiner}
\else
\put(\ks@tempdima,\ks@tempdimb){\ks@byOrder}%
\put(\ks@tempdime,\ks@tempdimb){\ks@examiner}
\fi
\fi
%--------------------------------
\put(46bp,256bp){\rotatebox[origin=c]{90}{\tiny \ks@doc@style@code}}
}
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment