KB0600: Mahngebühren auf Mahnung ausgeben

BESCHREIBUNG

Seit der Version 2022 der TimeSafe Leistungserfassung ist es möglich, Mahngebühren zu erheben und diese auf der Mahnung auszuweisen. Der nachfolgende Artikel beschreibt die Schritte, die notwendig sind, wenn Sie die Standard-Mahnung bereits angepasst haben.

LÖSUNG

Gehen Sie bitte wie folgt vor, um den bereits angepassten Mahnungsbericht so zu verändern, dass Mahngebühren ausgegeben werden können:

1. Gehen Sie in den Berichts-Manager in den Stammdaten und suchen Sie den Bericht „2009 Mahnung“
2. Selektieren Sie den Bericht und wählen Sie den Befehl „Layout bearbeiten“
3. Die beiden Linien (mLineTotal1, mLineTotal2) sowie die Controls innerhalb dieser Linien (mTextBoxBetragOffenTitel, mTextBoxTotalWährung, mTextBoxBetragOffen) markieren und nach unten schieben
4. Die drei Controls auf Höhe „Abzüglich eingegangener Zahlungen“ (mTextBoxZahlungenTitel, textBox4 und mTextBoxZahlungen) markieren, kopieren und darunter einfügen
5. Control ganz links der eingefügten Controls umbenennen nach „mTextBoxMahngebührenTitel“, Eigenschaft „DataField“ auf den Wert „LabelMahngebühren“ setzen und Eigenschaft „Text“ auf Wert „Mahngebühren“ setzen.  Hinweis: lassen Sie die Eigenschaft „DataField“ leer, wenn Sie einen von „Mahngebühren“ abweichenden Bezeichner verwenden wollen und setzen Sie die Eigenschaft „Text“ auf den gewünschten Wert.
6. Control in der Mitte der eingefügten Controls („WWW“) umbenennen nach „mTextBoxMahngebührenWährung“
7. Control ganz rechts der eingefügten Controls umbenennen nach „mTextBoxMahngebühren“ und Eigenschaft „DataField“ auf den Wert „Mahngebühren“ setzen.
8. Allenfalls die unter Schritt 3 verschobenen Controls wieder nach oben schieben, damit sie unter „Mahngebühren“ ersichtlich sind.
9. Unten zur Ansicht „Script-Code“ wechseln und folgenden Code am Ende des Ereignisses „ActiveReport_ReportStart“ einfügen:

#region Positionierung Mahngebühren
    
    bool lMahgebührenSichtbar = lRechnungsdaten.Mahngebühren.HasValue;
    mReport.Decorator.SetzeControlSichtbar("Detail", "mTextBoxMahngebührenTitel", lMahgebührenSichtbar);
    mReport.Decorator.SetzeControlSichtbar("Detail", "mTextBoxMahngebührenWährung", lMahgebührenSichtbar);
    mReport.Decorator.SetzeControlSichtbar("Detail", "mTextBoxMahngebühren", lMahgebührenSichtbar);
    
    string lOffenerBetragPosReferenzControlName = "mTextBoxZahlungenTitel";
    if (lMahgebührenSichtbar)lOffenerBetragPosReferenzControlName = "mTextBoxMahngebührenTitel";
    
    float? lOffenerBetragPosReferenzControlTop = mReport.Decorator.LiefereControlTop("Detail", lOffenerBetragPosReferenzControlName);
    float? lOffenerBetragPosReferenzControlHöhe = mReport.Decorator.LiefereControlHöhe("Detail", lOffenerBetragPosReferenzControlName);
        
    // Verschiebe nun die Linien sowie die Controls für den Offenen Betrag abhängig davon, ob die Mahngebühren sichtbar sind
    if (lOffenerBetragPosReferenzControlTop != null && lOffenerBetragPosReferenzControlHöhe != null)
    {
        // Abstand zwischen zwei bestehenden Controls bestimmen
        float? lTextBoxRechnungsbetragTitelTop = mReport.Decorator.LiefereControlTop("Detail", "mTextBoxRechnungsbetragTitel");
        float? lTextBoxRechnungsbetragTitelHöhe = mReport.Decorator.LiefereControlHöhe("Detail", "mTextBoxRechnungsbetragTitel");
        float? lTextBoxZahlungenTitelTop = mReport.Decorator.LiefereControlTop("Detail", "mTextBoxZahlungenTitel");
        float lAbstandZwischenControls = lTextBoxZahlungenTitelTop.Value - lTextBoxRechnungsbetragTitelTop.Value - lTextBoxRechnungsbetragTitelHöhe.Value;
        
        float lOffenerBetragControlTop = lOffenerBetragPosReferenzControlTop.Value + lOffenerBetragPosReferenzControlHöhe.Value + lAbstandZwischenControls;
        mReport.Decorator.ÄnderePositionOben("Detail", "mLineTotal1", lOffenerBetragControlTop);        
        mReport.Decorator.ÄnderePositionOben("Detail", "mLineTotal2", lOffenerBetragControlTop + lOffenerBetragPosReferenzControlHöhe.Value);
        mReport.Decorator.ÄnderePositionOben("Detail", "mTextBoxBetragOffenTitel", lOffenerBetragControlTop);
        mReport.Decorator.ÄnderePositionOben("Detail", "mTextBoxTotalWährung", lOffenerBetragControlTop);
        mReport.Decorator.ÄnderePositionOben("Detail", "mTextBoxBetragOffen", lOffenerBetragControlTop);        
    }
    
    #endregion Positionierung Mahngebühren

Verbuchung

Falls Sie eine FIBU-Schnittstelle einsetzen, beachten Sie bitte folgendes:
Die Mahnspesen werden bei einer Verbuchung nicht berücksichtigt. Falls diese bezahlt werden, müssten sie manuell gebucht werden.