Revision a46b8625
Von Bernd Bleßmann vor mehr als 2 Jahren hinzugefügt
SL/OE.pm | ||
---|---|---|
my $query = qq|SELECT id FROM employee WHERE login = ?|;
|
||
my ($e_id) = selectrow_query($form, $dbh, $query, $::myconfig{login});
|
||
|
||
my $sales_purchase_filter = 'AND (1 = 0';
|
||
$sales_purchase_filter .= $params{sales} ? qq| OR customer_id IS NOT NULL| : '';
|
||
$sales_purchase_filter .= $params{purchase} ? qq| OR vendor_id IS NOT NULL| : '';
|
||
$sales_purchase_filter .= ')';
|
||
|
||
$query =
|
||
qq|SELECT oe.id, oe.transdate, oe.reqdate, oe.quonumber, oe.transaction_description, oe.amount,
|
||
CASE WHEN (COALESCE(oe.customer_id, 0) = 0) THEN 'vendor' ELSE 'customer' END AS vc,
|
||
... | ... | |
AND ((oe.employee_id = ?) OR (oe.salesman_id = ?))
|
||
AND NOT (oe.reqdate ISNULL)
|
||
AND (oe.reqdate < current_date)
|
||
$sales_purchase_filter
|
||
ORDER BY transdate|;
|
||
|
||
my $quotations = selectall_hashref_query($form, $dbh, $query, $e_id, $e_id);
|
SL/TODO.pm | ||
---|---|---|
$cfg = { map { $_ => 1 } qw(show_after_login show_follow_ups show_follow_ups_login show_overdue_sales_quotations show_overdue_sales_quotations_login) };
|
||
}
|
||
|
||
if (! $main::auth->check_right($params{login}, 'sales_quotation_edit')) {
|
||
if (! $main::auth->check_right($params{login}, 'sales_quotation_edit | sales_quotation_view | request_quotation_edit | request_quotation_view')) {
|
||
map { delete $cfg->{$_} } qw(show_overdue_sales_quotations show_overdue_sales_quotations_login);
|
||
}
|
||
|
bin/mozilla/oe.pl | ||
---|---|---|
|
||
my $form = $main::form;
|
||
|
||
my $quotations = OE->transactions_for_todo_list();
|
||
my $is_for_sales = $::auth->assert($oe_view_access_map->{'sales_quotation'}, 'may fail');
|
||
my $is_for_purchase = $::auth->assert($oe_view_access_map->{'request_quotation'}, 'may fail');
|
||
my $quotations = OE->transactions_for_todo_list(sales => $is_for_sales, purchase => $is_for_purchase);
|
||
my $content;
|
||
|
||
if (@{ $quotations }) {
|
Auch abrufbar als: Unified diff
ToDo-Liste: Anfragen und Angebote anzeigen, wenn Anseh-Recht vorhanden …
… Und Rechte getrennt nach Ein- und Verkauf berücksichtigen.