Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Order get messed up after append record
Message
De
19/09/2002 01:44:27
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Titre:
Order get messed up after append record
Divers
Thread ID:
00702123
Message ID:
00702123
Vues:
64
I have this combo box in my form that I'm having trouble
with when adding a new record. I am listing the following
to help clarify the picture:

1. In my table:
table1 fields: serial_id (primary key)
name (regular key)
acc_code (regular key)
... and some other fields.

2. data environment: buffer mode override = 1
order : serial_id

3. In my form:
All 3 fields are combo boxes. cbserial_id, cbname, cbacc_code,
rest of the fields are textboxes.

cbserial_id: control source: table1.serial_id
bound to: .T.
rowsource: table1.serial_id,name,acc_code
rowsource type: 6 - fields
select on entry: .T.
sorted: .F.

4. The add record method in the form is fired from a pulldown menu
in the form.

5. Codes in my add record method:
APPEND BLANK
REPLACE serial_id WITH ALLTRIM(sNo)
THISFORM.refresh
WITH THISFORM.pageFrame1
.ActivePage = 2
.page2.txtremarks.SETFOCUS()
ENDWITH

Now the problem:
The record pointer seems get messed up every time a record has
been added.
Symtoms:
a. In adding a record, after all the details have been filled in
and when the top button is pressed, the form shows the first
record with a blank serial_id. Sometimes the name is blank
instead.
b. When the table is at the last record and pressing the next button
again, instead of staying at the last rcord, it shows the second
last record in the table.
c. When traversing down the table from top to bottom, I can find the
newly added record. When going up from the bottom record by record,
i can't see the new record.

Some things had definitely been done wrong here and i just can't sort
it out. Setting buffer mode override to 3 wouldn't help. Setting
thisform.cbserial_no.value = sNo instead of using the REPLACE command
wouldn't either, There are a number of other things I've tried all to
no avail.

Help is much appreciated.
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform