|
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'} ) { |