push @options, $locale->text('Orphaned');
}
- push @options, $locale->text('Name') . " : $form->{name}" if $form->{name};
- push @options, $locale->text('Contact') . " : $form->{contact}" if $form->{contact};
- push @options, $locale->text('Number') . qq| : $form->{"$form->{db}number"}| if $form->{"$form->{db}number"};
- push @options, $locale->text('E-mail') . " : $form->{email}" if $form->{email};
- push @options, $locale->text('Contact person (surname)')
- . " : $form->{cp_name}" if $form->{cp_name};
- push @options, $locale->text('Billing/shipping address (city)')
- . " : $form->{addr_city}" if $form->{addr_city};
-
- push @options, $locale->text('Billing/shipping address (zipcode)')
- . " : $form->{zipcode}" if $form->{addr_zipcode};
- push @options, $locale->text('Billing/shipping address (street)')
- . " : $form->{street}" if $form->{addr_street};
+ push @options, $locale->text('Name') . " : $form->{name}" if $form->{name};
+ push @options, $locale->text('Contact') . " : $form->{contact}" if $form->{contact};
+ push @options, $locale->text('Number') . qq| : $form->{"$form->{db}number"}| if $form->{"$form->{db}number"};
+ push @options, $locale->text('E-mail') . " : $form->{email}" if $form->{email};
+ push @options, $locale->text('Contact person (surname)') . " : $form->{cp_name}" if $form->{cp_name};
+ push @options, $locale->text('Billing/shipping address (city)') . " : $form->{addr_city}" if $form->{addr_city};
+ push @options, $locale->text('Billing/shipping address (zipcode)') . " : $form->{zipcode}" if $form->{addr_zipcode};
+ push @options, $locale->text('Billing/shipping address (street)') . " : $form->{street}" if $form->{addr_street};
my @columns = (
- 'id', 'name', "$form->{db}number", 'contact', 'phone',
- 'fax', 'email', 'taxnumber', 'street', 'zipcode' , 'city', 'business', 'invnumber',
- 'ordnumber', 'quonumber'
+ 'id', 'name', "$form->{db}number", 'contact', 'phone',
+ 'fax', 'email', 'taxnumber', 'street', 'zipcode' , 'city',
+ 'business', 'invnumber', 'ordnumber', 'quonumber'
);
my @includeable_custom_variables = grep { $_->{includeable} } @{ $cvar_configs };
my %column_defs = (
'id' => { 'text' => $locale->text('ID'), },
- "$form->{db}number" => { 'text' => $form->{IS_CUSTOMER} ? $locale->text('Customer Number') : $locale->text('Vendor Number'), },
+ "$form->{db}number" => { 'text' => $locale->text('Number'), },
'name' => { 'text' => $locale->text('Name'), },
'contact' => { 'text' => $locale->text('Contact'), },
'phone' => { 'text' => $locale->text('Phone'), },
'invnumber' => { 'text' => $locale->text('Invoice'), },
'ordnumber' => { 'text' => $form->{IS_CUSTOMER} ? $locale->text('Sales Order') : $locale->text('Purchase Order'), },
'quonumber' => { 'text' => $form->{IS_CUSTOMER} ? $locale->text('Quotation') : $locale->text('Request for Quotation'), },
- 'street' => { 'text' => $locale->text('Street'), },
- 'zipcode' => { 'text' => $locale->text('Zipcode'), },
- 'city' => { 'text' => $locale->text('City'), },
+ 'street' => { 'text' => $locale->text('Street'), },
+ 'zipcode' => { 'text' => $locale->text('Zipcode'), },
+ 'city' => { 'text' => $locale->text('City'), },
%column_defs_cvars,
);
# show history button
$form->{javascript} = qq|<script type=text/javascript src=js/show_history.js></script>|;
#/show hhistory button
-
+
CT->get_tuple(\%myconfig, \%$form);
CT->populate_drop_down_boxes(\%myconfig, \%$form);
unshift @{ $form->{SHIPTO} }, +{ shipto_id => '0', shiptoname => '' }, +{ shipto_id => '0', shiptoname => 'Alle' };
unshift @{ $form->{CONTACTS} }, +{ cp_id => '0', cp_name => $locale->text('New contact') };
- $form->{title} = $form->{title_save}
+ $form->{title} = $form->{title_save}
|| $locale->text("$form->{title} " . ucfirst $form->{db}) . ($form->{title} eq "Edit" ? " $form->{name}" : '');
CT->query_titles_and_greetings(\%myconfig, \%$form);
# $form->save_history($form->dbconnect(\%myconfig));
# }
# # /saving the history
-
+
$form->isblank("name", $locale->text("Name missing!"));
if ($form->{"db"} eq "customer") {
CT->save_customer(\%myconfig, \%$form);
$form->{addition} = "DELETED";
$form->save_history($form->dbconnect(\%myconfig));
}
- # /saving the history
+ # /saving the history
$form->redirect($locale->text($msg));
$msg = "Cannot delete $form->{db}";
$auth->assert('customer_vendor_edit');
CT->get_contact(\%myconfig, \%$form);
- print $form->ajax_response_header(), join '__pjx__', map $form->{"cp_$_"},
- qw(name greeting title givenname phone1 phone2 email abteilung fax mobile1 mobile2 satphone satfax project privatphone privatemail birthday used);
+ print $form->ajax_response_header(), join '__pjx__', map $form->{"cp_$_"},
+ qw(name title givenname phone1 phone2 email abteilung fax mobile1 mobile2 satphone satfax project privatphone privatemail birthday used gender);
$lxdebug->leave_sub();
}
$auth->assert('customer_vendor_edit');
CT->get_delivery(\%myconfig, \%$form );
+ $form->{IS_CUSTOMER} = $form->{db} eq 'customer';
print $form->ajax_response_header(), $form->parse_html_template('ct/get_delivery');