anchor.diff:                  let p = (this :> ISqlProvider).CreateCommandParameter(QueryParameter.Create("@id",0),pkValue)
   
                   cmd.Parameters.Add(p) |> ignore
  -                ~~(sprintf "DELETE FROM %s WHERE %s = @id" (entity.Table.FullName.Replace("[","\"").Replace("]","\"")) pk )
  +                ~~(sprintf "DELETE FROM \"%s\".\"%s\" WHERE %s = @id" entity.Table.Schema entity.Table.Name pk )
                   cmd.CommandText <- sb.ToString()
                   cmd
   
  
positive.code:                 
                  let pkParam = (this :> ISqlProvider).CreateCommandParameter(QueryParameter.Create("@pk",0),pkValue)
  
                  ~~(sprintf "UPDATE %s SET %s WHERE %s = @pk;" 
                      (entity.Table.FullName.Replace("[","\"").Replace("]","\""))
                      (String.Join(",", data |> Array.map(fun (c,p) -> sprintf "%s = %s" c p.ParameterName ) ))
                      pk)
  
  
negative.code:         /// Have not attempted stored procs yet
          member __.GetSprocs(con) = Sql.connect con PostgreSQL.getSprocs 
  
          member this.GetIndividualsQueryText(table,amount) = sprintf "SELECT * FROM \"%s\".\"%s\" LIMIT %i;" table.Schema table.Name amount 
  
          member this.GetIndividualQueryText(table,column) = sprintf "SELECT * FROM \"%s\".\"%s\" WHERE \"%s\".\"%s\".\"%s\" = @id" table.Schema table.Name table.Schema table.Name  column
  
  