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

neu

Browse Source
This commit is contained in:
Andreas Luxbauer
2020-06-23 08:29:29 +02:00
parent 9b52ab1b61
commit 5a5a4c94c1
32 changed files with 876 additions and 346 deletions
Download Patch File Download Diff File Expand all files Collapse all files

35
VERAG_PROG_ALLGEMEIN/Classes/cUIDPruefung.vb
View File

@@ -15,11 +15,22 @@ Public Class cUIDPruefung
Property uid_MaId As Object = Nothing
Property uid_Sachbearbeiter As String
Property uid_firma As Object = Nothing
Property uid_strasse As Object = Nothing
Property uid_plz As Object = Nothing
Property uid_ort As Object = Nothing
Property uid_stufe As Integer = 1
Property Firma As String = VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA
Property uid_abfrageUid As Object = Nothing
Property uid_sessionId As Object = Nothing
Property uid_adr1 As Object = Nothing
Property uid_adr2 As Object = Nothing
Property uid_adr3 As Object = Nothing
Property uid_adr4 As Object = Nothing
Property uid_adr5 As Object = Nothing
Property uid_adr6 As Object = Nothing
Shared SQL As New SQL
@@ -42,10 +53,19 @@ Public Class cUIDPruefung
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_MaId", uid_MaId))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_Sachbearbeiter", uid_Sachbearbeiter))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_firma", uid_firma))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_strasse", uid_strasse))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_plz", uid_plz))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_ort", uid_ort))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_stufe", uid_stufe))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("Firma", Firma))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_abfrageUid", uid_abfrageUid))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_sessionId", uid_sessionId))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_adr1", uid_adr1))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_adr2", uid_adr2))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_adr3", uid_adr3))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_adr4", uid_adr4))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_adr5", uid_adr5))
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("uid_adr6", uid_adr6))
Return list
End Function
@@ -219,6 +239,9 @@ Public Class cUIDPruefung
UID_TMP.uid_UstIdKz = AD.UstIdKz
UID_TMP.uid_UstIdNr = AD.UstIdNr
UID_TMP.uid_stufe = 1
UID_TMP.uid_abfrageUid = requesterCountryCode & requesterVatNumber
' UID.uid_firma =
' UID.uid_strasse))
'UID.uid_plz))