Lines 3045-3056
sub _koha_add_biblio {
Link Here
|
3045 |
seriestitle = ?, |
3045 |
seriestitle = ?, |
3046 |
copyrightdate = ?, |
3046 |
copyrightdate = ?, |
3047 |
datecreated=NOW(), |
3047 |
datecreated=NOW(), |
3048 |
abstract = ? |
3048 |
abstract = ?, |
|
|
3049 |
branchcode = ? |
3049 |
"; |
3050 |
"; |
3050 |
my $sth = $dbh->prepare($query); |
3051 |
my $sth = $dbh->prepare($query); |
3051 |
$sth->execute( |
3052 |
$sth->execute( |
3052 |
$frameworkcode, $biblio->{'author'}, $biblio->{'title'}, $biblio->{'unititle'}, $biblio->{'notes'}, |
3053 |
$frameworkcode, $biblio->{'author'}, |
3053 |
$biblio->{'serial'}, $biblio->{'seriestitle'}, $biblio->{'copyrightdate'}, $biblio->{'abstract'} |
3054 |
$biblio->{'title'}, $biblio->{'unititle'}, |
|
|
3055 |
$biblio->{'notes'}, $biblio->{'serial'}, |
3056 |
$biblio->{'seriestitle'}, $biblio->{'copyrightdate'}, |
3057 |
$biblio->{'abstract'}, $biblio->{'branchcode'}, |
3054 |
); |
3058 |
); |
3055 |
|
3059 |
|
3056 |
my $biblionumber = $dbh->{'mysql_insertid'}; |
3060 |
my $biblionumber = $dbh->{'mysql_insertid'}; |
Lines 3087-3101
sub _koha_modify_biblio {
Link Here
|
3087 |
serial = ?, |
3091 |
serial = ?, |
3088 |
seriestitle = ?, |
3092 |
seriestitle = ?, |
3089 |
copyrightdate = ?, |
3093 |
copyrightdate = ?, |
3090 |
abstract = ? |
3094 |
abstract = ?, |
|
|
3095 |
branchcode = ? |
3091 |
WHERE biblionumber = ? |
3096 |
WHERE biblionumber = ? |
3092 |
" |
3097 |
" |
3093 |
; |
3098 |
; |
3094 |
my $sth = $dbh->prepare($query); |
3099 |
my $sth = $dbh->prepare($query); |
3095 |
|
3100 |
|
3096 |
$sth->execute( |
3101 |
$sth->execute( |
3097 |
$frameworkcode, $biblio->{'author'}, $biblio->{'title'}, $biblio->{'unititle'}, $biblio->{'notes'}, |
3102 |
$frameworkcode, $biblio->{'author'}, |
3098 |
$biblio->{'serial'}, $biblio->{'seriestitle'}, $biblio->{'copyrightdate'}, $biblio->{'abstract'}, $biblio->{'biblionumber'} |
3103 |
$biblio->{'title'}, $biblio->{'unititle'}, |
|
|
3104 |
$biblio->{'notes'}, $biblio->{'serial'}, |
3105 |
$biblio->{'seriestitle'}, $biblio->{'copyrightdate'}, |
3106 |
$biblio->{'abstract'}, $biblio->{'branchcode'}, |
3107 |
$biblio->{'biblionumber'} |
3099 |
) if $biblio->{'biblionumber'}; |
3108 |
) if $biblio->{'biblionumber'}; |
3100 |
|
3109 |
|
3101 |
if ( $dbh->errstr || !$biblio->{'biblionumber'} ) { |
3110 |
if ( $dbh->errstr || !$biblio->{'biblionumber'} ) { |