Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 6cbeab9a

Von Philip Reetz vor mehr als 16 Jahren hinzugefügt

  • ID 6cbeab9a2d7691fa8fb69faab3f21a662df8740f
  • Vorgänger e9459971
  • Nachfolger b3bcbbe9

Erweiterung der Ausgabe in der Kontenuebersicht

Unterschiede anzeigen:

SL/CA.pm
261 261 
    $query =
262 262 
      qq|SELECT a.id, a.reference, a.description, ac.transdate, ac.chart_id, | .
263 263 
      qq|  $false AS invoice, ac.amount, 'gl' as module, | .
264 
      qq?(SELECT accno||'--'||rate FROM tax LEFT JOIN chart ON (tax.chart_id=chart.id) WHERE tax.id = (SELECT tax_id FROM taxkeys WHERE taxkey_id = ac.taxkey AND taxkeys.startdate <= ac.transdate ORDER BY taxkeys.startdate DESC LIMIT 1)) AS taxinfo ? .
264 
      qq?(SELECT accno||'--'||rate FROM tax LEFT JOIN chart ON (tax.chart_id=chart.id) WHERE tax.id = (SELECT tax_id FROM taxkeys WHERE taxkey_id = ac.taxkey AND taxkeys.startdate <= ac.transdate ORDER BY taxkeys.startdate DESC LIMIT 1)) AS taxinfo, ac.source || ' ' || ac.memo AS memo ? .
265 265 
      qq|FROM acc_trans ac, gl a | .
266 266 
      $dpt_join .
267 267 
      qq|WHERE | . $where . $dpt_where . $project .
......
273 273 

  		




  274
  274
  
    
      qq|SELECT a.id, a.invnumber, c.name, ac.transdate, ac.chart_id, | .


  		




  275
  275
  
    
      qq|  a.invoice, ac.amount, 'ar' as module, | .


  		




  276
  
  
    
      qq?(SELECT accno||'--'||rate FROM tax LEFT JOIN chart ON (tax.chart_id=chart.id) WHERE tax.id = (SELECT tax_id FROM taxkeys WHERE taxkey_id = ac.taxkey AND taxkeys.startdate <= ac.transdate ORDER BY taxkeys.startdate DESC LIMIT 1)) AS taxinfo ? . 


  		




  
  276
  
    
      qq?(SELECT accno||'--'||rate FROM tax LEFT JOIN chart ON (tax.chart_id=chart.id) WHERE tax.id = (SELECT tax_id FROM taxkeys WHERE taxkey_id = ac.taxkey AND taxkeys.startdate <= ac.transdate ORDER BY taxkeys.startdate DESC LIMIT 1)) AS taxinfo, ac.source || ' ' || ac.memo AS memo  ? . 


  		




  277
  277
  
    
      qq|FROM acc_trans ac, customer c, ar a | .


  		




  278
  278
  
    
      $dpt_join .


  		




  279
  279
  
    
      qq|WHERE | . $where . $dpt_where . $project .


  		




  ......




  286
  286
  
    

  		




  287
  287
  
    
      qq|SELECT a.id, a.invnumber, v.name, ac.transdate, ac.chart_id, | .


  		




  288
  288
  
    
      qq|  a.invoice, ac.amount, 'ap' as module, | .


  		




  289
  
  
    
      qq?(SELECT accno||'--'||rate FROM tax LEFT JOIN chart ON (tax.chart_id=chart.id) WHERE tax.id = (SELECT tax_id FROM taxkeys WHERE taxkey_id = ac.taxkey AND taxkeys.startdate <= ac.transdate ORDER BY taxkeys.startdate DESC LIMIT 1)) AS taxinfo ? .


  		




  
  289
  
    
      qq?(SELECT accno||'--'||rate FROM tax LEFT JOIN chart ON (tax.chart_id=chart.id) WHERE tax.id = (SELECT tax_id FROM taxkeys WHERE taxkey_id = ac.taxkey AND taxkeys.startdate <= ac.transdate ORDER BY taxkeys.startdate DESC LIMIT 1)) AS taxinfo, ac.source || ' ' || ac.memo AS memo  ? .


  		




  290
  290
  
    
      qq|FROM acc_trans ac, vendor v, ap a | .


  		




  291
  291
  
    
      $dpt_join .


  		




  292
  292
  
    
      qq|WHERE | . $where . $dpt_where . $project .


  		












  

    
      bin/mozilla/ca.pl
    
  





  600
  600
  
    

  		




  601
  601
  
    
    $ca->{ustrate} = $form->format_amount(\%myconfig, $ca->{ustrate} * 100, 2) if ($ca->{ustrate} != 0);


  		




  602
  602
  
    

  		




  
  603
  
    
    if ($ca->{memo} ne "") {


  		




  
  604
  
    
      $ca->{description} .= "\n" . $ca->{memo};


  		




  
  605
  
    
    }


  		




  
  606
  
    

  		




  603
  607
  
    
    


  		




  604
  608
  
    

  		




  605
  609
  
    
    foreach my $gegenkonto (@{ $ca->{GEGENKONTO} }) {


  		












Auch abrufbar als:  Unified diff