Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 5ef8b310

Von Kivitendo Admin vor etwa 11 Jahren hinzugefügt

  • ID 5ef8b31028dada9eff3c317fe92c0a9b05ea41a4
  • Vorgänger 880122f8
  • Nachfolger e112111e

Neue Verkaufsberichtvariante mit Umsatz-Sortierung

Es gibt einen neuen Menüeintrag "Verkaufsbericht Top", wo man nach den
gleichen Kategorien wie beim normalen Verkaufsbericht gruppieren kann,
aber wo man das Ergebnis nach Umsatz, Marge, Menge oder Gewicht
vorsortieren kann, was beim Standardverkaufsbericht nicht möglich war.
Dadurch kann man sich z.B. eine nach Umsatz sortierte Liste der Kunden
für einen Zeitraum anzeigen lassen. Es wird weiterhin nur auf Daten aus
"invoice" zurückgegriffen.
Es wird bei dieser Variante auf den gleichen Code zurückgegriffen,
allerdings wurde aus Gründen der Übersicht ein neuer Menüpunkt
eingeführt, in Zukunft könnte man dies vielleicht mit eigenen Reitern
besser machen.

Unterschiede anzeigen:

SL/VK.pm
53 53 
  # default usage: always use parts.description for (sub-)totalling and in header and subheader lines
54 54 
  # but use invoice.description in article mode
55 55 
  # so we extract both versions in our query and later overwrite the description in article mode
56 
#    qq| , (SELECT sum(invoice.qty*invoice.sellprice/CASE WHEN price_factor IS NOT NULL THEN price_factor ELSE 1.0 END) FROM invoice where invoice.parts_id = i.parts_id) as "sellpricelinetotal2" | .
56 57 

  		




  57
  58
  
    
  my $query =


  		




  58
  
  
    
    qq|SELECT ct.id as customerid, ct.name as customername,ct.customernumber,ct.country,ar.invnumber,ar.id,ar.transdate,p.partnumber,p.description as description, pg.partsgroup,i.parts_id,i.qty,i.price_factor,i.discount,i.description as invoice_description,i.lastcost,i.sellprice,i.fxsellprice,i.marge_total,i.marge_percent,i.unit,b.description as business,e.name as employee,e2.name as salesman, to_char(ar.transdate,'Month') as month, to_char(ar.transdate, 'YYYYMM') as nummonth, p.unit as parts_unit, p.weight | .


  		




  
  59
  
    
    qq|SELECT ct.id as customerid, ct.name as customername,ct.customernumber,ct.country,ar.invnumber,ar.id,ar.transdate,p.partnumber,p.description as description, pg.partsgroup,i.parts_id,i.qty,i.price_factor,i.discount,i.description as invoice_description,i.lastcost,i.sellprice,i.fxsellprice,i.marge_total,i.marge_percent,i.unit,b.description as business,e.name as employee,e2.name as salesman, to_char(ar.transdate,'Month') as month, to_char(ar.transdate, 'YYYYMM') as nummonth, p.unit as parts_unit, p.weight |; 


  		




  
  60
  
    

  		




  
  61
  
    
  # debug modus for comparing linetotal according to database and perl


  		




  
  62
  
    
  $query .= qq| , (i.qty*i.sellprice/CASE WHEN price_factor IS NOT NULL THEN i.price_factor ELSE 1.0 END) as sellpricelinetotal | if $form->{"l_sellpricelinetotal"};  


  		




  
  63
  
    

  		




  
  64
  
    
  $query .=


  		




  59
  65
  
    
    qq|FROM invoice i | .


  		




  60
  66
  
    
    qq|JOIN ar on (i.trans_id = ar.id) | .


  		




  61
  67
  
    
    qq|JOIN parts p on (i.parts_id = p.id) | .


  		












Auch abrufbar als:  Unified diff