vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Blitzschnelles Erstellen von grafischen Diagrammen!  
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fragen & Antworten rund um sev-Komponenten
sevDTA40 stürzt kommentarlos ab ! 
Autor: Wolfgang Schwarz
Datum: 06.07.22 17:24

Hallo,

... und zwar bei "DTA_FileInit" immer dann wenn ich Überweisungen aufbereiten will.
Bei Lastschriften funktioniert es.

Die VBIDE schließt sich einfach - ohne Kommentar.

Was kann das sein ?

mfg

Wolfgang Schwarz

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: ModeratorDieter (Moderator)
Datum: 06.07.22 17:33

Eigenartig; ich kann das nicht nachvollziehen.
Hast du evtl. ein kleines Beispiel für mich?

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: Wolfgang Schwarz
Datum: 06.07.22 17:44

Hm, schwierig das nachzustellen.
Gibt es vielleicht eine LOG-Datei, Trace oder so.

Beispiel müßte ich erst machen.
Im Einsatz ist Version 4.0.0.5, ich werd dann erstmal auf 4.0.0.7 updaten

Wolfgang Schwarz

Beitrag wurde zuletzt am 06.07.22 um 17:47:31 editiert.

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: Wolfgang Schwarz
Datum: 06.07.22 18:41

mit 4.0.0.7 stürzt es auch ab !
Bei Überweisungen.
Bei Lastschrift funktioniert es.

Wolfgang Schwarz

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: Wolfgang Schwarz
Datum: 06.07.22 22:02

... ratlos

Wolfgang Schwarz

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: ModeratorDieter (Moderator)
Datum: 07.07.22 07:17

Hast du mal das Demoprojekt ausprobiert?
Stürzt die DLL auch hier ab?
Weil ich kann es einfach nicht nachstellen.

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: Wolfgang Schwarz
Datum: 07.07.22 12:51

Das Demoprojekt funktioniert.
Als standalone EXE funktioniert es in meinem Projekt auch !!!!

Nur in der VBIDE kommt der Absturz !
Nur bei Überweisungen !

Wolfgang Schwarz

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: Wolfgang Schwarz
Datum: 07.07.22 13:18

Korrektur:
Läuft auch als Standalone-EXE nicht.
War noch für sevDTA30 ...grrh

So wie ich es sehe ist es bei mir Überweisungen mit sevDTA40 noch nie gelaufen

Wolfgang Schwarz

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: ModeratorDieter (Moderator)
Datum: 07.07.22 13:39

Das muss laufen. Wie sieht denn dein FileInit Aufruf genau aus?

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: Wolfgang Schwarz
Datum: 07.07.22 14:09

Dieter schrieb:
Zitat:

Das muss laufen. Wie sieht denn dein FileInit Aufruf genau
aus?


Tja wie soll ich das beschreiben.

Jedenfalls genauso wie der Aufruf für Lastschriften.
Der Code für den Wrapper sevSEPA_FileInit und DTA_FileInit befindet sich sauber gekapselt in einem eigenen Modul und wird für Lastschriften/Überweisungen zentral aufgerufen. Gibt den Code also nur einmal. Mit anderen Parametern in der Übergabe natürlich.
Den Code für sevSEPA_FileInit habe ich aus dem Beispielprojekt übernommen.
Alle übergebenen Variablen habe ich pingelig genau auf den richtigen Datentyp geprüft.

So habe ich es schon immer mit allen sevDTA-Versionen gemacht.

Wolfgang Schwarz

Beitrag wurde zuletzt am 07.07.22 um 14:10:50 editiert.

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: ModeratorDieter (Moderator)
Datum: 07.07.22 14:11

Sorry, aber ohne Beispiel kann ich leider nicht weiterhelfen.

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: Wolfgang Schwarz
Datum: 07.07.22 15:41

Ich glaub ich hab was !

Der Absturz entsteht dann wenn die GläubigerID aus nicht angesprochenen Variablen kommt

Beispiel welches *nicht* funktioniert:


70 Dim fHandle As Long: fHandle = 1
80 Dim sKZ As String: sKZ = "G"
90 Dim sName As String: sName = "Testfirma GmbH"
100 Dim KtoInh As String: KtoInh = "Testfirma GmbH"
110 Dim IBAN As String: IBAN = "DE44672922000012051620"
120 Dim BIC As String: BIC = "GENODE61WIE"
130 Dim RefId As String: RefId = "#001_nreich_____22070701_Test150101"
140 Dim Datum As String: Datum = "06.07.2022"
150 Dim LcCode As Long
160 Dim SeqType As Long
170 Dim CdtrId As String

Dim Result As Long

190 Result = sevSEPA_FileInit(fHandle, _
sKZ, _
sName, _
KtoInh, _
IBAN, _
BIC, _
RefId, _
Datum, _
LcCode, _
SeqType, _
CdtrId)

wenn ich jedoch die Zeile 170 ändere in

170 Dim CdtrId As String: CdtrId = ""

funktioniert es.


Das Gemeine ist das in VB die Variable = "" angezeigt wird, ist es aber tatsächlich nicht.
Ist ja nicht so das ich die Konstruktion so haben muss, nur wissen muss es

Wolfgang Schwarz

Beitrag wurde zuletzt am 07.07.22 um 15:43:34 editiert.

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: ModeratorDieter (Moderator)
Datum: 07.07.22 15:44

Ok... das kann sein;
Bei einer Überweisung brauchst du weder LcCode, noch SeqType, noch CdtrId.

Das sollte also in diesem Fall auch nicht gefüllt sein.

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: Wolfgang Schwarz
Datum: 07.07.22 16:05

Dieter schrieb:

Zitat:

Ok... das kann sein;
Bei einer Überweisung brauchst du weder LcCode, noch SeqType,
noch CdtrId.


Aber OPTIONAL sind die in deinem Wrapper auch nicht !
Also habe diese Variablen zwar angelegt, aber nicht angesprochen.
Nur Übergeben

Zitat:

Das sollte also in diesem Fall auch nicht gefüllt
sein.


Ist ja auch nicht gefüllt.
Bei LcCode, SeqType ist es auch kein Problem weil LONG
Bei CdtrId-STRING muss diese aber noch mit "" versorgt werden.
(da alte Problem der dynnamischen VB-Strings VB beim Call auf andere Sprachen)

mit dem Sachverhalt kann ich leben
aber bei sevDTA30 und älter hat es genau so funktioniert (ohne ="")

Wolfgang Schwarz

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: Wolfgang Schwarz
Datum: 08.07.22 09:54

Nachtrag:

Das Initialisierungs-Problem gilt natürlich auch bei sevSEPA_FileAddRec/DTA_FileAddRec für die String-Variablen 'MndtId' und 'MndtDt', bzw. für alle String-Variablen welche in der Doku mit 'nur für Lastschrifteinzug' gekennzeichnet sind. Wenn man in den Function-Aufruf als Parameter gleich "" angibt geht es natürlich auch.

Das Verhalten mit den nicht initialisieren Variaben ist erst seit sevDTA40 so.

Ich verwende übrigens grundsätzlich OPTION EXPLICIT in meinem Code und achte darauf 'Typgenaue' Variablen-Übergaben zur verwenden und nichts der automatischen VB-Konvertierung zu überlassen.
OPTION STRICT gibt es ja leider nicht in VB6

Wolfgang Schwarz

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: medical
Datum: 16.09.22 11:40

Hallo.
Habe die aktuelle Version sevDTA40 pro (4.0.0.8) gekauft und das gleiche Probkem.

Beim Aufruf von sevSEPA_FileInit stürzt die IDE (vb6) kommentarlos ab.
Und das auch im mitgelieferten Demo-Projekt!

Gibt es hier eine Lösung?

LG
Axel
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: ModeratorDieter (Moderator)
Datum: 16.09.22 11:42

Welche Paramater übergibst du?

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: medical
Datum: 16.09.22 12:04

Hi.
Die Parameter, die das mitgeliefertes Demo-Projekt vorschlägt und bei "Ausführungstermin" das heutige Datum.
Dann die Option "SEPA Überweisung" und vorher leere ich das Feld "Gläubiger Ident.Nr.:".
Dann Klick auf "Datei erstellen" und die IDE verabschiedet sich.
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: medical
Datum: 16.09.22 12:05

Das Problem ist offenbar der Parameter "Gläubiger Ident.Nr.:"
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: ModeratorDieter (Moderator)
Datum: 16.09.22 12:11

Ja, korrekt. Bitte momentan einfach eine Leerzeichen übergeben oder besser die Funktion wie folgt anpassen:

Public Function sevSEPA_FileInit(...) As Long
  Dim Result As Long
 
  ' Absturz verhindern
  If Len(CdtrId) = 0 Then CdtrId = " "
 
  Result = DTA_FileInit(...)
  sevSEPA_FileInit = Result
End Function

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: medical
Datum: 16.09.22 12:16

Nun stürzt die IDE nicht mehr ab, und die Bestätigungsmeldung erscheint normal, aber es wird nur die HTML-Datei erstellt (der Begleitzettel) nicht aber die XML-Datei.
Idee?
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: ModeratorDieter (Moderator)
Datum: 16.09.22 12:21

Sorry, aber das kann ich jetzt nicht nachvollziehen.
Würde die Datei denn erstellt werden, wenn die Gläubiger-ID aus dem Demo übergeben wird?

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: medical
Datum: 16.09.22 12:26

Nö.
Das Demo-Projekt meldet nach "Datei erstellen", dass die Datei "C:\Program Files (x86)\sevDTA40\VB6\SEPA-UEB.XML" erfolgreich erstellt wurde....aber unter dem Pfad ist keine XML-Datei zu finden.
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: ModeratorDieter (Moderator)
Datum: 16.09.22 12:27

Dann prüf mal, ob nicht ein Virenscanner oder ähnliches die Datei blockt bzw. sofort entfernt.

_________________________
Professionelle Entwicklerkomponenten
www.tools4vb.de

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: medical
Datum: 16.09.22 13:14

Antvirus war nicht das Problem, sondern die Erweiterung der Watchguard-Firewall.
Das Watchguard-feature "Threat Detection and Response" (TDR) war das Problem. TDR verhindert die Erstellung, zeigt dies aber nicht in seinen Logs an...offenbar ein Bug im Watchguard TDR.
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: medical
Datum: 16.09.22 14:13

Auch in der Funktion sevSEPA_FileAddRec gibt es Probleme, wenn nicht wenigstens ein Leerzeichen für leere Parameter übergeben wird - auch dann stürzt die IDE kommentarlos sb.

Wenn diese Änderungen einbaue, klappt wieder alles wie es soll.

Public Function sevSEPA_FileAddRec(ByVal fHandle As Long, ByVal PmtId As String, ByVal PmtAmt As String, ByVal sName As String, ByVal IBAN As String, ByVal BIC As String, ByVal RmtInf As String, ByVal MndtId As String, ByVal MndtDt As String, Optional ByVal SeqType As Long = -1) As Long
Dim Result As Long

'Absturz der IDE verhindern
If Len(PmtId) = 0 Then PmtId = " "
If Len(PmtAmt) = 0 Then PmtAmt = "0"
If Len(sName) = 0 Then sName = " "
If Len(RmtInf) = 0 Then RmtInf = " "
If Len(MndtId) = 0 Then MndtId = " "
If Len(MndtDt) = 0 Then MndtDt = " "

If SeqType >= 0 Then
Result = DTA_FileAddRec_1(PmtId, PmtAmt, sName, IBAN, BIC, RmtInf, MndtId, MndtDt, SeqType)
Else
Result = DTA_FileAddRec(PmtId, PmtAmt, sName, IBAN, BIC, RmtInf, MndtId, MndtDt)
End If

sevSEPA_FileAddRec = Result
End Function
Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Re: sevDTA40 stürzt kommentarlos ab ! 
Autor: Wolfgang Schwarz
Datum: 16.09.22 15:12

medical schrieb:
Zitat:

Auch in der Funktion sevSEPA_FileAddRec gibt es Probleme,
wenn nicht wenigstens ein Leerzeichen für leere Parameter
übergeben wird - auch dann stürzt die IDE kommentarlos sb.


Muss nicht ein Leerzeichen sein !
Ein "" reicht auch.

siehe meine Postings vom
- 07.07.22 15:41 (Hinweis auf meine Zeile 170)
- 08.07.22 09:54

Wolfgang Schwarz

Themenbaum einblendenGesamtübersicht  |  Zum Thema  |  Suchen

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2022 [email protected] Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel