Revision ac3ca512
Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt
| locale/de/all | ||
|---|---|---|
| 284 | 284 |
'Batch Printing' => 'Druck', |
| 285 | 285 |
'Bcc' => 'Bcc', |
| 286 | 286 |
'Bcc E-mail' => 'BCC (E-Mail)', |
| 287 |
'Because the useability gets worse if one partnumber is used for several parts (for example if you are searching a position for an invoice), partnumbers should be unique.' => 'translation',
|
|
| 287 |
'Because the useability gets worse if one partnumber is used for several parts (for example if you are searching a position for an invoice), partnumbers should be unique.' => 'Da die Benutzerfreundlichkeit durch doppelte Artikelnummern erheblich verschlechtert wird (zum Beispiel, wenn man einen Artikel für eine Rechnung sucht), sollten Artikelnummern eindeutig vergeben sein.',
|
|
| 288 | 288 |
'Belegnummer' => 'Buchungsnummer', |
| 289 | 289 |
'Beratername' => 'Beratername', |
| 290 | 290 |
'Beraternummer' => 'Beraternummer', |
| sql/Pg-upgrade2/erzeugnisnummern.pl | ||
|---|---|---|
| 8 | 8 |
|
| 9 | 9 |
use parent qw(SL::DBUpgrade2::Base); |
| 10 | 10 |
|
| 11 |
use SL::DBUtils; |
|
| 12 |
|
|
| 11 | 13 |
sub run {
|
| 12 | 14 |
my ($self) = @_; |
| 13 | 15 |
|
| ... | ... | |
| 21 | 23 |
$self->dbh->commit(); |
| 22 | 24 |
} |
| 23 | 25 |
|
| 24 |
my $query = qq|SELECT id, partnumber, description, unit, notes, assembly, ean, inventory_accno_id |
|
| 26 |
my $query = qq|SELECT id, partnumber, description, unit, notes, assembly, ean, inventory_accno_id, obsolete
|
|
| 25 | 27 |
FROM parts pa |
| 26 | 28 |
WHERE (SELECT COUNT(*) |
| 27 | 29 |
FROM parts p |
| ... | ... | |
| 29 | 31 |
> 1 |
| 30 | 32 |
ORDER BY partnumber;|; |
| 31 | 33 |
|
| 32 |
my $sth = $self->dbh->prepare($query); |
|
| 33 |
$sth->execute || $::form->dberror($query); |
|
| 34 |
|
|
| 35 |
$::form->{PARTS} = [];
|
|
| 36 |
while (my $ref = $sth->fetchrow_hashref("NAME_lc")) {
|
|
| 37 |
map {$ref->{$_} = $::locale->{iconv_utf8}->convert($ref->{$_})} keys %$ref;
|
|
| 38 |
push @{ $::form->{PARTS} }, $ref;
|
|
| 39 |
} |
|
| 34 |
$::form->{PARTS} = [ selectall_hashref_query($::form, $self->dbh, $query) ];
|
|
| 40 | 35 |
|
| 41 | 36 |
if ( scalar @{ $::form->{PARTS} } > 0 ) {
|
| 42 | 37 |
&print_error_message; |
| templates/webpages/dbupgrade/erzeugnisnummern.html | ||
|---|---|---|
| 1 | 1 |
[%- USE T8 %] |
| 2 |
[% USE HTML %]<div class="listtop">[% 'Double partnumbers' | $T8 %]</div> |
|
| 2 |
[% USE HTML %][%- USE LxERP -%]<div class="listtop">[% 'Double partnumbers' | $T8 %]</div>
|
|
| 3 | 3 |
|
| 4 | 4 |
<form name="Form" method="post" action="login.pl"> |
| 5 | 5 |
<input type="hidden" name="action" value="login"> |
| ... | ... | |
| 19 | 19 |
<th class="listheading">[% 'Notes' | $T8 %]</th> |
| 20 | 20 |
<th class="listheading">[% 'EAN' | $T8 %]</th> |
| 21 | 21 |
<th class="listheading">[% 'Service, assembly or part' | $T8 %]</th> |
| 22 |
<th class="listheading">[% 'Obsolete' | $T8 %]</th> |
|
| 22 | 23 |
</tr> |
| 23 | 24 |
|
| 24 | 25 |
[% SET row_odd = '1' %][% FOREACH row = PARTS %] |
| ... | ... | |
| 30 | 31 |
<td align="right">[% HTML.escape(row.notes) %]</td> |
| 31 | 32 |
<td align="right">[% HTML.escape(row.ean) %]</td> |
| 32 | 33 |
<td align="right">[% IF row.assembly %] [% 'assembly' | $T8 %] [% ELSE %] [% IF row.inventory_accno_id %] [% 'part' | $T8 %] [% ELSE %] [% 'service' | $T8 %] [% END %] [% END %]</td> |
| 34 |
<td>[% IF row.obsolete %][%- LxERP.t8("Obsolete") %][%- ELSE %][%- LxERP.t8("Not obsolete") %][%- END %]</td>
|
|
| 33 | 35 |
</tr> |
| 34 | 36 |
[% SET rowcount = loop.count %] |
| 35 | 37 |
[% END %] |
Auch abrufbar als: Unified diff
DB-Upgrade Eindeutige Artikelnummern: Fixes & Spalte "Gültig" anzeigen