my $DEBUG = 0;
-=head1
-
-plugin_parameters : other parameters added when the plugin is called by the dopop function
-
-=cut
-
-sub plugin_parameters {
-# my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
- return "";
-}
-
-=head1
-
-plugin_javascript : the javascript function called when the user enters the subfield.
-contain 3 javascript functions :
-* one called when the field is entered (OnFocus). Named FocusXXX
-* one called when the field is leaved (onBlur). Named BlurXXX
-* one called when the ... link is clicked (<a href="javascript:function">) named ClicXXX
-
-returns :
-* XXX
-* a variable containing the 3 scripts.
-the 3 scripts are inserted after the <input> in the html code
-
-=cut
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name= "barcode".(int(rand(100000))+1);
<script type="text/javascript">
//<![CDATA[
-function Blur$function_name(index) {
- //barcode validation might go here
-}
-
function Focus$function_name(subfield_managed, id, force) {
$scr
return 0;
END_OF_JS
return ($function_name, $js);
}
-
-=head1
-
-plugin: useless here
-
-=cut
-
-sub plugin {
- # my ($input) = @_;
- return "";
-}
-
-1;
my $DEBUG = 0;
-=head1
-
-plugin_parameters : other parameters added when the plugin is called by the dopop function
-
-=cut
-
-sub plugin_parameters {
-# my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
- return "";
-}
-
-=head1
-
-plugin_javascript : the javascript function called when the user enters the subfield.
-contain 3 javascript functions :
-* one called when the field is entered (OnFocus). Named FocusXXX
-* one called when the field is leaved (onBlur). Named BlurXXX
-* one called when the ... link is clicked (<a href="javascript:function">) named ClicXXX
-
-returns :
-* XXX
-* a variable containing the 3 scripts.
-the 3 scripts are inserted after the <input> in the html code
-
-=cut
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name= "barcode".(int(rand(100000))+1);
<script type="text/javascript">
//<![CDATA[
- function Blur$function_name(index) {
- //barcode validation might go here
- }
-
- function Focus$function_name(subfield_managed, id, force) {
- return 0;
- }
-
function Clic$function_name(id) {
$scr
return 0;
END_OF_JS
return ($function_name, $js);
}
-
-=head1
-
-plugin: useless here
-
-=cut
-
-sub plugin {
-# my ($input) = @_;
- return "";
-}
-
-1;
=cut
-sub plugin_parameters {
-}
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $res="
<script type='text/javascript'>
- function Focus$field_number() {
- return 1;
- }
-
- function Blur$field_number() {
- return 1;
- }
-
function Clic$field_number() {
var code = document.getElementById('$field_number');
var url = '../cataloguing/plugin_launcher.pl?plugin_name=callnumber-KU.pl&code=' + code.value;
);
output_html_with_http_headers $input, $cookie, $template->output;
}
-
-1;
=cut
-sub plugin_parameters {
-}
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $res="
<script type='text/javascript'>
- function Focus$field_number() {
- return 1;
- }
-
function Blur$field_number() {
var code = document.getElementById('$field_number');
var url = '../cataloguing/plugin_launcher.pl?plugin_name=callnumber.pl&code=' + code.value;
return 1;
}
- function Clic$field_number() {
- return 1;
- }
</script>
";
}
output_html_with_http_headers $input, $cookie, $template->output;
}
-
-1;
no warnings 'redefine';
-=head1
-
-plugin_parameters : useless here
-
-=cut
-
-sub plugin_parameters {
- # my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
- return "";
-}
-
-=head1
-
-plugin_javascript : the javascript function called when the user enters the subfield.
-contain 3 javascript functions :
-* one called when the field is entered (OnFocus) named FocusXXX
-* one called when the field is left (onBlur ) named BlurXXX
-* one called when the ... link is clicked (onClick) named ClicXXX
-
-returns :
-* XXX
-* a variable containing the 3 scripts.
-the 3 scripts are inserted after the <input> in the html code
-
-=cut
-
sub plugin_javascript {
# my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name = "dateaccessioned".(int(rand(100000))+1);
//
// from: cataloguing/value_builder/dateaccessioned.pl
-function Blur$function_name(index) {
- //date validation could go here
-}
-
function Focus$function_name(subfield_managed, id, force) {
//var summary = "";
//for (i=0 ; i<document.f.field_value.length ; i++) {
END_OF_JS
return ($function_name, $res);
}
-
-=head1
-
-plugin: useless here.
-
-=cut
-
-sub plugin {
-# my ($input) = @_;
- return "";
-}
-
-1;
use vars qw( $is_a_modif );
use utf8;
-=head1
-
-plugin_parameters : other parameters added when the plugin is called by the dopop function
-
-=cut
-
-sub plugin_parameters {
-my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
-return "";
-}
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name= "macles".(int(rand(100000))+1);
<script type=\"text/javascript\">
//<![CDATA[
-function Focus$function_name(subfield_managed) {
-return 1;
-}
-
-function Blur$function_name(subfield_managed) {
- return 1;
-}
-
function Clic$function_name(i) {
newin=window.open(\"../cataloguing/plugin_launcher.pl?plugin_name=macles.pl&index=\"+i,\"MACLES\",',toolbar=false,scrollbars=yes');
$template->param("index"=>$index);
output_html_with_http_headers $input, $cookie, $template->output;
}
-1;
-
-
#use warnings; FIXME - Bug 2505
use C4::Context;
-=head1
-
-plugin_parameters : other parameters added when the plugin is called by the dopop function
-
-=cut
-
-sub plugin_parameters {
- # my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
- return "";
-}
-
-=head1
-
-plugin_javascript : the javascript function called when the user enters the subfield.
-contain 3 javascript functions :
-* one called when the field is entered (OnFocus). Named FocusXXX
-* one called when the field is leaved (onBlur). Named BlurXXX
-* one called when the ... link is clicked (<a href="javascript:function">) named ClicXXX
-
-returns :
-* XXX
-* a variable containing the 3 scripts.
-the 3 scripts are inserted after the <input> in the html code
-
-=cut
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name= $field_number;
<script type=\"text/javascript\">
//<![CDATA[
-function Blur$function_name(index) {
-//need this?
-}
-
function Focus$function_name(subfield_managed) {
document.getElementById(\"$field_number\").value='$org';
return 0;
}
-function Clic$function_name(subfield_managed) {
-}
//]]>
</script>
";
return ($function_name,$res);
}
-
-=head1
-
-plugin : the true value_builded. The screen that is open in the popup window.
-
-=cut
-
-sub plugin {
- return "";
-}
-
-1;
#use warnings; FIXME - Bug 2505
#use C4::Context;
-=head1
-
-plugin_parameters : other parameters added when the plugin is called by the dopop function
-
-=cut
-
-sub plugin_parameters {
- # my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
- return "";
-}
-
-=head1
-
-plugin_javascript : the javascript function called when the user enters the subfield.
-contain 3 javascript functions :
-* one called when the field is entered (OnFocus). Named FocusXXX
-* one called when the field is leaved (onBlur). Named BlurXXX
-* one called when the ... link is clicked (<a href="javascript:function">) named ClicXXX
-
-returns :
-* XXX
-* a variable containing the 3 scripts.
-the 3 scripts are inserted after the <input> in the html code
-
-=cut
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name= $field_number;
<script type=\"text/javascript\">
//<![CDATA[
-function Blur$function_name(index) {
-//need this?
-}
-
function Focus$function_name(subfield_managed) {
document.getElementById(\"$field_number\").value='$date';
return 0;
}
-function Clic$function_name(subfield_managed) {
-}
//]]>
</script>
";
return ($function_name,$res);
}
-
-=head1
-
-plugin : the true value_builded. The screen that is open in the popup window.
-
-=cut
-
-sub plugin {
- return "";
-}
-
-1;
=cut
-sub plugin_parameters {
- my ($dbh, $record, $tagslib, $i, $tabloop) = @_;
- return "";
-}
-
sub plugin_javascript {
my ($dbh, $record, $tagslib, $field_number, $tabloop) = @_;
my $function_name = $field_number;
<script type=\"text/javascript\">
//<![CDATA[
-function Focus$function_name(subfield_managed) {
-return 1;
-}
-
-function Blur$function_name(subfield_managed) {
- return 1;
-}
-
function Clic$function_name(i) {
defaultvalue=document.getElementById(\"$field_number\").value;
newin=window.open(\"../cataloguing/plugin_launcher.pl?plugin_name=marc21_field_006.pl&index=$field_number&result=\"+defaultvalue,\"tag_editor\",'width=1000,height=600,toolbar=false,scrollbars=yes');
);
output_html_with_http_headers $input, $cookie, $template->output;
}
-
-1;
=cut
-sub plugin_parameters {
-my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
-return "";
-}
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name= $field_number;
<script type=\"text/javascript\">
//<![CDATA[
-function Focus$function_name(subfield_managed) {
-return 1;
-}
-
-function Blur$function_name(subfield_managed) {
- return 1;
-}
-
function Clic$function_name(i) {
defaultvalue=document.getElementById(\"$field_number\").value;
newin=window.open(\"../cataloguing/plugin_launcher.pl?plugin_name=marc21_field_007.pl&index=$field_number&result=\"+defaultvalue,\"tag_editor\",'width=1000,height=600,toolbar=false,scrollbars=yes');
);
output_html_with_http_headers $input, $cookie, $template->output;
}
-
-1;
$mon += 1;
my $dateentered = substr($year, 2, 2) . sprintf("%0.2d", $mon) . sprintf("%0.2d", $mday);
-sub plugin_parameters {
- my ($dbh, $record, $tagslib, $i, $tabloop) = @_;
- return "";
-}
-
sub plugin_javascript {
my $lang = C4::Context->preference('DefaultLanguageField008' );
$lang = "eng" unless $lang;
return 1;
}
-function Blur$function_name(subfield_managed) {
- return 1;
-}
-
function Clic$function_name(i) {
defaultvalue=document.getElementById(\"$field_number\").value;
//Retrieve full leader string and pass it to the 008 tag editor
);
output_html_with_http_headers $input, $cookie, $template->output;
}
-
-1;
my $dateentered = substr($year,2,2).sprintf ("%0.2d", $mon).sprintf ("%0.2d",$mday);
my $defaultval = Field008();
-sub plugin_parameters {
- my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
- return "";
-}
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name= $field_number;
return 1;
}
-function Blur$function_name(subfield_managed) {
- return 1;
-}
-
function Clic$function_name(i) {
var authtype=document.forms['f'].elements['authtypecode'].value;
defaultvalue=document.getElementById(\"$field_number\").value;
}
return substr($pref,0,34); #ignore remainder
}
-
-1;
use C4::Context;
# use MARC::Record;
-=head1 plugin_parameters
-
-plugin_parameters : other parameters added when the plugin is called by the dopop function
-
-=cut
-
-sub plugin_parameters {
- # my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
- return "";
-}
-
-=head1 plugin_javascript
-
-plugin_javascript : the javascript function called when the user enters the subfield.
-contain 3 javascript functions :
-* one called when the field is entered (OnFocus). Named FocusXXX
-* one called when the field is leaved (onBlur). Named BlurXXX
-* one called when the ... link is clicked (<a href="javascript:function">) named ClicXXX
-
-returns :
-* XXX
-* a variable containing the 3 scripts.
-the 3 scripts are inserted after the <input> in the html code
-
-=cut
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name= $field_number;
<script type=\"text/javascript\">
//<![CDATA[
-function Blur$function_name(index) {
-//need this?
-}
-
function Focus$function_name(subfield_managed) {
document.getElementById(\"$field_number\").value='$org';
return 0;
}
-function Clic$function_name(subfield_managed) {
-}
//]]>
</script>
";
return ($function_name,$res);
}
-
-=head1 plugin
-
-plugin : the true value_builded. The screen that is open in the popup window.
-
-=cut
-
-sub plugin {
- return "";
-}
-
-1;
=cut
-sub plugin_parameters {
- # my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
- return "";
-}
-
-=head1 FUNCTIONS
-
-=head2 plugin_javascript
-
-The javascript function called when the user enters the subfield.
-contain 3 javascript functions :
- * one called when the field is entered (OnFocus). Named FocusXXX
- * one called when the field is leaved (onBlur). Named BlurXXX
- * one called when the ... link is clicked (<a href="javascript:function">) named ClicXXX
-
-returns :
- * XXX
- * a variable containing the 3 scripts.
-the 3 scripts are inserted after the <input> in the html code
-
-=cut
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name = $field_number;
<script type=\"text/javascript\">
//<![CDATA[
-function Blur$function_name(index) {
-//need this?
-}
-
function Focus$function_name(subfield_managed) {
document.getElementById(\"$field_number\").value='$org';
return 0;
}
-function Clic$function_name(subfield_managed) {
-}
//]]>
</script>
";
return ($function_name,$res);
}
-
-=head2 plugin
-
-the true value_builded. The screen that is open in the popup window.
-
-=cut
-
-sub plugin {
- return "";
-}
-
-1;
#use warnings; FIXME - Bug 2505
use C4::Context;
-=head1 FUNCTIONS
-
-=head2 plugin_parameters
-
-other parameters added when the plugin is called by the dopop function
-
-=cut
-
-sub plugin_parameters {
- return "";
-}
-
-=head2 plugin_javascript
-
-Thee javascript function called when the user enters the subfield.
-contain 3 javascript functions :
- * one called when the field is entered (OnFocus). Named FocusXXX
- * one called when the field is leaved (onBlur). Named BlurXXX
- * one called when the ... link is clicked (<a href="javascript:function">) named ClicXXX
-
-returns :
- * XXX
- * a variable containing the 3 scripts.
-the 3 scripts are inserted after the <input> in the html code
-
-=cut
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name = $field_number;
return 0;
}
-function Focus$function_name(subfield_managed) {
- // Do Nothing
-}
-
-function Clic$function_name(subfield_managed) {
- // Do Nothing
-}
//]]>
</script>
";
return ($function_name,$res);
}
-
-=head2 plugin
-
-The true value_builded. The screen that is open in the popup window.
-
-=cut
-
-sub plugin {
- return "";
-}
-
-1;
use C4::Search;
use C4::Output;
-=head1
-
-plugin_parameters : other parameters added when the plugin is called by the dopop function
-
-=cut
-
-sub plugin_parameters {
-my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
-return "";
-}
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name= $field_number;
return 1;
}
-function Blur$function_name(subfield_managed) {
- return 1;
-}
-
function Clic$function_name(i) {
defaultvalue=document.getElementById(\"$field_number\").value;
newin=window.open(\"../cataloguing/plugin_launcher.pl?plugin_name=marc21_leader.pl&index=$field_number&result=\"+defaultvalue,\"tag_editor\",'width=1000,height=600,toolbar=false,scrollbars=yes');
);
output_html_with_http_headers $input, $cookie, $template->output;
}
-
-1;
use C4::Search;
use C4::Output;
-=head1
-
-plugin_parameters : other parameters added when the plugin is called by the dopop function
-
-=cut
-
-sub plugin_parameters {
-my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
-return "";
-}
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name= $field_number;
return 1;
}
-function Blur$function_name(subfield_managed) {
- return 1;
-}
-
function Clic$function_name(i) {
defaultvalue=document.getElementById(\"$field_number\").value;
newin=window.open(\"../cataloguing/plugin_launcher.pl?plugin_name=marc21_leader_authorities.pl&index=$field_number&result=\"+defaultvalue,\"tag_editor\",'width=1000,height=600,toolbar=false,scrollbars=yes');
);
output_html_with_http_headers $input, $cookie, $template->output;
}
-
-1;
use C4::Search;
use C4::Output;
-=head1
-
-plugin_parameters : other parameters added when the plugin is called by the dopop function
-
-=cut
-
-sub plugin_parameters {
-my ($dbh,$record,$tagslib,$i,$tabloop) = @_;
-return "";
-}
-
sub plugin_javascript {
my ($dbh,$record,$tagslib,$field_number,$tabloop) = @_;
my $function_name= $field_number;
<script type=\"text/javascript\">
//<
projects / koha-ffzg.git / commitdiff