Last change
on this file since 22397 was 22397, checked in by kjdon, 14 years ago |
added UNIMARC format
|
-
Property svn:keywords
set to
Author Date Id Revision
|
File size:
1.2 KB
|
Line | |
---|
1 | /* ------------------------------------------------------------------- */
|
---|
2 | /* MARCmake : Convert a metatag struct to MARC and add it to the */
|
---|
3 | /* marcrecord struct. */
|
---|
4 | /* */
|
---|
5 | /* This is where the format-dependent conversion */
|
---|
6 | /* program is selected. */
|
---|
7 | /* */
|
---|
8 | /* Author : Ole Husby */
|
---|
9 | /* Updated : 1998-09-30 */
|
---|
10 | /* ------------------------------------------------------------------- */
|
---|
11 |
|
---|
12 | #include <stdio.h>
|
---|
13 | #include "d2m.h"
|
---|
14 |
|
---|
15 |
|
---|
16 |
|
---|
17 | int MARCmake(struct metatag *mt, struct marcrec *mr, int format)
|
---|
18 | {
|
---|
19 | char pre[64], creator_tag[4];
|
---|
20 |
|
---|
21 | if (format == DANMARC)
|
---|
22 | return danMARC(mt, mr);
|
---|
23 | else if (format == FINMARC)
|
---|
24 | return finMARC(mt, mr);
|
---|
25 | else if (format == ISMARC)
|
---|
26 | return isMARC(mt, mr);
|
---|
27 | else if (format == USMARC)
|
---|
28 | return usMARC(mt, mr);
|
---|
29 | else if (format == UNIMARC)
|
---|
30 | return uniMARC(mt, mr);
|
---|
31 | else if (format == SWEMARC)
|
---|
32 | return sweMARC(mt, mr);
|
---|
33 | else
|
---|
34 | return norMARC(mt, mr);
|
---|
35 | }
|
---|
Note:
See
TracBrowser
for help on using the repository browser.