Unusual Error

I have a property table and a details table. The PK for the property table is an autonumber. When I save a new record, I create the property table record first, then I save the detail record using a different recordset, assigning the PK in the details table recordset (SaveRSDetails) by referencing the PK in the first recordset (SaveRS). I can assign the PK value without problems. When I try to assign any other values to the new record in SaveRSDetails, I get the following message:
------------------------------------------------------------------------------------
Run-time error ?-2147217887 (80040e21)?:

Multiple-step operation generated errors. Check each status value.
-------------------------------------------------------------------------------------

The values are passed to my class module through properties and stored in the vntCompRecord array. Here is the code (with extraneous code removed for the sake of simplicity):

Public Function Save() As Boolean

Dim i As Integer
Dim j As Integer
Dim SaveRS As ADODB.Recordset
Dim SaveRSDetails As ADODB.Recordset

strSQL = "Actual Statement Omitted?
strSQLDetails = " Actual Statement Omitted "

Set SaveRS = New ADODB.Recordset
Set SaveRS = GetRecordSet(strSQL, True)
SaveRS.AddNew

For i = 1 To 13
SaveRS(i) = vntCompRecord(i)
Next i

SaveRS.Update

Set SaveRSDetails = New ADODB.Recordset
Set SaveRSDetails = GetRecordSet(strSQLDetails, True)
SaveRSDetails.AddNew
SaveRSDetails(0)= SaveRS(0)

j = 1

For i = 14 To 37
SaveRSDetails(j) = vntCompRecord(i)
j = j + 1
Next i

SaveRSDetails.Update
Save = True

End Function