Revision d6838f77
Von Moritz Bunkus vor mehr als 8 Jahren hinzugefügt
| bin/mozilla/ar.pl | ||
|---|---|---|
| 931 | 931 |
my $report = SL::ReportGenerator->new(\%myconfig, $form); |
| 932 | 932 |
|
| 933 | 933 |
@columns = |
| 934 |
qw(transdate id type invnumber ordnumber cusordnumber name netamount tax amount paid |
|
| 934 |
qw(ids transdate id type invnumber ordnumber cusordnumber name netamount tax amount paid
|
|
| 935 | 935 |
datepaid due duedate transaction_description notes salesman employee shippingpoint shipvia |
| 936 | 936 |
marge_total marge_percent globalprojectnumber customernumber country ustid taxzone payment_terms charts customertype direct_debit dunning_description); |
| 937 | 937 |
|
| ... | ... | |
| 949 | 949 |
$href = build_std_url('action=ar_transactions', grep { $form->{$_} } @hidden_variables);
|
| 950 | 950 |
|
| 951 | 951 |
my %column_defs = ( |
| 952 |
'ids' => { raw_data => $::request->presenter->checkbox_tag("", id => "check_all", checkall => "[data-checkall=1]"), align => 'center' },
|
|
| 952 | 953 |
'transdate' => { 'text' => $locale->text('Date'), },
|
| 953 | 954 |
'id' => { 'text' => $locale->text('ID'), },
|
| 954 | 955 |
'type' => { 'text' => $locale->text('Type'), },
|
| ... | ... | |
| 994 | 995 |
$form->{"l_type"} = "Y";
|
| 995 | 996 |
map { $column_defs{$_}->{visible} = $form->{"l_${_}"} ? 1 : 0 } @columns;
|
| 996 | 997 |
|
| 998 |
$column_defs{ids}->{visible} = 'HTML';
|
|
| 999 |
|
|
| 997 | 1000 |
$report->set_columns(%column_defs); |
| 998 | 1001 |
$report->set_column_order(@columns); |
| 999 | 1002 |
|
| ... | ... | |
| 1057 | 1060 |
push @options, $locale->text('Closed');
|
| 1058 | 1061 |
} |
| 1059 | 1062 |
|
| 1063 |
$form->{ALL_PRINTERS} = SL::DB::Manager::Printer->get_all_sorted;
|
|
| 1064 |
|
|
| 1060 | 1065 |
$report->set_options('top_info_text' => join("\n", @options),
|
| 1066 |
'raw_top_info_text' => $form->parse_html_template('ar/ar_transactions_header'),
|
|
| 1061 | 1067 |
'raw_bottom_info_text' => $form->parse_html_template('ar/ar_transactions_bottom'),
|
| 1062 | 1068 |
'output_format' => 'HTML', |
| 1063 | 1069 |
'title' => $form->{title},
|
| ... | ... | |
| 1115 | 1121 |
$row->{invnumber}->{link} = build_std_url("script=" . ($ar->{invoice} ? 'is.pl' : 'ar.pl'), 'action=edit')
|
| 1116 | 1122 |
. "&id=" . E($ar->{id}) . "&callback=${callback}";
|
| 1117 | 1123 |
|
| 1124 |
$row->{ids} = {
|
|
| 1125 |
raw_data => $::request->presenter->checkbox_tag("id[]", value => $ar->{id}, "data-checkall" => 1),
|
|
| 1126 |
valign => 'center', |
|
| 1127 |
align => 'center', |
|
| 1128 |
}; |
|
| 1129 |
|
|
| 1118 | 1130 |
my $row_set = [ $row ]; |
| 1119 | 1131 |
|
| 1120 | 1132 |
if (($form->{l_subtotal} eq 'Y')
|
Auch abrufbar als: Unified diff
Rechnungen: Massenausdruck aus alter Rechnungssuche heraus