[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
SF.net SVN: ledger-smb:[5048] trunk/LedgerSMB/Scripts/pnl.pm
- Subject: SF.net SVN: ledger-smb:[5048] trunk/LedgerSMB/Scripts/pnl.pm
- From: ..hidden..
- Date: Thu, 26 Jul 2012 09:06:17 +0000
Revision: 5048
http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=5048&view=rev
Author: einhverfr
Date: 2012-07-26 09:06:17 +0000 (Thu, 26 Jul 2012)
Log Message:
-----------
Adding script for income statement workflow
Added Paths:
-----------
trunk/LedgerSMB/Scripts/pnl.pm
Added: trunk/LedgerSMB/Scripts/pnl.pm
===================================================================
--- trunk/LedgerSMB/Scripts/pnl.pm (rev 0)
+++ trunk/LedgerSMB/Scripts/pnl.pm 2012-07-26 09:06:17 UTC (rev 5048)
@@ -0,0 +1,43 @@
+=head1 NAME
+
+LedgerSMB::Scripts::pnl - PNL report workflows for LedgerSMB
+
+=head1 SYNOPSIS
+
+Called via lsmb-handler.pl:
+
+ LedgerSMB::Scripts::pnl->can($request->{action})->($request);
+
+=head1 DESCRIPTION
+
+This module provides workflow logic for producing various reports regaridng
+profit and loss.
+
+=head1 METHODS/WORKFLOWS
+
+=over
+
+=item generate_income_statement
+
+Generates an income statement.
+
+=cut
+
+sub generate_income_statement {
+ my ($request) = @_;
+ use LedgerSMB::DBObject::Report::PNL::Income_Statement;
+ my $rpt =LedgerSMB::DBObject::Report::PNL::Income_Statement->new(%$request);
+ $rpt->render($request);
+}
+
+=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;
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.