Printing only one Invoice

[Chris A]

Hello:
I am having some difficulty printing out only one invoice.

I have a Projects Form (Proj.set)and within this form I have a Browse field (Invoice_Head). Invoice_Head is the many on the one-to-many link as you can have many invoices on one project. I also have a browse field (Invoice_Items) that is the many on a one-to-many linked to the Invoice_Head). You can have many items attached to one invoice.

The desired affect would be to highlight the Invoice in the browse field that I would like to print and press a button to spit out the report.

Currently I highlight the Invoice in the browse field that I would like to print and press a button and I get all the invoices.

Is there some action scripting that would help me? If not are there any examples of xbasic that someone has already written I can copy and modify?

[Chris A]

RE: Printing only one Invoice

Here is a screen shot of the above message.

[crimmelcp]

RE: Printing only one Invoice

You might try adding a variable to the form
for example
dim global vinvoice as n
(assuming that invoice number is defined as numeric)
if it is defined as character then
dim global vinvoice as c

On the browse on row change put
var-"vinoice=your field name
example
var-"vinvoice=invoiceno

Then add a filter in the report to only print when the invoice number = var-"vinvoice

Charlie Crimmel

[Keith Hubert]

RE: Printing only one Invoice

Cris,

Another way of doing it is to look at the example in AlphaSports Invoice. There is a button there named Print this Invoice. It is a built in Action Script, so if you follow the genie you cant go wrong.

Regards

Keith Hubert

Guild Member
London.

[Dan Blank]

RE: Printing only one Invoice

Hi,

The best way is to use the genie. There is one place where you can tell it to print out a field from the form where it will match a field on the report. Based on your set up I would use the invoice number field.

Then only the invoice with the current invoice number will print.

Dan

[Chris A]

RE: Printing only one Invoice

Maybe I am doing something else wrong. The Alpha Sports Action Script button is the same as mine. I did change my report to have a group break like they did, but I don't want to print all the invoices. This is the first time however that I did see both invoices A and B broken out with the Invoice_Items attached to the right spots.

Any other ideas that I could try?

[Chris A]

RE: Printing only one Invoice

I see what your talking about, but have been unable to get anything to work yet.

Any other ideas that I might be able to try?

[Dan Blank]

RE: Printing only one Invoice

The only other suggestion I can think of is to make a small example app of what you have done so far. Upload it to this board and let us look at it. We can probably help then.

Dan

[Chris A]

RE: Printing only one Invoice

I am beginning to think that my action scripting is fine because I can get it to work in xbasic various ways only to get the same result.

The detail properties section on my report has a spot for a filter expression for records. I am beginning to wonder if it is not working properly. The header is the same everytime I print, but all the line items are added in on the same report. On invoice A I have one item on invoice B I have two items. No matter what I do the header say's invoice A and lists all items for A and B.

Any Idea's on how I can get invoice A to list just the one item? Same with Invoice B to list just it's two items?

The filter expression looks like this:
Inv_Hd-"Inv_Link=current(Inv_Hd-"Inv_Link)

It currently works in the old and ancient Alpha 5 version 1

[Jeff, Richards]

RE: Printing only one Invoice

This works on my Invoice Program.
It is on a button on my order entry screen.
It runs the "print current order report".
It selects the order that matches the current record number on my order entry screen.

Dim current_record_number as N
current_record_number = current_record_number()

:Report.preview("print current order","recno() = " + current_record_number)

[Dan Blank]

RE: Printing only one Invoice

Hi,

I would try to remove the filter and try running the print again.

If it works like it should then you will know the filter is the problem.

Dan

[Chris A]

RE: Printing only one Invoice

Will this still work if it is a character? I realize that some of the code will change a little.

Dim current_record_character as c
current_record_character = current_record_character()

:Report.preview("print current order","recno() = " + current_record_character)

[Colin Roberts]

RE: Printing only one Invoice

Chris

Suggest you thoroughy check through the alphasports invoice report set design
It is grouped on invoice header with a group break on "Invoice number" This efectively is the filter. The detail section does not have a filter. This may be where you are going wrong.

[Chris A]

RE: Printing only one Invoice

I did look at this. It is so far the only way I have been able to split the two invoices. However Alphasports has one draw back. It prints all the invoices weather you want them or not.

I know there has got to be a way to print out a subheader with attached sub items seperate from each other.

Thanks for the thought, I will keep trying.

[Chris A]

RE: Printing only one Invoice

My version above did not work. The field that I am using is a character field. Thanks for the idea though.