1 |
tag('MFN', |
2 |
rec('000') |
3 |
); |
4 |
|
5 |
display('ISBN', |
6 |
rec1('10'), |
7 |
rec('010','a') |
8 |
); |
9 |
|
10 |
display('ISBN_information', |
11 |
rec('010','b') |
12 |
); |
13 |
|
14 |
display('ISBN_incorrect', |
15 |
rec('010','z') |
16 |
); |
17 |
|
18 |
display('ISSN', |
19 |
rec1('11'), |
20 |
rec('011','a') |
21 |
); |
22 |
|
23 |
display('ISSN_incorrect', |
24 |
rec('011','z') |
25 |
); |
26 |
|
27 |
display('ISSN_cancelled', |
28 |
rec('011','y') |
29 |
); |
30 |
|
31 |
search('ISN', |
32 |
rec('10'), |
33 |
rec('010'), |
34 |
rec('11'), |
35 |
rec('011'), |
36 |
); |
37 |
|
38 |
tag('LanguageText', |
39 |
rec(101,'a') |
40 |
); |
41 |
|
42 |
tag('LanguageOriginal', |
43 |
join_with(', ', |
44 |
rec(101,'b'), |
45 |
rec(101,'d') |
46 |
) |
47 |
); |
48 |
|
49 |
tag('TitleProper', |
50 |
regex( 's/<[^>]*>//g', |
51 |
rec(200,'a') |
52 |
) |
53 |
); |
54 |
|
55 |
tag('Medium', |
56 |
rec(200,'b') |
57 |
); |
58 |
|
59 |
tag('AnotherAuthorTitle', |
60 |
prefix('. ', |
61 |
rec(200,'c') |
62 |
) |
63 |
); |
64 |
|
65 |
tag('ReminderTitle', |
66 |
join_with(' : ', |
67 |
prefix(' = ', |
68 |
rec(200,'d') |
69 |
), |
70 |
rec(200,'e') |
71 |
) |
72 |
); |
73 |
|
74 |
tag('StatementResponsibility', |
75 |
join_with(" ; ", |
76 |
rec(200,'f'), |
77 |
rec(200,'g') |
78 |
) |
79 |
); |
80 |
|
81 |
tag('NumberPart', |
82 |
rec(200,'h'), |
83 |
rec(200,'v') |
84 |
); |
85 |
|
86 |
tag('NamePart', |
87 |
rec(200,'i') |
88 |
); |
89 |
|
90 |
tag('EditionStatement', |
91 |
join_with(', ', |
92 |
rec(205,'a'), |
93 |
join_with(' = ', |
94 |
rec(205,'b'), |
95 |
rec(205,'d') |
96 |
) |
97 |
) |
98 |
); |
99 |
|
100 |
tag('StatementScale', |
101 |
rec(206,'a') |
102 |
); |
103 |
|
104 |
tag('SerialsNumberingDateVol', |
105 |
rec(207,'a') |
106 |
); |
107 |
|
108 |
tag('SerialsNumberingSource', |
109 |
rec(207,'z') |
110 |
); |
111 |
|
112 |
tag('fond', |
113 |
rec('209','a') |
114 |
); |
115 |
|
116 |
tag('PlacePublication', |
117 |
rec('210','a') |
118 |
); |
119 |
|
120 |
tag('NamePublisher', |
121 |
rec(210,'c'), |
122 |
surround(' (', ')', rec(210,'b') ) |
123 |
); |
124 |
|
125 |
tag('DatePublication', |
126 |
rec('210','d') |
127 |
); |
128 |
|
129 |
tag('PlaceManufacture', |
130 |
rec(210,'e') |
131 |
); |
132 |
|
133 |
tag('NameManufacturer', |
134 |
rec('210','g'), |
135 |
surround(' (', ') ', rec(210,'f') ) |
136 |
); |
137 |
|
138 |
tag('DateManufacture', |
139 |
rec(210,'h') |
140 |
); |
141 |
|
142 |
tag('ExtentItem', |
143 |
rec(215,'a') |
144 |
); |
145 |
|
146 |
tag('OtherPhysicalDetails', |
147 |
rec(215,'c') |
148 |
); |
149 |
|
150 |
tag('Dimensions', |
151 |
rec(215,'d') |
152 |
); |
153 |
|
154 |
tag('AccompanyingMaterial', |
155 |
rec(215,'e') |
156 |
); |
157 |
|
158 |
tag('SeriesStatement', |
159 |
join_with(" = ", |
160 |
rec('225','a'), |
161 |
join_with(" : ", |
162 |
rec('225','d'), |
163 |
join_with(" / ", |
164 |
rec('225','e'), |
165 |
rec('225','f'), |
166 |
) |
167 |
) |
168 |
) |
169 |
); |
170 |
|
171 |
tag('VolumeNumber', |
172 |
join_with(', ', |
173 |
rec(225,'h'), |
174 |
rec(225,'i'), |
175 |
rec(225,'v') |
176 |
) |
177 |
); |
178 |
|
179 |
tag('SeriesISSN', |
180 |
rec(225,'x') |
181 |
); |
182 |
|
183 |
tag('ComputerFileCharacteristics', |
184 |
rec(230,'a') |
185 |
); |
186 |
|
187 |
tag('GeneralNote', |
188 |
rec('300') |
189 |
); |
190 |
|
191 |
tag('InternalBibliographiesNote', |
192 |
rec('320') |
193 |
); |
194 |
|
195 |
tag('FrequencyNote', |
196 |
first( |
197 |
rec('326') |
198 |
) |
199 |
); |
200 |
|
201 |
tag('ContentsNote', |
202 |
rec('327') |
203 |
); |
204 |
|
205 |
tag('Summary', |
206 |
rec('330') |
207 |
); |
208 |
|
209 |
tag('SystemDetailsNote', |
210 |
rec('337') |
211 |
); |
212 |
|
213 |
tag('IssuedWith', |
214 |
join_with(': ', rec(423,'z'), |
215 |
join_with(' / ', rec(423,'a'), |
216 |
join_with(' ', rec(423,'c'), |
217 |
rec(423,'b') |
218 |
) |
219 |
) |
220 |
) |
221 |
); |
222 |
|
223 |
display('parts', |
224 |
lookup( |
225 |
prefix( 'dio-jzav:', rec(900) ) |
226 |
) |
227 |
); |
228 |
|
229 |
search('parts', |
230 |
lookup( |
231 |
prefix( 'id-dio-jzav:', rec(900) ) |
232 |
) |
233 |
); |
234 |
|
235 |
display('partsEF', |
236 |
lookup( |
237 |
prefix( 'naslov-efzg:001', rec('001') ) |
238 |
) |
239 |
); |
240 |
|
241 |
tag('partsID', |
242 |
rec('463','1') |
243 |
); |
244 |
|
245 |
tag('piece', |
246 |
lookup( |
247 |
prefix( 'naslov-efzg:', |
248 |
first( |
249 |
rec(463,1) |
250 |
) |
251 |
) |
252 |
) |
253 |
); |
254 |
|
255 |
tag('pieceSubtitle', |
256 |
lookup( |
257 |
prefix( 'podnaslov-efzg:', |
258 |
first( |
259 |
rec(463,1) |
260 |
) |
261 |
) |
262 |
) |
263 |
); |
264 |
|
265 |
tag('pieceNum', |
266 |
rec('463','v') |
267 |
); |
268 |
|
269 |
tag('pieceAnalitic', |
270 |
join_with(' / ', |
271 |
rec('464','a'), |
272 |
join_with(' ', |
273 |
rec(464,'g'), |
274 |
rec(464,'f'), |
275 |
) |
276 |
) |
277 |
); |
278 |
|
279 |
tag('UniformTitle', |
280 |
rec(500,'a'), |
281 |
surround(' [', ']', rec(500,'b') ) |
282 |
); |
283 |
|
284 |
tag('VariantAccessTitle', |
285 |
rec(532) |
286 |
); |
287 |
|
288 |
tag('SubjectForm', |
289 |
rec(608) |
290 |
); |
291 |
|
292 |
tag('UncontrolledTerms', |
293 |
rec(610) |
294 |
); |
295 |
|
296 |
tag('UDC', |
297 |
rec(675) |
298 |
); |
299 |
|
300 |
tag('OtherCassification', |
301 |
rec(686) |
302 |
); |
303 |
|
304 |
tag('PersonalNamePrim', |
305 |
join_with(', ', |
306 |
rec(700,'a'), |
307 |
rec(700,'b'), |
308 |
) |
309 |
); |
310 |
|
311 |
tag('PersonalNameAdded', |
312 |
join_with(', ', |
313 |
rec(701,'a'), |
314 |
rec(701,'b'), |
315 |
), |
316 |
join_with(', ', |
317 |
rec(702,'a'), |
318 |
rec(702,'b') |
319 |
) |
320 |
); |
321 |
|
322 |
search('names', |
323 |
rec(700), |
324 |
rec(701), |
325 |
rec(702), |
326 |
); |
327 |
|
328 |
tag('CorporateNamePrim', |
329 |
join_with(', ', |
330 |
rec(710,'a'), |
331 |
rec(710,'b'), |
332 |
) |
333 |
); |
334 |
|
335 |
tag('CorporateNameAdded', |
336 |
join_with(', ', |
337 |
rec(711,'a'), |
338 |
rec(711,'b'), |
339 |
) |
340 |
); |
341 |
|
342 |
tag('CatalogingSource', |
343 |
rec(801) |
344 |
); |
345 |
|
346 |
tag('ElectronicLocation', |
347 |
rec(856,'u') |
348 |
); |
349 |
|
350 |
tag('level', |
351 |
rec(909) |
352 |
); |
353 |
|
354 |
tag('id', |
355 |
rec(900) |
356 |
); |
357 |
|
358 |
display('set', |
359 |
lookup( |
360 |
prefix( 'set-jzav:', |
361 |
rec(946,1), |
362 |
) |
363 |
), |
364 |
lookup( |
365 |
prefix( 'set-efzg:', |
366 |
rec(461,1), |
367 |
) |
368 |
) |
369 |
); |
370 |
|
371 |
search('set', |
372 |
rec(946,1), |
373 |
rec(461,1), |
374 |
); |
375 |
|
376 |
tag('set2', |
377 |
lookup( |
378 |
prefix( 'set-jzav:', |
379 |
lookup( 'parent-id:', |
380 |
rec(946,1) |
381 |
) |
382 |
) |
383 |
) |
384 |
); |
385 |
|
386 |
tag('ShelvingControlNumber', |
387 |
rec(990) |
388 |
); |
389 |
|
390 |
tag('InternalItemNumber', |
391 |
rec(991,'b'), |
392 |
rec1(991) |
393 |
); |
394 |
|
395 |
|