@@ -, +, @@ --- installer/data/mysql/updatedatabase.pl | 6 ++++++ .../prog/en/modules/admin/preferences/serials.pref | 3 +++ .../prog/en/modules/serials/subscription-add.tt | 10 ++++++++++ serials/subscription-add.pl | 6 ++++++ 4 files changed, 25 insertions(+), 0 deletions(-) --- a/installer/data/mysql/updatedatabase.pl +++ a/installer/data/mysql/updatedatabase.pl @@ -4923,6 +4923,12 @@ if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) { SetVersion($DBversion); } +$DBversion = "3.07.00.XXX"; +if (C4::Context->preference("Version") < TransformToNum($DBversion)) { + $dbh->do("INSERT INTO systempreferences (variable,value,options,explanation,type) VALUES('SubscriptionDuplicateDroppedInput','','','List of fields which must not be rewritten when a subscription is duplicated (Separated by semicolon)','Free')"); + print "Upgrade to $DBversion done (Add System Preferences SubscriptionDuplicateDroppedInput)\n"; + SetVersion($DBversion); +} =head1 FUNCTIONS --- a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/serials.pref +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/serials.pref @@ -47,3 +47,6 @@ Serials: simplified: a summary full: a full list - of the serial issues. + - + - List of fields which must not be rewritten when a subscription is duplicated (Separated by semicolon) + - pref: SubscriptionDuplicateDroppedInput --- a/koha-tmpl/intranet-tmpl/prog/en/modules/serials/subscription-add.tt +++ a/koha-tmpl/intranet-tmpl/prog/en/modules/serials/subscription-add.tt @@ -944,6 +944,16 @@ $(document).ready(function() { $('#numberpattern').change( function() { reset_num_pattern(); }); + + var node; + [% FOREACH field IN dont_export_field_loop %] + node = $("#[% field.fieldid %]"); + if ( $(node).is('input') || $(node).is('textarea') ) { + $(node).val(""); + } else if ( $(node).is('select') ) { + $(node).find("option:first").attr('selected','selected'); + } + [% END %] }); //]]> --- a/serials/subscription-add.pl +++ a/serials/subscription-add.pl @@ -113,6 +113,12 @@ if ($op eq 'modify' || $op eq 'dup' || $op eq 'modsubscription') { firstacquiyear => substr($firstissuedate,0,4), ); } + + if ( $op eq 'dup' ) { + my $dont_copy_fields = C4::Context->preference('SubscriptionDuplicateDroppedInput'); + my @fields_id = map { fieldid => $_ }, split ';', $dont_copy_fields; + $template->param( dont_export_field_loop => \@fields_id ); + } } my $onlymine=C4::Context->preference('IndependantBranches') && --