A Microsoft Office (Excel, Word) forum. OfficeFrustration

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » OfficeFrustration forum » Microsoft Access » Database Design
Site Map Home Register Authors List Search Today's Posts Mark Forums Read  

invoice number



 
 
Thread Tools Display Modes
  #31  
Old June 13th, 2009, 12:23 AM posted to microsoft.public.access.tablesdbdesign
cjgav
external usenet poster
 
Posts: 54
Default invoice number

Hi
sorry about this when i try to run this i'm getting compile error invalid
character, _ is highlited

Regards



"Noëlla Gabriël" wrote:

Hi,

don't forget the last argument adLockPessimistic after the ",". In fact the
whole statement "rst.open" till "adLockPessimistic" is one statement. The
"_ " sign makes it possible to continue on the next line. The last argument
probably is put on a next line by the text editor of the newsgroup, but
should continue on the same line.
Tip: while typing the code, in a lot of cases, the VBA editor shows the
possible arguments.

--
Kind regards
Noëlla


"cjgav" wrote:

Hi,
That reference was already checked .
I've checked the table name and all the field names and I still receive a
syntax error in this line:
rst.Open "select inrLastUsed from tblInvoiceNumbers where inrType = """ & _
strType & """ and inrYear = " & Year(Date), cnn, adOpenKeyset,
Regards


  #32  
Old June 13th, 2009, 12:46 AM posted to microsoft.public.access.tablesdbdesign
John W. Vinson
external usenet poster
 
Posts: 18,261
Default invoice number

On Fri, 12 Jun 2009 16:23:01 -0700, cjgav
wrote:

sorry about this when i try to run this i'm getting compile error invalid
character, _ is highlited


Make sure there's a blank in front of it. The continuation signal is a blank
followed by an underscore followed immediately by a carriagereturn-linefeed.
--

John W. Vinson [MVP]
  #33  
Old June 17th, 2009, 12:47 AM posted to microsoft.public.access.tablesdbdesign
cjgav
external usenet poster
 
Posts: 54
Default invoice number

Hi Steve
I've set this up as far as I can see how you have advised.
When I update the date no number is generated in the table TblInovice if I
open vb the formula DMax("[InvoiceNumber]","TblInvoice") + 1
Is highlighted in red when I run compile I get a syntax error can you help?

regards
Colin

"Steve" wrote:

Notice in the formula that the table name is TblInvoice. Your table name
"Invoices" does not match. You need to change one or the other so both are
the same.

You also put the formula in the wrong place. Read my previous response
again. Add another field named "InvoiceDate" to your table. Build a form
with two fields based on TblInvoice. Select the InvoiceDate field, open
properties, go to the event tab, go to the AfterUpdate event and create a
subroutine. Put the formula in the subroutine.

Steve


"cjgav" wrote in message
...
Hi Steve

I think i'm been a bit stupid here

To test this I've setup a table (invoices) with 1 field (Invoicenumber)
I've entered the formula DMax("[InvoiceNumber]","TblInvoice") + 1 in an
event procedure on a form when I run this event I get a syntax error.
What am I doing wrong?

regards

"Steve" wrote:

Look again at Fred's response. Just as he says, you don't want to create
the
invoice number in the print event. Look again at my response. I suggest
you
create the invoice number in the AfterUpdate event of the InvoiceDate
field.

Steve


"cjgav" wrote in message
...
Hi Steve
Thanks for that not sure were to put the Dmax formula so it updates the
invoice number when I print also this number would need to be stored in
the
invoice table and not change .

"Steve" wrote:

Did you read my suggestion above?

Steve



"cjgav" wrote in message
...
Hi
My problem is I donot know how to generate a number without using
autonum
which is unsuitable .

"Fred" wrote:

Under my described thought process, you would create the record in
the
invoice table and create an invoice number at the time that the
invoice
event
occurred. The first printing would happen a few seconds AFTER that
process.
And later you could print extra copies of that invoice if needed.









  #34  
Old June 17th, 2009, 02:15 AM posted to microsoft.public.access.tablesdbdesign
John W. Vinson
external usenet poster
 
Posts: 18,261
Default invoice number

On Tue, 16 Jun 2009 16:47:01 -0700, cjgav
wrote:

Hi Steve
I've set this up as far as I can see how you have advised.
When I update the date no number is generated in the table TblInovice if I
open vb the formula DMax("[InvoiceNumber]","TblInvoice") + 1
Is highlighted in red when I run compile I get a syntax error can you help?


Please copy and paste (don't retype) the entire VBA procedure to a message
here.
--

John W. Vinson [MVP]
  #35  
Old June 17th, 2009, 11:41 AM posted to microsoft.public.access.tablesdbdesign
cjgav
external usenet poster
 
Posts: 54
Default invoice number

Hi john
This is it:
Private Sub DateCompleted_AfterUpdate()
DMax("[InvoiceNumber]","TblInvoice") + 1

End Sub
Regards
colin

"John W. Vinson" wrote:

On Tue, 16 Jun 2009 16:47:01 -0700, cjgav
wrote:

Hi Steve
I've set this up as far as I can see how you have advised.
When I update the date no number is generated in the table TblInovice if I
open vb the formula DMax("[InvoiceNumber]","TblInvoice") + 1
Is highlighted in red when I run compile I get a syntax error can you help?


Please copy and paste (don't retype) the entire VBA procedure to a message
here.
--

John W. Vinson [MVP]

  #36  
Old June 17th, 2009, 05:50 PM posted to microsoft.public.access.tablesdbdesign
John W. Vinson
external usenet poster
 
Posts: 18,261
Default invoice number

On Wed, 17 Jun 2009 03:41:01 -0700, cjgav
wrote:

Hi john
This is it:
Private Sub DateCompleted_AfterUpdate()
DMax("[InvoiceNumber]","TblInvoice") + 1


That's just part of it: try

Private Sub DateCompleted_AfterUpdate()
Me![InvoiceNumber] = DMax("[InvoiceNumber]", "tblInvoice") + 1
End Sub

will calculate the next number *and actually do something with it*.
--

John W. Vinson [MVP]
  #37  
Old June 17th, 2009, 10:01 PM posted to microsoft.public.access.tablesdbdesign
cjgav
external usenet poster
 
Posts: 54
Default invoice number

Hi John
Thanks very much that works fine.

Regards
Colin


"John W. Vinson" wrote:

On Wed, 17 Jun 2009 03:41:01 -0700, cjgav
wrote:

Hi john
This is it:
Private Sub DateCompleted_AfterUpdate()
DMax("[InvoiceNumber]","TblInvoice") + 1


That's just part of it: try

Private Sub DateCompleted_AfterUpdate()
Me![InvoiceNumber] = DMax("[InvoiceNumber]", "tblInvoice") + 1
End Sub

will calculate the next number *and actually do something with it*.
--

John W. Vinson [MVP]

 




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Forum Jump


All times are GMT +1. The time now is 12:22 AM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 OfficeFrustration.
The comments are property of their posters.