[Blotter-commits] r628 - pkg/quantstrat/R

[noreply at r-forge.r-project.org]

Author: gsee
Date: 2011-06-13 17:45:36 +0200 (Mon, 13 Jun 2011)
New Revision: 628

Modified:
   pkg/quantstrat/R/orders.R
Log:
revert order qty adjustment change.

Modified: pkg/quantstrat/R/orders.R
===================================================================
--- pkg/quantstrat/R/orders.R	2011-06-13 14:18:00 UTC (rev 627)
+++ pkg/quantstrat/R/orders.R	2011-06-13 15:45:36 UTC (rev 628)
@@ -604,7 +604,7 @@
                 remqty<-orderQty+pos
                 if(side=="long"){
                     if (remqty<0){
-                        newqty<-orderQty+remqty
+                        newqty<-orderQty-remqty
                         warning("orderQty of ",orderQty," would cross through zero, reducing qty to ",newqty)
                         orderQty<-newqty
                     }