X-Git-Url: http://wagnertech.de/git?p=kivitendo-erp.git;a=blobdiff_plain;f=templates%2Fprint%2Ff-tex%2Fzwischensumme.sty;fp=templates%2Fprint%2Ff-tex%2Fzwischensumme.sty;h=0000000000000000000000000000000000000000;hp=043d94fbd4a0a263c6c06448a8310fc7faebba2a;hb=53593baa211863fbf66540cf1bcc36c8fb37257f;hpb=deb4d2dbb676d7d6f69dfe7815d6e0cb09bd4a44 diff --git a/templates/print/f-tex/zwischensumme.sty b/templates/print/f-tex/zwischensumme.sty deleted file mode 100644 index 043d94fbd..000000000 --- a/templates/print/f-tex/zwischensumme.sty +++ /dev/null @@ -1,228 +0,0 @@ -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Makros zur Berechnung und Ausgabe einer Zwischensumme bei langen Tabellen -% Der Hack der longtable Ausgabe ist von Heiko Oberdiek, das Paket zref auch. -% ---<(kaimartin)>---(August, 2007) -% -% - Dezimaltrennzeichenn nur noch "." by scripts_at_gpl.coulmann.de 2010-12 -% (raw_numbers patch) -% - \Wert -> default Wert 0, by scripts_at_gpl.coulmann.de 2009-08 -% wenn kein Wert uebergebenn wird, dies -% ermoeglicht das Ausgeben von Tabellen ohne -% Preise (z.b. Lieferscheine) -% - keine Ausgabe der Zwischensumme, wenn 0 -% - neu: \brutto zur Ausgabe von Bruttopreisen by scripts_at_gpl.coulmann.de 2009-07 -% - Anpassungen fuer fancy LaTeX by scripts_at_gpl.coulmann.de 2009-03 -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Diese Datei steht unter der GPL-Lizenz, Version 3 -% siehe http://www.gnu.de/licenses/gpl-3.0.html -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - -\usepackage{etex} % Damit Marken verwendet werden koennen -\usepackage[savepos,user]{zref} % Um die jeweils aktuelle Position zu merken -\usepackage{fltpoint} % Rechnen mit Komma-Zahlen -\usepackage{numprint} % Zahlen formatiert ausgeben -\usepackage{eurosym} % Das Euro-Zeichen -\usepackage{calc} % Fuer das Makro \widthof{} - -% Vorlagen sind auf raw_num Patch ausgelegt daher nur noch . als Trennzeichen -\newcommand{\DecimalSign}{.} -\fpDecimalSign{\DecimalSign} - -% Globale Einstellungen fuer numprint -\npstylegerman % Deutsche Zahlenformatierung, in der Ausgabe -\nprounddigits{2} % Zwei Nachkommasstellen - -% \leer ist bereits in letter.tex definiert, wenn nicht muss es hier passieren -% \newcommand{\leer}{} - -%%%%%%%%%%%%%%Befehle zur Berechnung der Zwischensumme%%%%%%%%%%%%%%%%%%%%%%% -\newcommand*\laufsumme{0} -\newcommand*\resetlaufsumme{\global\def\laufsumme{0}} -\newcommand*\addlaufsumme[1]{\fpAdd{\laufsumme}{\laufsumme}{#1}% - \global\let\laufsumme\laufsumme} -\newcommand*\printwert[1]{ - \ifthenelse{\NoValue > 0}{ - }{ - \numprint{#1} - } -} - - -%%%%%%%%Plaintex-Hack fuer Positionierung der Zwischensummen%%%%%%%%%%%%%%%%%% - - -\makeatletter % Das at-Zeichen in Variablen zulassen - -% Variablen bereit stellen - \newdimen\drx - \newdimen\dry - - \newmarks\ltm@marks - \def\ltm@setmarks#1{% - \marks\ltm@marks{#1}% - } - \def\ltm@getmarks{% - \botmarks\ltm@marks - } - - -% Den aktuellen Wert der Laufsumme berechnen und merken -\newcommand*{\Wert}[1]{% - \ifthenelse{\equal{#1}{\leer}}{ - \addlaufsumme{0}% Den uebergebenen Wert zur Laufsumme addieren - \expandafter\ltm@setmarks\expandafter{\laufsumme}% Die Laufsumme merken - }{ - \printwert{#1}% Ausgabe des Werts vor Ort - \addlaufsumme{#1}% Den uebergebenen Wert zur Laufsumme addieren - \expandafter\ltm@setmarks\expandafter{\laufsumme}% Die Laufsumme merken - } -} - -% Merken der aktuellen Position -\newcommand*{\MarkZwsumPos}{% - \leavevmode - \zsavepos{zwsumpos\thepage}% - \zrefused{zwsumpos\thepage}% -} - - -% Ausgabe der Zwischensumme -\def\ltm@insertfoot#1{% - \vbox to\z@{% - \vss - \hb@xt@\z@{% - \color@begingroup - \zsavepos{tabende\thepage}% % Die aktuelle Position merken - \drx=0sp - \dry=0sp - % Die aktuelle Position abziehen und die gemerkte addieren - \advance \drx by -\zposx{tabende\thepage}sp - \advance \drx by \zposx{zwsumpos\thepage}sp - \advance \dry by -\zposy{tabende\thepage}sp - \advance \dry by \zposy{zwsumpos\thepage}sp - \smash{\kern\drx\raise\dry% - %\hbox{\makebox[\widthof{ \currency}][r]{\printwert{#1} \currency}}% % mit Waehrungszeichen - \hbox{\printwert{#1} }% % ohne Waehrungszeichen - }% end smash - \color@endgroup - }% - }% - \vspace{4mm} -} - -% Ausgabe des Uebertrags -% Wie die Ausgabe der Zwischensumme, nur ohne neu gemerkte Position -\def\ltm@inserthead#1{% - \vbox to\z@{% - \vss - \hb@xt@\z@{% - \color@begingroup - \drx=0sp - \dry=0sp - % Die Position des Tabellenendes abziehen und zur gemerkten gehen - \advance \drx by -\zposx{tabende\thepage}sp - \advance \drx by \zposx{zwsumpos\thepage}sp - \advance \dry by -\zposy{tabende\thepage}sp - \advance \dry by \zposy{zwsumpos\thepage}sp - \smash{\kern\drx\raise\dry% - % Die eigentliche Ausgabe. - % Rechtsbuendig und um die Breite der Währung verschoben. - %\hbox{\makebox[\widthof{ \currency}][r]{\printwert{#1} \currency}}% - \hbox{\printwert{#1}}% % ohne Waehrungszeichen - %\hbox{\makebox[\widthof{ \printwert{#1}}][r]{\printwert{#1}\rule{0mm}{10mm} }}% % ohne Waehrungszeichen - }% end smash - \color@endgroup - }% - }% - \vspace{1mm} -} - - -\def\ltm@lastfoot{\ltm@insertfoot\ltm@getmarks} -\def\ltm@foot{\ltm@insertfoot{\ltm@getmarks}} -\def\ltm@head{\ltm@inserthead{\ltm@getmarks}} - - -% Ueberschreiben der Output-Routine von longtable -\def\LT@output{% - \ifnum\outputpenalty <-\@Mi - \ifnum\outputpenalty > -\LT@end@pen - \LT@err{floats and marginpars % - not allowed in a longtable}\@ehc - \else - \setbox\z@\vbox{\unvbox\@cclv}% - \ifdim \ht\LT@lastfoot>\ht\LT@foot - \dimen@\pagegoal - \advance\dimen@-\ht\LT@lastfoot - \ifdim\dimen@<\ht\z@ - \setbox\@cclv\vbox{% - \unvbox\z@\copy\LT@foot\ltm@foot\vss - }% - \@makecol - \@outputpage - \setbox\z@\vbox{\box\LT@head}% - \fi - \fi - \global\@colroom\@colht - \global\vsize\@colht - \vbox{% - \unvbox\z@ - \box\ifvoid\LT@lastfoot - \LT@foot\ltm@foot - \else - \LT@lastfoot\ltm@lastfoot - \fi - }% - \fi - \else - \setbox\@cclv\vbox{% - \unvbox\@cclv\copy\LT@foot\ltm@foot\vss - }% - \@makecol - \@outputpage - \global\vsize\@colroom - \copy\LT@head\ltm@head - \fi -} - -\newcommand\BruttoSellPrice[2]{ - \fpAdd{\tax}{#2}{100} - \fpDiv{\taxF}{\tax}{100} - \fpMul{\result}{#1}{\taxF} - \numprint{\result} -} -\newcommand\BruttoWert[2]{ - \fpAdd{\tax}{#2}{100} - \fpDiv{\taxF}{\tax}{100} - \fpMul{\rawresult}{#1}{\taxF} - \Wert{\rawresult} -} - - -\newcommand\BruttoLineSum[4]{ - \fpAdd{\tax}{#4}{100} - \fpDiv{\taxF}{\tax}{100} - \fpMul{\result}{#1}{\taxF} - \fpMul{\result}{#2}{\result} - \fpSub{\rabatt}{100}{#3} - \fpDiv{\rabatt}{\rabatt}{100} - \fpMul{\result}{\result}{\rabatt} - \Wert{\result} -} - -% \ifthenelse{\equal{<%p_discount%>}{0}}{}{ -<%p_discount%>\%} & -% %<%sellprice%> -% \Wert{<%linetotal%>} % Zeilensumme - -% \fpMul{\result}{#1}{1.19} -% \fpMul{\resultt}{#2}{\result} -% \fpSub{\rabatt}{100}{#3} -% \fpDiv{\rabattt}{\rabatt}{100} -% \fpMul{\resulttt}{\resultt}{\rabattt} -% %\fpRound{\roundresult}{\result}{3} -% %\roundresult -% \resulttt - -\makeatother % Das at-Zeichen in Variablen wieder verbieten -%%%%%%%%%%%%%%%%%%%%Ende plaintex-Hack%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%