Revision fe15fb2d
Von Bernd Bleßmann vor mehr als 1 Jahr hinzugefügt
| SL/TransNumber.pm | ||
|---|---|---|
|
);
|
||
|
|
||
|
my @SUPPORTED_TYPES = (
|
||
|
qw(invoice invoice_for_advance_payment final_invoice credit_note customer vendor sales_delivery_order purchase_delivery_order sales_order_intake sales_order purchase_order sales_quotation request_quotation purchase_quotation_intake part service assembly assortment letter),
|
||
|
qw(invoice invoice_for_advance_payment final_invoice credit_note customer vendor sales_delivery_order purchase_delivery_order sales_order_intake sales_order purchase_order purchase_order_confirmation sales_quotation request_quotation purchase_quotation_intake part service assembly assortment letter),
|
||
|
@{ SL::DB::DeliveryOrder::TypeData::valid_types() },
|
||
|
);
|
||
|
|
||
| ... | ... | |
|
$filters{where} = 'NOT COALESCE(quotation, FALSE)';
|
||
|
$filters{where} .= $type =~ /^sales/ ? ' AND (customer_id IS NOT NULL)' : ' AND (vendor_id IS NOT NULL)';
|
||
|
|
||
|
} elsif ($type =~ /^purchase_order_confirmation$/) {
|
||
|
$filters{trans_number} = "ordnumber";
|
||
|
$filters{numberfield} = "pocnumber";
|
||
|
$filters{table} = "oe";
|
||
|
$filters{where} = 'record_type = ?';
|
||
|
$filters{values} = $type;
|
||
|
|
||
|
} elsif ($type =~ /_quotation$/) {
|
||
|
$filters{trans_number} = "quonumber";
|
||
|
$filters{numberfield} = $type eq 'sales_quotation' ? "sqnumber" : "rfqnumber";
|
||
Auch abrufbar als: Unified diff
Lieferantenauftragsbestätigung: DB und Nummernkreis