! ! NOTE - 1) do not edit this header section ! - 2) this header is created from the template located ! in $aleph_headers (sub-folders) ! - 3) to add remarks within the table, ! start the line with !rem or !* ! - 4) to mark a line as non-used (but restorable) ! add ! at start of line, retaining column structure ! displaced by one position to the right ! - 5) all internal codes must be Latin characters A-Z,0-9 ! !============================================================================== ! tab_fix_usm2mab ! "Rules" for US-MARC (21) to MAB2 conversion !============================================================================== ! Last header change: 28/03/2004 ! ! HELP ! In order to run special conversion programs for single tags ! it is possible to use programs described in the documentation ! "Conversion between ALEPH-standard-formats" ! ! END_HELP ! ! COL 1. 5; ALPHA_NUM, UPPER; #; ! Source Tag & indicator; ! Source Tag & indicator; ! COL 2. 1; ALPHA_NUM, LOWER; ; ! Source Subfield; ! Source Subfield; ! COL 3. 5; ALPHA_NUM, UPPER; #; ! Target Tag & indicator; ! Target Tag & indicator; ! COL 4. 1; ALPHA_NUM, LOWER; ; ! Target Subfield; ! Target Subfield; ! COL 5. 100; ALPHA_NUM, LOWER; _; ! Program name with arguments; ! Program name with arguments; ! ! 1 2 3 4 5 !!!!!-!-!!!!!-!-!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!> ##### LDR const_field "00000nM2.01200024||||||h",ONCE-IDN=01 ##### FMT const_field "MH",ONCE-IDN=02 LDR usm2mab_ldr 001## 001 a 006## usm2mab_006 007## usm2mab_007 008## usm2mab_008 013## a 562 a 015## a 574 a 020## a 540 a 020## z 540b a 022## a 542 a 022## z 542b a 0242 a 541 a 0242 z 541b a 027## a 543 a 027## z 543b a 0280 a 551a a 0281 a 552 a 0282 a 551c a 030## a 376b a 041## 037b edit_field ADDNEW-I,SEL=a,CAT=";aa\x1C;" 100## a 100 a 110## 200 usm2mab_710 111## 200 usm2mab_710 130## a 304 a 130## l 304 a edit_field MERGE-I,PREFIX="<",SUFFIX=">",CAT=";aa ;" 240## a 304 a 245## a 331 a 245## b 335 a 245## c 359 a str_cat ", " 245## f 359 a str_cat ", " 245## g 359 a str_cat ", " 245## h 334 a 245## k 501 a 245## n 331 a str_cat ", " 245## p 331 a str_cat ": " 246## a 504 a 247## a 532 a 250## a 403 a 250## b 403 a str_cat ", " 254## a 503 a 255## a 407 a 255## b 407 a str_cat " ; " 256## a 653 a 260## a 410 a str_cat ", " 260## b 412 a str_cat ", " 260## c 425_ a str_cat 264## 419 300## a 433 a 300## b 434 a 300## c 435 a 300## e 437 a 300## f 434 a str_cat ", " 300## g 434 a str_cat ", " 310## a 523 a str_cat ". " 310## b 405 a 336## 060 337## 061 338## 062 340## 439 344## 440 345## 441 346## 442 347## 443 362## a 432 a 380## a 380 a 381## 381 382## 382 383## 383 384## a 384 a 385## 678 490## a 454 a usm2mab_440 500## a 501 a str_cat ". - " 501## a 517 a 502## a 519 a 504## a 517c a 505## a 517 a 507## a 407 a str_cat " ; " 507## b 407 a str_cat " ; " 508## a 511 a 510## 539 511## a 509 a 513## a 501 a str_cat ". - " 515## a 523 a str_cat ". " 516## a 651 a 518## a 501 a str_cat ". - " 520## a 750 a 521## 514 524## a 501 a str_cat ". - " 525## a 501 a str_cat ". - " 533## a 610 a 533## b 611a a 533## c 613 a 533## d 620 a 533## e 637 a 533## f 621 a 533## m 619 a 534## a 501 a str_cat ". - " 538## a 501 a str_cat ". - " 542## 444 550## s 537 s 550## u 537 u 600## 711c a get_sub_all " / ",-67 610## 711d a get_sub_all " / ",-67 611## 711d a get_sub_all " / ",-67 630## 711 a get_sub_all " / ",-67 650## 711a a get_sub_all " / ",-67 651## 711b a get_sub_all " / ",-67 653## 711 a get_sub_all " / ",-67 655## 064 700## 100b usm2mab_700 710## 200b usm2mab_710 711## 200b usm2mab_710 720## 100b usm2mab_700 730## 370 a 740## 370 a 751## 676 753## a 654 a 753## c 654 c edit_field MERGE-I 770## i 529 a 770## t 529 a str_cat ": " 780## i 531 a 780## t 531 a str_cat ": " 856 655 8560# 655a 8561# 655b 8562# 655c 8563# 655d 8564# 655e 8567# 655h