projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
In Form.pm gibt es kein $form, nur $self.
[kivitendo-erp.git]
/
bin
/
mozilla
/
licenses.pl
diff --git
a/bin/mozilla/licenses.pl
b/bin/mozilla/licenses.pl
index
9339736
..
442ff60
100644
(file)
--- a/
bin/mozilla/licenses.pl
+++ b/
bin/mozilla/licenses.pl
@@
-44,6
+44,7
@@
sub quot {
sub form_header {
$lxdebug->enter_sub();
sub form_header {
$lxdebug->enter_sub();
+ $form->{jsscript} = 1;
$form->header();
print(
$form->header();
print(
@@
-87,8
+88,7
@@
sub print_part_selection {
<table width=100%>
<tr>
<th class=listtop colspan=5>|
<table width=100%>
<tr>
<th class=listtop colspan=5>|
- . $locale->text('Select from one of the items below')
- . qq|</th>
+ . $locale->text('Select from one of the items below') . qq|</th>
</tr>
<tr height="5"></tr>
<tr class=listheading>
</tr>
<tr height="5"></tr>
<tr class=listheading>
@@
-111,13
+111,9
@@
sub print_part_selection {
qq|<tr class=listrow$j>
<td><input name=ndx class=radio type=radio value=$i $checked></td>
<td><input name=\"new_partnumber_$i\" type=hidden value=\"|
qq|<tr class=listrow$j>
<td><input name=ndx class=radio type=radio value=$i $checked></td>
<td><input name=\"new_partnumber_$i\" type=hidden value=\"|
- . $p{"partnumber"} . qq|\">|
- . $p{"partnumber"}
- . qq|</td>
+ . $p{"partnumber"} . qq|\">| . $p{"partnumber"} . qq|</td>
<td><input name=\"new_description_$i\" type=hidden value=\"|
<td><input name=\"new_description_$i\" type=hidden value=\"|
- . $p{"description"} . qq|\">|
- . $p{"description"}
- . qq|</td>
+ . $p{"description"} . qq|\">| . $p{"description"} . qq|</td>
<input name=\"new_parts_id_$i\" type=hidden value=\"| . $p{"id"} . qq|\">
</tr>|);
<input name=\"new_parts_id_$i\" type=hidden value=\"| . $p{"id"} . qq|\">
</tr>|);
@@
-145,8
+141,7
@@
sub print_customer_selection {
<table width=100%>
<tr>
<th class=listtop colspan=5>|
<table width=100%>
<tr>
<th class=listtop colspan=5>|
- . $locale->text('Select from one of the names below')
- . qq|</th>
+ . $locale->text('Select from one of the names below') . qq|</th>
</tr>
<tr height="5"></tr>
<tr class=listheading>
</tr>
<tr height="5"></tr>
<tr class=listheading>
@@
-174,11
+169,9
@@
sub print_customer_selection {
qq|<tr class=listrow$j>
<td><input name=ndx class=radio type=radio value=$i $checked></td>
<td><input name=\"new_customer_id_$i\" type=hidden value=\"|
qq|<tr class=listrow$j>
<td><input name=ndx class=radio type=radio value=$i $checked></td>
<td><input name=\"new_customer_id_$i\" type=hidden value=\"|
- . $c{"id"}
- . qq|\">$c{"customernumber"}</td>
+ . $c{"id"} . qq|\">$c{"customernumber"}</td>
<td><input name=\"new_customer_name_$i\" type=hidden value=\"|
<td><input name=\"new_customer_name_$i\" type=hidden value=\"|
- . $c{"name"}
- . qq|\">$c{"name"}</td>
+ . $c{"name"} . qq|\">$c{"name"}</td>
<td>$c{"street"}</td>
<td>$c{"zipcode"}</td>
<td>$c{"city"}</td>
<td>$c{"street"}</td>
<td>$c{"zipcode"}</td>
<td>$c{"city"}</td>
@@
-211,14
+204,12
@@
sub print_license_form {
<tr>
<th align=right>| . $locale->text('Part Number') . qq|</th>
<td><input name=partnumber value=\"|
<tr>
<th align=right>| . $locale->text('Part Number') . qq|</th>
<td><input name=partnumber value=\"|
- . quot($form->{"partnumber"})
- . qq|\"></td>
+ . quot($form->{"partnumber"}) . qq|\"></td>
</tr>
<tr>
<th align=right>| . $locale->text('Description') . qq|</th>
<td><input name=description value=\"|
</tr>
<tr>
<th align=right>| . $locale->text('Description') . qq|</th>
<td><input name=description value=\"|
- . quot($form->{"description"})
- . qq|\"></td>
+ . quot($form->{"description"}) . qq|\"></td>
</tr>
<tr>
<th align=right>| . $locale->text('Company Name') . qq|</th>|);
</tr>
<tr>
<th align=right>| . $locale->text('Company Name') . qq|</th>|);
@@
-242,26
+233,23
@@
sub print_license_form {
<tr>
<th align=right>| . $locale->text('Comment') . qq|</th>
<td><input name=comment value=\"|
<tr>
<th align=right>| . $locale->text('Comment') . qq|</th>
<td><input name=comment value=\"|
- . quot($form->{"comment"})
- . qq|\"></td>
+ . quot($form->{"comment"}) . qq|\"></td>
</tr>
<tr>
<th align=right>| . $locale->text('Valid until') . qq|</th>
</tr>
<tr>
<th align=right>| . $locale->text('Valid until') . qq|</th>
- <td><input name=validuntil value=\"|
- . quot($form->{"validuntil"})
-
. qq|\
"></td>
+ <td><input
id=validuntil
name=validuntil value=\"|
+ . quot($form->{"validuntil"})
. qq|\">
+
<input type="button" name="validuntil" id="trigger_validuntil" value="?
"></td>
</tr>
<tr>
<th align=right>| . $locale->text('Quantity') . qq|</th>
<td><input name=quantity value=\"|
</tr>
<tr>
<th align=right>| . $locale->text('Quantity') . qq|</th>
<td><input name=quantity value=\"|
- . quot($form->{"quantity"})
- . qq|\"></td>
+ . quot($form->{"quantity"}) . qq|\"></td>
</tr>
<tr>
<th align=right>| . $locale->text('License key') . qq|</th>
<td><input name=licensenumber value=\"|
</tr>
<tr>
<th align=right>| . $locale->text('License key') . qq|</th>
<td><input name=licensenumber value=\"|
- . quot($form->{"licensenumber"})
- . qq|\"></td>
+ . quot($form->{"licensenumber"}) . qq|\"></td>
</tr>
<tr>
<th align=right>| . $locale->text('Own Product') . qq|</th>
</tr>
<tr>
<th align=right>| . $locale->text('Own Product') . qq|</th>
@@
-276,14
+264,16
@@
sub print_license_form {
print(
qq|
<input type=submit name=action value=\"|
print(
qq|
<input type=submit name=action value=\"|
- . $locale->text('Save')
- . qq|\">\n|);
+ . $locale->text('Save') . qq|\">\n|);
}
print(
qq|
</tr>
}
print(
qq|
</tr>
-</table>|);
+</table>| .
+ $form->write_trigger(\%myconfig, 1, "validuntil", "BL",
+ "trigger_validuntil"));
+
$lxdebug->leave_sub();
}
$lxdebug->leave_sub();
}
@@
-488,8
+478,7
@@
sub search {
. $locale->text('Expiring in x month(s)')
. qq| <input size=4 name=expiring_in value="1"><br>
<input type=checkbox name=show_expired value=1>|
. $locale->text('Expiring in x month(s)')
. qq| <input size=4 name=expiring_in value="1"><br>
<input type=checkbox name=show_expired value=1>|
- . $locale->text('Expired licenses')
- . qq|</td>
+ . $locale->text('Expired licenses') . qq|</td>
</tr>
</table>
</tr>
</tr>
</table>
</tr>
@@
-563,9
+552,7
@@
sub do_search {
. $locale->text('Description')
. qq|</a></th>
<th class=listtop><a class=listheading href=\"|
. $locale->text('Description')
. qq|</a></th>
<th class=listtop><a class=listheading href=\"|
- . $columns{"name"} . "\">"
- . $locale->text('Company Name')
- . qq|</a></th>
+ . $columns{"name"} . "\">" . $locale->text('Company Name') . qq|</a></th>
<th class=listtop><a class=listheading href=\"|
. $columns{"validuntil"} . "\">"
. $locale->text('Valid until')
<th class=listtop><a class=listheading href=\"|
. $columns{"validuntil"} . "\">"
. $locale->text('Valid until')