anchor.diff:              [for r in con.GetSchema("DataTypes").Rows -> 
                   string r.["TypeName"],  unbox<int> r.["ProviderDbType"], string r.["DataType"]]
   
  -        // create map from sql name to clr type, and type to SqlDbType enum
  +        // create map from sql name to clr type, and type to lDbType enum
           let sqlToClr', sqlToEnum', clrToEnum' =
               clr
               |> List.choose( fun (tn,ev,dt) ->
  
positive.code:             match columnLookup.TryGetValue table.FullName with
              | (true,data) -> data
              | _ -> 
                 let baseQuery = @"SELECT c.COLUMN_NAME,c.DATA_TYPE, c.character_maximum_length, c.numeric_precision, c.is_nullable
                                                ,CASE WHEN pk.COLUMN_NAME IS NOT NULL THEN 'PRIMARY KEY' ELSE '' END AS KeyType
                                   FROM INFORMATION_SCHEMA.COLUMNS c
  
negative.code:                 let ty = Type.GetType dt
                  // we need to convert the sqldbtype enum value to dbtype.
                  // the sql param will do this for us but it might throw if not mapped -
                  // this is a bit hacky but I don't want to write a big conversion mapping right now
                  let p = SqlParameter()
                  try
                      p.SqlDbType <- enum<SqlDbType> ev
  