all the forex symbols have a -1 on thier last quote over friday and weekend. i cannot use tomaz original quote. i just want to delete the last quote.
--- In [email protected], "wavemechanic" <fim...@...> wrote: > > Why not use the cleanup script that Tomasz provided? Are you trying to do > something above and beyond what that script does? > > Bill > ----- Original Message ----- > From: murthysuresh > To: [email protected] > Sent: March 06, 2010 5:56 PM > Subject: [amibroker] Cleanup quotes with -1 > > > for some reason this is not cleaning up the quotes. > > var oAB = new ActiveXObject("Broker.Application"); > var fso = new ActiveXObject("Scripting.FileSystemObject"); > var Shell = new ActiveXObject("WScript.Shell"); > var oStocks = oAB.Stocks; > var Continue = true; > var StockQty = oStocks.Count; > var oStocksToDelete = new Array; > var oStocksNotTraded = new Array; > WScript.Echo("Cleanup script started" ); > for( i = 0; i < StockQty && Continue; i++ ) > { > oStock = oStocks( i ); > > var Qty = oStock.Quotations.Count; > > var response = 0; > > while( Qty > 0 ) > { > oQuote = oStock.Quotations( Qty - 1 ); > > if((oQuote.Open ==-1) || (oQuote.High ==-1) || (oQuote.Low > ==-1)||(oQuote.Close ==-1)) > { > //WScript.Echo("found 1 bad quote " || oQuote.Date ); > oStock.Quotations.Remove(oQuote ); > > } > Qty-- > > } > } > oAB.SaveDatabase() > oAB.RefreshAll(); > > > > WScript.Echo("Cleanup script finished" ); > > > > ------------------------------------ > > **** IMPORTANT PLEASE READ **** > This group is for the discussion between users only. > This is *NOT* technical support channel. > > TO GET TECHNICAL SUPPORT send an e-mail directly to > SUPPORT {at} amibroker.com > > TO SUBMIT SUGGESTIONS please use FEEDBACK CENTER at > http://www.amibroker.com/feedback/ > (submissions sent via other channels won't be considered) > > For NEW RELEASE ANNOUNCEMENTS and other news always check DEVLOG: > http://www.amibroker.com/devlog/ > > Yahoo! Groups Links >
