daily packing number - again

[gbb0330]

hi guys -the code (all capital letters) generates daily packing number,
it is in the on click event of a command button that moves to the next
record.

dpkn is unbound control - i use it to display the last daily packing
number genrated, so when the user moves to a new control they will know
what the last daily packing number was.

PdailyPackingNu mber is bound and is 0 until the user clicks the button.

Private Sub CBfrmPackingSub Packed_Click()
On Error GoTo Err_CBfrmPackin gSubPacked_Clic k

Dim x As Byte
X = NZ(DPKN, 0) + 1

If Nz(Plenght, 0) = 0 Or Nz(Pwidth, 0) = 0 Or Nz(Phight, 0) = 0 Or
Nz(Pweight, 0) = 0 Then
MsgBox "You Must Enter All Package Dimensions in Order to Continue",
vbOKOnly
Plenght.SetFocu s
Else
Packed = True
PDAILYPACKINGNU MBER = x
DPKN = PDAILYPACKINGNU MBER
End If
DoCmd.GoToRecor d , , acNext
PdailyPackingNu mber.Requery

Exit_CBfrmPacki ngSubPacked_Cli ck:
Exit Sub

Err_CBfrmPackin gSubPacked_Clic k:
MsgBox Err.Description
Resume Exit_CBfrmPacki ngSubPacked_Cli ck

End Sub

everything works great until i exit the form - when i come back dpkn is
0
i know why this is hapening - what would the best way to fix this?
and is there a better way of doing what i have done so far?

also, is there a way to open a form and automatically go to the record
that was active when i closed the form?

thank you all for all your help

[pietlinden]

> everything works great until i exit the form - when i come back dpkn
is

0
i know why this is hapening - what would the best way to fix this?
and is there a better way of doing what i have done so far?

also, is there a way to open a form and automatically go to the record that was active when i closed the form?

thank you all for all your help

You have to write the last packing number somewhere and retrieve it or
read the last packing number from the current day from a table. Then
you can increment that. Use the old DMAX(Numberfiel d)+1 trick

Hmm... go to the record that was last active... that's harder. Write
it into the form's filter when you exit the form? Or write it to a
hidden table and read it when you reopen the form.