/[webpac2]/trunk/conf/normalize/common.pl
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /trunk/conf/normalize/common.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 517 by dpavlin, Thu May 18 12:09:19 2006 UTC revision 758 by dpavlin, Wed Oct 25 11:02:36 2006 UTC
# Line 220  tag('IssuedWith', Line 220  tag('IssuedWith',
220          )          )
221  );  );
222    
223  display('parts',  #display('parts',
224          lookup(  #       lookup(
225                  prefix( 'dio-jzav:', rec(900) )  #               prefix( 'dio-jzav:', rec(900) )
226          )  #       )
227  );  #);
228    #
229  search('parts',  #search('parts',
230          lookup(  #       lookup(
231                  prefix( 'id-dio-jzav:', rec(900) )  #               prefix( 'id-dio-jzav:', rec(900) )
232          )  #       )
233  );  #);
234    #
235  display('partsEF',  #display('partsEF',
236          lookup(  #       lookup(
237                  prefix( 'naslov-efzg:001', rec('001') )  #               prefix( 'naslov-efzg:001', rec('001') )
238          )  #       )
239  );  #);
240    #
241  tag('partsID',  #tag('partsID',
242          rec('463','1')  #       rec('463','1')
243  );  #);
244    #
245  tag('piece',  #tag('piece',
246          lookup(  #       lookup(
247                  prefix( 'naslov-efzg:',  #               prefix( 'naslov-efzg:',
248                          first(  #                       first(
249                                  rec(463,1)  #                               rec(463,1)
250                          )  #                       )
251                  )  #               )
252          )  #       )
253  );  #);
254    #
255  tag('pieceSubtitle',  #tag('pieceSubtitle',
256          lookup(  #       lookup(
257                  prefix( 'podnaslov-efzg:',  #               prefix( 'podnaslov-efzg:',
258                          first(  #                       first(
259                                  rec(463,1)  #                               rec(463,1)
260                          )  #                       )
261                  )  #               )
262          )  #       )
263  );  #);
264    
265  tag('pieceNum',  tag('pieceNum',
266          rec('463','v')          rec('463','v')
# Line 355  tag('id', Line 355  tag('id',
355          rec(900)          rec(900)
356  );  );
357    
358  display('set',  #display('set',
359          lookup(  #       lookup(
360                  prefix( 'set-jzav:',  #               prefix( 'set-jzav:',
361                          rec(946,1),  #                       rec(946,1),
362                  )  #               )
363          ),  #       ),
364          lookup(  #       lookup(
365                  prefix( 'set-efzg:',  #               prefix( 'set-efzg:',
366                          rec(461,1),  #                       rec(461,1),
367                  )  #               )
368          )  #       )
369  );  #);
370    
371  search('set',  search('set',
372          rec(946,1),          rec(946,1),
373          rec(461,1),          rec(461,1),
374  );  );
375    
376  tag('set2',  #tag('set2',
377          lookup(  #       lookup(
378                  prefix( 'set-jzav:',  #               prefix( 'set-jzav:',
379                          lookup( 'parent-id:',  #                       lookup( 'parent-id:',
380                                  rec(946,1)  #                               rec(946,1)
381                          )  #                       )
382                  )  #               )
383          )  #       )
384  );  #);
385    
386  tag('ShelvingControlNumber',  tag('ShelvingControlNumber',
387          rec(990)          rec(990)
Legend:
Removed from v.517  
changed lines
  Added in v.758
  ViewVC Help
Powered by ViewVC 1.1.26