gandalf
/
Letterhead
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Bugfixes

master
Gandalf 2021-04-09 11:45:27 +02:00
parent a6964a22d2
commit 817c7b7e27
5 changed files with 24 additions and 31 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
.gitignore vendored
View File

@ -1,5 +1,6 @@
# Custom entries
test.*
Adressen/Adressen.csv
# ---> TeX

12
Adressen/Adressen.csv
View File

@ -1,12 +0,0 @@
handle,Name,Anrede,Adresse,FaxNr,TelNr,Closing,parent
AGdn,"AG Düren","Damen und Herren","August-Klotz-Str. 14\\52349 Düren",02421 493-6001,02421 493-0,"Mit der Ihnen gebührenden Hochachtung",LGac
LGac,"Landgericht Aachen","Damen und Herren","Adalbertsteinweg 92\\52070 Aachen",0241 9425-80000,0241 9425-0,"Mit der Ihnen gebührenden Hochachtung",OLGham
OLGham,Oberlandesgericht Hamm,,Heßlerstraße 53\\59065 Hamm,02381 272-518,02381 272-0,
LGk,Landgericht Köln,Damen und Herren,Luxemburger Straße 101\\50939 Köln,0221 477-3333,0221 477-0,Mit der Ihnen gebührenden Hochachtung,OLGk
AGfl,Amtsgericht Flensburg,Damen und Herren,Südergraben 22\\24937 Flensburg,0461 89-434,0461 89-0,Mit der Ihnen gebührenden Hochachtung,LGfl
LGfl,Landgericht Flensburg,Damen und Herren,Südergraben 22\\24937 Flensburg,0461 89-295,0461 89-0,Mit der Ihnen gebührenden Hochachtung,OLGsh
OLGsh,Schleswig-Holsteinisches Oberlandesgericht,Damen und Herren,Gottorfstraße 2\\24837 Schleswig,+ 49 4621 86-1372,+49 4621 86-0,Mit der Ihnen gebührenden Hochachtung,
AGkerpen,Amtsgericht Kerpen,,Nordring 2-8\\50171 Kerpen,02237 508-470,02237 508-0,Mit der Ihnen gebührenden Hochachtung,LGk
JCkalk,Jobcenter Köln\\Standort Kalk,Damen und Herren,Bergischer Ring 35-39\\51063 Köln,(0221) 96 44 34 00,(02 21) 96 44 35 90,Mit der Ihnen gebührenden Hochachtung,
POLk,Polizeipräsidium Köln,Damen und Herren,Walter-Pauli-Ring 2-6\\51103 Köln,0221 229-2002,0221 229-0,Gruß,
BVerfG,Bundesverfassungsgericht,Hohes Gericht,Postfach 1771\\76006 Karlsruhe,+49 (721) 9101-382,+49 (721) 9101-0,mit freundlichen Grüßen,
Can't render this file because it has a wrong number of fields in line 4.

2
Adressen/address.sh
View File

@ -125,7 +125,7 @@ then
do
read -rp "${HEADER[$i]} (${VALUES[$i]}): " NEWVAL
# echo "${HEADER[$i]} (${VALUES[$i]}): "
VALUES[$i]=${NEWVAL:-${VALUES[$i]}}
VALUES[$i]=$(echo ${NEWVAL:-${VALUES[$i]}} | sed -e s:,::g )
NEWLINE="$NEWLINE,${VALUES[$i]}" #already prepare output line
if [ ${HEADER[$i]} = "parent" ]
then

22
Adressen/deckblatt.sh
View File

@ -15,7 +15,7 @@ if [ -e DECKBLATT.csv ]
then
# Formatiert anzeigen
echo "Deckblatt für $PWD"
join -t, -1 2 -2 1 <(sort -t, -k2 DECKBLATT.csv) <(sort $BASEPATH/Adressen.csv) -o 1.4,2.2,1.2,1.3 -a 1 | grep -v handle | sort | awk -F, '{ print $2 " (" $3 "): " $4 }' | sed -e 's|"||g' -e 's|^ ()|Mein Az|'
join -t, -1 2 -2 1 <(sort -t, -k2 DECKBLATT.csv) <(sort $BASEPATH/Adressen.csv) -o 1.4,2.2,1.2,1.3 -a 1 --nocheck-order | grep -v handle | sort | awk -F, '{ print $2 " (" $3 "): " $4 }' | sed -e 's|"||g' -e 's|^ ()|Mein Az|'
else
# Neu anlegen
read -p "Kein Deckblatt im Verzeichnis. Lege neues Deckblatt an? " NEW
@ -43,7 +43,7 @@ else
then
read -p "Gibt es ein Aktenzeichen der StA? Falls ja, bitte eingeben. Falls nein, einfach Enter drücken: " STAZ
fi
if [ $STAZ ]
if [ "$STAZ" ]
then
STA="StA,,$STAZ,\n"
fi
@ -67,14 +67,15 @@ then
;;
"$OPT2")
# Prüfen, ob parent handel existiert.E
# Prüfen, ob parent handel existiert.
CURRENT=$(grep "+" DECKBLATT.csv | cut -d, -f2)
PARENT=$($BASEPATH/address.sh -p $CURRENT)
PARENT=$($BASEPATH/address.sh -p "$CURRENT")
echo "CURRENT=$CURRENT, PARENT=$PARENT"
USE= #for scope
# Dieses vorschlagen, oder manueller Eintrag
if [[ -n $PARENT ]]
if [[ -n $PARENT && -n "$($BASEPATH/address.sh -n "$PARENT")" ]]
then
read -p "Nächste Instanz sollte $($BASEPATH/address.sh -n $PARENT) ($PARENT) sein. Verwenden? (j/n): " USE
read -p "Nächste Instanz sollte "$($BASEPATH/address.sh -n "$PARENT")" ($PARENT) sein. Verwenden? (j/n): " USE
if [[ $USE =~ [nN] ]]
then
read -p "Neue Instanz eingeben (handle): " PARENT
@ -94,14 +95,17 @@ then
fi
fi
# Im Zweifel mit address.sh -g
if [ ! -n $($BASEPATH/address.sh -n $PARENT) ]
if [[ -n $PARENT && ! -n "$($BASEPATH/address.sh -n "$PARENT")" ]]
then
echo "Noch kein Adressbucheintrag für '$PARENT' vorhanden"
$BASEPATH/address.sh -g $PARENT
[ $? = 0 ] || exit 1
fi
sed -i.bac -e "s/\+$//" DECKBLATT.csv
echo "$GEG,$PARENT,$AZ,+" >> DECKBLATT.csv
if [ -n $PARENT ]
then
sed -i.bac -e "s/\+$//" DECKBLATT.csv
echo "$GEG,$PARENT,$AZ,+" >> DECKBLATT.csv
fi
;;
esac
fi

18
latex/letterhead.cls
View File

@ -39,27 +39,27 @@
\newcommand*{\receivestar}[1]{
\DTLloaddb{adressen}{/home/bernhardt/Entwicklung/Letterhead/Adressen/Adressen.csv}
\DTLassignfirstmatch{adressen}{handle}{#1}{\Name=Name,\Adresse=Adresse,\FaxNr=FaxNr,\TelNr=TelNr,\Opening=Anrede,\Closing=Closing}
\newcommand\FullAdress{\Name\\\Adresse\\per Fax: \FaxNr}
\ifthenelse{\equal{\Opening}{}}{\renewcommand\Opening{Damen und Herren}}
% \ifthenelse{\equal{\Closing}{}}{\renewcommand\Closing{Mit der Ihnen gebührenden Hochachtung}}
% Why the hell does this line throw "\equal not def'd" and the line before does not?
\newcommand\FullAddress{\Name\\\Adresse\\per Fax: \FaxNr}
\ifthenelse{\equal{\Opening}{}}{\renewcommand\Opening{Damen und Herren}}{}
\ifthenelse{\equal{\Closing}{}}{\renewcommand\Closing{Mit der Ihnen gebührenden Hochachtung}}{}
}
\newcommand*{\receivenostar}[1][+]{
\DTLloaddb{deckblatt}{DECKBLATT.csv}
\ifthenelse{\equal{#1}{+}}{%
\DTLassignfirstmatch{deckblatt}{stand}{+}{\handle=handle,\aktenzeichen=az}%
\DTLassignfirstmatch{deckblatt}{stand}{+}{\INH=INH,\handle=handle,\aktenzeichen=az}%
}{%
\DTLassignfirstmatch{deckblatt}{INH}{#1}{\handle=handle,\aktenzeichen=az}%
\DTLassignfirstmatch{deckblatt}{INH}{#1}{\INH=INH,\handle=handle,\aktenzeichen=az}%
}
\DTLassignfirstmatch{deckblatt}{INH}{ME}{\myref=az}
\DTLloaddb{adressen}{/home/bernhardt/Entwicklung/Letterhead/Adressen/Adressen.csv}
\xDTLassignfirstmatch{adressen}{handle}{\handle}{\Name=Name,\Adresse=Adresse,\FaxNr=FaxNr,\TelNr=TelNr,\Opening=Anrede,\Closing=Closing}
\setkomavar{yourref}{\aktenzeichen}
\setkomavar{myref}{\myref}
\newcommand\FullAdress{\Name\\\Adresse\\per Fax: \FaxNr}
\ifthenelse{\equal{\Opening}{}}{\renewcommand\Opening{Damen und Herren}}
\ifthenelse{\equal{\Closing}{}}{\renewcommand\Closing{Mit der Ihnen gebührenden Hochachtung}}
\newcommand\FullAddress{\Name\\\Adresse\\per Fax: \FaxNr}
\ifthenelse{\equal{\aktenzeichen}{""}\And\equal{\INH}{VG}}{\setkomavar{yourref}{Neue Klage}}{}
\ifthenelse{\equal{\Opening}{""}}{\renewcommand\Opening{Damen und Herren}}{}
\ifthenelse{\equal{\Closing}{""}}{\renewcommand\Closing{Mit der Ihnen gebührenden Hochachtung}}{}
\ifthenelse{\equal{#1}{JC}}{\addtoreffields{bgnr}}{}
}
\newcommand*{\receive}{\@ifstar{\receivestar}{\receivenostar}}