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

[..hidden..]

Revision: 6285
          http://sourceforge.net/p/ledger-smb/code/6285
Author:   einhverfr
Date:     2013-11-14 08:21:51 +0000 (Thu, 14 Nov 2013)
Log Message:
-----------
AP price handlign fixes and default vendors support

Modified Paths:
--------------
    addons/1.3/wxPOS/WXPOS/Sysconfig.pm
    addons/1.3/wxPOS/WXPOS/UI/AP.pm
    addons/1.3/wxPOS/setup/invoices.sql

Modified: addons/1.3/wxPOS/WXPOS/Sysconfig.pm
===================================================================
--- addons/1.3/wxPOS/WXPOS/Sysconfig.pm	2013-11-14 06:54:58 UTC (rev 6284)
+++ addons/1.3/wxPOS/WXPOS/Sysconfig.pm	2013-11-14 08:21:51 UTC (rev 6285)
@@ -53,7 +53,9 @@
 }
 our $money_places = 0;
 our $default_customer;
-for my $key (qw(default_language number_format default_customer money_places)){
+our $default_vendor;
+for my $key (qw(default_language number_format 
+                default_vendor default_customer money_places)){
    no strict 'refs';
    next unless $cfg->val('main',$key);
    $$key = $cfg->val('main',$key);

Modified: addons/1.3/wxPOS/WXPOS/UI/AP.pm
===================================================================
--- addons/1.3/wxPOS/WXPOS/UI/AP.pm	2013-11-14 06:54:58 UTC (rev 6284)
+++ addons/1.3/wxPOS/WXPOS/UI/AP.pm	2013-11-14 08:21:51 UTC (rev 6285)
@@ -173,7 +173,7 @@
  $part = WXPOS::Part->get_by_partnumber($part, $cust, 2);
  my $numb = $part->partnumber;
  my $desc = $part->description;
- my $sell = $part->sellprice;
+ my $sell = $part->lastcost;
  if (!$numb) {
   Wx::MessageBox("Please, try again.", "Part not Found!", wxOK|wxCENTRE|wxICON_ERROR, $self->{tab});
   return 0;

Modified: addons/1.3/wxPOS/setup/invoices.sql
===================================================================
--- addons/1.3/wxPOS/setup/invoices.sql	2013-11-14 06:54:58 UTC (rev 6284)
+++ addons/1.3/wxPOS/setup/invoices.sql	2013-11-14 08:21:51 UTC (rev 6285)
@@ -23,7 +23,7 @@
 
  INSERT INTO acc_trans
         (trans_id, transdate, chart_id, amount, approved)
- SELECT currval('id')::int, $2, a.id, $4 * -1true
+ SELECT currval('id')::int, $2, a.id, $4 * -1, true
    FROM account a WHERE accno = $16;
 
  SELECT currval('id')::int;

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


------------------------------------------------------------------------------
DreamFactory - Open Source REST & JSON Services for HTML5 & Native Apps
OAuth, Users, Roles, SQL, NoSQL, BLOB Storage and External API Access
Free app hosting. Or install the open source package on any LAMP server.
Sign up and see examples for AngularJS, jQuery, Sencha Touch and Native!
http://pubads.g.doubleclick.net/gampad/clk?id=63469471&iu=/4140/ostg.clktrk
_______________________________________________
Ledger-smb-commits mailing list
..hidden..
https://lists.sourceforge.net/lists/listinfo/ledger-smb-commits