Parent Directory | Revision Log
r737@llin: dpavlin | 2006-06-29 23:54:47 +0200 removed duplicate definitions
1 | dpavlin | 537 | marc21('001', |
2 | rec('000') | ||
3 | ); | ||
4 | |||
5 | marc21('020','a', | ||
6 | rec('010') | ||
7 | ); | ||
8 | |||
9 | marc21('101','a', | ||
10 | rec('101') | ||
11 | ); | ||
12 | |||
13 | marc21('245','a', | ||
14 | rec('200','a') | ||
15 | ); | ||
16 | |||
17 | marc21('245','b', | ||
18 | join_with(' : ', | ||
19 | rec('200','d'), | ||
20 | rec('200','e') | ||
21 | ) | ||
22 | ); | ||
23 | |||
24 | marc21('245','c', | ||
25 | join_with(' ; ', | ||
26 | rec('200','f'), | ||
27 | rec('200','g') | ||
28 | ) | ||
29 | ); | ||
30 | |||
31 | marc21('250','a', | ||
32 | rec('205','a') | ||
33 | ); | ||
34 | |||
35 | marc21('260','a', | ||
36 | rec('210','a') | ||
37 | ); | ||
38 | |||
39 | marc21('260','b', | ||
40 | rec('210','c') | ||
41 | ); | ||
42 | |||
43 | marc21('260','c', | ||
44 | rec('210','d') | ||
45 | ); | ||
46 | |||
47 | marc21('300','a', | ||
48 | rec('215','a') | ||
49 | ); | ||
50 | |||
51 | marc21('300','b', | ||
52 | rec('215','c') | ||
53 | ); | ||
54 | |||
55 | marc21('300','c', | ||
56 | rec('215','d') | ||
57 | ); | ||
58 | |||
59 | marc21('300','e', | ||
60 | rec('215','e') | ||
61 | ); | ||
62 | |||
63 | marc21('490','a', | ||
64 | join_with(' = ', | ||
65 | rec('225','a'), | ||
66 | join_with(" : ", | ||
67 | rec('225','d'), | ||
68 | join_with(" / ", | ||
69 | rec('225','e'), | ||
70 | rec('225','f') | ||
71 | ) | ||
72 | ) | ||
73 | ) | ||
74 | ); | ||
75 | |||
76 | marc21('490','v', | ||
77 | rec('225','v') | ||
78 | ); | ||
79 | |||
80 | marc21('500','a', | ||
81 | rec('300') | ||
82 | ); | ||
83 | |||
84 | marc21('504','a', | ||
85 | rec('320') | ||
86 | ); | ||
87 | |||
88 | marc21('655','a', | ||
89 | rec('610') | ||
90 | ); | ||
91 | |||
92 | marc21('100','a', | ||
93 | join_with(', ', | ||
94 | rec('700', 'a'), | ||
95 | rec('700', 'b') | ||
96 | ) | ||
97 | ); | ||
98 | |||
99 | marc21('700','a', | ||
100 | join_with(', ', | ||
101 | rec('701', 'a'), | ||
102 | rec('701', 'b') | ||
103 | ) | ||
104 | ); | ||
105 | |||
106 | if ( rec('701') ) { | ||
107 | marc21('700','4', | ||
108 | '070' | ||
109 | ); | ||
110 | } | ||
111 | |||
112 | marc21('700','a', | ||
113 | join_with(', ', | ||
114 | rec('702','a'), | ||
115 | rec('702','b') | ||
116 | ) | ||
117 | ); | ||
118 | |||
119 | if ( rec('702') ) { | ||
120 | marc21('700','4', | ||
121 | '340' | ||
122 | ); | ||
123 | } | ||
124 | |||
125 | |||
126 |
ViewVC Help | |
Powered by ViewVC 1.1.26 |