Therefore
This commit is contained in:
@@ -368,6 +368,7 @@ Public Class frmHauptfenster
|
||||
AdministrationToolStripMenuItem.Visible = True
|
||||
lblMitarbeiter.Text += " (Admin)"
|
||||
Button3.Visible = True
|
||||
Button1.Visible = True
|
||||
|
||||
End If
|
||||
If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("eAVISO", "AVISO") Then
|
||||
@@ -4318,11 +4319,153 @@ Public Class frmHauptfenster
|
||||
|
||||
Private Sub Button11_Click_1(sender As Object, e As EventArgs) Handles Button11.Click
|
||||
|
||||
Exit Sub
|
||||
|
||||
setProfileImage()
|
||||
|
||||
cHMRC.VATTEST(InputBox("Token"))
|
||||
End Sub
|
||||
Sub saveLukowaPDFsFromTherefore()
|
||||
' Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
' Dim dt As DataTable = SQL.loadDgvBySql("", "EZOLL")
|
||||
Dim slist As New List(Of String)
|
||||
slist.Add("530324001596")
|
||||
slist.Add("530324001604")
|
||||
slist.Add("530324001658")
|
||||
slist.Add("530324001685")
|
||||
slist.Add("530324001707")
|
||||
slist.Add("530324001721")
|
||||
slist.Add("530324001756")
|
||||
slist.Add("530324001720")
|
||||
slist.Add("530324001755")
|
||||
slist.Add("530324001863")
|
||||
slist.Add("530324001853")
|
||||
slist.Add("530324001941")
|
||||
slist.Add("530324001695")
|
||||
slist.Add("530324002015")
|
||||
slist.Add("530324002021")
|
||||
slist.Add("530324002034")
|
||||
slist.Add("530324002042")
|
||||
slist.Add("530324002083")
|
||||
slist.Add("530324002089")
|
||||
slist.Add("530324002090")
|
||||
slist.Add("530324002094")
|
||||
slist.Add("530324002097")
|
||||
slist.Add("530324002107")
|
||||
slist.Add("530324002108")
|
||||
slist.Add("530324002117")
|
||||
slist.Add("530324002115")
|
||||
slist.Add("530324002114")
|
||||
slist.Add("530324002116")
|
||||
slist.Add("530324002189")
|
||||
slist.Add("530324002217")
|
||||
slist.Add("530324002230")
|
||||
slist.Add("530324002274")
|
||||
slist.Add("530324002276")
|
||||
slist.Add("530324002288")
|
||||
slist.Add("530324002290")
|
||||
slist.Add("530324002291")
|
||||
slist.Add("530324002349")
|
||||
slist.Add("530324002386")
|
||||
slist.Add("530324002387")
|
||||
slist.Add("530324002390")
|
||||
slist.Add("530324002380")
|
||||
slist.Add("530324002383")
|
||||
slist.Add("530324002412")
|
||||
slist.Add("530324002451")
|
||||
slist.Add("530324002450")
|
||||
slist.Add("530324002453")
|
||||
slist.Add("530324002459")
|
||||
slist.Add("530324002460")
|
||||
slist.Add("530324002474")
|
||||
slist.Add("530324002498")
|
||||
slist.Add("530324002499")
|
||||
slist.Add("530324002487")
|
||||
slist.Add("530324002507")
|
||||
slist.Add("530324002554")
|
||||
slist.Add("530324002560")
|
||||
slist.Add("530324002544")
|
||||
slist.Add("530324002548")
|
||||
slist.Add("530324002551")
|
||||
slist.Add("530324002581")
|
||||
slist.Add("530324002616")
|
||||
slist.Add("530324002619")
|
||||
slist.Add("530324002610")
|
||||
slist.Add("530324002634")
|
||||
slist.Add("530324002636")
|
||||
slist.Add("530324002675")
|
||||
slist.Add("530324002681")
|
||||
slist.Add("530324002682")
|
||||
slist.Add("530324002688")
|
||||
slist.Add("530324002689")
|
||||
slist.Add("530324002665")
|
||||
slist.Add("530324002659")
|
||||
slist.Add("530324002723")
|
||||
slist.Add("530324002796")
|
||||
slist.Add("530324002798")
|
||||
slist.Add("530324002783")
|
||||
slist.Add("530324002890")
|
||||
slist.Add("530324002905")
|
||||
slist.Add("530324002913")
|
||||
slist.Add("530324002918")
|
||||
slist.Add("530324002926")
|
||||
slist.Add("530324002956")
|
||||
slist.Add("530324002959")
|
||||
slist.Add("530324002961")
|
||||
slist.Add("530324002962")
|
||||
slist.Add("530324002972")
|
||||
slist.Add("530324002963")
|
||||
slist.Add("530324003079")
|
||||
slist.Add("530324003111")
|
||||
slist.Add("530324003140")
|
||||
slist.Add("530324003142")
|
||||
slist.Add("530324003161")
|
||||
slist.Add("530324003164")
|
||||
slist.Add("530324003230")
|
||||
slist.Add("530324003294")
|
||||
slist.Add("530324003295")
|
||||
slist.Add("530324003312")
|
||||
slist.Add("530324003380")
|
||||
slist.Add("530324003430")
|
||||
slist.Add("530324003395")
|
||||
slist.Add("530324003514")
|
||||
slist.Add("530324003454")
|
||||
slist.Add("530324003499")
|
||||
slist.Add("530324003501")
|
||||
slist.Add("530324003504")
|
||||
slist.Add("530324003500")
|
||||
slist.Add("530324003606")
|
||||
slist.Add("530324003616")
|
||||
slist.Add("530324003674")
|
||||
slist.Add("530324003682")
|
||||
slist.Add("530324003780")
|
||||
slist.Add("530324003653")
|
||||
slist.Add("530324003985")
|
||||
slist.Add("530324004016")
|
||||
slist.Add("530324004157")
|
||||
slist.Add("530324004254")
|
||||
slist.Add("530324004367")
|
||||
slist.Add("530324004386")
|
||||
slist.Add("530324004387")
|
||||
slist.Add("530324004747")
|
||||
slist.Add("530324004756")
|
||||
slist.Add("530324004757")
|
||||
slist.Add("530324004836")
|
||||
slist.Add("530324004918")
|
||||
slist.Add("530324004916")
|
||||
slist.Add("530324005000")
|
||||
slist.Add("530324005049")
|
||||
slist.Add("530324005132")
|
||||
|
||||
|
||||
|
||||
For Each s In slist
|
||||
VERAG_PROG_ALLGEMEIN.cTherefore.getFileFromFolderCat("C:\Users\DEVELOPER1\Desktop\LUKOWA\", s, "", "Import ab Jänner 2024", "Import ab Jänner 2024")
|
||||
Next
|
||||
|
||||
|
||||
End Sub
|
||||
Private Sub GVMSUKIMportToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles GVMSUKIMportToolStripMenuItem.Click
|
||||
Process.Start("https://www.tax.service.gov.uk/goods-movement-system/dashboard")
|
||||
End Sub
|
||||
@@ -4739,7 +4882,10 @@ Public Class frmHauptfenster
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
|
||||
saveLukowaPDFsFromTherefore()
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
Public Class AvisoStatusFunctions
|
||||
|
||||
Reference in New Issue
Block a user