--- trunk/t/data/normalize.pl 2006/05/13 12:07:27 470 +++ trunk/t/data/normalize.pl 2006/05/14 11:06:33 484 @@ -48,6 +48,14 @@ ) ); +display('ResponsibilityFirst', + rec('200','f') +); + +display('ResponsibilitySecond', + rec('200','g') +); + tag('VolumeDesignation', rec('200','v') ); @@ -235,10 +243,14 @@ rec(608) ); -tag('UncontroledTerms', +tag('UncontrolledTerms', rec(610) ); +search('UDC_All', + rec(675), +); + tag('UDC', rec(675) ); @@ -261,7 +273,7 @@ ) ); -tag('PersonalNameOth', +tag('PersonalNameOther', join_with(', ', rec(702,'a'), rec(702,'b'), @@ -304,6 +316,34 @@ rec(900) ); +display('Set', + lookup( + prefix( 'set-jzav:', + rec(946,1), + ) + ), + lookup( + prefix( 'set-efzg:', + rec(461,1), + ) + ) +); + +search('Set', + rec(946,1), + rec(461,1), +); + +tag('Set2', + lookup( + prefix( 'set-jzav:', + lookup( 'parent-id:', + rec(946,1) + ) + ) + ) +); + tag('CallNo', rec(990) ); @@ -312,8 +352,4 @@ rec(991) ); - - - - - +1;