Revision 0b19df75
Von Rolf Fluehmann vor fast 11 Jahren hinzugefügt
bin/mozilla/arap.pl | ||
---|---|---|
61 | 61 |
|
62 | 62 |
$name = $name eq "customer" ? "customer" : "vendor"; |
63 | 63 |
|
64 |
my ($new_name, $new_id) = split /--/, $form->{$name};
|
|
64 |
my ($new_name,$new_id) = $form->{$name} =~ /^(.*?)--(\d+)$/;
|
|
65 | 65 |
my $i = 0; |
66 | 66 |
# if we use a selection |
67 | 67 |
if ($form->{"select$name"}) { |
Auch abrufbar als: Unified diff
#1838: beliebige Kunden- und Lieferantennamen für Kreditoren- und Debitorenbuchungen