[AccessD] (no subject)

Rocky,

If there is an autonumber field in the table, try to open the table and
add a record manually.  Does the autonumber field try to use a value
that is already in the table?  I have seen this happen a few times.  The
solution is to reset the initial value for the autonumber field to be
one greater than the highest value already in use.

Joe O'Connell

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Rocky Smolin
Sent: Monday, December 14, 2009 2:47 PM
To: 'Access Developers discussion and problem solving'
Subject: [AccessD] (no subject)

Dear List:

 

I am getting an error 3022 - "changes you requested were not successful
because they would product duplicate values..." etc. when the following
code
gets to the .Update line.

Dim rstCOCITemp As DAO.Recordset

'add to check-out/check-in table the number of times it's in quantity

Set rstCOCITemp = db.OpenRecordset("Select * FROM tblCheckOutCheckIn")
With rstCOCITemp
    
    .AddNew
    !fldCOCIRADID = argRADID
    !fldCOCIInventoryID = argPackageID
    !fldCOCIInventoryItemID = Null
    !fldCOCICheckOut = Null
    !fldCOCICheckIn = Null
    .Update


fldCOCIRADID, fldCOCIInventoryID, fldCOCIInventoryItemID, are all
indexed,
duplicates OK, default value zero.  db is set to Currentdb.

Any ideas why this chunk of code should generate an error 3022?

MTIA

 

Rocky Smolin

Beach Access Software

858-259-4334

www.e-z-mrp.com <http://www.e-z-mrp.com/> 

www.bchacc.com <http://www.bchacc.com/>