[koha-Infos] Creation de notice apres importation

[Paul POULAIN]

Michaël P. a écrit :

> Impossible de faire fonctionner ce script. Voici ce qu'il me sort:
>
> $ ./dumpmarc.pl -file noticesiptparis.iso  -n 1
> NUM : 1
> Invalid indicators "  fre" forced to blanks in record 1 for tag 040
>
> no subfield data found in record 1 for tag 040
> Invalid indicators "  ADMIN/ADMIN" forced to blanks in record 1 for 
> tag 944
>
> no subfield data found in record 1 for tag 944
> Invalid indicators "  ISO00000100" forced to blanks in record 1 for 
> tag 951
>
> no subfield data found in record 1 for tag 951
> Invalid indicators "  BFPT" forced to blanks in record 1 for tag 956
>
> no subfield data found in record 1 for tag 956
> Invalid indicators "  1" forced to blanks in record 1 for tag 958
>
> no subfield data found in record 1 for tag 958
> Invalid indicators "  P" forced to blanks in record 1 for tag 959
>
> no subfield data found in record 1 for tag 959
> Invalid indicators "  0" forced to blanks in record 1 for tag 960
>
> no subfield data found in record 1 for tag 960
> ==================
> 1 record parsed
>

Et bien il marche tout à fait ce script. Cela signifie par contre que le 
fichier n'est pas iso2709 valide. (Il suffit d'un octet mal positionné 
pour mettre du bazard dans un fichier iso2709...)
Essayez avec l'option -w :
w : warning and strict off. If your dump fail, try -w option. It it 
works, then, the file is iso2709, but a buggy one !

> Livre:
>         title:  ' Morceaux choisis /  Karl Marx. Introd. par H. 
> Lefebvre et N. Guterman                              n.'
>         title p:        ' Morceaux choisis /'
>         author:         ' Marx, Karl,  1818-1883.'
>         edition:        ''
>         publicd:        ' 1934.'
>
>while ( my $marc = $file->next() ) {
>    print "Livre: \n";
>    print "\ttitle: \t'" . $marc->title() . "'\n";
>    print "\ttitle p: \t'" . $marc->title_proper() . "'\n";
>    print "\tauthor: \t'" . $marc->author() . "'\n";
>    print "\tedition: \t'" . $marc->edition() . "'\n";
>    print "\tpublicd: \t'" . $marc->publication_date() . "'\n";
>
>  
>
Cela laisse à penser que c'est bien du MARC21, même s'il n'est pas tout 
à fait valide. Les fonctions title(), author() retournent les valeurs 
dans les champs MARC21, par UNIMARC.
Si le fichier était UNIMARC, vous auriez obtenu autre chose qu'un titre.

-- 
Paul POULAIN
Consultant indépendant en logiciels libres
responsable francophone de koha (SIGB libre http://www.koha-fr.org)