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

ModaltransAPI

Browse Source
This commit is contained in:
d.breimaier
2023-07-24 17:17:44 +02:00
parent ef4187804d
commit 792ccc4e4d
23 changed files with 3890 additions and 1052 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

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

177
SDL/My Project/Resources.resx
View File

@@ -148,9 +148,6 @@
<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="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="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>
@@ -160,8 +157,8 @@
<data name="reloadFinance" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\..\..\data\reloadFinance.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="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="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>
@@ -172,11 +169,14 @@
<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="RG_ZF" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\RG_ZF.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</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="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>
@@ -196,6 +196,9 @@
<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>
@@ -256,9 +259,6 @@
<data name="rechnung1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\rechnung1.png;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>
<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>
@@ -271,6 +271,9 @@
<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>
@@ -286,6 +289,9 @@
<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="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="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>
</data>
@@ -295,12 +301,12 @@
<data name="email11" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\email11.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>
<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="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="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>
</data>
@@ -322,6 +328,9 @@
<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="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>
<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>
@@ -334,15 +343,15 @@
<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="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>
@@ -382,9 +391,6 @@
<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>
@@ -427,15 +433,15 @@
<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="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>
</data>
<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="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>
@@ -445,18 +451,15 @@
<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="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="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>
<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>
@@ -469,15 +472,21 @@
<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="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="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="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="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>
@@ -508,8 +517,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="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="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="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>
@@ -529,15 +538,12 @@
<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="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="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="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="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="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>
@@ -547,6 +553,9 @@
<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>
<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>
</data>
@@ -556,12 +565,15 @@
<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="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="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="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>
@@ -601,8 +613,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="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 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="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>
@@ -610,9 +622,6 @@
<data name="Unisped_DE_logo" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Unisped_DE_logo.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
<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="list_new_small1" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\list_new_small1.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a</value>
</data>
@@ -622,12 +631,15 @@
<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="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="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="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>
</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="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>
@@ -658,8 +670,8 @@
<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="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 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="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>
@@ -685,17 +697,14 @@
<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="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 name="RG_ZF" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\RG_ZF.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</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>
@@ -706,8 +715,8 @@
<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="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 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="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>
@@ -715,8 +724,8 @@
<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="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 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="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>
@@ -727,8 +736,8 @@
<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="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 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="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>
@@ -736,20 +745,17 @@
<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="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="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 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="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="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="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="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>
@@ -757,8 +763,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="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="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="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>
@@ -766,14 +772,14 @@
<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="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="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="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="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="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="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="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>
@@ -835,11 +841,8 @@
<data name="mahn" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\..\..\data\mahn.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>
<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 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="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>
@@ -865,11 +868,11 @@
<data name="Einheitspapier_0777_Position" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\Einheitspapier-0777_Position.jpg;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 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="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 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="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>
@@ -880,7 +883,7 @@
<data name="flagge_A" type="System.Resources.ResXFileRef, System.Windows.Forms">
<value>..\Resources\flagge_A.gif;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 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>
</data>
</root>

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

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 7.6 KiB

12
SDL/SDL.vbproj
View File

@@ -90,7 +90,7 @@
<SignAssembly>false</SignAssembly>
</PropertyGroup>
<PropertyGroup>
<AssemblyOriginatorKeyFile>SDL_TemporaryKey.pfx</AssemblyOriginatorKeyFile>
<AssemblyOriginatorKeyFile>Test.pfx</AssemblyOriginatorKeyFile>
</PropertyGroup>
<ItemGroup>
<Reference Include="Accessibility" />
@@ -2698,6 +2698,12 @@
<Compile Include="ZOLLSYSTEM\MIC\usrCntlMIC_NCTS.vb">
<SubType>UserControl</SubType>
</Compile>
<Compile Include="ZOLLSYSTEM\MODALTRANS\usrCntlModaltrans_NCTS.Designer.vb">
<DependentUpon>usrCntlModaltrans_NCTS.vb</DependentUpon>
</Compile>
<Compile Include="ZOLLSYSTEM\MODALTRANS\usrCntlModaltrans_NCTS.vb">
<SubType>UserControl</SubType>
</Compile>
<Compile Include="ZOLLSYSTEM\SGS\usrCntlSGS_NCTS.Designer.vb">
<DependentUpon>usrCntlSGS_NCTS.vb</DependentUpon>
</Compile>
@@ -3982,6 +3988,9 @@
<EmbeddedResource Include="ZOLLSYSTEM\MIC\usrCntlMIC_NCTS.resx">
<DependentUpon>usrCntlMIC_NCTS.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="ZOLLSYSTEM\MODALTRANS\usrCntlModaltrans_NCTS.resx">
<DependentUpon>usrCntlModaltrans_NCTS.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="ZOLLSYSTEM\SGS\usrCntlSGS_NCTS.resx">
<DependentUpon>usrCntlSGS_NCTS.vb</DependentUpon>
</EmbeddedResource>
@@ -4477,6 +4486,7 @@
<None Include="Resources\pay_card_s1.png" />
<None Include="Resources\pay_cash_s.png" />
<None Include="Resources\locked.jpg" />
<None Include="Resources\modaltrans_original.png" />
<Content Include="Resources\Verag_Customs_Service_AEO.jpg">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</Content>

23
SDL/ZOLLSYSTEM/DAKOSY/frmZollanmeldung.vb
View File

@@ -144,6 +144,29 @@
End Select
Case "MODALTRANS"
Select Case ART
Case "Export", "Import" ', "NCTS", "ÜT"
If ART = "ÜT" Then
ART = "T1"
isSTAMMREF = False
STAMMREF = "" '??????????????????????????????
End If
If Me.DY Is Nothing Then
Dim usrcntl As New usrCntlModaltrans_NCTS(ART, AVISO, SENDUNG, JAHR, , isSTAMMREF, STAMMREF, FIRMA_DY)
usrcntl.Dock = DockStyle.Fill
Me.pnl.Controls.Add(usrcntl)
Else
'Dim usrcntl As New usrCntlModaltrans_NCTS(DY, AVISO, SENDUNG, JAHR, , isSTAMMREF, STAMMREF)
'usrcntl.Dock = DockStyle.Fill
'Me.pnl.Controls.Add(usrcntl)
End If
End Select
Case Else '"DAKOSY'

517
SDL/ZOLLSYSTEM/MODALTRANS/usrCntlModaltrans_NCTS.Designer.vb generated Normal file
View File

@@ -0,0 +1,517 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Class usrCntlModaltrans_NCTS
Inherits System.Windows.Forms.UserControl
'UserControl ü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()
Me.components = New System.ComponentModel.Container()
Me.SplitContainer = New System.Windows.Forms.SplitContainer()
Me.MyFlowLayoutPanel1 = New VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel(Me.components)
Me.btnAllgemein = New System.Windows.Forms.Button()
Me.btnAdressen = New System.Windows.Forms.Button()
Me.btnSicherheit = New System.Windows.Forms.Button()
Me.btnVerschlüsse = New System.Windows.Forms.Button()
Me.btnPositionen = New System.Windows.Forms.Button()
Me.Button5 = New System.Windows.Forms.Button()
Me.pnl = New System.Windows.Forms.Panel()
Me.Label8 = New System.Windows.Forms.Label()
Me.Label7 = New System.Windows.Forms.Label()
Me.Label6 = New System.Windows.Forms.Label()
Me.cboStammreferenz = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.cboDakosyAction = New VERAG_PROG_ALLGEMEIN.MyComboBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.Label4 = New System.Windows.Forms.Label()
Me.Label5 = New System.Windows.Forms.Label()
Me.Label2 = New System.Windows.Forms.Label()
Me.Label3 = New System.Windows.Forms.Label()
Me.Label1 = New System.Windows.Forms.Label()
Me.lblBezugsnummer = New System.Windows.Forms.Label()
Me.cntxtBezugsnr = New System.Windows.Forms.ContextMenuStrip(Me.components)
Me.NeueBezugsnummerVergebenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.pic = New System.Windows.Forms.PictureBox()
Me.txtDyMandant = New System.Windows.Forms.Label()
Me.txtDyNiederlassung = New System.Windows.Forms.Label()
Me.MenuStrip = New System.Windows.Forms.MenuStrip()
Me.OptionenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.SpeichernToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
Me.LadenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SplitContainer.Panel1.SuspendLayout()
Me.SplitContainer.SuspendLayout()
Me.MyFlowLayoutPanel1.SuspendLayout()
Me.pnl.SuspendLayout()
Me.cntxtBezugsnr.SuspendLayout()
Me.Panel1.SuspendLayout()
CType(Me.pic, System.ComponentModel.ISupportInitialize).BeginInit()
Me.MenuStrip.SuspendLayout()
Me.SuspendLayout()
'
'SplitContainer
'
Me.SplitContainer.Dock = System.Windows.Forms.DockStyle.Fill
Me.SplitContainer.FixedPanel = System.Windows.Forms.FixedPanel.Panel1
Me.SplitContainer.IsSplitterFixed = True
Me.SplitContainer.Location = New System.Drawing.Point(0, 25)
Me.SplitContainer.Margin = New System.Windows.Forms.Padding(0)
Me.SplitContainer.Name = "SplitContainer"
Me.SplitContainer.Orientation = System.Windows.Forms.Orientation.Horizontal
'
'SplitContainer.Panel1
'
Me.SplitContainer.Panel1.Controls.Add(Me.MyFlowLayoutPanel1)
Me.SplitContainer.Panel1.Controls.Add(Me.pnl)
'
'SplitContainer.Panel2
'
Me.SplitContainer.Panel2.BackColor = System.Drawing.Color.WhiteSmoke
Me.SplitContainer.Size = New System.Drawing.Size(934, 687)
Me.SplitContainer.SplitterDistance = 72
Me.SplitContainer.SplitterWidth = 1
Me.SplitContainer.TabIndex = 0
'
'MyFlowLayoutPanel1
'
Me.MyFlowLayoutPanel1.BackColor = System.Drawing.Color.WhiteSmoke
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnAllgemein)
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnAdressen)
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnSicherheit)
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnVerschlüsse)
Me.MyFlowLayoutPanel1.Controls.Add(Me.btnPositionen)
Me.MyFlowLayoutPanel1.Controls.Add(Me.Button5)
Me.MyFlowLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Fill
Me.MyFlowLayoutPanel1.Location = New System.Drawing.Point(0, 0)
Me.MyFlowLayoutPanel1.Margin = New System.Windows.Forms.Padding(1)
Me.MyFlowLayoutPanel1.Name = "MyFlowLayoutPanel1"
Me.MyFlowLayoutPanel1.Size = New System.Drawing.Size(573, 72)
Me.MyFlowLayoutPanel1.TabIndex = 0
'
'btnAllgemein
'
Me.btnAllgemein.BackColor = System.Drawing.Color.SteelBlue
Me.btnAllgemein.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
Me.btnAllgemein.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnAllgemein.ForeColor = System.Drawing.SystemColors.ControlLightLight
Me.btnAllgemein.Image = Global.SDL.My.Resources.Resources.android_note12
Me.btnAllgemein.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.btnAllgemein.Location = New System.Drawing.Point(2, 2)
Me.btnAllgemein.Margin = New System.Windows.Forms.Padding(2)
Me.btnAllgemein.Name = "btnAllgemein"
Me.btnAllgemein.Padding = New System.Windows.Forms.Padding(0, 12, 0, 3)
Me.btnAllgemein.Size = New System.Drawing.Size(75, 67)
Me.btnAllgemein.TabIndex = 0
Me.btnAllgemein.Text = "Allgemein"
Me.btnAllgemein.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.btnAllgemein.UseVisualStyleBackColor = False
'
'btnAdressen
'
Me.btnAdressen.BackColor = System.Drawing.Color.White
Me.btnAdressen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
Me.btnAdressen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnAdressen.Image = Global.SDL.My.Resources.Resources.house1
Me.btnAdressen.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.btnAdressen.Location = New System.Drawing.Point(81, 2)
Me.btnAdressen.Margin = New System.Windows.Forms.Padding(2)
Me.btnAdressen.Name = "btnAdressen"
Me.btnAdressen.Padding = New System.Windows.Forms.Padding(0, 0, 0, 3)
Me.btnAdressen.Size = New System.Drawing.Size(75, 67)
Me.btnAdressen.TabIndex = 1
Me.btnAdressen.Text = "Adressen"
Me.btnAdressen.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.btnAdressen.UseVisualStyleBackColor = False
'
'btnSicherheit
'
Me.btnSicherheit.BackColor = System.Drawing.Color.White
Me.btnSicherheit.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
Me.btnSicherheit.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnSicherheit.Image = Global.SDL.My.Resources.Resources.sicherheit1
Me.btnSicherheit.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.btnSicherheit.Location = New System.Drawing.Point(160, 2)
Me.btnSicherheit.Margin = New System.Windows.Forms.Padding(2)
Me.btnSicherheit.Name = "btnSicherheit"
Me.btnSicherheit.Padding = New System.Windows.Forms.Padding(0, 0, 0, 3)
Me.btnSicherheit.Size = New System.Drawing.Size(81, 67)
Me.btnSicherheit.TabIndex = 2
Me.btnSicherheit.Text = "Sicherheit"
Me.btnSicherheit.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.btnSicherheit.UseVisualStyleBackColor = False
Me.btnSicherheit.Visible = False
'
'btnVerschlüsse
'
Me.btnVerschlüsse.BackColor = System.Drawing.Color.White
Me.btnVerschlüsse.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
Me.btnVerschlüsse.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnVerschlüsse.Image = Global.SDL.My.Resources.Resources.seal3
Me.btnVerschlüsse.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.btnVerschlüsse.Location = New System.Drawing.Point(245, 2)
Me.btnVerschlüsse.Margin = New System.Windows.Forms.Padding(2)
Me.btnVerschlüsse.Name = "btnVerschlüsse"
Me.btnVerschlüsse.Padding = New System.Windows.Forms.Padding(0, 6, 0, 3)
Me.btnVerschlüsse.Size = New System.Drawing.Size(81, 67)
Me.btnVerschlüsse.TabIndex = 3
Me.btnVerschlüsse.Text = "Verschlüsse"
Me.btnVerschlüsse.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.btnVerschlüsse.UseVisualStyleBackColor = False
Me.btnVerschlüsse.Visible = False
'
'btnPositionen
'
Me.btnPositionen.BackColor = System.Drawing.Color.White
Me.btnPositionen.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
Me.btnPositionen.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnPositionen.Image = Global.SDL.My.Resources.Resources.list_new_small2
Me.btnPositionen.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.btnPositionen.Location = New System.Drawing.Point(330, 2)
Me.btnPositionen.Margin = New System.Windows.Forms.Padding(2)
Me.btnPositionen.Name = "btnPositionen"
Me.btnPositionen.Padding = New System.Windows.Forms.Padding(0, 0, 0, 3)
Me.btnPositionen.Size = New System.Drawing.Size(81, 67)
Me.btnPositionen.TabIndex = 4
Me.btnPositionen.Text = "Positionen"
Me.btnPositionen.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.btnPositionen.UseVisualStyleBackColor = False
'
'Button5
'
Me.Button5.BackColor = System.Drawing.Color.White
Me.Button5.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
Me.Button5.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button5.Image = Global.SDL.My.Resources.Resources.android_note12
Me.Button5.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.Button5.Location = New System.Drawing.Point(415, 2)
Me.Button5.Margin = New System.Windows.Forms.Padding(2)
Me.Button5.Name = "Button5"
Me.Button5.Padding = New System.Windows.Forms.Padding(0, 12, 0, 3)
Me.Button5.Size = New System.Drawing.Size(81, 67)
Me.Button5.TabIndex = 5
Me.Button5.Text = "Referenzen"
Me.Button5.TextAlign = System.Drawing.ContentAlignment.BottomCenter
Me.Button5.UseVisualStyleBackColor = False
Me.Button5.Visible = False
'
'pnl
'
Me.pnl.BackColor = System.Drawing.Color.WhiteSmoke
Me.pnl.Controls.Add(Me.Label8)
Me.pnl.Controls.Add(Me.Label7)
Me.pnl.Controls.Add(Me.Label6)
Me.pnl.Controls.Add(Me.cboStammreferenz)
Me.pnl.Controls.Add(Me.cboDakosyAction)
Me.pnl.Controls.Add(Me.Button1)
Me.pnl.Controls.Add(Me.Label4)
Me.pnl.Controls.Add(Me.Label5)
Me.pnl.Controls.Add(Me.Label2)
Me.pnl.Controls.Add(Me.Label3)
Me.pnl.Dock = System.Windows.Forms.DockStyle.Right
Me.pnl.Location = New System.Drawing.Point(573, 0)
Me.pnl.Name = "pnl"
Me.pnl.Size = New System.Drawing.Size(361, 72)
Me.pnl.TabIndex = 1
'
'Label8
'
Me.Label8.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Label8.AutoSize = True
Me.Label8.Location = New System.Drawing.Point(8, 34)
Me.Label8.Name = "Label8"
Me.Label8.Size = New System.Drawing.Size(60, 13)
Me.Label8.TabIndex = 14
Me.Label8.Text = "Rohmasse:"
Me.Label8.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'Label7
'
Me.Label7.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold)
Me.Label7.Location = New System.Drawing.Point(73, 31)
Me.Label7.Name = "Label7"
Me.Label7.Size = New System.Drawing.Size(122, 18)
Me.Label7.TabIndex = 13
Me.Label7.Text = "0 kg"
Me.Label7.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Label6
'
Me.Label6.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Label6.AutoSize = True
Me.Label6.Location = New System.Drawing.Point(8, 51)
Me.Label6.Name = "Label6"
Me.Label6.Size = New System.Drawing.Size(57, 13)
Me.Label6.TabIndex = 12
Me.Label6.Text = "Stammref.:"
Me.Label6.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'cboStammreferenz
'
Me.cboStammreferenz._allowedValuesFreiText = Nothing
Me.cboStammreferenz._allowFreiText = False
Me.cboStammreferenz._value = ""
Me.cboStammreferenz.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
Me.cboStammreferenz.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboStammreferenz.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.cboStammreferenz.FormattingEnabled = True
Me.cboStammreferenz.Location = New System.Drawing.Point(66, 48)
Me.cboStammreferenz.Name = "cboStammreferenz"
Me.cboStammreferenz.Size = New System.Drawing.Size(129, 21)
Me.cboStammreferenz.TabIndex = 11
'
'cboDakosyAction
'
Me.cboDakosyAction._allowedValuesFreiText = Nothing
Me.cboDakosyAction._allowFreiText = False
Me.cboDakosyAction._value = ""
Me.cboDakosyAction.BackColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
Me.cboDakosyAction.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
Me.cboDakosyAction.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.cboDakosyAction.FormattingEnabled = True
Me.cboDakosyAction.Location = New System.Drawing.Point(200, 48)
Me.cboDakosyAction.Name = "cboDakosyAction"
Me.cboDakosyAction.Size = New System.Drawing.Size(158, 21)
Me.cboDakosyAction.TabIndex = 1
'
'Button1
'
Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Button1.BackColor = System.Drawing.Color.White
Me.Button1.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Center
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.Button1.ImageAlign = System.Drawing.ContentAlignment.TopCenter
Me.Button1.Location = New System.Drawing.Point(200, 5)
Me.Button1.Margin = New System.Windows.Forms.Padding(2)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(159, 42)
Me.Button1.TabIndex = 6
Me.Button1.Text = "An MT senden -->"
Me.Button1.UseVisualStyleBackColor = False
'
'Label4
'
Me.Label4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Label4.AutoSize = True
Me.Label4.Location = New System.Drawing.Point(8, 19)
Me.Label4.Name = "Label4"
Me.Label4.Size = New System.Drawing.Size(67, 13)
Me.Label4.TabIndex = 9
Me.Label4.Text = "Packstücke:"
Me.Label4.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'Label5
'
Me.Label5.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold)
Me.Label5.Location = New System.Drawing.Point(73, 16)
Me.Label5.Name = "Label5"
Me.Label5.Size = New System.Drawing.Size(122, 18)
Me.Label5.TabIndex = 10
Me.Label5.Text = "0 Pk"
Me.Label5.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Label2
'
Me.Label2.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Label2.AutoSize = True
Me.Label2.Location = New System.Drawing.Point(8, 4)
Me.Label2.Name = "Label2"
Me.Label2.Size = New System.Drawing.Size(59, 13)
Me.Label2.TabIndex = 7
Me.Label2.Text = "Positionen:"
Me.Label2.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'Label3
'
Me.Label3.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Label3.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold)
Me.Label3.Location = New System.Drawing.Point(103, 1)
Me.Label3.Name = "Label3"
Me.Label3.Size = New System.Drawing.Size(92, 18)
Me.Label3.TabIndex = 8
Me.Label3.Text = "1"
Me.Label3.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'Label1
'
Me.Label1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.Label1.AutoSize = True
Me.Label1.BackColor = System.Drawing.Color.White
Me.Label1.Location = New System.Drawing.Point(581, 7)
Me.Label1.Name = "Label1"
Me.Label1.Size = New System.Drawing.Size(82, 13)
Me.Label1.TabIndex = 5
Me.Label1.Text = "Bezugsnummer:"
'
'lblBezugsnummer
'
Me.lblBezugsnummer.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
Me.lblBezugsnummer.BackColor = System.Drawing.Color.White
Me.lblBezugsnummer.ContextMenuStrip = Me.cntxtBezugsnr
Me.lblBezugsnummer.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.lblBezugsnummer.Location = New System.Drawing.Point(738, 1)
Me.lblBezugsnummer.Name = "lblBezugsnummer"
Me.lblBezugsnummer.Size = New System.Drawing.Size(193, 23)
Me.lblBezugsnummer.TabIndex = 6
Me.lblBezugsnummer.Text = "4800/000000/17 AAA"
Me.lblBezugsnummer.TextAlign = System.Drawing.ContentAlignment.MiddleRight
'
'cntxtBezugsnr
'
Me.cntxtBezugsnr.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.NeueBezugsnummerVergebenToolStripMenuItem})
Me.cntxtBezugsnr.Name = "cntxtBezugsnr"
Me.cntxtBezugsnr.Size = New System.Drawing.Size(239, 26)
Me.cntxtBezugsnr.Text = "Bezugsnr"
'
'NeueBezugsnummerVergebenToolStripMenuItem
'
Me.NeueBezugsnummerVergebenToolStripMenuItem.Name = "NeueBezugsnummerVergebenToolStripMenuItem"
Me.NeueBezugsnummerVergebenToolStripMenuItem.Size = New System.Drawing.Size(238, 22)
Me.NeueBezugsnummerVergebenToolStripMenuItem.Text = "neue Bezugsnummer vergeben"
'
'Panel1
'
Me.Panel1.Controls.Add(Me.pic)
Me.Panel1.Controls.Add(Me.txtDyMandant)
Me.Panel1.Controls.Add(Me.Label1)
Me.Panel1.Controls.Add(Me.txtDyNiederlassung)
Me.Panel1.Controls.Add(Me.lblBezugsnummer)
Me.Panel1.Controls.Add(Me.MenuStrip)
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(934, 25)
Me.Panel1.TabIndex = 1
'
'pic
'
Me.pic.BackColor = System.Drawing.Color.White
Me.pic.BackgroundImage = Global.SDL.My.Resources.Resources.modaltrans_original
Me.pic.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.pic.Location = New System.Drawing.Point(217, 0)
Me.pic.Name = "pic"
Me.pic.Size = New System.Drawing.Size(100, 24)
Me.pic.TabIndex = 20
Me.pic.TabStop = False
'
'txtDyMandant
'
Me.txtDyMandant.BackColor = System.Drawing.Color.White
Me.txtDyMandant.Location = New System.Drawing.Point(443, 7)
Me.txtDyMandant.Name = "txtDyMandant"
Me.txtDyMandant.Size = New System.Drawing.Size(48, 13)
Me.txtDyMandant.TabIndex = 19
Me.txtDyMandant.Text = "VERG"
Me.txtDyMandant.TextAlign = System.Drawing.ContentAlignment.TopRight
'
'txtDyNiederlassung
'
Me.txtDyNiederlassung.BackColor = System.Drawing.Color.White
Me.txtDyNiederlassung.Location = New System.Drawing.Point(497, 7)
Me.txtDyNiederlassung.Name = "txtDyNiederlassung"
Me.txtDyNiederlassung.Size = New System.Drawing.Size(63, 13)
Me.txtDyNiederlassung.TabIndex = 18
Me.txtDyNiederlassung.Text = "SUB"
'
'MenuStrip
'
Me.MenuStrip.BackColor = System.Drawing.Color.White
Me.MenuStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.OptionenToolStripMenuItem})
Me.MenuStrip.Location = New System.Drawing.Point(0, 0)
Me.MenuStrip.Name = "MenuStrip"
Me.MenuStrip.Size = New System.Drawing.Size(934, 24)
Me.MenuStrip.TabIndex = 0
'
'OptionenToolStripMenuItem
'
Me.OptionenToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.SpeichernToolStripMenuItem, Me.LadenToolStripMenuItem})
Me.OptionenToolStripMenuItem.Name = "OptionenToolStripMenuItem"
Me.OptionenToolStripMenuItem.Size = New System.Drawing.Size(69, 20)
Me.OptionenToolStripMenuItem.Text = "Optionen"
'
'SpeichernToolStripMenuItem
'
Me.SpeichernToolStripMenuItem.Name = "SpeichernToolStripMenuItem"
Me.SpeichernToolStripMenuItem.Size = New System.Drawing.Size(126, 22)
Me.SpeichernToolStripMenuItem.Text = "Speichern"
'
'LadenToolStripMenuItem
'
Me.LadenToolStripMenuItem.Name = "LadenToolStripMenuItem"
Me.LadenToolStripMenuItem.Size = New System.Drawing.Size(126, 22)
Me.LadenToolStripMenuItem.Text = "Laden ..."
'
'usrCntlModaltrans_NCTS
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
Me.Controls.Add(Me.SplitContainer)
Me.Controls.Add(Me.Panel1)
Me.Name = "usrCntlModaltrans_NCTS"
Me.Size = New System.Drawing.Size(934, 712)
Me.SplitContainer.Panel1.ResumeLayout(False)
CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).EndInit()
Me.SplitContainer.ResumeLayout(False)
Me.MyFlowLayoutPanel1.ResumeLayout(False)
Me.pnl.ResumeLayout(False)
Me.pnl.PerformLayout()
Me.cntxtBezugsnr.ResumeLayout(False)
Me.Panel1.ResumeLayout(False)
Me.Panel1.PerformLayout()
CType(Me.pic, System.ComponentModel.ISupportInitialize).EndInit()
Me.MenuStrip.ResumeLayout(False)
Me.MenuStrip.PerformLayout()
Me.ResumeLayout(False)
End Sub
Friend WithEvents SplitContainer As System.Windows.Forms.SplitContainer
Friend WithEvents MyFlowLayoutPanel1 As VERAG_PROG_ALLGEMEIN.MyFlowLayoutPanel
Friend WithEvents btnAllgemein As System.Windows.Forms.Button
Friend WithEvents btnAdressen As System.Windows.Forms.Button
Friend WithEvents btnSicherheit As System.Windows.Forms.Button
Friend WithEvents btnVerschlüsse As System.Windows.Forms.Button
Friend WithEvents btnPositionen As System.Windows.Forms.Button
Friend WithEvents Button5 As System.Windows.Forms.Button
Friend WithEvents pnl As System.Windows.Forms.Panel
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents Label5 As System.Windows.Forms.Label
Friend WithEvents lblBezugsnummer As System.Windows.Forms.Label
Friend WithEvents Label2 As System.Windows.Forms.Label
Friend WithEvents Label1 As System.Windows.Forms.Label
Friend WithEvents Label3 As System.Windows.Forms.Label
Friend WithEvents Panel1 As System.Windows.Forms.Panel
Friend WithEvents MenuStrip As System.Windows.Forms.MenuStrip
Friend WithEvents OptionenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents SpeichernToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents LadenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents cboDakosyAction As VERAG_PROG_ALLGEMEIN.MyComboBox
Friend WithEvents cntxtBezugsnr As System.Windows.Forms.ContextMenuStrip
Friend WithEvents NeueBezugsnummerVergebenToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
Friend WithEvents Label6 As System.Windows.Forms.Label
Friend WithEvents cboStammreferenz As VERAG_PROG_ALLGEMEIN.MyComboBox
Friend WithEvents txtDyMandant As System.Windows.Forms.Label
Friend WithEvents txtDyNiederlassung As System.Windows.Forms.Label
Friend WithEvents Label4 As Label
Friend WithEvents Label7 As Label
Friend WithEvents Label8 As Label
Friend WithEvents pic As PictureBox
End Class

126
SDL/ZOLLSYSTEM/MODALTRANS/usrCntlModaltrans_NCTS.resx Normal file
View File

@@ -0,0 +1,126 @@
<?xml version="1.0" encoding="utf-8"?>
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="cntxtBezugsnr.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="MenuStrip.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>145, 17</value>
</metadata>
</root>

613
SDL/ZOLLSYSTEM/MODALTRANS/usrCntlModaltrans_NCTS.vb Normal file
View File

@@ -0,0 +1,613 @@
Imports DAKOSY_Worker
Imports VERAG_PROG_ALLGEMEIN
Imports VERAG_PROG_ALLGEMEIN.agsCustomsExchange
Imports VERAG_PROG_ALLGEMEIN.IDEV_Intrastat
Public Class usrCntlModaltrans_NCTS
Property ALLG As usrCntlATLAS_NCTS_Allg
Property ADRESSEN As usrCntlATLAS_ncts_Adressen
'Property SICHERHEIT As usrCntlATLAS_NCTS_Sicherheit
Property POSITIONEN As usrCntlATLAS_NCTS_Positionen
'Property VERSCHLUESSE As usrCntlATLAS_NCTS_Verschluesse
Property Jahr2Stellig As Integer
Property zusatz As String
Property BezugsNr As String = ""
Property AVISO As VERAG_PROG_ALLGEMEIN.cAviso
Property SENDUNG As VERAG_PROG_ALLGEMEIN.cSendungen
Property sendToModaltrans = False
Property isSTAMMREF As Boolean = False ' Wenn das Formular als Stammreferenz bearbeitet wird
Property STAMMREF As String = "" ' Wenn eine Stammrefereenz als Grundlage dient
Dim FIRMA_DY = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Dim cDy_ART As String = If(FIRMA_DY = "ATILLA", "T2", "T1")
Dim ncts_OUT As VERAG_PROG_ALLGEMEIN.cNCTS_TR = Nothing
'Dim DY_ANM As cDakosy_Zollanmeldungen = Nothing
Sub New(AVISO As VERAG_PROG_ALLGEMEIN.cAviso, SENDUNG As VERAG_PROG_ALLGEMEIN.cSendungen, Jahr2Stellig As Integer, Optional zusatz As String = "", Optional isSTAMMREF As Boolean = False, Optional STAMMREF As String = "")
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
Me.Jahr2Stellig = Jahr2Stellig
Me.zusatz = zusatz
Me.AVISO = AVISO
Me.SENDUNG = SENDUNG
Me.isSTAMMREF = isSTAMMREF
Me.STAMMREF = STAMMREF
'DY_ANM = New cDakosy_Zollanmeldungen(ncts_OUT.ncts_dyaAnmID)
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Sub New(ART As String, Aviso As VERAG_PROG_ALLGEMEIN.cAviso, SENDUNG As VERAG_PROG_ALLGEMEIN.cSendungen, Jahr2Stellig As Integer, Optional zusatz As String = "", Optional isSTAMMREF As Boolean = False, Optional STAMMREF As String = "", Optional FIRMA_DY As String = "")
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
Me.cDy_ART = If(ART = "NCTS", "T1", ART)
Me.AVISO = Aviso
Me.SENDUNG = SENDUNG
Me.isSTAMMREF = isSTAMMREF
Me.STAMMREF = STAMMREF
Me.Jahr2Stellig = Jahr2Stellig
Me.zusatz = zusatz
If FIRMA_DY <> "" Then Me.FIRMA_DY = FIRMA_DY
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Function getBezugsnr(ByRef BezugsNr)
Dim BezugsNrTmp = ""
Select Case FIRMA_DY
Case "UNISPED"
If If(SENDUNG.tblSnd_DakosyRef, "") <> "" Then
BezugsNrTmp = SENDUNG.tblSnd_DakosyRef
Else
BezugsNrTmp = SENDUNG.FilialenNr & "/" & SENDUNG.AbfertigungsNr
End If
Case Else
BezugsNrTmp = SENDUNG.FilialenNr & "/" & SENDUNG.AbfertigungsNr '& If(zusatz <> "", "/" & zusatz, "") 'zusatz ' & "/" & Jahr2Stellig
End Select
BezugsNr = BezugsNrTmp
zusatz = "A"
'Soloagne bis die Bezugsnummer noch nicht existiert
While DAKOSY_Worker.cDakosy_Zollanmeldungen.ExistsBezugsNr(BezugsNr) 'IsNot Nothing
BezugsNr = BezugsNrTmp & "/" & zusatz
If zusatz.Length = 1 Then
zusatz = Chr(Asc(zusatz.ToString) + 1)
Else
zusatz = zusatz.Substring(0, 1) & Chr(Asc(zusatz.Substring(0, 2).ToString) + 1)
End If
If zusatz = "Z" Then zusatz = "AA"
End While
lblBezugsnummer.Text = BezugsNr
Return BezugsNr
End Function
Private Sub usrCntlATLAS_Load(sender As Object, e As EventArgs) Handles Me.Load
'MsgBox("LOAD")
cboDakosyAction.Items.Clear()
cboDakosyAction.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Neuen Datensatz erstellen", DY_ObjektAktion.OBJ_CREATE))
cboDakosyAction.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Vohr. DS ändern", DY_ObjektAktion.OBJ_CHANGE))
cboDakosyAction.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Vorh. DS stornieren", DY_ObjektAktion.OBJ_CANCEL))
cboDakosyAction.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Datensatz an ZOLL senden", DY_ObjektAktion.OBJ_SEND))
cboDakosyAction.changeItem(DY_ObjektAktion.OBJ_CREATE)
Select Case FIRMA_DY
Case "VERAG" : txtDyMandant.Text = "VERG"
txtDyNiederlassung.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG
Case "ATILLA" : txtDyMandant.Text = "ATIL" : txtDyNiederlassung.Text = "SUW"
Case "UNISPED" : txtDyMandant.Text = "UNAT" : txtDyNiederlassung.Text = "ATSPED"
Case "IMEX" : txtDyMandant.Text = "IMEX" : txtDyNiederlassung.Text = "IME"
Case "AMBAR" : txtDyMandant.Text = "ATIL" : txtDyNiederlassung.Text = "AMBWO"
End Select
cboStammreferenz.fillWithSQL("SELECT [dySr_Stammreferenz],[dySr_Bezeichnung] FROM [tblDakosy_Stammreferenzen] WHERE dySr_Land='DE' AND dySr_Verfahren='NCTS' and dySr_dy_Mandant='" & txtDyMandant.Text & "' and dySr_dy_Niederlassung IN ('','" & txtDyNiederlassung.Text & "') and dySr_visible=1", False, "FMZOLL", True)
cboStammreferenz.changeItem("")
'SICHERHEIT = New usrCntlATLAS_NCTS_Sicherheit(ncts_OUT, FIRMA_DY)
'VERSCHLUESSE = New usrCntlATLAS_NCTS_Verschluesse() 'ncts_OUT)
ADRESSEN = New usrCntlATLAS_ncts_Adressen(ncts_OUT, FIRMA_DY) ')
ALLG = New usrCntlATLAS_NCTS_Allg(ncts_OUT)
POSITIONEN = New usrCntlATLAS_NCTS_Positionen(ncts_OUT)
If isSTAMMREF Then
Me.BezugsNr = "STAMMREFERENZ"
If ncts_OUT Is Nothing Then ncts_OUT = New VERAG_PROG_ALLGEMEIN.cNCTS_TR()
ncts_OUT.ncts_ObjectName = BezugsNr
Else
If ncts_OUT Is Nothing Then ' NEUE ZOLLANMELDUNG
'Dim f As New frmDakosyStammreferenz("DE", "NCTS", False,,, FIRMA_DY)
Dim Stammreferenz = Nothing
'If f.ShowDialog(Me) Then
'Stammreferenz = f.STAMMREF
'End If
Try
BezugsNr = getBezugsnr(BezugsNr)
Catch ex As Exception
MsgBox(ex.Message & ex.StackTrace)
End Try
ncts_OUT = VERAG_PROG_ALLGEMEIN.cNCTS_TR.LOADByBezugsNr(BezugsNr, True)
If ncts_OUT Is Nothing Then
'Falls zur BezugsNr schon ein Eintrag in der DB vorhanden ist
'ncts_OUT = VERAG_PROG_ALLGEMEIN.cNCTS_TR.LOADByAnmIDFull(f.STAMMREF_DYID, True) ' DyID --> Falls bei der Stammreferenz eine Vorlage hinterlegt ist!
If ncts_OUT IsNot Nothing Then
'Stmmreferenz - Werte zurücksetzen, damit nicht falsch übergeben
ncts_OUT.ncts_dyaAnmID = -1
ncts_OUT.ncts_Id = -1
Else
ncts_OUT = New VERAG_PROG_ALLGEMEIN.cNCTS_TR()
End If
'loaddataFromAVISO(ncts_OUT)
cboStammreferenz.changeItem(Stammreferenz)
End If
'ncts_OUT
Else
' ncts_OUT is ot nothing
Me.BezugsNr = ncts_OUT.ncts_ObjectName
'MsgBox(ncts_OUT.ncts_Hauptverpflichteter_Name)
End If
End If
If If(ncts_OUT.ncts_firma, "") = "" Then If FIRMA_DY <> "" Then ncts_OUT.ncts_firma = FIRMA_DY
If If(Me.cDy_ART, "") <> "" Then
'Muss noch überschrieben werdne, da sonst Art von Stammref hergenommen wird...
ncts_OUT.ncts_ArtAnmeldung = Me.cDy_ART
Else
'Wenn keine Art --> T1
If ncts_OUT.ncts_ArtAnmeldung Is Nothing Or ncts_OUT.ncts_ArtAnmeldung = "" Then
ncts_OUT.ncts_ArtAnmeldung = "T1"
End If
End If
'hinzufügen, damit alle Controls richtig geladen und initialisiert werden:s
'Me.SplitContainer.Panel2.Controls.Add(SICHERHEIT)
'Me.SplitContainer.Panel2.Controls.Add(VERSCHLUESSE)
Me.SplitContainer.Panel2.Controls.Add(ALLG)
Me.SplitContainer.Panel2.Controls.Add(POSITIONEN)
Me.SplitContainer.Panel2.Controls.Add(ADRESSEN)
' MsgBox(ncts_OUT.ncts_Hauptverpflichteter_Name)
'Werte setzen:
'SICHERHEIT.setValues_TR(ncts_OUT.ncts_SICHERHEITSANGABEN)
'VERSCHLUESSE.setValues_TR(ncts_OUT)
ADRESSEN.setValues_TR(ncts_OUT)
ALLG.setValues(ncts_OUT)
POSITIONEN.setValues_TR(ncts_OUT)
If If(ncts_OUT.ncts_Stammreferenz, "") <> "" Then cboStammreferenz.changeItem(ncts_OUT.ncts_Stammreferenz)
'Controls wieder entfernen:
Me.SplitContainer.Panel2.Controls.Clear()
' If ALLG.txtKennnummer.Text = "" Then ALLG.txtKennnummer.Text = BezugsNr
' ADRESSEN.CreateControl()
For Each c In MyFlowLayoutPanel1.Controls
If c.GetType.ToString = GetType(System.Windows.Forms.Button).ToString Then
AddHandler DirectCast(c, System.Windows.Forms.Button).Click, AddressOf buttonClick
End If
Next
SplitContainer.Panel2.Controls.Add(ALLG)
lblBezugsnummer.Text = BezugsNr
ALLG.Dock = DockStyle.Fill
ADRESSEN.Dock = DockStyle.Fill
POSITIONEN.Dock = DockStyle.Fill
'SICHERHEIT.Dock = DockStyle.Fill
'VERSCHLUESSE.Dock = DockStyle.Fill
'
'
AddHandler POSITIONEN.RohmasseChanged, Sub(rohmasse, packstuecke)
Label5.Text = packstuecke.ToString("N0") & " Pk"
Label7.Text = rohmasse.ToString("N2") & " kg"
End Sub
AddHandler POSITIONEN.PosAnzChanged, Sub(anz)
Label3.Text = anz
End Sub
If isSTAMMREF Then
Button1.Visible = False
cboDakosyAction.Visible = False
lblBezugsnummer.Text = "STAMMREFERENZ"
lblBezugsnummer.ForeColor = Color.Red
End If
If sendToModaltrans Then
Try
Me.Button1.PerformClick()
Me.FindForm.Close()
Catch
End Try
End If
Try
If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ZOLL_DakosyZA_AVISO_Edit", "AVISO") Then
Me.FindForm.Close()
End If
Catch
End Try
End Sub
Sub buttonClick(sender As Object, e As EventArgs) 'HANDLED
Dim btn As System.Windows.Forms.Button = DirectCast(sender, System.Windows.Forms.Button)
For Each c In MyFlowLayoutPanel1.Controls
If c.GetType.ToString = GetType(System.Windows.Forms.Button).ToString Then
DirectCast(c, System.Windows.Forms.Button).BackColor = Drawing.Color.White
DirectCast(c, System.Windows.Forms.Button).ForeColor = Drawing.Color.Black
End If
Next
btn.BackColor = Drawing.Color.SteelBlue 'Drawing.Color.FromArgb(0, 54, 128)
btn.ForeColor = Drawing.Color.White
SplitContainer.Panel2.Controls.Clear()
If btn Is btnAllgemein Then
SplitContainer.Panel2.Controls.Add(ALLG)
ElseIf btn Is btnAdressen Then
SplitContainer.Panel2.Controls.Add(ADRESSEN)
'ElseIf btn Is btnSicherheit Then
' SplitContainer.Panel2.Controls.Add(SICHERHEIT)
' ElseIf btn Is btnVerschlüsse Then
' SplitContainer.Panel2.Controls.Add(VERSCHLUESSE)
ElseIf btn Is btnPositionen Then
SplitContainer.Panel2.Controls.Add(POSITIONEN)
End If
End Sub
Sub loaddataFromAVISO(ByRef cdy As VERAG_PROG_ALLGEMEIN.cOregonNCTs_DeclarationData)
Try
'==> VORBLENDUNG:
cdy.auto_send = False 'If the declaration is created correctly, and if it is desired to be sent directly to the customs system after this process, it should be set as "true".
cdy.service_code = "" 'Options: - "chief" - "cds"
cdy.doc_type = "" 'EXA, EXD, IMA, IMD declaration type code
cdy.declaration_type = cDy_ART
cdy.commercial_ref = BezugsNr
cdy.ducr = ""
cdy.mucr = ""
cdy.ducr_part = ""
cdy.export_country_id = ""
cdy.multiple_consignor = ""
cdy.invoice_amount = ""
cdy.invoice_curr = ""
cdy.goods_location = ""
cdy.border_transport_type = ""
cdy.border_vehicle_code = ""
cdy.border_vehicle_coun = ""
cdy.inland_transport_type = ""
cdy.container_no = ""
cdy.gvms_interested = ""
cdy.freight_amount = ""
cdy.freight_curr = ""
cdy.payment_method = ""
cdy.total_packages = ""
cdy.nature_of_transaction = ""
cdy.premises_code = ""
cdy.first_dan_no = ""
cdy.second_dan_no = ""
cdy.insurance_amount = ""
cdy.insurance_curr = ""
cdy.other_amounts = ""
cdy.other_amounts_curr = ""
cdy.apportment_indicator = ""
cdy.total_gross_weight = ""
cdy.total_net_weight = ""
cdy.airfreight_cost = ""
cdy.vat_adjustment = ""
cdy.vat_adjustment_curr = ""
cdy.discount_amount = ""
cdy.discount_curr = ""
cdy.discount_rate = ""
cdy.incoterm = ""
cdy.incoterm_location = ""
cdy.trader_ref = ""
cdy.arrival_transport_type = ""
cdy.guarantee_code = ""
cdy.guarantee_reference = ""
If AVISO IsNot Nothing Then
'cdy.ncts_Befoerderungsmittel_KennzeichenAbgang = AVISO.LKW_Nr
'cdy.ncts_Befoerderungsmittel_SttaszugehoerigkeitAbgangCode = AVISO.LKW_Nationalitaet
'cdy.ncts_Befoerderungsmittel_KennzeichenGrenzueberschreitend = AVISO.LKW_Nr
'cdy.ncts_Befoerderungsmittel_StaatszugehoerigkeitGrenzueberschreitendCode = AVISO.LKW_Nationalitaet
End If
cdy.consignee_eori = cProgramFunctions.isLeerNothing(SENDUNG.NCTS_Verzollungsadresse_EORI)
cdy.consignee_name = cProgramFunctions.isLeerNothing(SENDUNG.tblSnd_NCTSVerzollungsadresse)
cdy.consignee_address = cProgramFunctions.isLeerNothing(SENDUNG.NCTS_Verzollungsadresse_Strasse)
cdy.consignee_postcode = cProgramFunctions.isLeerNothing(SENDUNG.NCTS_Verzollungsadresse_PLZ)
cdy.consignee_city_name = cProgramFunctions.isLeerNothing(SENDUNG.NCTS_Verzollungsadresse_Ort)
cdy.consignee_country_id = cProgramFunctions.isLeerNothing(SENDUNG.NCTS_Verzollungsadresse_Land)
If AVISO.Frächter_KdNr IsNot Nothing AndAlso IsNumeric(AVISO.Frächter_KdNr) AndAlso AVISO.Frächter_KdNr > 0 Then
Dim AD_Befoerderer As New VERAG_PROG_ALLGEMEIN.cAdressen(AVISO.Frächter_KdNr) ' Befoerderer
Dim KD_Befoerderer As New VERAG_PROG_ALLGEMEIN.cKunde(AVISO.Frächter_KdNr) ' Befoerderer
cdy.carrier_eori = KD_Befoerderer.EORITIN
If KD_Befoerderer.EORITIN IsNot Nothing Then
'cdy.ncts_SumA_Befoerderer_NLNR = KD_Befoerderer.EORITIN_NL
End If
cdy.carrier_name = (If(AD_Befoerderer.Name_1, "") & " " & If(AD_Befoerderer.Name_2, "")).Trim
cdy.carrier_address = AD_Befoerderer.Straße
cdy.carrier_postcode = AD_Befoerderer.PLZ
cdy.carrier_city_name = AD_Befoerderer.Ordnungsbegriff
cdy.carrier_country_id = cProgramFunctions.getISO2Land(AD_Befoerderer.LandKz)
Else
cdy.carrier_name = If(AVISO.Frächter, "")
End If
If SENDUNG IsNot Nothing Then
Dim FilialeAktFirma = VERAG_PROG_ALLGEMEIN.cAllgemein.getFirmaFromFiliale2(SENDUNG.FilialenNr,, "")
cdy.declarant_eori = FilialeAktFirma
cdy.declarant_name = ""
cdy.declarant_address = ""
cdy.declarant_city_name = ""
cdy.declarant_country_id = ""
cdy.declarant_postcode = ""
cdy.declarant_rep = ""
Dim p As VERAG_PROG_ALLGEMEIN.cOregonNCTs_GoodsAttribute = Nothing
If SENDUNG.tblSnd_anzahlPOS > 0 Then
p = Nothing 'cdy.ncts_WARENPOS(0)
Else
p = New VERAG_PROG_ALLGEMEIN.cOregonNCTs_GoodsAttribute
p.declarationDataID = cdy.id
p.SAVE()
End If
p.commodity = SENDUNG.tblSnd_Warenbezeichnung
If SENDUNG.tblSnd_Colli IsNot Nothing AndAlso IsNumeric(SENDUNG.tblSnd_Colli) Then
Dim pk As New VERAG_PROG_ALLGEMEIN.cOregonNCTs_PacksAttribute
pk.pack_count = SENDUNG.tblSnd_Colli
pk.pack_type = "PKG"
pk.goods_attribute_id = p.id
pk.SAVE()
End If
p.net_wg = SENDUNG.tblSnd_Gewicht
p.invoice_amount = SENDUNG.tblSnd_Warenwert
p.invoice_curr = SENDUNG.tblSnd_WarenwertWaehrung
If SENDUNG.tblSnd_AbsenderKdNr > 0 Then
Dim adVERSENDER As New VERAG_PROG_ALLGEMEIN.cAdressen(SENDUNG.tblSnd_AbsenderKdNr)
Dim kdVERSENDER As New VERAG_PROG_ALLGEMEIN.cKunde(SENDUNG.tblSnd_AbsenderKdNr)
p.sender_eori_code = kdVERSENDER.EORITIN
p.sender_name = If(adVERSENDER.Name_1, "") & If(adVERSENDER.Name_2, "")
p.sender_address = adVERSENDER.Straße
p.sender_postcode = adVERSENDER.PLZ
p.sender_city_name = adVERSENDER.Ort
If adVERSENDER.LandKz IsNot Nothing Then
p.sender_country_id = cProgramFunctions.getISO2Land(adVERSENDER.LandKz)
End If
End If
If SENDUNG.tblSnd_EmpfaengerKdNr > 0 Then
Dim adEMPFAENGER As New VERAG_PROG_ALLGEMEIN.cAdressen(SENDUNG.tblSnd_EmpfaengerKdNr)
Dim kdEMPFAENGER As New VERAG_PROG_ALLGEMEIN.cKunde(SENDUNG.tblSnd_EmpfaengerKdNr)
p.consignee_eori_code = kdEMPFAENGER.EORITIN
p.consignee_name = If(adEMPFAENGER.Name_1, "") & If(adEMPFAENGER.Name_2, "")
p.consignee_address = adEMPFAENGER.Straße
p.consignee_postcode = adEMPFAENGER.PLZ
p.consignee_city_name = adEMPFAENGER.Ort
If adEMPFAENGER.LandKz IsNot Nothing Then
p.consignee_country_id = cProgramFunctions.getISO2Land(adEMPFAENGER.LandKz)
End If
End If
End If
Catch ex As Exception
MsgBox(ex.StackTrace)
End Try
End Sub
Sub setValue(ncts_OUT)
BezugsNr = ncts_OUT.ncts_ObjectName
End Sub
Private Sub pnl_Paint(sender As Object, e As PaintEventArgs)
End Sub
Sub loadDYZollanmeldungen(Optional Status As String = "") ' + Speichern
'If DY_ANM Is Nothing Then
' DY_ANM = New cDakosy_Zollanmeldungen(ncts_OUT.ncts_dyaAnmID)
'End If
'DY_ANM.dy_ART = ALLG.NCTS_ART 'cDy_ART
'DY_ANM.dy_BezugsNr = BezugsNr
'DY_ANM.dy_AvisoId = If(AVISO Is Nothing, Nothing, AVISO.AvisoID)
'DY_ANM.dy_SendungsId = If(SENDUNG Is Nothing, Nothing, SENDUNG.tblSnd_SendungID)
'DY_ANM.SAVE() 'Speichern, ID wird erzeugt
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Me.Refresh()
Me.Cursor = Cursors.WaitCursor
If False Then 'sentToDakosy OrElse vbYes = MsgBox("Sollen die Daten abgeschickt werden?" & vbNewLine & "Eine Änderung ist nur noch in der MIC Software möglich.", vbYesNoCancel) Then
' Dim cDyAnm As New cDakosy_Zollanmeldungen(cDy_ART, BezugsNr, AVISO.AvisoID, SENDUNG.tblSnd_SendungID)
loadDYZollanmeldungen()
If ncts_OUT IsNot Nothing Then
'Dim cDY As New VERAG_PROG_ALLGEMEIN.cNCTS_TR(cDyAnm.dy_Id, cDyAnm.dy_Erstellung_SB)
'ncts_OUT.ncts_dyaAnmID = DY_ANM.dy_Id
'ncts_OUT.ncts_Erstellung_SB = DY_ANM.dy_Erstellung_SB
ncts_OUT.ncts_LetzteBearbeitung = Now
'ncts_OUT.ncts_LetzteBearbeitung_SB = DY_ANM.dy_LetzteBearbeitung_SB
ncts_OUT.ncts_Partnersystem = "VERAG_MIC" ' eigene Anmeldungen in Fremdsystem
ncts_OUT.ncts_Status = DAKOSY_Worker.cDY_Statusliste.S_05
ncts_OUT.ncts_Status_KEWILL_Equivalent = DAKOSY_Worker.cDY_Statusliste.S_05
loadInClass_VersandanmeldungNCTS(ncts_OUT, Me, FIRMA_DY)
If Not ncts_OUT.SAVE_ALL() Then Exit Sub '---> DANN SCHON
Dim saveFile = ""
If VERAG_PROG_ALLGEMEIN.cMIC.generateNCTS(ncts_OUT, saveFile, BezugsNr) Then
If saveFile <> "" Then
Process.Start(saveFile)
' VERAG_PROG_ALLGEMEIN.cMIC.send_Data_To_Dakosy_FTP()
'If Not send_Data_To_Dakosy_FTP(saveFile, BezugsNr, Nothing, Nothing) Then
' MsgBox("Sendefehler!")
'End If
End If
End If
'---> DANN SCHON:::
'Dim saveFile = ""
'If VERAG_PROG_ALLGEMEIN.cMICInterface.generateVersandanmeldungNCTS(ncts_OUT, saveFile, cboDakosyAction._value) Then
' If saveFile <> "" Then
' If cDakosyFunftions.send_Data_To_Dakosy_FTP(saveFile, BezugsNr, DY_ANM.dy_Id, FIRMA_DY) Then
' DAKOSY_Worker.cDakosy_Statusmeldungen.InsertStatusMeldung(DY_ANM, DAKOSY_Worker.cDY_Statusliste.S_03)
' Else
' DAKOSY_Worker.cDakosy_Statusmeldungen.InsertStatusMeldung(DY_ANM, DAKOSY_Worker.cDY_Statusliste.S_09)
' MsgBox("Sendefehler!")
' End If
' End If
'End If
End If
'DY_ANM.UPDATE_DATA()
Me.FindForm.Close()
End If
Me.Cursor = Cursors.Default
End Sub
Private Sub SpeichernToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SpeichernToolStripMenuItem.Click
Me.Refresh()
' Dim cDyAnm As New cDakosy_Zollanmeldungen(cDy_ART, BezugsNr, If(AVISO Is Nothing, Nothing, AVISO.AvisoID), If(SENDUNG Is Nothing, Nothing, SENDUNG.tblSnd_SendungID))
loadDYZollanmeldungen()
If ncts_OUT IsNot Nothing Then
'ncts_OUT.ncts_dyaAnmID = DY_ANM.dy_Id
'ncts_OUT.ncts_Erstellung_SB = DY_ANM.dy_Erstellung_SB
ncts_OUT.ncts_LetzteBearbeitung = Now
'ncts_OUT.ncts_LetzteBearbeitung_SB = DY_ANM.dy_LetzteBearbeitung_SB
ncts_OUT.ncts_Partnersystem = "VERAG_MIC" ' eigene Anmeldungen in Fremdsystem
ncts_OUT.ncts_Status = DAKOSY_Worker.cDY_Statusliste.S_00
ncts_OUT.ncts_Status_KEWILL_Equivalent = DAKOSY_Worker.cDY_Statusliste.S_00
loadInClass_VersandanmeldungNCTS(ncts_OUT, Me, FIRMA_DY)
If Not ncts_OUT.SAVE_ALL() Then
'gespeichert
End If
End If
'DY_ANM.UPDATE_DATA()
End Sub
Private Sub NeueBezugsnummerVergebenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles NeueBezugsnummerVergebenToolStripMenuItem.Click
BezugsNr = getBezugsnr(BezugsNr)
End Sub
Function loadInClass_VersandanmeldungNCTS(ByRef NCTS As VERAG_PROG_ALLGEMEIN.cNCTS_TR, USRCNTL As usrCntlModaltrans_NCTS, FIRMA_DY As String) As VERAG_PROG_ALLGEMEIN.cNCTS_TR
Try
Select Case FIRMA_DY
Case "UNISPED"
NCTS.ncts_Trans_Partner = "UNAT"
Case Else
NCTS.ncts_Trans_Partner = "VERA"
End Select
NCTS.ncts_Trans_DatumZeit = Now
NCTS.ncts_Gestellt = False
NCTS.ncts_Status = "00"
NCTS.ncts_Trans_Referenz = USRCNTL.BezugsNr & "_" & Now.ToString("ddMMyyHHmmSS") 'Eindeutig
NCTS.ncts_Trans_Referenz = USRCNTL.BezugsNr & "_" & Now.ToString("ddMMyyHHmmSS") 'Eindeutig
NCTS.ncts_ObjectAlias = If(USRCNTL.AVISO IsNot Nothing, USRCNTL.AVISO.AvisoID, Nothing)
NCTS.ncts_Trans_Version = "003"
NCTS.ncts_Trans_Div1 = "ATILLA"
'NCTS.ncts_Trans_Div1 = "ATILLA"
'NCTS.ncts_Trans_Div1 = "ATILLA"
NCTS.ncts_Stammreferenz = If(USRCNTL.cboStammreferenz._value = "", Nothing, USRCNTL.cboStammreferenz._value)
NCTS.ncts_BezugsnummerVorblendung = NCTS.ncts_Stammreferenz
NCTS.ncts_ObjectName = USRCNTL.BezugsNr
'NCTS.ncts_ObjectAlias = USRCNTL.AVISO.AvisoID
USRCNTL.ALLG.getValues(NCTS)
USRCNTL.ADRESSEN.getValues_TR(NCTS)
USRCNTL.POSITIONEN.getValues_TR(NCTS)
'NCTS.ncts_SICHERHEITSANGABEN = USRCNTL.SICHERHEIT.getValues_TR()
'USRCNTL.VERSCHLUESSE.getValues_TR(NCTS)
'NCTS.ncts_WARENPOS=USRCNTL.POSITIONEN.getValues()
'--------------------------------
Return NCTS
Catch ex As Exception
MsgBox(ex.Message & ex.StackTrace)
Return Nothing
End Try
End Function
End Class

6
SDL/ZOLLSYSTEM/TELOTEC/eZOLL/EZA/usrCntlTCeZOLL_EZA.vb
View File

@@ -9,26 +9,20 @@ Public Class usrCntlTCeZOLL_EZA
Property POSITIONEN As usrCntlATLAS_EZA_Positionen
Property DV1 As usrCntlATLAS_EZA_DV1
Property Jahr2Stellig As Integer
Property zusatz As String
Property BezugsNr As String = ""
Dim sentToDakosy = False
Property AVISO As VERAG_PROG_ALLGEMEIN.cAviso
Property SENDUNG As VERAG_PROG_ALLGEMEIN.cSendungen
Dim cDy_ART As String = "EZA"
'Dim EZA As cDakosyEZA = Nothing
Dim TC_ANM As cTelotec_Anmeldung = Nothing
Dim FIRMA_DY = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Property isSTAMMREF As Boolean = False
Property STAMMREF As String = ""

3
SDL/frmMain.vb
View File

@@ -139,7 +139,7 @@ Public Class frmMain
btnMitarbeiterKonto.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.USRNAME
setProfileImage()
If False Then 'Bei Produktivstart Bedingung auf True!!!!!
If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_timasId IsNot Nothing Then
Dim timas As New cTimasAPI
@@ -158,7 +158,6 @@ Public Class frmMain
End If
End If
End If
AddHandler KdSearchBox1.PropertyChanged, Sub()
Try

166
VERAG_PROG_ALLGEMEIN/Classes/cOregonNCTSDeclarations.vb
View File

@@ -1,166 +0,0 @@
Public Class cOregonNCTSDeclarations
Public Class PacksAttribute
Public Property pack_count As Integer
Public Property pack_type As String
Public Property notes As String
End Class
Public Class DocumentsAttribute
Public Property doc_type As String
Public Property doc_no As String
Public Property pre_post As String
End Class
Public Class ProducedDocumentsAttribute
Public Property code As String
Public Property reference As String
Public Property status As String
Public Property reason As String
Public Property quantity As Integer
End Class
Public Class AdditionalCodesAttribute
Public Property code As String
Public Property notes As String
End Class
Public Class GoodsAttribute
Public Property commodity As String
Public Property gtip_code As String
Public Property gtip_language As String
Public Property brut_wg As Double
Public Property net_wg As Double
Public Property sender_name As String
Public Property sender_address As String
Public Property sender_city_name As String
Public Property sender_country_id As String
Public Property sender_postcode As String
Public Property sender_eori_code As String
Public Property consignee_name As String
Public Property consignee_address As String
Public Property consignee_city_name As String
Public Property consignee_country_id As String
Public Property consignee_postcode As String
Public Property consignee_eori_code As String
Public Property invoice_amount As String
Public Property invoice_curr As String
Public Property cpc_code As String
Public Property additional_cpc_code As String
Public Property container_no As String
Public Property preferential_country_id As String
Public Property cus_code As String
Public Property nature_of_transaction As String
Public Property additional_commodity_codes As String
Public Property origin_country_id As String
Public Property preference_request As String
Public Property quota_desc As String
Public Property valuation_method As String
Public Property valuation_adjustment As String
Public Property third_quantity_type As String
Public Property third_quantity As String
Public Property supplementary_unit As String
Public Property packs_attributes As PacksAttribute()
Public Property documents_attributes As DocumentsAttribute()
Public Property produced_documents_attributes As ProducedDocumentsAttribute()
Public Property additional_codes_attributes As AdditionalCodesAttribute()
End Class
Public Class PartiesAttribute
Public Property party_role As String
Public Property party_code As String
Public Property eori_code As String
End Class
Public Class TraderAdditionsAttribute
Public Property code As String
Public Property amount As Integer
Public Property curr As String
Public Property rate_code As Integer
End Class
Public Class DeclarationData
Public Property auto_send As Boolean
Public Property badge_code As String
Public Property service_code As String
Public Property doc_type As String
Public Property declaration_type As String
Public Property commercial_ref As String
Public Property ducr As String
Public Property mucr As String
Public Property ducr_part As String
Public Property declarant_eori As String
Public Property declarant_name As String
Public Property declarant_address As String
Public Property declarant_city_name As String
Public Property declarant_country_id As String
Public Property declarant_postcode As String
Public Property declarant_rep As String
Public Property export_country_id As String
Public Property consignor_eori As String
Public Property consignor_name As String
Public Property consignor_address As String
Public Property consignor_city_name As String
Public Property consignor_country_id As String
Public Property consignor_postcode As String
Public Property multiple_consignor As Boolean
Public Property import_country_id As String
Public Property consignee_eori As String
Public Property consignee_name As String
Public Property consignee_address As String
Public Property consignee_city_name As String
Public Property consignee_country_id As String
Public Property consignee_postcode As String
Public Property multiple_consignee As Boolean
Public Property invoice_amount As String
Public Property invoice_curr As String
Public Property goods_location As String
Public Property border_transport_type As String
Public Property border_vehicle_code As String
Public Property border_vehicle_coun As String
Public Property inland_transport_type As String
Public Property container_no As String
Public Property gvms_interested As Boolean
Public Property freight_amount As String
Public Property freight_curr As String
Public Property payment_method As String
Public Property carrier_eori As String
Public Property carrier_name As String
Public Property carrier_address As String
Public Property carrier_city_name As String
Public Property carrier_country_id As String
Public Property carrier_postcode As String
Public Property total_packages As Integer
Public Property nature_of_transaction As String
Public Property premises_code As String
Public Property first_dan_no As String
Public Property second_dan_no As String
Public Property insurance_amount As String
Public Property insurance_curr As String
Public Property other_amounts As String
Public Property other_amounts_curr As String
Public Property apportment_indicator As String
Public Property total_gross_weight As String
Public Property total_net_weight As String
Public Property airfreight_cost As String
Public Property vat_adjustment As String
Public Property vat_adjustment_curr As String
Public Property discount_amount As String
Public Property discount_curr As String
Public Property discount_rate As String
Public Property incoterm As String
Public Property incoterm_location As String
Public Property trader_ref As String
Public Property arrival_transport_type As String
Public Property guarantee_code As Integer
Public Property guarantee_reference As String
Public Property goods_attributes As GoodsAttribute()
Public Property parties_attributes As PartiesAttribute()
Public Property trader_additions_attributes As TraderAdditionsAttribute()
End Class
Public Class CustomsDeclaration
Public Property declaration_data As DeclarationData
End Class
End Class

85
VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmMitarbeitersuche.Designer.vb generated
View File

@@ -29,8 +29,11 @@ Partial Class frmMitarbeitersuche
Me.PictureBox2 = New System.Windows.Forms.PictureBox()
Me.pnlMain = New System.Windows.Forms.Panel()
Me.pnl = New System.Windows.Forms.Panel()
Me.btnSettings = New System.Windows.Forms.Button()
Me.PictureBox9 = New System.Windows.Forms.PictureBox()
Me.lblTimasSaldo = New System.Windows.Forms.Label()
Me.lblTimasZeiten = New System.Windows.Forms.Label()
Me.pnlWohnadresse = New System.Windows.Forms.Panel()
Me.btnSettings = New System.Windows.Forms.Button()
Me.lblWohnadresse = New System.Windows.Forms.Label()
Me.Label6 = New System.Windows.Forms.Label()
Me.lblSpitzname = New System.Windows.Forms.Label()
@@ -54,8 +57,6 @@ Partial Class frmMitarbeitersuche
Me.lblGeburtstag = New System.Windows.Forms.Label()
Me.PictureBox1 = New System.Windows.Forms.PictureBox()
Me.Panel1 = New System.Windows.Forms.Panel()
Me.lblTimasZeiten = New System.Windows.Forms.Label()
Me.lblTimasSaldo = New System.Windows.Forms.Label()
Me.MyPanel1 = New VERAG_PROG_ALLGEMEIN.MyPanel()
Me.lblPosition = New System.Windows.Forms.Label()
Me.Label8 = New System.Windows.Forms.Label()
@@ -70,6 +71,7 @@ Partial Class frmMitarbeitersuche
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).BeginInit()
Me.pnlMain.SuspendLayout()
Me.pnl.SuspendLayout()
CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).BeginInit()
Me.pnlWohnadresse.SuspendLayout()
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).BeginInit()
Me.pnlMotto.SuspendLayout()
@@ -148,8 +150,9 @@ Partial Class frmMitarbeitersuche
'pnl
'
Me.pnl.BackColor = System.Drawing.Color.FromArgb(CType(CType(250, Byte), Integer), CType(CType(254, Byte), Integer), CType(CType(255, Byte), Integer))
Me.pnl.Controls.Add(Me.lblTimasSaldo)
Me.pnl.Controls.Add(Me.btnSettings)
Me.pnl.Controls.Add(Me.PictureBox9)
Me.pnl.Controls.Add(Me.lblTimasSaldo)
Me.pnl.Controls.Add(Me.lblTimasZeiten)
Me.pnl.Controls.Add(Me.pnlWohnadresse)
Me.pnl.Controls.Add(Me.lblSpitzname)
@@ -175,20 +178,33 @@ Partial Class frmMitarbeitersuche
Me.pnl.Size = New System.Drawing.Size(774, 437)
Me.pnl.TabIndex = 24
'
'btnSettings
'PictureBox9
'
Me.btnSettings.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.btnSettings.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnSettings.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.wheel_s
Me.btnSettings.ImageAlign = System.Drawing.ContentAlignment.TopLeft
Me.btnSettings.Location = New System.Drawing.Point(647, 385)
Me.btnSettings.Name = "btnSettings"
Me.btnSettings.Size = New System.Drawing.Size(125, 35)
Me.btnSettings.TabIndex = 29
Me.btnSettings.Text = "Einstellungen"
Me.btnSettings.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnSettings.UseVisualStyleBackColor = True
Me.btnSettings.Visible = False
Me.PictureBox9.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.uhr_green
Me.PictureBox9.Location = New System.Drawing.Point(7, 393)
Me.PictureBox9.Name = "PictureBox9"
Me.PictureBox9.Size = New System.Drawing.Size(34, 27)
Me.PictureBox9.SizeMode = System.Windows.Forms.PictureBoxSizeMode.StretchImage
Me.PictureBox9.TabIndex = 120
Me.PictureBox9.TabStop = False
'
'lblTimasSaldo
'
Me.lblTimasSaldo.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
Me.lblTimasSaldo.Location = New System.Drawing.Point(45, 396)
Me.lblTimasSaldo.Name = "lblTimasSaldo"
Me.lblTimasSaldo.Size = New System.Drawing.Size(157, 24)
Me.lblTimasSaldo.TabIndex = 30
Me.lblTimasSaldo.Visible = False
'
'lblTimasZeiten
'
Me.lblTimasZeiten.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
Me.lblTimasZeiten.Location = New System.Drawing.Point(203, 396)
Me.lblTimasZeiten.Name = "lblTimasZeiten"
Me.lblTimasZeiten.Size = New System.Drawing.Size(563, 25)
Me.lblTimasZeiten.TabIndex = 12
Me.lblTimasZeiten.Visible = False
'
'pnlWohnadresse
'
@@ -199,6 +215,21 @@ Partial Class frmMitarbeitersuche
Me.pnlWohnadresse.Size = New System.Drawing.Size(701, 34)
Me.pnlWohnadresse.TabIndex = 20
'
'btnSettings
'
Me.btnSettings.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom
Me.btnSettings.FlatStyle = System.Windows.Forms.FlatStyle.Flat
Me.btnSettings.Image = Global.VERAG_PROG_ALLGEMEIN.My.Resources.Resources.wheel_s
Me.btnSettings.ImageAlign = System.Drawing.ContentAlignment.TopLeft
Me.btnSettings.Location = New System.Drawing.Point(650, 386)
Me.btnSettings.Name = "btnSettings"
Me.btnSettings.Size = New System.Drawing.Size(125, 35)
Me.btnSettings.TabIndex = 29
Me.btnSettings.Text = "Einstellungen"
Me.btnSettings.TextAlign = System.Drawing.ContentAlignment.MiddleRight
Me.btnSettings.UseVisualStyleBackColor = True
Me.btnSettings.Visible = False
'
'lblWohnadresse
'
Me.lblWohnadresse.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold)
@@ -426,24 +457,6 @@ Partial Class frmMitarbeitersuche
Me.Panel1.Size = New System.Drawing.Size(553, 1)
Me.Panel1.TabIndex = 29
'
'lblTimasZeiten
'
Me.lblTimasZeiten.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
Me.lblTimasZeiten.Location = New System.Drawing.Point(203, 396)
Me.lblTimasZeiten.Name = "lblTimasZeiten"
Me.lblTimasZeiten.Size = New System.Drawing.Size(563, 25)
Me.lblTimasZeiten.TabIndex = 12
Me.lblTimasZeiten.Visible = False
'
'lblTimasSaldo
'
Me.lblTimasSaldo.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!)
Me.lblTimasSaldo.Location = New System.Drawing.Point(6, 396)
Me.lblTimasSaldo.Name = "lblTimasSaldo"
Me.lblTimasSaldo.Size = New System.Drawing.Size(196, 24)
Me.lblTimasSaldo.TabIndex = 30
Me.lblTimasSaldo.Visible = False
'
'MyPanel1
'
Me.MyPanel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(250, Byte), Integer), CType(CType(254, Byte), Integer), CType(CType(255, Byte), Integer))
@@ -593,6 +606,7 @@ Partial Class frmMitarbeitersuche
CType(Me.PictureBox2, System.ComponentModel.ISupportInitialize).EndInit()
Me.pnlMain.ResumeLayout(False)
Me.pnl.ResumeLayout(False)
CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).EndInit()
Me.pnlWohnadresse.ResumeLayout(False)
CType(Me.PictureBox3, System.ComponentModel.ISupportInitialize).EndInit()
Me.pnlMotto.ResumeLayout(False)
@@ -649,4 +663,5 @@ Partial Class frmMitarbeitersuche
Friend WithEvents btnSettings As Windows.Forms.Button
Friend WithEvents lblTimasZeiten As Windows.Forms.Label
Friend WithEvents lblTimasSaldo As Windows.Forms.Label
Friend WithEvents PictureBox9 As Windows.Forms.PictureBox
End Class

6
VERAG_PROG_ALLGEMEIN/Mitarbeiterverzeichnis/frmMitarbeitersuche.vb
View File

@@ -383,6 +383,8 @@ Public Class frmMitarbeitersuche
End Sub
Private Sub PictureBox9_Click(sender As Object, e As EventArgs) Handles PictureBox9.Click
Dim webAddress As String = "https://zeit.verag.ag/webterminal/"
Process.Start(webAddress)
End Sub
End Class

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

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

1403
VERAG_PROG_ALLGEMEIN/My Project/Resources.resx
View File

File diff suppressed because it is too large Load Diff

BIN
VERAG_PROG_ALLGEMEIN/Resources/TiMaS-Paket-Time.png Normal file
View File

Binary file not shown.
Side by Side

After

Width:  |  Height:  |  Size: 11 KiB

12
VERAG_PROG_ALLGEMEIN/Schnittstellen/ATEZ/VERAG_OUT_ATEZ_IN/cATEZ_NCTS_IN.vb
View File

@@ -527,14 +527,6 @@ Public Class cATEZ_NCTS_IN
Dim sbResponseBody As New Chilkat.StringBuilder
success = rest.FullRequestSb("POST", "/api/integrations/verag", sbRequestBody, sbResponseBody)
'Dim bdRequest As New Chilkat.BinData
'success = rest.GetLastDebugRequest(bdRequest)
'Debug.WriteLine("----")
'Debug.WriteLine(bdRequest.GetString("utf-8"))
'Debug.WriteLine("----")
If (rest.LastMethodSuccess <> True) Then
Debug.WriteLine(rest.LastErrorText)
failureDesc = rest.LastErrorText
@@ -556,9 +548,6 @@ Public Class cATEZ_NCTS_IN
End If
Catch ex As WebException
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
End Try
@@ -606,7 +595,6 @@ Public Class cATEZ_NCTS_IN
Next
For Each r As DataGridViewRow In dgv.Rows
Dim isSelected = IIf(DBNull.Value Is r.Cells("anh_selekt").Value, False, r.Cells("anh_selekt").Value)
If isSelected Then

0
VERAG_PROG_ALLGEMEIN/Schnittstellen/cBMD_Interface.vb → VERAG_PROG_ALLGEMEIN/Schnittstellen/BMD/cBMD_Interface.vb
View File

0
VERAG_PROG_ALLGEMEIN/Schnittstellen/cCreditSafeAPI.vb → VERAG_PROG_ALLGEMEIN/Schnittstellen/Creditsafe/cCreditSafeAPI.vb
View File

1602
VERAG_PROG_ALLGEMEIN/Schnittstellen/Modaltrans/cOregonNCTSDeclarations.vb Normal file
View File

File diff suppressed because it is too large Load Diff

0
VERAG_PROG_ALLGEMEIN/Schnittstellen/cNorsware.vb → VERAG_PROG_ALLGEMEIN/Schnittstellen/Norsware/cNorsware.vb
View File

124
VERAG_PROG_ALLGEMEIN/Schnittstellen/cTimasAPI.vb → VERAG_PROG_ALLGEMEIN/Schnittstellen/TIMAS/cTimasAPI.vb
View File

@@ -6,7 +6,6 @@ Public Class cTimasAPI
Dim rest As New Chilkat.Rest
Sub New()
VERAG_PROG_ALLGEMEIN.cChilkat_Helper.UnlockCilkat()
End Sub
@@ -201,7 +200,7 @@ Public Class cTimasAPI
End Sub
Public Function createMA(ByVal mitarbeiter As cMitarbeiter, ByRef info As String, ByRef dgvData As MyDatagridview, Optional ByRef requestDone As Boolean = False)
Public Function createMA(ByVal mitarbeiter As cMitarbeiter, ByRef info As String, ByRef datatableTimas As DataTable, Optional ByRef requestDone As Boolean = False)
Try
rest.ClearAllHeaders()
@@ -229,31 +228,34 @@ Public Class cTimasAPI
success = json.UpdateString("lastname", mitarbeiter.mit_nname)
success = json.UpdateString("gender", IIf(mitarbeiter.mit_geschlecht = "m", "male", "female"))
'success = json.UpdateInt("card", 42)
'success = json.UpdateString("info", "Gebäude 2, 1. OG, Büro 54")
success = json.UpdateString("info", mitarbeiter.mit_firma & " - " & mitarbeiter.mit_abteilung)
'success = json.UpdateString("clientNumber", "5600-02")
'success = json.UpdateInt("rfid", 178230359)
If mitarbeiter.mit_gebdat <> "" And IsDate(mitarbeiter.mit_gebdat) Then
success = json.UpdateString("birthday", CDate(mitarbeiter.mit_gebdat).ToString("yyyy-MM-dd"))
End If
success = json.UpdateString("entry", CDate(mitarbeiter.mit_einstiegsdatum).ToString("yyyy-MM-dd"))
success = json.UpdateNull("exit")
success = json.UpdateString("importSign", "AX-034511")
success = json.UpdateString("importSign", "Iimport from Aviso")
success = json.UpdateString("login", mitarbeiter.mit_AliasAD_Username)
success = json.UpdateBool("loginActive", 0)
success = json.UpdateBool("loginActive", 1)
success = json.UpdateString("email", mitarbeiter.mit_email)
success = json.UpdateString("street", mitarbeiter.mit_strasse)
success = json.UpdateString("city", mitarbeiter.mit_ort)
success = json.UpdateString("zipcode", mitarbeiter.mit_plz)
success = json.UpdateString("phone1", mitarbeiter.mit_telefonnr & " " & mitarbeiter.mit_durchwahl)
success = json.UpdateString("phone2", mitarbeiter.mit_mobiltel)
success = json.UpdateString("password", "password")
success = json.UpdateBool("resetPassword", 1)
success = json.UpdateString("password", mitarbeiter.mit_pwd)
success = json.UpdateBool("resetPassword", 0)
For Each r In dgvData.Rows
Dim i As Integer = 0
If r.Cells("set").Value = True Then
success = json.UpdateInt("groups[" & i & "]", r.Cells("id").Value)
For Each r As DataRow In datatableTimas.Rows
If r("set") = True Then
success = json.UpdateInt("groups[" & i & "]", r("id"))
i = i + 1
End If
Next
Debug.WriteLine(json.Emit())
@@ -283,7 +285,7 @@ Public Class cTimasAPI
End If
Return timasEmployeeCreated
Else
info = "Mitarbeiter angelegt!"
info = "Mitarbeiter angelegt!" & vbNewLine
Dim jsonResult As New Chilkat.JsonObject
success = jsonResult.LoadSb(sbResponseBody)
@@ -355,7 +357,7 @@ Public Class cTimasAPI
info &= IIf(json.StringOf("info") <> "", "Info: " & json.StringOf("info") & vbNewLine, "")
info &= IIf(json.StringOf("id") <> "", "Timas-ID: " & json.StringOf("id") & vbNewLine, "")
If json.BoolOf("loginActive") Then
info &= IIf(json.StringOf("login") <> "", "Login: " & vbNewLine & json.StringOf("login") & vbNewLine, "")
info &= IIf(json.StringOf("login") <> "", "Login: " & json.StringOf("login") & vbNewLine, "")
info &= IIf(json.StringOf("password") <> "", "PW: " & json.StringOf("password"), "")
End If
@@ -376,11 +378,6 @@ Public Class cTimasAPI
End If
dt.Columns.Add("id", GetType(Integer))
dt.Columns.Add("name", GetType(String))
dt.Columns.Add("info", GetType(String))
dt.Columns.Add("set", GetType(Boolean))
Dim responseBody As String = rest.FullRequestNoBody("GET", API_STRING & "/rest/web-api/groups3")
If (rest.LastMethodSuccess <> True) Then
Debug.WriteLine(rest.LastErrorText)
@@ -407,6 +404,15 @@ Public Class cTimasAPI
Dim j As Integer = 0
If dt IsNot Nothing And Not dt.Columns.Contains("id") Then
dt.Columns.Add("id", GetType(Integer))
dt.Columns.Add("name", GetType(String))
dt.Columns.Add("groupType", GetType(String))
dt.Columns.Add("info", GetType(String))
dt.Columns.Add("set", GetType(Boolean))
While j < num
Dim groups As Chilkat.JsonObject = jsonArray.ObjectAt(j)
@@ -414,6 +420,7 @@ Public Class cTimasAPI
Dim R As DataRow = dt.NewRow
R("id") = groups.IntOf("id")
R("name") = groups.StringOf("name")
R("groupType") = groups.StringOf("groupType")
R("info") = groups.StringOf("info")
If R("id") = "19" Or R("id") = "129" Then 'Typ Mitarbeiter und Standardgruppe für Mitarbeiter Default true
R("set") = True
@@ -424,6 +431,11 @@ Public Class cTimasAPI
j = j + 1
End While
dt.DefaultView.Sort = " groupType asc, name asc"
dt = dt.DefaultView.ToTable()
End If
Catch ex As WebException
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
@@ -492,7 +504,7 @@ Public Class cTimasAPI
Return timeEntryCreated
Else
info = "Zeiteintrag " & entryType & " angelegt!"
info = "Zeiteintrag " & entryType & " angelegt!" & timeEntry.ToString("HH:mm:ss")
'Dim jsonResult As New Chilkat.JsonObject
'success = jsonResult.LoadSb(sbResponseBody)
@@ -506,5 +518,79 @@ Public Class cTimasAPI
End Function
Public Function getEmployeeList(ByRef dt As DataTable) As String
Dim failureText As String = ""
Try
If Not checkConnectionTImas(failureText) Then
Return failureText
End If
Dim responseJson As String = rest.FullRequestNoBody("GET", "/rest/web-api/employees/")
If (rest.LastMethodSuccess <> True) Then
Debug.WriteLine(rest.LastErrorText)
Return rest.LastErrorText
End If
If (rest.ResponseStatusCode <> 200) Then
Debug.WriteLine(rest.ResponseHeader)
failureText = rest.ResponseStatusCode & " " & rest.ResponseStatusText
Return rest.ResponseStatusCode & " " & rest.ResponseStatusText
End If
Debug.WriteLine(responseJson)
Dim jsonArray As New Chilkat.JsonArray
Dim success As Boolean = jsonArray.Load(responseJson)
If (success <> True) Then
Debug.WriteLine(jsonArray.LastErrorText)
Return jsonArray.LastErrorText
End If
Dim num As Integer = jsonArray.Size
If num = -1 Then
Return "Array Failure"
End If
If dt IsNot Nothing And Not dt.Columns.Contains("id") Then
dt.Columns.Add("id", GetType(Integer))
dt.Columns.Add("externid", GetType(String))
dt.Columns.Add("pnr1", GetType(String))
dt.Columns.Add("firstname", GetType(String))
dt.Columns.Add("lastname", GetType(String))
dt.Columns.Add("gender", GetType(String))
dt.Columns.Add("card", GetType(Integer))
dt.Columns.Add("info", GetType(String))
Dim j As Integer = 0
While j < num
Dim employee As Chilkat.JsonObject = jsonArray.ObjectAt(j)
Dim R As DataRow = dt.NewRow
R("id") = employee.IntOf("id")
R("externid") = employee.StringOf("externid")
R("pnr1") = employee.StringOf("pnr1")
R("firstname") = employee.StringOf("firstname")
R("lastname") = employee.StringOf("lastname")
R("gender") = employee.StringOf("gender")
R("card") = employee.IntOf("card")
R("info") = employee.StringOf("info")
dt.Rows.Add(R)
j = j + 1
End While
End If
Catch ex As WebException
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name)
End Try
End Function
End Class

13
VERAG_PROG_ALLGEMEIN/VERAG_PROG_ALLGEMEIN.vbproj
View File

@@ -366,7 +366,7 @@
<Compile Include="Classes\cNCTS_TR_Nachrichten.vb" />
<Compile Include="Classes\cOffene_Posten.vb" />
<Compile Include="Classes\cOffene_Posten_DVO.vb" />
<Compile Include="Classes\cOregonNCTSDeclarations.vb" />
<Compile Include="Schnittstellen\Modaltrans\cOregonNCTSDeclarations.vb" />
<Compile Include="Classes\cParameter.vb" />
<Compile Include="Classes\cProgrammeUpdate.vb" />
<Compile Include="Classes\cQSTeam.vb" />
@@ -575,18 +575,18 @@
<Compile Include="RKSV_DE\cServerClient_RKSV_DE.vb" />
<Compile Include="Schnittstellen\ATEZ\ATEZ_OUT_VERAG_IN\cATEZ_NCTS.vb" />
<Compile Include="Schnittstellen\ATEZ\VERAG_OUT_ATEZ_IN\cATEZ_NCTS_IN.vb" />
<Compile Include="Schnittstellen\cBMD_Interface.vb" />
<Compile Include="Schnittstellen\cCreditSafeAPI.vb" />
<Compile Include="Schnittstellen\BMD\cBMD_Interface.vb" />
<Compile Include="Schnittstellen\Creditsafe\cCreditSafeAPI.vb" />
<Compile Include="Schnittstellen\cDatev_Interface.vb" />
<Compile Include="Schnittstellen\cDeeplAPI.vb" />
<Compile Include="Schnittstellen\cDVO_Interface.vb" />
<Compile Include="Schnittstellen\cJsonPost.vb" />
<Compile Include="Schnittstellen\cLDV_Interface.vb" />
<Compile Include="Schnittstellen\cNCTS_Helper.vb" />
<Compile Include="Schnittstellen\cNorsware.vb" />
<Compile Include="Schnittstellen\Norsware\cNorsware.vb" />
<Compile Include="Schnittstellen\cSyska_Interface.vb" />
<Compile Include="Schnittstellen\cTherefore.vb" />
<Compile Include="Schnittstellen\cTimasAPI.vb" />
<Compile Include="Schnittstellen\TIMAS\cTimasAPI.vb" />
<Compile Include="Schnittstellen\Finanzonline\cFinanzOnlineWebService.vb" />
<Compile Include="Schnittstellen\GASTON_SCHUL\agsCustomsExchange.Designer.vb" />
<Compile Include="Schnittstellen\IDEV_Intrastat\instat6.2.Designer.vb" />
@@ -1297,6 +1297,9 @@
<LastGenOutput>Reference.vb</LastGenOutput>
</None>
</ItemGroup>
<ItemGroup>
<None Include="Resources\TiMaS-Paket-Time.png" />
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<ProjectExtensions />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.