+ $spec eq 'sellprice' ? $self->make_sellprice
+ : $spec eq 'lastcost' ? $self->make_lastcost
+ : $spec eq 'listprice' ? $self->make_listprice
+ : do { die "unknown spec '$spec'" };
+}
+
+sub discount_from_source { }
+
+sub best_price {
+ $_[0]->record->is_sales
+ ? $_[0]->make_sellprice
+ : $_[0]->make_lastcost
+}
+
+sub best_discount { }
+
+sub unit_mul {
+ $_[0]->record_item ? $_[0]->record_item->unit_multiplier : 1