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