Revision a5381b8b
Von Werner Hahn vor mehr als 7 Jahren hinzugefügt
| SL/DB/ShopOrder.pm | ||
|---|---|---|
|
my @items = map{
|
||
|
|
||
|
# TODO Flash and exit if part not found
|
||
|
my $part = SL::DB::Manager::Part->get_first( query => [ partnumber => $_->partnumber, ], );
|
||
|
my $part = SL::DB::Manager::Part->find_by(partnumber => $_->partnumber);
|
||
|
|
||
|
unless($part){
|
||
|
push @error_report, t8('Part with Partnumber: ') . $_->partnumber . t8(' not found');
|
||
|
push @error_report, t8('Part with partnumber: #1 not found', $_->partnumber);
|
||
|
}else{
|
||
|
my $shop_part = SL::DB::Manager::ShopPart->get_all( where => [ shop_id => $self->shop_id, part_id => $part->id] )->[0];
|
||
|
|
||
| ... | ... | |
|
if(!scalar(@error_report)){
|
||
|
|
||
|
my $shipto_id;
|
||
|
if ($self->{billing_firstname} ne $self->{delivery_firstname} || $self->{billing_lastname} ne $self->{delivery_lastname} || $self->{billing_city} ne $self->{delivery_city} || $self->{billing_street} ne $self->{delivery_street}) {
|
||
|
if(my $address = SL::DB::Manager::Shipto->find_by( shiptoname => $self->{delivery_firstname} . " " . $self->{delivery_lastname},
|
||
|
shiptostreet => $self->{delivery_street},
|
||
|
shiptocity => $self->{delivery_city},
|
||
|
if ($self->billing_firstname ne $self->delivery_firstname || $self->billing_lastname ne $self->delivery_lastname || $self->billing_city ne $self->delivery_city || $self->billing_street ne $self->delivery_street) {
|
||
|
if(my $address = SL::DB::Manager::Shipto->find_by( shiptoname => $self->delivery_firstname . " " . $self->delivery_lastname,
|
||
|
shiptostreet => $self->delivery_street,
|
||
|
shiptocity => $self->delivery_city,
|
||
|
)) {
|
||
|
$shipto_id = $address->{shipto_id};
|
||
|
} else {
|
||
|
my $deliveryaddress = SL::DB::Shipto->new;
|
||
|
$deliveryaddress->assign_attributes(
|
||
|
shiptoname => $self->{delivery_firstname} . " " . $self->{delivery_lastname},
|
||
|
shiptodepartment_1 => $self->{delivery_company},
|
||
|
shiptodepartment_2 => $self->{delivery_department},
|
||
|
shiptostreet => $self->{delivery_street},
|
||
|
shiptozipcode => $self->{delivery_zipcode},
|
||
|
shiptocity => $self->{delivery_city},
|
||
|
shiptocountry => $self->{delivery_country},
|
||
|
shiptoname => $self->delivery_firstname . " " . $self->delivery_lastname,
|
||
|
shiptodepartment_1 => $self->delivery_company,
|
||
|
shiptodepartment_2 => $self->delivery_department,
|
||
|
shiptostreet => $self->delivery_street,
|
||
|
shiptozipcode => $self->delivery_zipcode,
|
||
|
shiptocity => $self->delivery_city,
|
||
|
shiptocountry => $self->delivery_country,
|
||
|
trans_id => $customer->id,
|
||
|
module => "CT",
|
||
|
);
|
||
| locale/de/all | ||
|---|---|---|
|
' Date missing!' => ' Datum fehlt!',
|
||
|
' bytes, max=' => ' Bytes, Maximum=',
|
||
|
' missing!' => ' fehlt!',
|
||
|
' not found' => ' nicht gefunden',
|
||
|
'#1 (custom variable)' => '#1 (benutzerdefinierte Variable)',
|
||
|
'#1 CB transactions and #1 OB transactions generated.' => '#1 Schluss- und #1 Eröffnungsbuchungen wurden erstellt.',
|
||
|
'#1 MD' => '#1 PT',
|
||
| ... | ... | |
|
'Part Unit' => 'Einheit',
|
||
|
'Part classifications' => 'Artikel-Klassifizierungen',
|
||
|
'Part picker' => 'Artikelauswahl',
|
||
|
'Part with Partnumber: ' => 'Artikel mit Artikelnummer',
|
||
|
'Part with partnumber: #1 not found' => 'Artikel mit Artikelnummer #1 wurde nicht gefunden',
|
||
|
'PartClassAbbreviation' => 'Abkürzung der Artikel-Klassifizierung',
|
||
|
'Part_br_Description' => 'Beschreibung',
|
||
|
'Partdescriptipion' => 'Beschreibung',
|
||
| ... | ... | |
|
'Shoporder deleted -- ' => 'ungültig',
|
||
|
'Shoporder not found' => 'Shopbestellung nicht gefunden',
|
||
|
'Shoporderlock' => 'Shopauftragssperre',
|
||
|
'Shoporders' => 'Shopbestellungen',
|
||
|
'Shops' => 'Webshops',
|
||
|
'Short' => 'Knapp',
|
||
|
'Should ap transactions be and when should they be changeable or deleteable after posting?' => 'Sollen Kreditorenbuchungen nach der Buchung zu ändern oder zu löschen sein?',
|
||
Auch abrufbar als: Unified diff
Shopmodul: Perlsyntax und locales