Table parser: updated to quik 7

src/QuoteSource/TableParsers/AllParamsTableParser.hs

@@ -33,13 +33,13 @@ data TableColumn = CUnknown
 columnCodes = M.fromList [
   ("CLASS_CODE", CClassCode),
   ("CODE", CTicker),
-  ("bid", CBestBid),
+  ("BID", CBestBid),
-  ("offer", CBestAsk),
+  ("OFFER", CBestAsk),
-  ("last", CPrice),
+  ("LAST", CPrice),
-  ("numcontracts", COpenInterest),
+  ("NUMCONTRACTS", COpenInterest),
-  ("biddepth", CTotalDemand),
+  ("BIDDEPTHT", CTotalDemand),
-  ("offerdepth", CTotalSupply),
+  ("OFFERDEPTHT", CTotalSupply),
-  ("voltoday", CVolume)]
+  ("VOLTODAY", CVolume)]
 
 columnToDataType :: TableColumn -> DataType
 columnToDataType x