Add League_Name, AStarter, and HStarter support to Odds.

Add another test case for Odds.
Rename a few columns (dropping the "game" prefix) in the Odds tables.

diff --git a/src/TSN/XML/Odds.hs b/src/TSN/XML/Odds.hs
index b76be762dee067d4b2125ad28668b21bfc3ab7eb..8061a3e23db2ec2c2eb6c3311ecebcf735fd239e 100644 (file)
--- a/src/TSN/XML/Odds.hs
+++ b/src/TSN/XML/Odds.hs
@@ -48,7 +48,6 @@ import Test.Tasty.HUnit ( (@?=), testCase )
 import Text.Read ( readMaybe )
 import Text.XML.HXT.Core (
   PU,
-  xp5Tuple,
   xp6Tuple,
   xp8Tuple,
   xpAttr,
@@ -153,6 +152,10 @@ instance XmlImport OddsGameCasinoXml
 --   This is basically the same as 'OddsGameAwayTeamXml', but the two
 --   types have different picklers.
 --
+--   The starter id/name could perhaps be combined into an embedded
+--   type, but can you make an entire embedded type optional with
+--   Maybe? I doubt it works.
+--
 data OddsGameHomeTeamXml =
   OddsGameHomeTeamXml {
     xml_home_team_id         :: String, -- ^ The home/away team IDs
@@ -163,10 +166,11 @@ data OddsGameHomeTeamXml =
                                         --   so we ignore the probable
                                         --   upper bound of three
                                         --   characters.
-    xml_home_rotation_number :: Int,
-    xml_home_abbr            :: String,
-    xml_home_team_name       :: String,
-    xml_home_casinos         :: [OddsGameCasinoXml] }
+    xml_home_team_rotation_number :: Int,
+    xml_home_team_abbr            :: String,
+    xml_home_team_name            :: String,
+    xml_home_team_starter         :: Maybe (Int, String), -- ^ (id, name)
+    xml_home_team_casinos         :: [OddsGameCasinoXml] }
   deriving (Eq, Show)
 
 instance ToDb OddsGameHomeTeamXml where
@@ -183,7 +187,7 @@ instance FromXml OddsGameHomeTeamXml where
   from_xml OddsGameHomeTeamXml{..} =
     Team {
       team_id   = xml_home_team_id,
-      team_abbreviation = Just xml_home_abbr,
+      team_abbreviation = Just xml_home_team_abbr,
       team_name = Just xml_home_team_name }
 
 -- | This allows us to insert the XML representation
@@ -205,10 +209,11 @@ data OddsGameAwayTeamXml =
                                         --   on lengthless text fields, so
                                         --   we ignore the probable upper
                                         --   bound of three characters
-    xml_away_rotation_number :: Int,
-    xml_away_abbr            :: String,
-    xml_away_team_name       :: String,
-    xml_away_casinos         :: [OddsGameCasinoXml] }
+    xml_away_team_rotation_number :: Int,
+    xml_away_team_abbr            :: String,
+    xml_away_team_name            :: String,
+    xml_away_team_starter         :: Maybe (Int, String), -- ^ (id, name)
+    xml_away_team_casinos         :: [OddsGameCasinoXml] }
   deriving (Eq, Show)
 
 instance ToDb OddsGameAwayTeamXml where
@@ -224,7 +229,7 @@ instance FromXml OddsGameAwayTeamXml where
   --
   from_xml OddsGameAwayTeamXml{..} = Team
                                        xml_away_team_id
-                                       (Just xml_away_abbr)
+                                       (Just xml_away_team_abbr)
                                        (Just xml_away_team_name)
 
 -- | This allows us to insert the XML representation
@@ -287,8 +292,12 @@ data OddsGame =
     db_odds_id           :: DefaultKey Odds,
     db_game_id           :: Int,
     db_game_time         :: UTCTime, -- ^ Contains both the date and time.
-    db_game_away_team_rotation_number :: Int,
-    db_game_home_team_rotation_number :: Int }
+    db_away_team_rotation_number :: Int,
+    db_home_team_rotation_number :: Int,
+    db_away_team_starter_id :: Maybe Int,
+    db_away_team_starter_name :: Maybe String,
+    db_home_team_starter_id :: Maybe Int,
+    db_home_team_starter_name :: Maybe String }
 
 
 -- | XML representation of an 'OddsGame'.
@@ -298,16 +307,16 @@ data OddsGameXml =
     xml_game_id         :: Int,
     xml_game_date       :: UTCTime, -- ^ Contains only the date
     xml_game_time       :: UTCTime, -- ^ Contains only the time
-    xml_game_away_team  :: OddsGameAwayTeamXml,
-    xml_game_home_team  :: OddsGameHomeTeamXml,
-    xml_game_over_under :: OddsGameOverUnderXml }
+    xml_away_team  :: OddsGameAwayTeamXml,
+    xml_home_team  :: OddsGameHomeTeamXml,
+    xml_over_under :: OddsGameOverUnderXml }
   deriving (Eq, Show)
 
 -- | Pseudo-field that lets us get the 'OddsGameCasinoXml's out of
---   xml_game_over_under.
+--   xml_over_under.
 --
-xml_game_over_under_casinos :: OddsGameXml -> [OddsGameCasinoXml]
-xml_game_over_under_casinos = xml_casinos . xml_game_over_under
+xml_over_under_casinos :: OddsGameXml -> [OddsGameCasinoXml]
+xml_over_under_casinos = xml_casinos . xml_over_under
 
 
 instance ToDb OddsGameXml where
@@ -324,7 +333,7 @@ instance FromXmlFk OddsGameXml where
 
   -- | To convert from the XML representation to the database one, we
   --   drop the home/away teams and the casino lines, but retain the
-  --   home/away rotation numbers.
+  --   home/away rotation numbers and the starters.
   --
   from_xml_fk fk OddsGameXml{..} =
     OddsGame {
@@ -335,11 +344,24 @@ instance FromXmlFk OddsGameXml where
                        (utctDay xml_game_date) -- Take the day part from one,
                        (utctDayTime xml_game_time), -- the time from the other.
 
-      db_game_away_team_rotation_number =
-        (xml_away_rotation_number xml_game_away_team),
+      db_away_team_rotation_number =
+        (xml_away_team_rotation_number xml_away_team),
+
+      db_home_team_rotation_number =
+        (xml_home_team_rotation_number xml_home_team),
+
+      db_away_team_starter_id =
+        (fmap fst $ xml_away_team_starter xml_away_team),
+
+      db_away_team_starter_name =
+        (fmap snd $ xml_away_team_starter xml_away_team),
+
+      db_home_team_starter_id =
+        (fmap fst $ xml_home_team_starter xml_home_team),
+
+      db_home_team_starter_name =
+        (fmap snd $ xml_home_team_starter xml_home_team) }
 
-      db_game_home_team_rotation_number =
-        (xml_home_rotation_number xml_game_home_team) }
 
 -- | This lets us insert the XML representation 'OddsGameXml' directly.
 --
@@ -361,8 +383,17 @@ instance XmlImportFk OddsGameXml
 --   the notes anyway, we just stick them with an arbitrary
 --   game. C'est la vie.
 --
+--   We have to take the same approach with the league. The
+--   \<League_Name\> elements are sitting outside of the games, and
+--   are presumably supposed to be interpreted in \"chronological\"
+--   order; i.e. the current league stays the same until we see
+--   another \<League_Name\> element. Unfortunately, that's not how
+--   XML works. So we're forced to ignore the league in the database
+--   and pull the same trick, pairing them with games.
+--
 data OddsGameWithNotes =
   OddsGameWithNotes {
+    league :: Maybe String,
     notes :: [String],
     game :: OddsGameXml }
   deriving (Eq, Show)
@@ -507,8 +538,8 @@ instance DbImport Message where
       -- Next, we insert the home and away teams. We do this before
       -- inserting the game itself because the game has two foreign keys
       -- pointing to "teams".
-      away_team_id <- insert_xml_or_select (xml_game_away_team g)
-      home_team_id <- insert_xml_or_select (xml_game_home_team g)
+      away_team_id <- insert_xml_or_select (xml_away_team g)
+      home_team_id <- insert_xml_or_select (xml_home_team g)
 
       -- Now insert the game, keyed to the "odds",
       game_id <- insert_xml_fk odds_id g
@@ -525,7 +556,7 @@ instance DbImport Message where
       -- game and the lines for the casinos all wind up in the same
       -- table, odds_games_lines. We can insert the over/under entries
       -- freely with empty away/home lines:
-      forM_ (xml_game_over_under_casinos g) $ \c -> do
+      forM_ (xml_over_under_casinos g) $ \c -> do
         -- Start by inderting the casino.
         ou_casino_id <- insert_xml_or_select c
 
@@ -542,7 +573,7 @@ instance DbImport Message where
       -- ...but then when we insert the home/away team lines, we
       -- prefer to update the existing entry rather than overwrite it
       -- or add a new record.
-      forM_ (xml_away_casinos $ xml_game_away_team g) $ \c -> do
+      forM_ (xml_away_team_casinos $ xml_away_team g) $ \c -> do
         -- insert, or more likely retrieve the existing, casino
         a_casino_id <- insert_xml_or_select c
 
@@ -554,7 +585,7 @@ instance DbImport Message where
           Ogl_Odds_Casinos_Id ==. a_casino_id
 
       -- Repeat all that for the home team.
-      forM_ (xml_home_casinos $ xml_game_home_team g) $ \c ->do
+      forM_ (xml_home_team_casinos $ xml_home_team g) $ \c ->do
         h_casino_id <- insert_xml_or_select c
         let home_line = home_away_line c
         update [Ogl_Home_Line =. home_line] $ -- WHERE
@@ -574,12 +605,13 @@ instance DbImport Message where
 pickle_game_with_notes :: PU OddsGameWithNotes
 pickle_game_with_notes =
   xpWrap (from_pair, to_pair) $
-    xpPair
+    xpTriple
+      (xpOption $ xpElem "League_Name" xpText)
       (xpList $ xpElem "Notes" xpText)
       pickle_game
   where
-    from_pair = uncurry OddsGameWithNotes
-    to_pair OddsGameWithNotes{..} = (notes, game)
+    from_pair = uncurryN OddsGameWithNotes
+    to_pair OddsGameWithNotes{..} = (league, notes, game)
 
 
 -- | Pickler for an 'OddsGameCasinoXml'.
@@ -606,21 +638,25 @@ pickle_home_team :: PU OddsGameHomeTeamXml
 pickle_home_team =
   xpElem "HomeTeam" $
     xpWrap (from_tuple, to_tuple) $
-      xp5Tuple
+      xp6Tuple
         (xpElem "HomeTeamID" xpText)
         (xpElem "HomeRotationNumber" xpInt)
         (xpElem "HomeAbbr" xpText)
         (xpElem "HomeTeamName" xpText)
+        (-- This is an ugly way to get both the HStarter ID attribute
+         -- and contents.
+         xpOption (xpElem "HStarter" $ xpPair (xpAttr "ID" xpInt) xpText))
         (xpList pickle_casino)
   where
     from_tuple = uncurryN OddsGameHomeTeamXml
+
     -- Use record wildcards to avoid unused field warnings.
     to_tuple OddsGameHomeTeamXml{..} = (xml_home_team_id,
-                                        xml_home_rotation_number,
-                                        xml_home_abbr,
+                                        xml_home_team_rotation_number,
+                                        xml_home_team_abbr,
                                         xml_home_team_name,
-                                        xml_home_casinos)
-
+                                        xml_home_team_starter,
+                                        xml_home_team_casinos)
 
 -- | Pickler for an 'OddsGameAwayTeamXml'.
 --
@@ -628,20 +664,25 @@ pickle_away_team :: PU OddsGameAwayTeamXml
 pickle_away_team =
   xpElem "AwayTeam" $
     xpWrap (from_tuple, to_tuple) $
-      xp5Tuple
+      xp6Tuple
         (xpElem "AwayTeamID" xpText)
         (xpElem "AwayRotationNumber" xpInt)
         (xpElem "AwayAbbr" xpText)
         (xpElem "AwayTeamName" xpText)
+        (-- This is an ugly way to get both the AStarter ID attribute
+         -- and contents.
+         xpOption (xpElem "AStarter" $ xpPair (xpAttr "ID" xpInt) xpText))
         (xpList pickle_casino)
   where
     from_tuple = uncurryN OddsGameAwayTeamXml
+
     -- Use record wildcards to avoid unused field warnings.
     to_tuple OddsGameAwayTeamXml{..} = (xml_away_team_id,
-                                        xml_away_rotation_number,
-                                        xml_away_abbr,
+                                        xml_away_team_rotation_number,
+                                        xml_away_team_abbr,
                                         xml_away_team_name,
-                                        xml_away_casinos)
+                                        xml_away_team_starter,
+                                        xml_away_team_casinos)
 
 
 
@@ -676,9 +717,9 @@ pickle_game =
     to_tuple OddsGameXml{..} = (xml_game_id,
                                 xml_game_date,
                                 xml_game_time,
-                                xml_game_away_team,
-                                xml_game_home_team,
-                                xml_game_over_under)
+                                xml_away_team,
+                                xml_home_team,
+                                xml_over_under)
 
 
 -- | Pickler for the top-level 'Message'.
@@ -738,7 +779,10 @@ test_pickle_of_unpickle_is_identity = testGroup "pickle-unpickle tests"
           "test/xml/Odds_XML-positive-line.xml",
 
     check "pickle composed with unpickle is the identity (large file)"
-          "test/xml/Odds_XML-largefile.xml" ]
+          "test/xml/Odds_XML-largefile.xml",
+
+    check "pickle composed with unpickle is the identity (league name)"
+          "test/xml/Odds_XML-league-name.xml" ]
   where
     check desc path = testCase desc $ do
       (expected, actual) <- pickle_unpickle pickle_message path
@@ -759,7 +803,10 @@ test_unpickle_succeeds = testGroup "unpickle tests"
           "test/xml/Odds_XML-positive-line.xml",
 
     check "unpickling succeeds (large file)"
-          "test/xml/Odds_XML-largefile.xml" ]
+          "test/xml/Odds_XML-largefile.xml",
+
+    check "unpickling succeeds (league name)"
+          "test/xml/Odds_XML-league-name.xml" ]
   where
     check desc path = testCase desc $ do
       actual <- unpickleable path pickle_message
@@ -790,6 +837,10 @@ test_on_delete_cascade = testGroup "cascading delete tests"
     check "deleting odds deleted its children (large file)"
           "test/xml/Odds_XML-largefile.xml"
           189 -- 5 casinos, 184 teams
+    ,
+    check "deleting odds deleted its children (league name)"
+          "test/xml/Odds_XML-league-name.xml"
+          35 -- 5 casinos, 30 teams
     ]
   where
     check desc path expected = testCase desc $ do

diff --git a/test/shell/import-duplicates.test b/test/shell/import-duplicates.test
index 20f6d3476aaed6a0ce6968e280385ce8845d1885..a4962486bab706bffeb62a6f5125868b6b829655 100644 (file)
--- a/test/shell/import-duplicates.test
+++ b/test/shell/import-duplicates.test
@@ -15,15 +15,15 @@ rm -f shelltest.sqlite3
 # Heartbeat.xml that doesn't really count.
 find ./test/xml -maxdepth 1 -name '*.xml' | wc -l
 >>>
-19
+20
 >>>= 0
 
 # Run the imports again; we should get complaints about the duplicate
-# xml_file_ids. There are 2 errors for each violation, so we expect 2*18
+# xml_file_ids. There are 2 errors for each violation, so we expect 2*19
 # occurrences of the string 'ERROR'.
 ./dist/build/htsn-import/htsn-import -c 'shelltest.sqlite3' test/xml/*.xml 2>&1 | grep ERROR | wc -l
 >>>
-36
+38
 >>>= 0
 
 # Finally, clean up after ourselves.

diff --git a/test/xml/Odds_XML-league-name.xml b/test/xml/Odds_XML-league-name.xml
new file mode 100644 (file)
index 0000000..926f190
--- /dev/null
+++ b/test/xml/Odds_XML-league-name.xml
@@ -0,0 +1 @@
+<?xml version="1.0" standalone="no" ?>\r<!DOCTYPE message PUBLIC "-//TSN//DTD Statistics 1.0/EN" "Odds_XML.dtd">\r<message>\r<XML_File_ID>21315768</XML_File_ID>\r<heading>AAO;BB-ODDS</heading>\r<category>Odds</category>\r<sport>MLB</sport>\r<Title>Las Vegas Major League Baseball Line</Title>\r<Line_Time>Current Line as of 12:30 P.M. ET</Line_Time>\r<League_Name>National League</League_Name>\r<Game>\r<GameID>40280</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>01:10 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>007</AwayTeamID>\r<AwayRotationNumber>951</AwayRotationNumber>\r<AwayAbbr>NYM</AwayAbbr>\r<AwayTeamName>NY Mets</AwayTeamName>\r<AStarter ID="19432">J.Niese</AStarter>\r<Casino ClientID="116" Name="5Dimes">-103</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-110</Casino>\r<Casino ClientID="104" Name="BOVADA">-104</Casino>\r<Casino ClientID="121" Name="Mirage">-115</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-105</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>014</HomeTeamID>\r<HomeRotationNumber>952</HomeRotationNumber>\r<HomeAbbr>MIA</HomeAbbr>\r<HomeTeamName>Miami</HomeTeamName>\r<HStarter ID="23535">A.DeSclafani</HStarter>\r<Casino ClientID="116" Name="5Dimes">-107</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-110</Casino>\r<Casino ClientID="104" Name="BOVADA">-106</Casino>\r<Casino ClientID="121" Name="Mirage">-105</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-105</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">7.5u</Casino>\r<Casino ClientID="111" Name="Sports Interaction">7.5u</Casino>\r<Casino ClientID="104" Name="BOVADA">7.5u</Casino>\r<Casino ClientID="121" Name="Mirage">7.5u</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">7.5u</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40279</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>01:35 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>001</AwayTeamID>\r<AwayRotationNumber>953</AwayRotationNumber>\r<AwayAbbr>ATL</AwayAbbr>\r<AwayTeamName>Atlanta</AwayTeamName>\r<AStarter ID="13369">E.Santana</AStarter>\r<Casino ClientID="116" Name="5Dimes">+113</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+110</Casino>\r<Casino ClientID="104" Name="BOVADA">+116</Casino>\r<Casino ClientID="121" Name="Mirage">+115</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+115</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>006</HomeTeamID>\r<HomeRotationNumber>954</HomeRotationNumber>\r<HomeAbbr>WAS</HomeAbbr>\r<HomeTeamName>Washington</HomeTeamName>\r<HStarter ID="20452">T.Roark</HStarter>\r<Casino ClientID="116" Name="5Dimes">-123</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-130</Casino>\r<Casino ClientID="104" Name="BOVADA">-126</Casino>\r<Casino ClientID="121" Name="Mirage">-135</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-125</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">7o</Casino>\r<Casino ClientID="111" Name="Sports Interaction">7o</Casino>\r<Casino ClientID="104" Name="BOVADA">7o</Casino>\r<Casino ClientID="121" Name="Mirage">7o</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">7o</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40283</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>02:15 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>008</AwayTeamID>\r<AwayRotationNumber>955</AwayRotationNumber>\r<AwayAbbr>PHI</AwayAbbr>\r<AwayTeamName>Philadelphia</AwayTeamName>\r<AStarter ID="11969">K.Kendrick</AStarter>\r<Casino ClientID="116" Name="5Dimes">+143</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+135</Casino>\r<Casino ClientID="104" Name="BOVADA">+137</Casino>\r<Casino ClientID="121" Name="Mirage">+130</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+143</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>012</HomeTeamID>\r<HomeRotationNumber>956</HomeRotationNumber>\r<HomeAbbr>STL</HomeAbbr>\r<HomeTeamName>St. Louis</HomeTeamName>\r<HStarter ID="22410">C.Martinez</HStarter>\r<Casino ClientID="116" Name="5Dimes">-153</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-160</Casino>\r<Casino ClientID="104" Name="BOVADA">-152</Casino>\r<Casino ClientID="121" Name="Mirage">-150</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-153</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">8o</Casino>\r<Casino ClientID="111" Name="Sports Interaction">8.5p</Casino>\r<Casino ClientID="104" Name="BOVADA">8o</Casino>\r<Casino ClientID="121" Name="Mirage">8o</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">8o</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40281</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>02:20 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>009</AwayTeamID>\r<AwayRotationNumber>957</AwayRotationNumber>\r<AwayAbbr>PIT</AwayAbbr>\r<AwayTeamName>Pittsburgh</AwayTeamName>\r<AStarter ID="23300">B.Cumpton</AStarter>\r<Casino ClientID="116" Name="5Dimes">+109</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+110</Casino>\r<Casino ClientID="104" Name="BOVADA">+110</Casino>\r<Casino ClientID="121" Name="Mirage">even</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+112</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>002</HomeTeamID>\r<HomeRotationNumber>958</HomeRotationNumber>\r<HomeAbbr>CHC</HomeAbbr>\r<HomeTeamName>Chicago Cubs</HomeTeamName>\r<HStarter ID="10758">J.Hammel</HStarter>\r<Casino ClientID="116" Name="5Dimes">-119</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-130</Casino>\r<Casino ClientID="104" Name="BOVADA">-120</Casino>\r<Casino ClientID="121" Name="Mirage">-120</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-122</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">7.5u</Casino>\r<Casino ClientID="111" Name="Sports Interaction">7.5u</Casino>\r<Casino ClientID="104" Name="BOVADA">7.5u</Casino>\r<Casino ClientID="121" Name="Mirage">7.5u</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">7.5u</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40285</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>04:10 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>034</AwayTeamID>\r<AwayRotationNumber>959</AwayRotationNumber>\r<AwayAbbr>MIL</AwayAbbr>\r<AwayTeamName>Milwaukee</AwayTeamName>\r<AStarter ID="5900">K.Lohse</AStarter>\r<Casino ClientID="116" Name="5Dimes">-123</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-135</Casino>\r<Casino ClientID="104" Name="BOVADA">-125</Casino>\r<Casino ClientID="121" Name="Mirage">-120</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-125</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>013</HomeTeamID>\r<HomeRotationNumber>960</HomeRotationNumber>\r<HomeAbbr>COL</HomeAbbr>\r<HomeTeamName>Colorado</HomeTeamName>\r<HStarter ID="23385">T.Matzek</HStarter>\r<Casino ClientID="116" Name="5Dimes">+113</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+115</Casino>\r<Casino ClientID="104" Name="BOVADA">+115</Casino>\r<Casino ClientID="121" Name="Mirage">even</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+115</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">10.5o</Casino>\r<Casino ClientID="111" Name="Sports Interaction">10.5o</Casino>\r<Casino ClientID="104" Name="BOVADA">10.5o</Casino>\r<Casino ClientID="121" Name="Mirage">10.5o</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">10.5o</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40286</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>04:10 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>011</AwayTeamID>\r<AwayRotationNumber>961</AwayRotationNumber>\r<AwayAbbr>SFG</AwayAbbr>\r<AwayTeamName>San Francisco</AwayTeamName>\r<AStarter ID="20328">M.Bumgarner</AStarter>\r<Casino ClientID="116" Name="5Dimes">-138</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-155</Casino>\r<Casino ClientID="104" Name="BOVADA">-142</Casino>\r<Casino ClientID="121" Name="Mirage">-145</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-139</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>055</HomeTeamID>\r<HomeRotationNumber>962</HomeRotationNumber>\r<HomeAbbr>ARI</HomeAbbr>\r<HomeTeamName>Arizona</HomeTeamName>\r<HStarter ID="22956">M.Bolsinger</HStarter>\r<Casino ClientID="116" Name="5Dimes">+128</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+130</Casino>\r<Casino ClientID="104" Name="BOVADA">+132</Casino>\r<Casino ClientID="121" Name="Mirage">+125</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+129</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">8u</Casino>\r<Casino ClientID="111" Name="Sports Interaction">8p</Casino>\r<Casino ClientID="104" Name="BOVADA">8u</Casino>\r<Casino ClientID="121" Name="Mirage">8.5u</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">8u</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40284</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>04:10 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>005</AwayTeamID>\r<AwayRotationNumber>963</AwayRotationNumber>\r<AwayAbbr>LOS</AwayAbbr>\r<AwayTeamName>Los Angeles</AwayTeamName>\r<AStarter ID="20156">H.Ryu</AStarter>\r<Casino ClientID="116" Name="5Dimes">-141</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-155</Casino>\r<Casino ClientID="104" Name="BOVADA">-150</Casino>\r<Casino ClientID="121" Name="Mirage">-150</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-142</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>010</HomeTeamID>\r<HomeRotationNumber>964</HomeRotationNumber>\r<HomeAbbr>SDP</HomeAbbr>\r<HomeTeamName>San Diego</HomeTeamName>\r<HStarter ID="15148">E.Stults</HStarter>\r<Casino ClientID="116" Name="5Dimes">+131</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+135</Casino>\r<Casino ClientID="104" Name="BOVADA">+135</Casino>\r<Casino ClientID="121" Name="Mirage">+130</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+132</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">7u</Casino>\r<Casino ClientID="111" Name="Sports Interaction">7u</Casino>\r<Casino ClientID="104" Name="BOVADA">7u</Casino>\r<Casino ClientID="121" Name="Mirage">7p</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">7u</Casino>\r</Over_Under>\r</Game>\r<League_Name>American League</League_Name>\r<Notes>Time change</Notes>\r<Game>\r<GameID>40272</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>02:05 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>027</AwayTeamID>\r<AwayRotationNumber>965</AwayRotationNumber>\r<AwayAbbr>BAL</AwayAbbr>\r<AwayTeamName>Baltimore</AwayTeamName>\r<AStarter ID="19361">C.Tillman</AStarter>\r<Casino ClientID="116" Name="5Dimes">+190</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+195</Casino>\r<Casino ClientID="104" Name="BOVADA">+190</Casino>\r<Casino ClientID="121" Name="Mirage">+170</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+190</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>036</HomeTeamID>\r<HomeRotationNumber>966</HomeRotationNumber>\r<HomeAbbr>NYY</HomeAbbr>\r<HomeTeamName>NY Yankees</HomeTeamName>\r<HStarter ID="20129">M.Tanaka</HStarter>\r<Casino ClientID="116" Name="5Dimes">-210</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-245</Casino>\r<Casino ClientID="104" Name="BOVADA">-220</Casino>\r<Casino ClientID="121" Name="Mirage">-200</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-210</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">7.5o</Casino>\r<Casino ClientID="111" Name="Sports Interaction">7.5u</Casino>\r<Casino ClientID="104" Name="BOVADA">7.5u</Casino>\r<Casino ClientID="121" Name="Mirage">7.5o</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">7.5p</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40274</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>01:05 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>032</AwayTeamID>\r<AwayRotationNumber>967</AwayRotationNumber>\r<AwayAbbr>DET</AwayAbbr>\r<AwayTeamName>Detroit</AwayTeamName>\r<AStarter ID="19344">M.Scherzer</AStarter>\r<Casino ClientID="116" Name="5Dimes">-110</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-135</Casino>\r<Casino ClientID="104" Name="BOVADA">-117</Casino>\r<Casino ClientID="121" Name="Mirage">-120</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-111</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>031</HomeTeamID>\r<HomeRotationNumber>968</HomeRotationNumber>\r<HomeAbbr>CLE</HomeAbbr>\r<HomeTeamName>Cleveland</HomeTeamName>\r<HStarter ID="21127">J.Tomlin</HStarter>\r<Casino ClientID="116" Name="5Dimes">even</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+110</Casino>\r<Casino ClientID="104" Name="BOVADA">+107</Casino>\r<Casino ClientID="121" Name="Mirage">even</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+101</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">8u</Casino>\r<Casino ClientID="111" Name="Sports Interaction">8u</Casino>\r<Casino ClientID="104" Name="BOVADA">8u</Casino>\r<Casino ClientID="121" Name="Mirage">8u</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">8u</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40273</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>01:40 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>004</AwayTeamID>\r<AwayRotationNumber>969</AwayRotationNumber>\r<AwayAbbr>HOU</AwayAbbr>\r<AwayTeamName>Houston</AwayTeamName>\r<AStarter ID="22524">D.Keuchel</AStarter>\r<Casino ClientID="116" Name="5Dimes">+112</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+110</Casino>\r<Casino ClientID="104" Name="BOVADA">+108</Casino>\r<Casino ClientID="121" Name="Mirage">even</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+109</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>056</HomeTeamID>\r<HomeRotationNumber>970</HomeRotationNumber>\r<HomeAbbr>TAM</HomeAbbr>\r<HomeTeamName>Tampa Bay</HomeTeamName>\r<HStarter ID="6080">E.Bedard</HStarter>\r<Casino ClientID="116" Name="5Dimes">-122</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-130</Casino>\r<Casino ClientID="104" Name="BOVADA">-118</Casino>\r<Casino ClientID="121" Name="Mirage">-120</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-119</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">7.5u</Casino>\r<Casino ClientID="111" Name="Sports Interaction">7o</Casino>\r<Casino ClientID="104" Name="BOVADA">7.5u</Casino>\r<Casino ClientID="121" Name="Mirage">7.5u</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">7.5u</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40276</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>02:10 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>038</AwayTeamID>\r<AwayRotationNumber>971</AwayRotationNumber>\r<AwayAbbr>SEA</AwayAbbr>\r<AwayTeamName>Seattle</AwayTeamName>\r<AStarter ID="23311">R.Elias</AStarter>\r<Casino ClientID="116" Name="5Dimes">+130</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+135</Casino>\r<Casino ClientID="104" Name="BOVADA">+140</Casino>\r<Casino ClientID="121" Name="Mirage">+135</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+140</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>033</HomeTeamID>\r<HomeRotationNumber>972</HomeRotationNumber>\r<HomeAbbr>KAN</HomeAbbr>\r<HomeTeamName>Kansas City</HomeTeamName>\r<HStarter ID="22609">Y.Ventura</HStarter>\r<Casino ClientID="116" Name="5Dimes">-140</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-160</Casino>\r<Casino ClientID="104" Name="BOVADA">-155</Casino>\r<Casino ClientID="121" Name="Mirage">-155</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-150</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">8p</Casino>\r<Casino ClientID="111" Name="Sports Interaction">8p</Casino>\r<Casino ClientID="104" Name="BOVADA">8p</Casino>\r<Casino ClientID="121" Name="Mirage">8o</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">8o</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40275</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>02:10 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>030</AwayTeamID>\r<AwayRotationNumber>973</AwayRotationNumber>\r<AwayAbbr>CWS</AwayAbbr>\r<AwayTeamName>Chicago WSox</AwayTeamName>\r<AStarter ID="9327">J.Danks</AStarter>\r<Casino ClientID="116" Name="5Dimes">+132</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+130</Casino>\r<Casino ClientID="104" Name="BOVADA">+135</Casino>\r<Casino ClientID="121" Name="Mirage">+120</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+130</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>035</HomeTeamID>\r<HomeRotationNumber>974</HomeRotationNumber>\r<HomeAbbr>MIN</HomeAbbr>\r<HomeTeamName>Minnesota</HomeTeamName>\r<HStarter ID="18209">P.Hughes</HStarter>\r<Casino ClientID="116" Name="5Dimes">-142</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-150</Casino>\r<Casino ClientID="104" Name="BOVADA">-150</Casino>\r<Casino ClientID="121" Name="Mirage">-140</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-145</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">8o</Casino>\r<Casino ClientID="111" Name="Sports Interaction">8o</Casino>\r<Casino ClientID="104" Name="BOVADA">8o</Casino>\r<Casino ClientID="121" Name="Mirage">8o</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">8o</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40277</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>04:05 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>028</AwayTeamID>\r<AwayRotationNumber>975</AwayRotationNumber>\r<AwayAbbr>BOS</AwayAbbr>\r<AwayTeamName>Boston</AwayTeamName>\r<AStarter ID="12291">J.Lester</AStarter>\r<Casino ClientID="116" Name="5Dimes">+113</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-110</Casino>\r<Casino ClientID="104" Name="BOVADA">+108</Casino>\r<Casino ClientID="121" Name="Mirage">+105</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+111</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>037</HomeTeamID>\r<HomeRotationNumber>976</HomeRotationNumber>\r<HomeAbbr>OAK</HomeAbbr>\r<HomeTeamName>Oakland</HomeTeamName>\r<HStarter ID="19833">T.Milone</HStarter>\r<Casino ClientID="116" Name="5Dimes">-123</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-110</Casino>\r<Casino ClientID="104" Name="BOVADA">-118</Casino>\r<Casino ClientID="121" Name="Mirage">-125</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-121</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">7.5u</Casino>\r<Casino ClientID="111" Name="Sports Interaction">7.5u</Casino>\r<Casino ClientID="104" Name="BOVADA">7.5u</Casino>\r<Casino ClientID="121" Name="Mirage">7.5u</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">7.5u</Casino>\r</Over_Under>\r</Game>\r<Game>\r<GameID>40278</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>08:07 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>039</AwayTeamID>\r<AwayRotationNumber>977</AwayRotationNumber>\r<AwayAbbr>TEX</AwayAbbr>\r<AwayTeamName>Texas</AwayTeamName>\r<AStarter ID="20121">Y.Darvish</AStarter>\r<Casino ClientID="116" Name="5Dimes">-120</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-120</Casino>\r<Casino ClientID="104" Name="BOVADA">-120</Casino>\r<Casino ClientID="121" Name="Mirage">-120</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-119</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>029</HomeTeamID>\r<HomeRotationNumber>978</HomeRotationNumber>\r<HomeAbbr>ANA</HomeAbbr>\r<HomeTeamName>LA Angels</HomeTeamName>\r<HStarter ID="21878">M.Shoemaker</HStarter>\r<Casino ClientID="116" Name="5Dimes">+110</Casino>\r<Casino ClientID="111" Name="Sports Interaction">even</Casino>\r<Casino ClientID="104" Name="BOVADA">+110</Casino>\r<Casino ClientID="121" Name="Mirage">even</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+109</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">7.5u</Casino>\r<Casino ClientID="111" Name="Sports Interaction">7.5u</Casino>\r<Casino ClientID="104" Name="BOVADA">7.5u</Casino>\r<Casino ClientID="121" Name="Mirage">7.5u</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">7.5u</Casino>\r</Over_Under>\r</Game>\r<League_Name>Inter League</League_Name>\r<Game>\r<GameID>40282</GameID>\r<Game_Date>06/22/2014</Game_Date>\r<Game_Time>01:10 PM</Game_Time>\r<AwayTeam>\r<AwayTeamID>040</AwayTeamID>\r<AwayRotationNumber>979</AwayRotationNumber>\r<AwayAbbr>TOR</AwayAbbr>\r<AwayTeamName>Toronto</AwayTeamName>\r<AStarter ID="5776">R.Dickey</AStarter>\r<Casino ClientID="116" Name="5Dimes">+132</Casino>\r<Casino ClientID="111" Name="Sports Interaction">+115</Casino>\r<Casino ClientID="104" Name="BOVADA">+132</Casino>\r<Casino ClientID="121" Name="Mirage">+130</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">+132</Casino>\r</AwayTeam>\r<HomeTeam>\r<HomeTeamID>003</HomeTeamID>\r<HomeRotationNumber>980</HomeRotationNumber>\r<HomeAbbr>CIN</HomeAbbr>\r<HomeTeamName>Cincinnati</HomeTeamName>\r<HStarter ID="19385">J.Cueto</HStarter>\r<Casino ClientID="116" Name="5Dimes">-142</Casino>\r<Casino ClientID="111" Name="Sports Interaction">-135</Casino>\r<Casino ClientID="104" Name="BOVADA">-142</Casino>\r<Casino ClientID="121" Name="Mirage">-150</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">-142</Casino>\r</HomeTeam>\r<Over_Under>\r<Casino ClientID="116" Name="5Dimes">7.5o</Casino>\r<Casino ClientID="111" Name="Sports Interaction">7.5o</Casino>\r<Casino ClientID="104" Name="BOVADA">7.5o</Casino>\r<Casino ClientID="121" Name="Mirage">7.5p</Casino>\r<Casino ClientID="127" Name="DonBest Consensus">7.5o</Casino>\r</Over_Under>\r</Game>\r<time_stamp> June 22, 2014, at 12:27 PM ET </time_stamp>\r</message>\r
\ No newline at end of file