<< Klicke um Inhaltsverzeichnis anzuzeigen >> Navigation: Vorlagenerstellung > Abrechnungskürzel |
Leistungsliste in der Abrechung:
Datum |
Bezeichnung |
Tarif |
Honorar |
Auslagen |
Bem.grundl. |
|REPEAT HN.AnzahlLeistungen FOR *L|
|HN.Lst[*L].Datum| |
|HN.Lst[*L].TexteLang| |
|HN.Lst[*L].Tarif| |
|HN.Lst[*L].VerdienstLang| |
|HN.Lst[*L].BarauslagenLang| |
|HN.Lst[*L].BemGrl| |
|ENDREPEAT|
Separate Liste von Barauslagen:
|HN.PrepareBarauslagen|
|REPEAT HN.AnzahlBarauslagen FOR *B|
Kuerzel der Barauslage |HN.Barauslage[*B].Kuerzel|
Ustsatz der BA |HN.Barauslage[*B].USTSATZ|
Text |HN.Barauslage[*B].Text|
Menge |HN.Barauslage[*B].Menge|
Netto Einzelwert |HN.Barauslage[*B].Einzelwert|
Abrechnungsbetrag |HN.Barauslage[*B].BetragAbr|
|ENDREPEAT|
Beispiel für GK-Abrechnung:
Meine Gebühren ersuche ich wie folgt zu bestimmen:Meine Gebühren ersuche ich wie folgt zu bestimmen:
|!DECLARE IDX_1 INT|
|!DECLARE GKTG13 CUR|
|!DECLARE GKTG14 CUR|
|!DECLARE GKTG16 CUR|
|!DECLARE GKTG18 CUR|
|!DECLARE GTE CUR|
|!DECLARE AUFR CUR|
|WIEDERHOLE *X HN.AnzahlLeistungen|
|WENN NICHT ISEMPTY[HN.Lst[*X].VerdienstSumme]|
|WENN CALC_TXT[HN.Lst[*X].Kuerzel]=ABH|
|!SET IDX_1 [INTTOSTR[*X]]|
|!SET GKTG13 [HN.LST[[!Get IDX_1]].VerdienstSumme]|
|ENDE WENN|
|WENN CALC_TXT[HN.Lst[*X].Kuerzel]=TA|
|!SET IDX_1 [INTTOSTR[*X]]|
|!SET GKTG14 [HN.LST[[!Get IDX_1]].VerdienstSumme]|
|ENDE WENN|
|WENN CALC_TXT[HN.Lst[*X].Kuerzel]=\ÜP|
|!SET IDX_1 [INTTOSTR[*X]]|
|!SET GKTG16 [HN.LST[[!Get IDX_1]].VerdienstSumme]|
|ENDE WENN|
|WENN CALC_TXT[HN.Lst[*X].Kuerzel]=UAZ|
|!SET IDX_1 [INTTOSTR[*X]]|
|!SET GKTG18 [HN.LST[[!Get IDX_1]].VerdienstSumme]|
|ENDE WENN|
|WENN CALC_TXT[HN.Lst[*X].Kuerzel]=GTE|
|!SET IDX_1 [INTTOSTR[*X]]|
|!SET GTE [HN.LST[[!Get IDX_1]].VerdienstSumme]|
|ENDE WENN|
|WENN CALC_TXT[HN.Lst[*X].Kuerzel]=AUFR|
|!SET IDX_1 [INTTOSTR[*X]]|
|!SET AUFR [HN.LST[[!Get IDX_1]].VerdienstSumme]|
|ENDE WENN|
|ENDE WENN|
|ENDE WIEDERHOLE|
|!DECLARE SUMME CUR|
|!ADD SUMME [!GET GKTG13]|
|!ADD SUMME [!GET GKTG14]|
|!ADD SUMME [!GET GKTG16]|
|!ADD SUMME [!GET GKTG18]||WENN CALC_CUR[!GET GKTG13]>0|
1) Gebühr gem. § 13/1 GKTG von € |Akt.Inventar[Aktiva].Gesamt.Summe.NurWert|
für die Durchführung der Abhandlung € |!GET GKTG13.NurWert|
....... % Zuschlag für die Protokollierung desErb- und Pflichtteilsübereinkommens € 0,00|ENDE WENN|
|WENN CALC_CUR[!GET GKTG14]>0|
2) Gebühr gem. § 14/1 GKTG von € |Akt.Inventar[Aktiva].Gesamt.Summe.NurWert|
für die Durchführung der Todesfallaufnahme € |!GET GKTG14.NurWert|
|ENDE WENN|
|WENN CALC_CUR[!GET GKTG18]>0|
3) Gebühr gem. § 18/1 GKTG von € |Akt.Inventar[Aktiva].Gesamt.Summe.NurWert|
für die Durchführung der Todesfallaufnahme sowieVorbereitung der Überlassung an Zahlungs statt € |!GET GKTG18.NurWert|
|ENDE WENN|
|WENN CALC_CUR[!GET GKTG16]>0|
4) Gebühr gem. § 16/1 GKTG von € |Akt.Inventar[Aktiva].Gesamt.Summe.NurWert|
für die Errichtung des Übernahmeprotokolls vom Datum € |!GET GKTG16.NurWert|
|ENDE WENN|
Info Pauschalierung
|IF NOT ISBLANK[HN.Summe.ErmHonorarNetto.NurWert]|
Gemäß Vereinbarung wurde diese Rechnung nach einem Pauschalbetrag in Höhe von EUR |HN.Summe.ErmHonorarNetto.NurWert| erstellt.
|ENDIF|
Info ustfreie Rechnung
|IF ISBLANK[HN.Summe.ErmUst.NurWert]|
Da wir von der Reverse-Charge-Regelung Gebrauch machen, verrechnen wir keine Mehrwertsteuer. Wir bitten um Beachtung.
|ENDIF|
Liste Honorarleistungen mit Betrag, Bezeichnung und Tarif
|REPEAT HN.AnzahlLeistungen FOR *L|
|HN.Lst[*L].VerdienstSumme| |HN.Lst[*L].LstBezeichnung| |HN.Lst[*L].Tarif|
|ENDREPEAT|
Summe Honorarleistungen
|HN.Summe.XHonorar.NurWert| - der Betrag ohne Barauslagen, USt usw.
Betrag Pauschalierung
|IF NOT ISBLANK[HN.Summe.ErmHonorarNetto.NurWert]|
Honorar (pauschaliert) EUR |HN.Summe.ErmHonorarNetto.NurWert|
|ENDIF|
Ermäßigung Prozentsatz
|~!DECLARE Honorarabschlag CUR|
|~!SET Honorarabschlag [HN.Summe.ErmHonorarNetto.NurWert]|
|~!SUB Honorarabschlag [HN.Summe.XHonorar.NurWert]|
|~!DECLARE HnAbschlProz FLT|
|~!SET HnAbschlProz 100|
|~!MUL HnAbschlProz [~!GET Honorarabschlag.NurWert]|
|~!DIV HnAbschlProz [HN.Summe.XHonorar.NurWert]|
|~!GET HnAbschlProz.FMT[%.2f]| %
Ermäßigung Betrag
|IF HN.Ermaessigung|
|~!DECLARE Honorarabschlag CUR|
|~!SET Honorarabschlag [HN.Summe.ErmHonorarNetto.NurWert]|
|~!SUB Honorarabschlag [HN.Summe.XHonorar.NurWert]|
|~!DECLARE HnAbschlProz FLT|
|~!SET HnAbschlProz 100|
|~!MUL HnAbschlProz [~!GET Honorarabschlag.NurWert]|
|~!DIV HnAbschlProz [HN.Summe.XHonorar.NurWert]|
|%CUR%IF Calc[~!GET Honorarabschlag.NurWert]<0|
Honorar (Summe) EUR |HN.Summe.XHonorar.NurWert|
{\DUMMY}
|IF NOT ISBLANK[HN.Summe.XHonorar.NurWert]|
Honorarabschlag |~!GET HnAbschlProz.FMT[%.2f]| % EUR |~!GET Honorarabschlag.NurWert|
{\DUMMY}
|ENDIF|
|ENDIF|
|ENDIF|
Betrag nach Ermäßigung
|HN.Summe.ErmHonorarNetto.NurWert|
(wurde geliefert) Liste ustpflichtige Barauslagen mit Betrag, Bezeichnung und Anzahl
|HN.PrepareBarauslagen|
|~!DECLARE BAANZAHLUST TXT| (Falls der Block nur kommen soll IF es Barauslagen gibt)
|~!SET BAANZAHLUST 0|
|REPEAT HN.AnzahlBarauslagen FOR *B|
|%TXT%IF NOT CALC[HN.Barauslage[*B].UStSatz]=0|
|~!ADD BAANZAHLUST 1|
|ENDIF|
|ENDREPEAT|
|%TXT%IF NOT CALC[~!GET BAANZAHLUST]=0|
Betrag Bezeichnung
|REPEAT HN.AnzahlBarauslagen FOR *B|
|%TXT%IF NOT CALC[HN.Barauslage[*B].UStSatz]=0|
|HN.Barauslage[*B].BetragSS| |HN.Barauslage[*B].Text|
|ENDIF|
|ENDREPEAT|
Anzahl
|~!GET BAANZAHLUST|
|ENDIF|
Summe ustpflichtige Barauslagen
|~!DECLARE BASUMMEUST CUR|
|REPEAT HN.AnzahlBarauslagen FOR *B|
|%TXT%IF NOT CALC[HN.Barauslage[*B].UStSatz]=0|
|~!ADD BASUMMEUST [HN.Barauslage[*B].BetragSS]|
|ENDIF|
|ENDREPEAT|
|~!GET BASUMMEUST|
Summe ustpflichtige Anteile = Honorar/Pauschalierung/Betrag nach Ermäßigung + ustpflichtige Barauslagen
|HN.Summe.ErmGesamtUstPflichtigBrutto.NurWert|
Liste der Aktontozahlungen mit Betrag und Rechnungsnummer und Bezeichnung
|REPEAT HN.AnzahlBlockSumme FOR *H|
|HN.BS[*H].Text| |HN.BS[*H].Orig.WKZ.DEF| |HN.BS[*H].Orig.VAL.DEF|
|ENDREPEAT|
|HN.RechnungsNr|
Summe nach Abzug der Akontozahlungen
|~!DECLARE Zwischensumme CUR|
|~!SET Zwischensumme 0|
|~!ADD Zwischensumme [HN.Summe.ErmHonorarNetto.NurWert]|
|~!ADD Zwischensumme [HN.Summe.AcontoGesamtUstPflichtigNetto.Negativ.NurWert]|
|~!GET Zwischensumme|
(wurde geliefert) Liste ustfreie Barauslagen mit Betrag, Bezeichnung und Anzahl
|HN.PrepareBarauslagen|
|~!DECLARE BAANZAHLOHNE TXT| (Falls der Block nur kommen soll IF es Barauslagen gibt)
|~!SET BAANZAHLOHNE 0|
|REPEAT HN.AnzahlBarauslagen FOR *B|
|%TXT%IF CALC[HN.Barauslage[*B].UStSatz]=0|
|~!ADD BAANZAHLOHNE 1|
|ENDIF|
|ENDREPEAT|
|%TXT%IF NOT CALC[~!GET BAANZAHLOHNE]=0|
Betrag Bezeichnung
|REPEAT HN.AnzahlBarauslagen FOR *B|
|%TXT%IF NOT CALC[HN.Barauslage[*B].UStSatz]=0|
|HN.Barauslage[*B].BetragSS| |HN.Barauslage[*B].Text|
|ENDIF|
|ENDREPEAT|
Anzahl
|~!GET BAANZAHLOHNE|
|ENDIF|
Summe ustfreie Barauslagen
|~!DECLARE BASUMMEOHNE CUR|
|REPEAT HN.AnzahlBarauslagen FOR *B|
|%TXT%IF NOT CALC[HN.Barauslage[*B].UStSatz]=0|
|~!ADD BASUMMEOHNE [HN.Barauslage[*B].BetragSS]|
|ENDIF|
|ENDREPEAT|
|~!GET BASUMMEOHNE|
Endsumme
|HN.Summe.Total.NurWert|
Leistungstext (ohne Barauslage)
|REPEAT HN.AnzahlLeistungen FOR *L|
|HN.Lst[*L].LstBezeichnung|
|ENDREPEAT|