Parent Directory | Revision Log
template for set-described normalization to MARC21
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('500','a', | ||
93 | rec('300') | ||
94 | ); | ||
95 | |||
96 | marc21('504','a', | ||
97 | rec('320') | ||
98 | ); | ||
99 | |||
100 | marc21('655','a', | ||
101 | rec('610') | ||
102 | ); | ||
103 | |||
104 | marc21('100','a', | ||
105 | join_with(', ', | ||
106 | rec('700', 'a'), | ||
107 | rec('700', 'b') | ||
108 | ) | ||
109 | ); | ||
110 | |||
111 | marc21('700','a', | ||
112 | join_with(', ', | ||
113 | rec('701', 'a'), | ||
114 | rec('701', 'b') | ||
115 | ) | ||
116 | ); | ||
117 | |||
118 | if ( rec('701') ) { | ||
119 | marc21('700','4', | ||
120 | '070' | ||
121 | ); | ||
122 | } | ||
123 | |||
124 | marc21('700','a', | ||
125 | join_with(', ', | ||
126 | rec('702','a'), | ||
127 | rec('702','b') | ||
128 | ) | ||
129 | ); | ||
130 | |||
131 | if ( rec('702') ) { | ||
132 | marc21('700','4', | ||
133 | '340' | ||
134 | ); | ||
135 | } | ||
136 | |||
137 | |||
138 |
ViewVC Help | |
Powered by ViewVC 1.1.26 |