BESCHREIBUNG
Wird einem Kunden eine Gutschrift in Form einer Rechnung ausgestellt, ist der zu verrechnende Gesamtbetrag aller Leistungen negativ. Im erwähnten Fall ist die Überschrift „Rechnung“ auf dem Standard-Rechnungsdeckblatt womöglich unpassend und sollte eher „Gutschrift“ lauten.
ANLEITUNG
Um die Überschrift auf dem Rechnungsdeckblatt automatisch auf „Rechnung“ / „Gutschrift“ zu setzen – je nachdem, ob der zu verrechnende Betrag zu Gunsten bzw. zu Lasten des Rechnungsstellers fällt – gehen Sie bitte wie folgt vor:
- Mit Berichts-Manager das Layout des Berichts „2000 Rechungsdeckblatt“ bearbeiten“.
- Wechseln Sie unten links in das Register „<> Script“.
- Selektieren Sie oben in der Auswahlliste „Object“ den Eintrag „BerichtKopf“.
- Selektieren Sie oben in der Auswahlliste „Event“ den Eintrag „Format“.
- Fügen Sie nach einem allenfalls vorhandenen Code den nachfolgenden Code ein:
// Die Rechnungsdaten
Rechnungsdaten lRechnungsdaten = (Rechnungsdaten) mReport.Decorator.AktuellerDatensatz;
// Ist der Offene Rechnungsbetrag negativ?
if (lRechnungsdaten.TotalErtragInklMWST < 0)
{
// Setze Label in Abhängigkeit der Sprache
switch (mReport.Decorator.KulturAdapter.Sprache)
{
case TLanguage.SprachenDB.DeutschProjekt:
case TLanguage.SprachenDB.DeutschMandat:
mReport.Decorator.SetzeControlText("BerichtKopf", "mLabelRechnung", "Gutschrift");
break;
case TLanguage.SprachenDB.English:
mReport.Decorator.SetzeControlText("BerichtKopf", "mLabelRechnung", "Credit");
break;
case TLanguage.SprachenDB.Francais:
mReport.Decorator.SetzeControlText("BerichtKopf", "mLabelRechnung", "Crédit");
break;
case TLanguage.SprachenDB.Italiano:
mReport.Decorator.SetzeControlText("BerichtKopf", "mLabelRechnung", "Accredito");
break;
}
}
// Rechnungsbetrag >= 0
else
{
// Standard-Label aus Ressourcen mit korrekter Sprache setzen
mReport.Decorator.SetzeControlText("BerichtKopf", "mLabelRechnung", lRechnungsdaten.LabelRechnung);
}
Dieser Code berücksichtigt das Setzen der Überschrift „Rechnung“ / „Gutschrift“ die von der TimeSafe Leistungserfassung unterstützen Systemsprachen.
