From 13a700b4ab1bbccc7d124e36f8d51e709b8a48ed Mon Sep 17 00:00:00 2001 From: "d.breimaier" Date: Wed, 13 Sep 2023 17:18:59 +0200 Subject: [PATCH] ATEZ und Digicust --- .../Schnittstellen/ATEZ/VERAG_OUT_ATEZ_IN/cATEZ_NCTS_IN.vb | 4 ++-- VERAG_PROG_ALLGEMEIN/Schnittstellen/Digicast/cDigicustAPI.vb | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/VERAG_PROG_ALLGEMEIN/Schnittstellen/ATEZ/VERAG_OUT_ATEZ_IN/cATEZ_NCTS_IN.vb b/VERAG_PROG_ALLGEMEIN/Schnittstellen/ATEZ/VERAG_OUT_ATEZ_IN/cATEZ_NCTS_IN.vb index 6c8c67ea..877b8ead 100644 --- a/VERAG_PROG_ALLGEMEIN/Schnittstellen/ATEZ/VERAG_OUT_ATEZ_IN/cATEZ_NCTS_IN.vb +++ b/VERAG_PROG_ALLGEMEIN/Schnittstellen/ATEZ/VERAG_OUT_ATEZ_IN/cATEZ_NCTS_IN.vb @@ -35,7 +35,7 @@ Public Class cATEZ_NCTS_DATA Public Property AvisoId As Integer Public Property SendungsId As Integer Public Property atezId As String - 'Public Property json As String + Public Property erstellerId As Integer Public Property dakosy_ref As String Public Property selectedDocuments As String Public Property fehlerbeschreibung As String @@ -72,7 +72,7 @@ Public Class cATEZ_NCTS_DATA list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("atezId", atezId)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("status", status)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("erstellung", erstellung)) - 'list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("json", json)) + list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("erstellerId", erstellerId)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("dakosy_ref", dakosy_ref)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("selectedDocuments", selectedDocuments)) list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fehlerbeschreibung", fehlerbeschreibung)) diff --git a/VERAG_PROG_ALLGEMEIN/Schnittstellen/Digicast/cDigicustAPI.vb b/VERAG_PROG_ALLGEMEIN/Schnittstellen/Digicast/cDigicustAPI.vb index 1a5ca24b..e874ed4f 100644 --- a/VERAG_PROG_ALLGEMEIN/Schnittstellen/Digicast/cDigicustAPI.vb +++ b/VERAG_PROG_ALLGEMEIN/Schnittstellen/Digicast/cDigicustAPI.vb @@ -421,7 +421,7 @@ Public Class cDigicustAPI End Function - Shared Function uploadingCase(dig As cDigicustSendungen, settings As cDigicustSettings, dgv As DataGridView) As Boolean + Shared Function uploadingCase(dig As cDigicustSendungen, settings As cDigicustSettings, dgv As DataGridView, withAvisoData As Boolean) As Boolean Dim rest As New Chilkat.Rest Dim success As Boolean @@ -491,7 +491,7 @@ Public Class cDigicustAPI rest.SetMultipartBodyString(dig.reference) counter += 1 - createUserinput(rest, counter, dig) + If withAvisoData Then createUserinput(rest, counter, dig) rest.PartSelector = "0"