From 7856ac15791e783e99343f6bb9bcb1eaaa61fd98 Mon Sep 17 00:00:00 2001
From: Andreas Luxbauer <al@verag.ag>
Date: Wed, 4 Feb 2026 08:23:33 +0100
Subject: [PATCH] fakt

---
 SDL/Fakturierung/cFakturierung.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SDL/Fakturierung/cFakturierung.vb b/SDL/Fakturierung/cFakturierung.vb
index 86118cb9..0cc18330 100644
--- a/SDL/Fakturierung/cFakturierung.vb
+++ b/SDL/Fakturierung/cFakturierung.vb
@@ -1441,7 +1441,7 @@ Public Class cFakturierung
 
             If Rechnung.Rechnungsart = "PROFORMA" Then
                 rpt.lblRgNr.Text = "PROFORMA"
-                rpt.lblRgDatum.Text = Rechnung.RechnungsDatum.ToShortDateString
+                rpt.lblRgDatum.Text = If(Rechnung.RechnungsDatum IsNot Nothing, CDate(Rechnung.RechnungsDatum).ToShortDateString, Now.ToShortDateString)
             End If
 
             'rpt.lblKundenAuftragsnummer.Text = If(RECHNUNG.KdAuftragsNr, "")