Revision 0acf0e35
Von Moritz Bunkus vor fast 18 Jahren hinzugefügt
SL/AM.pm | ||
---|---|---|
506 | 506 |
# connect to database |
507 | 507 |
my $dbh = $form->dbconnect($myconfig); |
508 | 508 |
|
509 |
my $query = qq|SELECT id, description, discount, customernumberinit, salesman
|
|
509 |
my $query = qq|SELECT id, description, discount, customernumberinit |
|
510 | 510 |
FROM business |
511 | 511 |
ORDER BY 2|; |
512 | 512 |
|
... | ... | |
533 | 533 |
my $dbh = $form->dbconnect($myconfig); |
534 | 534 |
|
535 | 535 |
my $query = |
536 |
qq|SELECT b.description, b.discount, b.customernumberinit, b.salesman
|
|
536 |
qq|SELECT b.description, b.discount, b.customernumberinit |
|
537 | 537 |
FROM business b |
538 | 538 |
WHERE b.id = ?|; |
539 | 539 |
my $sth = $dbh->prepare($query); |
... | ... | |
559 | 559 |
my $dbh = $form->dbconnect($myconfig); |
560 | 560 |
|
561 | 561 |
my @values = ($form->{description}, $form->{discount}, |
562 |
$form->{customernumberinit}, $form->{salesman} ? 't' : 'f');
|
|
562 |
$form->{customernumberinit}); |
|
563 | 563 |
# id is the old record |
564 | 564 |
if ($form->{id}) { |
565 | 565 |
$query = qq|UPDATE business SET |
566 | 566 |
description = ?, |
567 | 567 |
discount = ?, |
568 |
customernumberinit = ?, |
|
569 |
salesman = ? |
|
568 |
customernumberinit = ? |
|
570 | 569 |
WHERE id = ?|; |
571 | 570 |
push(@values, $form->{id}); |
572 | 571 |
} else { |
573 | 572 |
$query = qq|INSERT INTO business |
574 |
(description, discount, customernumberinit, salesman)
|
|
575 |
VALUES (?, ?, ?, ?)|;
|
|
573 |
(description, discount, customernumberinit) |
|
574 |
VALUES (?, ?, ?)|; |
|
576 | 575 |
} |
577 | 576 |
do_query($form, $dbh, $query, @values); |
578 | 577 |
|
bin/mozilla/am.pl | ||
---|---|---|
1115 | 1115 |
$discount = |
1116 | 1116 |
$form->format_amount(\%myconfig, $ref->{discount} * 100); |
1117 | 1117 |
$description = |
1118 |
($ref->{salesman}) |
|
1119 |
? "<b>$ref->{description}</b>" |
|
1120 |
: "$ref->{description}"; |
|
1118 |
$ref->{description}; |
|
1121 | 1119 |
$column_data{description} = |
1122 | 1120 |
qq|<td><a href=$form->{script}?action=edit_business&id=$ref->{id}&path=$form->{path}&login=$form->{login}&password=$form->{password}&callback=$callback>$description</td>|; |
1123 | 1121 |
$column_data{discount} = qq|<td align=right>$discount</td>|; |
... | ... | |
1167 | 1165 |
$lxdebug->enter_sub(); |
1168 | 1166 |
|
1169 | 1167 |
$form->{title} = $locale->text("$form->{title} Business"); |
1170 |
$form->{salesman} = "checked" if $form->{salesman}; |
|
1171 | 1168 |
|
1172 | 1169 |
# $locale->text('Add Business') |
1173 | 1170 |
# $locale->text('Edit Business') |
... | ... | |
1203 | 1200 |
<th align=right>| . $locale->text('Customernumberinit') . qq|</th> |
1204 | 1201 |
<td><input name=customernumberinit size=10 value=$form->{customernumberinit}></td> |
1205 | 1202 |
</tr> |
1206 |
<tr> |
|
1207 |
<td align=right>| . $locale->text('Salesman') . qq|</td> |
|
1208 |
<td><input name=salesman class=checkbox type=checkbox value=1 $form->{salesman}></td> |
|
1209 |
</tr> |
|
1210 | 1203 |
<td colspan=2><hr size=3 noshade></td> |
1211 | 1204 |
</tr> |
1212 | 1205 |
</table> |
locale/de/am | ||
---|---|---|
222 | 222 |
'SAVED' => 'Gespeichert', |
223 | 223 |
'SAVED FOR DUNNING' => 'Gespeichert', |
224 | 224 |
'SCREENED' => 'Angezeigt', |
225 |
'Salesman' => 'Verk?ufer/in', |
|
226 | 225 |
'Save' => 'Speichern', |
227 | 226 |
'Screen' => 'Bildschirm', |
228 | 227 |
'Select a Customer' => 'Endkunde ausw?hlen', |
locale/de/ct | ||
---|---|---|
25 | 25 |
'Credit Limit' => 'Kreditlimit', |
26 | 26 |
'Customer Number' => 'Kundennummer', |
27 | 27 |
'Customer deleted!' => 'Kunde gel?scht!', |
28 |
'Customer not on file or locked!' => 'Dieser Kunde existiert nicht oder ist gesperrt.', |
|
29 | 28 |
'Customer saved!' => 'Kunde gespeichert!', |
30 | 29 |
'Customers' => 'Kunden', |
31 | 30 |
'DELETED' => 'Gel?scht', |
... | ... | |
110 | 109 |
'Select a part' => 'Artikel auswählen', |
111 | 110 |
'Select a project' => 'Projekt auswählen', |
112 | 111 |
'Select an employee' => 'Angestellten auswählen', |
113 |
'Select from one of the names below' => 'W?hlen Sie einen der untenstehenden Namen', |
|
114 | 112 |
'Shipping Address' => 'Lieferadresse', |
115 | 113 |
'Steuersatz' => 'Steuersatz', |
116 | 114 |
'Street' => 'Stra?e', |
... | ... | |
129 | 127 |
'Variable' => 'Variable', |
130 | 128 |
'Vendor Number' => 'Lieferantennummer', |
131 | 129 |
'Vendor deleted!' => 'Lieferant gel?scht!', |
132 |
'Vendor not on file or locked!' => 'Dieser Lieferant existiert nicht oder ist gesperrt.', |
|
133 | 130 |
'Vendor saved!' => 'Lieferant gespeichert!', |
134 | 131 |
'Vendors' => 'Lieferanten', |
135 | 132 |
'Zipcode' => 'PLZ', |
... | ... | |
156 | 153 |
'add_transaction' => 'add_transaction', |
157 | 154 |
'build_std_url' => 'build_std_url', |
158 | 155 |
'calculate_qty' => 'calculate_qty', |
159 |
'check_salesman' => 'check_salesman', |
|
160 | 156 |
'continue' => 'continue', |
161 | 157 |
'delete' => 'delete', |
162 | 158 |
'delivery_customer_selection' => 'delivery_customer_selection', |
... | ... | |
174 | 170 |
'project_selection_internal' => 'project_selection_internal', |
175 | 171 |
'reformat_numbers' => 'reformat_numbers', |
176 | 172 |
'restore_form' => 'restore_form', |
177 |
'salesman_selected' => 'salesman_selected', |
|
178 | 173 |
'save' => 'save', |
179 | 174 |
'save_and_ap_transaction' => 'save_and_ap_transaction', |
180 | 175 |
'save_and_ar_transaction' => 'save_and_ar_transaction', |
... | ... | |
190 | 185 |
'select_employee_internal' => 'select_employee_internal', |
191 | 186 |
'select_part' => 'select_part', |
192 | 187 |
'select_part_internal' => 'select_part_internal', |
193 |
'select_salesman' => 'select_salesman', |
|
194 | 188 |
'set_longdescription' => 'set_longdescription', |
195 | 189 |
'show_history' => 'show_history', |
196 | 190 |
'update' => 'update', |
Auch abrufbar als: Unified diff
Bei Kunden-/Lieferantentypen das Feld "Vertreter" ausblenden.