Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 7c77dbe7

Von Jan Büren vor mehr als 11 Jahren hinzugefügt

  • ID 7c77dbe7e7641082245a4721c5ef7c90b6bfae93
  • Vorgänger 6395006f
  • Nachfolger a7041228

Offen Forderungen / Verbindlichkeiten - Fälligkeitsdatum bei Stichtag berücksichtigen
Seit der 3.0 ist der Bericht in freiem Zeitraum und Stichtag aufgeteilt.
Der freie Zeitraum ist noch der "abwärtskompatible" Code von damals, der überwiegend
über das Rechnungsdatum offene Posten definiert. Beim Stichtag ist dies aber nicht mehr so,
daher erfolgt hier die Prüfung auf Fälligkeitsdatum. Falls kein Fälligkeitsdatum gesetzt ist (NULL),
wird dieses gar nicht angezeigt (möglich bei Einkaufs- und Verkaufsrechnungen).

Unterschiede anzeigen:

SL/RP.pm
1164 1164
  # mit entsprechender altersstrukturliste (s.a. Bug 1842)
1165 1165
  # eine neue variable an der oberfläche eingeführt, somit ist
1166 1166
  # todate == freier zeitrau und fordate == stichtag
1167
  # duedate_where == nur fällige rechnungen anzeigen
1167 1168

  
1168
  my ($review_of_aging_list, $todate, $fromdate, $fromwhere, $fordate);
1169
  my ($review_of_aging_list, $todate, $fromdate, $fromwhere, $fordate,
1170
      $duedate_where);
1169 1171

  
1170
  if ($form->{reporttype} eq 'custom') {  # altersstrukturliste
1172
  if ($form->{reporttype} eq 'custom') {  # altersstrukturliste, nur fällige
1171 1173

  
1172 1174
    # explizit rausschmeissen was man für diesen bericht nicht braucht
1173 1175
    delete $form->{fromdate};
......
1190 1192
        $review_of_aging_list = " AND $form->{review_of_aging_list} < (date $fordate) - duedate";
1191 1193
      }
1192 1194
    }
1193
  } else {  # freier zeitraum OHNE review_of_aging_list
1195
    $duedate_where = " AND (date $fordate) - duedate >= 0 ";
1196
  } else {  # freier zeitraum, nur rechnungsdatum und OHNE review_of_aging_list
1194 1197
    $form->{todate}  = $form->current_date($myconfig) unless ($form->{todate});
1195 1198
    $todate = conv_dateq($form->{todate});
1196 1199
    $fromdate = conv_dateq($form->{fromdate});
......
1233 1236
      AND (${ct}.id = ?)
1234 1237
      AND (transdate <= (date $todate) $fromwhere )
1235 1238
      $review_of_aging_list
1239
      $duedate_where
1236 1240
    ORDER BY ctid, transdate, invnumber |;
1237 1241

  
1238 1242
  my $sth_details = prepare_query($form, $dbh, $q_details);

Auch abrufbar als: Unified diff