| 839 |
839 |
|
| 840 |
840 |
my @columns = (
|
| 841 |
841 |
"transdate", "reqdate",
|
| 842 |
|
"id", $ordnumber,
|
|
842 |
"id", $ordnumber, "edit_exp",
|
| 843 |
843 |
"cusordnumber", "customernumber",
|
| 844 |
844 |
"name", "netamount",
|
| 845 |
845 |
"tax", "amount",
|
| ... | ... | |
| 866 |
866 |
$form->{l_open} = $form->{l_closed} = "Y" if ($form->{open} && $form->{closed});
|
| 867 |
867 |
$form->{l_delivered} = "Y" if ($form->{delivered} && $form->{notdelivered});
|
| 868 |
868 |
$form->{l_periodic_invoices} = "Y" if ($form->{periodic_invoices_active} && $form->{periodic_invoices_inactive});
|
| 869 |
|
|
|
869 |
$form->{l_edit_exp} = "Y" if (any { $form->{type} eq $_ } qw(sales_order purchase_order));
|
| 870 |
870 |
map { $form->{"l_${_}"} = 'Y' } qw(order_probability expected_billing_date expected_netamount) if $form->{l_order_probability_expected_billing_date};
|
| 871 |
871 |
|
| 872 |
872 |
my $attachment_basename;
|
| ... | ... | |
| 947 |
947 |
'expected_billing_date' => { 'text' => $locale->text('Exp. bill. date'), },
|
| 948 |
948 |
'expected_netamount' => { 'text' => $locale->text('Exp. netamount'), },
|
| 949 |
949 |
'payment_terms' => { 'text' => $locale->text('Payment Terms'), },
|
|
950 |
'edit_exp' => { 'text' => $locale->text('Edit (experimental)'), },
|
| 950 |
951 |
%column_defs_cvars,
|
| 951 |
952 |
);
|
| 952 |
953 |
|
| ... | ... | |
| 1072 |
1073 |
|
| 1073 |
1074 |
foreach my $column (@columns) {
|
| 1074 |
1075 |
next if ($column eq 'ids');
|
|
1076 |
next if ($column eq 'edit_exp');
|
| 1075 |
1077 |
$row->{$column} = {
|
| 1076 |
1078 |
'data' => $oe->{$column},
|
| 1077 |
1079 |
'align' => $column_alignment{$column},
|
| ... | ... | |
| 1087 |
1089 |
|
| 1088 |
1090 |
$row->{$ordnumber}->{link} = $edit_url . "&id=" . E($oe->{id}) . "&callback=${callback}";
|
| 1089 |
1091 |
|
|
1092 |
$row->{edit_exp}->{data} = $oe->{ordnumber};
|
|
1093 |
$row->{edit_exp}->{link} = build_std_url('script=controller.pl', 'action=Order/edit', "type=$form->{type}", 'id=' . E($oe->{id}));
|
|
1094 |
|
| 1090 |
1095 |
my $row_set = [ $row ];
|
| 1091 |
1096 |
|
| 1092 |
1097 |
if (($form->{l_subtotal} eq 'Y')
|
Auftrags-Controller: Link zum neuen Controller aus Auftragsliste (zum Testen).