1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112

\subsection{[% filterchars(thistitset.${"T0331"}.first.content) %]}
[%-

weitere_titel = [];
FOREACH item IN thistitset.${"T0370"} ;
  content = filterchars(item.content) ;
  weitere_titel.push(content);
END ;

parallele_ausgaben = [];
FOREACH item IN thistitset.${"T0527"} ;
  content = filterchars(item.content) ;
  parallele_ausgaben.push(content);
END ;

umfang_originale = [];
FOREACH item IN thistitset.${"T0433"} ;
  content = filterchars(item.content) ;
  umfang_originale.push(content);
END ;

entwuerfe = [];
FOREACH item IN thistitset.${"T0501"} ;
  content = filterchars(item.content) ;
  entwuerfe.push(content);
END ;

techniken = [];
FOREACH item IN thistitset.${"T0334"} ;
  content = filterchars(item.content) ;
  techniken.push(content);
END ;

hst_zusatz = [];
FOREACH item IN thistitset.${"T0335"} ;
  content = filterchars(item.content) ;
  hst_zusatz.push(content);
END ;

-%]
Titel: \emph{[% filterchars(thistitset.${"T0331"}.first.content) %]}. [% IF thistitset.${"T0410"}.first.content %][% filterchars(thistitset.${"T0410"}.first.content) %][% END %][% IF thistitset.${"T0412"}.first.content %]: [% filterchars(thistitset.${"T0412"}.first.content) %][% END %][% IF thistitset.${"T0425"}.first.content %], [% filterchars(thistitset.${"T0425"}.first.content) %].[% ELSIF thistitset.${"T0424"}.first.content %], [% filterchars(thistitset.${"T0424"}.first.content) %].[% END %]\newline 
[%- IF weitere_titel.size > 0 || parallele_ausgaben.size > 0 %][% IF weitere_titel.size > 0 %]Weitere Titel: [% weitere_titel.join(', ') %][% END %][% IF weitere_titel.size > 0 && parallele_ausgaben.size > 0%], [% END %][% IF parallele_ausgaben.size > 0 %]Parallele Ausgabe(n): [% parallele_ausgaben.join(', ') %][% END %]\newline [% END %]
[%- IF umfang_originale.size > 0 %]Umfang: [% umfang_originale.join(', ') %]\newline [% END %]
[%- IF entwuerfe.size > 0 %]Entw"urfe: [% entwuerfe.join(', ') %]\newline [% END %]
[%- IF techniken.size > 0 %]Technik(en): [% techniken.join(', ') %]\newline [% END %]
Signatur: \textbf{[% filterchars(thismexset.first.${"X0014"}.content) %]}
[%- IF thistitset.${"T0361"}.first.content %]
\minisec{Einzelbilder:}
\begin{itemize}
[% FOREACH item IN thistitset.${"T0361"} -%]
  \item [% filterchars(item.content) %]
[%- END %]
\end{itemize}
[% END -%]
[%- IF illu == "buch" -%]
[%- IF thistitset.${"T5002"}.first.content || thistitset.${"T0530"}.first.content || thistitset.${"T0590"}.first.content %]
\minisec{Entworfen f"ur:}
\begin{itemize}
[%- IF thistitset.${"T5002"}.first.content -%]
[%- FOREACH item IN thistitset.${"T5004"} ;
    sub_record = new_record('pruessen', item.content) ;
    sub_record = sub_record.load_full_record ;

    sub_normdata = sub_record.get_normdata ;

    sub_personen = [];
    FOREACH item IN sub_normdata.${"T0100"} ;
      content = filterchars(item.content) ;
      IF NOT item.content.match('Prüssen, Eduard') ;
        sub_personen.push(content);
      END ;
    END ;
    FOREACH item IN sub_normdata.${"T0101"} ;
      content = filterchars(item.content) ;
      IF NOT item.content.match('Prüssen, Eduard') ;
        sub_personen.push(content);
      END ;
    END ;

-%]
  \item [% IF sub_personen.size > 0 %][% sub_personen.join(', ') %]: [% END %][% filterchars(sub_normdata.${"T0331"}.first.content) %][% IF sub_normdata.${"T0335"}.first.content %]: [% filterchars(sub_normdata.${"T0335"}.first.content) %][% END %]. [% IF sub_normdata.${"T0410"}.first.content %][% filterchars(sub_normdata.${"T0410"}.first.content) %]: [% END %][% IF sub_normdata.${"T0412"}.first.content %][% filterchars(sub_normdata.${"T0412"}.first.content) %], [% END %][% IF sub_normdata.${"T0425"}.first.content %][% filterchars(sub_normdata.${"T0425"}.first.content) %].[% ELSIF sub_normdata.${"T0424"}.first.content %][% filterchars(sub_normdata.${"T0424"}.first.content) %].[% END %]\newline Signatur: [% filterchars(sub_record.get_mexdata.first.${"X0014"}.content) %]
[%- END %]
[%- ELSIF thistitset.${"T0590"}.first.content -%]
[%    FOREACH item IN thistitset.${"T0590"} -%]
  \item [% filterchars(item.content) %][% IF NOT item.content.match('\.$') %].[% END %]
[%-   END %]
[%- END -%]
[% FOREACH item IN thistitset.${"T0530"} -%]
  \item [% filterchars(item.content) %][% IF NOT item.content.match('\.$') %].[% END %]
[%- END %]
\end{itemize}
[% END %]
[% ELSIF illu == "presse" %]
[%-   IF thistitset.${"T5002"}.first.content || thistitset.${"T0530"}.first.content || thistitset.${"T0525"}.first.content || thistitset.${"T0590"}.first.content %]
\minisec{Entworfen f"ur:}
\begin{itemize}
[%-     IF thistitset.${"T0590"}.first.content -%]
[%        FOREACH item IN thistitset.${"T0590"} -%]
  \item [% filterchars(item.content) %][% IF NOT item.content.match('\.$') %].[% END %]
[%-       END %]
[%-     ELSIF thistitset.${"T0530"}.first.content %]
[%        FOREACH item IN thistitset.${"T0530"} -%]
  \item [% filterchars(item.content) %][% IF NOT item.content.match('\.$') %].[% END %]
[%-       END %]
[%-     ELSIF thistitset.${"T0525"}.first.content %]
[%        FOREACH item IN thistitset.${"T0530"} -%]
  \item [% filterchars(item.content) %][% IF NOT item.content.match('\.$') %].[% END %]
[%-       END %]
[%      END %]
\end{itemize}
[%    END %]
[% END %]