OK.

I'm toying with F# as language for CLRs for Sql Server. It's not to well documented :D so I'm experimenting, especially as I'm new to F#. I used to be quite proficient with OCaml, though, and the languages seems pretty similar.

Now.

I'm trying to create table-valued function in F# for SQL server that's manipulating XML (weird scenario - I know o_O).

The function in question is quite simple:

1
2
3
4
5
6
7
8
9
10
11

let xml_fetch_all (path: SqlString, xml: SqlXml) =
    let x = XmlDocument ()
    x.InnerXml <- "<root></root>"

    x.DocumentElement.InnerXml <- xml.Value
    let n = x.SelectNodes("/root"+path.Value)    
    let m = Array.create n.Count null
    for i=1 to n.Count do 
        begin m.[ i ] <- SqlXml( new XmlNodeReader(n.Item(i))) end    
    let e = m.GetEnumerator()
    e

the idea is to select all nodes matchind the path argument from the xml argument and return them as the table. Simple.

Then I create assembly on the server. Works. In the assembly there is scalar function which attaches just fine. Cool.

Then:

1
2
3
4
5
6
7
8
9

CREATE FUNCTION xml_fetch_all(
	@path nvarchar(max),
	@xml xml
)

RETURNS TABLE (
	id int,
   [x] xml
)

AS external name fs.Module1.xml_fetch_all

and:

Msg 6507, Level 16, State 2, Procedure xml_fetch_all, Line 1

Failed to open malformed assembly 'mscorlib' with HRESULT 0x80070008.

Blah. No idea what's happening and my google-fu is possible not good enough (or I'm to much of a noob in the .NET area to understand replies).

Any help I will appreciate.