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

neu

Browse Source
This commit is contained in:
Andreas Luxbauer
2020-10-02 10:37:26 +02:00
parent ce31c2c398
commit 75b12f314d
42 changed files with 1131 additions and 510 deletions
Download Patch File Download Diff File Expand all files Collapse all files

432
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/NCTS/usrCntlATLAS_NCTS_Position.Designer.vb generated
View File

File diff suppressed because it is too large Load Diff

30
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/NCTS/usrCntlATLAS_NCTS_Position.resx
View File

@@ -190,34 +190,4 @@
<metadata name="Marke.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="VpReferenz.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="VpZusatz.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="UlCode.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="DataGridViewComboBoxColumn1.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="UlReferenz.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="UlZusatz.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="PkCode.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="Anzahl.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="Typ.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
<metadata name="Marke.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>True</value>
</metadata>
</root>

9
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/NCTS/usrCntlATLAS_NCTS_Position.vb
View File

@@ -53,10 +53,19 @@
sbPkTyp.initSearchBox(Me.FindForm, " [Code] ,[Description] as Verpackungsart FROM tbl_DY_ZollDE_C0017_PackstueckeVerpackungsarten", {"Code", "Description"}, " (StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()) ", "Code", "Code", , "FMZOLL", , 400, 200)
sbUlArten.initSearchBox(Me.FindForm, " [Code] ,[Description] as Art FROM tbl_DY_ZollDE_C0013_UnterlagenArten", {"Code", "Description"}, " (StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()) ", "Code", "Code", , "FMZOLL", , 400, 200)
sbExportAusLand.initSearchBox(Me.FindForm, " [Code] ,[Description] as Land FROM tbl_DY_ZollDE_C0008_LaenderFull", {"Code", "Description"}, " (StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()) ", "Code", "Code", "Code", "FMZOLL", , 400, 200)
sbBestimmungsland.initSearchBox(Me.FindForm, " [Code] ,[Description] as Land FROM tbl_DY_ZollDE_C0008_LaenderFull", {"Code", "Description"}, " (StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()) ", "Code", "Code", "Code", "FMZOLL", , 400, 200)
sbVersendungsLand.initSearchBox(Me.FindForm, " [Code] ,[Description] as Land FROM tbl_DY_ZollDE_C0008_LaenderFull", {"Code", "Description"}, " (StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()) ", "Code", "Code", "Code", "FMZOLL", , 400, 200)
cboWaehrung.initSearchBox(Me.FindForm, " [Code] ,[Description] as Land FROM [tbl_DY_ZollDE_I0400_Waehrungsliste]", {"Code", "Description"}, " (StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()) ", "Code", "Code", "Code", "FMZOLL", , 400, 200)
cboArtAnmeldung.Items.Clear()
cboArtAnmeldung.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("", ""))
cboArtAnmeldung.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("T1 - Versandanmeldung T1 Waren, die im externen gemeinschaftlichen/gemeinsamen Versandverfahren befördert werden sollen.", "T1"))
cboArtAnmeldung.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("T2 - Versandanmeldung T2 Waren, die - soweit nicht das T2F-Verfahren vorgeschrieben ist - im internen gemeinschaftlichen Versandverfahren befördert werden sollen", "T2"))
cboArtAnmeldung.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("T2F - Versandanmeldung T2F Waren, die im Linienverkehr zwischen Teilen des Zollgebiets der Gemeinschaft, in denen die Richtlinie 77/388/EWG (6. Mehrwertsteuerrichtlinie) Anwendung findet und den Teilen des Zollgebiets der Gemeinschaft, in denen diese Richtlinie nicht gilt (siehe Titel I, Absatz 3) im internen gemeinschaftlichen Versandverfahren befördert werden sollen.", "T2F"))
cboVpTyp.Items.Clear()
For Each v In (New cVorpapierTypen).LIST
cboVpTyp.Items.Add(v)

8
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/NCTS/usrCntlATLAS_NCTS_Positionen.vb
View File

@@ -266,16 +266,14 @@
' POSITION.nctsWP_NctsId = NCTS.ncts_Id
POSITION.nctsWP_PositionsNummer = cnt
POSITION.nctsWP_Warennummer = cProgramFunctions.isLeerNothingDbl(P.txtWarennummer.Text)
'POSITION.nctsWP_ArtAnmeldungPositionCode = P.XXXXXXXXXXXX.Text
POSITION.nctsWP_ArtAnmeldungPositionCode = cProgramFunctions.isLeerNothing(P.cboArtAnmeldung._value)
POSITION.nctsWP_Warenbezeichnung = P.txtWarenbezeichnung.Text
POSITION.nctsWP_Warenwert = cProgramFunctions.isLeerNothingDbl(P.txtWarenwert._value)
POSITION.nctsWP_WarenwertProzent = cProgramFunctions.isLeerNothingDbl(P.txtSiBetragProzent._value)
POSITION.nctsWP_WarenwertWaehrung = cProgramFunctions.isLeerNothing(P.cboWaehrung._value)
'POSITION.nctsWP_WarenwertWaehrung = P.XXXXXXXXXXXX.Text
'POSITION.nctsWP_SchaetzKz = P.XXXXXXXXXXXX.Text
'POSITION.nctsWP_WarenwertProzent = P.XXXXXXXXXXXX.Text
'POSITION.nctsWP_VersendungslandPositionCode = P.XXXXXXXXXXXX.Text
'POSITION.nctsWP_BestimmungslandPositionCode = P.XXXXXXXXXXXX.Text
'POSITION.nctsWP_WarenwertProzent = P.XXXXXXXXXXXX.Text
POSITION.nctsWP_Rohmasse = cProgramFunctions.isLeerNothingDbl(P.txtRohmasse.Text)
POSITION.nctsWP_Eigenmasse = cProgramFunctions.isLeerNothingDbl(P.txtEigenmasse.Text)
@@ -286,6 +284,8 @@
POSITION.nctsWP_BesondereVermeke_ExportAbgaben = P.cbxEmportAbgaben.Checked
POSITION.nctsWP_BesondereVermeke_ExportBeschraenkung = P.cbxEmportBeschraernkung.Checked
POSITION.nctsWP_BesondereVermeke_ExportAusEU = P.cbxExportAusEU.Checked
POSITION.nctsWP_VersendungslandPositionCode = cProgramFunctions.isLeerNothing(P.sbVersendungsLand._value)
POSITION.nctsWP_BestimmungslandPositionCode = cProgramFunctions.isLeerNothing(P.sbBestimmungsland._value)
If P.cbxExportAusEU.CheckState = CheckState.Checked Then
POSITION.nctsWP_BesondereVermeke_ExportAusEU = True