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

Artikelstamm, EZA Vorlagen XLS, WiseApi

Browse Source
This commit is contained in:
Andreas Luxbauer
2025-12-09 14:57:08 +01:00
parent ccdd963fd6
commit 69489d9eaf
26 changed files with 5103 additions and 1623 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
SDL/My Project/Resources.Designer.vb generated
View File

@@ -2871,6 +2871,16 @@ Namespace My.Resources
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>
Friend ReadOnly Property zauberstab() As System.Drawing.Bitmap
Get
Dim obj As Object = ResourceManager.GetObject("zauberstab", resourceCulture)
Return CType(obj,System.Drawing.Bitmap)
End Get
End Property
'''<summary>
''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap.
'''</summary>

311
SDL/My Project/Resources.resx
View File

@@ -151,44 +151,38 @@
<data name="person1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\person.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Detailauswertung_divers" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Detailauswertung_divers.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="verag_Card1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\verag_Card1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="house1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\house1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="word" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\word.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="pdf1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pdf1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="plose_it" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\plose_it.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="mse" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\mse.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ambar_simple1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ambar_simple1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="LEX" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\LEX.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="pay_card_s" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pay_card_s.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="positionen" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\liste-logo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="fax" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\fax.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ambar_simple" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ambar_simple.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="email_print" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email_print.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Kostenkalkulation_CS" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Kostenkalkulation_CS.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="WAI" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\WAI.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="toll_collect" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\toll-collect.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="dakosy1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\dakosy1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -199,15 +193,15 @@
<data name="statistik2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\statistik2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="FrontOfficeSUB_Horizontal" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Logo_blue_globe_Horizontal.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="IMEX_LOGO_AEO_sig" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\IMEX-LOGO-AEO_sig.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="food" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\food1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="stift1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\stift1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="mic_logo___short" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\mic-logo - short.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -223,6 +217,9 @@
<data name="uhr_red" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\uhr_red.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="beleg" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\beleg.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="pay_card_s1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pay_card_s1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -244,9 +241,6 @@
<data name="add_person" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\android-add-contact.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="zoll" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\zoll.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="_exit" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\exit.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -256,6 +250,9 @@
<data name="sanduhr" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\sanduhr.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Kostenkalkulation" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Kostenkalkulation.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="Atilla_big" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Atilla_big.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -271,27 +268,21 @@
<data name="beleg_small" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\beleg1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="therefore" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\therefore.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="ze_gehen" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ze_gehen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="positionen_small" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\liste-logo1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="RG_ZF_NEW" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\RG_ZF_NEW.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="pfeil_oben" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pfeil_oben.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Route5" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Route5.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="warenkorb1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\warenkorb1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Atilla" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Atilla.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="plose_big" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\plose_big.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="cbam_s" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\cbam_s.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -304,11 +295,8 @@
<data name="person_default" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\person_default.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Atilla__sig" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Atilla _sig.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Einheitspapier_0735_Position" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Einheitspapier-0735_Position.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="axxes1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\axxes.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="entwurf" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\entwurf.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -322,8 +310,8 @@
<data name="ze_kommen" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ze_kommen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Einheitspapier_0735_top" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Einheitspapier-0735_top.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Route4" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Route4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="flagge_tr" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\flagge_tr.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -343,15 +331,12 @@
<data name="frejus" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\frejus.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ze_gehen" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ze_gehen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="ico_greenpulse" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ico_greenpulse.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Plakette" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Plakette.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Auswertung_divers" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Auswertung_divers.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="pfeil_unten" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pfeil_unten.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -364,27 +349,30 @@
<data name="Atilla_big_med" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Atilla_big1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="list_new_small2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\list_new_small2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Einheitspapier_0777_kurz" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Einheitspapier-0777_kurz.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="lorry_motion" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\lorry_motion.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="picboxRotateLeft_Enter" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\picboxRotateLeft_Enter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="CBAM_Auswertung_GP" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\CBAM_Auswertung_GP.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="Route1_IR" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Route1_IR.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="zoll" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\zoll.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="uhr_green" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\uhr_green.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="ok_gray" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ok_gray.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="statistik" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\statistik.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="pfeil_rechts" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pfeil_rechts.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="aeo_CS" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\aeo_CS.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -400,14 +388,17 @@
<data name="sgs" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\sgs.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Route1_IR" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Route1_IR.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="passpic" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\passpic.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="house" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\house.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="seal2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\seal2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="therefore" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\therefore.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Verag_Customs_Service_GMBH_Logo_sig" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Verag-Customs-Service-GMBH-Logo_sig.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -415,6 +406,9 @@
<data name="Unisped_logo" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Unisped_logo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="sicherheit11" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\sicherheit1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="spedbuch" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\spedbuch.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -445,8 +439,8 @@
<data name="list_new_small" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\list_new_small.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="moneybag" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\moneybag.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="uhr_green" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\uhr_green.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="print_sr" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\print_sr.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -460,11 +454,8 @@
<data name="Excel_logo" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Excel_2013_logo-155x110.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="compose" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\compose.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ambar_simple1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ambar_simple1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="moneybag" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\moneybag.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="picboxNext_Enter" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\picboxNext_Enter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -472,6 +463,9 @@
<data name="handy" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\handy.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="changeKd" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\android-friends.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="locked" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\locked.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -481,27 +475,33 @@
<data name="cards1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\cards1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="picboxRotateRight_Enter" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\picboxRotateRight_Enter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="spedbuch1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\spedbuch1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="RG_ZF_NEW" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\RG_ZF_NEW.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
<data name="search" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\search.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="picboxPrevious_Enter" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\picboxPrevious_Enter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="flagge_D" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\flagge_D.gif;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Route4_IR" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Route4_IR.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="email_big_gray" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email_big_gray.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="VERAG_360" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\VERAG_360.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Info" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\info.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
</data>
<data name="Kostenkalkulation_IMEX" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Kostenkalkulation_IMEX.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="ungueltig_de" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ungueltig_de.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="VERAG_AEO_MailSig" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\VERAG_AEO_MailSig.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -514,20 +514,17 @@
<data name="checklist" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\checklist.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Verag_AG_Logo_med" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Verag-AG-Logo21.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="data" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\data.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Einheitspapier_0735_bottom" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Einheitspapier-0735_bottom.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="unisped_aeo_ZS_AT" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\unisped_aeo_ZS_AT.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ok_gray" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ok_gray.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Verag_AG_Logo_DE" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Verag-AG-Logo_DE.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="pay_card" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pay_card.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="chimes2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\chimes.wav;System.IO.MemoryStream, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
@@ -544,8 +541,8 @@
<data name="Verag_Spedition_GMBH_Logo_med" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Verag-Spedition-GMBH-Logo1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="picboxPrevious_Enter" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\picboxPrevious_Enter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Auswertung_divers" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Auswertung_divers.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="Route2_IR" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Route2_IR.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -556,8 +553,8 @@
<data name="awor" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\..\..\data\awor.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="asfinag" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\asfinag.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="WAI" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\WAI.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Verag-AG-Logo" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Verag-AG-Logo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -568,9 +565,6 @@
<data name="ungueltig_en" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ungueltig_en.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Verag_AG_Logo2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Verag-AG-Logo2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="uhr_notime" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\uhr_notime.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -583,14 +577,17 @@
<data name="arrow_right" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\arrow_right.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="uta" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\uta.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="SBG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\SBG.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Route4" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Route4.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Verag_Customs_Service_AEO" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\..\..\..\AVISO\Aviso\Diverses\Verag_Customs_Service_AEO.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="pay_card_s" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pay_card_s.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Customs_Clearance_Template" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Customs_Clearance_Template.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="woelfl_bg" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\woelfl.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -598,8 +595,8 @@
<data name="list1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\android-note11.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="axxes" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\axxes.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Plakette1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Plakette1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="email1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -610,15 +607,12 @@
<data name="person" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\person.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="IMEX-LOGO_simple" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\IMEX-LOGO_simple.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="email_big" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email_big.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="aktiveVeredelung1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\aktiveVeredelung1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="email_print1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email_print1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="cards" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\cards.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -649,8 +643,8 @@
<data name="telepass" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\telepass.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="picboxZoomOut_Enter1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\picboxZoomOut_Enter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="positionen_small" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\liste-logo1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Einheitspapier_07771" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Einheitspapier-0777.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -664,8 +658,8 @@
<data name="transp" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\transp.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="changeKd" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\android-friends.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="uta" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\uta.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="LKW" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\LKW1.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -682,8 +676,8 @@
<data name="plose_1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\plose_1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="pay_card" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pay_card.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Route4_IR" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Route4_IR.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="statistik_small" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\statistik1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -694,8 +688,8 @@
<data name="android-add-contact" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\android-add-contact1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="search" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\search.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="plose_big" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\plose_big.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="pdf_gray" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pdf_gray.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -715,17 +709,20 @@
<data name="xml_gray" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\xml_gray.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="abc_obu" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\abc_obu.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="unisped_aeo_DE" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\unisped_aeo_DE.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="email_big_gray" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email_big_gray.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Atilla__sig" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Atilla _sig.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ambar_boarder" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ambar_boarder.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="vorauszahlung" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\vorauszahlung.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="stift1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\stift1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="open" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\open.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -736,6 +733,9 @@
<data name="creditsafe_add1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\creditsafe_add1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="picboxZoomOut_Enter1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\picboxZoomOut_Enter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="fragezeichen" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\fragezeichen.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -754,14 +754,17 @@
<data name="passpic_sw" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\passpic_sw.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="today" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\today.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Verag_Customs_Service_GMBH_Logo" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Verag-Customs-Service-GMBH-Logo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Route3" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Route3.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="FrontOfficeSUB_Horizontal" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Logo_blue_globe_Horizontal.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="compose" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\compose.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="transfer" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\transfer.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -769,11 +772,11 @@
<data name="email" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="axxes1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\axxes.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="ungueltig_de" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ungueltig_de.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="toll_collect" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\toll-collect.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Route5" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Route5.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="FA_Graz_EV_Veranlagung_Muster" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\FA_Graz_EV-Veranlagung_Muster.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
@@ -781,20 +784,20 @@
<data name="seal" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\seal.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="abc_obu" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\abc_obu.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="picboxRotateLeft_Enter" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\picboxRotateLeft_Enter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="vorauszahlung1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\vorauszahlung1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Info" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\info.txt;System.String, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089;utf-8</value>
<data name="seal2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\seal2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="LKW_klein1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Aviso1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="picboxRotateRight_Enter" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\picboxRotateRight_Enter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="fax" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\fax.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="aeo_DE" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\aeo_DE.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -802,17 +805,20 @@
<data name="SR_EVOLOG" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\SR_EVOLOG.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="SR_TransFerry360" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\SR_TransFerry360.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="flagge_gb" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\..\..\data\flagge_gb.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="SR_TransFerry360" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\SR_TransFerry360.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
<data name="Einheitspapier_0735_bottom" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Einheitspapier-0735_bottom.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="documents" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\documents.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="today" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\today.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Einheitspapier_0735_top" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Einheitspapier-0735_top.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="android-note12" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\android-note12.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -820,8 +826,8 @@
<data name="print_rg" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\print_rg.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="plose_it" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\plose_it.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="axxes" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\axxes.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="road" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\road.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -829,17 +835,17 @@
<data name="Unisped_ZS_logo" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Unisped_ZS_logo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="email_big" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email_big.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Einheitspapier_0735_Position" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Einheitspapier-0735_Position.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="beleg_rot_small" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\beleg_rot1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="list_new_small2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\list_new_small2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="pdf1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pdf1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="pfeil_rechts" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\pfeil_rechts.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="asfinag" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\asfinag.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="modaltrans_original" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\modaltrans_original.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -850,11 +856,14 @@
<data name="email_big1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email_big1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Verag_Customs_Service_AEO" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\..\..\..\AVISO\Aviso\Diverses\Verag_Customs_Service_AEO.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="unisped_aeo_AT" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\unisped_aeo_AT.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Kostenkalkulation" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Kostenkalkulation.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
<data name="vorauszahlung" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\vorauszahlung.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="email_print" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email_print.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="sicherheit1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\sicherheit1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -871,14 +880,14 @@
<data name="Route2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Route2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="unisped_aeo_AT" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\unisped_aeo_AT.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Detailauswertung_divers" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Detailauswertung_divers.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</data>
<data name="verag_only" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\verag_only.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Verag_AG_Logo_DE" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Verag-AG-Logo_DE.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Verag_AG_Logo2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Verag-AG-Logo2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Verag_Customs_Service_GMBH_Logo_med" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Verag-Customs-Service-GMBH-Logo2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -886,8 +895,8 @@
<data name="linked" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\linked.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="beleg" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\beleg.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="IMEX-LOGO_simple" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\IMEX-LOGO_simple.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="pin" xml:space="preserve">
<value>VERAGZoll1</value>
@@ -910,8 +919,8 @@
<data name="kasse" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\kasse.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="sicherheit11" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\sicherheit1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="email_print1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email_print1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="VERAG_UNISPED_Logo" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\VERAG-UNISPED-Logo.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -925,17 +934,14 @@
<data name="picboxZoomOut_Enter" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\picboxZoomOut_Enter.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="del_small" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\del1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="scanner1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\scanner1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="aeo" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\aeo.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="house1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\house1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="del_small" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\del1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="rechnung" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\rechnung.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -946,8 +952,8 @@
<data name="checklist1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\checklist.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Plakette1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Plakette1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
<data name="Verag_AG_Logo_med" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Verag-AG-Logo21.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="food2" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\food2.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
@@ -961,10 +967,7 @@
<data name="durmaz" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\durmaz.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="ico_greenpulse" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\ico_greenpulse.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<data name="Customs_Clearance_Template" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Customs_Clearance_Template.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
<data name="zauberstab" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\zauberstab.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
</root>

BIN
SDL/Resources/Customs_Clearance_Template_V1.1.xlsx Normal file
View File

Binary file not shown.

BIN
SDL/Resources/zauberstab.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 1.4 KiB

13
SDL/SDL.vbproj
View File

@@ -1278,6 +1278,12 @@
<Compile Include="ZOLLSYSTEM\DAKOSY\ATLAS\EXGestellung\usrCntlATLAS_EXGestellung.vb">
<SubType>UserControl</SubType>
</Compile>
<Compile Include="ZOLLSYSTEM\DAKOSY\ATLAS\EZA\cATLAS_EZA_IMPORT.Designer.vb">
<DependentUpon>cATLAS_EZA_IMPORT.vb</DependentUpon>
</Compile>
<Compile Include="ZOLLSYSTEM\DAKOSY\ATLAS\EZA\cATLAS_EZA_IMPORT.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="ZOLLSYSTEM\DAKOSY\ATLAS\EZA\usrCntlATLAS_EZA.Designer.vb">
<DependentUpon>usrCntlATLAS_EZA.vb</DependentUpon>
</Compile>
@@ -3729,6 +3735,9 @@
<EmbeddedResource Include="ZOLLSYSTEM\DAKOSY\ATLAS\EXGestellung\usrCntlATLAS_EXGestellung.resx">
<DependentUpon>usrCntlATLAS_EXGestellung.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="ZOLLSYSTEM\DAKOSY\ATLAS\EZA\cATLAS_EZA_IMPORT.resx">
<DependentUpon>cATLAS_EZA_IMPORT.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="ZOLLSYSTEM\DAKOSY\ATLAS\EZA\usrCntlATLAS_EZA.resx">
<DependentUpon>usrCntlATLAS_EZA.vb</DependentUpon>
</EmbeddedResource>
@@ -4768,6 +4777,9 @@
<None Include="Resources\Auswertung_divers.xlsx" />
<None Include="Resources\CBAM_Auswertung_GP.xlsx" />
<None Include="Resources\CBAM_GP.xlsx" />
<None Include="Resources\Customs_Clearance_Template_V1.1.xlsx">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</None>
<None Include="Resources\Customs_Clearance_Template.xlsx" />
<None Include="Resources\Detailauswertung_divers.xlsx" />
<None Include="Resources\FA_Graz_EV-Veranlagung_Muster.xlsx">
@@ -5178,6 +5190,7 @@
<None Include="Resources\search.png" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\zauberstab.png" />
<None Include="Resources\Verag_Customs_Service_AEO1.jpg">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</None>

258
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/EZA/cATLAS_EZA_IMPORT.Designer.vb generated Normal file
View File

@@ -0,0 +1,258 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class cATLAS_EZA_IMPORT
Inherits System.Windows.Forms.Form
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Wird vom Windows Form-Designer benötigt.
Private components As System.ComponentModel.IContainer
'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich.
'Das Bearbeiten ist mit dem Windows Form-Designer möglich.
'Das Bearbeiten mit dem Code-Editor ist nicht möglich.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(cATLAS_EZA_IMPORT))
Me.Button1 = New System.Windows.Forms.Button()
Me.Button2 = New System.Windows.Forms.Button()
Me.Button3 = New System.Windows.Forms.Button()
Me.Button4 = New System.Windows.Forms.Button()
Me.Button5 = New System.Windows.Forms.Button()
Me.Button6 = New System.Windows.Forms.Button()
Me.Label1 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
Me.cbxGezeKN8 = New System.Windows.Forms.CheckBox()
Me.cbxGezeTranslate = New System.Windows.Forms.CheckBox()
Me.cbxVERAG_V1_translate = New System.Windows.Forms.CheckBox()
Me.cbxVERAG_V1_Kn8 = New System.Windows.Forms.CheckBox()
Me.cbxGezeTNR8to11 = New System.Windows.Forms.CheckBox()
Me.cbxVERAG_V1_TNR8to11 = New System.Windows.Forms.CheckBox()
Me.Button7 = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'Button1
'
Me.Button1.Image = Global.SDL.My.Resources.Resources.Excel_logo
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.Button1.Location = New System.Drawing.Point(4, 35)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(130, 71)
Me.Button1.TabIndex = 0
Me.Button1.Text = "VERAG Template" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "importieren"
Me.Button1.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.Button1.UseVisualStyleBackColor = True
'
'Button2
'
Me.Button2.Image = Global.SDL.My.Resources.Resources.Excel_logo
Me.Button2.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.Button2.Location = New System.Drawing.Point(140, 209)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(130, 71)
Me.Button2.TabIndex = 1
Me.Button2.Text = "MEYLE" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "importieren"
Me.Button2.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.Button2.UseVisualStyleBackColor = True
'
'Button3
'
Me.Button3.Image = Global.SDL.My.Resources.Resources.Excel_logo
Me.Button3.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.Button3.Location = New System.Drawing.Point(4, 209)
Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(130, 71)
Me.Button3.TabIndex = 2
Me.Button3.Text = "GEZE" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "importieren"
Me.Button3.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.Button3.UseVisualStyleBackColor = True
'
'Button4
'
Me.Button4.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
Me.Button4.Image = Global.SDL.My.Resources.Resources.Excel_logo
Me.Button4.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.Button4.Location = New System.Drawing.Point(276, 35)
Me.Button4.Name = "Button4"
Me.Button4.Size = New System.Drawing.Size(130, 71)
Me.Button4.TabIndex = 3
Me.Button4.Text = "VERAG Template V1 " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Vorlage öffnen"
Me.Button4.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.Button4.UseVisualStyleBackColor = False
'
'Button5
'
Me.Button5.Image = Global.SDL.My.Resources.Resources.Excel_logo
Me.Button5.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.Button5.Location = New System.Drawing.Point(276, 209)
Me.Button5.Name = "Button5"
Me.Button5.Size = New System.Drawing.Size(130, 71)
Me.Button5.TabIndex = 4
Me.Button5.Text = "Fressnapf " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "importieren"
Me.Button5.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.Button5.UseVisualStyleBackColor = True
'
'Button6
'
Me.Button6.Image = Global.SDL.My.Resources.Resources.Excel_logo
Me.Button6.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.Button6.Location = New System.Drawing.Point(412, 209)
Me.Button6.Name = "Button6"
Me.Button6.Size = New System.Drawing.Size(130, 71)
Me.Button6.TabIndex = 5
Me.Button6.Text = "Dynamic Automotiv importieren"
Me.Button6.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.Button6.UseVisualStyleBackColor = True
'
'Label1
'
Me.Label1.AutoSize = True
Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label1.Location = New System.Drawing.Point(12, 16)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(89, 13)
Me.Label1.TabIndex = 6
Me.Label1.Text = "VERAG Vorlagen"
'
'Label2
'
Me.Label2.AutoSize = True
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Underline, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label2.Location = New System.Drawing.Point(12, 193)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(98, 13)
Me.Label2.TabIndex = 7
Me.Label2.Text = "KUNDEN Vorlagen"
'
'cbxGezeKN8
'
Me.cbxGezeKN8.AutoSize = True
Me.cbxGezeKN8.Checked = True
Me.cbxGezeKN8.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxGezeKN8.Location = New System.Drawing.Point(12, 287)
Me.cbxGezeKN8.Name = "cbxGezeKN8"
Me.cbxGezeKN8.Size = New System.Drawing.Size(118, 17)
Me.cbxGezeKN8.TabIndex = 8
Me.cbxGezeKN8.Text = "KN8 Text ergänzen"
Me.cbxGezeKN8.UseVisualStyleBackColor = True
'
'cbxGezeTranslate
'
Me.cbxGezeTranslate.AutoSize = True
Me.cbxGezeTranslate.Location = New System.Drawing.Point(12, 305)
Me.cbxGezeTranslate.Name = "cbxGezeTranslate"
Me.cbxGezeTranslate.Size = New System.Drawing.Size(78, 17)
Me.cbxGezeTranslate.TabIndex = 9
Me.cbxGezeTranslate.Text = "übersetzen"
Me.cbxGezeTranslate.UseVisualStyleBackColor = True
'
'cbxVERAG_V1_translate
'
Me.cbxVERAG_V1_translate.AutoSize = True
Me.cbxVERAG_V1_translate.Location = New System.Drawing.Point(12, 130)
Me.cbxVERAG_V1_translate.Name = "cbxVERAG_V1_translate"
Me.cbxVERAG_V1_translate.Size = New System.Drawing.Size(78, 17)
Me.cbxVERAG_V1_translate.TabIndex = 11
Me.cbxVERAG_V1_translate.Text = "übersetzen"
Me.cbxVERAG_V1_translate.UseVisualStyleBackColor = True
'
'cbxVERAG_V1_Kn8
'
Me.cbxVERAG_V1_Kn8.AutoSize = True
Me.cbxVERAG_V1_Kn8.Checked = True
Me.cbxVERAG_V1_Kn8.CheckState = System.Windows.Forms.CheckState.Checked
Me.cbxVERAG_V1_Kn8.Location = New System.Drawing.Point(12, 112)
Me.cbxVERAG_V1_Kn8.Name = "cbxVERAG_V1_Kn8"
Me.cbxVERAG_V1_Kn8.Size = New System.Drawing.Size(118, 17)
Me.cbxVERAG_V1_Kn8.TabIndex = 10
Me.cbxVERAG_V1_Kn8.Text = "KN8 Text ergänzen"
Me.cbxVERAG_V1_Kn8.UseVisualStyleBackColor = True
'
'cbxGezeTNR8to11
'
Me.cbxGezeTNR8to11.AutoSize = True
Me.cbxGezeTNR8to11.Location = New System.Drawing.Point(12, 323)
Me.cbxGezeTNR8to11.Name = "cbxGezeTNR8to11"
Me.cbxGezeTNR8to11.Size = New System.Drawing.Size(126, 17)
Me.cbxGezeTNR8to11.TabIndex = 12
Me.cbxGezeTNR8to11.Text = "unvollst.TNR ergänz."
Me.cbxGezeTNR8to11.UseVisualStyleBackColor = True
'
'cbxVERAG_V1_TNR8to11
'
Me.cbxVERAG_V1_TNR8to11.AutoSize = True
Me.cbxVERAG_V1_TNR8to11.Location = New System.Drawing.Point(12, 149)
Me.cbxVERAG_V1_TNR8to11.Name = "cbxVERAG_V1_TNR8to11"
Me.cbxVERAG_V1_TNR8to11.Size = New System.Drawing.Size(126, 17)
Me.cbxVERAG_V1_TNR8to11.TabIndex = 13
Me.cbxVERAG_V1_TNR8to11.Text = "unvollst.TNR ergänz."
Me.cbxVERAG_V1_TNR8to11.UseVisualStyleBackColor = True
'
'Button7
'
Me.Button7.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer))
Me.Button7.Image = Global.SDL.My.Resources.Resources.Excel_logo
Me.Button7.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.Button7.Location = New System.Drawing.Point(412, 35)
Me.Button7.Name = "Button7"
Me.Button7.Size = New System.Drawing.Size(130, 71)
Me.Button7.TabIndex = 14
Me.Button7.Text = "VERAG Template V1.1 " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Vorlage öffnen"
Me.Button7.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.Button7.UseVisualStyleBackColor = False
'
'cATLAS_EZA_IMPORT
'
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(563, 355)
Me.Controls.Add(Me.Button7)
Me.Controls.Add(Me.cbxVERAG_V1_TNR8to11)
Me.Controls.Add(Me.cbxGezeTNR8to11)
Me.Controls.Add(Me.cbxVERAG_V1_translate)
Me.Controls.Add(Me.cbxVERAG_V1_Kn8)
Me.Controls.Add(Me.cbxGezeTranslate)
Me.Controls.Add(Me.cbxGezeKN8)
Me.Controls.Add(Me.Label2)
Me.Controls.Add(Me.Label1)
Me.Controls.Add(Me.Button6)
Me.Controls.Add(Me.Button5)
Me.Controls.Add(Me.Button4)
Me.Controls.Add(Me.Button3)
Me.Controls.Add(Me.Button2)
Me.Controls.Add(Me.Button1)
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "cATLAS_EZA_IMPORT"
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
Me.Text = "DATEN IMPORT"
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents Button1 As Button
Friend WithEvents Button2 As Button
Friend WithEvents Button3 As Button
Friend WithEvents Button4 As Button
Friend WithEvents Button5 As Button
Friend WithEvents Button6 As Button
Friend WithEvents Label1 As Label
Friend WithEvents Label2 As Label
Friend WithEvents cbxGezeKN8 As CheckBox
Friend WithEvents cbxGezeTranslate As CheckBox
Friend WithEvents cbxVERAG_V1_translate As CheckBox
Friend WithEvents cbxVERAG_V1_Kn8 As CheckBox
Friend WithEvents cbxGezeTNR8to11 As CheckBox
Friend WithEvents cbxVERAG_V1_TNR8to11 As CheckBox
Friend WithEvents Button7 As Button
End Class

1253
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/EZA/cATLAS_EZA_IMPORT.resx Normal file
View File

File diff suppressed because it is too large Load Diff

1546
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/EZA/cATLAS_EZA_IMPORT.vb Normal file
View File

File diff suppressed because it is too large Load Diff

14
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/EZA/usrCntlATLAS_EZA.Designer.vb generated
View File

@@ -59,9 +59,9 @@ Partial Class usrCntlATLAS_EZA
Me.MEYLEXLSXToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.FressnapToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.VERAGIMPORTFormatToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.VERAGFormatÖffnen2025V1ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.EZAIDToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.VERAGFormatÖffnen2025V1ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainer.Panel1.SuspendLayout()
Me.SplitContainer.SuspendLayout()
@@ -483,6 +483,12 @@ Partial Class usrCntlATLAS_EZA
Me.VERAGIMPORTFormatToolStripMenuItem.Size = New System.Drawing.Size(244, 22)
Me.VERAGIMPORTFormatToolStripMenuItem.Text = "VERAG-IMPORT-Format (XLSX)"
'
'VERAGFormatÖffnen2025V1ToolStripMenuItem
'
Me.VERAGFormatÖffnen2025V1ToolStripMenuItem.Name = "VERAGFormatÖffnen2025V1ToolStripMenuItem"
Me.VERAGFormatÖffnen2025V1ToolStripMenuItem.Size = New System.Drawing.Size(244, 22)
Me.VERAGFormatÖffnen2025V1ToolStripMenuItem.Text = "VERAG-Format öffnen (2025-V1)"
'
'ToolStripMenuItem1
'
Me.ToolStripMenuItem1.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.EZAIDToolStripMenuItem})
@@ -496,12 +502,6 @@ Partial Class usrCntlATLAS_EZA
Me.EZAIDToolStripMenuItem.Size = New System.Drawing.Size(109, 22)
Me.EZAIDToolStripMenuItem.Text = "EZA ID"
'
'VERAGFormatÖffnen2025V1ToolStripMenuItem
'
Me.VERAGFormatÖffnen2025V1ToolStripMenuItem.Name = "VERAGFormatÖffnen2025V1ToolStripMenuItem"
Me.VERAGFormatÖffnen2025V1ToolStripMenuItem.Size = New System.Drawing.Size(244, 22)
Me.VERAGFormatÖffnen2025V1ToolStripMenuItem.Text = "VERAG-Format öffnen (2025-V1)"
'
'usrCntlATLAS_EZA
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)

1354
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/EZA/usrCntlATLAS_EZA.vb
View File

File diff suppressed because it is too large Load Diff

40
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/EZA/usrCntlATLAS_EZA_Position.Designer.vb generated
View File

@@ -85,6 +85,8 @@ Partial Class usrCntlATLAS_EZA_Position
Me.Label2 = New System.Windows.Forms.Label()
Me.Label29 = New System.Windows.Forms.Label()
Me.Label11 = New System.Windows.Forms.Label()
Me.sbPraeferenzursprungsland = New VERAG_PROG_ALLGEMEIN.MySearchBox()
Me.Label13 = New System.Windows.Forms.Label()
Me.pnl.SuspendLayout()
CType(Me.dgvUnterlage, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
@@ -93,6 +95,8 @@ Partial Class usrCntlATLAS_EZA_Position
'
Me.pnl.AutoScroll = True
Me.pnl.BackColor = System.Drawing.Color.FloralWhite
Me.pnl.Controls.Add(Me.sbPraeferenzursprungsland)
Me.pnl.Controls.Add(Me.Label13)
Me.pnl.Controls.Add(Me.txtArtikelpreisWaehrung)
Me.pnl.Controls.Add(Me.sbAHStatMasseinheit)
Me.pnl.Controls.Add(Me.Label12)
@@ -1037,6 +1041,40 @@ Partial Class usrCntlATLAS_EZA_Position
Me.Label11.Text = "Ursprungsland:"
Me.Label11.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'sbPraeferenzursprungsland
'
Me.sbPraeferenzursprungsland._allowFreitext = False
Me.sbPraeferenzursprungsland._AllowSetValue = False
Me.sbPraeferenzursprungsland._allowSpaceAsSplitter = False
Me.sbPraeferenzursprungsland._autoSizeGross = False
Me.sbPraeferenzursprungsland._hideIfListEmpty = True
Me.sbPraeferenzursprungsland._value = ""
Me.sbPraeferenzursprungsland.conn_art = "FMZOLL"
Me.sbPraeferenzursprungsland.dgvpos = "LEFT"
Me.sbPraeferenzursprungsland.DISPLAY_PARAM = Nothing
Me.sbPraeferenzursprungsland.INVISIBLE_COLUMNS = Nothing
Me.sbPraeferenzursprungsland.key_visible = False
Me.sbPraeferenzursprungsland.KEYPARAM = Nothing
Me.sbPraeferenzursprungsland.Location = New System.Drawing.Point(628, 320)
Me.sbPraeferenzursprungsland.Name = "sbPraeferenzursprungsland"
Me.sbPraeferenzursprungsland.searchActive = True
Me.sbPraeferenzursprungsland.Size = New System.Drawing.Size(41, 20)
Me.sbPraeferenzursprungsland.SQL_ORDER_BY = Nothing
Me.sbPraeferenzursprungsland.SQL_SELECT = Nothing
Me.sbPraeferenzursprungsland.SQL_WHERE = Nothing
Me.sbPraeferenzursprungsland.SQL_WhereParamList = Nothing
Me.sbPraeferenzursprungsland.TabIndex = 62
Me.sbPraeferenzursprungsland.usrcntl = Nothing
'
'Label13
'
Me.Label13.Location = New System.Drawing.Point(483, 323)
Me.Label13.Name = "Label13"
Me.Label13.Size = New System.Drawing.Size(139, 13)
Me.Label13.TabIndex = 61
Me.Label13.Text = "Präferenz-Ursprungsland:"
Me.Label13.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'usrCntlATLAS_EZA_Position
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -1113,4 +1151,6 @@ Partial Class usrCntlATLAS_EZA_Position
Friend WithEvents txtAHStatMenge As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents sbAHStatMasseinheit As VERAG_PROG_ALLGEMEIN.MySearchBox
Friend WithEvents txtArtikelpreisWaehrung As VERAG_PROG_ALLGEMEIN.MySearchBox
Friend WithEvents sbPraeferenzursprungsland As VERAG_PROG_ALLGEMEIN.MySearchBox
Friend WithEvents Label13 As Label
End Class

18
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/EZA/usrCntlATLAS_EZA_Position.resx
View File

@@ -121,15 +121,15 @@
<data name="Button3.BackgroundImage" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABwAAAAcCAYAAAByDd+UAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAHaSURBVEhLvdW7SlhBFIVh701EGyGKpEjAywv4Aham
iIXaio1dELXwFVRs7ARBQbHSwi5lijTBWhAvfSKExJBKEEWP/8iM7JmzziWKFh/k7Fl7FhgZG7Ise1Vy
6JwPvG9S8+eSQ4fCTrxVZ88hhxQNYgvHdUvJNfq9bXUe5AYs9OEbMq9WKZkmbPidHZVxog+Cb7COa79Y
q5SzHizjD8KOLI0+CJ2ZhZQsZdaLXZ9J5UqjDwLhR1IkV8r3Ii79ufLF5h//ERBYSRZSD6VwvyB7uIXK
OXe4sPdHZQGhOqVryUz5iwl7d1RkEawqdZepefADs+iw90YlKcJVpUVO8VHdmRukWHxK6Qwa1X25gcLy
vrmszFd8QuE7LIcpLljwF1aZV/uWHAZc0I9N/PMXVvmJ0mdQDh0W2+DK1MVlSp9BOWShC0uwb+P/KCzN
DQi+g3tB1EXWoZhZsjT6cAit4sovlZlGnRep294flTnJgnKEKbT7fFXpub0/KnMITCYL1m+MiZ2iUvd3
9cBmo8WA0LhZCn5hDtHbaHZU6QmGbC5asgjaUvd/MaJyFplQegP36gyjxWaihRThUPpZnStkXel3fFDn
uUGKxTG0qrMi5EfRrM5yg5cmhy8na7gHtvbLF9T64qAAAAAASUVORK5CYII=
dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAAHJSURBVEhLvZUxaxVBFIWfRm0STBNQkRQnYI5/IH8g
RSxioWnFxk6CWvgXEkljJwgRFKtY2FmmsBFrQUzszQHRBCshKObJwCwsZ+6+2fCMxdecmXM/2H1732A4
HA7+J0XQIOK0Z/+CImgQMS3igufjUgQJEVdFPBfxqa9UxKnce+FnbYpAxBURb0UMM72k6RWI2Mydl37e
4KVJEU9F/GoJq1IRl0Q8EvG91QmlXvxsoqpUxGURW8H9UOrl5pF0UUhFrIn4GdxteNMpzAM2glIhzT+Q
VyL+BHcajkTsjxQeQ/okyJ0DEStVYU9pGuZZmy8i7ok430vYU9rFrohrPq8qHEO6mhaBz+olzNLXwdCI
bRHLo/ZwEUSIeBgMj3jgXacITDQv4pmIH8HwiD3/Tp0iaMnOZZkPrVEsh6pQxIyIdduNx6FTWgQiZvMG
8SHOhyCrSiPhYxGHwQDnTo9PJkkv1oRecj6KuC1iKt+vSVUT3gpKDd9E3Ag6XdL0v/p+pDAPuBmUv4q4
77uxIt0RsVAVBtL0Lpb8jtOS/s5bZ1HEmfadomQDGuldP+siS9+JmPOzRBE46Z2JOOv5KERcFzHheaII
TpoiOGn+Arb2yxeUX28vAAAAAElFTkSuQmCC
</value>
</data>
<metadata name="UlCode.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">

2
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/EZA/usrCntlATLAS_EZA_Position.vb
View File

@@ -63,6 +63,7 @@
sbAHStatMasseinheit.initSearchBox(Me.FindForm, " CodeQualifier ,[Description] as Art, CodeQualifier + ' ' + Description as display FROM [tbl_DY_ZollDE_I0700_Masseinheiten]", {"CodeQualifier", "Description", "'%'+Code"}, " (StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()) ", "CodeQualifier", "CodeQualifier", "display", "FMZOLL", , 400, 200)
sbUrsprungsland.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)
sbPraeferenzursprungsland.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)
cboZT.Items.Clear()
cboZT.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Absender", "ABS"))
@@ -163,6 +164,7 @@
Me.cboBeguenstigung.changeItem(If(WARE.ezaWP_BeguenstigungBenatragtCode, ""))
Me.sbUrsprungsland.SET_VALUE(If(WARE.ezaWP_UrsprungslandCode, ""))
Me.sbPraeferenzursprungsland.SET_VALUE(If(WARE.ezaWP_Praeferenzursprungsland, ""))

1
SDL/ZOLLSYSTEM/DAKOSY/ATLAS/EZA/usrCntlATLAS_EZA_Positionen.vb
View File

@@ -272,6 +272,7 @@
POSITION.ezaWP_BeguenstigungBenatragtCode = cProgramFunctions.isLeerNothing(P.cboBeguenstigung._value)
POSITION.ezaWP_UrsprungslandCode = cProgramFunctions.isLeerNothing(P.sbUrsprungsland._value)
POSITION.ezaWP_Praeferenzursprungsland = cProgramFunctions.isLeerNothing(P.sbPraeferenzursprungsland._value)
POSITION.ezaWP_UNTERLAGEN = New List(Of DAKOSY_Worker.cDakosy_EZA_WarenpositionVorgelegteUnterlagen)
For Each r As DataGridViewRow In P.dgvUnterlage.Rows

11
SDL/cATLAS_FSS.vb
View File

@@ -230,6 +230,7 @@ Public Class cArtikel
Property Ursprungsland As String = ""
Property Kundennummer As String = ""
Property Warencodenummer As String = ""
Property WarencodenummerUPDATE As String = ""
Property Löschkennzeichen_Warencodenummer As String = ""
Property Zusatzcode_1 As String = ""
Property Löschkennzeichen_Zusatzcode_1 As String = ""
@@ -259,5 +260,15 @@ Public Class cArtikel
Property tmp_rueckgabetextSBG As String = ""
Property tmp_rueckgabeSBG As Boolean = False
Property status As String = ""
Property Y1 As String = ""
Property Y2 As String = ""
Property Y3 As String = ""
Property Y4 As String = ""
Property Y5 As String = ""
Property Y6 As String = ""
Property Y7 As String = ""
Property Y8 As String = ""
Property Y9 As String = ""
Property Y10 As String = ""
End Class

11
SDL/cSqlDb.vb
View File

@@ -401,6 +401,7 @@ Public Class SQLZoll
d.Dynamische_Ergänzung_1 = cSqlDb.checkNullStr(dr.Item("zollArt_Dynamische_Ergaenzung_1"))
d.Dynamische_Ergänzung_1 = cSqlDb.checkNullStr(dr.Item("zollArt_Dynamische_Ergaenzung_2"))
d.WarencodenummerUPDATE = cSqlDb.checkNullStr(dr.Item("zollArt_WarencodenummerUPDATE"))
d.Warencodenummer = cSqlDb.checkNullStr(dr.Item("zollArt_Warencodenummer"))
d.Zusatzcode_1 = cSqlDb.checkNullStr(dr.Item("zollArt_Zusatzcode_1"))
d.Zusatzcode_2 = cSqlDb.checkNullStr(dr.Item("zollArt_Zusatzcode_2"))
@@ -414,6 +415,16 @@ Public Class SQLZoll
d.Gewicht = cSqlDb.checkNullStr(dr.Item("zollArt_Gewicht"))
d.Menge = cSqlDb.checkNullStr(dr.Item("zollArt_Menge"))
d.status = cSqlDb.checkNullStr(dr.Item("zollArt_Status"))
d.Y1 = cSqlDb.checkNullStr(dr.Item("zollArt_Y1"))
d.Y2 = cSqlDb.checkNullStr(dr.Item("zollArt_Y2"))
d.Y3 = cSqlDb.checkNullStr(dr.Item("zollArt_Y3"))
d.Y4 = cSqlDb.checkNullStr(dr.Item("zollArt_Y4"))
d.Y5 = cSqlDb.checkNullStr(dr.Item("zollArt_Y5"))
d.Y6 = cSqlDb.checkNullStr(dr.Item("zollArt_Y6"))
d.Y7 = cSqlDb.checkNullStr(dr.Item("zollArt_Y7"))
d.Y8 = cSqlDb.checkNullStr(dr.Item("zollArt_Y8"))
d.Y9 = cSqlDb.checkNullStr(dr.Item("zollArt_Y9"))
d.Y10 = cSqlDb.checkNullStr(dr.Item("zollArt_Y10"))
daten.Add(d)
End While

445
SDL/zoll/frmAddArtikelATLAS.Designer.vb generated
View File

@@ -28,6 +28,8 @@ Partial Class frmAddArtikelATLAS
Me.Label1 = New System.Windows.Forms.Label()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Panel3 = New System.Windows.Forms.Panel()
Me.txtUrsprungsland = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Label20 = New System.Windows.Forms.Label()
Me.errWarencodenummer = New System.Windows.Forms.Label()
Me.Label17 = New System.Windows.Forms.Label()
Me.Label18 = New System.Windows.Forms.Label()
@@ -90,8 +92,20 @@ Partial Class frmAddArtikelATLAS
Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel()
Me.Timer1 = New System.Windows.Forms.Timer(Me.components)
Me.Label5 = New System.Windows.Forms.Label()
Me.txtUrsprungsland = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Label20 = New System.Windows.Forms.Label()
Me.Label21 = New System.Windows.Forms.Label()
Me.txtWarencodenummerUPDATE = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.Label22 = New System.Windows.Forms.Label()
Me.txtY1 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtY2 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtY3 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtY6 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtY5 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtY4 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtY9 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtY8 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtY7 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.txtY10 = New VERAG_PROG_ALLGEMEIN.MyTextBox()
Me.LinkLabel1 = New System.Windows.Forms.LinkLabel()
Me.Panel1.SuspendLayout()
Me.Panel3.SuspendLayout()
Me.Panel4.SuspendLayout()
@@ -103,7 +117,7 @@ Partial Class frmAddArtikelATLAS
'lblError
'
Me.lblError.ForeColor = System.Drawing.Color.Red
Me.lblError.Location = New System.Drawing.Point(220, 338)
Me.lblError.Location = New System.Drawing.Point(220, 394)
Me.lblError.Name = "lblError"
Me.lblError.Size = New System.Drawing.Size(342, 25)
Me.lblError.TabIndex = 5
@@ -131,11 +145,25 @@ Partial Class frmAddArtikelATLAS
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel1.Location = New System.Drawing.Point(0, 0)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(569, 540)
Me.Panel1.Size = New System.Drawing.Size(569, 605)
Me.Panel1.TabIndex = 8
'
'Panel3
'
Me.Panel3.Controls.Add(Me.LinkLabel1)
Me.Panel3.Controls.Add(Me.txtY10)
Me.Panel3.Controls.Add(Me.txtY9)
Me.Panel3.Controls.Add(Me.txtY8)
Me.Panel3.Controls.Add(Me.txtY7)
Me.Panel3.Controls.Add(Me.txtY6)
Me.Panel3.Controls.Add(Me.txtY5)
Me.Panel3.Controls.Add(Me.txtY4)
Me.Panel3.Controls.Add(Me.txtY3)
Me.Panel3.Controls.Add(Me.txtY2)
Me.Panel3.Controls.Add(Me.txtY1)
Me.Panel3.Controls.Add(Me.Label22)
Me.Panel3.Controls.Add(Me.Label21)
Me.Panel3.Controls.Add(Me.txtWarencodenummerUPDATE)
Me.Panel3.Controls.Add(Me.txtUrsprungsland)
Me.Panel3.Controls.Add(Me.Label20)
Me.Panel3.Controls.Add(Me.errWarencodenummer)
@@ -178,9 +206,42 @@ Partial Class frmAddArtikelATLAS
Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill
Me.Panel3.Location = New System.Drawing.Point(0, 90)
Me.Panel3.Name = "Panel3"
Me.Panel3.Size = New System.Drawing.Size(567, 448)
Me.Panel3.Size = New System.Drawing.Size(567, 513)
Me.Panel3.TabIndex = 378
'
'txtUrsprungsland
'
Me.txtUrsprungsland._DateTimeOnly = False
Me.txtUrsprungsland._numbersOnly = False
Me.txtUrsprungsland._numbersOnlyKommastellen = ""
Me.txtUrsprungsland._numbersOnlyTrennzeichen = False
Me.txtUrsprungsland._Prozent = False
Me.txtUrsprungsland._ShortDateNew = False
Me.txtUrsprungsland._ShortDateOnly = False
Me.txtUrsprungsland._TimeOnly = False
Me.txtUrsprungsland._TimeOnly_Seconds = False
Me.txtUrsprungsland._value = Nothing
Me.txtUrsprungsland._Waehrung = False
Me.txtUrsprungsland._WaehrungZeichen = False
Me.txtUrsprungsland.Location = New System.Drawing.Point(97, 133)
Me.txtUrsprungsland.MaxLength = 2
Me.txtUrsprungsland.MaxLineLength = -1
Me.txtUrsprungsland.MaxLines_Warning = ""
Me.txtUrsprungsland.MaxLines_Warning_Label = Nothing
Me.txtUrsprungsland.Name = "txtUrsprungsland"
Me.txtUrsprungsland.Size = New System.Drawing.Size(110, 20)
Me.txtUrsprungsland.TabIndex = 4
'
'Label20
'
Me.Label20.AutoSize = True
Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label20.Location = New System.Drawing.Point(8, 136)
Me.Label20.Name = "Label20"
Me.Label20.Size = New System.Drawing.Size(78, 13)
Me.Label20.TabIndex = 394
Me.Label20.Text = "Ursprungsland:"
'
'errWarencodenummer
'
Me.errWarencodenummer.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
@@ -222,7 +283,7 @@ Partial Class frmAddArtikelATLAS
'lblStatus
'
Me.lblStatus.AutoSize = True
Me.lblStatus.Location = New System.Drawing.Point(94, 324)
Me.lblStatus.Location = New System.Drawing.Point(94, 380)
Me.lblStatus.Name = "lblStatus"
Me.lblStatus.Size = New System.Drawing.Size(54, 13)
Me.lblStatus.TabIndex = 383
@@ -231,7 +292,7 @@ Partial Class frmAddArtikelATLAS
'Label4
'
Me.Label4.AutoSize = True
Me.Label4.Location = New System.Drawing.Point(8, 324)
Me.Label4.Location = New System.Drawing.Point(8, 380)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(40, 13)
Me.Label4.TabIndex = 383
@@ -349,7 +410,7 @@ Partial Class frmAddArtikelATLAS
Me.btnSave.ForeColor = System.Drawing.Color.Black
Me.btnSave.Image = Global.SDL.My.Resources.Resources.save
Me.btnSave.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnSave.Location = New System.Drawing.Point(11, 408)
Me.btnSave.Location = New System.Drawing.Point(11, 464)
Me.btnSave.Name = "btnSave"
Me.btnSave.Size = New System.Drawing.Size(106, 39)
Me.btnSave.TabIndex = 9
@@ -360,7 +421,7 @@ Partial Class frmAddArtikelATLAS
'Label13
'
Me.Label13.AutoSize = True
Me.Label13.Location = New System.Drawing.Point(8, 353)
Me.Label13.Location = New System.Drawing.Point(8, 409)
Me.Label13.Name = "Label13"
Me.Label13.Size = New System.Drawing.Size(94, 13)
Me.Label13.TabIndex = 374
@@ -393,7 +454,7 @@ Partial Class frmAddArtikelATLAS
'Label14
'
Me.Label14.AutoSize = True
Me.Label14.Location = New System.Drawing.Point(8, 386)
Me.Label14.Location = New System.Drawing.Point(8, 442)
Me.Label14.Name = "Label14"
Me.Label14.Size = New System.Drawing.Size(96, 13)
Me.Label14.TabIndex = 372
@@ -415,7 +476,7 @@ Partial Class frmAddArtikelATLAS
Me.txtWarencodeZusatz1._Waehrung = False
Me.txtWarencodeZusatz1._WaehrungZeichen = True
Me.txtWarencodeZusatz1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtWarencodeZusatz1.Location = New System.Drawing.Point(329, 180)
Me.txtWarencodeZusatz1.Location = New System.Drawing.Point(329, 176)
Me.txtWarencodeZusatz1.MaxLength = 4
Me.txtWarencodeZusatz1.MaxLineLength = -1
Me.txtWarencodeZusatz1.MaxLines_Warning = ""
@@ -427,7 +488,7 @@ Partial Class frmAddArtikelATLAS
'lblErfassung
'
Me.lblErfassung.AutoSize = True
Me.lblErfassung.Location = New System.Drawing.Point(106, 353)
Me.lblErfassung.Location = New System.Drawing.Point(106, 409)
Me.lblErfassung.Name = "lblErfassung"
Me.lblErfassung.Size = New System.Drawing.Size(0, 13)
Me.lblErfassung.TabIndex = 371
@@ -459,7 +520,7 @@ Partial Class frmAddArtikelATLAS
'Label15
'
Me.Label15.AutoSize = True
Me.Label15.Location = New System.Drawing.Point(8, 369)
Me.Label15.Location = New System.Drawing.Point(8, 425)
Me.Label15.Name = "Label15"
Me.Label15.Size = New System.Drawing.Size(93, 13)
Me.Label15.TabIndex = 373
@@ -481,7 +542,7 @@ Partial Class frmAddArtikelATLAS
Me.txtWarencodeZusatz2._Waehrung = False
Me.txtWarencodeZusatz2._WaehrungZeichen = True
Me.txtWarencodeZusatz2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtWarencodeZusatz2.Location = New System.Drawing.Point(445, 180)
Me.txtWarencodeZusatz2.Location = New System.Drawing.Point(445, 176)
Me.txtWarencodeZusatz2.MaxLength = 4
Me.txtWarencodeZusatz2.MaxLineLength = -1
Me.txtWarencodeZusatz2.MaxLines_Warning = ""
@@ -493,7 +554,7 @@ Partial Class frmAddArtikelATLAS
'lblAenderung
'
Me.lblAenderung.AutoSize = True
Me.lblAenderung.Location = New System.Drawing.Point(107, 369)
Me.lblAenderung.Location = New System.Drawing.Point(107, 425)
Me.lblAenderung.Name = "lblAenderung"
Me.lblAenderung.Size = New System.Drawing.Size(0, 13)
Me.lblAenderung.TabIndex = 370
@@ -525,7 +586,7 @@ Partial Class frmAddArtikelATLAS
'lblSachbearb
'
Me.lblSachbearb.AutoSize = True
Me.lblSachbearb.Location = New System.Drawing.Point(106, 386)
Me.lblSachbearb.Location = New System.Drawing.Point(106, 442)
Me.lblSachbearb.Name = "lblSachbearb"
Me.lblSachbearb.Size = New System.Drawing.Size(0, 13)
Me.lblSachbearb.TabIndex = 369
@@ -555,7 +616,7 @@ Partial Class frmAddArtikelATLAS
'
Me.Label11.AutoSize = True
Me.Label11.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label11.Location = New System.Drawing.Point(8, 244)
Me.Label11.Location = New System.Drawing.Point(8, 268)
Me.Label11.Name = "Label11"
Me.Label11.Size = New System.Drawing.Size(75, 13)
Me.Label11.TabIndex = 15
@@ -576,7 +637,7 @@ Partial Class frmAddArtikelATLAS
Me.txtKurztext._Waehrung = False
Me.txtKurztext._WaehrungZeichen = True
Me.txtKurztext.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtKurztext.Location = New System.Drawing.Point(97, 206)
Me.txtKurztext.Location = New System.Drawing.Point(97, 230)
Me.txtKurztext.MaxLength = 600
Me.txtKurztext.MaxLineLength = -1
Me.txtKurztext.MaxLines_Warning = ""
@@ -599,7 +660,7 @@ Partial Class frmAddArtikelATLAS
Me.txtBeschreibung._value = Nothing
Me.txtBeschreibung._Waehrung = False
Me.txtBeschreibung._WaehrungZeichen = True
Me.txtBeschreibung.Location = New System.Drawing.Point(97, 241)
Me.txtBeschreibung.Location = New System.Drawing.Point(97, 265)
Me.txtBeschreibung.MaxLength = 2400
Me.txtBeschreibung.MaxLineLength = -1
Me.txtBeschreibung.MaxLines_Warning = ""
@@ -624,7 +685,7 @@ Partial Class frmAddArtikelATLAS
Me.txtWarencodenummer._Waehrung = False
Me.txtWarencodenummer._WaehrungZeichen = True
Me.txtWarencodenummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.txtWarencodenummer.Location = New System.Drawing.Point(97, 180)
Me.txtWarencodenummer.Location = New System.Drawing.Point(97, 176)
Me.txtWarencodenummer.MaxLength = 11
Me.txtWarencodenummer.MaxLineLength = -1
Me.txtWarencodenummer.MaxLines_Warning = ""
@@ -637,7 +698,7 @@ Partial Class frmAddArtikelATLAS
'
Me.Label12.AutoSize = True
Me.Label12.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label12.Location = New System.Drawing.Point(8, 183)
Me.Label12.Location = New System.Drawing.Point(8, 179)
Me.Label12.Name = "Label12"
Me.Label12.Size = New System.Drawing.Size(83, 13)
Me.Label12.TabIndex = 13
@@ -647,7 +708,7 @@ Partial Class frmAddArtikelATLAS
'
Me.Label10.AutoSize = True
Me.Label10.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label10.Location = New System.Drawing.Point(8, 209)
Me.Label10.Location = New System.Drawing.Point(8, 233)
Me.Label10.Name = "Label10"
Me.Label10.Size = New System.Drawing.Size(48, 13)
Me.Label10.TabIndex = 13
@@ -662,9 +723,9 @@ Partial Class frmAddArtikelATLAS
Me.Panel4.Controls.Add(Me.FlatButton3)
Me.Panel4.Controls.Add(Me.cbxUeberschreiben)
Me.Panel4.Controls.Add(Me.Label6)
Me.Panel4.Location = New System.Drawing.Point(220, 366)
Me.Panel4.Location = New System.Drawing.Point(480, 481)
Me.Panel4.Name = "Panel4"
Me.Panel4.Size = New System.Drawing.Size(335, 84)
Me.Panel4.Size = New System.Drawing.Size(75, 25)
Me.Panel4.TabIndex = 391
Me.Panel4.Visible = False
'
@@ -853,7 +914,6 @@ Partial Class frmAddArtikelATLAS
'
Me.BindingNavigatorPositionItem.AccessibleName = "Position"
Me.BindingNavigatorPositionItem.AutoSize = False
Me.BindingNavigatorPositionItem.Font = New System.Drawing.Font("Segoe UI", 9.0!)
Me.BindingNavigatorPositionItem.Name = "BindingNavigatorPositionItem"
Me.BindingNavigatorPositionItem.Size = New System.Drawing.Size(50, 23)
Me.BindingNavigatorPositionItem.Text = "0"
@@ -920,44 +980,305 @@ Partial Class frmAddArtikelATLAS
Me.Label5.TextAlign = System.Drawing.ContentAlignment.TopCenter
Me.Label5.Visible = False
'
'txtUrsprungsland
'Label21
'
Me.txtUrsprungsland._DateTimeOnly = False
Me.txtUrsprungsland._numbersOnly = False
Me.txtUrsprungsland._numbersOnlyKommastellen = ""
Me.txtUrsprungsland._numbersOnlyTrennzeichen = False
Me.txtUrsprungsland._Prozent = False
Me.txtUrsprungsland._ShortDateNew = False
Me.txtUrsprungsland._ShortDateOnly = False
Me.txtUrsprungsland._TimeOnly = False
Me.txtUrsprungsland._TimeOnly_Seconds = False
Me.txtUrsprungsland._value = Nothing
Me.txtUrsprungsland._Waehrung = False
Me.txtUrsprungsland._WaehrungZeichen = False
Me.txtUrsprungsland.Location = New System.Drawing.Point(97, 133)
Me.txtUrsprungsland.MaxLength = 2
Me.txtUrsprungsland.MaxLineLength = -1
Me.txtUrsprungsland.MaxLines_Warning = ""
Me.txtUrsprungsland.MaxLines_Warning_Label = Nothing
Me.txtUrsprungsland.Name = "txtUrsprungsland"
Me.txtUrsprungsland.Size = New System.Drawing.Size(110, 20)
Me.txtUrsprungsland.TabIndex = 4
Me.Label21.AutoSize = True
Me.Label21.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label21.Location = New System.Drawing.Point(94, 201)
Me.Label21.Name = "Label21"
Me.Label21.Size = New System.Drawing.Size(130, 13)
Me.Label21.TabIndex = 398
Me.Label21.Text = "Warencode-Nr. UPDATE:"
'
'Label20
'txtWarencodenummerUPDATE
'
Me.Label20.AutoSize = True
Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label20.Location = New System.Drawing.Point(8, 136)
Me.Label20.Name = "Label20"
Me.Label20.Size = New System.Drawing.Size(78, 13)
Me.Label20.TabIndex = 394
Me.Label20.Text = "Ursprungsland:"
Me.txtWarencodenummerUPDATE._DateTimeOnly = False
Me.txtWarencodenummerUPDATE._numbersOnly = False
Me.txtWarencodenummerUPDATE._numbersOnlyKommastellen = ""
Me.txtWarencodenummerUPDATE._numbersOnlyTrennzeichen = True
Me.txtWarencodenummerUPDATE._Prozent = False
Me.txtWarencodenummerUPDATE._ShortDateNew = False
Me.txtWarencodenummerUPDATE._ShortDateOnly = False
Me.txtWarencodenummerUPDATE._TimeOnly = False
Me.txtWarencodenummerUPDATE._TimeOnly_Seconds = False
Me.txtWarencodenummerUPDATE._value = Nothing
Me.txtWarencodenummerUPDATE._Waehrung = False
Me.txtWarencodenummerUPDATE._WaehrungZeichen = True
Me.txtWarencodenummerUPDATE.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
Me.txtWarencodenummerUPDATE.Location = New System.Drawing.Point(223, 198)
Me.txtWarencodenummerUPDATE.MaxLength = 1100
Me.txtWarencodenummerUPDATE.MaxLineLength = -1
Me.txtWarencodenummerUPDATE.MaxLines_Warning = ""
Me.txtWarencodenummerUPDATE.MaxLines_Warning_Label = Nothing
Me.txtWarencodenummerUPDATE.Name = "txtWarencodenummerUPDATE"
Me.txtWarencodenummerUPDATE.Size = New System.Drawing.Size(216, 20)
Me.txtWarencodenummerUPDATE.TabIndex = 397
'
'Label22
'
Me.Label22.AutoSize = True
Me.Label22.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Label22.Location = New System.Drawing.Point(7, 352)
Me.Label22.Name = "Label22"
Me.Label22.Size = New System.Drawing.Size(80, 13)
Me.Label22.TabIndex = 399
Me.Label22.Text = "Y-Codierungen:"
'
'txtY1
'
Me.txtY1._DateTimeOnly = False
Me.txtY1._numbersOnly = False
Me.txtY1._numbersOnlyKommastellen = ""
Me.txtY1._numbersOnlyTrennzeichen = True
Me.txtY1._Prozent = False
Me.txtY1._ShortDateNew = False
Me.txtY1._ShortDateOnly = False
Me.txtY1._TimeOnly = False
Me.txtY1._TimeOnly_Seconds = False
Me.txtY1._value = ""
Me.txtY1._Waehrung = False
Me.txtY1._WaehrungZeichen = True
Me.txtY1.ForeColor = System.Drawing.Color.Black
Me.txtY1.Location = New System.Drawing.Point(97, 349)
Me.txtY1.MaxLength = 4
Me.txtY1.MaxLineLength = -1
Me.txtY1.MaxLines_Warning = ""
Me.txtY1.MaxLines_Warning_Label = Nothing
Me.txtY1.Name = "txtY1"
Me.txtY1.Size = New System.Drawing.Size(35, 20)
Me.txtY1.TabIndex = 400
'
'txtY2
'
Me.txtY2._DateTimeOnly = False
Me.txtY2._numbersOnly = False
Me.txtY2._numbersOnlyKommastellen = ""
Me.txtY2._numbersOnlyTrennzeichen = True
Me.txtY2._Prozent = False
Me.txtY2._ShortDateNew = False
Me.txtY2._ShortDateOnly = False
Me.txtY2._TimeOnly = False
Me.txtY2._TimeOnly_Seconds = False
Me.txtY2._value = ""
Me.txtY2._Waehrung = False
Me.txtY2._WaehrungZeichen = True
Me.txtY2.ForeColor = System.Drawing.Color.Black
Me.txtY2.Location = New System.Drawing.Point(138, 349)
Me.txtY2.MaxLength = 4
Me.txtY2.MaxLineLength = -1
Me.txtY2.MaxLines_Warning = ""
Me.txtY2.MaxLines_Warning_Label = Nothing
Me.txtY2.Name = "txtY2"
Me.txtY2.Size = New System.Drawing.Size(35, 20)
Me.txtY2.TabIndex = 401
'
'txtY3
'
Me.txtY3._DateTimeOnly = False
Me.txtY3._numbersOnly = False
Me.txtY3._numbersOnlyKommastellen = ""
Me.txtY3._numbersOnlyTrennzeichen = True
Me.txtY3._Prozent = False
Me.txtY3._ShortDateNew = False
Me.txtY3._ShortDateOnly = False
Me.txtY3._TimeOnly = False
Me.txtY3._TimeOnly_Seconds = False
Me.txtY3._value = ""
Me.txtY3._Waehrung = False
Me.txtY3._WaehrungZeichen = True
Me.txtY3.ForeColor = System.Drawing.Color.Black
Me.txtY3.Location = New System.Drawing.Point(179, 349)
Me.txtY3.MaxLength = 4
Me.txtY3.MaxLineLength = -1
Me.txtY3.MaxLines_Warning = ""
Me.txtY3.MaxLines_Warning_Label = Nothing
Me.txtY3.Name = "txtY3"
Me.txtY3.Size = New System.Drawing.Size(35, 20)
Me.txtY3.TabIndex = 402
'
'txtY6
'
Me.txtY6._DateTimeOnly = False
Me.txtY6._numbersOnly = False
Me.txtY6._numbersOnlyKommastellen = ""
Me.txtY6._numbersOnlyTrennzeichen = True
Me.txtY6._Prozent = False
Me.txtY6._ShortDateNew = False
Me.txtY6._ShortDateOnly = False
Me.txtY6._TimeOnly = False
Me.txtY6._TimeOnly_Seconds = False
Me.txtY6._value = ""
Me.txtY6._Waehrung = False
Me.txtY6._WaehrungZeichen = True
Me.txtY6.ForeColor = System.Drawing.Color.Black
Me.txtY6.Location = New System.Drawing.Point(302, 349)
Me.txtY6.MaxLength = 4
Me.txtY6.MaxLineLength = -1
Me.txtY6.MaxLines_Warning = ""
Me.txtY6.MaxLines_Warning_Label = Nothing
Me.txtY6.Name = "txtY6"
Me.txtY6.Size = New System.Drawing.Size(35, 20)
Me.txtY6.TabIndex = 405
'
'txtY5
'
Me.txtY5._DateTimeOnly = False
Me.txtY5._numbersOnly = False
Me.txtY5._numbersOnlyKommastellen = ""
Me.txtY5._numbersOnlyTrennzeichen = True
Me.txtY5._Prozent = False
Me.txtY5._ShortDateNew = False
Me.txtY5._ShortDateOnly = False
Me.txtY5._TimeOnly = False
Me.txtY5._TimeOnly_Seconds = False
Me.txtY5._value = ""
Me.txtY5._Waehrung = False
Me.txtY5._WaehrungZeichen = True
Me.txtY5.ForeColor = System.Drawing.Color.Black
Me.txtY5.Location = New System.Drawing.Point(261, 349)
Me.txtY5.MaxLength = 4
Me.txtY5.MaxLineLength = -1
Me.txtY5.MaxLines_Warning = ""
Me.txtY5.MaxLines_Warning_Label = Nothing
Me.txtY5.Name = "txtY5"
Me.txtY5.Size = New System.Drawing.Size(35, 20)
Me.txtY5.TabIndex = 404
'
'txtY4
'
Me.txtY4._DateTimeOnly = False
Me.txtY4._numbersOnly = False
Me.txtY4._numbersOnlyKommastellen = ""
Me.txtY4._numbersOnlyTrennzeichen = True
Me.txtY4._Prozent = False
Me.txtY4._ShortDateNew = False
Me.txtY4._ShortDateOnly = False
Me.txtY4._TimeOnly = False
Me.txtY4._TimeOnly_Seconds = False
Me.txtY4._value = ""
Me.txtY4._Waehrung = False
Me.txtY4._WaehrungZeichen = True
Me.txtY4.ForeColor = System.Drawing.Color.Black
Me.txtY4.Location = New System.Drawing.Point(220, 349)
Me.txtY4.MaxLength = 4
Me.txtY4.MaxLineLength = -1
Me.txtY4.MaxLines_Warning = ""
Me.txtY4.MaxLines_Warning_Label = Nothing
Me.txtY4.Name = "txtY4"
Me.txtY4.Size = New System.Drawing.Size(35, 20)
Me.txtY4.TabIndex = 403
'
'txtY9
'
Me.txtY9._DateTimeOnly = False
Me.txtY9._numbersOnly = False
Me.txtY9._numbersOnlyKommastellen = ""
Me.txtY9._numbersOnlyTrennzeichen = True
Me.txtY9._Prozent = False
Me.txtY9._ShortDateNew = False
Me.txtY9._ShortDateOnly = False
Me.txtY9._TimeOnly = False
Me.txtY9._TimeOnly_Seconds = False
Me.txtY9._value = ""
Me.txtY9._Waehrung = False
Me.txtY9._WaehrungZeichen = True
Me.txtY9.ForeColor = System.Drawing.Color.Black
Me.txtY9.Location = New System.Drawing.Point(425, 349)
Me.txtY9.MaxLength = 4
Me.txtY9.MaxLineLength = -1
Me.txtY9.MaxLines_Warning = ""
Me.txtY9.MaxLines_Warning_Label = Nothing
Me.txtY9.Name = "txtY9"
Me.txtY9.Size = New System.Drawing.Size(35, 20)
Me.txtY9.TabIndex = 408
'
'txtY8
'
Me.txtY8._DateTimeOnly = False
Me.txtY8._numbersOnly = False
Me.txtY8._numbersOnlyKommastellen = ""
Me.txtY8._numbersOnlyTrennzeichen = True
Me.txtY8._Prozent = False
Me.txtY8._ShortDateNew = False
Me.txtY8._ShortDateOnly = False
Me.txtY8._TimeOnly = False
Me.txtY8._TimeOnly_Seconds = False
Me.txtY8._value = ""
Me.txtY8._Waehrung = False
Me.txtY8._WaehrungZeichen = True
Me.txtY8.ForeColor = System.Drawing.Color.Black
Me.txtY8.Location = New System.Drawing.Point(384, 349)
Me.txtY8.MaxLength = 4
Me.txtY8.MaxLineLength = -1
Me.txtY8.MaxLines_Warning = ""
Me.txtY8.MaxLines_Warning_Label = Nothing
Me.txtY8.Name = "txtY8"
Me.txtY8.Size = New System.Drawing.Size(35, 20)
Me.txtY8.TabIndex = 407
'
'txtY7
'
Me.txtY7._DateTimeOnly = False
Me.txtY7._numbersOnly = False
Me.txtY7._numbersOnlyKommastellen = ""
Me.txtY7._numbersOnlyTrennzeichen = True
Me.txtY7._Prozent = False
Me.txtY7._ShortDateNew = False
Me.txtY7._ShortDateOnly = False
Me.txtY7._TimeOnly = False
Me.txtY7._TimeOnly_Seconds = False
Me.txtY7._value = ""
Me.txtY7._Waehrung = False
Me.txtY7._WaehrungZeichen = True
Me.txtY7.ForeColor = System.Drawing.Color.Black
Me.txtY7.Location = New System.Drawing.Point(343, 349)
Me.txtY7.MaxLength = 4
Me.txtY7.MaxLineLength = -1
Me.txtY7.MaxLines_Warning = ""
Me.txtY7.MaxLines_Warning_Label = Nothing
Me.txtY7.Name = "txtY7"
Me.txtY7.Size = New System.Drawing.Size(35, 20)
Me.txtY7.TabIndex = 406
'
'txtY10
'
Me.txtY10._DateTimeOnly = False
Me.txtY10._numbersOnly = False
Me.txtY10._numbersOnlyKommastellen = ""
Me.txtY10._numbersOnlyTrennzeichen = True
Me.txtY10._Prozent = False
Me.txtY10._ShortDateNew = False
Me.txtY10._ShortDateOnly = False
Me.txtY10._TimeOnly = False
Me.txtY10._TimeOnly_Seconds = False
Me.txtY10._value = ""
Me.txtY10._Waehrung = False
Me.txtY10._WaehrungZeichen = True
Me.txtY10.ForeColor = System.Drawing.Color.Black
Me.txtY10.Location = New System.Drawing.Point(466, 349)
Me.txtY10.MaxLength = 4
Me.txtY10.MaxLineLength = -1
Me.txtY10.MaxLines_Warning = ""
Me.txtY10.MaxLines_Warning_Label = Nothing
Me.txtY10.Name = "txtY10"
Me.txtY10.Size = New System.Drawing.Size(35, 20)
Me.txtY10.TabIndex = 409
'
'LinkLabel1
'
Me.LinkLabel1.AutoSize = True
Me.LinkLabel1.Location = New System.Drawing.Point(446, 201)
Me.LinkLabel1.Name = "LinkLabel1"
Me.LinkLabel1.Size = New System.Drawing.Size(66, 13)
Me.LinkLabel1.TabIndex = 410
Me.LinkLabel1.TabStop = True
Me.LinkLabel1.Text = "übernehmen"
'
'frmAddArtikelATLAS
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(569, 540)
Me.ClientSize = New System.Drawing.Size(569, 605)
Me.Controls.Add(Me.Panel1)
Me.Controls.Add(Me.Label5)
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
@@ -1048,4 +1369,18 @@ Partial Class frmAddArtikelATLAS
Friend WithEvents Label6 As System.Windows.Forms.Label
Friend WithEvents txtUrsprungsland As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents Label20 As Label
Friend WithEvents txtY1 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents Label22 As Label
Friend WithEvents Label21 As Label
Friend WithEvents txtWarencodenummerUPDATE As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents txtY10 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents txtY9 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents txtY8 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents txtY7 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents txtY6 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents txtY5 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents txtY4 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents txtY3 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents txtY2 As VERAG_PROG_ALLGEMEIN.MyTextBox
Friend WithEvents LinkLabel1 As LinkLabel
End Class

12
SDL/zoll/frmAddArtikelATLAS.resx
View File

@@ -124,7 +124,7 @@
<data name="BindingNavigatorAddNewItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wgAADsIBFShKgAAAAVdJREFUOE/Nz0tLAmEUBmB3kWRoCUVEISFUJGb1OywiKrDsIpZdkJAkDUvDQkij
wQAADsEBuJFr7QAAAVdJREFUOE/Nz0tLAmEUBmB3kWRoCUVEISFUJGb1OywiKrDsIpZdkJAkDUvDQkij
UKSbVIvatKhNi9oERRAGEQXhjJdp7Hd83/eGs2jhLGQ20QtndTgP71Gp/m0KZ1XInlTjM6XG+4EG5fuK
yaTUIN8bIMUQ0gmtcuBtX/MLPMT0yoHnuA6kuA4iruI20lAZ+DiswWuyFum4Dk+7dbiP6kHEFVDBg+tQ
My4DLbjwG3DqbcORxygHXxJakGIQRFwDEf0gwjKI4AYtzIHmHaA5Oxg/CsYPIb7YIQced+qluvTLCyIs
@@ -136,7 +136,7 @@
<data name="BindingNavigatorDeleteItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wgAADsIBFShKgAAAAWtJREFUOE+1kE0ow2Ecx/9X5a2UiwtKOSCTmJBMhuQlMo3IvCUHDouEXHZwIOVC
wQAADsEBuJFr7QAAAWtJREFUOE+1kE0ow2Ecx/9X5a2UiwtKOSCTmJBMhuQlMo3IvCUHDouEXHZwIOVC
DrhIDiQl5USy07zNa2tKf2laaRf84/J8xBCetab4XL/f76fn+SnKX4DrGLqrwbHDzywkWJlHdJYjLEbY
Wg8q4eYKlma+d1hbgF4TotWIaC+FuYmAktcXCksx2HrknBOHX1KbiTDngrXhW0kMdSBM2TA5Io+/wuI0
oiz5TcRwB7hPYazfLx3rDz7+gCsXNBb4v1SdgajTQ19TaOMP2NtFmPSIilSo0v1y7FHBnAdZMWi6aO51
@@ -148,7 +148,7 @@
<data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wgAADsIBFShKgAAAATFJREFUOE9jYBg0oHDW8/9NC57/z5z4+D+6HAyEtz/AKceQO/PZ/1VH3v/HpSi+
wQAADsEBuJFr7QAAATFJREFUOE9jYBg0oHDW8/9NC57/z5z4+D+6HAyEtz/AKceQO/PZ/1VH3v/HpSi+
+8H/4IZrWOXAIGPK0/8L933Aqii+5+H/pfv///evvoAhBwcJPU/+T9vyHkNRRPt9sObMWf//e5WewG1A
ZNej/72rP6AoCm29B9bcuu7/f//Ov/9d8g/gNiCw+eH/uvnv4IqCW+7+X7T3//+Odf//Z8z5+d+u7ud/
+4ztuA3wqLr/P3/aGxRFdsW3/6fP+f3fv+vbf53Cd/8tEtbjNsC+9O7/7MmvMRTpp5z/b1L04r9K1qf/
@@ -159,7 +159,7 @@
<data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wgAADsIBFShKgAAAALtJREFUOE9jYBgyILz9wX90MaJBfPeD/8EN18gzIL7n4f+l+///96++QLoBEe33
wQAADsEBuJFr7QAAALtJREFUOE9jYBgyILz9wX90MaJBfPeD/8EN18gzIL7n4f+l+///96++QLoBEe33
wZozZ/3/71V6gjQDQlvvgTW3rvv/37/z73+X/APEGxDccvf/or3//3es+/8/Y87P/3Z1P//bZ2wn3gAQ
sCu+/T99zu///l3f/usUvvtvkbCeNANAQD/l/H+Tohf/VbI+/TeOXEa6ASBgkHTiv2za1/+6wfPIMwAE
9FMv/9fwnUa+ASCg4jGBMgMGLwAA0BRgmCws/7cAAAAASUVORK5CYII=
@@ -168,7 +168,7 @@
<data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wgAADsIBFShKgAAAAKRJREFUOE9jYBh0oHDW8//oYiSB3JnP/id03yPfkIwpT//P2//7f0LXHfIMSeh5
wQAADsEBuJFr7QAAAKRJREFUOE9jYBh0oHDW8//oYiSB3JnP/id03yPfkIwpT//P2//7f0LXHfIMSeh5
8n/2vl//O7f+/e9Wepl0QyK7Hv2fsu3X/5Klf/8nTP/73yb3LGmGBDY//N+69j1Ys3HJl//S0df+G0cu
I94Qj6r7/0vmvoNrVnTpIV4zCNiX3v0f2PKMPM0gYJF3579NwRXyNIOAYdZt8jWDgE7aDfI1D00AAKB+
X6Bjq5qXAAAAAElFTkSuQmCC
@@ -177,7 +177,7 @@
<data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAABGdBTUEAALGPC/xhBQAAAAlwSFlzAAAO
wgAADsIBFShKgAAAAStJREFUOE9jYBhUoHDW8//oYjAAkmta8Px/5sTHONUw5M589j+h+x5WBSC5VUfe
wQAADsEBuJFr7QAAAStJREFUOE9jYBhUoHDW8//oYjAAkmta8Px/5sTHONUw5M589j+h+x5WBSC5VUfe
/w9vf4BVHgwypjz9P2//7/8JXXcwFIHkFu778D+44RqGHBwk9Dz5P3vfr/+dW//+dyu9jKIQJDdty/v/
/tUXcBsQ2fXo/5Rtv/6XLP37P2H63/82uWfhikFyvas//PcqPYHbgMDmh/9b174HazYu+fJfOvraf+PI
ZWANILm6+e/+u+QfwG2AR9X9/yVz38E1K7r0wBWD5PKnvflvn7EdtwH2pXf/B7Y8w9AMk8ue/Pq/RcJ6

22
SDL/zoll/frmAddArtikelATLAS.vb
View File

@@ -1,6 +1,7 @@
Imports System.ComponentModel
Imports System.Text
Imports System.IO
Imports javax.xml.bind.annotation
Public Class frmAddArtikelATLAS
' Public bindingDataAdapter As New SqlDataAdapter
@@ -141,6 +142,19 @@ Public Class frmAddArtikelATLAS
txtUrsprungsland.DataBindings.Clear()
txtUrsprungsland.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_Ursprungsland", True, DataSourceUpdateMode.OnPropertyChanged, ""))
txtWarencodenummerUPDATE.DataBindings.Clear() : txtWarencodenummerUPDATE.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_WarencodenummerUPDATE", True, DataSourceUpdateMode.OnPropertyChanged, ""))
txtY1.DataBindings.Clear() : txtY1.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_y1", True, DataSourceUpdateMode.OnPropertyChanged, ""))
txtY2.DataBindings.Clear() : txtY2.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_y2", True, DataSourceUpdateMode.OnPropertyChanged, ""))
txtY3.DataBindings.Clear() : txtY3.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_y3", True, DataSourceUpdateMode.OnPropertyChanged, ""))
txtY4.DataBindings.Clear() : txtY4.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_y4", True, DataSourceUpdateMode.OnPropertyChanged, ""))
txtY5.DataBindings.Clear() : txtY5.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_y5", True, DataSourceUpdateMode.OnPropertyChanged, ""))
txtY6.DataBindings.Clear() : txtY6.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_y6", True, DataSourceUpdateMode.OnPropertyChanged, ""))
txtY7.DataBindings.Clear() : txtY7.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_y7", True, DataSourceUpdateMode.OnPropertyChanged, ""))
txtY8.DataBindings.Clear() : txtY8.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_y8", True, DataSourceUpdateMode.OnPropertyChanged, ""))
txtY9.DataBindings.Clear() : txtY9.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_y9", True, DataSourceUpdateMode.OnPropertyChanged, ""))
txtY10.DataBindings.Clear() : txtY10.DataBindings.Add(New Binding("Text", binding.bindingSource, "zollArt_y10", True, DataSourceUpdateMode.OnPropertyChanged, ""))
Try
binding.bindingSource.Position = binding.bindingSource.Find("zollArt_id", cursorAtID)
@@ -240,6 +254,7 @@ Public Class frmAddArtikelATLAS
artikel.Kurzbezeichnung = txtKurztext.Text
artikel.Kundennummer = txtKdNr.Text
artikel.Warencodenummerupdate = txtWarencodenummerupdate.Text
artikel.Warencodenummer = txtWarencodenummer.Text
'artikel.Löschkennzeichen_Warencodenummer As String = ""
artikel.Zusatzcode_1 = txtWarencodeZusatz1.Text
@@ -394,5 +409,10 @@ Public Class frmAddArtikelATLAS
End If
End Sub
Private Sub LinkLabel1_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
If txtWarencodenummerUPDATE.Text.Length <= 11 And Not txtWarencodenummerUPDATE.Text.Contains(",") Then
txtWarencodenummer.Text = txtWarencodenummerUPDATE.Text
txtWarencodenummerUPDATE.Text = ""
End If
End Sub
End Class

122
SDL/zoll/usrCntlZollArtikel.Designer.vb generated
View File

@@ -33,15 +33,17 @@ Partial Class usrCntlZollArtikel
Me.BeschreibungToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.Label1 = New System.Windows.Forms.Label()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.Button5 = New System.Windows.Forms.Button()
Me.cntxtExcel = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ExcelEinlesenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ExcelListeÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.TabelleInExcelÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.Button4 = New System.Windows.Forms.Button()
Me.Button3 = New System.Windows.Forms.Button()
Me.btnDelAll = New System.Windows.Forms.Button()
Me.btnRefresh = New VERAG_PROG_ALLGEMEIN.FlatButton()
Me.lblTestsystem = New System.Windows.Forms.Label()
Me.btnExcel = New System.Windows.Forms.Button()
Me.cntxtExcel = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ExcelEinlesenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.ExcelListeÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.TabelleInExcelÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.btnEdit = New System.Windows.Forms.Button()
Me.btnNew = New System.Windows.Forms.Button()
Me.btnDel = New System.Windows.Forms.Button()
@@ -57,6 +59,7 @@ Partial Class usrCntlZollArtikel
Me.btnTarifnummerKopieren = New System.Windows.Forms.Button()
Me.cntxtVermerk = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripMenuItem()
Me.Button6 = New System.Windows.Forms.Button()
CType(Me.dgvZollArtikel, System.ComponentModel.ISupportInitialize).BeginInit()
Me.cntxtRightClick.SuspendLayout()
Me.Panel1.SuspendLayout()
@@ -71,7 +74,7 @@ Partial Class usrCntlZollArtikel
Me.pnlFilter.BackColor = System.Drawing.Color.White
Me.pnlFilter.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.pnlFilter.Dock = System.Windows.Forms.DockStyle.Top
Me.pnlFilter.Location = New System.Drawing.Point(0, 55)
Me.pnlFilter.Location = New System.Drawing.Point(0, 79)
Me.pnlFilter.Name = "pnlFilter"
Me.pnlFilter.Size = New System.Drawing.Size(1278, 28)
Me.pnlFilter.TabIndex = 11
@@ -86,11 +89,11 @@ Partial Class usrCntlZollArtikel
Me.dgvZollArtikel.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.dgvZollArtikel.ContextMenuStrip = Me.cntxtRightClick
Me.dgvZollArtikel.Dock = System.Windows.Forms.DockStyle.Fill
Me.dgvZollArtikel.Location = New System.Drawing.Point(0, 83)
Me.dgvZollArtikel.Location = New System.Drawing.Point(0, 107)
Me.dgvZollArtikel.MultiSelect = False
Me.dgvZollArtikel.Name = "dgvZollArtikel"
Me.dgvZollArtikel.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect
Me.dgvZollArtikel.Size = New System.Drawing.Size(1278, 461)
Me.dgvZollArtikel.Size = New System.Drawing.Size(1278, 437)
Me.dgvZollArtikel.TabIndex = 14
'
'cntxtRightClick
@@ -132,6 +135,9 @@ Partial Class usrCntlZollArtikel
'Panel1
'
Me.Panel1.BackColor = System.Drawing.Color.WhiteSmoke
Me.Panel1.Controls.Add(Me.Button6)
Me.Panel1.Controls.Add(Me.Button5)
Me.Panel1.Controls.Add(Me.Button4)
Me.Panel1.Controls.Add(Me.Button3)
Me.Panel1.Controls.Add(Me.btnDelAll)
Me.Panel1.Controls.Add(Me.btnRefresh)
@@ -144,9 +150,63 @@ Partial Class usrCntlZollArtikel
Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top
Me.Panel1.Location = New System.Drawing.Point(0, 0)
Me.Panel1.Name = "Panel1"
Me.Panel1.Size = New System.Drawing.Size(1278, 55)
Me.Panel1.Size = New System.Drawing.Size(1278, 79)
Me.Panel1.TabIndex = 13
'
'Button5
'
Me.Button5.ContextMenuStrip = Me.cntxtExcel
Me.Button5.FlatAppearance.BorderColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button5.ForeColor = System.Drawing.Color.Black
Me.Button5.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button5.Location = New System.Drawing.Point(995, 51)
Me.Button5.Name = "Button5"
Me.Button5.Size = New System.Drawing.Size(148, 27)
Me.Button5.TabIndex = 26
Me.Button5.Text = "Alle eindeutige übernehm."
Me.Button5.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button5.UseVisualStyleBackColor = True
'
'cntxtExcel
'
Me.cntxtExcel.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ExcelEinlesenToolStripMenuItem, Me.ExcelListeÖffnenToolStripMenuItem, Me.TabelleInExcelÖffnenToolStripMenuItem})
Me.cntxtExcel.Name = "cntxtExcel"
Me.cntxtExcel.Size = New System.Drawing.Size(192, 70)
'
'ExcelEinlesenToolStripMenuItem
'
Me.ExcelEinlesenToolStripMenuItem.Name = "ExcelEinlesenToolStripMenuItem"
Me.ExcelEinlesenToolStripMenuItem.Size = New System.Drawing.Size(191, 22)
Me.ExcelEinlesenToolStripMenuItem.Text = "Excel einlesen"
'
'ExcelListeÖffnenToolStripMenuItem
'
Me.ExcelListeÖffnenToolStripMenuItem.Name = "ExcelListeÖffnenToolStripMenuItem"
Me.ExcelListeÖffnenToolStripMenuItem.Size = New System.Drawing.Size(191, 22)
Me.ExcelListeÖffnenToolStripMenuItem.Text = "Excel Liste öffnen"
'
'TabelleInExcelÖffnenToolStripMenuItem
'
Me.TabelleInExcelÖffnenToolStripMenuItem.Name = "TabelleInExcelÖffnenToolStripMenuItem"
Me.TabelleInExcelÖffnenToolStripMenuItem.Size = New System.Drawing.Size(191, 22)
Me.TabelleInExcelÖffnenToolStripMenuItem.Text = "Tabelle in Excel öffnen"
'
'Button4
'
Me.Button4.Enabled = False
Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button4.ForeColor = System.Drawing.Color.Black
Me.Button4.Image = Global.SDL.My.Resources.Resources.zauberstab
Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button4.Location = New System.Drawing.Point(937, 2)
Me.Button4.Name = "Button4"
Me.Button4.Size = New System.Drawing.Size(206, 50)
Me.Button4.TabIndex = 25
Me.Button4.Text = "8-Steller -> 11 Steller"
Me.Button4.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button4.UseVisualStyleBackColor = True
'
'Button3
'
Me.Button3.Enabled = False
@@ -154,7 +214,7 @@ Partial Class usrCntlZollArtikel
Me.Button3.ForeColor = System.Drawing.Color.Black
Me.Button3.Image = Global.SDL.My.Resources.Resources.transfer
Me.Button3.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button3.Location = New System.Drawing.Point(898, 3)
Me.Button3.Location = New System.Drawing.Point(817, 2)
Me.Button3.Name = "Button3"
Me.Button3.Size = New System.Drawing.Size(114, 49)
Me.Button3.TabIndex = 21
@@ -169,7 +229,7 @@ Partial Class usrCntlZollArtikel
Me.btnDelAll.ForeColor = System.Drawing.Color.Black
Me.btnDelAll.Image = Global.SDL.My.Resources.Resources.del
Me.btnDelAll.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.btnDelAll.Location = New System.Drawing.Point(740, 11)
Me.btnDelAll.Location = New System.Drawing.Point(685, 10)
Me.btnDelAll.Name = "btnDelAll"
Me.btnDelAll.Size = New System.Drawing.Size(126, 27)
Me.btnDelAll.TabIndex = 24
@@ -220,30 +280,6 @@ Partial Class usrCntlZollArtikel
Me.btnExcel.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnExcel.UseVisualStyleBackColor = True
'
'cntxtExcel
'
Me.cntxtExcel.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ExcelEinlesenToolStripMenuItem, Me.ExcelListeÖffnenToolStripMenuItem, Me.TabelleInExcelÖffnenToolStripMenuItem})
Me.cntxtExcel.Name = "cntxtExcel"
Me.cntxtExcel.Size = New System.Drawing.Size(192, 70)
'
'ExcelEinlesenToolStripMenuItem
'
Me.ExcelEinlesenToolStripMenuItem.Name = "ExcelEinlesenToolStripMenuItem"
Me.ExcelEinlesenToolStripMenuItem.Size = New System.Drawing.Size(191, 22)
Me.ExcelEinlesenToolStripMenuItem.Text = "Excel einlesen"
'
'ExcelListeÖffnenToolStripMenuItem
'
Me.ExcelListeÖffnenToolStripMenuItem.Name = "ExcelListeÖffnenToolStripMenuItem"
Me.ExcelListeÖffnenToolStripMenuItem.Size = New System.Drawing.Size(191, 22)
Me.ExcelListeÖffnenToolStripMenuItem.Text = "Excel Liste öffnen"
'
'TabelleInExcelÖffnenToolStripMenuItem
'
Me.TabelleInExcelÖffnenToolStripMenuItem.Name = "TabelleInExcelÖffnenToolStripMenuItem"
Me.TabelleInExcelÖffnenToolStripMenuItem.Size = New System.Drawing.Size(191, 22)
Me.TabelleInExcelÖffnenToolStripMenuItem.Text = "Tabelle in Excel öffnen"
'
'btnEdit
'
Me.btnEdit.FlatAppearance.BorderColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
@@ -436,6 +472,21 @@ Partial Class usrCntlZollArtikel
Me.ToolStripMenuItem1.Size = New System.Drawing.Size(118, 22)
Me.ToolStripMenuItem1.Text = "Löschen"
'
'Button6
'
Me.Button6.ContextMenuStrip = Me.cntxtExcel
Me.Button6.FlatAppearance.BorderColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.Button6.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button6.ForeColor = System.Drawing.Color.Black
Me.Button6.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft
Me.Button6.Location = New System.Drawing.Point(937, 51)
Me.Button6.Name = "Button6"
Me.Button6.Size = New System.Drawing.Size(59, 27)
Me.Button6.TabIndex = 27
Me.Button6.Text = "Use Last"
Me.Button6.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.Button6.UseVisualStyleBackColor = True
'
'usrCntlZollArtikel
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
@@ -495,4 +546,7 @@ Partial Class usrCntlZollArtikel
Friend WithEvents TabelleInExcelÖffnenToolStripMenuItem As ToolStripMenuItem
Friend WithEvents btnDelAll As Button
Friend WithEvents Button3 As Button
Friend WithEvents Button4 As Button
Friend WithEvents Button5 As Button
Friend WithEvents Button6 As Button
End Class

146
SDL/zoll/usrCntlZollArtikel.vb
View File

@@ -1,4 +1,6 @@
Imports System.Data.SqlClient
Imports com.sun.xml.internal.txw2.output
Imports GrapeCity.DataVisualization.TypeScript
Imports Microsoft.Office.Interop
Imports VERAG_PROG_ALLGEMEIN
@@ -26,7 +28,7 @@ Public Class usrCntlZollArtikel
Private Sub Me_Load(sender As Object, e As EventArgs) Handles Me.Load
If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then lblTestsystem.Visible = True
Button4.Enabled = True
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ZOLL_Kundenzolltarif", "SDL") Then
btnNew.Enabled = True
btnEdit.Enabled = True
@@ -67,7 +69,7 @@ Public Class usrCntlZollArtikel
top = " TOP 200 "
End If
newBinding("SELECT " & top & " zollArt_id, KundenNr, zollArt_Status, zollArt_Artikelnummer , zollArt_Warencodenummer, zollArt_Kennzeichen_Gueltig, zollArt_Kurzbezeichnung, zollArt_Ursprungsland, Erfassungsdatum, Aenderungsdatum, Sachbearbeiter,zollArt_Warenbeschreibung FROM tblZollArtikel WHERE 1=1 " & where)
newBinding("SELECT " & top & " zollArt_id, KundenNr, zollArt_Status, zollArt_Artikelnummer , zollArt_Warencodenummer, zollArt_WarencodenummerUPDATE,zollArt_Kennzeichen_Gueltig, zollArt_Kurzbezeichnung, zollArt_Ursprungsland, Erfassungsdatum, Aenderungsdatum, Sachbearbeiter,zollArt_Warenbeschreibung FROM tblZollArtikel WHERE 1=1 " & where)
End Sub
@@ -314,6 +316,10 @@ Public Class usrCntlZollArtikel
.Columns("zollArt_Warencodenummer").HeaderText = "Tarifnummer"
.Columns("zollArt_Warencodenummer").Width = 150
.Columns("zollArt_Warencodenummer").ReadOnly = True
.Columns("zollArt_WarencodenummerUPDATE").HeaderText = "Update Tnr"
.Columns("zollArt_WarencodenummerUPDATE").Width = 100
.Columns("zollArt_WarencodenummerUPDATE").ReadOnly = True
' .Columns("zollArt_Zusatzcode_1").HeaderText = "Zusatz 1"
' .Columns("zollArt_Zusatzcode_2").HeaderText = "Zusatz 2"
.Columns("zollArt_Kennzeichen_Gueltig").Visible = False
@@ -899,7 +905,7 @@ Public Class usrCntlZollArtikel
.FremdAdressID = kdNrDHF,
.FremdKennung = "EXT",
.ArtikelCode = If(ZOLL_ARTIKEL.zollArt_Artikelnummer, ""),
.Bezeichnung = If(String.IsNullOrWhiteSpace(ZOLL_ARTIKEL.zollArt_Warenbeschreibung), "", ZOLL_ARTIKEL.zollArt_Warenbeschreibung.Substring(0, Math.Min(255, ZOLL_ARTIKEL.zollArt_Warenbeschreibung.Length))),
.Bezeichnung = If(String.IsNullOrWhiteSpace(ZOLL_ARTIKEL.zollArt_Warenbeschreibung), "", ZOLL_ARTIKEL.zollArt_Warenbeschreibung.Substring(0, Math.min(255, ZOLL_ARTIKEL.zollArt_Warenbeschreibung.Length))),
.Eigenmasse = Nothing,' 12.5,
.MengenEH = Nothing,'"kg",
.GueltigAb = Date.Today,
@@ -912,7 +918,7 @@ Public Class usrCntlZollArtikel
Dim tarifNr = System.Text.RegularExpressions.Regex.Replace(ZOLL_ARTIKEL.zollArt_Warencodenummer, "[^\d]", "")
Dim tarif1 As New DHF_ArtikelTarif With {
.GueltigAb = Date.Today,
.TarifNr = If(String.IsNullOrWhiteSpace(tarifNr), "", tarifNr.Substring(0, Math.Min(10, tarifNr.Length)))
.TarifNr = If(String.IsNullOrWhiteSpace(tarifNr), "", tarifNr.substring(0, Math.min(10, tarifNr.Length)))
}
If ZOLL_ARTIKEL.zollArt_Zusatzcode_1 IsNot Nothing AndAlso ZOLL_ARTIKEL.zollArt_Zusatzcode_1 IsNot DBNull.Value AndAlso ZOLL_ARTIKEL.zollArt_Zusatzcode_1 <> "" Then
@@ -956,4 +962,136 @@ Public Class usrCntlZollArtikel
End If
End Sub
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
Try
Dim comm As New List(Of String)
For Each r In dgvZollArtikel.Rows
Dim tnr = r.Cells("zollArt_Warencodenummer").Value
If tnr.ToString.Length >= 8 And tnr.ToString.Length <= 10 Then
comm.Add(tnr.ToString.Trim())
End If
Next
Dim COMM_TARIFF = VERAG_PROG_ALLGEMEIN.cATEZ_Tariff.GetTariffInfo(comm, "TR")
For Each r In dgvZollArtikel.Rows
Dim tnr = r.Cells("zollArt_Warencodenummer").Value
Dim zollArt_id = r.Cells("zollArt_id").Value
If tnr.ToString.Length >= 8 And tnr.ToString.Length <= 10 Then
Dim found = False
Dim result = COMM_TARIFF.Find(Function(x) x.code = tnr)
If result IsNot Nothing Then
If result.error <> "" Then
'Error bei der Abfrage der TNR
' MsgBox(result.error)
Else
''Bei einem Ergebnis -> Treffer
If result.mappings.Count > 0 Then
Dim ZOLL_ARTIKEL = New cZollArtikel(zollArt_id)
If result.mappings.Count = 1 Then
' Row.Cells("zollArt_Warencodenummer").Value = result.mappings(0).commodity_code
ZOLL_ARTIKEL.zollArt_WarencodenummerUPDATE = result.mappings(0).commodity_code
ZOLL_ARTIKEL.SAVE()
found = True
Else
' ''Wenn mehrere Optinen -> User Auswahl
Dim multi = String.Join(",", result.mappings.OfType(Of VERAG_PROG_ALLGEMEIN.cATEZ_Tariff.cATEZ_TariffItem_Mapping)() _
.Where(Function(x) x.commodity_code IsNot Nothing AndAlso x.commodity_code <> "") _
.Select(Function(x) x.commodity_code))
found = True
ZOLL_ARTIKEL.zollArt_WarencodenummerUPDATE = multi
ZOLL_ARTIKEL.SAVE()
End If
End If
End If
End If
'Nicht gefudnen -> entsprechend zurückgegebn
If Not found Then
Else
End If
End If
Next
initSDLBinding()
Catch ex As Exception
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
End Try
End Sub
Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
Try
Dim cnt = 0
For Each r In dgvZollArtikel.Rows
Dim tnrUpd = r.Cells("zollArt_WarencodenummerUPDATE").Value
Dim zollArt_id = r.Cells("zollArt_id").Value
If tnrUpd.ToString <> "" Then
Dim ZOLL_ARTIKEL = New cZollArtikel(zollArt_id)
If ZOLL_ARTIKEL.zollArt_WarencodenummerUPDATE.ToString.Contains(",") Then
'Mehrere Einträge
Else
ZOLL_ARTIKEL.zollArt_Warencodenummer = ZOLL_ARTIKEL.zollArt_WarencodenummerUPDATE
ZOLL_ARTIKEL.zollArt_WarencodenummerUPDATE = ""
ZOLL_ARTIKEL.SAVE()
cnt += 1
End If
End If
Next
MsgBox(cnt & " Einträge wurden geändert!")
initSDLBinding()
Catch ex As Exception
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
End Try
End Sub
Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
Dim str = ""
Try
Dim cnt = 0
For Each r In dgvZollArtikel.Rows
Dim tnrUpd = r.Cells("zollArt_WarencodenummerUPDATE").Value
Dim zollArt_id = r.Cells("zollArt_id").Value
If tnrUpd.ToString <> "" Then
Dim ZOLL_ARTIKEL = New cZollArtikel(zollArt_id)
If ZOLL_ARTIKEL.zollArt_WarencodenummerUPDATE.ToString.Contains(",") Then
str = ZOLL_ARTIKEL.zollArt_WarencodenummerUPDATE.ToString
Dim maxVal As Long = ZOLL_ARTIKEL.zollArt_WarencodenummerUPDATE.ToString.split(",").
Select(Function(x) CLng(x.Trim)).Max()
ZOLL_ARTIKEL.zollArt_WarencodenummerUPDATE = (maxVal)
ZOLL_ARTIKEL.SAVE()
' ZOLL_ARTIKEL.zollArt_WarencodenummerUPDATE = ""
cnt += 1
End If
End If
Next
MsgBox(cnt & " Einträge wurden geändert!")
initSDLBinding()
Catch ex As Exception
MsgBox(str)
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
End Try
End Sub
End Class

23
VERAG_PROG_ALLGEMEIN/Classes/cZollArtikel.vb
View File

@@ -30,6 +30,17 @@ Public Class cZollArtikel
Property Sachbearbeiter As Object = Nothing
Property zollArt_Status As Object = Nothing
Property zollArt_WarencodenummerUPDATE As Object = Nothing
Property zollArt_Y1 As Object = Nothing
Property zollArt_Y2 As Object = Nothing
Property zollArt_Y3 As Object = Nothing
Property zollArt_Y4 As Object = Nothing
Property zollArt_Y5 As Object = Nothing
Property zollArt_Y6 As Object = Nothing
Property zollArt_Y7 As Object = Nothing
Property zollArt_Y8 As Object = Nothing
Property zollArt_Y9 As Object = Nothing
Property zollArt_Y10 As Object = Nothing
Public hasEntry As Boolean = False
@@ -73,6 +84,18 @@ Public Class cZollArtikel
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Aenderungsdatum", Aenderungsdatum))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Sachbearbeiter", Sachbearbeiter))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_Status", zollArt_Status))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_WarencodenummerUPDATE", zollArt_WarencodenummerUPDATE))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_Y1", zollArt_Y1))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_Y2", zollArt_Y2))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_Y3", zollArt_Y3))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_Y4", zollArt_Y4))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_Y5", zollArt_Y5))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_Y6", zollArt_Y6))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_Y7", zollArt_Y7))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_Y8", zollArt_Y8))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_Y9", zollArt_Y9))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zollArt_Y10", zollArt_Y10))
Return list

70
VERAG_PROG_ALLGEMEIN/Schnittstellen/ATEZ/TARIFF/cATEZ_Tariff.vb
View File

@@ -1,4 +1,5 @@
Imports System.Text.RegularExpressions
Imports System.Web
Imports System.Windows.Forms.VisualStyles.VisualStyleElement.StartPanel
Imports Newtonsoft.Json
Imports VERAG_PROG_ALLGEMEIN.cATEZ_Tariff
@@ -27,6 +28,75 @@ Public Class cATEZ_Tariff
Public Property description As String
End Class
Public Shared Function GetFullTariff_Only1Result(commodityCode As String, fromCountry As String, Optional toCountry As String = "EU", Optional languageCode As String = "DE") As String
Dim list As New List(Of String)
list.Add(commodityCode)
Dim COMM_TARIFF = VERAG_PROG_ALLGEMEIN.cATEZ_Tariff.GetTariffInfo(list, fromCountry, toCountry)
Dim result = COMM_TARIFF.Find(Function(x) x.code = commodityCode)
Dim found = False
If result IsNot Nothing Then
If result.error <> "" Then
'Error bei der Abfrage der TNR
' MsgBox(result.error)
Else
''Bei einem Ergebnis -> Treffer
If result.mappings.Count > 0 Then
If result.mappings.Count = 1 Then
found = True
Return result.mappings(0).commodity_code
Else
found = True
Return "" ' -> problem
End If
End If
End If
End If
Return ""
End Function
Public Shared Function GetFullTariff(commodityCode As String, fromCountry As String, Optional toCountry As String = "EU", Optional languageCode As String = "DE") As List(Of String)
Dim Resultlist As New List(Of String)
Dim list As New List(Of String)
list.Add(commodityCode)
Dim COMM_TARIFF = VERAG_PROG_ALLGEMEIN.cATEZ_Tariff.GetTariffInfo(list, fromCountry, toCountry)
Dim result = COMM_TARIFF.Find(Function(x) x.code = commodityCode)
Dim found = False
If result IsNot Nothing Then
If result.error <> "" Then
'Error bei der Abfrage der TNR
' MsgBox(result.error)
Else
''Bei einem Ergebnis -> Treffer
If result.mappings.Count > 0 Then
If result.mappings.Count = 1 Then
found = True
Resultlist.Add(result.mappings(0).commodity_code)
Else
For Each item In result.mappings.OfType(Of VERAG_PROG_ALLGEMEIN.cATEZ_Tariff.cATEZ_TariffItem_Mapping)()
If item.commodity_code IsNot Nothing AndAlso item.commodity_code <> "" Then
Resultlist.Add(item.commodity_code)
End If
Next
found = True
End If
End If
End If
End If
Return Resultlist
End Function
Public Shared Function GetTariffInfo(commodities As List(Of String), fromCountry As String, Optional toCountry As String = "EU", Optional languageCode As String = "DE") As List(Of cATEZ_TariffItem_RootItem)
Try
VERAG_PROG_ALLGEMEIN.cChilkat_Helper.UnlockCilkat()

46
VERAG_PROG_ALLGEMEIN/Schnittstellen/WISE/cWiseBankApi.vb Normal file
View File

@@ -0,0 +1,46 @@
Imports System.Net
Imports System.IO
Imports System.Text
Imports Newtonsoft.Json
Public Class cWiseBankApi
Private ReadOnly apiToken As String
Private ReadOnly profileId As String
Private ReadOnly balanceId As String
Public Sub New(token As String, profile As String, balance As String)
apiToken = token
profileId = profile
balanceId = balance
End Sub
''' <summary>
''' Ruft die Kontoumsätze der letzten 7 Tage ab.
''' </summary>
Public Function GetLast7DaysStatement() As String
Dim fromDate As String = DateTime.UtcNow.AddDays(-7).ToString("yyyy-MM-dd")
Dim toDate As String = DateTime.UtcNow.ToString("yyyy-MM-dd")
Dim url As String =
$"https://api.wise.com/v4/profiles/{profileId}/balance-statements/{balanceId}/statement.json?intervalStart={fromDate}&intervalEnd={toDate}"
Dim request As HttpWebRequest = CType(WebRequest.Create(url), HttpWebRequest)
request.Method = "GET"
request.Headers.Add("Authorization", "Bearer " & apiToken)
Try
Using response As HttpWebResponse = CType(request.GetResponse(), HttpWebResponse)
Using reader As New StreamReader(response.GetResponseStream())
Return reader.ReadToEnd()
End Using
End Using
Catch ex As WebException
Using sr As New StreamReader(ex.Response.GetResponseStream())
Dim errorText = sr.ReadToEnd()
Throw New Exception("Wise API Fehler: " & errorText)
End Using
End Try
End Function
End Class

2
VERAG_PROG_ALLGEMEIN/VERAG_PROG_ALLGEMEIN.vbproj
View File

@@ -750,6 +750,7 @@
<DesignTime>True</DesignTime>
<DependentUpon>Reference.svcmap</DependentUpon>
</Compile>
<Compile Include="VERAG_Zollanmeldung\cVERAG_Zollanmeldung.vb" />
<Compile Include="Web References\at.gv.bmf.finanzonline.session\Reference.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
@@ -1628,6 +1629,7 @@
</ItemGroup>
<ItemGroup>
<Folder Include="Resources\CHAT_EMOJIS\" />
<Folder Include="Schnittstellen\WISE\" />
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<ProjectExtensions />

988
VERAG_PROG_ALLGEMEIN/VERAG_Zollanmeldung/cVERAG_Zollanmeldung.vb Normal file
View File

@@ -0,0 +1,988 @@
Imports System.Data.SqlClient
Imports System.Reflection
' ==========================================================================
' MASTER CLASS
' Customs Declaration (Header + Items + Duties + Documents)
' ==========================================================================
Public Class cVERAG_Zollanmeldung
'=== KONSTRUKTOR =======================================================
Public Sub New()
End Sub
Public Sub New(id As Integer)
za_Id = id
LOAD()
End Sub
'=== FELDER ============================================================
Public Property za_Id As Integer
Public Property za_System As String
Public Property za_ExternalSystem As Boolean
Public Property za_Firma As String
Public Property za_Niederlassung As String
Public Property za_AvisoId As Integer?
Public Property za_SendungsId As Integer?
Public Property za_InternalRef As String
Public Property za_MRN As String
Public Property za_LRN As String
Public Property za_DeclarationNo As String
Public Property za_Procedure As String
Public Property za_RepresentationCode As String
Public Property za_FiscalRepresentation As Boolean?
Public Property za_CountryDispatch As String
Public Property za_CountryDestination As String
Public Property za_CountryOrigin As String
Public Property za_TotalItems As Integer?
Public Property za_TotalGross As Decimal?
Public Property za_TotalInvoice As Decimal?
Public Property za_TotalCustomsValue As Decimal?
Public Property za_TransportMode_Border As Integer?
Public Property za_VehicleId As String
Public Property za_Incoterm As String
Public Property za_IncotermPlace As String
Public Property za_DocumentsPresent As Boolean
Public Property za_ReleaseDate As Date?
Public Property za_DeclarationDate As Date?
Public Property za_Created As Date = Now
Public Property za_Modified As Date = Now
'=== UNTERKLASSEN ======================================================
Public Property Items As New List(Of cVERAG_Zollanmeldung_Item)
Public Property Duties As New List(Of cVERAG_Zollanmeldung_Duty)
Public Property Documents As New List(Of cVERAG_Zollanmeldung_Document)
Public Property ItemDocuments As New List(Of cVERAG_Zollanmeldung_ItemDocument)
Private SQL As New VERAG_PROG_ALLGEMEIN.SQL
'========================================================================
' PARAMETERLISTE (Header)
'========================================================================
Public Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
Dim L As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_Id", za_Id,, True, True))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_System", za_System))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_ExternalSystem", za_ExternalSystem))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_Firma", za_Firma))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_Niederlassung", za_Niederlassung))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_AvisoId", za_AvisoId))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_SendungsId", za_SendungsId))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_InternalRef", za_InternalRef))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_MRN", za_MRN))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_LRN", za_LRN))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_DeclarationNo", za_DeclarationNo))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_Procedure", za_Procedure))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_RepresentationCode", za_RepresentationCode))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_FiscalRepresentation", za_FiscalRepresentation))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_CountryDispatch", za_CountryDispatch))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_CountryDestination", za_CountryDestination))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_CountryOrigin", za_CountryOrigin))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_TotalItems", za_TotalItems))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_TotalGross", za_TotalGross))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_TotalInvoice", za_TotalInvoice))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_TotalCustomsValue", za_TotalCustomsValue))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_TransportMode_Border", za_TransportMode_Border))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_VehicleId", za_VehicleId))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_Incoterm", za_Incoterm))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_IncotermPlace", za_IncotermPlace))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_DocumentsPresent", za_DocumentsPresent))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_ReleaseDate", za_ReleaseDate))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_DeclarationDate", za_DeclarationDate))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_Created", za_Created))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("za_Modified", za_Modified))
Return L
End Function
'========================================================================
' SAVE (HEADER)
'========================================================================
Public Function SAVE() As Boolean
Dim list = getParameterList()
Dim sqlstr As String =
" BEGIN TRAN " &
" IF EXISTS(SELECT 1 FROM tblVERAG_CustomsDeclarations WHERE za_Id=@za_Id) " &
" BEGIN " & getUpdateCmd() & " END " &
" ELSE BEGIN " & getInsertCmd() & " END " &
" COMMIT TRAN "
za_Id = SQL.doSQLVarListID(za_Id, sqlstr, "VERAG", , list)
Return za_Id > 0
End Function
'========================================================================
' SAVE_ALL (Header + Items + Duties + Docs)
'========================================================================
Public Function SAVE_ALL() As Boolean
If Not SAVE() Then Return False
If Not SAVE_Items() Then Return False
If Not SAVE_Duties() Then Return False
If Not SAVE_Documents() Then Return False
If Not SAVE_ItemDocuments() Then Return False
Return True
End Function
'========================================================================
' LOAD HEADER
'========================================================================
Public Function LOAD(Optional loadALL As Boolean = True) As Boolean
If loadALL Then
Items.Clear()
Duties.Clear()
Documents.Clear()
ItemDocuments.Clear()
End If
Using conn = SQL.GetNewOpenConnectionFMZOLL()
Using cmd As New SqlCommand("SELECT * FROM tblVERAG_CustomsDeclarations WHERE za_Id=@id", conn)
cmd.Parameters.AddWithValue("@id", za_Id)
Using dr = cmd.ExecuteReader()
If dr.Read Then
For Each p In getParameterList()
Dim prop = Me.GetType().GetProperty(p.Scalarvariable)
If prop IsNot Nothing Then
If IsDBNull(dr(p.Text)) Then
prop.SetValue(Me, Nothing)
Else
prop.SetValue(Me, dr(p.Text))
End If
End If
Next
dr.Close()
If loadALL Then
LOAD_Items()
LOAD_Duties()
LOAD_Documents()
LOAD_ItemDocuments()
End If
Return True
End If
End Using
End Using
End Using
Return False
End Function
'========================================================================
' SAVE ITEMS
'========================================================================
Private Function SAVE_Items() As Boolean
For Each it In Items
it.zaItem_DeclarationId = za_Id
If Not it.SAVE() Then Return False
Next
Return True
End Function
'========================================================================
' SAVE DUTIES
'========================================================================
Private Function SAVE_Duties() As Boolean
For Each du In Duties
du.zaDuty_DeclarationId = za_Id
If Not du.SAVE() Then Return False
Next
Return True
End Function
'========================================================================
' SAVE DOCS HEADER
'========================================================================
Private Function SAVE_Documents() As Boolean
For Each d In Documents
d.zaDoc_DeclarationId = za_Id
If Not d.SAVE() Then Return False
Next
Return True
End Function
'========================================================================
' SAVE DOCS ITEM
'========================================================================
Private Function SAVE_ItemDocuments() As Boolean
For Each d In ItemDocuments
If Not d.SAVE() Then Return False
Next
Return True
End Function
'========================================================================
' LOAD UNTERKLASSEN
'========================================================================
Private Sub LOAD_Items()
Using conn = SQL.GetNewOpenConnectionFMZOLL()
Using cmd As New SqlCommand("SELECT * FROM tblVERAG_CustomsDeclarations_Items WHERE zaItem_DeclarationId=@id ORDER BY zaItem_Line", conn)
cmd.Parameters.AddWithValue("@id", za_Id)
Using dr = cmd.ExecuteReader()
While dr.Read
Dim it As New cVERAG_Zollanmeldung_Item
it.LOAD_FROM_READER(dr)
Items.Add(it)
End While
End Using
End Using
End Using
End Sub
Private Sub LOAD_Duties()
Using conn = SQL.GetNewOpenConnectionFMZOLL()
Using cmd As New SqlCommand("SELECT * FROM tblVERAG_CustomsDeclarations_Duties WHERE zaDuty_DeclarationId=@id", conn)
cmd.Parameters.AddWithValue("@id", za_Id)
Using dr = cmd.ExecuteReader()
While dr.Read
Dim du As New cVERAG_Zollanmeldung_Duty
du.LOAD_FROM_READER(dr)
Duties.Add(du)
End While
End Using
End Using
End Using
End Sub
Private Sub LOAD_Documents()
Using conn = SQL.GetNewOpenConnectionFMZOLL()
Using cmd As New SqlCommand("SELECT * FROM tblVERAG_CustomsDeclarations_Documents WHERE zaDoc_DeclarationId=@id AND zaDoc_Level='H'", conn)
cmd.Parameters.AddWithValue("@id", za_Id)
Using dr = cmd.ExecuteReader()
While dr.Read
Dim d As New cVERAG_Zollanmeldung_Document
d.LOAD_FROM_READER(dr)
Documents.Add(d)
End While
End Using
End Using
End Using
End Sub
Private Sub LOAD_ItemDocuments()
Using conn = SQL.GetNewOpenConnectionFMZOLL()
Using cmd As New SqlCommand("SELECT * FROM tblVERAG_CustomsDeclarations_Documents WHERE zaDoc_Level='I' AND zaDoc_DeclarationId=@id", conn)
cmd.Parameters.AddWithValue("@id", za_Id)
Using dr = cmd.ExecuteReader()
While dr.Read
Dim d As New cVERAG_Zollanmeldung_ItemDocument
d.LOAD_FROM_READER(dr)
ItemDocuments.Add(d)
End While
End Using
End Using
End Using
End Sub
'========================================================================
' SQL HELPERS
'========================================================================
Private Function getUpdateCmd() As String
Dim cols As New Text.StringBuilder()
For Each p In getParameterList()
If Not p.isPrimaryParam Then
cols.Append("[" & p.Text & "]=@" & p.Scalarvariable & ",")
End If
Next
Dim setClause = cols.ToString().TrimEnd(","c)
Return "UPDATE tblVERAG_CustomsDeclarations SET " & setClause & " WHERE za_Id=@za_Id"
End Function
Private Function getInsertCmd() As String
Dim C As New List(Of String)
Dim V As New List(Of String)
For Each p In getParameterList()
If Not p.isPrimaryParam Then
C.Add("[" & p.Text & "]")
V.Add("@" & p.Scalarvariable)
End If
Next
Return "INSERT INTO tblVERAG_CustomsDeclarations (" &
String.Join(",", C) &
") VALUES (" &
String.Join(",", V) &
");"
End Function
End Class
' ==========================================================================
' ITEM
' ==========================================================================
Public Class cVERAG_Zollanmeldung_Item
Public Property zaItem_Id As Integer
Public Property zaItem_DeclarationId As Integer
Public Property zaItem_Line As Integer
Public Property zaItem_ArticleCode As String
Public Property zaItem_HSCode As String
Public Property zaItem_Description As String
Public Property zaItem_Qty As Decimal?
Public Property zaItem_Unit As String
Public Property zaItem_Gross As Decimal?
Public Property zaItem_Net As Decimal?
Public Property zaItem_InvoiceValue As Decimal?
Public Property zaItem_CustomsValue As Decimal?
Public Property zaItem_StatisticalValue As Decimal?
Public Property zaItem_Currency As String
Public Property zaItem_OriginCountry As String
Public Property zaItem_PreferenceCode As String
Private SQL As New VERAG_PROG_ALLGEMEIN.SQL
'--- PARAMLIST ----------------------------------------------------------
Public Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
Dim L As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_Id", zaItem_Id,, True, True))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_DeclarationId", zaItem_DeclarationId))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_Line", zaItem_Line))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_ArticleCode", zaItem_ArticleCode))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_HSCode", zaItem_HSCode))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_Description", zaItem_Description))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_Qty", zaItem_Qty))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_Unit", zaItem_Unit))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_Gross", zaItem_Gross))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_Net", zaItem_Net))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_InvoiceValue", zaItem_InvoiceValue))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_CustomsValue", zaItem_CustomsValue))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_StatisticalValue", zaItem_StatisticalValue))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_Currency", zaItem_Currency))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_OriginCountry", zaItem_OriginCountry))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaItem_PreferenceCode", zaItem_PreferenceCode))
Return L
End Function
'--- SAVE ---------------------------------------------------------------
Public Function SAVE() As Boolean
Dim list = getParameterList()
Dim sqlstr As String =
" BEGIN TRAN " &
" IF EXISTS(SELECT 1 FROM tblVERAG_CustomsDeclarations_Items WHERE zaItem_Id=@zaItem_Id) " &
" BEGIN " & getUpdateCmd() & " END " &
" ELSE BEGIN " & getInsertCmd() & " END " &
" COMMIT TRAN "
zaItem_Id = SQL.doSQLVarListID(zaItem_Id, sqlstr, "VERAG", , list)
Return zaItem_Id > 0
End Function
'--- LOAD FROM DATAREADER ----------------------------------------------
Public Sub LOAD_FROM_READER(dr As SqlDataReader)
For Each p In getParameterList()
Dim prop = Me.GetType().GetProperty(p.Scalarvariable)
If prop IsNot Nothing Then
If IsDBNull(dr(p.Text)) Then
prop.SetValue(Me, Nothing)
Else
prop.SetValue(Me, dr(p.Text))
End If
End If
Next
End Sub
'--- SQL HELPERS --------------------------------------------------------
Private Function getUpdateCmd() As String
Dim cols As New List(Of String)
For Each p In getParameterList()
If Not p.isPrimaryParam Then
cols.Add("[" & p.Text & "]=@" & p.Scalarvariable)
End If
Next
Return "UPDATE tblVERAG_CustomsDeclarations_Items SET " &
String.Join(",", cols) &
" WHERE zaItem_Id=@zaItem_Id"
End Function
Private Function getInsertCmd() As String
Dim C As New List(Of String)
Dim V As New List(Of String)
For Each p In getParameterList()
If Not p.isPrimaryParam Then
C.Add("[" & p.Text & "]")
V.Add("@" & p.Scalarvariable)
End If
Next
Return "INSERT INTO tblVERAG_CustomsDeclarations_Items (" &
String.Join(",", C) &
") VALUES (" &
String.Join(",", V) &
")"
End Function
End Class
' ==========================================================================
' DUTY
' ==========================================================================
Public Class cVERAG_Zollanmeldung_Duty
Public Property zaDuty_Id As Integer
Public Property zaDuty_DeclarationId As Integer
Public Property zaDuty_ItemId As Integer?
Public Property zaDuty_Type As String
Public Property zaDuty_BaseAmountForeign As Decimal?
Public Property zaDuty_BaseCurrency As String
Public Property zaDuty_BaseAmountEUR As Decimal?
Public Property zaDuty_Rate As String
Public Property zaDuty_AmountForeign As Decimal?
Public Property zaDuty_AmountCurrency As String
Public Property zaDuty_AmountEUR As Decimal?
Public Property zaDuty_DeferredFlag As Boolean?
Public Property zaDuty_DeferredAccount As String
Public Property zaDuty_MeasureId As String
Public Property zaDuty_Indicator As String
Public Property zaDuty_Remarks As String
Private SQL As New VERAG_PROG_ALLGEMEIN.SQL
'--- PARAMLIST ----------------------------------------------------------
Public Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
Dim L As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_Id", zaDuty_Id,, True, True))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_DeclarationId", zaDuty_DeclarationId))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_ItemId", zaDuty_ItemId))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_Type", zaDuty_Type))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_BaseAmountForeign", zaDuty_BaseAmountForeign))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_BaseCurrency", zaDuty_BaseCurrency))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_BaseAmountEUR", zaDuty_BaseAmountEUR))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_Rate", zaDuty_Rate))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_AmountForeign", zaDuty_AmountForeign))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_AmountCurrency", zaDuty_AmountCurrency))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_AmountEUR", zaDuty_AmountEUR))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_DeferredFlag", zaDuty_DeferredFlag))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_DeferredAccount", zaDuty_DeferredAccount))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_MeasureId", zaDuty_MeasureId))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_Indicator", zaDuty_Indicator))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDuty_Remarks", zaDuty_Remarks))
Return L
End Function
'--- SAVE ---------------------------------------------------------------
Public Function SAVE() As Boolean
Dim list = getParameterList()
Dim sqlstr As String =
" BEGIN TRAN " &
" IF EXISTS(SELECT 1 FROM tblVERAG_CustomsDeclarations_Duties WHERE zaDuty_Id=@zaDuty_Id) " &
" BEGIN " & getUpdateCmd() & " END " &
" ELSE BEGIN " & getInsertCmd() & " END " &
" COMMIT TRAN "
zaDuty_Id = SQL.doSQLVarListID(zaDuty_Id, sqlstr, "VERAG", , list)
Return zaDuty_Id > 0
End Function
'--- LOAD FROM DATAREADER ----------------------------------------------
Public Sub LOAD_FROM_READER(dr As SqlDataReader)
For Each p In getParameterList()
Dim prop = Me.GetType().GetProperty(p.Scalarvariable)
If prop IsNot Nothing Then
If IsDBNull(dr(p.Text)) Then
prop.SetValue(Me, Nothing)
Else
prop.SetValue(Me, dr(p.Text))
End If
End If
Next
End Sub
'--- SQL HELPERS --------------------------------------------------------
Private Function getUpdateCmd() As String
Dim cols As New List(Of String)
For Each p In getParameterList()
If Not p.isPrimaryParam Then
cols.Add("[" & p.Text & "]=@" & p.Scalarvariable)
End If
Next
Return "UPDATE tblVERAG_CustomsDeclarations_Duties SET " &
String.Join(",", cols) &
" WHERE zaDuty_Id=@zaDuty_Id"
End Function
Private Function getInsertCmd() As String
Dim C As New List(Of String)
Dim V As New List(Of String)
For Each p In getParameterList()
If Not p.isPrimaryParam Then
C.Add("[" & p.Text & "]")
V.Add("@" & p.Scalarvariable)
End If
Next
Return "INSERT INTO tblVERAG_CustomsDeclarations_Duties (" &
String.Join(",", C) &
") VALUES (" &
String.Join(",", V) &
")"
End Function
End Class
' ==========================================================================
' DOCUMENT (HEADER)
' ==========================================================================
Public Class cVERAG_Zollanmeldung_Document
Public Property zaDoc_Id As Integer
Public Property zaDoc_DeclarationId As Integer
Public Property zaDoc_Level As String = "H"
Public Property zaDoc_Code As String
Public Property zaDoc_Type As String
Public Property zaDoc_Reference As String
Public Property zaDoc_IssueDate As Date?
Public Property zaDoc_IssueCountry As String
Public Property zaDoc_IssueTIN As String
Public Property zaDoc_UID As String
Public Property zaDoc_ValidTo As Date?
Public Property zaDoc_Remarks As String
Private SQL As New VERAG_PROG_ALLGEMEIN.SQL
'--- PARAMLIST ----------------------------------------------------------
Public Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
Dim L As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Id", zaDoc_Id,, True, True))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_DeclarationId", zaDoc_DeclarationId))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Level", zaDoc_Level))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Code", zaDoc_Code))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Type", zaDoc_Type))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Reference", zaDoc_Reference))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_IssueDate", zaDoc_IssueDate))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_IssueCountry", zaDoc_IssueCountry))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_IssueTIN", zaDoc_IssueTIN))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_UID", zaDoc_UID))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_ValidTo", zaDoc_ValidTo))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Remarks", zaDoc_Remarks))
Return L
End Function
'--- SAVE ---------------------------------------------------------------
Public Function SAVE() As Boolean
Dim list = getParameterList()
Dim sqlstr As String =
" BEGIN TRAN " &
" IF EXISTS(SELECT 1 FROM tblVERAG_CustomsDeclarations_Documents WHERE zaDoc_Id=@zaDoc_Id) " &
" BEGIN " & getUpdateCmd() & " END " &
" ELSE BEGIN " & getInsertCmd() & " END " &
" COMMIT TRAN "
zaDoc_Id = SQL.doSQLVarListID(zaDoc_Id, sqlstr, "VERAG", , list)
Return zaDoc_Id > 0
End Function
'--- LOAD FROM DATAREADER ----------------------------------------------
Public Sub LOAD_FROM_READER(dr As SqlDataReader)
For Each p In getParameterList()
Dim prop = Me.GetType().GetProperty(p.Scalarvariable)
If prop IsNot Nothing Then
If IsDBNull(dr(p.Text)) Then
prop.SetValue(Me, Nothing)
Else
prop.SetValue(Me, dr(p.Text))
End If
End If
Next
End Sub
'--- SQL HELPERS --------------------------------------------------------
Private Function getUpdateCmd() As String
Dim cols As New List(Of String)
For Each p In getParameterList()
If Not p.isPrimaryParam Then
cols.Add("[" & p.Text & "]=@" & p.Scalarvariable)
End If
Next
Return "UPDATE tblVERAG_CustomsDeclarations_Documents SET " &
String.Join(",", cols) &
" WHERE zaDoc_Id=@zaDoc_Id"
End Function
Private Function getInsertCmd() As String
Dim C As New List(Of String)
Dim V As New List(Of String)
For Each p In getParameterList()
If Not p.isPrimaryParam Then
C.Add("[" & p.Text & "]")
V.Add("@" & p.Scalarvariable)
End If
Next
Return "INSERT INTO tblVERAG_CustomsDeclarations_Documents (" &
String.Join(",", C) &
") VALUES (" &
String.Join(",", V) &
")"
End Function
End Class
' ==========================================================================
' DOCUMENT (ITEM)
' ==========================================================================
Public Class cVERAG_Zollanmeldung_ItemDocument
Public Property zaDoc_Id As Integer
Public Property zaDoc_DeclarationId As Integer?
Public Property zaDoc_ItemId As Integer?
Public Property zaDoc_Level As String = "I"
Public Property zaDoc_Code As String
Public Property zaDoc_Type As String
Public Property zaDoc_Reference As String
Public Property zaDoc_IssueDate As Date?
Public Property zaDoc_IssueCountry As String
Public Property zaDoc_IssueTIN As String
Public Property zaDoc_UID As String
Public Property zaDoc_ValidTo As Date?
Public Property zaDoc_Remarks As String
Private SQL As New VERAG_PROG_ALLGEMEIN.SQL
'--- PARAMLIST ----------------------------------------------------------
Public Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
Dim L As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Id", zaDoc_Id,, True, True))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_DeclarationId", zaDoc_DeclarationId))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_ItemId", zaDoc_ItemId))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Level", zaDoc_Level))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Code", zaDoc_Code))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Type", zaDoc_Type))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Reference", zaDoc_Reference))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_IssueDate", zaDoc_IssueDate))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_IssueCountry", zaDoc_IssueCountry))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_IssueTIN", zaDoc_IssueTIN))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_UID", zaDoc_UID))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_ValidTo", zaDoc_ValidTo))
L.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("zaDoc_Remarks", zaDoc_Remarks))
Return L
End Function
'--- SAVE ---------------------------------------------------------------
Public Function SAVE() As Boolean
Dim list = getParameterList()
Dim sqlstr As String =
" BEGIN TRAN " &
" IF EXISTS(SELECT 1 FROM tblVERAG_CustomsDeclarations_Documents WHERE zaDoc_Id=@zaDoc_Id) " &
" BEGIN " & getUpdateCmd() & " END " &
" ELSE BEGIN " & getInsertCmd() & " END " &
" COMMIT TRAN "
zaDoc_Id = SQL.doSQLVarListID(zaDoc_Id, sqlstr, "VERAG", , list)
Return zaDoc_Id > 0
End Function
'--- LOAD FROM DATAREADER ----------------------------------------------
Public Sub LOAD_FROM_READER(dr As SqlDataReader)
For Each p In getParameterList()
Dim prop = Me.GetType().GetProperty(p.Scalarvariable)
If prop IsNot Nothing Then
If IsDBNull(dr(p.Text)) Then
prop.SetValue(Me, Nothing)
Else
prop.SetValue(Me, dr(p.Text))
End If
End If
Next
End Sub
'--- SQL HELPERS --------------------------------------------------------
Private Function getUpdateCmd() As String
Dim cols As New List(Of String)
For Each p In getParameterList()
If Not p.isPrimaryParam Then
cols.Add("[" & p.Text & "]=@" & p.Scalarvariable)
End If
Next
Return "UPDATE tblVERAG_CustomsDeclarations_Documents SET " &
String.Join(",", cols) &
" WHERE zaDoc_Id=@zaDoc_Id"
End Function
Private Function getInsertCmd() As String
Dim C As New List(Of String)
Dim V As New List(Of String)
For Each p In getParameterList()
If Not p.isPrimaryParam Then
C.Add("[" & p.Text & "]")
V.Add("@" & p.Scalarvariable)
End If
Next
Return "INSERT INTO tblVERAG_CustomsDeclarations_Documents (" &
String.Join(",", C) &
") VALUES (" &
String.Join(",", V) &
")"
End Function
End Class