X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=bin%2Fmozilla%2Fic.pl;h=4b563e6b0a76210e6a36a94dc1113157b605ee37;hb=723b79bdf889207b36f5ab0edcfd4a6d81c6f8b6;hp=3a73d421d07e1c5d9de4cd80ee35a63e581372b6;hpb=1784ebf2ba2c81f9efa3882e33575a83d24d8165;p=kivitendo-erp.git
diff --git a/bin/mozilla/ic.pl b/bin/mozilla/ic.pl
index 3a73d421d..4b563e6b0 100644
--- a/bin/mozilla/ic.pl
+++ b/bin/mozilla/ic.pl
@@ -46,6 +46,7 @@ use SL::ReportGenerator;
our ($form, $locale, %myconfig, $lxdebug);
require "bin/mozilla/io.pl";
+require "bin/mozilla/invoice_io.pl";
require "bin/mozilla/common.pl";
require "bin/mozilla/reportgenerator.pl";
@@ -109,44 +110,33 @@ sub search {
|;
#write Trigger
- $jsscript =
- Form->write_trigger(\%myconfig, "2", "transdatefrom", "BL", "trigger1",
- "transdateto", "BL", "trigger2");
+ $jsscript = Form->write_trigger(\%myconfig, "2", "transdatefrom", "BL", "trigger1", "transdateto", "BL", "trigger2");
} else {
# without JavaScript Calendar
- $button1 = qq|
-
| |;
- $button2 = qq|
- | |;
+ $button1 = qq| | |;
+ $button2 = qq| | |;
}
unless ($form->{searchitems} eq 'service') {
- $onhand = qq|
- |
- . $locale->text('On Hand') . qq|
- |
- . $locale->text('Short') . qq|
+ $onhand = qq| | . $locale->text('On Hand') . qq|
+ | . $locale->text('Short') . qq|
|;
$makemodel = qq|
- | . $locale->text('Make') . qq| |
- |
- | . $locale->text('Model') . qq| |
- |
+ | . $locale->text('Make') . qq| | |
+ | . $locale->text('Model') . qq| | |
|;
$serialnumber = qq|
- | . $locale->text('Serial Number') . qq| |
- |
+ | . $locale->text('Serial Number') . qq| | |
|;
$l_serialnumber = qq|
- |
- . $locale->text('Serial Number') . qq| |
+ | . $locale->text('Serial Number') . qq| |
|;
}
@@ -3083,10 +3073,19 @@ sub parts_language_selection {
my $languages = IC->retrieve_languages(\%myconfig, $form);
+ if ($form->{language_values} ne "") {
+ foreach $item (split(/---\+\+\+---/, $form->{language_values})) {
+ my ($language_id, $translation, $longdescription) = split(/--\+\+--/, $item);
+
+ foreach my $language (@{ $languages }) {
+ next unless ($language->{id} == $language_id);
- my $callback = "$form->{script}?action=parts_language_selection&";
- map({ $callback .= "$_=" . $form->escape($form->{$_}) . "&" }
- (qw(login password name input_name), grep({ /^[fl]_/ } keys %$form)));
+ $language->{translation} = $translation;
+ $language->{longdescription} = $longdescription;
+ last;
+ }
+ }
+ }
my @header_sort = qw(name longdescription);
my %header_title = ( "name" => $locale->text("Name"),
@@ -3102,9 +3101,9 @@ sub parts_language_selection {
$form->{"title"} = $locale->text("Language Values");
$form->header();
- print($form->parse_html_template("ic/parts_language_selection", { "HEADER" => \@header,
- "LANGUAGES" => $languages,
- "onload" => $onload }));
+ print $form->parse_html_template2("ic/parts_language_selection", { "HEADER" => \@header,
+ "LANGUAGES" => $languages,
+ "onload" => $onload });
$lxdebug->leave_sub();
}