"Fossies" - the Fresh Open Source Software Archive 
Member "koha-19.11.15/cataloguing/value_builder/dateaccessioned.pl" (23 Feb 2021, 1834 Bytes) of package /linux/misc/koha-19.11.15.tar.gz:
As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) Perl source code syntax highlighting (style:
standard) with prefixed line numbers and
code folding option.
Alternatively you can here
view or
download the uninterpreted source code file.
For more information about "dateaccessioned.pl" see the
Fossies "Dox" file reference documentation and the last
Fossies "Diffs" side-by-side code changes report:
20.05.06_vs_20.11.00.
1 #!/usr/bin/perl
2
3 # Converted to new plugin style (Bug 13437)
4
5 # Copyright 2000-2002 Katipo Communications
6 # Parts copyright Athens County Public Libraries 2019
7 #
8 # This file is part of Koha.
9 #
10 # Koha is free software; you can redistribute it and/or modify it
11 # under the terms of the GNU General Public License as published by
12 # the Free Software Foundation; either version 3 of the License, or
13 # (at your option) any later version.
14 #
15 # Koha is distributed in the hope that it will be useful, but
16 # WITHOUT ANY WARRANTY; without even the implied warranty of
17 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 # GNU General Public License for more details.
19 #
20 # You should have received a copy of the GNU General Public License
21 # along with Koha; if not, see <http://www.gnu.org/licenses>.
22
23 use Modern::Perl;
24 use Koha::DateUtils;
25
26 my $builder = sub {
27 my ( $params ) = @_;
28 my $function_name = $params->{id};
29
30 my $date = output_pref({ dt => dt_from_string, dateformat => 'iso', dateonly => 1 });
31
32 my $res = <<END_OF_JS;
33 <script>
34 // from: cataloguing/value_builder/dateaccessioned.pl
35
36 \$(document).ready(function(){
37 \$("#$function_name").datepicker({
38 dateFormat: "yy-mm-dd"
39 });
40 });
41
42 function Focus$function_name(event) {
43 set_to_today(event.data.id);
44 \$("#$function_name").datepicker("show");
45
46 }
47
48 function Click$function_name(event) {
49 event.preventDefault();
50 set_to_today(event.data.id, 1);
51 }
52
53 function set_to_today( id, force ) {
54 // The force parameter is used in Click but not in Focus !
55 if (! id) { alert(_("Bad id ") + id + _(" sent to set_to_today()")); return 0; }
56 if (\$("#" + id).val() == '' || \$("#" + id).val() == '0000-00-00' || force ) {
57 \$("#" + id).val("$date");
58 }
59 }
60 </script>
61 END_OF_JS
62 return $res;
63 };
64
65 return { builder => $builder };