Parent Directory | Revision Log
template for set-described normalization to MARC21
1 | 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 |