projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Hilfsfunktionen fuer die Ausgabe von HTML-gequoteten Strings.
[kivitendo-erp.git]
/
bin
/
mozilla
/
is.pl
diff --git
a/bin/mozilla/is.pl
b/bin/mozilla/is.pl
index
933db34
..
765635f
100644
(file)
--- a/
bin/mozilla/is.pl
+++ b/
bin/mozilla/is.pl
@@
-162,7
+162,7
@@
sub invoice_links {
}
# currencies
}
# currencies
- @curr = split
/:/, $form->{currencies}
;
+ @curr = split
(/:/, $form->{currencies})
;
chomp $curr[0];
$form->{defaultcurrency} = $curr[0];
chomp $curr[0];
$form->{defaultcurrency} = $curr[0];
@@
-355,12
+355,12
@@
sub form_header {
if (@{ $form->{SHIPTO} }) {
$form->{selectshipto} = "<option value=0></option>";
foreach $item (@{ $form->{SHIPTO} }) {
if (@{ $form->{SHIPTO} }) {
$form->{selectshipto} = "<option value=0></option>";
foreach $item (@{ $form->{SHIPTO} }) {
- if ($item->{id} == $form->{shipto_id}) {
+ if ($item->{
shipto_
id} == $form->{shipto_id}) {
$form->{selectshipto} .=
$form->{selectshipto} .=
- "<option value=$item->{
id} selected>$item->{shiptoname
}</option>";
+ "<option value=$item->{
shipto_id} selected>$item->{shiptoname} $item->{shiptodepartment_1
}</option>";
} else {
$form->{selectshipto} .=
} else {
$form->{selectshipto} .=
- "<option value=$item->{
id}>$item->{shiptoname
}</option>";
+ "<option value=$item->{
shipto_id}>$item->{shiptoname} $item->{shiptodepartment
}</option>";
}
}
}
}
@@
-373,7
+373,7
@@
sub form_header {
$shipto = qq|
<th align=right>| . $locale->text('Shipping Address') . qq|</th>
$shipto = qq|
<th align=right>| . $locale->text('Shipping Address') . qq|</th>
- <td><select name=shipto_id>$form->{selectshipto}</select></td>
+ <td><select name=shipto_id
style="width:200px;"
>$form->{selectshipto}</select></td>
<input type=hidden name=selectshipto value="$form->{selectshipto}">|;
<input type=hidden name=selectshipto value="$form->{selectshipto}">|;
@@
-659,7
+659,7
@@
sub form_header {
$dunning
<tr>
<th align=right nowrap>| . $locale->text('Record in') . qq|</th>
$dunning
<tr>
<th align=right nowrap>| . $locale->text('Record in') . qq|</th>
- <td colspan=3><select name=AR>$form->{selectAR}</select></td>
+ <td colspan=3><select name=AR
style="width:280px;"
>$form->{selectAR}</select></td>
<input type=hidden name=selectAR value="$form->{selectAR}">
</tr>
$taxzone
<input type=hidden name=selectAR value="$form->{selectAR}">
</tr>
$taxzone
@@
-1216,7
+1216,7
@@
sub update {
} else {
} else {
- $sellprice = $form->
format
_amount(\%myconfig, $form->{"sellprice_$i"});
+ $sellprice = $form->
parse
_amount(\%myconfig, $form->{"sellprice_$i"});
map { $form->{item_list}[$i]{$_} =~ s/\"/"/g }
qw(partnumber description unit);
map { $form->{item_list}[$i]{$_} =~ s/\"/"/g }
qw(partnumber description unit);