Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

fix for #229

  • Loading branch information...
commit 533c38dc8f99efe853944b4c5807678f0d8413cc 1 parent a3ed523
tipaul authored
Showing with 6 additions and 6 deletions.
  1. +2 −2 C4/Date.pm
  2. +4 −4 insertdata.pl
View
4 C4/Date.pm
@@ -31,7 +31,7 @@ sub get_date_format
sub display_date_format
{
my $dateformat = get_date_format();
-
+
if ( $dateformat eq "us" )
{
return "mm/dd/yyyy";
@@ -62,7 +62,7 @@ sub format_date
}
my $dateformat = get_date_format();
-
+
if ( $dateformat eq "us" )
{
Date_Init("DateFormat=US");
View
8 insertdata.pl
@@ -51,8 +51,8 @@
my $sth=$dbh->prepare($query);
$sth->execute;
if (my $data=$sth->fetchrow_hashref){
- $data{'dateofbirth'}=format_date($data{'dateofbirth'});
- $data{'joining'}=format_date($data{'joining'});
+ $data{'dateofbirth'}=format_date_in_iso($data{'dateofbirth'});
+ $data{'joining'}=format_date_in_iso($data{'joining'});
$query="update borrowers set title='$data{'title'}',expiry='$data{'expiry'}',
cardnumber='$data{'cardnumber'}',sex='$data{'sex'}',ethnotes='$data{'ethnicnotes'}',
streetaddress='$data{'address'}',faxnumber='$data{'faxnumber'}',firstname='$data{'firstname'}',
@@ -67,8 +67,8 @@
# print $query;
}else{
- $data{'dateofbirth'}=format_date($data{'dateofbirth'});
- $data{'joining'}=format_date($data{'joining'});
+ $data{'dateofbirth'}=format_date_in_iso($data{'dateofbirth'});
+ $data{'joining'}=format_date_in_iso($data{'joining'});
$query="insert into borrowers (title,expiry,cardnumber,sex,ethnotes,streetaddress,faxnumber,
firstname,altnotes,dateofbirth,contactname,emailaddress,textmessaging,dateenrolled,streetcity,
altrelationship,othernames,phoneday,categorycode,city,area,phone,borrowernotes,altphone,surname,
Please sign in to comment.
Something went wrong with that request. Please try again.