Lines 1160-1166
Return a string representing the material type of this request or undef
Link Here
|
1160 |
|
1160 |
|
1161 |
sub get_type { |
1161 |
sub get_type { |
1162 |
my ($self) = @_; |
1162 |
my ($self) = @_; |
1163 |
my $attr = $self->illrequestattributes->find({ type => 'type'}); |
1163 |
my $attr = $self->extended_attributes->find({ type => 'type'}); |
1164 |
return if !$attr; |
1164 |
return if !$attr; |
1165 |
return $attr->value; |
1165 |
return $attr->value; |
1166 |
}; |
1166 |
}; |
Lines 1766-1775
and transport type
Link Here
|
1766 |
sub get_notice { |
1766 |
sub get_notice { |
1767 |
my ( $self, $params ) = @_; |
1767 |
my ( $self, $params ) = @_; |
1768 |
|
1768 |
|
1769 |
my $title = $self->illrequestattributes->find( |
1769 |
my $title = $self->extended_attributes->find( |
1770 |
{ type => 'title' } |
1770 |
{ type => 'title' } |
1771 |
); |
1771 |
); |
1772 |
my $author = $self->illrequestattributes->find( |
1772 |
my $author = $self->extended_attributes->find( |
1773 |
{ type => 'author' } |
1773 |
{ type => 'author' } |
1774 |
); |
1774 |
); |
1775 |
my $metahash = $self->metadata; |
1775 |
my $metahash = $self->metadata; |
Lines 1781-1787
sub get_notice {
Link Here
|
1781 |
my $metastring = join("\n", @metaarray); |
1781 |
my $metastring = join("\n", @metaarray); |
1782 |
|
1782 |
|
1783 |
my $illrequestattributes = { |
1783 |
my $illrequestattributes = { |
1784 |
map { $_->type => $_->value } $self->illrequestattributes->as_list |
1784 |
map { $_->type => $_->value } $self->extended_attributes->as_list |
1785 |
}; |
1785 |
}; |
1786 |
|
1786 |
|
1787 |
my $letter = C4::Letters::GetPreparedLetter( |
1787 |
my $letter = C4::Letters::GetPreparedLetter( |
1788 |
- |
|
|