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



Reply via email to