projects
/
koha.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bug 10572: Add phone to message_transport_types table for new installs
[koha.git]
/
C4
/
Csv.pm
diff --git
a/C4/Csv.pm
b/C4/Csv.pm
index
74270ff
..
511540c
100644
(file)
--- a/
C4/Csv.pm
+++ b/
C4/Csv.pm
@@
-43,11
+43,15
@@
$VERSION = 3.07.00.049;
# Returns all informations about csv profiles
sub GetCsvProfiles {
# Returns all informations about csv profiles
sub GetCsvProfiles {
+ my ( $type ) = @_;
my $dbh = C4::Context->dbh;
my $query = "SELECT * FROM export_format";
my $dbh = C4::Context->dbh;
my $query = "SELECT * FROM export_format";
+ if ( $type ) {
+ $query .= " WHERE type = ?";
+ }
$sth = $dbh->prepare($query);
$sth = $dbh->prepare($query);
- $sth->execute;
+ $sth->execute
( $type ? $type : () )
;
$sth->fetchall_arrayref({});
$sth->fetchall_arrayref({});
@@
-82,24
+86,29
@@
sub GetMarcFieldsForCsv {
my ($id) = @_;
my $dbh = C4::Context->dbh;
my ($id) = @_;
my $dbh = C4::Context->dbh;
- my $query = "SELECT
marcfields
FROM export_format WHERE export_format_id=?";
+ my $query = "SELECT
content
FROM export_format WHERE export_format_id=?";
$sth = $dbh->prepare($query);
$sth->execute($id);
$sth = $dbh->prepare($query);
$sth->execute($id);
- return ($sth->fetchrow_hashref)->{
marcfields
};
+ return ($sth->fetchrow_hashref)->{
content
};
}
# Returns informations aboout csv profiles suitable for html templates
sub GetCsvProfilesLoop {
}
# Returns informations aboout csv profiles suitable for html templates
sub GetCsvProfilesLoop {
- # List of existing profiles
+ my ( $type ) = @_;
+ # List of existing profiles
my $dbh = C4::Context->dbh;
my $sth;
my $query = "SELECT export_format_id, profile FROM export_format";
my $dbh = C4::Context->dbh;
my $sth;
my $query = "SELECT export_format_id, profile FROM export_format";
+ if ( $type ) {
+ $query .= " WHERE type = ?";
+ }
+
$sth = $dbh->prepare($query);
$sth = $dbh->prepare($query);
- $sth->execute();
+ $sth->execute(
$type ? $type : ()
);
return $sth->fetchall_arrayref({});
}
return $sth->fetchall_arrayref({});
}