SF.net SVN: ledger-smb:[6493] trunk

[..hidden..]

Revision: 6493
          http://sourceforge.net/p/ledger-smb/code/6493
Author:   einhverfr
Date:     2014-01-17 05:25:16 +0000 (Fri, 17 Jan 2014)
Log Message:
-----------
Removed saved trial balances.
This functionality was originally designed during 1.3 as an add-on for re-usable reports.  However, it isn't working and has been superceded by the ability to share links to reports with criteria.  There is no reason for it now.

Modified Paths:
--------------
    trunk/LedgerSMB/Scripts/trial_balance.pm
    trunk/UI/Reports/filters/trial_balance.html

Removed Paths:
-------------
    trunk/LedgerSMB/Report/Trial_Balance/List.pm

Deleted: trunk/LedgerSMB/Report/Trial_Balance/List.pm
===================================================================
--- trunk/LedgerSMB/Report/Trial_Balance/List.pm	2014-01-17 05:14:53 UTC (rev 6492)
+++ trunk/LedgerSMB/Report/Trial_Balance/List.pm	2014-01-17 05:25:16 UTC (rev 6493)
@@ -1,105 +0,0 @@
-=head1 NAME
-
-LedgerSMB::Report::Trial_Balance::List - List saved trial balances in LedgerSMB
-
-=head1 SYNPOPSIS
-
- my $tblist = LedgerSMB::Report::Trial_Balance::List->new(%$request);
- $tblist->render($request);
-
-=cut
-
-package LedgerSMB::Report::Trial_Balance::List;
-use Moose;
-extends 'LedgerSMB::Report';
-
-use LedgerSMB::App_State;
-my $locale = $LedgerSMB::App_State::Locale;
-
-=head1 DESCRIPTION
-
-This module lists trial balances for LedgerSMB.
-
-=head1 CRITERIA PROPERTIES
-
-None used
-
-=head1 REPORT-RELATED CONSTANT FUNCTIONS
-
-=over
-
-=item name
-
-=cut
-
-sub name { return $locale->LedgerSMB::Report::text('Trial Balance List') }
-
-=item header_lines
-
-=cut
-
-sub header_lines { return [] };
-
-=item columns
-
-=cut
-
-sub columns {
-    return [{ col_id => 'description',
-                type => 'href',
-           href_base => 'trial_balance.pl?action=get&id=',
-                name => $locale->LedgerSMB::Report::text('Description') },
-            { col_id => 'date_from',
-                type => 'text',
-                name => $locale->LedgerSMB::Report::text('Start Date') },
-            { col_id => 'date_to',
-                type => 'text',
-                name => $locale->LedgerSMB::Report::text('End Date') },
-            { col_id => 'yearend',
-                type => 'text',
-                name => $locale->LedgerSMB::Report::text('Ignore Yearends') },
-           ];
-}
-
-=back
-
-=head1 METHODS
-
-=over
-
-=item run_report
-
-=cut
-
-sub run_report {
-    my ($self) = (@_);
-    my @rows = $self->exec_method({funcname => 'trial_balance__list'});
-    $_->{row_id} = $_->{id} for @rows;
-    $self->rows(\@rows);
-}
-
-=back
-
-=head1 SEE ALSO
-
-=over
-
-=item LedgerSMB::DBObject
-
-=item LedgerSMB::DBObject_Moose
-
-=item LedgerSMB::MooseTypes
-
-=item LedgerSMB::Report
-
-=back
-
-=head1 COPYRIGHT
-
-COPYRIGHT (C) 2012 The LedgerSMB Core Team.  This file may be re-used under the
-terms of the LedgerSMB General Public License version 2 or at your option any
-later version.  Please see enclosed LICENSE file for details.
-
-=cut
-
-1;

Modified: trunk/LedgerSMB/Scripts/trial_balance.pm
===================================================================
--- trunk/LedgerSMB/Scripts/trial_balance.pm	2014-01-17 05:14:53 UTC (rev 6492)
+++ trunk/LedgerSMB/Scripts/trial_balance.pm	2014-01-17 05:25:16 UTC (rev 6493)
@@ -4,20 +4,6 @@
 
 =head1 SYNOPSIS
 
-To save a criteria set:
-
-  LedgerSMB::Scripts::trial_balance::save($request);
-
-To get a criteria set and run it:
-
-  LedgerSMB::Scripts::trial_balance::get($request);
-
-To list criteria sets:
-
-  LedgerSMB::Scripts::trial_balance::list($request);
-
-To run a trial balance:
-
   LedgerSMB::Scripts::trial_balance::run($request);
 
 =cut
@@ -38,44 +24,6 @@
 
 =over
 
-=item get 
-
-Retrieves and runs a trial balance.  Only needs id to be set.
-
-=cut
-
-sub get {
-    my ($request) = @_;
-    $request->merge(LedgerSMB::Report::Trial_Balance->get($request->{id}));
-    run($request);
-}
-
-=item save
-
-Saves a trial balance.  All criteria are applicable.
-
-=cut
-
-sub save {
-    my ($request) = @_;
-    my $tb = LedgerSMB::Report::Trial_Balance->new(%$request);
-    $tb->save;
-    list($request);
-}
-
-=item list
-
-Lists trial balances.  No criteria are applicable
-
-=cut
-
-sub list {
-    my ($request) = @_;
-    use LedgerSMB::Report::Trial_Balance::List;
-    my $rpt = LedgerSMB::Report::Trial_Balance::List->new(%$request);
-    $rpt->render($request);
-}
-
 =item run
 
 Runs the trial balance. All criteria are applicable except id and desc.
@@ -84,9 +32,7 @@
 
 sub run {
     my ($request) = @_;
-    my $tb = LedgerSMB::Report::Trial_Balance->new(%$request);
-    $tb->run_report;
-    $tb->render($request);
+    LedgerSMB::Report::Trial_Balance->new(%$request)->render($request);
 }
 
 =back

Modified: trunk/UI/Reports/filters/trial_balance.html
===================================================================
--- trunk/UI/Reports/filters/trial_balance.html	2014-01-17 05:14:53 UTC (rev 6492)
+++ trunk/UI/Reports/filters/trial_balance.html	2014-01-17 05:25:16 UTC (rev 6493)
@@ -42,14 +42,6 @@
                     </td>
                 </tr>
                 <tr>
-                <th colspan=2><?lsmb text('Round Amounts First') ?>
-                <td><?lsmb PROCESS input element_data={
-                              name => 'discrete_amounts',
-                              type => 'checkbox',
-                             value => 'Y',
-                      } -?>
-                </td>
-                </tr>
             </table>
           </td>
         </tr>
@@ -80,17 +72,6 @@
                              } ?>
                     </td>
                 </tr>
-                <tr>
-                    <th align="righ"><?lsmb text("Description")?></th>
-                    <td colspan="2">
-                        <?lsmb PROCESS input element_data={
-                            name="description",
-                            value=report.description,
-                            size=65,
-                            class= 'text'
-                        }?>
-                    </td>
-                </tr>
               </table>
             </td>
           </tr>
@@ -135,28 +116,13 @@
         <br />
         
         <?lsmb PROCESS button element_data={
-            text => 'Save',
-            attributes => {
-                name=>'action',
-                value=>'save'
+            text = 'Run',
+            attributes = {
+                name= 'action',
+                value= 'run'
             }
         }?>
-        <?lsmb PROCESS button element_data={
-            text => 'Run',
-            attributes => {
-                name=>'action',
-                value=>'run'
-            }
-        }?>
 
-        <?lsmb PROCESS button element_data={
-            text => 'Save & Run',
-            attributes => {
-                name=>'action',
-                value=>'save_and_run'
-            }
-        }?>
-        
         </form>
     </body>
 </html>

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


------------------------------------------------------------------------------
CenturyLink Cloud: The Leader in Enterprise Cloud Services.
Learn Why More Businesses Are Choosing CenturyLink Cloud For
Critical Workloads, Development Environments & Everything In Between.
Get a Quote or Start a Free Trial Today. 
http://pubads.g.doubleclick.net/gampad/clk?id=119420431&iu=/4140/ostg.clktrk
_______________________________________________
Ledger-smb-commits mailing list
..hidden..
https://lists.sourceforge.net/lists/listinfo/ledger-smb-commits