This commit is contained in:
2025-08-29 08:12:53 +02:00
16 changed files with 5006 additions and 45 deletions

View File

@@ -31,6 +31,8 @@ Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "VERAG_PROG_ALLGEMEIN", "..\
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "TELOTEC_Worker_lib", "..\..\ADMIN\ADMIN\TELOTEK_Worker_lib\TELOTEC_Worker_lib.vbproj", "{5B947A66-009A-4BB6-B925-F84A01045095}"
EndProject
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "MDM_Worker_lib", "..\..\ADMIN\ADMIN\MDM_Worker\MDM_Worker_lib.vbproj", "{2E4DBC09-E57B-4AC5-8554-6117D71F993B}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU
@@ -253,6 +255,22 @@ Global
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x64.Build.0 = Release|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x86.ActiveCfg = Release|Any CPU
{5B947A66-009A-4BB6-B925-F84A01045095}.Release|x86.Build.0 = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|Any CPU.Build.0 = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|Mixed Platforms.ActiveCfg = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|Mixed Platforms.Build.0 = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x64.ActiveCfg = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x64.Build.0 = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x86.ActiveCfg = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Debug|x86.Build.0 = Debug|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|Any CPU.ActiveCfg = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|Any CPU.Build.0 = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|Mixed Platforms.ActiveCfg = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|Mixed Platforms.Build.0 = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x64.ActiveCfg = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x64.Build.0 = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x86.ActiveCfg = Release|Any CPU
{2E4DBC09-E57B-4AC5-8554-6117D71F993B}.Release|x86.Build.0 = Release|Any CPU
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE

View File

@@ -273,7 +273,8 @@ Public Class frmAvisoWeiterleiten
addBtn(flpFirma, "N", "DTB", "VERAG Dettelbach")
addBtn(flpFirma, "N", "NKN", "VERAG Neunkirchen (Saar)")
addBtn(flpFirma, "A", "FISK", "VERAG Fiskal")
addBtn(flpFirma, "T", "13", "VERAG Fiskal (>Team Neukunden)")
'addBtn(flpFirma, "A", "FISK", "VERAG Fiskal")
addBtn(flpFirma, "A", "VRR", "VERRECHNUNG")
Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='VERAG' order by team_id", "ADMIN")

View File

@@ -0,0 +1,457 @@
<?xml version="1.0" encoding="utf-8"?>
<Project ToolsVersion="12.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">x86</Platform>
<ProductVersion>
</ProductVersion>
<SchemaVersion>2.0</SchemaVersion>
<ProjectGuid>{110C923B-CB02-4FD0-AF24-95E0F0EEEFF5}</ProjectGuid>
<OutputType>Library</OutputType>
<StartupObject>
</StartupObject>
<RootNamespace>Gemeinsames</RootNamespace>
<AssemblyName>Gemeinsames</AssemblyName>
<FileAlignment>512</FileAlignment>
<MyType>Windows</MyType>
<TargetFrameworkVersion>v4.8</TargetFrameworkVersion>
<TargetFrameworkProfile>
</TargetFrameworkProfile>
<IsWebBootstrapper>false</IsWebBootstrapper>
<PublishUrl>publish\</PublishUrl>
<Install>true</Install>
<InstallFrom>Disk</InstallFrom>
<UpdateEnabled>false</UpdateEnabled>
<UpdateMode>Foreground</UpdateMode>
<UpdateInterval>7</UpdateInterval>
<UpdateIntervalUnits>Days</UpdateIntervalUnits>
<UpdatePeriodically>false</UpdatePeriodically>
<UpdateRequired>false</UpdateRequired>
<MapFileExtensions>true</MapFileExtensions>
<ApplicationRevision>1</ApplicationRevision>
<ApplicationVersion>1.0.0.%2a</ApplicationVersion>
<UseApplicationTrust>false</UseApplicationTrust>
<PublishWizardCompleted>true</PublishWizardCompleted>
<BootstrapperEnabled>true</BootstrapperEnabled>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' ">
<PlatformTarget>AnyCPU</PlatformTarget>
<DebugSymbols>true</DebugSymbols>
<DebugType>full</DebugType>
<DefineDebug>true</DefineDebug>
<DefineTrace>true</DefineTrace>
<OutputPath>bin\Debug\</OutputPath>
<DocumentationFile>Gemeinsames.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
<Prefer32Bit>false</Prefer32Bit>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' ">
<PlatformTarget>x86</PlatformTarget>
<DebugType>pdbonly</DebugType>
<DefineDebug>false</DefineDebug>
<DefineTrace>true</DefineTrace>
<Optimize>true</Optimize>
<OutputPath>bin\Release\</OutputPath>
<DocumentationFile>Gemeinsames.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
<Prefer32Bit>false</Prefer32Bit>
</PropertyGroup>
<PropertyGroup>
<OptionExplicit>On</OptionExplicit>
</PropertyGroup>
<PropertyGroup>
<OptionCompare>Binary</OptionCompare>
</PropertyGroup>
<PropertyGroup>
<OptionStrict>On</OptionStrict>
</PropertyGroup>
<PropertyGroup>
<OptionInfer>On</OptionInfer>
</PropertyGroup>
<PropertyGroup>
<ManifestCertificateThumbprint>E1277E3EC64E394A66EC726E5057325CDF3A52E3</ManifestCertificateThumbprint>
</PropertyGroup>
<PropertyGroup>
<ManifestKeyFile>Gemeinsames_TemporaryKey.pfx</ManifestKeyFile>
</PropertyGroup>
<PropertyGroup>
<GenerateManifests>true</GenerateManifests>
</PropertyGroup>
<PropertyGroup>
<SignManifests>true</SignManifests>
</PropertyGroup>
<PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Debug|x64'">
<PlatformTarget>AnyCPU</PlatformTarget>
<OutputPath>bin\Debug\</OutputPath>
</PropertyGroup>
<PropertyGroup Condition="'$(Configuration)|$(Platform)' == 'Release|x64'">
<PlatformTarget>x64</PlatformTarget>
<OutputPath>bin\Release\</OutputPath>
</PropertyGroup>
<PropertyGroup>
<SignAssembly>false</SignAssembly>
</PropertyGroup>
<PropertyGroup>
<AssemblyOriginatorKeyFile>Gemeinsames_TemporaryKey.pfx</AssemblyOriginatorKeyFile>
</PropertyGroup>
<ItemGroup>
<Reference Include="Accessibility" />
<Reference Include="BouncyCastle.Cryptography, Version=2.0.0.0, Culture=neutral, PublicKeyToken=072edcf4a5328938, processorArchitecture=MSIL">
<SpecificVersion>False</SpecificVersion>
<HintPath>F:\PROGRAMMIERUNG\dll\ActiveReports18\BouncyCastle.Cryptography.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.DX.Windows, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.DX.Windows.7.2.2\lib\net461\DS.Documents.DX.Windows.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Imaging, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Imaging.7.2.2\lib\net461\DS.Documents.Imaging.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Imaging.Windows, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Imaging.Windows.7.2.2\lib\net461\DS.Documents.Imaging.Windows.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Pdf, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Pdf.7.2.2\lib\net461\DS.Documents.Pdf.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Chart, Version=18.0.4.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Chart.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Chart.Win, Version=18.0.4.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Chart.Win.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.DataProviders, Version=3.1.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.DataProviders.3.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.DataProviders.Excel, Version=1.1.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.DataProviders.Excel.1.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.Excel.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document.Drawing.Gc, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document.Drawing.Gdi, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Drawing.Gc, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Drawing.Gc.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gc.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Drawing.Gdi, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Drawing.Gdi.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gdi.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Excel.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Excel.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Excel.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Html.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Html.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Html.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Image.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Image.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Image.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Pdf.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Pdf.Section, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Section.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Svg.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Svg.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Svg.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Text.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Text.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Text.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Tiff.Section, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Tiff.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Tiff.Section.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Word.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Word.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Word.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Rdl, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Rdl.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rdl.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Rendering, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Rendering.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rendering.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Scripting, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Scripting.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Scripting.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Design.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Design.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Design.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Excel, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Excel.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Excel.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Html, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Html.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Html.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Image, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Image.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Pdf, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Pdf.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Word, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Word.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Word.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Xml, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Xml.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Xml.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.QueryDesigner, Version=1.0.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.QueryDesigner.1.0.2\lib\net462\MESCIUS.ActiveReports.QueryDesigner.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Serializer, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Serializer.VS2022.18.2.2\lib\net472\MESCIUS.ActiveReports.Serializer.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.SpreadBuilder, Version=2.2.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.SpreadBuilder.2.2.0\lib\net462\MESCIUS.ActiveReports.SpreadBuilder.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Viewer.Common, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Viewer.Common.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Common.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Viewer.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Viewer.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.DataEngine, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.DataEngine.4.0.3\lib\net462\MESCIUS.Data.DataEngine.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.ExpressionInfo, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.ExpressionInfo.4.0.3\lib\net462\MESCIUS.Data.ExpressionInfo.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.VBFunctionLib, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.VBFunctionLib.4.0.3\lib\net462\MESCIUS.Data.VBFunctionLib.dll</HintPath>
</Reference>
<Reference Include="Microsoft.Bcl.AsyncInterfaces, Version=8.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
<HintPath>..\packages\Microsoft.Bcl.AsyncInterfaces.8.0.0\lib\net462\Microsoft.Bcl.AsyncInterfaces.dll</HintPath>
</Reference>
<Reference Include="System" />
<Reference Include="System.Configuration" />
<Reference Include="System.Data" />
<Reference Include="System.Deployment" />
<Reference Include="System.Design" />
<Reference Include="System.Drawing" />
<Reference Include="System.Drawing.Design" />
<Reference Include="System.Management" />
<Reference Include="System.Runtime.CompilerServices.Unsafe, Version=6.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a, processorArchitecture=MSIL">
<HintPath>..\packages\System.Runtime.CompilerServices.Unsafe.6.0.0\lib\net461\System.Runtime.CompilerServices.Unsafe.dll</HintPath>
</Reference>
<Reference Include="System.Runtime.Serialization.Formatters.Soap" />
<Reference Include="System.Security" />
<Reference Include="System.Threading.Tasks.Extensions, Version=4.2.0.1, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
<HintPath>..\packages\System.Threading.Tasks.Extensions.4.5.4\lib\net461\System.Threading.Tasks.Extensions.dll</HintPath>
</Reference>
<Reference Include="System.Web" />
<Reference Include="System.Windows.Forms" />
<Reference Include="System.Xml" />
<Reference Include="System.Core" />
<Reference Include="System.Xml.Linq" />
<Reference Include="System.Data.DataSetExtensions" />
</ItemGroup>
<ItemGroup>
<Import Include="Microsoft.VisualBasic" />
<Import Include="System" />
<Import Include="System.Collections" />
<Import Include="System.Collections.Generic" />
<Import Include="System.Drawing" />
<Import Include="System.Diagnostics" />
<Import Include="System.Windows.Forms" />
<Import Include="System.Linq" />
<Import Include="System.Xml.Linq" />
</ItemGroup>
<ItemGroup>
<Compile Include="cReportExportierer.vb" />
<Compile Include="Form1.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="Form1.Designer.vb">
<DependentUpon>Form1.vb</DependentUpon>
<SubType>Form</SubType>
</Compile>
<Compile Include="frmGrayOut.Designer.vb">
<DependentUpon>frmGrayOut.vb</DependentUpon>
</Compile>
<Compile Include="frmGrayOut.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Application.myapp</DependentUpon>
<DesignTime>True</DesignTime>
</Compile>
<Compile Include="My Project\Resources.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>Resources.resx</DependentUpon>
</Compile>
<Compile Include="My Project\Settings.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Settings.settings</DependentUpon>
<DesignTimeSharedInput>True</DesignTimeSharedInput>
</Compile>
<Compile Include="MyListItem.vb" />
<Compile Include="rptSendungenATILLA.Designer.vb">
<DependentUpon>rptSendungenATILLA.vb</DependentUpon>
</Compile>
<Compile Include="rptSendungenATILLA.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="rptSendungen.Designer.vb">
<DependentUpon>rptSendungen.vb</DependentUpon>
</Compile>
<Compile Include="rptSendungen.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="subRptSendungenATA.Designer.vb">
<DependentUpon>subRptSendungenATA.vb</DependentUpon>
</Compile>
<Compile Include="subRptSendungenATA.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="subRptSendungenVorkosten.Designer.vb">
<DependentUpon>subRptSendungenVorkosten.vb</DependentUpon>
</Compile>
<Compile Include="subRptSendungenVorkosten.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="subRptSendungenZollpruefung.Designer.vb">
<DependentUpon>subRptSendungenZollpruefung.vb</DependentUpon>
</Compile>
<Compile Include="subRptSendungenZollpruefung.vb">
<SubType>Component</SubType>
</Compile>
<Compile Include="subRptSendungenOfferte.Designer.vb">
<DependentUpon>subRptSendungenOfferte.vb</DependentUpon>
</Compile>
<Compile Include="subRptSendungenOfferte.vb">
<SubType>Component</SubType>
</Compile>
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="frmGrayOut.resx">
<DependentUpon>frmGrayOut.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="My Project\licenses.licx" />
<EmbeddedResource Include="My Project\Resources.resx">
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
<CustomToolNamespace>My.Resources</CustomToolNamespace>
<SubType>Designer</SubType>
</EmbeddedResource>
<EmbeddedResource Include="rptSendungenATILLA.resx">
<DependentUpon>rptSendungenATILLA.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="rptSendungen.resx">
<DependentUpon>rptSendungen.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="subRptSendungenATA.resx">
<DependentUpon>subRptSendungenATA.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="subRptSendungenVorkosten.resx">
<DependentUpon>subRptSendungenVorkosten.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="subRptSendungenZollpruefung.resx">
<DependentUpon>subRptSendungenZollpruefung.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="subRptSendungenOfferte.resx">
<DependentUpon>subRptSendungenOfferte.vb</DependentUpon>
</EmbeddedResource>
</ItemGroup>
<ItemGroup>
<None Include="App.config" />
<None Include="Gemeinsames_TemporaryKey.pfx" />
<None Include="My Project\Application.myapp">
<Generator>MyApplicationCodeGenerator</Generator>
<LastGenOutput>Application.Designer.vb</LastGenOutput>
</None>
<None Include="My Project\Settings.settings">
<Generator>SettingsSingleFileGenerator</Generator>
<CustomToolNamespace>My</CustomToolNamespace>
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
</None>
</ItemGroup>
<ItemGroup>
<None Include="packages.config" />
<None Include="PrivateCodeSignaturDaniel20240131.pfx" />
<None Include="Resources\Versionsinfo.txt" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\Aviso.ico" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\road.jpg" />
</ItemGroup>
<ItemGroup>
<BootstrapperPackage Include=".NETFramework,Version=v4.5">
<Visible>False</Visible>
<ProductName>Microsoft .NET Framework 4.5 %28x86 and x64%29</ProductName>
<Install>true</Install>
</BootstrapperPackage>
<BootstrapperPackage Include="Microsoft.Net.Client.3.5">
<Visible>False</Visible>
<ProductName>.NET Framework 3.5 SP1 Client Profile</ProductName>
<Install>false</Install>
</BootstrapperPackage>
<BootstrapperPackage Include="Microsoft.Net.Framework.3.5.SP1">
<Visible>False</Visible>
<ProductName>.NET Framework 3.5 SP1</ProductName>
<Install>false</Install>
</BootstrapperPackage>
</ItemGroup>
<ItemGroup>
<None Include="Resources\WAI.png" />
<None Include="Resources\QS.png" />
<None Include="Resources\NKD.png" />
<None Include="Resources\LEX.png" />
<None Include="Resources\SBG.png" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\SUB.png" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\UNISPED.png" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\IMEX.png" />
</ItemGroup>
<ItemGroup>
<None Include="Resources\AMB.png">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</None>
</ItemGroup>
<ItemGroup>
<Content Include="Resources\FO.png" />
<Content Include="Resources\VERIMEX.png">
<CopyToOutputDirectory>Always</CopyToOutputDirectory>
</Content>
</ItemGroup>
<ItemGroup>
<ProjectReference Include="..\..\..\ADMIN\ADMIN\DAKOSY_Worker\DAKOSY_Worker_lib.vbproj">
<Project>{50e8e49b-4fd9-4dd4-b159-bdc2b7d0e94f}</Project>
<Name>DAKOSY_Worker_lib</Name>
</ProjectReference>
<ProjectReference Include="..\..\..\SDL\SDL\VERAG_PROG_ALLGEMEIN\VERAG_PROG_ALLGEMEIN.vbproj">
<Project>{a3b497bd-842c-4a2b-b398-ed1976849df1}</Project>
<Name>VERAG_PROG_ALLGEMEIN</Name>
</ProjectReference>
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.
<Target Name="BeforeBuild">
</Target>
<Target Name="AfterBuild">
</Target>
-->
</Project>

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,356 @@
Public Class rptSendungen
Public VALUES As New rptSendungenValues
Public imgPath As String
Public ZOLLANMELDUNG As DAKOSY_Worker.cZollsysteme_Aktenbeschriftung = Nothing
Public HANDLING As List(Of VERAG_PROG_ALLGEMEIN.cSendHandling) = Nothing
Public VORKOSTEN As List(Of VERAG_PROG_ALLGEMEIN.cSendVorkosten) = Nothing
Sub New()
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
Me.Document.Printer.PrinterName = ""
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Sub New(VALUES As rptSendungenValues, imgPath As String, ZOLLANMELDUNG As DAKOSY_Worker.cZollsysteme_Aktenbeschriftung, HANDLING As List(Of VERAG_PROG_ALLGEMEIN.cSendHandling), VORKOSTEN As List(Of VERAG_PROG_ALLGEMEIN.cSendVorkosten))
InitializeComponent()
Me.Document.Printer.PrinterName = ""
Me.VALUES = VALUES
Me.imgPath = imgPath
Me.ZOLLANMELDUNG = ZOLLANMELDUNG
Me.HANDLING = HANDLING
Me.VORKOSTEN = VORKOSTEN
init()
End Sub
Public Sub init()
txtAbfertigungsart.Text = VALUES.Abfertigungsart
txtTarifposanzahl.Text = VALUES.Tarifposanzahl
txtFilialeNr.Text = VALUES.FilialeNr
txtAbfertigungsnummer.Text = VALUES.Abfertigungsnummer
txtAvisierer_Firma.Text = VALUES.Avisierer_Firma
txtAvisierer_KdNr.Text = VALUES.Avisierer_KdNr
txtAuftraggeber_Firma.Text = VALUES.Auftraggeber_Firma
txtAuftraggeber_KdNr.Text = VALUES.Auftraggeber_KdNr
txtEmpfaenger_Firma.Text = VALUES.Empfaenger_Firma
txtEmpfaenger_KdNr.Text = VALUES.Empfaenger_KdNr
txtAbsender_Firma.Text = VALUES.Absender_Firma
txtAbsender_KdNr.Text = VALUES.Absender_KdNr
txtFrachtfuehrer_Firma.Text = VALUES.Frachtfuehrer_Firma
txtFrachtfuehrer_KdNr.Text = VALUES.Frachtfuehrer_KdNr
txtAvisierer_Zoll.Text = VALUES.Avisierer_Zoll
txtAvisierer_Eust.Text = VALUES.Avisierer_Eust
txtAvisierer_Abf.Text = VALUES.Avisierer_Abf
txtAvisierer_Clear.Text = VALUES.Avisierer_Clear
txtAuftraggeber_Zoll.Text = VALUES.Auftraggeber_Zoll
txtAuftraggeber_Eust.Text = VALUES.Auftraggeber_Eust
txtAuftraggeber_Abf.Text = VALUES.Auftraggeber_Abf
txtAuftraggeber_Clear.Text = VALUES.Auftraggeber_Clear
txtEmpfaenger_Zoll.Text = VALUES.Empfaenger_Zoll
txtEmpfaenger_Eust.Text = VALUES.Empfaenger_Eust
txtEmpfaenger_Abf.Text = VALUES.Empfaenger_Abf
txtEmpfaenger_Clear.Text = VALUES.Empfaenger_Clear
txtAbsender_Zoll.Text = VALUES.Absender_Zoll
txtAbsender_Eust.Text = VALUES.Absender_Eust
txtAbsender_Abf.Text = VALUES.Absender_Abf
txtAbsender_Clear.Text = VALUES.Absender_Clear
txtFrachtfuehrer_Zoll.Text = VALUES.Frachtfuehrer_Zoll
txtFrachtfuehrer_Eust.Text = VALUES.Frachtfuehrer_Eust
txtFrachtfuehrer_Abf.Text = VALUES.Frachtfuehrer_Abf
txtFrachtfuehrer_Clear.Text = VALUES.Frachtfuehrer_Clear
txtAvisierer_Leistung1.Text = VALUES.Avisierer_Leistung1
txtAvisierer_Betrag1.Text = VALUES.Avisierer_Betrag1
txtAvisierer_Leistung2.Text = VALUES.Avisierer_Leistung2
txtAvisierer_Betrag2.Text = VALUES.Avisierer_Betrag2
txtAvisierer_Leistung3.Text = VALUES.Avisierer_Leistung3
txtAvisierer_Betrag3.Text = VALUES.Avisierer_Betrag3
txtAuftraggeber_Leistung1.Text = VALUES.Auftraggeber_Leistung1
txtAuftraggeber_Betrag.Text = VALUES.Auftraggeber_Betrag
txtAuftraggeber_Leistung2.Text = VALUES.Auftraggeber_Leistung2
txtAuftraggeber_Betrag2.Text = VALUES.Auftraggeber_Betrag2
txtAuftraggeber_Leistung3.Text = VALUES.Auftraggeber_Leistung3
txtAuftraggeber_Betrag3.Text = VALUES.Auftraggeber_Betrag3
txtKdAuftrNr.Text = VALUES.KdAuftrNr
txtEmpfaenger_Leistung1.Text = VALUES.Empfaenger_Leistung1
txtEmpfaenger_Betrag1.Text = VALUES.Empfaenger_Betrag1
txtEmpfaenger_Leistung2.Text = VALUES.Empfaenger_Leistung2
txtEmpfaenger_Betrag2.Text = VALUES.Empfaenger_Betrag2
txtEmpfaenger_Leistung3.Text = VALUES.Empfaenger_Leistung3
txtEmpfaenger_Betrag3.Text = VALUES.Empfaenger_Betrag3
txtAbsender_Leistung1.Text = VALUES.Absender_Leistung1
txtAbsender_Betrag1.Text = VALUES.Absender_Betrag1
txtAbsender_Leistung2.Text = VALUES.Absender_Leistung2
txtAbsender_Betrag2.Text = VALUES.Absender_Betrag2
txtAbsender_Leistung3.Text = VALUES.Absender_Leistung3
txtAbsender_Betrag3.Text = VALUES.Absender_Betrag3
txtFrachtfuehrer_Leistung1.Text = VALUES.Frachtfuehrer_Leistung1
txtFrachtfuehrer_Betrag1.Text = VALUES.Frachtfuehrer_Betrag1
txtFrachtfuehrer_Leistung2.Text = VALUES.Frachtfuehrer_Leistung2
txtFrachtfuehrer_Betrag2.Text = VALUES.Frachtfuehrer_Betrag2
txtFrachtfuehrer_Leistung3.Text = VALUES.Frachtfuehrer_Leistung3
txtFrachtfuehrer_Betrag3.Text = VALUES.Frachtfuehrer_Betrag3
txtFrachtfuehrer_Bar_BelegNr.Text = VALUES.Frachtfuehrer_Bar_BelegNr
txtFrachtfuehrer_Bar_Betrag.Text = VALUES.Frachtfuehrer_Bar_Betrag
txtFrachtfuehrer_Bar_BelegNr2.Text = VALUES.Frachtfuehrer_Bar_BelegNr2
txtFrachtfuehrer_Bar_Betrag2.Text = VALUES.Frachtfuehrer_Bar_Betrag2
txtFrachtfuehrer_Bar_BelegNr3.Text = VALUES.Frachtfuehrer_Bar_BelegNr3
txtFrachtfuehrer_Bar_Betrag3.Text = VALUES.Frachtfuehrer_Bar_Betrag3
txtAvisierer_eigBin.Text = VALUES.Avisierer_eigBin
txtAuftraggeber_eigBin.Text = VALUES.Auftraggeber_eigBin
txtEmpfaenger_eigBIN.Text = VALUES.Empfaenger_eigBIN
txtAbsender_eigBIN.Text = VALUES.Absender_eigBIN
txtFrachtfuehrer_eigBIN.Text = VALUES.Frachtfuehrer_eigBIN
txtAvisierer_VK.Text = VALUES.Avisierer_VK
txtAuftraggeber_VK.Text = VALUES.Auftraggeber_VK
txtEmpfaenger_VK.Text = VALUES.Empfaenger_VK
txtAbsender_VK.Text = VALUES.Absender_VK
txtFrachtfuehrer_VK.Text = VALUES.Frachtfuehrer_VK
txtLKWKennzeichen.Text = VALUES.LKWKennzeichen
txtAnkunft.Text = VALUES.Ankunft
txtAbfahrt.Text = VALUES.Abfahrt
txtWarenbezeichnung.Text = VALUES.Warenbezeichnung
txtColli.Text = VALUES.Colli
txtGewicht.Text = VALUES.Gewicht
txtAufschub_VERAG.Text = VALUES.Aufschub_VERAG
' rtbAbfKost.Text = VALUES.AbfKost--> Mit Sub Report gel<65>st
txtDokZuSend_Ueberschrift.Text = VALUES.DokZuSend_Ueberschrift
txtDokZuSend_Text.Text = VALUES.DokZuSend_Text
txtAnmerkungen.Text = VALUES.Anmerkungen
txtBARzuKassieren.Text = VALUES.BARzuKassieren
txtEmpfaenger_EUSTKto.Text = VALUES.Empfaenger_EUSTKto
txtAuftraggeber_EUSTKto.Text = VALUES.Auftraggeber_EUSTKto
txtAuftraggeber_ZOLLKto.Text = VALUES.Auftraggeber_ZOLLKto
txtEmpfaenger_ZOLLKto.Text = VALUES.Empfaenger_ZOLLKto
cbxDyUebermittelt.Checked = VALUES.DyUebermittelt
TextBox3.Text = "Abkl.: " & VALUES.QS_MA & vbNewLine & "Dekl.: " & VALUES.VG_MA
If VALUES.Grenze.Trim <> "" Then
lblGrenze.Visible = True
shGrenze.Visible = True
txtGrenze.Visible = True
txtGrenze.Text = VALUES.Grenze.Replace("???", "")
Else
lblGrenze.Visible = False
shGrenze.Visible = False
txtGrenze.Visible = False
End If
If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("ATK_DY_UEBERMITTELT") Then
cbxDyUebermittelt.Visible = True
End If
If VALUES.SchnellAbfertigung Then
txtSchnellAbfertigung.Visible = True
End If
Select Case VALUES.ABF_ART
Case 5, 6, 18, 32, 24, 33, 34, 37, 40, 42
txtNCTSVZAdr.Visible = True
lblNCTSVZAdr.Visible = True
txtNCTSVZAdr.Text = VALUES.NCTS_VZAdr
lblNCTSVZAdr.Text = "NCTS" & vbNewLine & "Gest.-Adr.:"
Case 7
txtNCTSVZAdr.Visible = True
lblNCTSVZAdr.Visible = True
txtNCTSVZAdr.Text = VALUES.NCTS_VZAdr
lblNCTSVZAdr.Text = "Amtsplatz/" & vbNewLine & "Zollstopp:"
Case 26, 28
txtNCTSVZAdr.Visible = True
lblNCTSVZAdr.Visible = True
txtNCTSVZAdr.Text = VALUES.FISKAL_ENDEMPF
lblNCTSVZAdr.Text = "Fiskal" & vbNewLine & "EndEmpf.:"
End Select
If barcodeLKW IsNot Nothing Then
If VALUES.barcodeLKW IsNot Nothing Then
barcodeLKW.Image = If(VALUES.barcodeLKW, Nothing)
End If
End If
barcodeSendung.Image = If(VALUES.barcodeSendung, Nothing)
' picQR.Image = If(VALUES.imgQR, Nothing)
If picQR IsNot Nothing Then
If VALUES.imgQR IsNot Nothing Then
picQR.Image = If(VALUES.imgQR, Nothing)
End If
End If
'OFFERTE!
If False Then
If VALUES.AbfKostKdnr > 0 Then
Dim s = New subRptSendungenOfferte(VALUES.ABF_ART, VALUES.AbfKostKdnr)
SubReport.Report = s
End If
End If
If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "AMBAR" Then
Dim s = New subRptSendungenVorkosten(VORKOSTEN)
SubReport.Report = s
Else
If ZOLLANMELDUNG IsNot Nothing Then
Dim s = New subRptSendungenZollpruefung(ZOLLANMELDUNG)
SubReport.Report = s
ElseIf HANDLING IsNot Nothing Then
Dim s = New subRptSendungenATA(HANDLING)
SubReport.Report = s
End If
End If
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
' Dim fs As New System.IO.FileStream(imgPath, System.IO.FileMode.Open, System.IO.FileAccess.Read)
' Dim bm As New Bitmap(GrapeCity.ActiveReports.Document.Drawing.Image.FromStream(fs))
Dim bm As New Bitmap(imgPath)
Me.Picture.Image = bm
' fs.Close()
End Sub
Private Sub rptSendungen_PageStart(sender As Object, e As EventArgs) Handles Me.PageStart
' Me.Document.CacheToDisk = True
End Sub
Private Sub rptSendungen_ReportEnd(sender As Object, e As EventArgs) Handles Me.ReportEnd
GC.Collect()
End Sub
Private Sub rptSendungen_ReportStart(sender As Object, e As EventArgs) Handles MyBase.ReportStart
Me.Document.Printer.PrinterName = ""
End Sub
End Class
Public Class rptSendungenValues
Property Abfertigungsart As String = ""
Property Tarifposanzahl As String = ""
Property FilialeNr As String = ""
Property Abfertigungsnummer As String = ""
Property Avisierer_Firma As String = ""
Property Avisierer_KdNr As String = ""
Property Auftraggeber_Firma As String = ""
Property Auftraggeber_KdNr As String = ""
Property Empfaenger_Firma As String = ""
Property Empfaenger_KdNr As String = ""
Property Absender_Firma As String = ""
Property Absender_KdNr As String = ""
Property Frachtfuehrer_Firma As String = ""
Property Frachtfuehrer_KdNr As String = ""
Property Avisierer_Zoll As String = ""
Property Avisierer_Eust As String = ""
Property Avisierer_Abf As String = ""
Property Avisierer_Clear As String = ""
Property Auftraggeber_Zoll As String = ""
Property Auftraggeber_Eust As String = ""
Property Auftraggeber_Abf As String = ""
Property Auftraggeber_Clear As String = ""
Property Empfaenger_Zoll As String = ""
Property Empfaenger_Eust As String = ""
Property Empfaenger_Abf As String = ""
Property Empfaenger_Clear As String = ""
Property Absender_Zoll As String = ""
Property Absender_Eust As String = ""
Property Absender_Abf As String = ""
Property Absender_Clear As String = ""
Property Frachtfuehrer_Zoll As String = ""
Property Frachtfuehrer_Eust As String = ""
Property Frachtfuehrer_Abf As String = ""
Property Frachtfuehrer_Clear As String = ""
Property Avisierer_Leistung1 As String = ""
Property Avisierer_Betrag1 As String = ""
Property Avisierer_Leistung2 As String = ""
Property Avisierer_Betrag2 As String = ""
Property Avisierer_Leistung3 As String = ""
Property Avisierer_Betrag3 As String = ""
Property Auftraggeber_Leistung1 As String = ""
Property Auftraggeber_Betrag As String = ""
Property Auftraggeber_Leistung2 As String = ""
Property Auftraggeber_Betrag2 As String = ""
Property Auftraggeber_Leistung3 As String = ""
Property Auftraggeber_Betrag3 As String = ""
Property KdAuftrNr As String = ""
Property Empfaenger_Leistung1 As String = ""
Property Empfaenger_Betrag1 As String = ""
Property Empfaenger_Leistung2 As String = ""
Property Empfaenger_Betrag2 As String = ""
Property Empfaenger_Leistung3 As String = ""
Property Empfaenger_Betrag3 As String = ""
Property Absender_Leistung1 As String = ""
Property Absender_Betrag1 As String = ""
Property Absender_Leistung2 As String = ""
Property Absender_Betrag2 As String = ""
Property Absender_Leistung3 As String = ""
Property Absender_Betrag3 As String = ""
Property Frachtfuehrer_Leistung1 As String = ""
Property Frachtfuehrer_Betrag1 As String = ""
Property Frachtfuehrer_Leistung2 As String = ""
Property Frachtfuehrer_Betrag2 As String = ""
Property Frachtfuehrer_Leistung3 As String = ""
Property Frachtfuehrer_Betrag3 As String = ""
Property Frachtfuehrer_Bar_BelegNr As String = ""
Property Frachtfuehrer_Bar_Betrag As String = ""
Property Frachtfuehrer_Bar_BelegNr2 As String = ""
Property Frachtfuehrer_Bar_Betrag2 As String = ""
Property Frachtfuehrer_Bar_BelegNr3 As String = ""
Property Frachtfuehrer_Bar_Betrag3 As String = ""
Property Avisierer_eigBin As String = ""
Property Auftraggeber_eigBin As String = ""
Property Empfaenger_eigBIN As String = ""
Property Absender_eigBIN As String = ""
Property Frachtfuehrer_eigBIN As String = ""
Property Avisierer_VK As String = ""
Property Auftraggeber_VK As String = ""
Property Empfaenger_VK As String = ""
Property Absender_VK As String = ""
Property Frachtfuehrer_VK As String = ""
Property LKWKennzeichen As String = ""
Property Ankunft As String = ""
Property Abfahrt As String = ""
Property Warenbezeichnung As String = ""
Property Colli As String = ""
Property Gewicht As String = ""
Property Aufschub_VERAG As String = ""
Property DokZuSend_Ueberschrift As String = ""
Property DokZuSend_Text As String = ""
Property Anmerkungen As String = ""
' Property BAR As String = ""
Property BARzuKassieren As String = ""
Property ABTEILUNG As String = ""
Property NCTS_VZAdr As String = ""
Property FISKAL_ENDEMPF As String = ""
Property ABF_ART As Integer = -1
Property barcodeLKW As Image = Nothing
Property barcodeSendung As Image = Nothing
Property imgQR As Image = Nothing
Property AbfKost As String = ""
Property AbfKostKdnr As Integer = -1
Property Empfaenger_EUSTKto As String = ""
Property Auftraggeber_EUSTKto As String = ""
Property Empfaenger_ZOLLKto As String = ""
Property Auftraggeber_ZOLLKto As String = ""
Property Grenze As String = ""
Property DyUebermittelt As Boolean = False
Property SchnellAbfertigung As Boolean = False
Property VG_MA As String = ""
Property QS_MA As String = ""
End Class

View File

@@ -0,0 +1,885 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class rptSendungenATILLA
Inherits GrapeCity.ActiveReports.SectionReport
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
End If
MyBase.Dispose(disposing)
End Sub
'NOTE: The following procedure is required by the ActiveReports Designer
'It can be modified using the ActiveReports Designer.
'Do not modify it using the code editor.
Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(rptSendungenATILLA))
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
Me.Picture = New GrapeCity.ActiveReports.SectionReportModel.Picture()
Me.txtAnmerkungen = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFilialeNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAbfertigungsnummer = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Firma = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_KdNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAvisierer_Firma = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAvisierer_KdNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAuftraggeber_Firma = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAuftraggeber_KdNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Bar_BelegNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Bar_Betrag = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtLKWKennzeichen = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAnkunft = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAbfahrt = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtWarenbezeichnung = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtColli = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtGewicht = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.barcodeLKW = New GrapeCity.ActiveReports.SectionReportModel.Picture()
Me.TextBox1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.barcodeSendung = New GrapeCity.ActiveReports.SectionReportModel.Picture()
Me.TextBox2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtIRAN_CMR_Agent = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.SubReport = New GrapeCity.ActiveReports.SectionReportModel.SubReport()
Me.txtFrachtfuehrer_Bar_BelegNr2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Bar_Betrag2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Bar_BelegNr3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtFrachtfuehrer_Bar_Betrag3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtLkwId = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_5 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZA_1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZA_2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZA_3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZA_4 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZA_5 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_4 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_6 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_9 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_7 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAusgangsZst_8 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtTransportTemp = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.cbxZugMaschine = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.cbxTransportTemp = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAndereAusgangsstelle = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtZugMaschine = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
CType(Me.Picture, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAnmerkungen, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFilialeNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAbfertigungsnummer, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Firma, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_KdNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAvisierer_Firma, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAvisierer_KdNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAuftraggeber_Firma, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAuftraggeber_KdNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtLKWKennzeichen, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAnkunft, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAbfahrt, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtWarenbezeichnung, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtColli, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtGewicht, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.barcodeLKW, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.barcodeSendung, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtIRAN_CMR_Agent, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtLkwId, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZA_1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZA_2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZA_3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZA_4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZA_5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_6, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_9, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_7, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAusgangsZst_8, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtTransportTemp, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.cbxZugMaschine, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.cbxTransportTemp, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAndereAusgangsstelle, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtZugMaschine, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.CanGrow = False
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Picture, Me.txtAnmerkungen, Me.txtFilialeNr, Me.txtAbfertigungsnummer, Me.txtFrachtfuehrer_Firma, Me.txtFrachtfuehrer_KdNr, Me.txtAvisierer_Firma, Me.txtAvisierer_KdNr, Me.txtAuftraggeber_Firma, Me.txtAuftraggeber_KdNr, Me.txtFrachtfuehrer_Bar_BelegNr, Me.txtFrachtfuehrer_Bar_Betrag, Me.txtLKWKennzeichen, Me.txtAnkunft, Me.txtAbfahrt, Me.txtWarenbezeichnung, Me.txtColli, Me.txtGewicht, Me.barcodeLKW, Me.TextBox1, Me.barcodeSendung, Me.TextBox2, Me.txtIRAN_CMR_Agent, Me.SubReport, Me.txtFrachtfuehrer_Bar_BelegNr2, Me.txtFrachtfuehrer_Bar_Betrag2, Me.txtFrachtfuehrer_Bar_BelegNr3, Me.txtFrachtfuehrer_Bar_Betrag3, Me.txtLkwId, Me.txtAusgangsZst_1, Me.txtAusgangsZst_5, Me.txtZA_1, Me.txtZA_2, Me.txtZA_3, Me.txtZA_4, Me.txtZA_5, Me.txtAusgangsZst_2, Me.txtAusgangsZst_3, Me.txtAusgangsZst_4, Me.txtAusgangsZst_6, Me.txtAusgangsZst_9, Me.txtAusgangsZst_7, Me.txtAusgangsZst_8, Me.txtTransportTemp, Me.cbxZugMaschine, Me.cbxTransportTemp, Me.txtAndereAusgangsstelle, Me.txtZugMaschine})
Me.Detail.Height = 11.69291!
Me.Detail.Name = "Detail"
'
'Picture
'
Me.Picture.Height = 11.69291!
Me.Picture.HyperLink = Nothing
Me.Picture.ImageBase64String = resources.GetString("Picture.ImageBase64String")
Me.Picture.Left = 0.0000004768372!
Me.Picture.Name = "Picture"
Me.Picture.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
Me.Picture.Top = 0.0!
Me.Picture.Width = 8.267716!
'
'txtAnmerkungen
'
Me.txtAnmerkungen.CanGrow = False
Me.txtAnmerkungen.DistinctField = ""
Me.txtAnmerkungen.Height = 3.740552!
Me.txtAnmerkungen.Left = 5.187402!
Me.txtAnmerkungen.Name = "txtAnmerkungen"
Me.txtAnmerkungen.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAnmerkungen.Style = "color: Black; font-size: 16pt; font-weight: normal; text-decoration: none; text-j" & _
"ustify: auto; vertical-align: top; ddo-char-set: 1; ddo-font-vertical: none; ddo" & _
"-shrink-to-fit: none"
Me.txtAnmerkungen.SummaryGroup = ""
Me.txtAnmerkungen.Text = "Zu sendende Dokumente:"
Me.txtAnmerkungen.Top = 2.337795!
Me.txtAnmerkungen.Width = 2.69567!
'
'txtFilialeNr
'
Me.txtFilialeNr.CanGrow = False
Me.txtFilialeNr.Height = 0.2937008!
Me.txtFilialeNr.Left = 5.11811!
Me.txtFilialeNr.Name = "txtFilialeNr"
Me.txtFilialeNr.Style = "font-size: 16pt; font-weight: bold; text-align: center; text-justify: auto; verti" & _
"cal-align: middle; ddo-char-set: 1"
Me.txtFilialeNr.Text = "4801"
Me.txtFilialeNr.Top = 0.3811024!
Me.txtFilialeNr.Width = 0.7708666!
'
'txtAbfertigungsnummer
'
Me.txtAbfertigungsnummer.CanGrow = False
Me.txtAbfertigungsnummer.Height = 0.2937008!
Me.txtAbfertigungsnummer.Left = 5.659843!
Me.txtAbfertigungsnummer.Name = "txtAbfertigungsnummer"
Me.txtAbfertigungsnummer.Style = "font-size: 16pt; font-weight: bold; text-align: center; text-justify: auto; verti" & _
"cal-align: middle; ddo-char-set: 1"
Me.txtAbfertigungsnummer.Text = "17000000"
Me.txtAbfertigungsnummer.Top = 0.3811024!
Me.txtAbfertigungsnummer.Width = 2.364567!
'
'txtFrachtfuehrer_Firma
'
Me.txtFrachtfuehrer_Firma.CanGrow = False
Me.txtFrachtfuehrer_Firma.Height = 0.5641732!
Me.txtFrachtfuehrer_Firma.Left = 1.162597!
Me.txtFrachtfuehrer_Firma.Name = "txtFrachtfuehrer_Firma"
Me.txtFrachtfuehrer_Firma.Style = "font-size: 12pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtFrachtfuehrer_Firma.Text = "TESTFIRMA"
Me.txtFrachtfuehrer_Firma.Top = 1.444488!
Me.txtFrachtfuehrer_Firma.Width = 3.854725!
'
'txtFrachtfuehrer_KdNr
'
Me.txtFrachtfuehrer_KdNr.CanGrow = False
Me.txtFrachtfuehrer_KdNr.Height = 0.1795275!
Me.txtFrachtfuehrer_KdNr.Left = 3.780314!
Me.txtFrachtfuehrer_KdNr.Name = "txtFrachtfuehrer_KdNr"
Me.txtFrachtfuehrer_KdNr.Style = "font-size: 12pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtFrachtfuehrer_KdNr.Text = "123456"
Me.txtFrachtfuehrer_KdNr.Top = 1.264961!
Me.txtFrachtfuehrer_KdNr.Width = 1.237008!
'
'txtAvisierer_Firma
'
Me.txtAvisierer_Firma.CanGrow = False
Me.txtAvisierer_Firma.Height = 0.5641732!
Me.txtAvisierer_Firma.Left = 1.162598!
Me.txtAvisierer_Firma.Name = "txtAvisierer_Firma"
Me.txtAvisierer_Firma.Style = "font-size: 12pt; ddo-char-set: 1"
Me.txtAvisierer_Firma.Text = "TESTFIRMA"
Me.txtAvisierer_Firma.Top = 2.235039!
Me.txtAvisierer_Firma.Width = 3.854725!
'
'txtAvisierer_KdNr
'
Me.txtAvisierer_KdNr.CanGrow = False
Me.txtAvisierer_KdNr.Height = 0.1795275!
Me.txtAvisierer_KdNr.Left = 3.780315!
Me.txtAvisierer_KdNr.Name = "txtAvisierer_KdNr"
Me.txtAvisierer_KdNr.Style = "font-size: 12pt; ddo-char-set: 1"
Me.txtAvisierer_KdNr.Text = "123456"
Me.txtAvisierer_KdNr.Top = 2.047638!
Me.txtAvisierer_KdNr.Width = 1.237008!
'
'txtAuftraggeber_Firma
'
Me.txtAuftraggeber_Firma.CanGrow = False
Me.txtAuftraggeber_Firma.Height = 0.5641732!
Me.txtAuftraggeber_Firma.Left = 1.162598!
Me.txtAuftraggeber_Firma.Name = "txtAuftraggeber_Firma"
Me.txtAuftraggeber_Firma.Style = "font-size: 12pt; font-weight: normal; ddo-char-set: 1"
Me.txtAuftraggeber_Firma.Text = "TESTFIRMA"
Me.txtAuftraggeber_Firma.Top = 3.026772!
Me.txtAuftraggeber_Firma.Width = 3.854725!
'
'txtAuftraggeber_KdNr
'
Me.txtAuftraggeber_KdNr.CanGrow = False
Me.txtAuftraggeber_KdNr.Height = 0.1795275!
Me.txtAuftraggeber_KdNr.Left = 3.780315!
Me.txtAuftraggeber_KdNr.Name = "txtAuftraggeber_KdNr"
Me.txtAuftraggeber_KdNr.Style = "font-size: 12pt; font-weight: normal; ddo-char-set: 1"
Me.txtAuftraggeber_KdNr.Text = "123456"
Me.txtAuftraggeber_KdNr.Top = 2.843308!
Me.txtAuftraggeber_KdNr.Width = 1.237008!
'
'txtFrachtfuehrer_Bar_BelegNr
'
Me.txtFrachtfuehrer_Bar_BelegNr.CanGrow = False
Me.txtFrachtfuehrer_Bar_BelegNr.DistinctField = ""
Me.txtFrachtfuehrer_Bar_BelegNr.Height = 0.2755905!
Me.txtFrachtfuehrer_Bar_BelegNr.Left = 5.118111!
Me.txtFrachtfuehrer_Bar_BelegNr.Name = "txtFrachtfuehrer_Bar_BelegNr"
Me.txtFrachtfuehrer_Bar_BelegNr.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtFrachtfuehrer_Bar_BelegNr.Style = resources.GetString("txtFrachtfuehrer_Bar_BelegNr.Style")
Me.txtFrachtfuehrer_Bar_BelegNr.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_BelegNr.Text = "TEST"
Me.txtFrachtfuehrer_Bar_BelegNr.Top = 1.475984!
Me.txtFrachtfuehrer_Bar_BelegNr.Width = 1.574803!
'
'txtFrachtfuehrer_Bar_Betrag
'
Me.txtFrachtfuehrer_Bar_Betrag.CanGrow = False
Me.txtFrachtfuehrer_Bar_Betrag.DistinctField = ""
Me.txtFrachtfuehrer_Bar_Betrag.Height = 0.2755905!
Me.txtFrachtfuehrer_Bar_Betrag.Left = 6.692914!
Me.txtFrachtfuehrer_Bar_Betrag.Name = "txtFrachtfuehrer_Bar_Betrag"
Me.txtFrachtfuehrer_Bar_Betrag.Style = resources.GetString("txtFrachtfuehrer_Bar_Betrag.Style")
Me.txtFrachtfuehrer_Bar_Betrag.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_Betrag.Text = "0"
Me.txtFrachtfuehrer_Bar_Betrag.Top = 1.475984!
Me.txtFrachtfuehrer_Bar_Betrag.Width = 1.259842!
'
'txtLKWKennzeichen
'
Me.txtLKWKennzeichen.CanGrow = False
Me.txtLKWKennzeichen.DistinctField = ""
Me.txtLKWKennzeichen.Height = 0.5877953!
Me.txtLKWKennzeichen.Left = 0.8543308!
Me.txtLKWKennzeichen.Name = "txtLKWKennzeichen"
Me.txtLKWKennzeichen.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtLKWKennzeichen.Style = "color: Black; font-size: 16pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtLKWKennzeichen.SummaryGroup = ""
Me.txtLKWKennzeichen.Text = "34 TR 45454"
Me.txtLKWKennzeichen.Top = 0.2334646!
Me.txtLKWKennzeichen.Width = 2.359054!
'
'txtAnkunft
'
Me.txtAnkunft.CanGrow = False
Me.txtAnkunft.DistinctField = ""
Me.txtAnkunft.Height = 0.1574803!
Me.txtAnkunft.Left = 3.780315!
Me.txtAnkunft.Name = "txtAnkunft"
Me.txtAnkunft.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAnkunft.Style = resources.GetString("txtAnkunft.Style")
Me.txtAnkunft.SummaryGroup = ""
Me.txtAnkunft.Text = "01.01.17 00:00"
Me.txtAnkunft.Top = 0.6244095!
Me.txtAnkunft.Width = 1.237008!
'
'txtAbfahrt
'
Me.txtAbfahrt.CanGrow = False
Me.txtAbfahrt.DistinctField = ""
Me.txtAbfahrt.Height = 0.1574803!
Me.txtAbfahrt.Left = 3.780315!
Me.txtAbfahrt.Name = "txtAbfahrt"
Me.txtAbfahrt.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAbfahrt.Style = resources.GetString("txtAbfahrt.Style")
Me.txtAbfahrt.SummaryGroup = ""
Me.txtAbfahrt.Text = "01.01.17 00:00"
Me.txtAbfahrt.Top = 0.7937009!
Me.txtAbfahrt.Width = 1.237008!
'
'txtWarenbezeichnung
'
Me.txtWarenbezeichnung.CanGrow = False
Me.txtWarenbezeichnung.DistinctField = ""
Me.txtWarenbezeichnung.Height = 0.395276!
Me.txtWarenbezeichnung.Left = 0.642126!
Me.txtWarenbezeichnung.Name = "txtWarenbezeichnung"
Me.txtWarenbezeichnung.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtWarenbezeichnung.Style = resources.GetString("txtWarenbezeichnung.Style")
Me.txtWarenbezeichnung.SummaryGroup = ""
Me.txtWarenbezeichnung.Text = "M<EFBFBD>BEL TEST"
Me.txtWarenbezeichnung.Top = 7.808268!
Me.txtWarenbezeichnung.Width = 4.375197!
'
'txtColli
'
Me.txtColli.CanGrow = False
Me.txtColli.DistinctField = ""
Me.txtColli.Height = 0.3779528!
Me.txtColli.Left = 0.6456693!
Me.txtColli.Name = "txtColli"
Me.txtColli.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtColli.Style = resources.GetString("txtColli.Style")
Me.txtColli.SummaryGroup = ""
Me.txtColli.Text = "0"
Me.txtColli.Top = 8.328741!
Me.txtColli.Width = 2.164567!
'
'txtGewicht
'
Me.txtGewicht.CanGrow = False
Me.txtGewicht.DistinctField = ""
Me.txtGewicht.Height = 0.3779528!
Me.txtGewicht.Left = 2.810236!
Me.txtGewicht.Name = "txtGewicht"
Me.txtGewicht.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtGewicht.Style = resources.GetString("txtGewicht.Style")
Me.txtGewicht.SummaryGroup = ""
Me.txtGewicht.Text = "0kg"
Me.txtGewicht.Top = 8.328741!
Me.txtGewicht.Width = 2.093307!
'
'barcodeLKW
'
Me.barcodeLKW.Height = 0.2889763!
Me.barcodeLKW.HyperLink = Nothing
Me.barcodeLKW.ImageData = Nothing
Me.barcodeLKW.Left = 0.6421265!
Me.barcodeLKW.Name = "barcodeLKW"
Me.barcodeLKW.PictureAlignment = GrapeCity.ActiveReports.SectionReportModel.PictureAlignment.TopLeft
Me.barcodeLKW.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
Me.barcodeLKW.Top = 0.8212597!
Me.barcodeLKW.Width = 2.864567!
'
'TextBox1
'
Me.TextBox1.CanGrow = False
Me.TextBox1.Height = 0.1334647!
Me.TextBox1.Left = 0.8059056!
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Style = "font-size: 7pt; font-weight: normal; text-justify: auto; vertical-align: middle; " & _
"ddo-char-set: 1"
Me.TextBox1.Text = "Barcode-Scan: Akt <20>bernehmen"
Me.TextBox1.Top = 1.110236!
Me.TextBox1.Width = 2.864567!
'
'barcodeSendung
'
Me.barcodeSendung.Height = 4.96378!
Me.barcodeSendung.HyperLink = Nothing
Me.barcodeSendung.ImageData = Nothing
Me.barcodeSendung.Left = 0.2082682!
Me.barcodeSendung.Name = "barcodeSendung"
Me.barcodeSendung.PictureAlignment = GrapeCity.ActiveReports.SectionReportModel.PictureAlignment.BottomLeft
Me.barcodeSendung.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
Me.barcodeSendung.Top = 2.785827!
Me.barcodeSendung.Width = 0.3543307!
'
'TextBox2
'
Me.TextBox2.CanGrow = False
Me.TextBox2.Height = 0.1720467!
Me.TextBox2.Left = 0.6704725!
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Style = "font-size: 7pt; font-weight: normal; text-justify: auto; vertical-align: middle; " & _
"ddo-char-set: 1"
Me.TextBox2.Text = "Barcode-Scan links: Akt <20>bernehmen & Sendung <20>ffnen"
Me.TextBox2.Top = 10.23622!
Me.TextBox2.Visible = False
Me.TextBox2.Width = 0.1838584!
'
'txtIRAN_CMR_Agent
'
Me.txtIRAN_CMR_Agent.Height = 0.5885825!
Me.txtIRAN_CMR_Agent.Left = 0.7480316!
Me.txtIRAN_CMR_Agent.Name = "txtIRAN_CMR_Agent"
Me.txtIRAN_CMR_Agent.Style = "font-size: 10pt; ddo-char-set: 1"
Me.txtIRAN_CMR_Agent.Text = "TESTFIRMA"
Me.txtIRAN_CMR_Agent.Top = 3.788977!
Me.txtIRAN_CMR_Agent.Width = 3.385827!
'
'SubReport
'
Me.SubReport.CanGrow = False
Me.SubReport.CloseBorder = False
Me.SubReport.Height = 0.4830716!
Me.SubReport.Left = 0.6704725!
Me.SubReport.Name = "SubReport"
Me.SubReport.Report = Nothing
Me.SubReport.ReportName = "SubReport1"
Me.SubReport.Top = 8.98937!
Me.SubReport.Visible = False
Me.SubReport.Width = 3.346457!
'
'txtFrachtfuehrer_Bar_BelegNr2
'
Me.txtFrachtfuehrer_Bar_BelegNr2.CanGrow = False
Me.txtFrachtfuehrer_Bar_BelegNr2.DistinctField = ""
Me.txtFrachtfuehrer_Bar_BelegNr2.Height = 0.2755905!
Me.txtFrachtfuehrer_Bar_BelegNr2.Left = 5.11811!
Me.txtFrachtfuehrer_Bar_BelegNr2.Name = "txtFrachtfuehrer_Bar_BelegNr2"
Me.txtFrachtfuehrer_Bar_BelegNr2.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtFrachtfuehrer_Bar_BelegNr2.Style = resources.GetString("txtFrachtfuehrer_Bar_BelegNr2.Style")
Me.txtFrachtfuehrer_Bar_BelegNr2.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_BelegNr2.Text = "TEST"
Me.txtFrachtfuehrer_Bar_BelegNr2.Top = 1.732283!
Me.txtFrachtfuehrer_Bar_BelegNr2.Width = 1.574803!
'
'txtFrachtfuehrer_Bar_Betrag2
'
Me.txtFrachtfuehrer_Bar_Betrag2.CanGrow = False
Me.txtFrachtfuehrer_Bar_Betrag2.DistinctField = ""
Me.txtFrachtfuehrer_Bar_Betrag2.Height = 0.2755905!
Me.txtFrachtfuehrer_Bar_Betrag2.Left = 6.692914!
Me.txtFrachtfuehrer_Bar_Betrag2.Name = "txtFrachtfuehrer_Bar_Betrag2"
Me.txtFrachtfuehrer_Bar_Betrag2.Style = resources.GetString("txtFrachtfuehrer_Bar_Betrag2.Style")
Me.txtFrachtfuehrer_Bar_Betrag2.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_Betrag2.Text = "0"
Me.txtFrachtfuehrer_Bar_Betrag2.Top = 1.732284!
Me.txtFrachtfuehrer_Bar_Betrag2.Width = 1.259843!
'
'txtFrachtfuehrer_Bar_BelegNr3
'
Me.txtFrachtfuehrer_Bar_BelegNr3.CanGrow = False
Me.txtFrachtfuehrer_Bar_BelegNr3.DistinctField = ""
Me.txtFrachtfuehrer_Bar_BelegNr3.Height = 0.242126!
Me.txtFrachtfuehrer_Bar_BelegNr3.Left = 5.118111!
Me.txtFrachtfuehrer_Bar_BelegNr3.Name = "txtFrachtfuehrer_Bar_BelegNr3"
Me.txtFrachtfuehrer_Bar_BelegNr3.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtFrachtfuehrer_Bar_BelegNr3.Style = resources.GetString("txtFrachtfuehrer_Bar_BelegNr3.Style")
Me.txtFrachtfuehrer_Bar_BelegNr3.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_BelegNr3.Text = "TEST"
Me.txtFrachtfuehrer_Bar_BelegNr3.Top = 1.952756!
Me.txtFrachtfuehrer_Bar_BelegNr3.Width = 1.574803!
'
'txtFrachtfuehrer_Bar_Betrag3
'
Me.txtFrachtfuehrer_Bar_Betrag3.CanGrow = False
Me.txtFrachtfuehrer_Bar_Betrag3.DistinctField = ""
Me.txtFrachtfuehrer_Bar_Betrag3.Height = 0.242126!
Me.txtFrachtfuehrer_Bar_Betrag3.Left = 6.692914!
Me.txtFrachtfuehrer_Bar_Betrag3.Name = "txtFrachtfuehrer_Bar_Betrag3"
Me.txtFrachtfuehrer_Bar_Betrag3.Style = resources.GetString("txtFrachtfuehrer_Bar_Betrag3.Style")
Me.txtFrachtfuehrer_Bar_Betrag3.SummaryGroup = ""
Me.txtFrachtfuehrer_Bar_Betrag3.Text = "0"
Me.txtFrachtfuehrer_Bar_Betrag3.Top = 1.952756!
Me.txtFrachtfuehrer_Bar_Betrag3.Width = 1.259832!
'
'txtLkwId
'
Me.txtLkwId.CanGrow = False
Me.txtLkwId.DistinctField = ""
Me.txtLkwId.Height = 0.1574803!
Me.txtLkwId.Left = 1.308268!
Me.txtLkwId.Name = "txtLkwId"
Me.txtLkwId.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtLkwId.Style = resources.GetString("txtLkwId.Style")
Me.txtLkwId.SummaryGroup = ""
Me.txtLkwId.Text = "1234567"
Me.txtLkwId.Top = 0.6244095!
Me.txtLkwId.Visible = False
Me.txtLkwId.Width = 1.193306!
'
'txtAusgangsZst_1
'
Me.txtAusgangsZst_1.CanGrow = False
Me.txtAusgangsZst_1.DistinctField = ""
Me.txtAusgangsZst_1.Height = 0.1574803!
Me.txtAusgangsZst_1.Left = 0.8543308!
Me.txtAusgangsZst_1.Name = "txtAusgangsZst_1"
Me.txtAusgangsZst_1.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_1.Style = resources.GetString("txtAusgangsZst_1.Style")
Me.txtAusgangsZst_1.SummaryGroup = ""
Me.txtAusgangsZst_1.Text = "X"
Me.txtAusgangsZst_1.Top = 4.589764!
Me.txtAusgangsZst_1.Width = 0.1574803!
'
'txtAusgangsZst_5
'
Me.txtAusgangsZst_5.CanGrow = False
Me.txtAusgangsZst_5.DistinctField = ""
Me.txtAusgangsZst_5.Height = 0.1574803!
Me.txtAusgangsZst_5.Left = 0.8543308!
Me.txtAusgangsZst_5.Name = "txtAusgangsZst_5"
Me.txtAusgangsZst_5.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_5.Style = resources.GetString("txtAusgangsZst_5.Style")
Me.txtAusgangsZst_5.SummaryGroup = ""
Me.txtAusgangsZst_5.Text = "X"
Me.txtAusgangsZst_5.Top = 5.262993!
Me.txtAusgangsZst_5.Width = 0.1574803!
'
'txtZA_1
'
Me.txtZA_1.CanGrow = False
Me.txtZA_1.DistinctField = ""
Me.txtZA_1.Height = 0.2854335!
Me.txtZA_1.Left = 0.9358268!
Me.txtZA_1.Name = "txtZA_1"
Me.txtZA_1.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZA_1.Style = "color: Black; font-size: 10pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZA_1.SummaryGroup = ""
Me.txtZA_1.Text = "DZST"
Me.txtZA_1.Top = 5.918898!
Me.txtZA_1.Width = 3.967717!
'
'txtZA_2
'
Me.txtZA_2.CanGrow = False
Me.txtZA_2.DistinctField = ""
Me.txtZA_2.Height = 0.2854335!
Me.txtZA_2.Left = 0.9358268!
Me.txtZA_2.Name = "txtZA_2"
Me.txtZA_2.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZA_2.Style = "color: Black; font-size: 10pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZA_2.SummaryGroup = ""
Me.txtZA_2.Text = "DZST"
Me.txtZA_2.Top = 6.246063!
Me.txtZA_2.Width = 3.967717!
'
'txtZA_3
'
Me.txtZA_3.CanGrow = False
Me.txtZA_3.DistinctField = ""
Me.txtZA_3.Height = 0.2854335!
Me.txtZA_3.Left = 0.9358268!
Me.txtZA_3.Name = "txtZA_3"
Me.txtZA_3.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZA_3.Style = "color: Black; font-size: 10pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZA_3.SummaryGroup = ""
Me.txtZA_3.Text = "DZST"
Me.txtZA_3.Top = 6.555119!
Me.txtZA_3.Width = 3.967717!
'
'txtZA_4
'
Me.txtZA_4.CanGrow = False
Me.txtZA_4.DistinctField = ""
Me.txtZA_4.Height = 0.2854335!
Me.txtZA_4.Left = 0.9358268!
Me.txtZA_4.Name = "txtZA_4"
Me.txtZA_4.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZA_4.Style = "color: Black; font-size: 10pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZA_4.SummaryGroup = ""
Me.txtZA_4.Text = "DZST"
Me.txtZA_4.Top = 6.897244!
Me.txtZA_4.Width = 3.967717!
'
'txtZA_5
'
Me.txtZA_5.CanGrow = False
Me.txtZA_5.DistinctField = ""
Me.txtZA_5.Height = 0.2854335!
Me.txtZA_5.Left = 0.9358268!
Me.txtZA_5.Name = "txtZA_5"
Me.txtZA_5.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZA_5.Style = "color: Black; font-size: 10pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZA_5.SummaryGroup = ""
Me.txtZA_5.Text = "DZST"
Me.txtZA_5.Top = 7.232284!
Me.txtZA_5.Width = 3.967717!
'
'txtAusgangsZst_2
'
Me.txtAusgangsZst_2.CanGrow = False
Me.txtAusgangsZst_2.DistinctField = ""
Me.txtAusgangsZst_2.Height = 0.1574803!
Me.txtAusgangsZst_2.Left = 0.8543307!
Me.txtAusgangsZst_2.Name = "txtAusgangsZst_2"
Me.txtAusgangsZst_2.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_2.Style = resources.GetString("txtAusgangsZst_2.Style")
Me.txtAusgangsZst_2.SummaryGroup = ""
Me.txtAusgangsZst_2.Text = "X"
Me.txtAusgangsZst_2.Top = 4.759054!
Me.txtAusgangsZst_2.Width = 0.1574803!
'
'txtAusgangsZst_3
'
Me.txtAusgangsZst_3.CanGrow = False
Me.txtAusgangsZst_3.DistinctField = ""
Me.txtAusgangsZst_3.Height = 0.1574803!
Me.txtAusgangsZst_3.Left = 0.8543308!
Me.txtAusgangsZst_3.Name = "txtAusgangsZst_3"
Me.txtAusgangsZst_3.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_3.Style = resources.GetString("txtAusgangsZst_3.Style")
Me.txtAusgangsZst_3.SummaryGroup = ""
Me.txtAusgangsZst_3.Text = "X"
Me.txtAusgangsZst_3.Top = 4.932284!
Me.txtAusgangsZst_3.Width = 0.1574803!
'
'txtAusgangsZst_4
'
Me.txtAusgangsZst_4.CanGrow = False
Me.txtAusgangsZst_4.DistinctField = ""
Me.txtAusgangsZst_4.Height = 0.1574803!
Me.txtAusgangsZst_4.Left = 0.8543308!
Me.txtAusgangsZst_4.Name = "txtAusgangsZst_4"
Me.txtAusgangsZst_4.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_4.Style = resources.GetString("txtAusgangsZst_4.Style")
Me.txtAusgangsZst_4.SummaryGroup = ""
Me.txtAusgangsZst_4.Text = "X"
Me.txtAusgangsZst_4.Top = 5.097634!
Me.txtAusgangsZst_4.Width = 0.1574803!
'
'txtAusgangsZst_6
'
Me.txtAusgangsZst_6.CanGrow = False
Me.txtAusgangsZst_6.DistinctField = ""
Me.txtAusgangsZst_6.Height = 0.1574803!
Me.txtAusgangsZst_6.Left = 2.964567!
Me.txtAusgangsZst_6.Name = "txtAusgangsZst_6"
Me.txtAusgangsZst_6.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_6.Style = resources.GetString("txtAusgangsZst_6.Style")
Me.txtAusgangsZst_6.SummaryGroup = ""
Me.txtAusgangsZst_6.Text = "X"
Me.txtAusgangsZst_6.Top = 4.589764!
Me.txtAusgangsZst_6.Width = 0.1574803!
'
'txtAusgangsZst_9
'
Me.txtAusgangsZst_9.CanGrow = False
Me.txtAusgangsZst_9.DistinctField = ""
Me.txtAusgangsZst_9.Height = 0.1574803!
Me.txtAusgangsZst_9.Left = 2.964567!
Me.txtAusgangsZst_9.Name = "txtAusgangsZst_9"
Me.txtAusgangsZst_9.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_9.Style = resources.GetString("txtAusgangsZst_9.Style")
Me.txtAusgangsZst_9.SummaryGroup = ""
Me.txtAusgangsZst_9.Text = "X"
Me.txtAusgangsZst_9.Top = 5.211813!
Me.txtAusgangsZst_9.Width = 0.1574803!
'
'txtAusgangsZst_7
'
Me.txtAusgangsZst_7.CanGrow = False
Me.txtAusgangsZst_7.DistinctField = ""
Me.txtAusgangsZst_7.Height = 0.1574803!
Me.txtAusgangsZst_7.Left = 2.964567!
Me.txtAusgangsZst_7.Name = "txtAusgangsZst_7"
Me.txtAusgangsZst_7.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_7.Style = resources.GetString("txtAusgangsZst_7.Style")
Me.txtAusgangsZst_7.SummaryGroup = ""
Me.txtAusgangsZst_7.Text = "X"
Me.txtAusgangsZst_7.Top = 4.759054!
Me.txtAusgangsZst_7.Width = 0.1574803!
'
'txtAusgangsZst_8
'
Me.txtAusgangsZst_8.CanGrow = False
Me.txtAusgangsZst_8.DistinctField = ""
Me.txtAusgangsZst_8.Height = 0.1574803!
Me.txtAusgangsZst_8.Left = 2.964567!
Me.txtAusgangsZst_8.Name = "txtAusgangsZst_8"
Me.txtAusgangsZst_8.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtAusgangsZst_8.Style = resources.GetString("txtAusgangsZst_8.Style")
Me.txtAusgangsZst_8.SummaryGroup = ""
Me.txtAusgangsZst_8.Text = "X"
Me.txtAusgangsZst_8.Top = 4.932284!
Me.txtAusgangsZst_8.Width = 0.1574803!
'
'txtTransportTemp
'
Me.txtTransportTemp.CanGrow = False
Me.txtTransportTemp.Height = 0.2204724!
Me.txtTransportTemp.Left = 3.691339!
Me.txtTransportTemp.Name = "txtTransportTemp"
Me.txtTransportTemp.Style = "font-size: 13pt; font-weight: bold; text-align: center; ddo-char-set: 1"
Me.txtTransportTemp.Text = "-4 bis +8"
Me.txtTransportTemp.Top = 1.751575!
Me.txtTransportTemp.Width = 1.23189!
'
'cbxZugMaschine
'
Me.cbxZugMaschine.CanGrow = False
Me.cbxZugMaschine.DistinctField = ""
Me.cbxZugMaschine.Height = 0.1574803!
Me.cbxZugMaschine.Left = 3.46378!
Me.cbxZugMaschine.Name = "cbxZugMaschine"
Me.cbxZugMaschine.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.cbxZugMaschine.Style = resources.GetString("cbxZugMaschine.Style")
Me.cbxZugMaschine.SummaryGroup = ""
Me.cbxZugMaschine.Text = "X"
Me.cbxZugMaschine.Top = 1.039764!
Me.cbxZugMaschine.Visible = False
Me.cbxZugMaschine.Width = 0.1574802!
'
'cbxTransportTemp
'
Me.cbxTransportTemp.CanGrow = False
Me.cbxTransportTemp.DistinctField = ""
Me.cbxTransportTemp.Height = 0.1574803!
Me.cbxTransportTemp.Left = 3.71378!
Me.cbxTransportTemp.Name = "cbxTransportTemp"
Me.cbxTransportTemp.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.cbxTransportTemp.Style = resources.GetString("cbxTransportTemp.Style")
Me.cbxTransportTemp.SummaryGroup = ""
Me.cbxTransportTemp.Text = "X"
Me.cbxTransportTemp.Top = 1.822835!
Me.cbxTransportTemp.Width = 0.1574803!
'
'txtAndereAusgangsstelle
'
Me.txtAndereAusgangsstelle.CanGrow = False
Me.txtAndereAusgangsstelle.Height = 0.3881895!
Me.txtAndereAusgangsstelle.Left = 3.225197!
Me.txtAndereAusgangsstelle.Name = "txtAndereAusgangsstelle"
Me.txtAndereAusgangsstelle.Style = "font-size: 10pt; font-weight: bold; text-align: left; vertical-align: middle; ddo" & _
"-char-set: 1"
Me.txtAndereAusgangsstelle.Text = "XXX"
Me.txtAndereAusgangsstelle.Top = 5.044094!
Me.txtAndereAusgangsstelle.Width = 1.803937!
'
'txtZugMaschine
'
Me.txtZugMaschine.CanGrow = False
Me.txtZugMaschine.DistinctField = ""
Me.txtZugMaschine.Height = 0.4952756!
Me.txtZugMaschine.Left = 3.213386!
Me.txtZugMaschine.Name = "txtZugMaschine"
Me.txtZugMaschine.Padding = New GrapeCity.ActiveReports.PaddingEx(1, 0, 0, 0)
Me.txtZugMaschine.Style = "color: Black; font-size: 12pt; font-weight: bold; text-align: left; text-decorati" & _
"on: none; text-justify: auto; vertical-align: middle; ddo-char-set: 1; ddo-font-" & _
"vertical: none; ddo-shrink-to-fit: none"
Me.txtZugMaschine.SummaryGroup = ""
Me.txtZugMaschine.Text = "34 TR 45454"
Me.txtZugMaschine.Top = 0.2334646!
Me.txtZugMaschine.Width = 1.803937!
'
'rptSendungenATILLA
'
Me.MasterReport = False
Me.MaxPages = CType(1, Long)
Me.PageSettings.Margins.Bottom = 0.0!
Me.PageSettings.Margins.Left = 0.0!
Me.PageSettings.Margins.Right = 0.0!
Me.PageSettings.Margins.Top = 0.0!
Me.PageSettings.PaperHeight = 11.0!
Me.PageSettings.PaperWidth = 8.5!
Me.PrintWidth = 8.267716!
Me.Sections.Add(Me.Detail)
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" & _
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" & _
"lic", "Heading2", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
CType(Me.Picture, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAnmerkungen, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFilialeNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAbfertigungsnummer, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Firma, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_KdNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAvisierer_Firma, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAvisierer_KdNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAuftraggeber_Firma, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAuftraggeber_KdNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtLKWKennzeichen, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAnkunft, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAbfahrt, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtWarenbezeichnung, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtColli, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtGewicht, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.barcodeLKW, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.barcodeSendung, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtIRAN_CMR_Agent, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_BelegNr3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtFrachtfuehrer_Bar_Betrag3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtLkwId, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZA_1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZA_2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZA_3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZA_4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZA_5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_9, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_7, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAusgangsZst_8, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtTransportTemp, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.cbxZugMaschine, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.cbxTransportTemp, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAndereAusgangsstelle, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtZugMaschine, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Private WithEvents txtFilialeNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAbfertigungsnummer As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Firma As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_KdNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAvisierer_Firma As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAvisierer_KdNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAuftraggeber_Firma As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAuftraggeber_KdNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Bar_BelegNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Bar_Betrag As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtLKWKennzeichen As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAnkunft As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAbfahrt As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtWarenbezeichnung As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtColli As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtGewicht As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAnmerkungen As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents barcodeLKW As GrapeCity.ActiveReports.SectionReportModel.Picture
Private WithEvents TextBox1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents barcodeSendung As GrapeCity.ActiveReports.SectionReportModel.Picture
Private WithEvents TextBox2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents txtIRAN_CMR_Agent As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents SubReport As GrapeCity.ActiveReports.SectionReportModel.SubReport
Private WithEvents txtFrachtfuehrer_Bar_BelegNr2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Bar_Betrag2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Bar_BelegNr3 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtFrachtfuehrer_Bar_Betrag3 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtLkwId As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents Picture As GrapeCity.ActiveReports.SectionReportModel.Picture
Private WithEvents txtAusgangsZst_1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_5 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZA_1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZA_2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZA_3 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZA_4 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZA_5 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_3 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_4 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_6 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_9 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_7 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAusgangsZst_8 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents txtTransportTemp As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents cbxZugMaschine As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents cbxTransportTemp As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAndereAusgangsstelle As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtZugMaschine As GrapeCity.ActiveReports.SectionReportModel.TextBox
End Class

View File

@@ -0,0 +1,248 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Public Class rptSendungenATILLA
Public VALUES As New rptSendungenValuesATILLA
Public imgPath As String
Sub New()
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Sub New(VALUES As rptSendungenValuesATILLA, imgPath As String)
InitializeComponent()
Me.VALUES = VALUES
Me.imgPath = imgPath
init()
End Sub
Public Sub init()
' txtAbfertigungsart.Text = VALUES.Abfertigungsart
' txtTarifposanzahl.Text = VALUES.Tarifposanzahl
txtLkwId.Text = VALUES.AvisoId
txtFilialeNr.Text = VALUES.FilialeNr
txtAbfertigungsnummer.Text = VALUES.Abfertigungsnummer
txtFrachtfuehrer_Firma.Text = VALUES.Frachtfuehrer_Firma
txtFrachtfuehrer_KdNr.Text = VALUES.Frachtfuehrer_KdNr
txtAvisierer_Firma.Text = VALUES.Avisierer_Firma
txtAvisierer_KdNr.Text = VALUES.Avisierer_KdNr
txtAuftraggeber_Firma.Text = VALUES.Auftraggeber_Firma
txtAuftraggeber_KdNr.Text = VALUES.Auftraggeber_KdNr
' txtAbsender_Firma.Text = VALUES.Absender_Firma
'txtAbsender_KdNr.Text = VALUES.Absender_KdNr
'txtEmpfaenger_Firma.Text = VALUES.Empfaenger_Firma
'txtEmpfaenger_KdNr.Text = VALUES.Empfaenger_KdNr
txtIRAN_CMR_Agent.Text = VALUES.IRAN_CMR_Agent
txtFrachtfuehrer_Bar_BelegNr.Text = VALUES.Frachtfuehrer_Bar_BelegNr
txtFrachtfuehrer_Bar_Betrag.Text = VALUES.Frachtfuehrer_Bar_Betrag
txtFrachtfuehrer_Bar_BelegNr2.Text = VALUES.Frachtfuehrer_Bar_BelegNr2
txtFrachtfuehrer_Bar_Betrag2.Text = VALUES.Frachtfuehrer_Bar_Betrag2
txtFrachtfuehrer_Bar_BelegNr3.Text = VALUES.Frachtfuehrer_Bar_BelegNr3
txtFrachtfuehrer_Bar_Betrag3.Text = VALUES.Frachtfuehrer_Bar_Betrag3
txtLKWKennzeichen.Text = VALUES.LKWKennzeichen
txtAnkunft.Text = VALUES.Ankunft
txtAbfahrt.Text = VALUES.Abfahrt
txtWarenbezeichnung.Text = VALUES.Warenbezeichnung
txtColli.Text = VALUES.Colli
txtGewicht.Text = VALUES.Gewicht
' txtAufschub_VERAG.Text = VALUES.Aufschub_VERAG
' rtbAbfKost.Text = VALUES.AbfKost--> Mit Sub Report gel<65>st
' txtDokZuSend_Ueberschrift.Text = VALUES.DokZuSend_Ueberschrift
' txtDokZuSend_Text.Text = VALUES.DokZuSend_Text
txtAnmerkungen.Text = VALUES.Anmerkungen
' txtBARzuKassieren.Text = VALUES.BARzuKassieren
txtLKWKennzeichen.Text = VALUES.LKWKennzeichen
txtZA_1.Text = VALUES.ZA_1
txtZA_2.Text = VALUES.ZA_2
txtZA_3.Text = VALUES.ZA_3
txtZA_4.Text = VALUES.ZA_4
txtZA_5.Text = VALUES.ZA_5
txtAusgangsZst_1.Text = VALUES.AusgangsZst_1
txtAusgangsZst_2.Text = VALUES.AusgangsZst_2
txtAusgangsZst_3.Text = VALUES.AusgangsZst_3
txtAusgangsZst_4.Text = VALUES.AusgangsZst_4
txtAusgangsZst_5.Text = VALUES.AusgangsZst_5
txtAusgangsZst_6.Text = VALUES.AusgangsZst_6
txtAusgangsZst_7.Text = VALUES.AusgangsZst_7
txtAusgangsZst_8.Text = VALUES.AusgangsZst_8
txtAusgangsZst_9.Text = VALUES.AusgangsZst_9
txtAndereAusgangsstelle.Text = VALUES.AndereAusgangsstelle
txtZugMaschine.Text = VALUES.Zugmaschine
cbxZugMaschine.Text = VALUES.ZugmaschineCBX
txtTransportTemp.Text = VALUES.Transporttemperatur
cbxTransportTemp.Text = VALUES.TransporttemperaturCBX
barcodeLKW.Image = If(VALUES.barcodeLKW, Nothing)
barcodeSendung.Image = If(VALUES.barcodeSendung, Nothing)
'OFFERTE!
If False Then
If VALUES.AbfKostKdnr > 0 Then
Dim s = New subRptSendungenOfferte(VALUES.ABF_ART, VALUES.AbfKostKdnr)
SubReport.Report = s
End If
End If
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
' Dim bm As New Bitmap(imgPath)
' Me.Picture.Image = bm
End Sub
Private Sub rptSendungen_PageStart(sender As Object, e As EventArgs) Handles Me.PageStart
' Me.Document.CacheToDisk = True
End Sub
Private Sub rptSendungen_ReportEnd(sender As Object, e As EventArgs) Handles Me.ReportEnd
GC.Collect()
End Sub
Private Sub rptSendungenATILLA_ReportStart(sender As Object, e As EventArgs) Handles MyBase.ReportStart
End Sub
End Class
Public Class rptSendungenValuesATILLA
Property AvisoId As String = ""
Property Abfertigungsart As String = ""
Property Tarifposanzahl As String = ""
Property FilialeNr As String = ""
Property Abfertigungsnummer As String = ""
Property Avisierer_Firma As String = ""
Property Avisierer_KdNr As String = ""
Property Auftraggeber_Firma As String = ""
Property Auftraggeber_KdNr As String = ""
Property Empfaenger_Firma As String = ""
Property Empfaenger_KdNr As String = ""
Property Absender_Firma As String = ""
Property Absender_KdNr As String = ""
Property Frachtfuehrer_Firma As String = ""
Property Frachtfuehrer_KdNr As String = ""
Property Avisierer_Zoll As String = ""
Property Avisierer_Eust As String = ""
Property Avisierer_Abf As String = ""
Property Avisierer_Clear As String = ""
Property Auftraggeber_Zoll As String = ""
Property Auftraggeber_Eust As String = ""
Property Auftraggeber_Abf As String = ""
Property Auftraggeber_Clear As String = ""
Property Empfaenger_Zoll As String = ""
Property Empfaenger_Eust As String = ""
Property Empfaenger_Abf As String = ""
Property Empfaenger_Clear As String = ""
Property Absender_Zoll As String = ""
Property Absender_Eust As String = ""
Property Absender_Abf As String = ""
Property Absender_Clear As String = ""
Property Frachtfuehrer_Zoll As String = ""
Property Frachtfuehrer_Eust As String = ""
Property Frachtfuehrer_Abf As String = ""
Property Frachtfuehrer_Clear As String = ""
Property Avisierer_Leistung1 As String = ""
Property Avisierer_Betrag1 As String = ""
Property Avisierer_Leistung2 As String = ""
Property Avisierer_Betrag2 As String = ""
Property Avisierer_Leistung3 As String = ""
Property Avisierer_Betrag3 As String = ""
Property Auftraggeber_Leistung1 As String = ""
Property Auftraggeber_Betrag As String = ""
Property Auftraggeber_Leistung2 As String = ""
Property Auftraggeber_Betrag2 As String = ""
Property Auftraggeber_Leistung3 As String = ""
Property Auftraggeber_Betrag3 As String = ""
Property Empfaenger_Leistung1 As String = ""
Property Empfaenger_Betrag1 As String = ""
Property Empfaenger_Leistung2 As String = ""
Property Empfaenger_Betrag2 As String = ""
Property Empfaenger_Leistung3 As String = ""
Property Empfaenger_Betrag3 As String = ""
Property Absender_Leistung1 As String = ""
Property Absender_Betrag1 As String = ""
Property Absender_Leistung2 As String = ""
Property Absender_Betrag2 As String = ""
Property Absender_Leistung3 As String = ""
Property Absender_Betrag3 As String = ""
Property Frachtfuehrer_Leistung1 As String = ""
Property Frachtfuehrer_Betrag1 As String = ""
Property Frachtfuehrer_Leistung2 As String = ""
Property Frachtfuehrer_Betrag2 As String = ""
Property Frachtfuehrer_Leistung3 As String = ""
Property Frachtfuehrer_Betrag3 As String = ""
Property Frachtfuehrer_Bar_BelegNr As String = ""
Property Frachtfuehrer_Bar_Betrag As String = ""
Property Frachtfuehrer_Bar_BelegNr2 As String = ""
Property Frachtfuehrer_Bar_Betrag2 As String = ""
Property Frachtfuehrer_Bar_BelegNr3 As String = ""
Property Frachtfuehrer_Bar_Betrag3 As String = ""
Property IRAN_CMR_Agent As String = ""
Property Avisierer_eigBin As String = ""
Property Auftraggeber_eigBin As String = ""
Property Empfaenger_eigBIN As String = ""
Property Absender_eigBIN As String = ""
Property Frachtfuehrer_eigBIN As String = ""
Property LKWKennzeichen As String = ""
Property Ankunft As String = ""
Property Abfahrt As String = ""
Property Warenbezeichnung As String = ""
Property Colli As String = ""
Property Gewicht As String = ""
Property Aufschub_VERAG As String = ""
Property DokZuSend_Ueberschrift As String = ""
Property DokZuSend_Text As String = ""
Property Anmerkungen As String = ""
' Property BAR As String = ""
Property BARzuKassieren As String = ""
Property ABTEILUNG As String = ""
Property NCTS_VZAdr As String = ""
Property FISKAL_ENDEMPF As String = ""
Property ABF_ART As Integer = -1
Property barcodeLKW As Image = Nothing
Property barcodeSendung As Image = Nothing
Property AbfKost As String = ""
Property AbfKostKdnr As Integer = -1
Property ZA_1 As String = ""
Property ZA_2 As String = ""
Property ZA_3 As String = ""
Property ZA_4 As String = ""
Property ZA_5 As String = ""
Property AusgangsZst_1 As String = ""
Property AusgangsZst_2 As String = ""
Property AusgangsZst_3 As String = ""
Property AusgangsZst_4 As String = ""
Property AusgangsZst_5 As String = ""
Property AusgangsZst_6 As String = ""
Property AusgangsZst_7 As String = ""
Property AusgangsZst_8 As String = ""
Property AusgangsZst_9 As String = ""
Property AndereAusgangsstelle As String = ""
Property Zugmaschine As String = ""
Property ZugmaschineCBX As String = ""
Property Transporttemperatur As String = ""
Property TransporttemperaturCBX As String = ""
End Class

View File

@@ -0,0 +1,136 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Public Class subRptSendungenATA
Inherits GrapeCity.ActiveReports.SectionReport
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
End If
MyBase.Dispose(disposing)
End Sub
'NOTE: The following procedure is required by the ActiveReports Designer
'It can be modified using the ActiveReports Designer.
'Do not modify it using the code editor.
Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(subRptSendungenATA))
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
Me.TextBox8 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtATCMRN = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.barcodeATCMRN = New GrapeCity.ActiveReports.SectionReportModel.Picture()
Me.txtColli = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtGewicht = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.GroupHeader1 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
Me.GroupFooter1 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
CType(Me.TextBox8, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtATCMRN, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.barcodeATCMRN, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtColli, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtGewicht, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.TextBox8, Me.txtATCMRN, Me.barcodeATCMRN, Me.txtColli, Me.txtGewicht})
Me.Detail.Height = 0.2665355!
Me.Detail.Name = "Detail"
'
'TextBox8
'
Me.TextBox8.CanGrow = False
Me.TextBox8.Height = 0.1456693!
Me.TextBox8.Left = 0.00000005960464!
Me.TextBox8.Name = "TextBox8"
Me.TextBox8.Style = "font-size: 8pt; ddo-char-set: 1"
Me.TextBox8.Text = "ATA/MRN:"
Me.TextBox8.Top = 0!
Me.TextBox8.Width = 0.8811023!
'
'txtATCMRN
'
Me.txtATCMRN.CanGrow = False
Me.txtATCMRN.Height = 0.1913386!
Me.txtATCMRN.Left = 0.7059056!
Me.txtATCMRN.Name = "txtATCMRN"
Me.txtATCMRN.Style = "font-size: 8pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtATCMRN.Text = Nothing
Me.txtATCMRN.Top = 0.07519685!
Me.txtATCMRN.Width = 1.582284!
'
'barcodeATCMRN
'
Me.barcodeATCMRN.Height = 0.1027552!
Me.barcodeATCMRN.HyperLink = Nothing
Me.barcodeATCMRN.ImageData = Nothing
Me.barcodeATCMRN.Left = 0.622441!
Me.barcodeATCMRN.Name = "barcodeATCMRN"
Me.barcodeATCMRN.PictureAlignment = GrapeCity.ActiveReports.SectionReportModel.PictureAlignment.BottomLeft
Me.barcodeATCMRN.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
Me.barcodeATCMRN.Top = 0!
Me.barcodeATCMRN.Width = 3.409448!
'
'txtColli
'
Me.txtColli.CanGrow = False
Me.txtColli.Height = 0.1456693!
Me.txtColli.Left = 2.744882!
Me.txtColli.Name = "txtColli"
Me.txtColli.Style = "font-size: 8pt; font-weight: bold; text-align: right; ddo-char-set: 1"
Me.txtColli.Text = Nothing
Me.txtColli.Top = 0!
Me.txtColli.Width = 0.4822836!
'
'txtGewicht
'
Me.txtGewicht.CanGrow = False
Me.txtGewicht.Height = 0.1456693!
Me.txtGewicht.Left = 3.227166!
Me.txtGewicht.Name = "txtGewicht"
Me.txtGewicht.Style = "font-size: 8pt; font-weight: bold; text-align: right; ddo-char-set: 1"
Me.txtGewicht.Text = Nothing
Me.txtGewicht.Top = 0!
Me.txtGewicht.Width = 0.7421253!
'
'GroupHeader1
'
Me.GroupHeader1.Height = 0!
Me.GroupHeader1.Name = "GroupHeader1"
'
'GroupFooter1
'
Me.GroupFooter1.Height = 0!
Me.GroupFooter1.Name = "GroupFooter1"
'
'subRptSendungenATA
'
Me.MasterReport = False
Me.PageSettings.PaperHeight = 11.0!
Me.PageSettings.PaperWidth = 8.5!
Me.PrintWidth = 4.03189!
Me.Sections.Add(Me.GroupHeader1)
Me.Sections.Add(Me.Detail)
Me.Sections.Add(Me.GroupFooter1)
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" &
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" &
"lic", "Heading2", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
CType(Me.TextBox8, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtATCMRN, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.barcodeATCMRN, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtColli, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtGewicht, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Private WithEvents GroupHeader1 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
Private WithEvents GroupFooter1 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
Private WithEvents TextBox8 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtATCMRN As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents barcodeATCMRN As GrapeCity.ActiveReports.SectionReportModel.Picture
Private WithEvents txtColli As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtGewicht As GrapeCity.ActiveReports.SectionReportModel.TextBox
End Class

View File

@@ -0,0 +1,69 @@
Imports System.Data
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports VERAG_PROG_ALLGEMEIN
Imports SDL
Public Class subRptSendungenATA
Dim HANDLING As List(Of VERAG_PROG_ALLGEMEIN.cSendHandling) = Nothing
Sub New(HANDLING As List(Of VERAG_PROG_ALLGEMEIN.cSendHandling))
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
Me.HANDLING = HANDLING
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
'If HANDLING IsNot Nothing Then
' 'Dim A As New DAKOSY_Worker.cZollsysteme_Aktenbeschriftung
' 'If A.getDataByBezugsnummer(SENDUNG.FilialenNr & "/" & SENDUNG.AbfertigungsNr, SENDUNG.tblSnd_Abfertigungsart_ID.ToString) Then
' txtColli.Text = HANDLING.sndhdg_colli.ToString("N0") & " Pk"
' txtGewicht.Text = HANDLING.sndhdg_gewicht.ToString("N1") & " Pk"
' txtATCMRN.Text = HANDLING.sndhdg_nr
' If HANDLING.sndhdg_nr <> "" Then
' barcodeATCMRN.Image = Code128Rendering.MakeBarcodeImage(HANDLING.sndhdg_nr, 1, True, 15)
' End If
'End If
barcodeATCMRN.Visible = False
txtATCMRN.Text = ""
If Me.DataSource IsNot Nothing AndAlso Me.Fields IsNot Nothing AndAlso Me.Fields.Item("ATA").Value IsNot Nothing Then
Dim ATAMRN As String = Me.Fields.Item("ATA").Value.ToString
ATAMRN = ATAMRN.Replace(" ", "")
ATAMRN = ATAMRN.Replace("/", "")
ATAMRN = ATAMRN.Replace("-", "")
txtATCMRN.Text = ATAMRN
If ATAMRN <> "" Then
Dim barcodeATA As Image = Code128Rendering.MakeBarcodeImage(ATAMRN, 1, True, 15)
'barcodeATA.RotateFlip(RotateFlipType.Rotate270FlipNone)
barcodeATCMRN.Image = barcodeATA
barcodeATCMRN.Visible = True
End If
txtColli.Text = ""
txtGewicht.Text = ""
If Me.Fields.Item("Colli").Value IsNot Nothing Then txtColli.Text = CDbl(Me.Fields.Item("Colli").Value).ToString("N0") & " Pk"
If Me.Fields.Item("Gewicht").Value IsNot Nothing Then txtGewicht.Text = CDbl(Me.Fields.Item("Gewicht").Value).ToString("N1") & " kg"
End If
End Sub
Private Sub rptAuswertung_ReportStart(sender As System.Object, e As System.EventArgs) Handles MyBase.ReportStart
Dim dt As New DataTable
dt.Columns.Add("ATA", System.Type.GetType("System.String"))
dt.Columns.Add("Colli", System.Type.GetType("System.String"))
dt.Columns.Add("Gewicht", System.Type.GetType("System.String"))
For Each s In HANDLING
dt.Rows.Add({s.sndhdg_nr, s.sndhdg_colli, s.sndhdg_gewicht})
Next
Me.DataSource = dt
End Sub
End Class

View File

@@ -0,0 +1,116 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class subRptSendungenOfferte
Inherits GrapeCity.ActiveReports.SectionReport
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
End If
MyBase.Dispose(disposing)
End Sub
'NOTE: The following procedure is required by the ActiveReports Designer
'It can be modified using the ActiveReports Designer.
'Do not modify it using the code editor.
Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(subRptSendungenOfferte))
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
Me.txtLeistungsNr = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtLeistungsBez = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtPreis = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.GroupHeader1 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
Me.GroupFooter1 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
Me.txtOfferte = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
CType(Me.txtLeistungsNr, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtLeistungsBez, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtPreis, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtOfferte, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.txtLeistungsNr, Me.txtLeistungsBez, Me.txtPreis})
Me.Detail.Height = 0.168504!
Me.Detail.Name = "Detail"
'
'txtLeistungsNr
'
Me.txtLeistungsNr.CanGrow = False
Me.txtLeistungsNr.Height = 0.168504!
Me.txtLeistungsNr.Left = 0.00000009685755!
Me.txtLeistungsNr.Name = "txtLeistungsNr"
Me.txtLeistungsNr.Top = 0.0!
Me.txtLeistungsNr.Width = 0.281496!
'
'txtLeistungsBez
'
Me.txtLeistungsBez.CanGrow = False
Me.txtLeistungsBez.Height = 0.168504!
Me.txtLeistungsBez.Left = 0.2814961!
Me.txtLeistungsBez.Name = "txtLeistungsBez"
Me.txtLeistungsBez.Text = Nothing
Me.txtLeistungsBez.Top = 0.0!
Me.txtLeistungsBez.Width = 2.262599!
'
'txtPreis
'
Me.txtPreis.CanGrow = False
Me.txtPreis.Height = 0.168504!
Me.txtPreis.Left = 2.544095!
Me.txtPreis.Name = "txtPreis"
Me.txtPreis.Style = "text-align: right"
Me.txtPreis.Top = 0.0!
Me.txtPreis.Width = 0.8023622!
'
'GroupHeader1
'
Me.GroupHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.txtOfferte})
Me.GroupHeader1.Height = 0.1688976!
Me.GroupHeader1.Name = "GroupHeader1"
'
'GroupFooter1
'
Me.GroupFooter1.Height = 0.0!
Me.GroupFooter1.Name = "GroupFooter1"
'
'txtOfferte
'
Me.txtOfferte.Height = 0.1688976!
Me.txtOfferte.Left = 0.0!
Me.txtOfferte.Name = "txtOfferte"
Me.txtOfferte.Style = "font-weight: bold; text-decoration: underline"
Me.txtOfferte.Text = "Offerte:"
Me.txtOfferte.Top = 0.0!
Me.txtOfferte.Width = 2.645669!
'
'subRptSendungenOfferte
'
Me.MasterReport = False
Me.PageSettings.PaperHeight = 11.0!
Me.PageSettings.PaperWidth = 8.5!
Me.PrintWidth = 3.346457!
Me.Sections.Add(Me.GroupHeader1)
Me.Sections.Add(Me.Detail)
Me.Sections.Add(Me.GroupFooter1)
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" & _
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" & _
"lic", "Heading2", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
CType(Me.txtLeistungsNr, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtLeistungsBez, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtPreis, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtOfferte, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Private WithEvents txtLeistungsNr As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtLeistungsBez As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtPreis As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents GroupHeader1 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
Private WithEvents txtOfferte As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents GroupFooter1 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
End Class

View File

@@ -0,0 +1,34 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Public Class subRptSendungenOfferte
Dim AbfKostKdnr As Integer
Dim ABF_ART As Integer
Sub New(ABF_ART As Integer, AbfKostKdnr As Integer)
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
Me.ABF_ART = ABF_ART
Me.AbfKostKdnr = AbfKostKdnr
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
If Me.DataSource IsNot Nothing AndAlso Me.Fields IsNot Nothing Then
If Me.Fields.Item("LeistungsNr") IsNot Nothing AndAlso Me.Fields.Item("LeistungsNr").Value IsNot Nothing Then txtLeistungsNr.Text = Me.Fields.Item("LeistungsNr").Value.ToString
If Me.Fields.Item("LeistungsBez") IsNot Nothing AndAlso Me.Fields.Item("LeistungsBez").Value IsNot Nothing Then txtLeistungsBez.Text = Me.Fields.Item("LeistungsBez").Value.ToString
If Me.Fields.Item("Preis") IsNot Nothing AndAlso Me.Fields.Item("Preis").Value IsNot Nothing Then
txtPreis.Text = If(IsNumeric(Me.Fields.Item("Preis").Value.ToString), CDbl(Me.Fields.Item("Preis").Value.ToString).ToString("C2"), Me.Fields.Item("Preis").Value.ToString)
End If
End If
End Sub
Private Sub rptAuswertung_ReportStart(sender As System.Object, e As System.EventArgs) Handles MyBase.ReportStart
If ABF_ART <= 0 Then Exit Sub
If AbfKostKdnr <= 0 Then Exit Sub
Me.DataSource = (New VERAG_PROG_ALLGEMEIN.SQL).loadDgvBySql("select isnull(LeistungsNr,'') as LeistungsNr,isnull(LeistungsBez,'' ) as LeistungsBez,isnull(Preis,'') as Preis FROM [Offertenpositionen] where KundenNr=" & AbfKostKdnr & " AND OffertenNr=(SELECT ISNULL(AO.ao_OffertenNr,-1) FROM tblAbfertigungsartOffertenstamm as AO WHERE AO.ao_Abfertigungsart='" & ABF_ART & "') and preis is not null order by LeistungsNr, Preis desc", "FMZOLL")
End Sub
End Class

View File

@@ -0,0 +1,167 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Public Class subRptSendungenVorkosten
Inherits GrapeCity.ActiveReports.SectionReport
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
End If
MyBase.Dispose(disposing)
End Sub
'NOTE: The following procedure is required by the ActiveReports Designer
'It can be modified using the ActiveReports Designer.
'Do not modify it using the code editor.
Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(subRptSendungenVorkosten))
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
Me.txtFirma = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtLeistung = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtPreis = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.GroupHeader1 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
Me.TextBox10 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox11 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox12 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.GroupFooter1 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
Me.TextBox1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
CType(Me.txtFirma, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtLeistung, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtPreis, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox10, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox11, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox12, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.txtFirma, Me.txtLeistung, Me.txtPreis})
Me.Detail.Height = 0.1665355!
Me.Detail.Name = "Detail"
'
'txtFirma
'
Me.txtFirma.CanGrow = False
Me.txtFirma.Height = 0.1665355!
Me.txtFirma.Left = 0!
Me.txtFirma.Name = "txtFirma"
Me.txtFirma.Style = "font-size: 9pt; ddo-char-set: 1"
Me.txtFirma.Text = "Firma"
Me.txtFirma.Top = 0!
Me.txtFirma.Width = 1.46063!
'
'txtLeistung
'
Me.txtLeistung.CanGrow = False
Me.txtLeistung.Height = 0.1665355!
Me.txtLeistung.Left = 1.46063!
Me.txtLeistung.Name = "txtLeistung"
Me.txtLeistung.Style = "font-size: 9pt; ddo-char-set: 1"
Me.txtLeistung.Text = "Leistung"
Me.txtLeistung.Top = 0!
Me.txtLeistung.Width = 1.527559!
'
'txtPreis
'
Me.txtPreis.CanGrow = False
Me.txtPreis.Height = 0.1665355!
Me.txtPreis.Left = 2.98819!
Me.txtPreis.Name = "txtPreis"
Me.txtPreis.Style = "font-size: 9pt; text-align: right; ddo-char-set: 1"
Me.txtPreis.Text = "Preis"
Me.txtPreis.Top = 0!
Me.txtPreis.Width = 0.9228347!
'
'GroupHeader1
'
Me.GroupHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.TextBox10, Me.TextBox11, Me.TextBox12, Me.TextBox1})
Me.GroupHeader1.Height = 0.4791666!
Me.GroupHeader1.Name = "GroupHeader1"
'
'TextBox10
'
Me.TextBox10.CanGrow = False
Me.TextBox10.Height = 0.1456693!
Me.TextBox10.Left = 0!
Me.TextBox10.Name = "TextBox10"
Me.TextBox10.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.TextBox10.Text = "Firma"
Me.TextBox10.Top = 0.2862205!
Me.TextBox10.Width = 1.46063!
'
'TextBox11
'
Me.TextBox11.CanGrow = False
Me.TextBox11.Height = 0.1456693!
Me.TextBox11.Left = 1.46063!
Me.TextBox11.Name = "TextBox11"
Me.TextBox11.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.TextBox11.Text = "Leistung"
Me.TextBox11.Top = 0.2862205!
Me.TextBox11.Width = 1.527559!
'
'TextBox12
'
Me.TextBox12.CanGrow = False
Me.TextBox12.Height = 0.1456693!
Me.TextBox12.Left = 2.988189!
Me.TextBox12.Name = "TextBox12"
Me.TextBox12.Style = "font-size: 9pt; font-weight: bold; text-align: right; ddo-char-set: 1"
Me.TextBox12.Text = "Preis"
Me.TextBox12.Top = 0.2862205!
Me.TextBox12.Width = 0.9228347!
'
'GroupFooter1
'
Me.GroupFooter1.Height = 0!
Me.GroupFooter1.Name = "GroupFooter1"
'
'TextBox1
'
Me.TextBox1.CanGrow = False
Me.TextBox1.Height = 0.2393701!
Me.TextBox1.Left = 0!
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Style = "font-size: 10pt; font-weight: bold; text-align: left; text-decoration: underline;" &
" ddo-char-set: 1"
Me.TextBox1.Text = "Vorkosten"
Me.TextBox1.Top = 0!
Me.TextBox1.Width = 1.46063!
'
'subRptSendungenVorkosten
'
Me.MasterReport = False
Me.PageSettings.PaperHeight = 11.0!
Me.PageSettings.PaperWidth = 8.5!
Me.PrintWidth = 4.03189!
Me.Sections.Add(Me.GroupHeader1)
Me.Sections.Add(Me.Detail)
Me.Sections.Add(Me.GroupFooter1)
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" &
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" &
"lic", "Heading2", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
CType(Me.txtFirma, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtLeistung, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtPreis, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox10, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox11, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox12, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Private WithEvents GroupHeader1 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
Private WithEvents GroupFooter1 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
Private WithEvents TextBox10 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox11 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox12 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents txtFirma As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents txtLeistung As GrapeCity.ActiveReports.SectionReportModel.TextBox
Public WithEvents txtPreis As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
End Class

View File

@@ -0,0 +1,37 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports System.Data
Imports VERAG_PROG_ALLGEMEIN
Public Class subRptSendungenVorkosten
Dim VORKOSTEN As List(Of VERAG_PROG_ALLGEMEIN.cSendVorkosten) = Nothing
Sub New(VORKOSTEN As List(Of VERAG_PROG_ALLGEMEIN.cSendVorkosten))
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
Me.VORKOSTEN = VORKOSTEN
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
txtFirma.Text = CStr(Me.Fields.Item("FIRMA").Value)
txtLeistung.Text = CStr(Me.Fields.Item("LEISTUNG").Value)
txtPreis.Text = CDbl(Me.Fields.Item("PREIS").Value).ToString("C2")
End Sub
Private Sub rptAuswertung_ReportStart(sender As System.Object, e As System.EventArgs) Handles MyBase.ReportStart
Dim dt As New DataTable
dt.Columns.Add("FIRMA", System.Type.GetType("System.String"))
dt.Columns.Add("LEISTUNG", System.Type.GetType("System.String"))
dt.Columns.Add("PREIS", System.Type.GetType("System.String"))
For Each s In VORKOSTEN
dt.Rows.Add({s.sndvk_Firma, s.sndvk_LeistungsBez, s.sndvk_Preis})
Next
Me.DataSource = dt
End Sub
End Class

View File

@@ -0,0 +1,404 @@
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
Partial Public Class subRptSendungenZollpruefung
Inherits GrapeCity.ActiveReports.SectionReport
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
End If
MyBase.Dispose(disposing)
End Sub
'NOTE: The following procedure is required by the ActiveReports Designer
'It can be modified using the ActiveReports Designer.
'Do not modify it using the code editor.
Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail
<System.Diagnostics.DebuggerStepThrough()>
Private Sub InitializeComponent()
Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(subRptSendungenZollpruefung))
Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail()
Me.TextBox3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox9 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtWarenbezeichung = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtColliGewichtPreis = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtATREUR1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtRg = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAbgabenKto = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox4 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox5 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox6 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAbsender = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtEmpfaenger = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtAnmelder = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.TextBox7 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtVertreter = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtVerBestLandZst = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtPraefAufRef = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtSB = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.GroupHeader1 = New GrapeCity.ActiveReports.SectionReportModel.GroupHeader()
Me.GroupFooter1 = New GrapeCity.ActiveReports.SectionReportModel.GroupFooter()
Me.TextBox8 = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.txtATCMRN = New GrapeCity.ActiveReports.SectionReportModel.TextBox()
Me.barcodeATCMRN = New GrapeCity.ActiveReports.SectionReportModel.Picture()
CType(Me.TextBox3, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox9, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtWarenbezeichung, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtColliGewichtPreis, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtATREUR1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtRg, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAbgabenKto, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox4, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox5, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox6, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAbsender, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtEmpfaenger, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtAnmelder, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox7, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtVertreter, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtVerBestLandZst, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtPraefAufRef, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtSB, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.TextBox8, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.txtATCMRN, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.barcodeATCMRN, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me, System.ComponentModel.ISupportInitialize).BeginInit()
'
'Detail
'
Me.Detail.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.TextBox3, Me.TextBox9, Me.TextBox1, Me.txtWarenbezeichung, Me.txtColliGewichtPreis, Me.txtATREUR1, Me.txtRg, Me.txtAbgabenKto, Me.TextBox2, Me.TextBox4, Me.TextBox5, Me.TextBox6, Me.txtAbsender, Me.txtEmpfaenger, Me.txtAnmelder, Me.TextBox7, Me.txtVertreter, Me.txtVerBestLandZst, Me.txtPraefAufRef, Me.txtSB, Me.TextBox8, Me.txtATCMRN, Me.barcodeATCMRN})
Me.Detail.Height = 2.218504!
Me.Detail.Name = "Detail"
'
'TextBox3
'
Me.TextBox3.CanGrow = False
Me.TextBox3.Height = 0.1456693!
Me.TextBox3.Left = 0!
Me.TextBox3.Name = "TextBox3"
Me.TextBox3.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox3.Text = "Abgabenkto:"
Me.TextBox3.Top = 1.056299!
Me.TextBox3.Width = 0.9228347!
'
'TextBox9
'
Me.TextBox9.CanGrow = False
Me.TextBox9.Height = 0.1456693!
Me.TextBox9.Left = 0!
Me.TextBox9.Name = "TextBox9"
Me.TextBox9.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox9.Text = "Pr<EFBFBD>f. auf Rg.:"
Me.TextBox9.Top = 0.91063!
Me.TextBox9.Width = 0.9228347!
'
'TextBox1
'
Me.TextBox1.CanGrow = False
Me.TextBox1.Height = 0.1456693!
Me.TextBox1.Left = 0!
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox1.Text = "ATR/EUR1:"
Me.TextBox1.Top = 0.6192915!
Me.TextBox1.Width = 0.9228347!
'
'txtWarenbezeichung
'
Me.txtWarenbezeichung.CanGrow = False
Me.txtWarenbezeichung.Height = 0.2535433!
Me.txtWarenbezeichung.Left = 0!
Me.txtWarenbezeichung.Name = "txtWarenbezeichung"
Me.txtWarenbezeichung.Style = "font-size: 8pt; ddo-char-set: 1"
Me.txtWarenbezeichung.Text = Nothing
Me.txtWarenbezeichung.Top = 0.168504!
Me.txtWarenbezeichung.Width = 4.03189!
'
'txtColliGewichtPreis
'
Me.txtColliGewichtPreis.Height = 0.1685039!
Me.txtColliGewichtPreis.Left = 0!
Me.txtColliGewichtPreis.Name = "txtColliGewichtPreis"
Me.txtColliGewichtPreis.Style = "font-weight: bold; text-align: left"
Me.txtColliGewichtPreis.Text = Nothing
Me.txtColliGewichtPreis.Top = 0!
Me.txtColliGewichtPreis.Width = 2.988189!
'
'txtATREUR1
'
Me.txtATREUR1.Height = 0.1456693!
Me.txtATREUR1.Left = 0.8811024!
Me.txtATREUR1.Name = "txtATREUR1"
Me.txtATREUR1.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtATREUR1.Text = Nothing
Me.txtATREUR1.Top = 0.6192912!
Me.txtATREUR1.Width = 3.150787!
'
'txtRg
'
Me.txtRg.Height = 0.1456693!
Me.txtRg.Left = 0.8811024!
Me.txtRg.Name = "txtRg"
Me.txtRg.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtRg.Text = Nothing
Me.txtRg.Top = 0.7649607!
Me.txtRg.Width = 3.150787!
'
'txtAbgabenKto
'
Me.txtAbgabenKto.Height = 0.1456693!
Me.txtAbgabenKto.Left = 0.8811024!
Me.txtAbgabenKto.Name = "txtAbgabenKto"
Me.txtAbgabenKto.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtAbgabenKto.Text = Nothing
Me.txtAbgabenKto.Top = 1.056299!
Me.txtAbgabenKto.Width = 3.150787!
'
'TextBox2
'
Me.TextBox2.CanGrow = False
Me.TextBox2.Height = 0.1456693!
Me.TextBox2.Left = 0!
Me.TextBox2.Name = "TextBox2"
Me.TextBox2.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox2.Text = "Handels-Rg.:"
Me.TextBox2.Top = 0.7649607!
Me.TextBox2.Width = 0.9228347!
'
'TextBox4
'
Me.TextBox4.CanGrow = False
Me.TextBox4.Height = 0.1456693!
Me.TextBox4.Left = 0!
Me.TextBox4.Name = "TextBox4"
Me.TextBox4.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox4.Text = "Absender:"
Me.TextBox4.Top = 1.266142!
Me.TextBox4.Width = 0.8811023!
Me.TextBox4.Visible = False
'
'TextBox5
'
Me.TextBox5.CanGrow = False
Me.TextBox5.Height = 0.1456693!
Me.TextBox5.Left = 0!
Me.TextBox5.Name = "TextBox5"
Me.TextBox5.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox5.Text = "Empf<EFBFBD>nger:"
Me.TextBox5.Top = 1.411811!
Me.TextBox5.Width = 0.8811023!
'
'TextBox6
'
Me.TextBox6.CanGrow = False
Me.TextBox6.Height = 0.1456693!
Me.TextBox6.Left = 0!
Me.TextBox6.Name = "TextBox6"
Me.TextBox6.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox6.Text = "Anmelder:"
Me.TextBox6.Top = 1.55748!
Me.TextBox6.Width = 0.8811023!
'
'txtAbsender
'
Me.txtAbsender.CanGrow = False
Me.txtAbsender.Height = 0.1456693!
Me.txtAbsender.Left = 0.8811024!
Me.txtAbsender.Name = "txtAbsender"
Me.txtAbsender.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtAbsender.Text = Nothing
Me.txtAbsender.Top = 1.266143!
Me.txtAbsender.Width = 3.150787!
Me.txtAbsender.Visible = False
'
'txtEmpfaenger
'
Me.txtEmpfaenger.CanGrow = False
Me.txtEmpfaenger.Height = 0.1456693!
Me.txtEmpfaenger.Left = 0.8811024!
Me.txtEmpfaenger.Name = "txtEmpfaenger"
Me.txtEmpfaenger.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtEmpfaenger.Text = Nothing
Me.txtEmpfaenger.Top = 1.411811!
Me.txtEmpfaenger.Width = 3.150787!
'
'txtAnmelder
'
Me.txtAnmelder.CanGrow = False
Me.txtAnmelder.Height = 0.1456693!
Me.txtAnmelder.Left = 0.8811024!
Me.txtAnmelder.Name = "txtAnmelder"
Me.txtAnmelder.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtAnmelder.Text = Nothing
Me.txtAnmelder.Top = 1.55748!
Me.txtAnmelder.Width = 3.150787!
'
'TextBox7
'
Me.TextBox7.CanGrow = False
Me.TextBox7.Height = 0.1456693!
Me.TextBox7.Left = 0!
Me.TextBox7.Name = "TextBox7"
Me.TextBox7.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox7.Text = "Vertreter:"
Me.TextBox7.Top = 1.70315!
Me.TextBox7.Width = 0.8811023!
Me.TextBox7.Visible = False
'
'txtVertreter
'
Me.txtVertreter.CanGrow = False
Me.txtVertreter.Height = 0.1456693!
Me.txtVertreter.Left = 0.8811024!
Me.txtVertreter.Name = "txtVertreter"
Me.txtVertreter.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtVertreter.Text = Nothing
Me.txtVertreter.Top = 1.70315!
Me.txtVertreter.Width = 3.150787!
Me.txtVertreter.Visible = False
'
'txtVerBestLandZst
'
Me.txtVerBestLandZst.Height = 0.1456693!
Me.txtVerBestLandZst.Left = 0!
Me.txtVerBestLandZst.Name = "txtVerBestLandZst"
Me.txtVerBestLandZst.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtVerBestLandZst.Text = Nothing
Me.txtVerBestLandZst.Top = 0.4220473!
Me.txtVerBestLandZst.Width = 4.031889!
'
'txtPraefAufRef
'
Me.txtPraefAufRef.Height = 0.1456693!
Me.txtPraefAufRef.Left = 0.8811024!
Me.txtPraefAufRef.Name = "txtPraefAufRef"
Me.txtPraefAufRef.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtPraefAufRef.Text = Nothing
Me.txtPraefAufRef.Top = 0.91063!
Me.txtPraefAufRef.Width = 3.150787!
'
'txtSB
'
Me.txtSB.CanGrow = False
Me.txtSB.Height = 0.1685039!
Me.txtSB.Left = 2.791339!
Me.txtSB.Name = "txtSB"
Me.txtSB.Style = "font-weight: bold; text-align: right"
Me.txtSB.Text = Nothing
Me.txtSB.Top = 0!
Me.txtSB.Width = 1.169291!
'
'GroupHeader1
'
Me.GroupHeader1.Height = 0!
Me.GroupHeader1.Name = "GroupHeader1"
'
'GroupFooter1
'
Me.GroupFooter1.Height = 0!
Me.GroupFooter1.Name = "GroupFooter1"
'
'TextBox8
'
Me.TextBox8.CanGrow = False
Me.TextBox8.Height = 0.1456693!
Me.TextBox8.Left = 0!
Me.TextBox8.Name = "TextBox8"
Me.TextBox8.Style = "font-size: 9pt; ddo-char-set: 1"
Me.TextBox8.Text = "ATC/MRN:"
Me.TextBox8.Top = 1.848819!
Me.TextBox8.Width = 0.8811023!
'
'txtATCMRN
'
Me.txtATCMRN.CanGrow = False
Me.txtATCMRN.Height = 0.1456693!
Me.txtATCMRN.Left = 0.8811024!
Me.txtATCMRN.Name = "txtATCMRN"
Me.txtATCMRN.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 1"
Me.txtATCMRN.Text = Nothing
Me.txtATCMRN.Top = 1.848819!
Me.txtATCMRN.Width = 3.150787!
'
'barcodeATCMRN
'
Me.barcodeATCMRN.Height = 0.1964569!
Me.barcodeATCMRN.HyperLink = Nothing
Me.barcodeATCMRN.ImageData = Nothing
Me.barcodeATCMRN.Left = 0.7889764!
Me.barcodeATCMRN.Name = "barcodeATCMRN"
Me.barcodeATCMRN.PictureAlignment = GrapeCity.ActiveReports.SectionReportModel.PictureAlignment.BottomLeft
Me.barcodeATCMRN.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom
Me.barcodeATCMRN.Top = 2.022048!
Me.barcodeATCMRN.Width = 3.242913!
'
'subRptSendungenZollpruefung
'
Me.MasterReport = False
Me.PageSettings.PaperHeight = 11.0!
Me.PageSettings.PaperWidth = 8.5!
Me.PrintWidth = 4.03189!
Me.Sections.Add(Me.GroupHeader1)
Me.Sections.Add(Me.Detail)
Me.Sections.Add(Me.GroupFooter1)
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" &
"l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" &
"lic", "Heading2", "Normal"))
Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal"))
CType(Me.TextBox3, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox9, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtWarenbezeichung, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtColliGewichtPreis, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtATREUR1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtRg, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAbgabenKto, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox4, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox5, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox6, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAbsender, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtEmpfaenger, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtAnmelder, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox7, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtVertreter, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtVerBestLandZst, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtPraefAufRef, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtSB, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.TextBox8, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.txtATCMRN, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.barcodeATCMRN, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me, System.ComponentModel.ISupportInitialize).EndInit()
End Sub
Private WithEvents txtWarenbezeichung As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents GroupHeader1 As GrapeCity.ActiveReports.SectionReportModel.GroupHeader
Private WithEvents GroupFooter1 As GrapeCity.ActiveReports.SectionReportModel.GroupFooter
Private WithEvents txtColliGewichtPreis As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtATREUR1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtRg As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAbgabenKto As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox1 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox2 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox3 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox4 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox5 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox6 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAbsender As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtEmpfaenger As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtAnmelder As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox7 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtVertreter As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtVerBestLandZst As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtPraefAufRef As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox9 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtSB As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents TextBox8 As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents txtATCMRN As GrapeCity.ActiveReports.SectionReportModel.TextBox
Private WithEvents barcodeATCMRN As GrapeCity.ActiveReports.SectionReportModel.Picture
End Class

View File

@@ -0,0 +1,48 @@
Imports GrapeCity.ActiveReports
Imports GrapeCity.ActiveReports.Document
Imports VERAG_PROG_ALLGEMEIN
Imports SDL
Public Class subRptSendungenZollpruefung
Dim ZOLLANMELDUNG As DAKOSY_Worker.cZollsysteme_Aktenbeschriftung = Nothing
Sub New(ZOLLANMELDUNG As DAKOSY_Worker.cZollsysteme_Aktenbeschriftung)
' Dieser Aufruf ist f<>r den Designer erforderlich.
InitializeComponent()
Me.ZOLLANMELDUNG = ZOLLANMELDUNG
' F<>gen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
End Sub
Private Sub Detail_Format(sender As Object, e As EventArgs) Handles Detail.Format
If ZOLLANMELDUNG IsNot Nothing Then
'Dim A As New DAKOSY_Worker.cZollsysteme_Aktenbeschriftung
'If A.getDataByBezugsnummer(SENDUNG.FilialenNr & "/" & SENDUNG.AbfertigungsNr, SENDUNG.tblSnd_Abfertigungsart_ID.ToString) Then
txtColliGewichtPreis.Text = ZOLLANMELDUNG.Colli & " " & ZOLLANMELDUNG.Gewicht & " " & ZOLLANMELDUNG.Rechnungspreis
txtAbgabenKto.Text &= ZOLLANMELDUNG.AbgabenKonto
txtRg.Text &= ZOLLANMELDUNG.Handelsrechnung
txtPraefAufRef.Text = ZOLLANMELDUNG.Pr<EFBFBD>ferenzAufRechnung
txtATREUR1.Text &= ZOLLANMELDUNG.Praeferenznachweis
txtWarenbezeichung.Text = ZOLLANMELDUNG.Warenbezeichung
txtVerBestLandZst.Text = ZOLLANMELDUNG.VerBestLandZst
txtAbsender.Text = ZOLLANMELDUNG.Absender
txtEmpfaenger.Text = ZOLLANMELDUNG.Empfaenger
txtAnmelder.Text = ZOLLANMELDUNG.Anmelder
txtVertreter.Text = ZOLLANMELDUNG.Vertreter
txtATCMRN.Text = ZOLLANMELDUNG.ATCMRN
If ZOLLANMELDUNG.ATCMRN <> "" Then
barcodeATCMRN.Image = Code128Rendering.MakeBarcodeImage(ZOLLANMELDUNG.ATCMRN, 1, True, 20)
End If
txtSB.Text = ZOLLANMELDUNG.Sachbearbeiter
End If
End Sub
Private Sub rptAuswertung_ReportStart(sender As System.Object, e As System.EventArgs) Handles MyBase.ReportStart
'If ABF_ART <= 0 Then Exit Sub
'If AbfKostKdnr <= 0 Then Exit Sub
'Me.DataSource = (New VERAG_PROG_ALLGEMEIN.SQL).loadDgvBySql("select isnull(LeistungsNr,'') as LeistungsNr,isnull(LeistungsBez,'' ) as LeistungsBez,isnull(Preis,'') as Preis FROM [Offertenpositionen] where KundenNr=" & AbfKostKdnr & " AND OffertenNr=(SELECT ISNULL(AO.ao_OffertenNr,-1) FROM tblAbfertigungsartOffertenstamm as AO WHERE AO.ao_Abfertigungsart='" & ABF_ART & "') and preis is not null order by LeistungsNr, Preis desc", "FMZOLL")
End Sub
End Class

View File

@@ -101,136 +101,136 @@
<HintPath>F:\PROGRAMMIERUNG\dll\ActiveReports18\BouncyCastle.Cryptography.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.DX.Windows, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.DX.Windows.7.2.2\lib\net461\DS.Documents.DX.Windows.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\DS.Documents.DX.Windows.7.2.2\lib\net461\DS.Documents.DX.Windows.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Imaging, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Imaging.7.2.2\lib\net461\DS.Documents.Imaging.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\DS.Documents.Imaging.7.2.2\lib\net461\DS.Documents.Imaging.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Imaging.Windows, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Imaging.Windows.7.2.2\lib\net461\DS.Documents.Imaging.Windows.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\DS.Documents.Imaging.Windows.7.2.2\lib\net461\DS.Documents.Imaging.Windows.dll</HintPath>
</Reference>
<Reference Include="DS.Documents.Pdf, Version=7.2.2.0, Culture=neutral, PublicKeyToken=d55d733d2bfd5065, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\DS.Documents.Pdf.7.2.2\lib\net461\DS.Documents.Pdf.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\DS.Documents.Pdf.7.2.2\lib\net461\DS.Documents.Pdf.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Chart, Version=18.0.4.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Chart.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Chart.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Chart.Win, Version=18.0.4.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Chart.Win.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Chart.Win.18.0.4\lib\net462\MESCIUS.ActiveReports.Chart.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.DataProviders, Version=3.1.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.DataProviders.3.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.DataProviders.3.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.DataProviders.Excel, Version=1.1.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.DataProviders.Excel.1.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.Excel.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.DataProviders.Excel.1.1.2\lib\net462\MESCIUS.ActiveReports.Core.DataProviders.Excel.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Document.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document.Drawing.Gc, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gc.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Document.Drawing.Gdi, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Document.Drawing.Gdi.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Drawing.Gc, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Drawing.Gc.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gc.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Drawing.Gc.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gc.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Drawing.Gdi, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Drawing.Gdi.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gdi.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Drawing.Gdi.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Drawing.Gdi.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Excel.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Excel.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Excel.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Excel.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Excel.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Html.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Html.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Html.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Html.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Html.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Image.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Image.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Image.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Image.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Image.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Pdf.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Pdf.Section, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Section.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Pdf.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Pdf.Section.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Svg.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Svg.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Svg.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Svg.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Svg.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Text.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Text.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Text.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Text.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Text.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Tiff.Section, Version=4.7.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Tiff.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Tiff.Section.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Tiff.Section.4.7.0\lib\net462\MESCIUS.ActiveReports.Core.Export.Tiff.Section.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Export.Word.Page, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Export.Word.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Word.Page.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Export.Word.Page.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Export.Word.Page.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Rdl, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Rdl.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rdl.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Rdl.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rdl.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Rendering, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Rendering.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rendering.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Rendering.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Rendering.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Core.Scripting, Version=3.12.1.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Core.Scripting.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Scripting.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Core.Scripting.3.12.1\lib\net462\MESCIUS.ActiveReports.Core.Scripting.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Design.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Design.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Design.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Design.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Design.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Excel, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Excel.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Excel.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Excel.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Excel.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Html, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Html.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Html.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Html.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Html.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Image, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Image.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Image.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Image.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Pdf, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Pdf.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Pdf.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Pdf.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Word, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Word.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Word.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Word.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Word.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Export.Xml, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Export.Xml.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Xml.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Export.Xml.18.2.2\lib\net462\MESCIUS.ActiveReports.Export.Xml.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.QueryDesigner, Version=1.0.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.QueryDesigner.1.0.2\lib\net462\MESCIUS.ActiveReports.QueryDesigner.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.QueryDesigner.1.0.2\lib\net462\MESCIUS.ActiveReports.QueryDesigner.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Serializer, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Serializer.VS2022.18.2.2\lib\net472\MESCIUS.ActiveReports.Serializer.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Serializer.VS2022.18.2.2\lib\net472\MESCIUS.ActiveReports.Serializer.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.SpreadBuilder, Version=2.2.0.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.SpreadBuilder.2.2.0\lib\net462\MESCIUS.ActiveReports.SpreadBuilder.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.SpreadBuilder.2.2.0\lib\net462\MESCIUS.ActiveReports.SpreadBuilder.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Viewer.Common, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Viewer.Common.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Common.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Viewer.Common.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Common.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Viewer.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.Viewer.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.Viewer.Win.18.2.2\lib\net462\MESCIUS.ActiveReports.Viewer.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.ActiveReports.Win, Version=18.2.2.0, Culture=neutral, PublicKeyToken=cc4967777c49a3ff, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.Win.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.ActiveReports.18.2.2\lib\net462\MESCIUS.ActiveReports.Win.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.DataEngine, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.DataEngine.4.0.3\lib\net462\MESCIUS.Data.DataEngine.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.Data.DataEngine.4.0.3\lib\net462\MESCIUS.Data.DataEngine.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.ExpressionInfo, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.ExpressionInfo.4.0.3\lib\net462\MESCIUS.Data.ExpressionInfo.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.Data.ExpressionInfo.4.0.3\lib\net462\MESCIUS.Data.ExpressionInfo.dll</HintPath>
</Reference>
<Reference Include="MESCIUS.Data.VBFunctionLib, Version=4.0.3.0, Culture=neutral, PublicKeyToken=0b5e1563d2869208, processorArchitecture=MSIL">
<HintPath>..\..\..\SDL\SDL\packages\MESCIUS.Data.VBFunctionLib.4.0.3\lib\net462\MESCIUS.Data.VBFunctionLib.dll</HintPath>
<HintPath>..\..\..\DISPO\DISPO\packages\MESCIUS.Data.VBFunctionLib.4.0.3\lib\net462\MESCIUS.Data.VBFunctionLib.dll</HintPath>
</Reference>
<Reference Include="Microsoft.Bcl.AsyncInterfaces, Version=8.0.0.0, Culture=neutral, PublicKeyToken=cc7b13ffcd2ddd51, processorArchitecture=MSIL">
<HintPath>..\packages\Microsoft.Bcl.AsyncInterfaces.8.0.0\lib\net462\Microsoft.Bcl.AsyncInterfaces.dll</HintPath>