[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

SF.net SVN: ledger-smb: [1616] trunk/LedgerSMB/DBObject/Report.pm



Revision: 1616
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=1616&view=rev
Author:   einhverfr
Date:     2007-09-15 20:45:30 -0700 (Sat, 15 Sep 2007)

Log Message:
-----------
LedgerSBM/DBObject/Report.pm now compiles

Modified Paths:
--------------
    trunk/LedgerSMB/DBObject/Report.pm

Modified: trunk/LedgerSMB/DBObject/Report.pm
===================================================================
--- trunk/LedgerSMB/DBObject/Report.pm	2007-09-16 03:09:45 UTC (rev 1615)
+++ trunk/LedgerSMB/DBObject/Report.pm	2007-09-16 03:45:30 UTC (rev 1616)
@@ -30,7 +30,8 @@
 
 sub definition_invoice_aging {
     my ($self) = @_;
-    my @{$self->{entities}} = 
+
+    @{$self->{entities}} = 
         $self->exec_method(funcname => 'payment_get_all_accounts');
 
     my $entity_options = [];
@@ -42,8 +43,12 @@
     }
 
     $self->{criteria} = [
-           {} 
+           {name => 'entity', type => 'select', label => 'Account', 
+                              options => $entity_options}, 
     ];
+    $self->{hidden_elements} = [
+            {name => 'account_class', value => $self->{account_class}}
+    ];
     $self->{columns} = [
             {id => 'entity_id',      label => 'Entity ID'}, 
             {id => 'account_number', label => 'Account Number'},
@@ -62,10 +67,16 @@
 	    {id => 'c30',            label => '30'},
 	    {id => 'c60',            label => '60'},
 	    {id => 'c90',            label => '90'},  
-	    {id => 'duedate'         label => 'Due'},
+	    {id => 'duedate',        label => 'Due'},
 	    {id => 'curr',           label => 'Currency'},
 	    {id => 'exchangerate',   label => 'Exchange Rate'},
     ];
+    $self->{report_types} = [
+            {label => "Detailed",         value => "detailed"},
+            {label => "Summary",          value => "summary"},
+            {label => "Overdue",          value => "overdue"},
+            {label => "Overdue Summary",  value => "overdue_summary"},
+    ];
 
 }
 
@@ -73,3 +84,4 @@
 
 =cut
 
+1;


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.