X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=inline;f=bin%2Fmozilla%2Fic.pl;h=bccac308a16fbb2b3cef1ed5a872d78b4a30659f;hb=0925bc9f366038b578167a1837098ebe837012c1;hp=df6e2cab6f322866864936241b130469540b647c;hpb=792d1cf7bf650a84b7a82956cdfeda5ae0fbaf86;p=kivitendo-erp.git
diff --git a/bin/mozilla/ic.pl b/bin/mozilla/ic.pl
index df6e2cab6..bccac308a 100644
--- a/bin/mozilla/ic.pl
+++ b/bin/mozilla/ic.pl
@@ -33,9 +33,17 @@
#$locale->text('ea');
use SL::IC;
+
#use SL::PE;
-require "$form->{path}/io.pl";
+# use strict;
+#use warnings;
+
+# global imports
+our ($form, $locale, %myconfig, $lxdebug);
+
+require "bin/mozilla/io.pl";
+require "bin/mozilla/common.pl";
1;
@@ -47,11 +55,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 +70,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 +88,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 +194,7 @@ sub search {
|
| . $locale->text('From') . qq| |
$button1
- | . $locale->text('To') . qq| |
+ | . $locale->text('To (time)') . qq| |
$button2
@@ -234,7 +244,7 @@ sub search {
| . $locale->text('From') . qq| |
$button1
- | . $locale->text('To') . qq| |
+ | . $locale->text('To (time)') . qq| |
$button2
@@ -268,6 +278,8 @@ sub search {
| . $locale->text('Part Number') . qq| |
|
+ | . $locale->text('EAN') . qq| |
+ |
|
@@ -325,7 +337,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 +367,8 @@ sub search {
. $locale->text('Subtotal') . qq|
|
. $locale->text('soldtotal') . qq| |
+ |
+ . $locale->text('deliverydate') . qq| |
@@ -369,12 +383,12 @@ $jsscript
-{path}>
{login}>
{password}>
+
@@ -391,9 +405,238 @@ $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|
+
+
+