Lines 694-699
sub attributes_from_api {
Link Here
|
694 |
|
694 |
|
695 |
my $params; |
695 |
my $params; |
696 |
my $columns_info = $self->_result->result_source->columns_info; |
696 |
my $columns_info = $self->_result->result_source->columns_info; |
|
|
697 |
my $dtf = $self->_result->result_source->storage->datetime_parser; |
697 |
|
698 |
|
698 |
while (my ($key, $value) = each %{ $from_api_params } ) { |
699 |
while (my ($key, $value) = each %{ $from_api_params } ) { |
699 |
my $koha_field_name = |
700 |
my $koha_field_name = |
Lines 708-714
sub attributes_from_api {
Link Here
|
708 |
} |
709 |
} |
709 |
elsif ( _date_or_datetime_column_type( $columns_info->{$koha_field_name}->{data_type} ) ) { |
710 |
elsif ( _date_or_datetime_column_type( $columns_info->{$koha_field_name}->{data_type} ) ) { |
710 |
try { |
711 |
try { |
711 |
$value = dt_from_string($value, 'rfc3339'); |
712 |
if ( $columns_info->{$koha_field_name}->{data_type} eq 'date' ) { |
|
|
713 |
$value = $dtf->format_date(dt_from_string($value, 'rfc3339')); |
714 |
} |
715 |
else { |
716 |
$value = $dtf->format_datetime(dt_from_string($value, 'rfc3339')); |
717 |
} |
712 |
} |
718 |
} |
713 |
catch { |
719 |
catch { |
714 |
Koha::Exceptions::BadParameter->throw( parameter => $key ); |
720 |
Koha::Exceptions::BadParameter->throw( parameter => $key ); |
715 |
- |
|
|