Merge branch 'master' of https://git.it.verag.ag/edv/AVISO
This commit is contained in:
@@ -78,26 +78,6 @@ Public Class frmATEZ_EZA
|
||||
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
|
||||
|
||||
@@ -93,35 +93,41 @@ Public Class frmATEZ_MIC
|
||||
' RelayHub Request - MIC NL Import
|
||||
'----------------------------------------------------------------------
|
||||
'Dim environment = If(VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM, cRelayHubEnvironment.TEST, cRelayHubEnvironment.PROD)
|
||||
|
||||
'----------------------------------------------------------------------
|
||||
' RelayHub Request - MIC NL Import
|
||||
'----------------------------------------------------------------------
|
||||
Dim environment = cRelayHubEnvironment.TEST
|
||||
|
||||
Dim ATEZ_RH_EZA As New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubJobOrderRequest With {
|
||||
.environment = environment,
|
||||
.referenceNo = ioReference,
|
||||
.outputApplication = cRelayHubOutputApplication.MIC_NL_IMPORT,
|
||||
.dispatchCountry = "TR",
|
||||
.destinationCountry = "NL",
|
||||
.additionalData = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubAdditionalData With {
|
||||
.micImportShipment = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubMicImportShipment With {
|
||||
.partyId = "party-id-003",
|
||||
.shipmentId = ioReferenceLRN
|
||||
},
|
||||
.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),
|
||||
.objectIdentification = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubObjectIdentification With {
|
||||
.objectName = lblBezugsnummer.Text,
|
||||
.shipmentId = SENDUNG.tblSnd_SendungID,
|
||||
.avisoId = SENDUNG.tblSnd_AvisoID
|
||||
}
|
||||
.environment = environment,
|
||||
.referenceNo = ioReference,
|
||||
.regimeType = "IM",
|
||||
.outputApplication = cRelayHubOutputApplication.MIC_NL_IMPORT,
|
||||
.dispatchCountry = "TR",
|
||||
.destinationCountry = "NL",
|
||||
.additionalData = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubAdditionalData With {
|
||||
.micImportShipment = New VERAG_PROG_ALLGEMEIN.cRelayHub.cRelayHubMicImportShipment With {
|
||||
.company = "NL",
|
||||
.plant = "IN",
|
||||
.connectionId = "MICWebService",
|
||||
.partnerId = ioReferenceLRN,
|
||||
.partyId = "party-id-003",
|
||||
.shipmentId = ioReferenceLRN,
|
||||
.actionCode = "DIF",
|
||||
.shipmentType = "E"
|
||||
},
|
||||
.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
|
||||
|
||||
@@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices
|
||||
' übernehmen, indem Sie "*" eingeben:
|
||||
' <Assembly: AssemblyVersion("1.0.*")>
|
||||
|
||||
<Assembly: AssemblyVersion("4.3.3.6")>
|
||||
<Assembly: AssemblyFileVersion("4.3.3.6")>
|
||||
<Assembly: AssemblyVersion("4.3.3.7")>
|
||||
<Assembly: AssemblyFileVersion("4.3.3.7")>
|
||||
|
||||
Reference in New Issue
Block a user