From 2dd420642c88bc6bb872389a08734b0038b2a9f7 Mon Sep 17 00:00:00 2001
From: Denis Tereshkin <denis@kasan.ws>
Date: Wed, 5 Oct 2016 14:52:46 +0700
Subject: [PATCH] Table parser: updated to quik 7

---
 .../TableParsers/AllParamsTableParser.hs           | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/src/QuoteSource/TableParsers/AllParamsTableParser.hs b/src/QuoteSource/TableParsers/AllParamsTableParser.hs
index 14322c7..09d6729 100644
--- a/src/QuoteSource/TableParsers/AllParamsTableParser.hs
+++ b/src/QuoteSource/TableParsers/AllParamsTableParser.hs
@@ -33,13 +33,13 @@ data TableColumn = CUnknown
 columnCodes = M.fromList [
   ("CLASS_CODE", CClassCode),
   ("CODE", CTicker),
-  ("bid", CBestBid),
-  ("offer", CBestAsk),
-  ("last", CPrice),
-  ("numcontracts", COpenInterest),
-  ("biddepth", CTotalDemand),
-  ("offerdepth", CTotalSupply),
-  ("voltoday", CVolume)]
+  ("BID", CBestBid),
+  ("OFFER", CBestAsk),
+  ("LAST", CPrice),
+  ("NUMCONTRACTS", COpenInterest),
+  ("BIDDEPTHT", CTotalDemand),
+  ("OFFERDEPTHT", CTotalSupply),
+  ("VOLTODAY", CVolume)]
 
 columnToDataType :: TableColumn -> DataType
 columnToDataType x