Parent Directory
| 
Revision Log
| 
Patch
| revision 569 by dpavlin, Sun Jul 2 21:32:53 2006 UTC | revision 574 by dpavlin, Mon Jul 3 21:08:07 2006 UTC | |
|---|---|---|
| # | Line 1 | Line 1 |
| 1 | # Leader | # Leader |
| 2 | # | |
| 3 | # if ( rec('999') && first(rec('999')) =~ m/pregledan/i) { | if ( rec('999') && first(rec('999')) =~ m/pregledan/i) { |
| 4 | # marc_leader('05','c'); | marc_leader('05','c'); |
| 5 | # } else { | } else { |
| 6 | # marc_leader('05','n'); | marc_leader('05','n'); |
| 7 | # } | } |
| 8 | # | |
| 9 | # marc_leader('06','a'); | marc_leader('06','a'); |
| 10 | # | |
| 11 | # marc_leader('07','m'); | marc_leader('07','m'); |
| 12 | # | |
| 13 | # marc_leader('18','i'); | marc_leader('18','i'); |
| 14 | # | |
| 15 | # if ( rec('230') ) { | if ( rec('230') ) { |
| 16 | # marc_leader('19','r'); | marc_leader('19','r'); |
| 17 | # } | } |
| 18 | ||
| 19 | ||
| 20 | ||
| # | Line 186 marc('700','a', | Line 186 marc('700','a', |
| 186 | # ); | # ); |
| 187 | # } | # } |
| 188 | ||
| 189 | _debug( 2 ); | |
| 190 | ||
| 191 | if ( rec('710','f') ) { | if ( rec('710','f') ) { |
| 192 | ||
| 193 | marc_indicators('111', 2, ' '); | marc_indicators('111', 2, ' '); |
| # | Line 193 marc('111','a', | Line 195 marc('111','a', |
| 195 | rec('710','a') | rec('710','a') |
| 196 | ); | ); |
| 197 | ||
| 198 | marc('111','c', | |
| 199 | rec('710','e') | |
| 200 | ); | |
| 201 | ||
| 202 | marc('111','d', | |
| 203 | rec('710','f') | |
| 204 | ); | |
| 205 | ||
| 206 | marc('111','e', | marc('111','e', |
| 207 | rec('710','b') | rec('710','b') |
| 208 | ); | ); |
| # | Line 201 marc('111','n', | Line 211 marc('111','n', |
| 211 | rec('710','d') | rec('710','d') |
| 212 | ); | ); |
| 213 | ||
| marc('111','c', | ||
| rec('710','e') | ||
| ); | ||
| marc('111','d', | ||
| rec('710','f') | ||
| ); | ||
| 214 | ||
| 215 | } else { | } else { |
| 216 | ||
| # | Line 222 marc('110','c', | Line 225 marc('110','c', |
| 225 | ||
| 226 | } | } |
| 227 | ||
| 228 | _debug( 0 ); | |
| 229 | ||
| 230 | # zapisi za duplanje | # zapisi za duplanje |
| 231 | # | |
| 232 | # if ( rec('230') ) { | if ( rec('230') ) { |
| 233 | # | |
| 234 | # marc('245','a', | marc_duplicate(); |
| 235 | # rec('230','a') | |
| 236 | # ); | marc('245','a', |
| 237 | # | rec('230','a') |
| 238 | # marc('245','b', | ); |
| 239 | # rec('230','e') | |
| 240 | # ); | marc('245','b', |
| 241 | # | rec('230','e') |
| 242 | # marc('245','c', | ); |
| 243 | # rec('230','f') | |
| 244 | # ); | marc('245','c', |
| 245 | # | rec('230','f') |
| 246 | # marc('245','n', | ); |
| 247 | # rec('230','v') | |
| 248 | # ); | marc('245','n', |
| 249 | # | rec('230','v') |
| 250 | # } | ); |
| 251 | ||
| 252 | } |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.26 |