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

Merge branch 'master' of https://git.it.verag.ag/edv/AVISO

Browse Source
This commit is contained in:
d.breimaier
2026-10-23 10:07:22 +02:00
parent 33d192630a f083c2f0ef
commit fd92b12a13
3 changed files with 33 additions and 47 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
Aviso/ATEZ/frmATEZ_EZA.vb
View File

@@ -78,26 +78,6 @@ Public Class frmATEZ_EZA
Try Try
'If Button1.Text = "JSON" Then
' If Not atez.setJson(atez_data) Then MsgBox("Fehler beim Erstellen der Daten")
' atez.setJsonPDF(atez_data, dgvAnhaenge)
' Dim data As New DataObject()
' data.SetData(DataFormats.Text, atez_data.json)
' Clipboard.SetDataObject(data)
' Me.Cursor = Cursors.Default
' MsgBox("JSON-Daten in Zwischenablage gespeichert")
' Exit Sub
'End If
'If atez_data.status = "Sent" Then
' Exit Sub
'End If
''auskommentiert, weil Sendungen ohne ANhang auch geschickt werden sollen: M.Akceylan
''If Not checkAttachment() Then
'' Exit Sub
''End If
If Not checkMandatoryField() Then If Not checkMandatoryField() Then

56
Aviso/ATEZ/frmATEZ_MIC.vb
View File

@@ -93,35 +93,41 @@ Public Class frmATEZ_MIC
' RelayHub Request - MIC NL Import ' RelayHub Request - MIC NL Import
'---------------------------------------------------------------------- '----------------------------------------------------------------------
'Dim environment = If(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, cRelayHubEnvironment.TEST, cRelayHubEnvironment.PROD) 'Dim environment = If(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, cRelayHubEnvironment.TEST, cRelayHubEnvironment.PROD)
'----------------------------------------------------------------------
' RelayHub Request - MIC NL Import
'----------------------------------------------------------------------
Dim environment = cRelayHubEnvironment.TEST Dim environment = cRelayHubEnvironment.TEST
Dim ATEZ_RH_EZA As New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubJobOrderRequest With { Dim ATEZ_RH_EZA As New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubJobOrderRequest With {
.environment = environment, .environment = environment,
.referenceNo = ioReference, .referenceNo = ioReference,
.outputApplication = cRelayHubOutputApplication.MIC_NL_IMPORT, .regimeType = "IM",
.dispatchCountry = "TR", .outputApplication = cRelayHubOutputApplication.MIC_NL_IMPORT,
.destinationCountry = "NL", .dispatchCountry = "TR",
.additionalData = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubAdditionalData With { .destinationCountry = "NL",
.micImportShipment = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubMicImportShipment With { .additionalData = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubAdditionalData With {
.partyId = "party-id-003", .micImportShipment = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubMicImportShipment With {
.shipmentId = ioReferenceLRN .company = "NL",
}, .plant = "IN",
.declaration = New List(Of VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubDeclaration) From { .connectionId = "MICWebService",
New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubDeclaration With { .partnerId = ioReferenceLRN,
.addresses = New List(Of VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubAddress), .partyId = "party-id-003",
.objectIdentification = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubObjectIdentification With { .shipmentId = ioReferenceLRN,
.objectName = lblBezugsnummer.Text, .actionCode = "DIF",
.shipmentId = SENDUNG.tblSnd_SendungID, .shipmentType = "E"
.avisoId = SENDUNG.tblSnd_AvisoID },
} .declaration = New List(Of VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubDeclaration) From {
New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubDeclaration With {
.addresses = New List(Of VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubAddress)
}
}
},
.additionalSettings = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubAdditionalSettings With {
.disableOutbound = True,
.disableValidation = False
}
} }
}
},
.additionalSettings = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubAdditionalSettings With {
.disableOutbound = False,
.disableValidation = False
}
}
'---------------------------------------------------------------------- '----------------------------------------------------------------------
' Dokumente ' Dokumente

4
Aviso/My Project/AssemblyInfo.vb
View File

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