I am attempting to run a MySQL procedure as follows:

Rst1.Open "Call pr_Test ( )", Conn1
If Rst1.EOF Then
MsgBox "No lines exist for this Selection", vbOKOnly, "Load Error"
Conn1.Close
Set Conn1 = Nothing
Exit Function
End If
Sheets(sht).Range("A3").CopyFromRecordset Rst1

It all works fine, except that the DEFINITION and PARAM_LIST columns only output the values for the 1st row. When I run the procedure in MySQL, it displays everything correctly. I'm thinking it has something to do with 'blob' columns, as both these columns are defined as blob, which is why I attempted to use CAST and Convert.

pr_Test Stored Procedure:
BEGIN
SELECT
S1.ROUTINE_SCHEMA,
S1.ROUTINE_NAME,
S1.ROUTINE_TYPE,
Cast(S1.ROUTINE_DEFINITION As CHAR) As 'DEFINITION',
Convert(P1.param_list Using LATIN1) As 'PARAM_LIST'
FROM Information_Schema.ROUTINES S1
LEFT OUTER JOIN Mysql.proc P1 ON S1.ROUTINE_NAME = P1.name
WHERE S1.ROUTINE_SCHEMA = 'TestDB';
END

Help would be appreciated.