VFP problem: I do not know where the problem is, I also hope that seniors can advise!

lishuai66

Good evening, everybody:
    Book table TSB, which has a "coding" field as the main index, and establishes a relationship with other tables. The purpose is to enter data in the text fields of the fields of the form, click the "Add" button, add records to the TSB table, create a new form Form1, and use the quick form to add the fields of the TSB table to the form In Form1, the following program is added to the Init event of Form1:
Go Bottom
bmz = Val (encoding) +1
Append
Insert Into TSB (Code) Values ​​(Str (bmz))
Why do I get an "index encoding is not unique" error when I submit a form?
----
Also please enlighten me, thank you!

holley520

Insert Into TSB (Code) Values ​​(alltrim (Str (bmz)))

170385215

CALCULATE MAX (val (encoding)) TO lnMaxbm
insert into tsb (encoded) Values ​​(transform (lnMaxbm))