Output binding to table storage with fsharp

I’m new to Azure Functions.

Any idea on how I can bind out to a Azure Storage Table with F#? I’m attempting to use ICollector (taken from C# example which works fine) but unfortunately it is not being recognised which I thought it would be as documented here - https://azure.microsoft.com/en-us/documentation/articles/functions-reference-csharp/. (Yes, I see that this is ref to C#)

Code:

open System
open System.IO

type Job = {
    PartitionKey :string; 
    RowKey: string; 
    Name :string
}

let inputPath = Environment.GetEnvironmentVariable("input")
let input = File.ReadAllText(inputPath)
let message = sprintf "F# script processed queue message '%s'" input
System.Console.Out.WriteLine(message)

let b = [{PartitionKey = "Key"; RowKey = Guid.NewGuid().ToString(); Name=input}]

let outputTable = new ICollector<Job>()
outputTable.Add(b)

With wanting to keep with F# as much as I possibly can with Azure Functions, if F# is yet to be fully supported, would you recommend a strategy of using C# for bindings and using F# for helper / supporting methods? Plus, are there any gotcha’s I need to know about?

Warmest regards,

Garrard.

[garrardkitchen]

Hi @mathewc, I finally got there!

#if !COMPILED
#I "../../bin/Binaries/WebJobs.Script.Host"
#r "Microsoft.Azure.WebJobs.Host.dll"
#endif
#r "Microsoft.WindowsAzure.Storage"
open  Microsoft.WindowsAzure.Storage.Table
open System
open Microsoft.Azure.WebJobs.Host;

type Job() =
    inherit TableEntity()    
    member val Name = "" with get, set


let Run (input: string, outputTable: ICollector<'Job>, log: TraceWriter) =  
    log.Info(sprintf "F# script processed queue message '%s'" input)

    let b = new Job() 
    b.PartitionKey <- "Key"
    b.RowKey <- Guid.NewGuid().ToString()
    b.Name <- input

    b |> outputTable.Add

Works as expected.

Thanks for all your help today. Very much appreciated.

Warmest regards,

Garrard.

[mathewc]

Awesome 😃 I don’t think you need the #if !COMPILED block though - that’s just for our local project.