Lines 202-209
sub ModBranch {
Link Here
|
202 |
(branchcode,branchname,branchaddress1, |
202 |
(branchcode,branchname,branchaddress1, |
203 |
branchaddress2,branchaddress3,branchzip,branchcity,branchstate, |
203 |
branchaddress2,branchaddress3,branchzip,branchcity,branchstate, |
204 |
branchcountry,branchphone,branchfax,branchemail, |
204 |
branchcountry,branchphone,branchfax,branchemail, |
205 |
branchurl,branchip,branchprinter,branchnotes,opac_info) |
205 |
branchurl,branchip,branchprinter,branchnotes,opac_info, |
206 |
VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?) |
206 |
branchreplyto, branchreturnpath) |
|
|
207 |
VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?) |
207 |
"; |
208 |
"; |
208 |
my $sth = $dbh->prepare($query); |
209 |
my $sth = $dbh->prepare($query); |
209 |
$sth->execute( |
210 |
$sth->execute( |
Lines 216-221
sub ModBranch {
Link Here
|
216 |
$data->{'branchemail'}, $data->{'branchurl'}, |
217 |
$data->{'branchemail'}, $data->{'branchurl'}, |
217 |
$data->{'branchip'}, $data->{'branchprinter'}, |
218 |
$data->{'branchip'}, $data->{'branchprinter'}, |
218 |
$data->{'branchnotes'}, $data->{opac_info}, |
219 |
$data->{'branchnotes'}, $data->{opac_info}, |
|
|
220 |
$data->{'branchreplyto'}, $data->{'branchreturnpath'} |
219 |
); |
221 |
); |
220 |
return 1 if $dbh->err; |
222 |
return 1 if $dbh->err; |
221 |
} else { |
223 |
} else { |
Lines 225-231
sub ModBranch {
Link Here
|
225 |
branchaddress2=?,branchaddress3=?,branchzip=?, |
227 |
branchaddress2=?,branchaddress3=?,branchzip=?, |
226 |
branchcity=?,branchstate=?,branchcountry=?,branchphone=?, |
228 |
branchcity=?,branchstate=?,branchcountry=?,branchphone=?, |
227 |
branchfax=?,branchemail=?,branchurl=?,branchip=?, |
229 |
branchfax=?,branchemail=?,branchurl=?,branchip=?, |
228 |
branchprinter=?,branchnotes=?,opac_info=? |
230 |
branchprinter=?,branchnotes=?,opac_info=?, |
|
|
231 |
branchreplyto=?, branchreturnpath=? |
229 |
WHERE branchcode=? |
232 |
WHERE branchcode=? |
230 |
"; |
233 |
"; |
231 |
my $sth = $dbh->prepare($query); |
234 |
my $sth = $dbh->prepare($query); |
Lines 239-244
sub ModBranch {
Link Here
|
239 |
$data->{'branchemail'}, $data->{'branchurl'}, |
242 |
$data->{'branchemail'}, $data->{'branchurl'}, |
240 |
$data->{'branchip'}, $data->{'branchprinter'}, |
243 |
$data->{'branchip'}, $data->{'branchprinter'}, |
241 |
$data->{'branchnotes'}, $data->{opac_info}, |
244 |
$data->{'branchnotes'}, $data->{opac_info}, |
|
|
245 |
$data->{'branchreplyto'}, $data->{'branchreturnpath'}, |
242 |
$data->{'branchcode'}, |
246 |
$data->{'branchcode'}, |
243 |
); |
247 |
); |
244 |
} |
248 |
} |