118 lines
4.4 KiB
TeX
118 lines
4.4 KiB
TeX
\NeedsTeXFormat{LaTeX2e}
|
||
\ProvidesPackage{xespdrtis}[2018/09/30 v0.98 Document Information]
|
||
|
||
\RequirePackage{calc}
|
||
\RequirePackage{indentfirst}
|
||
\RequirePackage[defaultlines=3,all]{nowidow}
|
||
\RequirePackage{bookmark}
|
||
|
||
% Обязательно переносить при достижении полей
|
||
\sloppy
|
||
|
||
% При переносе оставлять минимум 3 символа на первой строке и 3 на второй
|
||
\renewcommand\russianhyphenmins{33}
|
||
|
||
% Обязательно (полуторный интервал)
|
||
\linespread{1.5}
|
||
|
||
% Обязательно: отступ первой строки
|
||
\setlength{\parindent}{12.5mm}
|
||
|
||
% Использовать для кавычек-ёлочек данные символы
|
||
\renewcommand{\flqq}{«}
|
||
\renewcommand{\frqq}{»}
|
||
|
||
\providecommand{\strong}[1]{\textbf{#1}}
|
||
|
||
\setlength{\XESPD@padding@h}{0mm}
|
||
\setlength{\XESPD@padding@v}{5mm}
|
||
|
||
\newcounter{fontsnotfound}
|
||
\newcommand{\iffontsexist}[3]{
|
||
\setcounter{fontsnotfound}{0}
|
||
\expandafter\forcsvlist\expandafter\checkfont\expandafter{#1}
|
||
\ifnum\value{fontsnotfound}=0
|
||
#2
|
||
\else
|
||
#3
|
||
\fi
|
||
}
|
||
|
||
\ifthenelse{\equal{\XESPDtheDocName}{Техническое задание на разработку}}{
|
||
\RequirePackage[numbertop,numbercenter]{xespdplain} % без рамок
|
||
}{ % Если не ТЗР
|
||
\RequirePackage[numbertop,numbercenter]{xespdframe} % рамки
|
||
\RequirePackage{xespdchngsheet}
|
||
\newcommand{\XESPDtheFileName}{}
|
||
\newcommand{\XESPDfileName}[1]{\renewcommand{\XESPDtheFileName}{#1}}
|
||
|
||
\newcommand{\XESPDtheREVMBase}{}
|
||
\newcommand{\XESPDREVMBase}[1]{\renewcommand{\XESPDtheREVMBase}{#1}}
|
||
|
||
\newcommand{\XESPDtheREVMType}{}
|
||
\newcommand{\XESPDREVMType}[1]{\renewcommand{\XESPDtheREVMType}{#1}}
|
||
|
||
\XESPDsignature{РЕВМ.\XESPDtheREVMBase{}\textendash{}\XESPDtheREVMType{}}
|
||
\XESPDtitleApprovingSheet{РЕВМ.\XESPDtheREVMBase{}\textendash{}\XESPDtheREVMType{}\textendash{}ЛУ}
|
||
\ifthenelse{\equal{\XESPDtheDocName}{Описание программы}}{%
|
||
\XESPDREVMType{01 13 01}
|
||
\XESPDfileName{\XESPDtheREVMBase{}or}
|
||
}{}
|
||
\ifthenelse{\equal{\XESPDtheDocName}{Текст программы}}{
|
||
\XESPDREVMType{01 12 01}
|
||
\XESPDfileName{\XESPDtheREVMBase{}tp}
|
||
}{}
|
||
\ifthenelse{\equal{\XESPDtheDocName}{Программа и методика испытаний}}{
|
||
\XESPDREVMType{01 51 01}
|
||
\XESPDfileName{\XESPDtheREVMBase{}pm}
|
||
}{}
|
||
\ifthenelse{\equal{\XESPDtheDocName}{Руководство оператора}}{
|
||
\XESPDREVMType{01 34 01}
|
||
\XESPDfileName{\XESPDtheREVMBase{}ro}
|
||
}{}
|
||
}
|
||
|
||
%\XESPDdepartment{Ведомство}
|
||
%\XESPDcompany{Предприятие}
|
||
%\XESPDclassCode{Код по классификатору}
|
||
%\XESPDtitleApprovedBy{Должность утверждающего}{Фам. утвер.}
|
||
%\XESPDtitleAgreedBy{Должность первого согласовавшего}{Фам. первого согл.}
|
||
%\XESPDtitleAgreedBy{Должность второго согласовавшего}{Фам. второго согл.}
|
||
%\XESPDtitleAgreedBy{Должность третьего согласовавшего}{Фам. третьего согл.}
|
||
%\XESPDtitleDesignedBy{Должность первого автора}{Фам. первого автора}
|
||
%\XESPDtitleDesignedBy{Должность второго автора}{Фам. второго автора}
|
||
|
||
\RequirePackage{forloop}
|
||
\RequirePackage{makecell}
|
||
|
||
\newcount\lincnt
|
||
\long\def\addto#1#2{%
|
||
\expandafter\def\expandafter#1\expandafter{#1#2}}
|
||
|
||
\def\changeSheetLine{}\lincnt=28 % Количество строк
|
||
% \addto\changeSheetLine{ 1 & & Все & & & & \makecell{РЕВМ.57 \\ 1/2} & & & \makecell{20.04. \\ 17} \\ \hline}
|
||
\loop
|
||
\addto\changeSheetLine{& & & & & & & & & \\ \hline}
|
||
\advance\lincnt -1
|
||
\ifnum\lincnt>0
|
||
\repeat
|
||
|
||
\newcommand{\XESPDprintEmptyChangeSheet}{
|
||
\renewcommand*{\arraystretch}{0.8}% Высота строк
|
||
\begin{XESPDchangeSheet}
|
||
\changeSheetLine
|
||
\end{XESPDchangeSheet}}
|
||
|
||
%\RequirePackage{setspace}
|
||
%\newcommand{\XESPDdrawPlainPageNumber}{
|
||
% \setlength{\XESPD@tmpdima}{\XESPDframeX+\XESPD@padding@h}
|
||
% \setlength{\XESPD@tmpdimb}{\XESPDframeW-2\XESPD@padding@h}
|
||
% \XESPD@plain@va
|
||
% \put(\XESPDltu{\XESPD@tmpdima},\XESPDltu{\XESPD@tmpdimc}){%
|
||
% \parbox[b][15mm][c]{\XESPD@tmpdimb}{%
|
||
% \begin{singlespace}
|
||
% \reset@font\normalsize
|
||
% \XESPD@plain@ha\thepage \\ \MakeUppercase\XESPDtheSignature
|
||
% \end{singlespace}}}}
|
||
|