|
Lines 201-207
sub insert_week_day_holiday {
Link Here
|
| 201 |
croak "Invalid weekday $weekday" unless $weekday =~ m/^[0-6]$/; |
201 |
croak "Invalid weekday $weekday" unless $weekday =~ m/^[0-6]$/; |
| 202 |
|
202 |
|
| 203 |
my $dbh = C4::Context->dbh(); |
203 |
my $dbh = C4::Context->dbh(); |
| 204 |
my $insertHoliday = $dbh->prepare("insert into repeatable_holidays (id,branchcode,weekday,day,month,title,description) values ( '',?,?,NULL,NULL,?,? )"); |
204 |
my $insertHoliday = $dbh->prepare("insert into repeatable_holidays (branchcode,weekday,day,month,title,description) values ( ?,?,NULL,NULL,?,? )"); |
| 205 |
$insertHoliday->execute( $self->{branchcode}, $weekday, $options{title}, $options{description}); |
205 |
$insertHoliday->execute( $self->{branchcode}, $weekday, $options{title}, $options{description}); |
| 206 |
$self->{'week_days_holidays'}->{$weekday}{title} = $options{title}; |
206 |
$self->{'week_days_holidays'}->{$weekday}{title} = $options{title}; |
| 207 |
$self->{'week_days_holidays'}->{$weekday}{description} = $options{description}; |
207 |
$self->{'week_days_holidays'}->{$weekday}{description} = $options{description}; |
|
Lines 232-238
sub insert_day_month_holiday {
Link Here
|
| 232 |
my %options = @_; |
232 |
my %options = @_; |
| 233 |
|
233 |
|
| 234 |
my $dbh = C4::Context->dbh(); |
234 |
my $dbh = C4::Context->dbh(); |
| 235 |
my $insertHoliday = $dbh->prepare("insert into repeatable_holidays (id,branchcode,weekday,day,month,title,description) values ('', ?, NULL, ?, ?, ?,? )"); |
235 |
my $insertHoliday = $dbh->prepare("insert into repeatable_holidays (branchcode,weekday,day,month,title,description) values (?, NULL, ?, ?, ?,? )"); |
| 236 |
$insertHoliday->execute( $self->{branchcode}, $options{day},$options{month},$options{title}, $options{description}); |
236 |
$insertHoliday->execute( $self->{branchcode}, $options{day},$options{month},$options{title}, $options{description}); |
| 237 |
$self->{'day_month_holidays'}->{"$options{month}/$options{day}"}{title} = $options{title}; |
237 |
$self->{'day_month_holidays'}->{"$options{month}/$options{day}"}{title} = $options{title}; |
| 238 |
$self->{'day_month_holidays'}->{"$options{month}/$options{day}"}{description} = $options{description}; |
238 |
$self->{'day_month_holidays'}->{"$options{month}/$options{day}"}{description} = $options{description}; |
|
Lines 269-275
sub insert_single_holiday {
Link Here
|
| 269 |
|
269 |
|
| 270 |
my $dbh = C4::Context->dbh(); |
270 |
my $dbh = C4::Context->dbh(); |
| 271 |
my $isexception = 0; |
271 |
my $isexception = 0; |
| 272 |
my $insertHoliday = $dbh->prepare("insert into special_holidays (id,branchcode,day,month,year,isexception,title,description) values ('', ?,?,?,?,?,?,?)"); |
272 |
my $insertHoliday = $dbh->prepare("insert into special_holidays (branchcode,day,month,year,isexception,title,description) values (?,?,?,?,?,?,?)"); |
| 273 |
$insertHoliday->execute( $self->{branchcode}, $options{day},$options{month},$options{year}, $isexception, $options{title}, $options{description}); |
273 |
$insertHoliday->execute( $self->{branchcode}, $options{day},$options{month},$options{year}, $isexception, $options{title}, $options{description}); |
| 274 |
$self->{'single_holidays'}->{"$options{year}/$options{month}/$options{day}"}{title} = $options{title}; |
274 |
$self->{'single_holidays'}->{"$options{year}/$options{month}/$options{day}"}{title} = $options{title}; |
| 275 |
$self->{'single_holidays'}->{"$options{year}/$options{month}/$options{day}"}{description} = $options{description}; |
275 |
$self->{'single_holidays'}->{"$options{year}/$options{month}/$options{day}"}{description} = $options{description}; |
|
Lines 315-321
sub insert_exception_holiday {
Link Here
|
| 315 |
|
315 |
|
| 316 |
my $dbh = C4::Context->dbh(); |
316 |
my $dbh = C4::Context->dbh(); |
| 317 |
my $isexception = 1; |
317 |
my $isexception = 1; |
| 318 |
my $insertException = $dbh->prepare("insert into special_holidays (id,branchcode,day,month,year,isexception,title,description) values ('', ?,?,?,?,?,?,?)"); |
318 |
my $insertException = $dbh->prepare("insert into special_holidays (branchcode,day,month,year,isexception,title,description) values (?,?,?,?,?,?,?)"); |
| 319 |
$insertException->execute( $self->{branchcode}, $options{day},$options{month},$options{year}, $isexception, $options{title}, $options{description}); |
319 |
$insertException->execute( $self->{branchcode}, $options{day},$options{month},$options{year}, $isexception, $options{title}, $options{description}); |
| 320 |
$self->{'exception_holidays'}->{"$options{year}/$options{month}/$options{day}"}{title} = $options{title}; |
320 |
$self->{'exception_holidays'}->{"$options{year}/$options{month}/$options{day}"}{title} = $options{title}; |
| 321 |
$self->{'exception_holidays'}->{"$options{year}/$options{month}/$options{day}"}{description} = $options{description}; |
321 |
$self->{'exception_holidays'}->{"$options{year}/$options{month}/$options{day}"}{description} = $options{description}; |
| 322 |
- |
|
|