Auto populate a field from another source

[gbullo]

Access 2003

Hello,

I need help in having a field automatically populated with a value from another field from the same form and same record.

I have created an input form for adding a new record and when the first entry is made into an empty text box or selection from a combo box is made, the record is created and the record number shows up. This is working great.
Form name = FrmAssignMRR1
Record source (table) = MRR Table
Field name = text145 (this is the autonumber or record number)

What I need is the value from text145 to automatically populate into another field on the same form rather than type it in manually.
Record source (table) = MRR Table
Field name = MRR_NO

I'm basically repeating the autonumber in another field in the same table.
Field names and properties of the MRR Table;
MRR NO ID (autonumber & Primary Key)


MRR NO (number)
Date (date)
many more

It's a design flaw but I'm not going to change it at this point. The life of the database will expire in another 5 months.

Is there a simple way to have my field (MRR NO) automaticly populate with the same value as the autonumber at the same time?

Thanks in advance for any help,

George

[NoellaG]

Hi,
just put in the afterUpdate event of the field text145:

me.MRR_NO = me.text145

gr
NG

[gbullo]

Digg,

I just tried it again and nothing happens. No errors or results.
I put this exact phrase directly in the "after update" properties of field Text145

me.MRR_NO = me.text145

[NoellaG]

Hi,

the property of the field should be set to event procedure (there's a drop down) and then the line I posted is the code that goes into that procedure.

gr
NG

[gbullo]

I placed it in the event procedure.

Private Sub Text145_AfterUpdate()
Me.MRR_NO = Me.Text145
End Sub

Same results. Nothing happens.

I wonder if the value in text145 isn't really saved or updated yet? That would explain why the after update isn't working. The record is still not saved at that point?

just thinking out loud of reason why the code isn't working

[NoellaG]

normally the code should be performed after you changed the value of text145 and then tabbed out of the field, regardless if the record is saved or not. Maybe set a waypoint and watch what happens?

[gbullo]

Text145 never has focus. When the form opens, this field is sitting there with with "(AutoNumber)" in the text box. Then the moment I start to type or make a selection to any of the other fields, then Text145 shows the next sequencial number instead of the word "(Autonumber)". It's really just showing the append next record at the end of the table until the record is started. That is what I meant by the record not being saved yet. The pencil (so to speak) is still showing on the record line at the time I want my other field to auto populate. It may not recognize that Text145 has a value yet.

Once again, just grasping at straws. i really do not know the answers.

Also, what do you mean by Waypoint? I'm not familiar with that term.

[pbaldy]

You can force a save with

If Me.Dirty Then Me.Dirty = False

or

DoCmd.RunCommand acCmdSaveRecord

[gbullo]

Would I place either of those in the before update or On dirty as a procedure in Text145?

[pbaldy]

Sorry, now that I read more closely, I'd go a different way. Try your code:

Me.MRR_NO = Me.Text145

in the after update event of the form rather than the textbox (that event will never fire).

[vitols]

Access 2003

Hello,

I need help in having a field automatically populated with a value from another field from the same form and same record.

I have created an input form for adding a new record and when the first entry is made into an empty text box or selection from a combo box is made, the record is created and the record number shows up. This is working great.
Form name = FrmAssignMRR1
Record source (table) = MRR Table
Field name = text145 (this is the autonumber or record number)

What I need is the value from text145 to automatically populate into another field on the same form rather than type it in manually.
Record source (table) = MRR Table
Field name = MRR_NO

I'm basically repeating the autonumber in another field in the same table.
Field names and properties of the MRR Table;
MRR NO ID (autonumber & Primary Key)
MRR NO (number)
Date (date)
many more

It's a design flaw but I'm not going to change it at this point. The life of the database will expire in another 5 months.

Is there a simple way to have my field (MRR NO) automaticly populate with the same value as the autonumber at the same time?

Thanks in advance for any help,

George

----------------------------
Hi George


Checkout RaiseEvent

Vitols

[gbullo]

That seemed to do the trick and populated the MRR_NO field but I had to put a requry command on the after update of a different control to force the save but now it has caused another problem.

When I try to get out of the form, I get a message telling me I cant save the data and if i continue to close, i may lose the data that was just entered.

I've tested it and no data is lost but every time I try to close the form, I get the message.

I think by forcing the record to save before it's complete just to get the MRR_NO field to auto populate, it thinks the record has already been saved and there is possibly a conflict.

Suggestions?

[vitols]

Hi George

Try

Forms("frmAnother").Controls("txtControl_1") = lngNumber

quicker

Vitols

[gbullo]

Vitols,

I'm not sure I follow you. Where would this code be placed and what exactly does it do? If I am trying to populate a text box named "MRR NO" with the value from the auto number field named "text145" would your code read as follows?

Forms(text145).controls(MRR NO)=lngNumber

If this is correct, where would this be placed and what would the result be?

[vitols]

Vitols,

I'm not sure I follow you. Where would this code be placed and what exactly does it do? If I am trying to populate a text box named "MRR NO" with the value from the auto number field named "text145" would your code read as follows?

Forms(text145).controls(MRR NO)=lngNumber

If this is correct, where would this be placed and what would the result be?

Hi George

Try

Data flow is like water, it goes from the source to the sink.

Forms("frmAnother").Controls("txtControl_1") = lngNumber

Forms & Controls is VBA syntax.
frmAnother is another form e.g your sink form.
txtControl_1 is a textbox on the sink form.
lngNumber ist the value which the textbox on the sink form receives.
Call this code with a after update on your source form.


p.s
"text145" means sweet nothing.
txtCustomerId means its a textbox containing the CustomerId.

Vitols