SF.net SVN: ledger-smb:[6775] trunk/LedgerSMB/Report/Inventory/Adj_Details. pm

[..hidden..]

Revision: 6775
          http://sourceforge.net/p/ledger-smb/code/6775
Author:   einhverfr
Date:     2014-02-06 04:56:17 +0000 (Thu, 06 Feb 2014)
Log Message:
-----------
Inventory adjustment details now show up, but no buttons to approve yet.

Modified Paths:
--------------
    trunk/LedgerSMB/Report/Inventory/Adj_Details.pm

Modified: trunk/LedgerSMB/Report/Inventory/Adj_Details.pm
===================================================================
--- trunk/LedgerSMB/Report/Inventory/Adj_Details.pm	2014-02-06 04:53:59 UTC (rev 6774)
+++ trunk/LedgerSMB/Report/Inventory/Adj_Details.pm	2014-02-06 04:56:17 UTC (rev 6775)
@@ -44,7 +44,7 @@
 
 =cut
 
-has source => (is => 'ro', isa => 'Maybe[Str]');
+has source => (is => 'rw', isa => 'Maybe[Str]');
 
 =back
 
@@ -104,7 +104,7 @@
 sub run_report {
     my ($self) = @_;
     my ($rpt) = $self->exec_method({funcname => 'inventory_adj__get'});
-    $self->source($rpt->source);
+    $self->source($rpt->{source});
     my @rows = $self->exec_method({funcname => 'inventory_adj__details'});
     for my $row (@rows){
         $row->{row_id} = $row->{parts_id}; 

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


------------------------------------------------------------------------------
Managing the Performance of Cloud-Based Applications
Take advantage of what the Cloud has to offer - Avoid Common Pitfalls.
Read the Whitepaper.
http://pubads.g.doubleclick.net/gampad/clk?id=121051231&iu=/4140/ostg.clktrk
_______________________________________________
Ledger-smb-commits mailing list
..hidden..
https://lists.sourceforge.net/lists/listinfo/ledger-smb-commits