anchor.diff:          let connectionStringOrName : string = unbox parameters.[0] 
           let resultType : ResultType = unbox parameters.[1] 
           let configFile : string = unbox parameters.[2] 
  -        let dataDirectory : string = unbox parameters.[3] 
   
           let resolutionFolder = config.ResolutionFolder
   
  
positive.code:                 ProvidedStaticParameter("ConnectionStringOrName", typeof<string>) 
                  ProvidedStaticParameter("ResultType", typeof<ResultType>, ResultType.Tuples) 
                  ProvidedStaticParameter("ConfigFile", typeof<string>, "") 
                  ProvidedStaticParameter("DataDirectory", typeof<string>, "") 
              ],             
              instantiationFunction = this.CreateType
          )
  
negative.code:                                     if byName then Configuration.GetConnectionStringRunTimeByName(value)
                                      else designTimeConnectionString
                          
                                  let this = new SqlCommand(twoPartsName, new SqlConnection(runTimeConnectionString)) 
                                  this.CommandType <- CommandType.StoredProcedure
                                  let xs = %%Expr.NewArray( typeof<SqlParameter>, parameters |> List.map QuotationsFactory.ToSqlParam)
  