edv/AVISO
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

NCTS Gestellungsadressen

Browse Source
This commit is contained in:
d.breimaier
2024-03-12 14:30:43 +01:00
parent 6cf1d79e79
commit a8e3f3ed6e
9 changed files with 1948 additions and 1889 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Aviso/My Project/AssemblyInfo.vb
View File

@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
' übernehmen, indem Sie "*" eingeben:
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("3.9.7.8")>
<Assembly: AssemblyFileVersion("3.9.7.8")>
<Assembly: AssemblyVersion("3.9.7.9")>
<Assembly: AssemblyFileVersion("3.9.7.9")>

2
Aviso/frmHauptfenster.vb
View File

@@ -557,7 +557,7 @@ Public Class frmHauptfenster
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ESSENSBESTELLUNGEN", "SDL") Then
Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Case "FRONTOFFICE", "VERAG", "IMEX"
Case "FRONTOFFICE", "VERAG", "IMEX", "UNISPED"
EssensbestellungenToolStripMenuItem.Visible = True
End Select
End If

3687
Aviso/frmSendungsdetailsNEU.Designer.vb generated
View File

File diff suppressed because it is too large Load Diff

70
Aviso/frmSendungsdetailsNEU.resx
View File

@@ -1764,44 +1764,9 @@
eWpiMRXkm9o//9k=
</value>
</data>
<metadata name="ToolTip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>404, 17</value>
</metadata>
<metadata name="cntxt.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>765, 17</value>
</metadata>
<data name="FlatButton4.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
/9j/4AAQSkZJRgABAQEAAAAAAAD/7gAOQWRvYmUAZAAAAAAB/9sAQwABAQEBAQEBAQEBAQEBAQEBAQEB
AQECAQEBAQECAgICAgICAgICAgIDAgICAwMDAwMDBQUFBQUFBQUFBQUFBQUF/9sAQwEBAQECAQIDAgID
BAQDBAQFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF/8AAEQgA
GQAZAwERAAIRAQMRAf/EABgAAAMBAQAAAAAAAAAAAAAAAAAICQcK/8QAKRAAAQUAAgIABAcBAAAAAAAA
AQIDBAUGAAcRITESIxVBYSIyEzMIFv/EABQBAQAAAAAAAAAAAAAAAAAAAAD/xAAUEQEAAAAAAAAAAAAA
AAAAAAAA/9oADAMBAAIRAxEAPwDsSKq/7Vudfqtf2Ky3W77t1EhyJ2zp6WBFraLTW8SKwzFh3EeKwhmM
w202htsDwB64CSWH+lrc3ilVadknOB9Pyx5/c+5cunIwP6vrN6dDCVKHw+kQPz4DTyLim0vTGs7ByGt7
VhTIWM1NlDU73LrX3qq7qoLzqUqQ5dracLLyQfCklJ/EEHxwKNcCflzQva7Adn5eM8iPKtd/3dGjOrHl
CX/+uu1oCvY9FQAPASxnqXraJBDWh1mqq9RFZSzZZtvKOy5ItAAC0w4glhxLi/61FYBHs+OAxOYzVhjv
8072rtGHIkiXkewbJuHJAEuJGnQZBabeAJSFhAHzAHgVN4Eiu2d5aQqnXZPF6TM12hk9sdyt3a5uzqc/
ZU0FWpt3EJ+SbMjvIVJS6FIUgeQkefXkHgLI1adyMwzAa7QpUxShaP4h3HSftc+Pv7r54GoZDeaeu697
KyW71mPsIEnA6z7BMPYFReXTtvJirbbhIRHnPvuh4LUUeR6ICR8QOBcDgHAOAcA4H//Z
</value>
</data>
<data name="FlatButton1.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
/9j/4AAQSkZJRgABAQEAAAAAAAD/7gAOQWRvYmUAZAAAAAAB/9sAQwABAQEBAQEBAQEBAQEBAQEBAQEB
AQECAQEBAQECAgICAgICAgICAgIDAgICAwMDAwMDBQUFBQUFBQUFBQUFBQUF/9sAQwEBAQECAQIDAgID
BAQDBAQFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF/8AAEQgA
GQAZAwERAAIRAQMRAf/EABgAAAMBAQAAAAAAAAAAAAAAAAAICQcK/8QAKRAAAQUAAgIABAcBAAAAAAAA
AQIDBAUGAAcRITESIxVBYSIyEzMIFv/EABQBAQAAAAAAAAAAAAAAAAAAAAD/xAAUEQEAAAAAAAAAAAAA
AAAAAAAA/9oADAMBAAIRAxEAPwDsSKq/7Vudfqtf2Ky3W77t1EhyJ2zp6WBFraLTW8SKwzFh3EeKwhmM
w202htsDwB64CSWH+lrc3ilVadknOB9Pyx5/c+5cunIwP6vrN6dDCVKHw+kQPz4DTyLim0vTGs7ByGt7
VhTIWM1NlDU73LrX3qq7qoLzqUqQ5dracLLyQfCklJ/EEHxwKNcCflzQva7Adn5eM8iPKtd/3dGjOrHl
CX/+uu1oCvY9FQAPASxnqXraJBDWh1mqq9RFZSzZZtvKOy5ItAAC0w4glhxLi/61FYBHs+OAxOYzVhjv
8072rtGHIkiXkewbJuHJAEuJGnQZBabeAJSFhAHzAHgVN4Eiu2d5aQqnXZPF6TM12hk9sdyt3a5uzqc/
ZU0FWpt3EJ+SbMjvIVJS6FIUgeQkefXkHgLI1adyMwzAa7QpUxShaP4h3HSftc+Pv7r54GoZDeaeu697
KyW71mPsIEnA6z7BMPYFReXTtvJirbbhIRHnPvuh4LUUeR6ICR8QOBcDgHAOAcA4H//Z
</value>
</data>
<data name="btnDelQS.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
@@ -2532,6 +2497,41 @@
<metadata name="ContextMenuStrip3.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>129, 56</value>
</metadata>
<data name="FlatButton1.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
/9j/4AAQSkZJRgABAQEAAAAAAAD/7gAOQWRvYmUAZAAAAAAB/9sAQwABAQEBAQEBAQEBAQEBAQEBAQEB
AQECAQEBAQECAgICAgICAgICAgIDAgICAwMDAwMDBQUFBQUFBQUFBQUFBQUF/9sAQwEBAQECAQIDAgID
BAQDBAQFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF/8AAEQgA
GQAZAwERAAIRAQMRAf/EABgAAAMBAQAAAAAAAAAAAAAAAAAICQcK/8QAKRAAAQUAAgIABAcBAAAAAAAA
AQIDBAUGAAcRITESIxVBYSIyEzMIFv/EABQBAQAAAAAAAAAAAAAAAAAAAAD/xAAUEQEAAAAAAAAAAAAA
AAAAAAAA/9oADAMBAAIRAxEAPwDsSKq/7Vudfqtf2Ky3W77t1EhyJ2zp6WBFraLTW8SKwzFh3EeKwhmM
w202htsDwB64CSWH+lrc3ilVadknOB9Pyx5/c+5cunIwP6vrN6dDCVKHw+kQPz4DTyLim0vTGs7ByGt7
VhTIWM1NlDU73LrX3qq7qoLzqUqQ5dracLLyQfCklJ/EEHxwKNcCflzQva7Adn5eM8iPKtd/3dGjOrHl
CX/+uu1oCvY9FQAPASxnqXraJBDWh1mqq9RFZSzZZtvKOy5ItAAC0w4glhxLi/61FYBHs+OAxOYzVhjv
8072rtGHIkiXkewbJuHJAEuJGnQZBabeAJSFhAHzAHgVN4Eiu2d5aQqnXZPF6TM12hk9sdyt3a5uzqc/
ZU0FWpt3EJ+SbMjvIVJS6FIUgeQkefXkHgLI1adyMwzAa7QpUxShaP4h3HSftc+Pv7r54GoZDeaeu697
KyW71mPsIEnA6z7BMPYFReXTtvJirbbhIRHnPvuh4LUUeR6ICR8QOBcDgHAOAcA4H//Z
</value>
</data>
<data name="FlatButton4.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
/9j/4AAQSkZJRgABAQEAAAAAAAD/7gAOQWRvYmUAZAAAAAAB/9sAQwABAQEBAQEBAQEBAQEBAQEBAQEB
AQECAQEBAQECAgICAgICAgICAgIDAgICAwMDAwMDBQUFBQUFBQUFBQUFBQUF/9sAQwEBAQECAQIDAgID
BAQDBAQFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUFBQUF/8AAEQgA
GQAZAwERAAIRAQMRAf/EABgAAAMBAQAAAAAAAAAAAAAAAAAICQcK/8QAKRAAAQUAAgIABAcBAAAAAAAA
AQIDBAUGAAcRITESIxVBYSIyEzMIFv/EABQBAQAAAAAAAAAAAAAAAAAAAAD/xAAUEQEAAAAAAAAAAAAA
AAAAAAAA/9oADAMBAAIRAxEAPwDsSKq/7Vudfqtf2Ky3W77t1EhyJ2zp6WBFraLTW8SKwzFh3EeKwhmM
w202htsDwB64CSWH+lrc3ilVadknOB9Pyx5/c+5cunIwP6vrN6dDCVKHw+kQPz4DTyLim0vTGs7ByGt7
VhTIWM1NlDU73LrX3qq7qoLzqUqQ5dracLLyQfCklJ/EEHxwKNcCflzQva7Adn5eM8iPKtd/3dGjOrHl
CX/+uu1oCvY9FQAPASxnqXraJBDWh1mqq9RFZSzZZtvKOy5ItAAC0w4glhxLi/61FYBHs+OAxOYzVhjv
8072rtGHIkiXkewbJuHJAEuJGnQZBabeAJSFhAHzAHgVN4Eiu2d5aQqnXZPF6TM12hk9sdyt3a5uzqc/
ZU0FWpt3EJ+SbMjvIVJS6FIUgeQkefXkHgLI1adyMwzAa7QpUxShaP4h3HSftc+Pv7r54GoZDeaeu697
KyW71mPsIEnA6z7BMPYFReXTtvJirbbhIRHnPvuh4LUUeR6ICR8QOBcDgHAOAcA4H//Z
</value>
</data>
<metadata name="ToolTip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>404, 17</value>
</metadata>
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
AAABAAEAgIAAAAEAIAAoCAEAFgAAACgAAACAAAAAAAEAAAEAIAAAAAAAAAgBABMLAAATCwAAAAAAAAAA

2
Aviso/frmSendungsdetailsNEU.vb
View File

@@ -4761,7 +4761,7 @@ Public Class frmSendungsdetailsNEU
Private Sub ZollstoppAMBARToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles ZollstoppAMBARToolStripMenuItem.Click
Me.Cursor = Cursors.WaitCursor
SAVE_ME()
Dim f As New frmZollstopp(SENDUNG_LIST(CURRENT_INDEX))
Dim f As New frmZollstopp(SENDUNG_LIST(CURRENT_INDEX), usrcntl_NCTS.NCTS_GA)
f.ShowDialog(Me)
Me.Cursor = DefaultCursor
End Sub

18
Aviso/frmZollstopp.Designer.vb generated
View File

@@ -33,6 +33,7 @@ Partial Class frmZollstopp
Me.Label3 = New System.Windows.Forms.Label()
Me.rtbAbsender = New VERAG_PROG_ALLGEMEIN.MyRichTextBox()
Me.lklEmpfangerUbernehmen = New System.Windows.Forms.LinkLabel()
Me.rtbATANr = New VERAG_PROG_ALLGEMEIN.MyRichTextBox()
Me.SuspendLayout()
'
'rtbZollstop
@@ -44,7 +45,7 @@ Partial Class frmZollstopp
Me.rtbZollstop.MaxLines_Warning = ""
Me.rtbZollstop.MaxLines_Warning_Label = Nothing
Me.rtbZollstop.Name = "rtbZollstop"
Me.rtbZollstop.Size = New System.Drawing.Size(526, 121)
Me.rtbZollstop.Size = New System.Drawing.Size(526, 96)
Me.rtbZollstop.TabIndex = 3
Me.rtbZollstop.Text = ""
'
@@ -150,12 +151,26 @@ Partial Class frmZollstopp
Me.lklEmpfangerUbernehmen.TabStop = True
Me.lklEmpfangerUbernehmen.Text = "Empfänger übernehmen"
'
'rtbATANr
'
Me.rtbATANr.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.rtbATANr.Location = New System.Drawing.Point(12, 216)
Me.rtbATANr.MaxLineLength = -1
Me.rtbATANr.MaxLines_Warning = ""
Me.rtbATANr.MaxLines_Warning_Label = Nothing
Me.rtbATANr.Name = "rtbATANr"
Me.rtbATANr.Size = New System.Drawing.Size(526, 35)
Me.rtbATANr.TabIndex = 10
Me.rtbATANr.Text = ""
'
'frmZollstopp
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.Color.White
Me.ClientSize = New System.Drawing.Size(551, 626)
Me.Controls.Add(Me.rtbATANr)
Me.Controls.Add(Me.lklEmpfangerUbernehmen)
Me.Controls.Add(Me.Label3)
Me.Controls.Add(Me.rtbAbsender)
@@ -185,4 +200,5 @@ Partial Class frmZollstopp
Friend WithEvents Label3 As Label
Friend WithEvents rtbAbsender As VERAG_PROG_ALLGEMEIN.MyRichTextBox
Friend WithEvents lklEmpfangerUbernehmen As LinkLabel
Friend WithEvents rtbATANr As VERAG_PROG_ALLGEMEIN.MyRichTextBox
End Class

7
Aviso/frmZollstopp.vb
View File

@@ -1,18 +1,21 @@
Public Class frmZollstopp
Dim SND As VERAG_PROG_ALLGEMEIN.cSendungen
Dim gestellungsadresse As VERAG_PROG_ALLGEMEIN.cNCTSGestellungsadressen
Sub New(SND As VERAG_PROG_ALLGEMEIN.cSendungen)
Sub New(SND As VERAG_PROG_ALLGEMEIN.cSendungen, Optional gestellungsadresse As VERAG_PROG_ALLGEMEIN.cNCTSGestellungsadressen = Nothing)
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
Me.SND = SND
Me.gestellungsadresse = gestellungsadresse
End Sub
Private Sub frmZollstopp_Load(sender As Object, e As EventArgs) Handles Me.Load
If SND Is Nothing Then Me.Close()
rtbAbsender.Text = SND.tblSnd_Absender
rtbATANr.Text = IIf(gestellungsadresse IsNot Nothing, gestellungsadresse.nga_ATANr, "")
rtbZollstop.Text = SND.getNCTSAdress()
End Sub
@@ -20,7 +23,7 @@
Me.Cursor = Cursors.WaitCursor
Try
Dim path = SDL.FormularManagerNEU.Zollstopp(rtbZollstop.Text, rtbEntladestelle.Text, rtbKommentare.Text, rtbAbsender.Text)
Dim path = SDL.FormularManagerNEU.Zollstopp(rtbZollstop.Text, rtbEntladestelle.Text, rtbKommentare.Text, rtbAbsender.Text, rtbATANr.Text)
If path <> "" Then
Process.Start(path)
End If

45
Aviso/usrCntlSND_NCTSGestellungsadresse.Designer.vb generated
View File

@@ -23,6 +23,8 @@ Partial Class usrCntlSND_NCTSGestellungsadresse
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.pnlT1 = New System.Windows.Forms.Panel()
Me.txtT1VerzollungsadresseATANr = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Label4 = New System.Windows.Forms.Label()
Me.cbxNCTSAufDispo = New System.Windows.Forms.CheckBox()
Me.picDel = New System.Windows.Forms.PictureBox()
Me.txtT1Verzollungsadresse = New VERAG_PROG_ALLGEMEIN.MySearchBox()
@@ -49,6 +51,8 @@ Partial Class usrCntlSND_NCTSGestellungsadresse
'
'pnlT1
'
Me.pnlT1.Controls.Add(Me.txtT1VerzollungsadresseATANr)
Me.pnlT1.Controls.Add(Me.Label4)
Me.pnlT1.Controls.Add(Me.cbxNCTSAufDispo)
Me.pnlT1.Controls.Add(Me.picDel)
Me.pnlT1.Controls.Add(Me.txtT1Verzollungsadresse)
@@ -71,9 +75,42 @@ Partial Class usrCntlSND_NCTSGestellungsadresse
Me.pnlT1.Controls.Add(Me.LinkLabel4)
Me.pnlT1.Location = New System.Drawing.Point(0, 0)
Me.pnlT1.Name = "pnlT1"
Me.pnlT1.Size = New System.Drawing.Size(549, 101)
Me.pnlT1.Size = New System.Drawing.Size(549, 115)
Me.pnlT1.TabIndex = 0
'
'txtT1VerzollungsadresseATANr
'
Me.txtT1VerzollungsadresseATANr._DateTimeOnly = False
Me.txtT1VerzollungsadresseATANr._numbersOnly = False
Me.txtT1VerzollungsadresseATANr._numbersOnlyKommastellen = ""
Me.txtT1VerzollungsadresseATANr._numbersOnlyTrennzeichen = False
Me.txtT1VerzollungsadresseATANr._Prozent = False
Me.txtT1VerzollungsadresseATANr._ShortDateNew = False
Me.txtT1VerzollungsadresseATANr._ShortDateOnly = False
Me.txtT1VerzollungsadresseATANr._TimeOnly = False
Me.txtT1VerzollungsadresseATANr._TimeOnly_Seconds = False
Me.txtT1VerzollungsadresseATANr._value = Nothing
Me.txtT1VerzollungsadresseATANr._Waehrung = False
Me.txtT1VerzollungsadresseATANr._WaehrungZeichen = True
Me.txtT1VerzollungsadresseATANr.ForeColor = System.Drawing.Color.Black
Me.txtT1VerzollungsadresseATANr.Location = New System.Drawing.Point(121, 93)
Me.txtT1VerzollungsadresseATANr.MaxLength = 256
Me.txtT1VerzollungsadresseATANr.MaxLineLength = -1
Me.txtT1VerzollungsadresseATANr.MaxLines_Warning = ""
Me.txtT1VerzollungsadresseATANr.MaxLines_Warning_Label = Nothing
Me.txtT1VerzollungsadresseATANr.Name = "txtT1VerzollungsadresseATANr"
Me.txtT1VerzollungsadresseATANr.Size = New System.Drawing.Size(269, 20)
Me.txtT1VerzollungsadresseATANr.TabIndex = 17
'
'Label4
'
Me.Label4.AutoSize = True
Me.Label4.Location = New System.Drawing.Point(23, 96)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(45, 13)
Me.Label4.TabIndex = 20
Me.Label4.Text = "ATA-Nr:"
'
'cbxNCTSAufDispo
'
Me.cbxNCTSAufDispo.AutoSize = True
@@ -113,7 +150,7 @@ Partial Class usrCntlSND_NCTSGestellungsadresse
Me.txtT1Verzollungsadresse.key_visible = False
Me.txtT1Verzollungsadresse.KEYPARAM = Nothing
Me.txtT1Verzollungsadresse.Location = New System.Drawing.Point(121, 11)
Me.txtT1Verzollungsadresse.MaxLength = 35
Me.txtT1Verzollungsadresse.MaxLength = 50
Me.txtT1Verzollungsadresse.Name = "txtT1Verzollungsadresse"
Me.txtT1Verzollungsadresse.searchActive = True
Me.txtT1Verzollungsadresse.Size = New System.Drawing.Size(269, 20)
@@ -424,7 +461,7 @@ Partial Class usrCntlSND_NCTSGestellungsadresse
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.Controls.Add(Me.pnlT1)
Me.Name = "usrCntlSND_NCTSGestellungsadresse"
Me.Size = New System.Drawing.Size(549, 94)
Me.Size = New System.Drawing.Size(549, 115)
Me.pnlT1.ResumeLayout(False)
Me.pnlT1.PerformLayout()
CType(Me.picDel, System.ComponentModel.ISupportInitialize).EndInit()
@@ -452,4 +489,6 @@ Partial Class usrCntlSND_NCTSGestellungsadresse
Friend WithEvents cbxNCTSAufDispo As CheckBox
Public WithEvents txtT1Verzollungsadresse As VERAG_PROG_ALLGEMEIN.MySearchBox
Public WithEvents txtT1VerzollungsadresseBestimmungszollstelle As VERAG_PROG_ALLGEMEIN.MySearchBox
Friend WithEvents txtT1VerzollungsadresseATANr As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents Label4 As Label
End Class

2
Aviso/usrCntlSND_NCTSGestellungsadresse.vb
View File

@@ -34,6 +34,7 @@
txtT1VerzollungsadresseEORI.Text = If(NCTS_GA.nga_EORI, "")
txtT1VerzollungsadresseEORI_NL.Text = If(NCTS_GA.nga_EORI_NL, "")
txtT1VerzollungsadresseBestimmungszollstelle.SET_VALUE(If(NCTS_GA.nga_bestZollst, ""))
txtT1VerzollungsadresseATANr.Text = If(NCTS_GA.nga_ATANr, "")
lblNGAId.Text = If(NCTS_GA.nga_id > 0, NCTS_GA.nga_id, "-")
@@ -52,6 +53,7 @@
NCTS_GA.nga_EORI = VERAG_PROG_ALLGEMEIN.SQL.isNullNothing(txtT1VerzollungsadresseEORI.Text)
NCTS_GA.nga_EORI_NL = VERAG_PROG_ALLGEMEIN.SQL.isNullNothing(txtT1VerzollungsadresseEORI_NL.Text)
NCTS_GA.nga_bestZollst = VERAG_PROG_ALLGEMEIN.SQL.isNullNothing(txtT1VerzollungsadresseBestimmungszollstelle._value)
NCTS_GA.nga_ATANr = VERAG_PROG_ALLGEMEIN.SQL.isNullNothing(txtT1VerzollungsadresseATANr.Text)
End Sub
Private Sub LinkLabel4_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel4.LinkClicked