diff --git a/initATLASAufschubkonten/cWorker_Verwahrung.vb b/initATLASAufschubkonten/cWorker_Verwahrung.vb
index 7c2c1bc..3156189 100644
--- a/initATLASAufschubkonten/cWorker_Verwahrung.vb
+++ b/initATLASAufschubkonten/cWorker_Verwahrung.vb
@@ -1177,7 +1177,7 @@ Anzeige:
                 TextHTMLtable &= typ & " wurde aus DAKOSY generiert!" & vbNewLine & vbNewLine & vbNewLine
 
                 TextHTMLtable &= "<table border=1>"
-                TextHTMLtable &= "<tr><td>PosNr</td><td>MRN</td><td>ATC</td>" & IIf(sonstigeMRNNR <> "", "<td>sonstige MRN</td>", "") & "<td>AVISOID</td><td>LKW-KZ</td></tr>"
+                TextHTMLtable &= "<tr><td>PosNr</td><td>MRN</td><td>ATC</td>" & IIf(sonstigeMRNNR <> "", "<td>sonstige MRN</td>", "") & "<td>AVISOID</td><td>LKW-KZ</td><td>Packstücke</td><td>Gewicht in KG</td></tr>"
 
                 If GSPOS IsNot Nothing Then
                     TextHTMLtable &= "<tr>"
@@ -1192,6 +1192,12 @@ Anzeige:
                     Else
                         TextHTMLtable &= "<td><b> - </b></td>"
                     End If
+                    TextHTMLtable &= "<td><b>" & GSPOS.gsp_EH_Anzahl & "</b></td>"
+                    If gs_row IsNot Nothing AndAlso Not IsDBNull(gs_row("gs_gewicht")) AndAlso gs_row("gs_gewicht") <> "" Then
+                        TextHTMLtable &= "<td><b>" & gs_row("gs_gewicht").ToString & "</b></td>"
+                    Else
+                        TextHTMLtable &= "<td><b> - </b></td>"
+                    End If
 
 
                     TextHTMLtable &= "</tr>"