View | Details | Raw Unified | Return to bug 13201
Collapse All | Expand All

(-)a/C4/Suggestions.pm (-5 / +4 lines)
Lines 202-210 sub SearchSuggestion { Link Here
202
202
203
=head2 GetSuggestion
203
=head2 GetSuggestion
204
204
205
\%sth = &GetSuggestion($ordernumber)
205
\%sth = &GetSuggestion($suggestionid)
206
206
207
this function get the detail of the suggestion $ordernumber (input arg)
207
this function get the detail of the suggestion $suggestionid (input arg)
208
208
209
return :
209
return :
210
    the result of the SQL query as a hash : $sth->fetchrow_hashref.
210
    the result of the SQL query as a hash : $sth->fetchrow_hashref.
Lines 212-218 return : Link Here
212
=cut
212
=cut
213
213
214
sub GetSuggestion {
214
sub GetSuggestion {
215
    my ($ordernumber) = @_;
215
    my ($suggestionid) = @_;
216
    my $dbh           = C4::Context->dbh;
216
    my $dbh           = C4::Context->dbh;
217
    my $query         = q{
217
    my $query         = q{
218
        SELECT *
218
        SELECT *
Lines 220-226 sub GetSuggestion { Link Here
220
        WHERE  suggestionid=?
220
        WHERE  suggestionid=?
221
    };
221
    };
222
    my $sth = $dbh->prepare($query);
222
    my $sth = $dbh->prepare($query);
223
    $sth->execute($ordernumber);
223
    $sth->execute($suggestionid);
224
    return ( $sth->fetchrow_hashref );
224
    return ( $sth->fetchrow_hashref );
225
}
225
}
226
226
227
- 

Return to bug 13201