stringvar SB;
SB := '';

if ({Beleg_Kopf.DiscPrcnt} > 0) then
(
    SB := SB + 'Zwischensumme' + CHR(9) + CSTR({Beleg_Kopf.DocTotal}-{Beleg_Kopf.VatSum}-{Beleg_Kopf.TotalExpns} + {Beleg_Kopf.DiscSum} + {Beleg_Kopf.DpmAmnt}, 2, '.') + CHR(13);
    SB := SB + 'inkl. ' + CSTR({Beleg_Kopf.DiscPrcnt}, 1) + '% Rabatt' + CHR(9) + CSTR({Beleg_Kopf.DiscSum}, 2, '.') + CHR(13);
);

if ({Beleg_Kopf.DpmAmnt} > 0) then
(
    SB := SB + 'erhaltene Anzahlungen' + CHR(9) + CSTR({Beleg_Kopf.DpmAmnt}, 2, '.') + CHR(13)
);

if ({Beleg_Kopf.TotalExpns} > 0) then
(
    SB := SB + 'Zwischensumme' + CHR(9) + CSTR({Beleg_Kopf.DocTotal}-{Beleg_Kopf.VatSum}-{Beleg_Kopf.TotalExpns}, 2, '.');
    SB := SB + 'Zusätzliche Kosten' + CHR(9) + CSTR({Beleg_Kopf.TotalExpns}, 2, '.');
);

SB := SB + 'Nettosumme' + CHR(9) + CSTR({Beleg_Kopf.DocTotal}-{Beleg_Kopf.VatSum}, 2, '.') + CHR(13);
SB := SB + 'USt' + CHR(9) + CSTR({Beleg_Kopf.VatSum}, 2, '') + CHR(13);
SB := SB + {Print_Translations;1.Beleg} + ' Gesamt' + CHR(9) + CSTR({Beleg_Kopf.DocTotal}, 2, '.');