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