X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=bin%2Fmozilla%2Fic.pl;h=3d9d6ef2de9580fff5f10a60f8455d53362b192e;hb=2efc8cbcc63c56094e0692067b7cb678c1583987;hp=f6134db520733d7a55e6ddb6a2d1e80715037234;hpb=487d4f1f6ccd3e22c05469f679bf5d0685914611;p=kivitendo-erp.git
diff --git a/bin/mozilla/ic.pl b/bin/mozilla/ic.pl
index f6134db52..3d9d6ef2d 100644
--- a/bin/mozilla/ic.pl
+++ b/bin/mozilla/ic.pl
@@ -33,12 +33,23 @@
#$locale->text('ea');
use SL::IC;
+
#use SL::PE;
-require "$form->{path}/io.pl";
+use strict;
+#use warnings;
+
+require "bin/mozilla/io.pl";
+require "bin/mozilla/common.pl";
1;
+# global imports
+my $form = $main::form;
+my $locale = $main::locale;
+my %myconfig = %main::myconfig;
+my $lxdebug = $main::lxdebug;
+
# end of main
sub add {
@@ -47,11 +58,11 @@ sub add {
$form->{title} = $locale->text('Add ' . ucfirst $form->{item});
$form->{callback} =
- "$form->{script}?action=add&item=$form->{item}&path=$form->{path}&login=$form->{login}&password=$form->{password}"
+ "$form->{script}?action=add&item=$form->{item}&login=$form->{login}&password=$form->{password}"
unless $form->{callback};
- $form->{unit} =
- ($form->{item} eq 'service') ? $locale->text('hr') : $locale->text('ea');
+ $form->{"unit_changeable"} = 1;
+
IC->get_pricegroups(\%myconfig, \%$form);
&link_part;
&display_form;
@@ -62,6 +73,8 @@ sub add {
sub search {
$lxdebug->enter_sub();
+ my ($button1, $button2, $onhand, $makemodel, $serialnumber, $l_serialnumber, $toplevel, $bought);
+
$form->{title} = (ucfirst $form->{searchitems}) . "s";
$form->{title} = $locale->text($form->{title});
@@ -78,8 +91,8 @@ sub search {
# $locale->text('Services')
# use JavaScript Calendar or not
- $form->{jsscript} = $jscalendar;
- $jsscript = "";
+ $form->{jsscript} = 1;
+ my $jsscript = "";
if ($form->{jsscript}) {
# with JavaScript Calendar
@@ -184,7 +197,7 @@ sub search {
|
| . $locale->text('From') . qq| |
$button1
- | . $locale->text('To') . qq| |
+ | . $locale->text('To (time)') . qq| |
$button2
@@ -234,7 +247,7 @@ sub search {
| . $locale->text('From') . qq| |
$button1
- | . $locale->text('To') . qq| |
+ | . $locale->text('To (time)') . qq| |
$button2
@@ -268,6 +281,8 @@ sub search {
| . $locale->text('Part Number') . qq| |
|
+ | . $locale->text('EAN') . qq| |
+ |
|
@@ -325,7 +340,7 @@ sub search {
. $locale->text('List Price') . qq|
| |
. $locale->text('Sell Price') . qq| |
- |
+ | |
. $locale->text('Last Cost') . qq| |
|
. $locale->text('Line Total') . qq| |
@@ -355,6 +370,8 @@ sub search {
. $locale->text('Subtotal') . qq|
|
. $locale->text('soldtotal') . qq| |
+ |
+ . $locale->text('deliverydate') . qq| |
@@ -369,12 +386,12 @@ $jsscript
-{path}>
{login}>
{password}>
+
@@ -391,9 +408,240 @@ $jsscript
$lxdebug->leave_sub();
} #end search()
+sub search_update_prices {
+ $lxdebug->enter_sub();
+
+ my ($onhand, $makemodel, $serialnumber, $l_serialnumber, $toplevel, $bought);
+
+ $form->{title} = $locale->text('Update prices');
+ IC->get_pricegroups(\%myconfig, \%$form);
+
+ # use JavaScript Calendar or not
+# $form->{jsscript} = 1;
+# $jsscript = "";
+# if ($form->{jsscript}) {
+#
+# # with JavaScript Calendar
+# $button1 = qq|
+# |
+# text('button') . qq|> |
+# |;
+# $button2 = qq|
+# |
+# text('button') . qq|> |
+# |;
+#
+# #write Trigger
+# $jsscript =
+# Form->write_trigger(\%myconfig, "2", "transdatefrom", "BL", "trigger1",
+# "transdateto", "BL", "trigger2");
+# } else {
+#
+# # without JavaScript Calendar
+# $button1 = qq|
+# | |;
+# $button2 = qq|
+# | |;
+# }
+
+ $onhand = qq|
+ |
+ . $locale->text('On Hand') . qq|
+ |
+ . $locale->text('Short') . qq|
+|;
+
+ $makemodel = qq|
+
+ | . $locale->text('Make') . qq| |
+ |
+ | . $locale->text('Model') . qq| |
+ |
+
+|;
+
+ $serialnumber = qq|
+ | . $locale->text('Serial Number') . qq| |
+ |
+|;
+
+ $l_serialnumber = qq|
+ |
+ . $locale->text('Serial Number') . qq| |
+|;
+
+
+
+ $form->header;
+
+ print qq|
+
+
+