Hi all, I'm getting the following error:

Value of type 'System.collections.Arraylist' cannot be converted to 'SPC.Modules.IRISCreativeServices.T_CSJobCodesInfo'

The error occurs on the 2nd line below:

Dim IRISJobCodeCtrl As New T_CSJobCodesController

I have another similar object that works just find and have compared the two and can't see any difference.  I've listed the components below, can someone please shed some light on this?

From the Dataprovider:
Public MustOverride Function T_CSJobCodesGetAll(ByVal ModID As Integer) As IDataReader

From the SQLDataProvider:
Public Overrides Function T_CSJobCodesGetAll(ByVal ModID As Integer) As IDataReader
 Return CType(SqlHelper.ExecuteReader(ConnectionString, DatabaseOwner & ObjectQualifier & "spCSJobCodesGetAll", ModID), IDataReader)
End Function

From the Info class:
    Public Class T_CSJobCodesInfo
        ' Entity member variables for database table T_CSJobCodes
        Private mJobCodesID As Integer
        Private mJobCode As String
        Private mModuleID As Integer

        ' Calculated Expression member variables for database table T_CSJobCodes

        ' Entity properties for database table T_CSJobCodes
        Public Property JobCodesID() As Integer
            Get
                Return mJobCodesID
            End Get
            Set(ByVal Value As Integer)
                mJobCodesID = Value
            End Set
        End Property

        Public Property JobCode() As String
            Get
                Return mJobCode
            End Get
            Set(ByVal Value As String)
                mJobCode = Value
            End Set
        End Property
        Public Property ModuleID() As Integer
            Get
                Return mModuleID
            End Get
            Set(ByVal Value As Integer)
                mModuleID = Value
            End Set

From the Controller:
        Public Function GetAll(ByVal ModID As Integer) As ArrayList
            Dim infoList As ArrayList = Nothing
            Dim idr As IDataReader = Nothing
            Try
                idr = DataProvider.Instance().T_CSJobCodesGetAll(ModID)
                infoList = CBO.FillCollection(idr, GetType(T_CSJobCodesInfo))
            Finally
                If Not idr Is Nothing Then
                    idr.Close()
                    idr.Dispose()
                    idr = Nothing
                End If
            End Try
            Return infoList
        End Function

Stored Procedure:
CREATE PROCEDURE [IRIS_User].[DNN_spCSJobCodesGetAll]
  @ModID int
 AS
 SET NOCOUNT ON
 SELECT JobCodesID,JobCode,ModuleID FROM IRIS_User.DNN_T_CSJobCodes WHERE ModuleID=@ModID