SF.net SVN: ledger-smb:[6278] addons/1.3/wxPOS

[..hidden..]

Revision: 6278
          http://sourceforge.net/p/ledger-smb/code/6278
Author:   einhverfr
Date:     2013-11-11 08:21:40 +0000 (Mon, 11 Nov 2013)
Log Message:
-----------
Sort of posting, need to fix null amounts and then that is working.

Modified Paths:
--------------
    addons/1.3/wxPOS/WXPOS/Invoice.pm
    addons/1.3/wxPOS/WXPOS/UI/AR/Pay.pm
    addons/1.3/wxPOS/setup/invoices.sql

Modified: addons/1.3/wxPOS/WXPOS/Invoice.pm
===================================================================
--- addons/1.3/wxPOS/WXPOS/Invoice.pm	2013-11-11 07:50:54 UTC (rev 6277)
+++ addons/1.3/wxPOS/WXPOS/Invoice.pm	2013-11-11 08:21:40 UTC (rev 6278)
@@ -259,10 +259,8 @@
         $self->call_dbmethod(funcname => "add_item_$sfx", args => $line);
     }
     foreach my $pmt (@{$self->payments}){
-        $pmt->{"${sfx}_accno"} = $WXPOS::Sysconfig::Accounts->{$sfx};
-        $pmt->{cash_accno} = $WXPOS::Sysconfig::Accounts->{cash};
-        die $WXPOS::Sysconfig::Accounts->{$sfx} . ':' . 
-            $WXPOS::Sysconfig::Accounts->{cash};
+        $pmt->{"${sfx}_accno"} = $WXPOS::Sysconfig::accounts->{$sfx};
+        $pmt->{cash_accno} = $WXPOS::Sysconfig::accounts->{cash};
         
         $self->call_dbmethod(funcname => "add_payment_$sfx", args => $pmt);
     }

Modified: addons/1.3/wxPOS/WXPOS/UI/AR/Pay.pm
===================================================================
--- addons/1.3/wxPOS/WXPOS/UI/AR/Pay.pm	2013-11-11 07:50:54 UTC (rev 6277)
+++ addons/1.3/wxPOS/WXPOS/UI/AR/Pay.pm	2013-11-11 08:21:40 UTC (rev 6278)
@@ -136,15 +136,15 @@
 sub _Post {
     my ($self) = @_;
     my $invoice = WXPOS::Invoice->from_UI($self, 2);
-    try {
+    #try {
       $invoice->post;
-    } catch {
-      Wx::MessageBox("Something went wrong.  Please try again",
-                   "More information has been logged on this error",
-                    wxOK|wxCENTRE|wxICON_ERROR, $self->{tab});
-      Carp::cluck();
-      return undef;
-    }
+    #} catch {
+    #  Wx::MessageBox("Something went wrong.  Please try again",
+    #               "More information has been logged on this error",
+    #                wxOK|wxCENTRE|wxICON_ERROR, $self->{tab});
+    #  Carp::cluck($_);
+    #  return undef;
+    #}
     $invoice->print(); # TODO
 }
 

Modified: addons/1.3/wxPOS/setup/invoices.sql
===================================================================
--- addons/1.3/wxPOS/setup/invoices.sql	2013-11-11 07:50:54 UTC (rev 6277)
+++ addons/1.3/wxPOS/setup/invoices.sql	2013-11-11 08:21:40 UTC (rev 6278)
@@ -97,7 +97,7 @@
    SELECT in_id, p.income_accno_id, a.transdate, i.qty * i.sellprice, true, i.id
      FROM parts p
      JOIN invoice i ON i.parts_id = p.id
-     JOIN ar ON i.trans_id = ar.id AND ar.id = in_id;
+     JOIN ar a ON i.trans_id = a.id AND a.id = in_id;
 
    -- transaction should now be balanced if this was done with invoice__begin_ar
    -- add cogs

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


------------------------------------------------------------------------------
November Webinars for C, C++, Fortran Developers
Accelerate application performance with scalable programming models. Explore
techniques for threading, error checking, porting, and tuning. Get the most 
from the latest Intel processors and coprocessors. See abstracts and register
http://pubads.g.doubleclick.net/gampad/clk?id=60136231&iu=/4140/ostg.clktrk
_______________________________________________
Ledger-smb-commits mailing list
..hidden..
https://lists.sourceforge.net/lists/listinfo/ledger-smb-commits