projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bei Preisgruppen werden die Preisgruppen nun auch direkt beim Anlegen eines Artikel...
[kivitendo-erp.git]
/
SL
/
CT.pm
diff --git
a/SL/CT.pm
b/SL/CT.pm
index
c6f55da
..
1db023b
100644
(file)
--- a/
SL/CT.pm
+++ b/
SL/CT.pm
@@
-221,16
+221,21
@@
sub save_customer {
my ($self, $myconfig, $form) = @_;
my ($self, $myconfig, $form) = @_;
+ # set pricegroup to default
+ if ($form->{klass}) { }
+ else { $form->{klass} = 0; }
+
# connect to database
my $dbh = $form->dbconnect($myconfig);
##LINET
# connect to database
my $dbh = $form->dbconnect($myconfig);
##LINET
- map({ $form->{"cp_${_}"} = $form->{"selected_cp_${_}"}
- if ($form->{"selected_cp_${_}"});
+ map({
+ $form->{"cp_${_}"} = $form->{"selected_cp_${_}"}
+ if ($form->{"selected_cp_${_}"});
} qw(title greeting));
} qw(title greeting));
-
+#
# escape '
map { $form->{$_} =~ s/\'/\'\'/g }
# escape '
map { $form->{$_} =~ s/\'/\'\'/g }
- qw(customernumber name street zipcode city country homepage contact notes cp_title cp_greeting language);
+ qw(customernumber name street zipcode city country homepage contact notes cp_title cp_greeting language
pricegroup
);
##/LINET
# assign value discount, terms, creditlimit
$form->{discount} = $form->parse_amount($myconfig, $form->{discount});
##/LINET
# assign value discount, terms, creditlimit
$form->{discount} = $form->parse_amount($myconfig, $form->{discount});
@@
-314,7
+319,8
@@
sub save_customer {
username = '$form->{username}',
salesman_id = '$form->{salesman_id}',
user_password = '$form->{user_password}',
username = '$form->{username}',
salesman_id = '$form->{salesman_id}',
user_password = '$form->{user_password}',
- c_vendor_id = '$form->{c_vendor_id}'
+ c_vendor_id = '$form->{c_vendor_id}',
+ klass = '$form->{klass}'
WHERE id = $form->{id}|;
$dbh->do($query) || $form->dberror($query);
WHERE id = $form->{id}|;
$dbh->do($query) || $form->dberror($query);
@@
-362,8
+368,9
@@
sub save_vendor {
# connect to database
my $dbh = $form->dbconnect($myconfig);
##LINET
# connect to database
my $dbh = $form->dbconnect($myconfig);
##LINET
- map({ $form->{"cp_${_}"} = $form->{"selected_cp_${_}"}
- if ($form->{"selected_cp_${_}"});
+ map({
+ $form->{"cp_${_}"} = $form->{"selected_cp_${_}"}
+ if ($form->{"selected_cp_${_}"});
} qw(title greeting));
# escape '
} qw(title greeting));
# escape '