function CalculateAge(dateofbirth) {

    function CalculateAge() {

        var today = new Date();

        if (!$("#dateofbirth").datepicker( 'getDate' )) {

        var dob = new Date($("#dateofbirth").datepicker( 'getDate' ));

            var elem = $("#dateofbirth").siblings(".hint").first().html('');

            return 1;

        var nowyear = today.getFullYear();

        }

        var nowmonth = today.getMonth();

        var nowday = today.getDate();

        var birthyear = dob.getFullYear();

        var dob = new Date($("#dateofbirth").datepicker( 'getDate' ));

        var birthmonth = dob.getMonth();

        var birthday = dob.getDate();

        var year = nowyear - birthyear;

        var year = dob.getFullYear();

        var month = nowmonth - birthmonth;

        var month = dob.getMonth();

        var day = nowday - birthday;

        var day = dob.getDate();

        if(day < 0) {

        $.ajax({

            month = parseInt(month) -1;

            url : '/cgi-bin/koha/svc/members/age',

        }

            type : 'GET',

            data: 'dateofbirth=' + year + '-' + month + '-' + day,

            dataType: 'json',

            success : function(json, statut){

                var age_string = "Age: ";

                if (json.years) { age_string += json.years + " year(s) "; }

                if (json.months) { age_string += json.months + " month(s) "; }

                var elem = $("#dateofbirth").siblings(".hint").first().html(age_string);

            },

        });

- 

#!/usr/bin/perl

# Copyright 2012 BibLibre

#

# This file is part of Koha.

#

# Koha is free software; you can redistribute it and/or modify it

# under the terms of the GNU General Public License as published by

# the Free Software Foundation; either version 3 of the License, or

# (at your option) any later version.

#

# Koha is distributed in the hope that it will be useful, but

# WITHOUT ANY WARRANTY; without even the implied warranty of

# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

# GNU General Public License for more details.

#

# You should have received a copy of the GNU General Public License

# along with Koha; if not, see <http://www.gnu.org/licenses>.

use Modern::Perl;

use CGI qw ( -utf8 );

use C4::Auth qw( check_cookie_auth );

use JSON qw( to_json );

use C4::Members qw( GetAge );

binmode STDOUT, ":encoding(UTF-8)";

my $query = new CGI;

my ( $status, $sessionID ) = check_cookie_auth(

    $query->cookie('CGISESSID'),

    { borrowers => '*' },

);

unless ($status eq "ok") {

    print $query->header(-type => 'application/json', -status => '403 Forbidden');

    exit 0;

}

my $dateofbirth = $query->param('dateofbirth');

my ($age_year, $age_month) = GetAge($dateofbirth);

print $query->header(-type => 'application/json');

print to_json({

    years => $age_year,

    months => $age_month

});