%%
%% TEX $VER: INVOICEPATCH.TEX 1.1 (09.03.1996)
%%
%% BESCHREIBUNG:  Diese Datei enthält Korrekturmöglichkeiten für das
%% Rechnungsformular. So können bestimmte Spalten ausgeblendet werden
%% oder sogar der Briefkopf entfernt werden.
%%
%%
%% Hinweis:
%%
%% Erschrecken Sie nicht vor den vielen "unlesbaren" Zeilen, dies ist
%% tatsächlich eine Textdatei, allerdings bestückt mit vielen TeX-Makros.
%% Diese Datei ist in Abschnitte eingeteilt. Zu Beginn eines jeden Abschnittes
%% befindet sich ein lesbarer Kommentar, der das TeX-Makro beschreibt.
%%
%%
%% Zur Syntax:
%%
%% Alle "echten" Kommentarzeilen fangen mit zwei "%" an, also mit "%%".
%% Zusätzlich sind viele TeX-Makros ebenfalls auskommentiert. Diese beginnen
%% mit nur einem "%" am Zeilenanfang.
%%
%% Die verschiedenen Änderungsmöglichkeiten werden abschnittsweise erläutert.
%% Um einen Abschnitt zu aktivieren, müssen in den Zeilen mit nur einem "%"
%% am Zeilenanfang die "%" entfernt werden. Bitte nur die "%" am Zeilenanfang
%% und nicht solche, die sich innerhalb oder am Ende einer Zeile befinden.
%%
%% Jeder Abschnitt ist mit einer langen Kommentarzeile am Anfang und am
%% Ende markiert.
%%

\chardef\atcode=\catcode`\@
\catcode`\@=11 % \makeatletter

\newcount\entry
\entry=0



%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% Beginn Abschnitt 1: Änderung für das Adreßfeld
%%
%% Die folgenden Zeilen enthalten eine Änderung, um das Adreßfeld auf der
%% rechten Seite des Formulars zu setzen. Dies ist speziell für Anwender in
%% der Schweiz interessant.
%%
%% Da das Adreßfeld auf der rechten Seite ausgegeben wird, muß wahrscheinlich
%% noch die horizontale Position bestimmt werden.
%% Momentan werden 9cm vom linken Rand des Formulars (nicht der Papierkante!)
%% eingerückt.
%%
%% Um das Adreßfeld rechts zu setzen, bitte in den folgenden Zeilen die "%"
%% am Zeilenanfang (!!) entfernen. Dieser Abschnitt darf auch in Kombination
%% mit anderen Abschnitten verwendet werden.
%%

%\newdimen\addressindent \addressindent=9.5truecm
%
%\def\invoice{\pageno=1 \def\addressee{} \invoicelogo
%  \line{\hbox to\longindentation{\vbox{\footfont\baselineskip9truept
%    \hsize=\longindentation\companytext}\hfill}\kern-\longindentation
%    \vbox{\smallheadfont\baselineskip9truept
%      \leftskip=\longindentation\sendingaddress}}%
%  \bigskip\bigskip
%  \line{\hbox to\addressindent{\rm\@date\hfil}\underbar{\footfont\sender}\hfil}}
%
%\def\address{\beginlinemode\getaddress}
%{\obeylines\gdef\getaddress #1
%  #2
%  {#1\gdef\addressee{#2}%
%    \global\setbox\theaddress=\vbox to 3.5cm\bgroup\vss\raggedright%
%    \parindent=\addressindent
%    \everypar{\hangindent2em}#2
%    \def\endmode{\vss\egroup\endgroup \copy\theaddress \bigskip\bigskip}}}
%\def\toname#1{\gdef\addressee{#1}}

%%
%% Ende Abschnitt 1: Änderung für das Adreßfeld
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%



%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% Beginn Abschnitt 2: Entfernen des Formularkopfes
%%
%% Falls vorgedruckte Formulare für Briefe und Rechnungen verwendet werden
%% sollen, so kann der Formularkopf von MUI-Rechnung entfernt werden.
%%
%% Um den Formularkopf zu entfernen, bitte in den folgenden Zeilen die "%"
%% am Zeilenanfang (!!) entfernen. Dieser Abschnitt darf auch in Kombination
%% mit anderen Abschnitten verwendet werden.
%%

%\def\invoice{\pageno=1 \def\addressee{} {\hrule height 0pt}
%  \bigskip
%  \line{\hbox to\longindentation{\underbar{\footfont\sender}
%    \hfil}\hfil}}
%
%\def\address{\beginlinemode\getaddress}
%{\obeylines\gdef\getaddress #1
%  #2
%  {#1\gdef\addressee{#2}%
%    \global\setbox\theaddress=\vbox to 3.5cm\bgroup\vss\raggedright%
%    \hsize=\longindentation \everypar{\hangindent2em}#2
%    \def\endmode{\vss\egroup\endgroup \copy\theaddress\line{\hfil\rm\@date}\bigskip}}}
%\def\toname#1{\gdef\addressee{#1}}

%%
%% Ende Abschnitt 2: Entfernen des Formularkopfes
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%



%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% Beginn Abschnitt 3: Rechnung mit Artikelnummer und beiden MwSt
%%
%% In der ausgedruckten Rechnung erscheint folgende Spaltendarstellung:
%%
%%
%% Art.-Nr.    Bezeichnung    Anzahl    Einzelpreis    Preis I    Preis II
%%
%%
%% Um diese Form der Darstellung zu erhalten, bitte in den folgenden Zeilen
%% die "%" am Zeilenanfang (!!) entfernen. In diesem Fall müssen in den
%% Abschnitten 4, 5 und 6 wieder die "%" am Zeilenanfang eingetragen werden!
%%

%\def\positions#1{\tabskip=0pt\halign to \hsize{
%  \strut##\hfil\tabskip=1em plus 1fil& % die Artikelnummer
%  ##\hfil&% die Artikelbezeichnung
%  \hfil##\hskip.5em&% die Mengenangabe
%  \hfil##&% der Einzelpreis
%  \hfil##&% der Positionspreis  v o r  15% Mehrwertsteuer
%  \hfil##\tabskip=0pt\cr % der Positionspreis  v o r   7% Mehrwertsteuer
%  \footfont\artnumname&\omit\footfont\designationname&\omit\footfont\quantityname&%
%  \footfont\retailname&\footfont\pricename~I&\footfont\pricename~II\cr
%  \noalign{\smallskip}
%  #1\crcr}} % die eigentlichen Rechnungspositionen
%
%\def\singleposition|#1|#2|#3|#4|#5|#6|#7|#8|#9|{
%  #6& % die Artikelnummer
%  #1& % die Artikelbezeichnung
%  \ifnum#3=0{\ }\else\printformattedamount{#2}\fi&% die Mengenangabe
%  \ifnum#3=0{\ }\else\printformattedamount{#3}\fi&% der Einzelpreis
%  \ifnum#3=0{\ }\else\printformattedamount{#4}\fi&% der Positionspreis  v o r  15% Mehrwertsteuer
%  \ifnum#3=0{\ }\else\printformattedamount{#5}\fi\cr}% der Positionspreis  v o r   7% Mehrwertsteuer

%%
%% Ende Abschnitt 3: Rechnung mit Artikelnummer und beiden MwSt
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%



%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% Beginn Abschnitt 4: Rechnung ohne Artikelnummer und nur MwSt I (15%)
%%
%% In der ausgedruckten Rechnung erscheint folgende Spaltendarstellung:
%%
%%
%% Bezeichnung         Anzahl         Einzelpreis         Preis I
%%
%%
%% Um diese Form der Darstellung zu erhalten, bitte in den folgenden Zeilen
%% die "%" am Zeilenanfang (!!) entfernen. Ebenfalls müssen in Abschnitt 6
%% alle "%" am Zeilenanfang entfernt werden. Weiterhin müssen in den
%% Abschnitten 3 und 5 wieder die "%" am Zeilenanfang eingetragen werden!
%%

%\def\positions#1{\tabskip=0pt\halign to \hsize{
%  \strut##\hfil\tabskip=1em plus 1fil& % die Artikelbezeichnung
%  \hfil##\hskip.5em&% die Mengenangabe
%  \hfil##&% der Einzelpreis
%  \hfil##\tabskip=0pt\cr% der Positionspreis  v o r  15% Mehrwertsteuer
%  \footfont\designationname&\omit\footfont\quantityname&%
%  \footfont\retailname&\footfont\sumname\cr
%  \noalign{\smallskip}
%  #1\crcr}} % die eigentlichen Rechnungspositionen
%
%\def\singleposition|#1|#2|#3|#4|#5|#6|#7|#8|#9|{
%  #1& % die Artikelbezeichnung
%  \ifnum#3=0{\ }\else\printformattedamount{#2}\fi&% die Mengenangabe
%  \ifnum#3=0{\ }\else\printformattedamount{#3}\fi&% der Einzelpreis
%  \ifnum#3=0{\ }\else\printformattedamount{#4}\fi\cr}% der Positionspreis  v o r  15% Mehrwertsteuer

%%
%% Ende Abschnitt 4: Rechnung ohne Artikelnummer und nur MwSt I (15%)
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%



%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% Beginn Abschnitt 5: Rechnung mit Artikelnummer und nur MwSt I (15%)
%%
%% In der ausgedruckten Rechnung erscheint folgende Spaltendarstellung:
%%
%%
%% Art.-Nr.      Bezeichnung      Anzahl      Einzelpreis      Preis I
%%
%%
%% Um diese Form der Darstellung zu erhalten, bitte in den folgenden Zeilen
%% die "%" am Zeilenanfang (!!) entfernen. Ebenfalls müssen in Abschnitt 6
%% alle "%" am Zeilenanfang entfernt werden. Weiterhin müssen in den
%% Abschnitten 3 und 4 wieder die "%" am Zeilenanfang eingetragen werden!
%%

%\def\positions#1{\tabskip=0pt\halign to \hsize{
%  \strut##\hfil\tabskip=1em plus 1fil& % die Artikelnummer
%  ##\hfil&% die Artikelbezeichnung
%  \hfil##\hskip.5em&% die Mengenangabe
%  \hfil##&% der Einzelpreis
%  \hfil##\tabskip=0pt\cr % der Positionspreis  v o r   15% Mehrwertsteuer
%  \footfont\artnumname&\omit\footfont\designationname&\omit\footfont\quantityname&%
%  \footfont\retailname&\footfont\sumname\cr
%  \noalign{\smallskip}
%  #1\crcr}} % die eigentlichen Rechnungspositionen
%
%\def\singleposition|#1|#2|#3|#4|#5|#6|#7|#8|#9|{
%  #6& % die Artikelnummer
%  #1& % die Artikelbezeichnung
%  \ifnum#3=0{\ }\else\printformattedamount{#2}\fi&% die Mengenangabe
%  \ifnum#3=0{\ }\else\printformattedamount{#3}\fi&% der Einzelpreis
%  \ifnum#3=0{\ }\else\printformattedamount{#4}\fi\cr}% der Positionspreis  v o r   15% Mehrwertsteuer

%%
%% Ende Abschnitt 5: Rechnung mit Artikelnummer und nur MwSt I (15%)
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%



%%%%%%%%%%%%%%%%%%%%%%%%%%
%%
%% Beginn Abschnitt 6: Rechnung mit nur einer MwSt (Fußzeile)
%%
%% Für den Fall, daß nur eine MwSt gewünscht ist (siehe Abschnitte 4 und 5)
%% muß noch die Zeile mit dem Rechnungsbetrag korrigiert werden.
%%
%%
%% Falls Sie im Abschnitt 4 oder 5 die "%" am Zeilenanfang entfernt haben,
%% müssen Sie dies auch in diesem Abschnitt tun. Wenn Sie dagegen im
%% Abschnitt 3 (zwei MwSt) die "%" entfernt haben, muß dieser Abschnitt
%% wieder die "%" erhalten.
%%

%\def\totals|#1|#2|#3|#4|#5|{\gdef\footlinetext{\hfil\@thanks@name\hfil}
%  \vfill\hrule\vskip\blocklineskip\tabskip=0pt\halign to \hsize{
%    \strut##\hfil\tabskip=1em plus 1fil&% "`Summe I und II"'
%    \hfil## \%&% "`15%"' und "`7%"'
%    \hfil##&% Mehrwertsteuerbeträge
%    \hfil{\bf##}\tabskip=0pt\cr % "`Rechnungsbetrag"' und sein Wert
%    \footfont\totalname\ \currencyname&
%    \omit\footfont\vatname&\footfont\currencyname&
%    \footfont\amountname\ \currencyname\cr
%    \printformattedamount{#1}&
%      \printformattedamount{\vat@rate@I}&\printformattedamount{#3}&
%      \underbar{\printformattedamount{#5}}\cr}
%  \vskip\blocklineskip\hrule}
%
%\def\subtotals|#1|#2|#3|#4|#5|{\gdef\footlinetext{\ifnum\pageno>0
%  \nextpage=\pageno \advance\nextpage by 1\hfil\continuename\
%  \the\nextpage\hfil\fi}
%  \vfill\hrule\vskip\blocklineskip\tabskip=0pt\halign to \hsize{
%    \strut##\hfil\tabskip=1em plus 1fil&% "`Zwischensumme"'
%    \hfil## \%&% "`15%"' und "`7%"'
%    \hfil##&% Mehrwertsteuerbeträge
%    \hfil{\bf##}\tabskip=0pt\crcr % "`Übertrag"' und sein Wert
%    \footfont\subtotalname\ \currencyname&
%    \omit\footfont\vatname&\footfont\currencyname&
%    \footfont\carryovername\ \currencyname\cr
%    \printformattedamount{#1}&
%      \printformattedamount{\vat@rate@I}&\printformattedamount{#3}&
%      \underbar{\printformattedamount{#5}}\cr
%  \noalign{\vskip\blocklineskip\hrule\eject\hrule\vskip\blocklineskip}
%    \footfont\subtotalname\ \currencyname&
%    \omit\footfont\vatname&\footfont\currencyname&
%    \footfont\carryovername\ \currencyname\cr
%    \printformattedamount{#1}&
%      \printformattedamount{\vat@rate@I}&\printformattedamount{#3}&
%      \underbar{\printformattedamount{#5}}\cr}
%  \vskip\blocklineskip\hrule\vskip\positionskip}

%%
%% Ende Abschnitt 6: Rechnung mit nur einer MwSt (Fußzeile)
%%
%%%%%%%%%%%%%%%%%%%%%%%%%%



\catcode`\@=\atcode % return to previous catcode