VBA Не найдено имя аргумента для процедуры PL/SQL

strCon = "Provider=MSDAORA.1; Data Source=test; User ID=test; Password=test"
     Set oCMD = CreateObject("ADODB.Command")
     Set oCon = CreateObject("ADODB.Connection")
     Set oRS = CreateObject("ADODB.Recordset")
     oCon.Open strCon

     oCMD.ActiveConnection = oCon
          
     oCMD.CommandText = "{call tctdbs.test.CheckConnection(?,?,{resultset 0, aResult})}"
     oCMD.Parameters.Refresh
     oCMD.Parameters("aDateFrom").Value = "111"
     oCMD.Parameters("aDateTo").Value = "222"
     Set oRS = oCMD.Execute
     
     y = 2
     While Not oRS.EOF
        Cells(y, 1).Value = oRS("DAT")
        Cells(y, 2).Value = oRS("DT")
        Cells(y, 3).Value = oRS("TXT")
        y = y + 1
        oRS.MoveNext
     Wend
     oCon.Close