Revision 85b0c4ab
Von Moritz Bunkus vor mehr als 10 Jahren hinzugefügt
bin/mozilla/ar.pl | ||
---|---|---|
902 | 902 |
my $report = SL::ReportGenerator->new(\%myconfig, $form); |
903 | 903 |
|
904 | 904 |
@columns = |
905 |
qw(transdate id type invnumber ordnumber name netamount tax amount paid |
|
905 |
qw(transdate id type invnumber ordnumber cusordnumber name netamount tax amount paid
|
|
906 | 906 |
datepaid due duedate transaction_description notes salesman employee shippingpoint shipvia |
907 | 907 |
marge_total marge_percent globalprojectnumber customernumber country ustid taxzone payment_terms charts customertype); |
908 | 908 |
|
909 | 909 |
my @hidden_variables = map { "l_${_}" } @columns; |
910 |
push @hidden_variables, "l_subtotal", qw(open closed customer invnumber ordnumber transaction_description notes project_id transdatefrom transdateto employee_id salesman_id business_id); |
|
910 |
push @hidden_variables, "l_subtotal", qw(open closed customer invnumber ordnumber cusordnumber transaction_description notes project_id transdatefrom transdateto employee_id salesman_id business_id);
|
|
911 | 911 |
|
912 | 912 |
$href = build_std_url('action=ar_transactions', grep { $form->{$_} } @hidden_variables); |
913 | 913 |
|
... | ... | |
917 | 917 |
'type' => { 'text' => $locale->text('Type'), }, |
918 | 918 |
'invnumber' => { 'text' => $locale->text('Invoice'), }, |
919 | 919 |
'ordnumber' => { 'text' => $locale->text('Order'), }, |
920 |
'cusordnumber' => { 'text' => $locale->text('Customer Order Number'), }, |
|
920 | 921 |
'name' => { 'text' => $locale->text('Customer'), }, |
921 | 922 |
'netamount' => { 'text' => $locale->text('Amount'), }, |
922 | 923 |
'tax' => { 'text' => $locale->text('Tax'), }, |
... | ... | |
943 | 944 |
'customertype' => { 'text' => $locale->text('Customer type'), }, |
944 | 945 |
); |
945 | 946 |
|
946 |
foreach my $name (qw(id transdate duedate invnumber ordnumber name datepaid employee shippingpoint shipvia transaction_description)) { |
|
947 |
foreach my $name (qw(id transdate duedate invnumber ordnumber cusordnumber name datepaid employee shippingpoint shipvia transaction_description)) {
|
|
947 | 948 |
my $sortdir = $form->{sort} eq $name ? 1 - $form->{sortdir} : $form->{sortdir}; |
948 | 949 |
$column_defs{$name}->{link} = $href . "&sort=$name&sortdir=$sortdir"; |
949 | 950 |
} |
... | ... | |
977 | 978 |
if ($form->{ordnumber}) { |
978 | 979 |
push @options, $locale->text('Order Number') . " : $form->{ordnumber}"; |
979 | 980 |
} |
981 |
if ($form->{cusordnumber}) { |
|
982 |
push @options, $locale->text('Customer Order Number') . " : $form->{cusordnumber}"; |
|
983 |
} |
|
980 | 984 |
if ($form->{notes}) { |
981 | 985 |
push @options, $locale->text('Notes') . " : $form->{notes}"; |
982 | 986 |
} |
Auch abrufbar als: Unified diff
Berichte Verkaufsrechnungen: Bestellnummer des Kunden anzeigen/danach filtern