Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 21bf0785

Von Tamino Steinert vor fast 2 Jahren hinzugefügt

  • ID 21bf078567db48209b7367c0744bfccc0c08ce36
  • Vorgänger a25dfaeb
  • Nachfolger f6164b68

Refs #490: Lieferschein: entferne alle Verweise auf 'is_sales'

Unterschiede anzeigen:

SL/DB/DeliveryOrder.pm
351 351

  
352 352
  } else {
353 353
    my %args = (
354
      is_sales    => 1,
355
      order_type  => 'sales_delivery_order',
354
      order_type  => SALES_DELIVERY_ORDER_TYPE,
356 355
      delivered   => 0,
357 356
      customer_id => $sources->[0]->customer_id,
358 357
      taxzone_id  => $sources->[0]->customer->taxzone_id,
SL/Presenter/DeliveryOrder.pm
114 114
=head1 SYNOPSIS
115 115

  
116 116
  # Sales delivery orders:
117
  my $object = SL::DB::Manager::DeliveryOrder->get_first(where => [ is_sales => 1 ]);
117
  my $object = SL::DB::Manager::DeliveryOrder->get_first(where => [ order_type  => SALES_DELIVERY_ORDER_TYPE ]);
118 118
  my $html   = SL::Presenter::DeliveryOrder::sales_delivery_order($object, display => 'inline');
119 119

  
120 120
  # Purchase delivery orders:
121
  my $object = SL::DB::Manager::DeliveryOrder->get_first(where => [ or => [ is_sales => undef, is_sales => 0 ]]);
121
  my $object = SL::DB::Manager::DeliveryOrder->get_first(where => [ order_type  => PURCHASE_DELIVERY_ORDER_TYPE ]);
122 122
  my $html   = SL::Presenter::DeliveryOrder::purchase_delivery_order($object, display => 'inline');
123 123

  
124 124
=head1 FUNCTIONS
t/workflow/delivery_order_reclamation.t
161 161
  payment_terms           => $payment_term,
162 162
  delivery_term           => $delivery_term,
163 163
  taxincluded             => 0,
164
  is_sales                => 1,
165 164
  orderitems => [ SL::Dev::Record::create_delivery_order_item(part => $parts[0], qty =>  3, sellprice => 70),
166 165
                  SL::Dev::Record::create_delivery_order_item(part => $parts[1], qty => 10, sellprice => 50),
167 166
  ]
......
175 174
  payment_terms           => $payment_term,
176 175
  delivery_term           => $delivery_term,
177 176
  taxincluded             => 0,
178
  is_sales                => 0,
179 177
  orderitems => [ SL::Dev::Record::create_delivery_order_item(part => $parts[0], qty =>  3, sellprice => 70),
180 178
                  SL::Dev::Record::create_delivery_order_item(part => $parts[1], qty => 10, sellprice => 50),
181 179
  ]
......
241 239
# clean different values
242 240
foreach (qw(
243 241
  customer_id vendor_id
244
  id is_sales order_type
242
  id order_type
245 243
  donumber salesman_id
246 244
  transaction_description
247 245
  itime mtime
......
291 289
  "sales_delivery_order to sales_reclamation",
292 290
  qw(
293 291
    id employee_id itime mtime reqdate
294
    is_sales order_type ordnumber oreqnumber
292
    order_type ordnumber oreqnumber
295 293
    amount exchangerate netamount
296 294
    cp_id contact_id
297 295
    cusordnumber cv_record_number
......
311 309
  "sales_reclamation to sales_delivery_order",
312 310
  qw(
313 311
    id employee_id itime mtime delivered reqdate
314
    is_sales order_type ordnumber oreqnumber
312
    order_type ordnumber oreqnumber
315 313
    amount exchangerate netamount
316 314
    cp_id contact_id
317 315
    cusordnumber cv_record_number
......
333 331
  "purchase_delivery_order to purchase_reclamation",
334 332
  qw(
335 333
    id employee_id itime mtime reqdate
336
    is_sales order_type ordnumber oreqnumber
334
    order_type ordnumber oreqnumber
337 335
    amount exchangerate netamount
338 336
    cp_id contact_id
339 337
    cusordnumber cv_record_number
......
353 351
  "purchase_reclamation to purchase_delivery_order",
354 352
  qw(
355 353
    id employee_id itime mtime delivered reqdate
356
    is_sales order_type ordnumber oreqnumber
354
    order_type ordnumber oreqnumber
357 355
    amount exchangerate netamount
358 356
    cp_id contact_id
359 357
    cusordnumber cv_record_number

Auch abrufbar als: Unified diff