Print multiple codes

[Cristiano]

Hi Guys,
I need to modify some parts of my management software, and as you can see from the attached picture, my problem is for the invoice section. let me explain better , for the italia law, any customer can sell many products or services, and with different VAT codes (see the pictures in the red circle).

What I can't do is this : I need to print a report with the summary of VAT that are in the invoice, ( e.g. like the picture, 4 different vat , I need to print at bottom of my invoice a list for these 4 different VAT)

Do you have an idea how to make that ?

[GGandhi]

Re: Print multiple codes

hello
you might want to consider RTF. you can put a box and then select several if end if statements.
the reasoning for the above is, in one invoice certain VAT codes will be present in another different ones will be present.
so by selecting
if (codice IVA = 22) 22->blahblah end if followed by a soft return. because there is a soft return the blank line will be eliminated.
is my thinking seems right? ( I am hoping there are only few VAT codes, not hundreds)

[Stan Mathews]

Re: Print multiple codes

Do you just want a list of the vat codes or do you want codes and amounts? Or do you want a list of the codes and the total amount?

[Cristiano]

Re: Print multiple codes

Do you just want a list of the vat codes or do you want codes and amounts? Or do you want a list of the codes and the total amount?

Hi Stan,

for the italian law i need the total of amount for each VAT code ( e.g : VAT 4% total amount 25 - VAT 22% total amount 125 , and so o n until finished the detailed table for thar invoice number )

[Stan Mathews]

Re: Print multiple codes

I think you need a calculated field for each possible vat percentage. Each calculated field would use set.external_record_content_get() where the filter selected the current invoice and items with the desired vat. Then *TOTAL() to sum those.

I'll try to work up an example using AlphaSports.

On the AlphaSports invoice form or report based on the invoice set

a_ttl = "A total - "+alltrim(str(*total(set.external_record_content_get("invoice","invoice_items->extension","","Invoice_Number = "+quote(Invoice_Number)+" .and. left(Product->Description,1) = 'A'")),15,2))

gives a total of items on the currently viewed (or currently printing) invoice where the first letter of the product description is A. It appears like, A total - 2.35

One could create similar fields for B, C, D, etc.

These would then be placed in an rtf as suggested.

[Cristiano]

Re: Print multiple codes

Thank youstan , but Sorry what is RTF ? is Rich Text Format ? if yes how do I make it with Alpha Five ?

and then , this code you inserted in the calculated field in a invoice form ( from Alphasports)

[Stan Mathews]

Re: Print multiple codes

Yes, rich text format. You can drag-drop an rtf object on a form or report from the toolbox just as you would a plain text field. Once you have the object in place, right click and choose Insert, Expression. The expression would be a concatenation of your calculated fields.

[Stan Mathews]

Re: Print multiple codes

It's been suggested to me by someone who doesn't have time to get deep into this discussion that you might be able to do what you want with a sub report in a report footer if that is where you want the vat totals. Your screen shot is of a form but I'm not clear on your final intent.

The sub report would be based on the details table and grouped on the vat field.

[Cristiano]

Re: Print multiple codes

Ok Stan , understood,

Thanks for your help and suggestions

[Cristiano]

Re: Print multiple codes

Hi Stan,

sorry to disturb you, I made an is work :

iva_codes = set.external_record_content_get("invoice","invoice_items->iva","","invoice_number ="+quote(invoice_number))

But it's possible to use on a filter to have only the unique value from this result ? ? I tried to use : UNIQUE_KEY_VALUE() in the filter but do not work How I can filter the unique value for that calculated field ?




b.r

[Stan Mathews]

Re: Print multiple codes

iva_codes = set.external_record_content_get("invoice","invoice_items->iva","","invoice_number ="+quote(invoice_number)+" .and. unique_key_value()")

Or maybe you want

iva_codes = *remove_duplicates(set.external_record_content_get("invoice","invoice_items->iva","","invoice_number ="+quote(invoice_number)))

?





But I don't think that's what you want to do. If you obtain the unique vat codes in this way, how will you total the amounts?

[Cristiano]

Re: Print multiple codes

Hi STAN,

Yes, this is part of what I do, then I create another calculated field that makes the total of the respective VAT codes

in attach 2 picture of invoice that one of my competitors has made, If you see (footer_of_invoice.jpg) there are 3 words - "IMPONIBILE" ( this is the total of all the product purchased but the first is the total for VAT at 20% - "IVA " and "IMPOSTA" is the value of 20% of the "IMPONIBILE".


If there are more VAT CODES ,(for the italian law a shop can sell more articles with different VAT codes ) under these above mentioned will be inserted also the rest of the total of amounts


B.R.

[Ray in Capetown]

Re: Print multiple codes

The approach I would use on first encounter would be to parse the records,
the code below will parse the items and populate one variable for each vat category with the total of each.

Substitute your field names, I tested with a small table called INVLINES --- using fields names
TOTPR (numeric) for the line total and field
TAXPC (text) for the tax percent - the test table of 5 lines is attached for you to test
Using the table "INVLINES.DBF" run this code

TIN=TABLE.OPEN("INVLINES")
dim pc4 as n =0
dim pc7 as n =0
dim pc8 as n = 0
dim pc14 as n = 0
tin.fetch_first()
for i=1 to TIN.records_get()
  eval("pc"+TIN.taxpc)=eval("pc"+TIN.taxpc)+tin.totpr*val(tin.taxpc)/100
	tin.fetch_next()
next
tin.close()

and the results
?pc4 = 8.04
?pc7 = 0
?pc8 = 11.6
?pc14= 12.32

With a bit more time and real examples I suppose I would try a more elegant solution using collections possibly.
On a form or report four or five (or however many) calc-> . . = TOTAL( Expression , GRP – ) would be easy enough

[Cristiano]

Re: Print multiple codes

Hi Ray,


interesting your approach to the problem ... I want to try