finish fixing spelling error on department

This commit is contained in:
kados 2007-03-10 06:28:06 +00:00
parent 9f4bf0d7f5
commit d126742c41
4 changed files with 18 additions and 18 deletions

View file

@ -2900,14 +2900,14 @@ return ($notified);
=head2 GetOverduesForBranch
Sql request for display all information for branchoverdues.pl
2 possibilities : with or without departement .
2 possibilities : with or without department .
display is filtered by branch
=cut
sub GetOverduesForBranch {
my ( $branch, $departement) = @_;
if ( not $departement ) {
my ( $branch, $department) = @_;
if ( not $department ) {
my $dbh = C4::Context->dbh;
my $sth = $dbh->prepare("
SELECT
@ -2998,7 +2998,7 @@ sub GetOverduesForBranch {
AND (issues.date_due <= NOW())
ORDER BY borrowers.surname
" );
$sth->execute( $branch, $departement);
$sth->execute( $branch, $department);
my @getoverdues;
my $i = 0;
while ( my $data = $sth->fetchrow_hashref ) {

View file

@ -70,8 +70,8 @@ Koha.pm provides many functions for Koha scripts.
&getitemtypeimagesrcfromurl
&get_infos_of
&get_notforloan_label_of
&GetDepartements
&GetDepartementLib
&GetDepartments
&GetDepartmentLib
&getitemtypeimagedir
&getitemtypeimagesrc
&GetAuthorisedValues
@ -1088,24 +1088,24 @@ sub displaySecondaryServers {
return; #$secondary_servers_loop;
}
sub GetDepartements {
sub GetDepartments {
my $dbh = C4::Context->dbh;
my $sth = $dbh->prepare(
"SELECT authorised_value,lib FROM authorised_values WHERE category='DPT'
"
);
$sth->execute;
my @getdepartements;
my @getdepartments;
my $i = 0;
while ( my $data = $sth->fetchrow_hashref ) {
$getdepartements[$i] = $data;
$getdepartments[$i] = $data;
$i++;
}
$sth->finish;
return (@getdepartements);
return (@getdepartments);
}
sub GetDepartementLib {
sub GetDepartmentLib {
my ($authorisedvalue) = @_;
my $dbh = C4::Context->dbh;
my $sth = $dbh->prepare(

View file

@ -24,7 +24,7 @@ use C4::Interface::CGI::Output;
use C4::Auth;
use C4::Date;
use C4::Circulation::Circ2; # AddNotifyLine
use C4::Koha; # GetDepartement...
use C4::Koha; # GetDepartment...
use Mail::Sendmail;
use Getopt::Long;
use Date::Calc qw/Today Today_and_Now Now/;
@ -104,7 +104,7 @@ my @getoverdues = GetOverduesForBranch( $default, $department );
# filter by department
if ($department) {
my ( $departmentlib, $departmentValue ) = GetDepartementLib($department);
my ( $departmentlib, $departmentValue ) = GetDepartmentLib($department);
$template->param(
department => $departmentlib,
departmentValue => $departmentValue,
@ -113,7 +113,7 @@ if ($department) {
else {
# initiate the selector of departments .....
my @getdepartments = GetDepartements();
my @getdepartments = GetDepartments();
my @departmentsloop;
foreach my $dpt (@getdepartments) {
my %department;

View file

@ -320,9 +320,9 @@
<option value="b">etat/province</option>
<!-- /TMPL_IF -->
<!-- TMPL_IF name="f8c" -->
<option value="c" SELECTED>compte/departement</option>
<option value="c" SELECTED>compte/department</option>
<!-- TMPL_ELSE -->
<option value="c">compte/departement</option>
<option value="c">compte/department</option>
<!-- /TMPL_IF -->
<!-- TMPL_IF name="f8d" -->
<option value="d"
@ -332,10 +332,10 @@
<!-- /TMPL_IF -->
<!-- TMPL_IF name="f8e" -->
<option value="e"
SELECTED>multi-local(inter-departemental,
SELECTED>multi-local(inter-departmental,
etc. sous le niveau national)</option>
<!-- TMPL_ELSE -->
<option value="e">multi-local(inter-departemental,
<option value="e">multi-local(inter-departmental,
etc. sous le niveau national)</option>
<!-- /TMPL_IF -->