From b0e498cd3849788c1dab642d68e2645c7f19e4ae Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Fri, 27 Mar 2009 21:40:51 +0000 Subject: rm invoice, depends on nonfree realcalc (Alexis Ballier 27 Mar 2009 14:16:38) git-svn-id: svn://tug.org/texlive/trunk@12538 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/tex/latex/invoice/invoice.def | 319 ------- Master/texmf-dist/tex/latex/invoice/invoice.sty | 1012 ----------------------- 2 files changed, 1331 deletions(-) delete mode 100644 Master/texmf-dist/tex/latex/invoice/invoice.def delete mode 100644 Master/texmf-dist/tex/latex/invoice/invoice.sty (limited to 'Master/texmf-dist/tex/latex/invoice') diff --git a/Master/texmf-dist/tex/latex/invoice/invoice.def b/Master/texmf-dist/tex/latex/invoice/invoice.def deleted file mode 100644 index f6be4f47a00..00000000000 --- a/Master/texmf-dist/tex/latex/invoice/invoice.def +++ /dev/null @@ -1,319 +0,0 @@ -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% File: invoice.def -% Author: Oliver Corff -% Date: 2003-12-12 -% -% This file contains messages, labels etc. in English, German -% and other languages. -% -% This file cannot be used alone but is called by invoice.sty -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% This file is the only file of this package which may be -% modified without renaming it. -% -% Adding a new language to labels is simple. Follow the -% instructions at line 275 of this file, and, please!, -% do not forget to send the result to -% -% corff@zedat.fu-berlin.de or oliver.corff@email.de -% -% Credits for language contributions given in invoice.sty. -% -% Thank you very much for your support of "invoice". -% -% Oliver Corff, -% -% Berlin, Guangzhou, Ulaanbaatar, Zagreb, Shenyang, Shanghai 2003 -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% English definitions are default. Other -% languages are selected automatically. -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% Warning messages for non-fatal situations -% -\def\InvoiceCompleted {Invoice completed. Command ignored.}% -\def\FeeSTExists {You cannot print a fee subtotal twice!}% -\def\ProjectEmpty {Project empty. No subtotal possible!}% -\def\ProjectSTExists {You cannot print a project subtotal twice!}% -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% Error messages for fatal situations -% -\def\InternalError {Package `invoice': Internal error!}% -% -\def\NoInvoiceNesting {Invoices cannot be nested. - Close this invoice first!}% -% -\def\InvoiceCompletedNoExpense {Invoice closed. - No new expense item allowed. - Start a new invoice - first!}% -% -\def\InvoiceCompletedNoFee {Invoice closed. - No new fee item allowed. - Start a new invoice - first!}% -% -\def\InvoiceCompletedNoFeeST {Invoice closed. - No fee subtotal allowed. - Start a new invoice - first!}% -% -\def\InvoiceCompletedNoProject {Invoice closed. - No new project allowed. - Start a new invoice - first!}% -% -\def\InvoiceCompletedNoProjectST {Invoice closed. - No project subtotal allowed. - Start a new invoice - first!}% -% -\def\MissingFee {No fee given. - You must charge at least one fee!}% -% -\def\MissingInputData {Missing input data!}% -% -\def\MissingOpening {You must open an invoice!}% -% -\def\MissingProject {No project given. - Open a project first!}% -% -\def\FeeBeforeExpense {Fees are charged first. - Expenses follow.}% -% -\def\NoProjectNesting {Projects cannot be nested. - Close this project first!}% -% -\def\ProjectCompletedNoExpense {Project closed. - No new expense item allowed. - Start a new project - first!}% -% -\def\ProjectCompletedNoFee {Project closed. - No new fee item allowed. - Start a new project - first!}% -% -\def\KOMA {Users of KOMA-Script's scrlettr.cls% - ^^Jsay `invoiceno' for the scrlettr - invoice command,^^Jand `invoiceenv' - for the invoice environment!}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% Labels. These ones are available in translation, too. See below. -% -\def\Warning {Warning}% -\def\Error {Error}% -\def\Expense {Expense}% -\def\Amount {Amount}% -\def\Currency {Currency}% -\def\Factor {Factor}% -\def\Activity {Activity}% -\def\Count {Count}% -\def\UnitRate {Rate/Unit}% -\def\Fees {Fees}% -\def\VAT {VAT}% -\def\Expenses {Expenses}% -\def\SumFees {Sum \Fees}% -\def\SumVAT {Sum \VAT}% -\def\SumExpenses {Sum \Expenses}% -\def\SubtotalFee {Subtotal \Fees}% -\def\SubtotalExpenses {Subtotal \Expenses}% -\def\SubtotalProject {Subtotal \Project}% - -\def\Total {Total}% -% -% This is German. -% -\ifx\l@german\undefined - \message{^^J(invoice) \Warning: - Language \string\l@german\space unknown.^^J^^J} -\else -\ifnum\number\invoice@language=\number\l@german - \def\Warning {Warnung}% - \def\Error {Fehler}% - \def\Expense {Auslage}% - \def\Amount {Betrag}% - \def\Currency {W\"ahrung}% - \def\Factor {Faktor}% - \def\Activity {Aktivit\"at}% - \def\Count {Anzahl}% - \def\UnitRate {Rate/Einheit}% - \def\Fees {Honorare}% - \def\VAT {MWSt.}% - \def\Expenses {Auslagen}% - \def\SumFees {Summe \Fees}% - \def\SumVAT {Summe \VAT}% - \def\SumExpenses {Summe \Expenses}% - \def\SubtotalFee {Zwischensumme \Fees}% - \def\SubtotalExpenses {Zwischensumme \Expenses}% - \def\SubtotalProject {Zwischensumme \Project}% - \def\Total {Gesamtsumme}% -\fi\fi -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% This is Dutch. -% -\ifx\l@dutch\undefined - \message{^^J(invoice) \Warning: - Language \string\l@dutch\space unknown.^^J^^J} -\else -\ifnum\number\invoice@language=\number\l@dutch - \def\Warning {Waarschuwing}% - \def\Error {Fout}% - \def\Expense {Onkosten}% - \def\Amount {Bedrag}% - \def\Currency {Valuta}% - \def\Factor {Faktor}% - \def\Activity {Activiteit}% - \def\Count {Aantal}% - \def\UnitRate {Prijs/Eenheid}% - \def\Fees {Honorarium}% - \def\VAT {BTW}% - \def\Expenses {Onkosten}% - \def\SumFees {Totaal \Fees}% - \def\SumVAT {Totaal \VAT}% - \def\SumExpenses {Totaal \Expenses}% - \def\SubtotalFee {Subtotaal \Fees}% - \def\SubtotalExpenses {Subtotaal \Expenses}% - \def\SubtotalProject {Subtotaal \Project}% - \def\Total {Totaal}% -\fi\fi -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% This is French. -% -\ifx\l@french\undefined - \message{^^J(invoice) \Warning: - Language \string\l@french\space unknown.^^J^^J} -\else -\ifnum\number\invoice@language=\number\l@french - \def\Warning {Avertissement}% - \def\Error {Erreur}% - \def\Expense {D\'epense}% - \def\Amount {Montant}% - \def\Currency {Devise}% - \def\Factor {Facteur}% - \def\Activity {Activit\'e}% - \def\Count {Quantit\'e}% - \def\UnitRate {Prix/Unit\'e}% - \def\Fees {Honoraires}% - \def\VAT {TVA}% - \def\Expenses {D\'epenses}% - \def\SumFees {Total \Fees}% - \def\SumVAT {Total \VAT}% - \def\SumExpenses {Total \Expenses}% - \def\SubtotalFee {Sous-Total \Fees}% - \def\SubtotalExpenses {Sous-Total \Expenses}% - \def\SubtotalProject {Sous-Total \Project}% - \def\Total {Total}% -\fi\fi -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% This is Afrikaans. -% -\ifx\l@afrikaans\undefined - \message{^^J(invoice) \Warning: - Language \string\l@afrikaans\space unknown.^^J^^J} -\else -\ifnum\number\invoice@language=\number\l@afrikaans - \def\Warning {Waarskuwing} - \def\Error {Fout} - \def\Expense {Onkostes} - \def\Amount {Bedrag} - \def\Currency {Valuta} - \def\Factor {Faktor} - \def\Activity {Aktiwiteit} - \def\Count {Aantal ure} - \def\UnitRate {Tarief} - \def\Fees {Fooie} - \def\VAT {BTW} - \def\Expenses {Uitgawes} - \def\SumFees {Totaal Fooie} - \def\SumVAT {Totaal BTW} - \def\SumExpenses {Totaal Uitgawes} - \def\SubtotalFee {Subtotaal \Fees} - \def\SubtotalExpenses {Subtotaal \Expenses} - \def\SubtotalProject {Subtotaal \Project} - \def\Total {Totaal} -\fi\fi -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% This is Italian. -% -\ifx\l@italian\undefined - \message{^^J(invoice) \Warning: - Language \string\l@italian\space unknown.^^J^^J} -\else -\ifnum\number\invoice@language=\number\l@italian - \def\Warning {Avvertenza}% - \def\Error {Errore}% - \def\Expense {Spesa}% - \def\Amount {Ammontare}% - \def\Currency {Valuta}% - \def\Factor {Fattore}% - \def\Activity {Attivit\'a}% - \def\Count {Quantit\'a}% - \def\UnitRate {Prezzo/Unit\'a}% - \def\Fees {Onorario}% - \def\VAT {IVA}% - \def\Expenses {Spese}% - \def\SumFees {Totale onorario}% - \def\SumVAT {Totale IVA}% - \def\SumExpenses {Totale spese}% - \def\SubtotalFee {Subtotale onorario}% - \def\SubtotalExpenses {Subtotale spese}% - \def\SubtotalProject {Subtotale progetto}% - \def\Total {Totale}% -\fi\fi -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% How to add new label languages to the `invoice' package: -% -% 1. Copy all following lines after this explanation -% and insert them above this comment. -% -% 2. Remove all comment symbols at the beginning of the lines. -% -% 3. Fill the empty parentheses {} with the appropriate -% translations. -% -% 4. Enter the correct internal language name used by LaTeX2e -% into the condition of the \ifnum clause. -% -% 5. Please do not forget to mail the resulting file to -% corff@zedat.fu-berlin.de or oliver.corff@email.de -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% Name correct language name here --v-- -% and --v--! -%\ifx\l@german\undefined -% \message{^^J(invoice) \Warning: -% Language \string\l@german\space unknown.^^J^^J} -%\else -%\ifnum\number\invoice@language=\number\l@german -% \def\Warning {} % Enter translations here! -% \def\Error {} % -% \def\Expense {} % -% \def\Amount {} % -% \def\Currency {} % -% \def\Factor {} % -% \def\Activity {} % -% \def\Count {} % -% \def\UnitRate {} % -% \def\Fees {} % -% \def\VAT {} % -% \def\Expenses {} % -% \def\SumFees {} % -% \def\SumVAT {} % -% \def\SumExpenses {} % -% \def\SubtotalFee {} % -% \def\SubtotalExpenses {} % -% \def\SubtotalProject {} % -% \def\Total {} % -%\fi diff --git a/Master/texmf-dist/tex/latex/invoice/invoice.sty b/Master/texmf-dist/tex/latex/invoice/invoice.sty deleted file mode 100644 index dbe6aaf4e6e..00000000000 --- a/Master/texmf-dist/tex/latex/invoice/invoice.sty +++ /dev/null @@ -1,1012 +0,0 @@ -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% Datei: invoice.sty -% Autor: Oliver Corff -% Contact: corff@zedat.fu-berlin.de, oliver.corff@email.de -% Datum: December 16, 2003 -% Version: 0.7 -% Copyright: Ulaanbaatar, Beijing, Berlin, Zagreb, Shenyang, Shanghai -% Description: This collection of macros provides -% tools for generating complex invoices -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% -% Corrections, suggestions and contributions by: -%%%%%% -% Jacopo, May 2003 -% e-mail: jacopo@ -% -% Contributed labels in Italian. -% -%%%%%% -% O. Corff, July 2003 -% -% fixed one nasty spacing bug, simplified internal table -% construction (table now has five instead of six columns, -% the second of which was never used). -% -%%%%%% -% Johann Spies, January 21, 2002 -% e-mail: jspies@sun.ac.za -% -% Hinted that \Subtotal Project should show the project name -% rather than just `Project'. -% -% Contributed labels in Afrikaans. -% -%%%%%% -% Robin Fairbairns, December 6, 2001 -% -% Hinted that the dollar sign can also be printed by saying -% \string$. -% -%%%%%% -% Vincent Tougait, France, November 27, 2001 -% -% Pointed out that fractions of VAT percents were not allowed. -% Bugfix on December 06, 2001 -% -%%%%%% -% Fred Donck, The Hague, The Netherlands, October, 2001 -% e-mail: fd0@donck.com -% -% Dutch labels -% -%%%%%% -% Ian Wormsbecker, October 31, 2001 -% -% Skips the VAT lines if VAT=0 -% Noticed that the terminal message will not accept a Dollar sign. -% The only workaround is to say \char`$ in \begin{invoice}{} -% -%%%%%% -% Fred Donck, The Hague, The Netherlands, Sept 18, 2001 -% e-mail: fd0@donck.com -% -% fixed some minor issues: -% real arithmetic will use integer intermediate values, so -% some calculations failed with the \Fee{title}{rate}{amount} -% where \rate is not an integer -% -% another fix is that in my opinion the VAT line should be -% printed also even though only one project is specified -% -% third fix is that the subtotal-line should not be printed -% on a project with only one \Fee line -% -%%%%%% -% Jacco Kok (fixed some labels), -% -%%%%%% -% Thilo Barth (discussed alternative names and command clashes -% with KOMA Script class scrlettr.cls), -% -%%%%%% -% Robert Inder (discussed general issues) -% -% were gladly and gratefully received and accepted. -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% ------------------- identification ------------------- -% -\NeedsTeXFormat{LaTeX2e} -\ProvidesPackage{invoice}[2003/12/16] -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% ------------------- language options ------------------- -% -% -\newcount\invoice@language -\let\invoice@language=\language -% -\ifx\l@english\undefined \newlanguage\l@english \fi -\ifx\l@german\undefined \newlanguage\l@german \fi -\ifx\l@dutch\undefined \newlanguage\l@dutch \fi -\ifx\l@french\undefined \newlanguage\l@french \fi -\ifx\l@afrikaans\undefined \newlanguage\l@afrikaans \fi -\ifx\l@italian\undefined \newlanguage\l@italian \fi -% -\DeclareOption{english}{\invoice@language=\number\l@english} -\DeclareOption{german}{\invoice@language=\number\l@german} -\DeclareOption{dutch}{\invoice@language=\number\l@dutch} -\DeclareOption{french}{\invoice@language=\number\l@french} -\DeclareOption{afrikaans}{\invoice@language=\number\l@afrikaans} -\DeclareOption{italian}{\invoice@language=\number\l@italian} -% -\ProcessOptions -% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -% ------------------- initial code ------------------- -% -\RequirePackage{ifthen} -\RequirePackage{longtable} -\RequirePackage{calc} -\input{realcalc} -\input{invoice.def} -% -\newcommand{\InvoiceVersion}{0.7}% -\newcounter{Fee} % -\newcounter{VAT} % -%\newcounter{VAT@rate} % -\newcounter{Expenses} % -\newcounter{Discount} % Discount item -\newcounter{Total} % -\newcounter{Project} % -% -\newcounter{Fee@ctr} % Number of fees per project - % no subtotal will be printed in case of - % value < 2 -% -\newcounter{Expense@ctr} % Number of expense items per project - % no subtotal will be printed in case of - % value < 2 -% -\newcounter{One@Fee} % Individual Fee -\newcounter{One@VAT} % Individual VAT -\newcounter{One@Expense} % Individual Expense -% -\newcounter{ST@Fee} % Subtotal Fee -\newcounter{ST@VAT} % Subtotal VAT -\newcounter{ST@Expenses} % Subtotal Expenses -\newcounter{ST@Project} % Subtotal Project -% -\gdef\Flag{0}% % State 0: Invoice not started yet - % State 1: Start invoice - % State 2: Start project, print title - % State 3: Fee Item - % State 4: Print Subtotal Fee - % State 5: Expense Item - % State 6: Print Subtotal Expenses - % State 7: Print Subtotal Project - % State 8: Print Total, Close invoice -% -\gdef\Project{}% % Empty Project Name -\def\Null{0}% -\newif\ifVATnonzero -% \def\BC{Euro} -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -%\newcommand{\my@message}[1]{\message{^^J#1^^J^^J}} -\newcommand{\error@message}[1]{\errmessage{^^J\Error: #1^^J^^J}} -\newcommand{\warning@message}[1]{\message{^^J\Warning: #1^^J^^J}} -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\ifx\invoice\undefined % False if KOMA Script scrlettr.cls - \def\my@invoice{invoice} % loaded. In this case one may say -\else % "invoice". If true, the environ- - \def\my@invoice{invoiceenv} % ment is renamed to "invoiceenv" - \let\invoiceno\invoice % and the scrlettr macro is renamed - \def\invoice#1{% % to "invoiceno". Thank you, Thilo, - \error@message{\KOMA}} % for this hint! -\fi % -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newenvironment{\my@invoice}[2]{% - \setcounter{Fee@ctr}{0}% % reset counter - \setcounter{Expense@ctr}{0}% % reset counter - \def\Null{0}% - \setcounter{Project}{0}% - \ST@Reset\Total@Reset% - \def\BC{#1}% - \def\VAT@rate{#2}% - \ifx\VAT@rate\Null\VATnonzerofalse\else\VATnonzerotrue\fi% - \ifVATnonzero - \message{^^J^^JVAT is not zero!^^J^^J}% - \else - \message{^^J^^JVAT is zero!^^J^^J}% - \fi% - % The VAT is: \the\VAT@rate % Debugging Diagnostics only - \parindent=0cm% - \ifcase\Flag % 0: Invoice not started yet - % - \gdef\Flag{1}% - \begin{center}% - \begin{longtable}{p{5cm}lrrr}% - % - \else \error@message{\NoInvoiceNesting}% - \fi}% -% At the end of environment: -% Yields state 8->0, Close and complete invoice, finish tables, etc. -{% - \ifcase\Flag % 0: Invoice not started yet - % - \error@message{\MissingOpening}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 1: Start invoice - % - \error@message{\MissingProject}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 2: Start project, print title - % - \error@message{\MissingInputData}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 3: Print remuneration item - % - \ifnum\theProject>0 \ST@Fee\ST@Project\fi% - \Tot@l% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 4: Print subtotal remuneration - % - \ifnum\theProject>1 \ST@Project\fi% - \Tot@l% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 5: Expense item - % - \ifnum\theProject>1 \ST@Expenses\ST@Project\fi% - \Tot@l% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 6: Print subtotal expenses - % - \ifnum\theProject>1 \ST@Project\fi% - \Tot@l% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 7: Print subtotal project - % - \Tot@l% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 8: Print total, close invoice - % - \warning@message{\InvoiceCompleted}% - % - \else \error@message{\InternalError}% - \fi% - \gdef\Flag{0}% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\ProjectTitle}[1]{% Yields state 2: Start Project - %\gdef\NewProject{#1} - % - \ifcase\Flag% 0: Invoice not started yet - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 1: Start invoice - % - \Project@Title{#1}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 2: Start project, print title - % - \error@message{\NoProjectNesting}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 3: Print remuneration item - % - \ST@Fee% - \ST@Project% - \Project@Title{#1}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 4: Print subtotal remuneration - % - \ST@Project% - \Project@Title{#1}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 5: Expense item - % - \ST@Expenses% - \ST@Project% - \Project@Title{#1}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 6: Print subtotal expenses - % - \ST@Project% - \Project@Title{#1}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 7: Print subtotal project - % - \Project@Title{#1}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 8: Print total, close invoice - % - \error@message{\InvoiceCompletedNoProject}% - % - \else \error@message{\InternalError}% - \fi% - \setcounter{Fee@ctr}{0}% % reset counter - \setcounter{Expense@ctr}{0}% % reset counter -} -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Fee}[3]{% Yields state 3, Print Fee Item - % - % #1 Contents - % #2 Fee per Unit - % #3 Unit Count - % - \ifcase\Flag % 0: Invoice not started yet - \error@message{\MissingOpening}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 1: Start invoice - % - \error@message{\MissingProject}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 2: Start project, print title - % - \Fee@Title% - \Fee@Line{#1}{#2}{#3}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 3: Print remuneration item - % - \Fee@Line{#1}{#2}{#3}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 4: Print subtotal remuneration - % - \warning@message{\FeeSTExists}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 5: Expense item - % - \error@message{\FeeBeforeExpense}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 6: Print subtotal expenses - % - \error@message{\FeeBeforeExpense}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 7: Print subtotal project - % - \error@message{\ProjectCompletedNoFee}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 8: Print total, close invoice - % - \error@message{\InvoiceCompletedNoFee}% - % - % - \else \error@message{\InternalError}% - \fi% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\STFee}{% Yields state 4, print subtotal remuneration - % - \ifcase\Flag % 0: Invoice not started yet - % - \error@message{\MissingOpening}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 1: Start invoice - % - \error@message{\MissingProject}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 2: Start project, print title - % - \error@message{\MissingFee}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 3: Print remuneration item - % - \Print@ST@Fees% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 4: Print subtotal remuneration - % - \warning@message{\FeeSTExists}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 5: Expense item - % - \error@message{\FeeBeforeExpense}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 6: Print subtotal expenses - % - \error@message{\FeeBeforeExpense}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 7: Print subtotal project - % - \error@message{\ProjectCompletedNoFee}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 8: Print total, close invoice - % - \error@message{\ProjectCompletedNoFee}% - % - \else \error@message{\InternalError}% - \fi% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\EBC}[2]{% Yields state 5: Expenses in BaseCurrency - % - % #1 Contents und Datum - % #2 Amount in BaseCurrency - % - \ifcase\Flag % 0: Invoice not started yet - % - \error@message{\MissingOpening}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 1: Start invoice - % - \error@message{\MissingProject}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 2: Start project, print title - % - \Expense@Title% - \Expense@BaseCurrency{#1}{#2}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 3: Print remuneration item - % - \ST@Fee% - \Expense@Title% - \Expense@BaseCurrency{#1}{#2}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 4: Print subtotal remuneration - % - \Expense@Title% - \Expense@BaseCurrency{#1}{#2}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 5: Expense item - % - \Expense@BaseCurrency{#1}{#2}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 6: Print subtotal expenses - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 7: Print subtotal project - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 8: Print total, close invoice - % - \error@message{\InvoiceCompletedNoExpense}% - % - \else \error@message{\InternalError}% - \fi% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\EBCi}[2]{% Yields state 5: Expenses in BaseCurrency - % But, unlike base form (no - % 'invisible') this version does - % not state the item, it only - % the total amount of expenses. - % - % #1 Contents und Datum - % #2 Amount in BaseCurrency - % - \ifcase\Flag % 0: Invoice not started yet - % - \error@message{\MissingOpening}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 1: Start invoice - % - \error@message{\MissingProject}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 2: Start project, print title - % - %\Expense@Title% - \Expense@Base@Currency{#1}{#2}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 3: Print remuneration item - % - \ST@Fee% - %\Expense@Title% - \Expense@Base@Currency{#1}{#2}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 4: Print subtotal remuneration - % - %\Expense@Title% - \Expense@Base@Currency{#1}{#2}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 5: Expense item - % - \Expense@Base@Currency{#1}{#2}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 6: Print subtotal expenses - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 7: Print subtotal project - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 8: Print total, close invoice - % - \error@message{\InvoiceCompletedNoExpense}% - % - \else \error@message{\InternalError}% - \fi% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\EFC}[5]{% Yields state 5: Expenses in ForeignCurrency - % - % #1 Contents und Datum - % #2 Currency - % #3 Amount - % #4 Exchange Rate - % #5 Amount Zielwaehrung - % - % Usage: - % 1. {Contents}{ForeignCurrency}{ExchangeRate}{} - % 2. {Contents}{ForeignCurrency}{}{BaseCurrency} - % 3. {Contents}{ForeignCurrency}{ExchangeRate}{BaseCurrency} - % - \ifcase\Flag % 0: Invoice not started yet - % - \error@message{\MissingOpening}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 1: Start invoice - % - \error@message{\MissingProject}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 2: Start project, print title - % - \Expense@Title% - \Expense@ForeignCurrency{#1}{#2}{#3}{#4}{#5}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 3: Print remuneration item - % - \ST@Fee% - \Expense@Title% - \Expense@ForeignCurrency{#1}{#2}{#3}{#4}{#5}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 4: Print subtotal remuneration - % - \Expense@Title% - \Expense@ForeignCurrency{#1}{#2}{#3}{#4}{#5}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 5: Expense item - % - \Expense@ForeignCurrency{#1}{#2}{#3}{#4}{#5}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 6: Print subtotal expenses - % - \error@message{\ProjectCompletedNoExpense}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 7: Print subtotal project - % - \error@message{\ProjectCompletedNoExpense}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 8: Print total, close invoice - % - \error@message{\InvoiceCompletedNoExpense}% - % - \else \error@message{\InternalError}% - \fi% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\EFCi}[5]{% Yields state 5: Expenses in ForeignCurrency - % But, unlike base form (no - % 'invisible') this version does - % not state the item, it only - % the total amount of expenses. - % - % #1 Contents und Datum - % #2 Currency - % #3 Amount - % #4 Exchange Rate - % #5 Amount Zielwaehrung - % - % Usage: - % 1. {Contents}{ForeignCurrency}{ExchangeRate}{} - % 2. {Contents}{ForeignCurrency}{}{BaseCurrency} - % 3. {Contents}{ForeignCurrency}{ExchangeRate}{BaseCurrency} - % - \ifcase\Flag % 0: Invoice not started yet - % - \error@message{\MissingOpening}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 1: Start invoice - % - \error@message{\MissingProject}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 2: Start project, print title - % - \Expense@Title% - \Expense@Foreign@Currency{#1}{#2}{#3}{#4}{#5}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 3: Print remuneration item - % - \ST@Fee% - % \Expense@Title% - \Expense@Foreign@Currency{#1}{#2}{#3}{#4}{#5}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 4: Print subtotal remuneration - % - % \Expense@Title% - \Expense@Foreign@Currency{#1}{#2}{#3}{#4}{#5}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 5: Expense item - % - \Expense@Foreign@Currency{#1}{#2}{#3}{#4}{#5}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 6: Print subtotal expenses - % - \error@message{\ProjectCompletedNoExpense}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 7: Print subtotal project - % - \error@message{\ProjectCompletedNoExpense}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 8: Print total, close invoice - % - \error@message{\InvoiceCompletedNoExpense}% - % - \else \error@message{\InternalError}% - \fi% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\STExpenses}{% Yields state 6: Ausgabe der ST Expenses - % - \ifcase\Flag % 0: Invoice not started yet - % - \error@message{\MissingOpening}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 1: Start invoice - % - \error@message{\MissingProject}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % - \or % 2: Start project, print title - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % - \or % 3: Print remuneration item - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - % - \or % 4: Print subtotal remuneration - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 5: Expense item - % - \Print@ST@Expenses% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 6: Print subtotal expenses - % - \warning@message{\ProjectCompletedNoExpense}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 7: Print subtotal project - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 8: Print total, close invoice - % - \error@message{\InvoiceCompletedNoExpense}% - % - \else \error@message{\InternalError}% - \fi% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\STProject}{% Yields state 7: Ausgabe der ST Project - % - \ifcase\Flag % 0: Invoice not started yet - % - \error@message{\MissingOpening}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 1: Start invoice - % - \error@message{\MissingProject}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 2: Start project, print title - % - \warning@message{\ProjectEmpty}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 3: Print remuneration item - % - \ST@Fee% - \ST@Project% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 4: Print subtotal remuneration - % - \ST@Project% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 5: Expense item - % - \ST@Expenses% - \ST@Project% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 6: Print subtotal expenses - % - \ST@Project% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 7: Print subtotal project - % - \warning@message{\ProjectSTExists}% - % - %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% - \or % 8: Print total, close invoice - % - \error@message{\InvoiceCompletedNoProjectST}% - % - \else \error@message{\InternalError}% - \fi% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Discount}[2]{% Yields no particular state. - % Inserts discount in project total, - % names discount reason - % and amount of discount - % - \gdef\Discount@Contents{#1}% - \setcounter{Discount}{100 * \real{-#2}}% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Total@Reset}{% - \setcounter{Fee}{0}% - \setcounter{VAT}{0}% - \setcounter{Expenses}{0}% - \setcounter{Total}{0}% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\ST@Reset}{% - \setcounter{ST@Fee}{0}% - \setcounter{ST@VAT}{0}% - \setcounter{ST@Expenses}{0}% - \setcounter{ST@Project}{0}% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Print@Value}[1]{% - \Rmul\r#1{0.01}%% <- Reduce to BaseCurrency - \Rtrunc\r{2}\r% % <- Truncate to two digits - \r% % <- Output data! -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Message@Value}[1]{% - \Rmul\r#1{0.01}%% <- Reduce to BaseCurrency - \Rtrunc\r{2}\r% % <- Truncate to two digits - \message{\r}% % <- Output data! -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Project@Title}[1]{% - % Internal command called by \ProjectTitle. - % - \gdef\Flag{2}% - \gdef\Project{#1}% - \ST@Reset\addtocounter{Project}{1}% - \ifnum\theProject>1 \\\\\else\\\fi% - \multicolumn{5}{c}{\textbf{\large#1}}\\% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Fee@Title}{% - \\ - \noindent\textbf{\Activity}&&\UnitRate&\Count&\Amount\ (\BC)\\ - \hline% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Fee@Line}[3]{% - % - % #1 Contents - % #2 Charged Fee per Unit - % #3 Count - % - % Internal command, called by \Fee. - % - \gdef\Flag{3}% - % - #1 &   & -% -% next is reversed to allow real arithmetic. -% intermediate results are stored in integer format, so calculations are -% incorrect in case #2 is a real. -% fixed by exchanging the 1 and the 100 -% - \setcounter{One@Fee}{100 * \real{#2} * \real{#3} * 1}% -% - \addtocounter{ST@Fee}{\theOne@Fee}% - \addtocounter{Fee}{\theOne@Fee}% - \addtocounter{Fee@ctr}{1}% increase counter with 1 - \Print@Value{\theOne@Fee}\\% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\ST@Fee}{% - % \gdef\Flag{4}% - \ifnum\theST@Fee>0% - \ifthenelse{\theFee@ctr>1} % % if more than 1 \Fee line - {\Print@ST@Fees% % print it, else - }% - {}% % do nothing - \ifVATnonzero\ST@VAT@Printout\fi% - \fi% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Print@ST@Fees}{% - \gdef\Flag{4}% - \SubtotalFee & & & &% print the subtotal of fees - \Print@Value{\theST@Fee}\\% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\ST@VAT@Printout}{% - \VAT\ (\VAT@rate\%) & & & &% - \setcounter{ST@VAT}{\theST@Fee * \real{\VAT@rate} / 100}% - \Print@Value{\theST@VAT}\\% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Expense@BaseCurrency}[2]{% - #1 & \BC & & &% - \gdef\Flag{5}% - \Rmul\r{100}{#2}% - \setcounter{One@Expense}{1*\real{\r}}% - \addtocounter{ST@Expenses}{\theOne@Expense}% - \addtocounter{Expenses}{\theOne@Expense}% - \addtocounter{Expense@ctr}{1}%advance counter - \Print@Value{\theOne@Expense}\\% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Expense@Base@Currency}[2]{% - \gdef\Flag{5}% - \Rmul\r{100}{#2}% - \setcounter{One@Expense}{1*\real{\r}}% - \addtocounter{ST@Expenses}{\theOne@Expense}% - \addtocounter{Expenses}{\theOne@Expense}% - \addtocounter{Expense@ctr}{1}%advance counter - & & & & \\[-1.2em]% This is an ugly kludge: - % Inserting an empty line - % which rolls backwards - % makes disappear the spurious - % spaces caused by external - % routines. -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Expense@ForeignCurrency}[5]{% - \gdef\Flag{5}% - % - % Folgende Angaben sind moeglich: - % 1. {Contents}{Currency}{Amount}{Umrechnung}{ } - % 2. {Contents}{Currency}{Amount}{ }{BaseCurrency} - % 3. {Contents}{Currency}{Amount}{Umrechnung}{BaseCurrency} - % - #1 & #2 & #3 & #4&% - \ifthenelse{\equal{#5}{}}% Target in BaseCurrency or not? - {% Target not in BaseCurrency - \Rmul\r{100}{#3}% - \Rmul\r \r {#4}% - }% - {% Target in BaseCurrency - \Rmul\r{100}{#5}% - }% - \setcounter{One@Expense}{1*\real{\r}}% - \addtocounter{ST@Expenses}{\theOne@Expense}% - \addtocounter{Expenses}{\theOne@Expense}% - \addtocounter{Expense@ctr}{1}%advance counter - \Print@Value{\theOne@Expense}% -\\% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Expense@Foreign@Currency}[5]{% - \gdef\Flag{5}% - % - % Folgende Angaben sind moeglich: - % 1. {Contents}{Currency}{Amount}{Umrechnung}{ } - % 2. {Contents}{Currency}{Amount}{ }{BaseCurrency} - % 3. {Contents}{Currency}{Amount}{Umrechnung}{BaseCurrency} - % - \ifthenelse{\equal{#5}{}}% Target in BaseCurrency or not? - {% Target not in BaseCurrency - \Rmul\r{100}{#3}% - \Rmul\r\r{#4}% - }% - {% Target in BaseCurrency - \Rmul\r{100}{#5}% - }% - \setcounter{One@Expense}{1*\real{\r}}% - \addtocounter{ST@Expenses}{\theOne@Expense}% - \addtocounter{Expenses}{\theOne@Expense}% - \addtocounter{Expense@ctr}{1}%advance counter - & & & & \\[-1.2em]% ugly kludge as above -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Expense@Title}{% - \\% - \textbf{\Expense}&\Currency&\Amount&\Factor &\BC\\% - \hline% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\ST@Expenses}{% - % \gdef\Flag{6}% - \ifnum\theST@Expenses>0% - \ifthenelse{\theExpense@ctr>1}% % if more than 1 Expense line - {\Print@ST@Expenses}% % print it, else - {}% % do nothing - \fi% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Print@ST@Expenses}{% - \gdef\Flag{6}% - & & & & \\[-1.2em]% ugly kludge as above - \SubtotalExpenses & & & &% print the subtotal of expenses - \Print@Value{\theST@Expenses}\\% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\ST@Project}{% - \gdef\Flag{7}% - \\ - %\multicolumn{4}{l}{\SubtotalProject}% - %\let\Project\NewProject% - %& - \SubtotalProject & & & & - \addtocounter{ST@Project}{\theST@Fee}% - \addtocounter{ST@Project}{\theST@VAT}% - \addtocounter{ST@Project}{\theST@Expenses}% - \Print@Value{\theST@Project}\\ -} -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Total@VAT@Printout}{% - \setcounter{VAT}{\theFee*\real{\VAT@rate}/100}% - \SumVAT & & & &\Print@Value{\theVAT}\\% -}% -%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% -\newcommand{\Tot@l}{% - \\\hline - \ifnum\theFee>0 \SumFees& & & &% - \Print@Value{\theFee}\\ - \ifVATnonzero% - \Total@VAT@Printout% - \fi% - \fi% - \ifnum\theExpenses>0 \SumExpenses& & & &% - \Print@Value{\theExpenses}\\ - \fi% - \ifnum\theDiscount<0 \Discount@Contents& & & &% - \Print@Value{\theDiscount}\\ - \fi% - \hline\hline - \textbf{\Total} & & & &% - \message{^^J\Currency: \BC}% - \message{^^J\VAT: \VAT@rate}% - \addtocounter{Total}{\theFee}% - \message{^^J\SumFees: }\Message@Value{\theFee}% - \addtocounter{Total}{\theVAT}% - \message{^^J\SumVAT: }\Message@Value{\theVAT}% - \addtocounter{Total}{\theExpenses}% - \message{^^J\SumExpenses: }\Message@Value{\theExpenses}% - \ifnum\theDiscount<0 % - \addtocounter{Total}{\theDiscount}% - \message{^^J\Discount@Contents: }\Message@Value{\theDiscount}% - \fi % - \textbf{\Print@Value{\theTotal}}% - \message{^^J\Total: }% - \Message@Value{\theTotal}\message{^^J^^J}\\% - \end{longtable} - \end{center} - \gdef\Flag{8}% -} -\endinput -% vim:ts=4:sw=4 -- cgit v1.2.3