StockArr := Zeros(10,1);
  StockArrForExcel(StockArr);
  return StockArr;