diff --git a/Aviso/Anhänge/frmSendungAnhangImport.vb b/Aviso/Anhänge/frmSendungAnhangImport.vb index 8b3f1f3..a26876c 100644 --- a/Aviso/Anhänge/frmSendungAnhangImport.vb +++ b/Aviso/Anhänge/frmSendungAnhangImport.vb @@ -149,7 +149,7 @@ Public Class frmSendungAnhangImport Button5.Visible = PdfViewer.Visible Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -282,7 +282,7 @@ Public Class frmSendungAnhangImport End If Next Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Return False End Function @@ -301,7 +301,7 @@ Public Class frmSendungAnhangImport End If Next Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Return False End Function @@ -529,7 +529,7 @@ Public Class frmSendungAnhangImport 'GC.Collect() Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) Return False End Try Return True @@ -629,7 +629,7 @@ Public Class frmSendungAnhangImport 'GC.Collect() Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) Return False End Try Return True @@ -662,7 +662,7 @@ Public Class frmSendungAnhangImport Reader.Close() Return True Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Return False End Function @@ -734,7 +734,7 @@ Public Class frmSendungAnhangImport ' 'Reader.Close() ' Return True ' Catch ex As Exception - ' MsgBox(ex.Message & ex.StackTrace) + ' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name ) ' End Try ' Return False 'End Function @@ -878,7 +878,7 @@ Public Class frmSendungAnhangImport ' Return True ' Catch ex As Exception - ' MsgBox(ex.Message & ex.StackTrace) + ' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name ) ' End Try ' Return False 'End Function @@ -931,7 +931,7 @@ Public Class frmSendungAnhangImport Return True Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Return False End Function @@ -1028,7 +1028,7 @@ Public Class frmSendungAnhangImport Next End Sub - Function deleteElement(FILE_DOCID, FILE_ANHID, Optional showMessage = True) As Boolean + Shared Function deleteElement(FILE_DOCID, FILE_ANHID, Optional showMessage = True) As Boolean If Not showMessage OrElse vbYes = MsgBox("Möchten Sie das Element löschen?", vbYesNoCancel) Then Dim DS As New VERAG_PROG_ALLGEMEIN.cDATENSERVER(FILE_DOCID) If DS.DELETE_COMPLETE AndAlso VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.DELETE(FILE_ANHID) Then @@ -1076,7 +1076,20 @@ Public Class frmSendungAnhangImport cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ATA-Nr", "ATA")) cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("UID-Prüfung", "UID")) cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("EORI-Prüfung", "EORI")) + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Lieferschein", "Lieferschein")) + If VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE = 7001 Then + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("GB - C88", "C88")) + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("GB - E2", "E2")) + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("GB - Atanak Rechnung", "Atanak_RG")) + End If + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Sonstiges", "Sonstiges")) + + + + + + cboArt._TRANSLATE() initSendungen() @@ -1271,7 +1284,7 @@ Public Class frmSendungAnhangImport End If Catch ex As Exception - MsgBox("FEHLER Scan: " & ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler Scan") End Try End Sub @@ -1334,6 +1347,38 @@ Public Class frmSendungAnhangImport End If End Sub + Public Shared Function addData_SendungAnhangFD(AvisoId) As Boolean + Dim fd As New OpenFileDialog + fd.Multiselect = True + + If fd.ShowDialog = vbOK Then + For Each F_listItem In fd.FileNames + + Dim fi As New FileInfo(F_listItem) + Dim filename = fi.Name + If filename = "" Then + MsgBox("Dateiname konnte nicht ermittelt werden." & vbNewLine & F_listItem) + Else + + ' Dim TMP_Path = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath(filename, fi.Extension,, False, "SendungsAnhaenge") + ' MsgBox(TMP_Path) + ' File.Copy(F_listItem, TMP_Path) + Dim da_id = -1 + Dim anhId = -1 + Dim destPath = "" + + Dim Typ = "" + If getFileTypeValid(fi.Extension.Replace(".", ""), Typ) Then + saveToDS(AvisoId, filename, F_listItem, "", Typ, da_id, anhId, destPath) + + End If + End If + Next + Return True + End If + Return False + End Function + Public Function addData_SendungAnhang(Path, Optional addFlpnl = True) As Integer @@ -1346,9 +1391,9 @@ Public Class frmSendungAnhangImport Dim Typ = "" If getFileTypeValid(fi.Extension.Replace(".", ""), Typ) Then If saveToDS(AvisoId, fi.Name, Path, "", Typ, da_id, anhId, destPath) Then - If addFlpnl Then addUsrcnlToPnl(destPath, da_id, anhId, filename, Typ) - End If + If addFlpnl Then addUsrcnlToPnl(destPath, da_id, anhId, filename, Typ) End If + End If Return anhId End Function @@ -1378,6 +1423,34 @@ Public Class frmSendungAnhangImport Return True End Function + Public Shared Function quickScan(AvisoId, Optional SendungsId = Nothing) As Boolean + Try + 'If KdNr < 0 Then Exit Sub + Dim frmScan As New VERAG_PROG_ALLGEMEIN.frmScan("QuickScan") + frmScan.DefaultFileName = "Scan" ' Me._TEXT_PDF + + If frmScan.ShowDialog() = DialogResult.OK Then + If frmScan.ReturnValue IsNot Nothing Then + Dim Filename = frmScan.fileName + Dim TMP_Path = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath(Filename, ".pdf",, False, "SendungsAnhaenge") + File.WriteAllBytes(TMP_Path, frmScan.ReturnValue) + + Dim da_id = -1 + Dim anhId = -1 + Dim destPath = "" + If frmSendungAnhangImport.saveToDS(AvisoId, Filename, TMP_Path, "", "PDF", da_id, anhId, destPath, SendungsId) Then + Return True + End If + 'addUsrcnlToPnl(TMP_Path) + End If + End If + + Catch ex As Exception + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler QuickScan") + End Try + Return False + End Function + Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) BrowserLoaded = True End Sub @@ -1477,7 +1550,7 @@ Public Class frmSendungAnhangImport Catch ex As ArgumentOutOfRangeException 'out of range Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -1745,7 +1818,7 @@ Public Class frmSendungAnhangImport ' initSendungen() initFlpANH_LIST() Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -1826,7 +1899,7 @@ Public Class frmSendungAnhangImport End If Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -1836,19 +1909,19 @@ Public Class frmSendungAnhangImport ' We have a embedded file. First lets try to get the file name out of memory Dim theStream As IO.Stream = CType(e.Data.GetData("FileGroupDescriptor"), IO.Stream) - Dim fileGroupDescriptor(512) As Byte - theStream.Read(fileGroupDescriptor, 0, 512) - Dim fileName As System.Text.StringBuilder = New System.Text.StringBuilder("") - Dim i As Integer = 76 + Dim fileGroupDescriptor(512) As Byte + theStream.Read(fileGroupDescriptor, 0, 512) + Dim fileName As System.Text.StringBuilder = New System.Text.StringBuilder("") + Dim i As Integer = 76 - While Not (fileGroupDescriptor(i) = 0) - fileName.Append(Convert.ToChar(fileGroupDescriptor(i))) - System.Math.Min(System.Threading.Interlocked.Increment(i), i - 1) - End While + While Not (fileGroupDescriptor(i) = 0) + fileName.Append(Convert.ToChar(fileGroupDescriptor(i))) + System.Math.Min(System.Threading.Interlocked.Increment(i), i - 1) + End While - theStream.Close() - ' We should have the file name or if its an email, the subject line. Create our temp file based on the temp path and this info - Dim myTempFile As String = IO.Path.GetTempPath & fileName.ToString + theStream.Close() + ' We should have the file name or if its an email, the subject line. Create our temp file based on the temp path and this info + Dim myTempFile As String = IO.Path.GetTempPath & fileName.ToString ' Look to see if this is a email message. If so save that temporarily and get the temp file. If InStr(myTempFile, ".msg") > 0 Then Dim objOL As New Microsoft.Office.Interop.Outlook.Application @@ -1884,7 +1957,7 @@ Public Class frmSendungAnhangImport End If Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) EmAilAttach = String.Empty End Try diff --git a/Aviso/Anhänge/frmSendungAnhangUmbenennenUmkateg.vb b/Aviso/Anhänge/frmSendungAnhangUmbenennenUmkateg.vb index 0f17306..f080688 100644 --- a/Aviso/Anhänge/frmSendungAnhangUmbenennenUmkateg.vb +++ b/Aviso/Anhänge/frmSendungAnhangUmbenennenUmkateg.vb @@ -30,6 +30,12 @@ cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ATA-Nr", "ATA")) cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("UID-Prüfung", "UID")) cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("EORI-Prüfung", "EORI")) + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Lieferschein", "Lieferschein")) + If VERAG_PROG_ALLGEMEIN.cAllgemein.STAMMFILIALE = 7001 Then + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("GB - C88", "C88")) + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("GB - E2", "E2")) + cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("GB - Atanak Rechnung", "Atanak_RG")) + End If cboArt.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("Sonstiges", "Sonstiges")) txtBezeichnung.Text = nameOLD cboArt.changeItem(artOLD) diff --git a/Aviso/ApplicationEvents.vb b/Aviso/ApplicationEvents.vb new file mode 100644 index 0000000..bc254e2 --- /dev/null +++ b/Aviso/ApplicationEvents.vb @@ -0,0 +1,10 @@ +Namespace My + ' Für MyApplication sind folgende Ereignisse verfügbar: + ' Startup: Wird beim Starten der Anwendung noch vor dem Erstellen des Startformulars ausgelöst. + ' Shutdown: Wird nach dem Schließen aller Anwendungsformulare ausgelöst. Dieses Ereignis wird nicht ausgelöst, wenn die Anwendung mit einem Fehler beendet wird. + ' UnhandledException: Wird bei einem Ausnahmefehler ausgelöst. + ' StartupNextInstance: Wird beim Starten einer Einzelinstanzanwendung ausgelöst, wenn die Anwendung bereits aktiv ist. + ' NetworkAvailabilityChanged: Wird beim Herstellen oder Trennen der Netzwerkverbindung ausgelöst. + Partial Friend Class MyApplication + End Class +End Namespace diff --git a/Aviso/Aviso.vbproj b/Aviso/Aviso.vbproj index c68e9eb..4d78dba 100644 --- a/Aviso/Aviso.vbproj +++ b/Aviso/Aviso.vbproj @@ -310,6 +310,7 @@ UserControl + frmStatFrima.vb @@ -481,10 +482,10 @@ Form - - frmDokumenteSchicken.vb + + frmFreigabeSetzen.vb - + Form @@ -523,6 +524,12 @@ Form + + frmLaufzettel.vb + + + Form + frmLKWTicketInfo.vb @@ -833,6 +840,13 @@ UserControl + + + rptWLANTicket.vb + + + Component + @@ -926,8 +940,8 @@ frmAviso_Vorpapiere.vb - - frmDokumenteSchicken.vb + + frmFreigabeSetzen.vb frmGelangensbestaetigung.vb @@ -947,6 +961,9 @@ frmInsertVermerkFachIMEX.vb + + frmLaufzettel.vb + frmLKWTicketInfo.vb @@ -1102,6 +1119,9 @@ usrCntlVermerkeATilla.vb + + rptWLANTicket.vb + @@ -1248,6 +1268,9 @@ + + Always + Always diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb index f148f1e..e76e5a2 100644 --- a/Aviso/My Project/AssemblyInfo.vb +++ b/Aviso/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/Aviso/My Project/Resources.Designer.vb b/Aviso/My Project/Resources.Designer.vb index 207024d..d7235d2 100644 --- a/Aviso/My Project/Resources.Designer.vb +++ b/Aviso/My Project/Resources.Designer.vb @@ -14,7 +14,7 @@ Option Explicit On Imports System Namespace My.Resources - + 'Diese Klasse wurde von der StronglyTypedResourceBuilder automatisch generiert '-Klasse über ein Tool wie ResGen oder Visual Studio automatisch generiert. 'Um einen Member hinzuzufügen oder zu entfernen, bearbeiten Sie die .ResX-Datei und führen dann ResGen @@ -22,20 +22,20 @@ Namespace My.Resources ''' ''' Eine stark typisierte Ressourcenklasse zum Suchen von lokalisierten Zeichenfolgen usw. ''' - + _ Friend Module Resources - + Private resourceMan As Global.System.Resources.ResourceManager - + Private resourceCulture As Global.System.Globalization.CultureInfo - + ''' ''' Gibt die zwischengespeicherte ResourceManager-Instanz zurück, die von dieser Klasse verwendet wird. ''' - + _ Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager Get If Object.ReferenceEquals(resourceMan, Nothing) Then @@ -45,91 +45,91 @@ Namespace My.Resources Return resourceMan End Get End Property - + ''' ''' Überschreibt die CurrentUICulture-Eigenschaft des aktuellen Threads für alle ''' Ressourcenzuordnungen, die diese stark typisierte Ressourcenklasse verwenden. ''' - + _ Friend Property Culture() As Global.System.Globalization.CultureInfo Get Return resourceCulture End Get Set - resourceCulture = Value + resourceCulture = value End Set End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property _3s() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("_3s", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property _SUB() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("_SUB", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property abgeklaertAktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("abgeklaertAktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property abgeklaertInaktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("abgeklaertInaktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property abklaerungTR_Aktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("abklaerungTR_Aktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property abklaerungTR_Inaktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("abklaerungTR_Inaktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property add_person() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("add_person", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Zeichenfolge, die aviso2015 ähnelt. ''' @@ -138,1306 +138,1297 @@ Namespace My.Resources Return ResourceManager.GetString("ADMIN_pwd", resourceCulture) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property akt_ATILLA() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("akt_ATILLA", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property AMB() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("AMB", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property ambar_simple() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("ambar_simple", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property android_add_contact() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("android-add-contact", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property android_clock() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("android_clock", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property android_clock_s() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("android_clock_s", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property android_note() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("android_note", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property arrow_down_orange() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("arrow_down_orange", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property arrow_left_a() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("arrow_left_a", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property arrow_right_a() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("arrow_right_a", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Byte[]. ''' Friend ReadOnly Property ATANAK_Instructions_Export() As Byte() Get Dim obj As Object = ResourceManager.GetObject("ATANAK_Instructions_Export", resourceCulture) - Return CType(obj, Byte()) + Return CType(obj,Byte()) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Byte[]. ''' Friend ReadOnly Property ATANAK_Instructions_Export_T1() As Byte() Get Dim obj As Object = ResourceManager.GetObject("ATANAK_Instructions_Export_T1", resourceCulture) - Return CType(obj, Byte()) + Return CType(obj,Byte()) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Byte[]. ''' Friend ReadOnly Property ATANAK_Instructions_Import() As Byte() Get Dim obj As Object = ResourceManager.GetObject("ATANAK_Instructions_Import", resourceCulture) - Return CType(obj, Byte()) + Return CType(obj,Byte()) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property Atilla() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("Atilla", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property auftrag() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("auftrag", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property auftrag3() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("auftrag3", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Icon ähnlich wie (Symbol). ''' Friend ReadOnly Property Aviso() As System.Drawing.Icon Get Dim obj As Object = ResourceManager.GetObject("Aviso", resourceCulture) - Return CType(obj, System.Drawing.Icon) + Return CType(obj,System.Drawing.Icon) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property aviso_messenger() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("aviso_messenger", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Icon ähnlich wie (Symbol). ''' Friend ReadOnly Property avisoNewMsg() As System.Drawing.Icon Get Dim obj As Object = ResourceManager.GetObject("avisoNewMsg", resourceCulture) - Return CType(obj, System.Drawing.Icon) + Return CType(obj,System.Drawing.Icon) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property beleg() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("beleg", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property beleg1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("beleg1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property belegEUR() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("belegEUR", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property belegEUR1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("belegEUR1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property bundesanzeiger() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("bundesanzeiger", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property cartable_ouvert() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("cartable_ouvert", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property changeKd() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("changeKd", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property dakosy() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("dakosy", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property dakosy_dy() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("dakosy_dy", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property del() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("del", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property del_gray() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("del_gray", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property del1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("del1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property del2() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("del2", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property digitalerAkt() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("digitalerAkt", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property digitalerAkt_small() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("digitalerAkt_small", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property disconnect() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("disconnect", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property docAllgemein() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("docAllgemein", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property documents() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("documents", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property els() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("els", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property email() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("email", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property email_big1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("email_big1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property evolog() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("evolog", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property Excel_2013_logo_155x110() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("Excel_2013_logo_155x110", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property fakturiertAktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("fakturiertAktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property fakturiertInaktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("fakturiertInaktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property fragezeichen() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("fragezeichen", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property fragezeichen1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("fragezeichen1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property fremdSped() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("fremdSped", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property FrontOfficeSUB() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("FrontOfficeSUB", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property FrontOfficeSUB_Horizontal() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("FrontOfficeSUB_Horizontal", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property gear2() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("gear2", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property handy() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("handy", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property handy1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("handy1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property hp_versuchskaninchen() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("hp_versuchskaninchen", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property igl() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("igl", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property image_443x282() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("image_443x282", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property ImageIcon() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("ImageIcon", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property IMEX() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("IMEX", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property IMEX_LOGO_simple() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("IMEX_LOGO_simple", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property info() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("info", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property isd() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("isd", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property kasse() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("kasse", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property kasse_sw() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("kasse_sw", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property kasse_sw_small() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("kasse_sw_small", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property kasse1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("kasse1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property kita() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("kita", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property LateAviso_s() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("LateAviso_s", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property LEX() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("LEX", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property lorry() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("lorry", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property mitarbeiter() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("mitarbeiter", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property mitarbeiter_s() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("mitarbeiter_s", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Byte[]. ''' Friend ReadOnly Property MUSTER() As Byte() Get Dim obj As Object = ResourceManager.GetObject("MUSTER", resourceCulture) - Return CType(obj, Byte()) + Return CType(obj,Byte()) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property NDK() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("NDK", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property nellenquack() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("nellenquack", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property NKD() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("NKD", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property noAviso_s() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("noAviso_s", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property noAviso_s1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("noAviso_s1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property ok() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("ok", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property parkplatz() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("parkplatz", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property passport() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("passport", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property pdf() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("pdf", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property pdf1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("pdf1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property pdf11() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("pdf11", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property pdfprint() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("pdfprint", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property pdfprint1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("pdfprint1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property person() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("person", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property person_add() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("person_add", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property personCheck() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("personCheck", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property personCheck_blue() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("personCheck_blue", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property personCheck_blue_small() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("personCheck_blue_small", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property personCheck_gray_small() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("personCheck_gray_small", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property personCheck_small() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("personCheck_small", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property personInaktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("personInaktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property plus() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("plus", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property plus1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("plus1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property printer() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("printer", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property QS() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("QS", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property refresh() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("refresh", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property rhenus() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("rhenus", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property sanduhr() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("sanduhr", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property SBG() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("SBG", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property scanner() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("scanner", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - - ''' - ''' Sucht eine lokalisierte Zeichenfolge, die ähnelt. - ''' - Friend ReadOnly Property sdfsdf3dddddffffvbvcv() As String - Get - Return ResourceManager.GetString("sdfsdf3dddddffffvbvcv", resourceCulture) - End Get - End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property search() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("search", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property search1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("search1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property searchGG() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("searchGG", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property soenmez() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("soenmez", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property spedbuch() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("spedbuch", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property spedbuch_small() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("spedbuch_small", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property spedbuch1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("spedbuch1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property speditionsbuchAktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("speditionsbuchAktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property speditionsbuchInaktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("speditionsbuchInaktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property statistik() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("statistik", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property statusBtn_vorbereitet_Aktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("statusBtn_vorbereitet_Aktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property statusBtn_vorbereitet_InAktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("statusBtn_vorbereitet_InAktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property statusBtn_vorgeschrieben_Aktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("statusBtn_vorgeschrieben_Aktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property statusBtn_vorgeschrieben_InAktiv() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("statusBtn_vorgeschrieben_InAktiv", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property stift() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("stift", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property stift1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("stift1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property stift2() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("stift2", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property tan() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("tan", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property tarife() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("tarife", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property Telefonliste() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("Telefonliste", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property Telefonliste_small() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("Telefonliste_small", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property tranparent30Perc() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("tranparent30Perc", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Icon ähnlich wie (Symbol). ''' Friend ReadOnly Property truck_black() As System.Drawing.Icon Get Dim obj As Object = ResourceManager.GetObject("truck_black", resourceCulture) - Return CType(obj, System.Drawing.Icon) + Return CType(obj,System.Drawing.Icon) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property tts() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("tts", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property uid() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("uid", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property unisped_aeo_DE() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("unisped_aeo_DE", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property Unisped_DE_logo() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("Unisped_DE_logo", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property Unisped_logo() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("Unisped_logo", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Zeichenfolge, die 6.0 ähnelt. ''' @@ -1446,66 +1437,66 @@ Namespace My.Resources Return ResourceManager.GetString("UpdaterVersion", resourceCulture) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property urgent() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("urgent", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property Verag_AG_Logopng() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("Verag_AG_Logopng", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property verimex() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("verimex", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property vermerk() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("vermerk", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property vermerkBtn() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("vermerkBtn", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' - ''' Sucht eine lokalisierte Zeichenfolge, die 3.6.2.8 ähnelt. + ''' Sucht eine lokalisierte Zeichenfolge, die 3.6.7.1 ähnelt. ''' Friend ReadOnly Property Version() As String Get Return ResourceManager.GetString("Version", resourceCulture) End Get End Property - + ''' ''' Sucht eine lokalisierte Zeichenfolge, die Version 3.1.5.0 vom 28.11.2017: '''- Anbindng ATILLA-Aviso an VERAG Datenbank @@ -1532,174 +1523,174 @@ Namespace My.Resources Return ResourceManager.GetString("Versionsinfo", resourceCulture) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property vorauszahlung() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("vorauszahlung", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property vorauszahlung1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("vorauszahlung1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property vorauszahlung2() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("vorauszahlung2", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property vorauszahlung3() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("vorauszahlung3", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property WAI() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("WAI", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property warning() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("warning", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property warning2() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("warning2", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property weiterleiten() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("weiterleiten", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property weiterleiten_small1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("weiterleiten_small1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property wheel() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("wheel", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property word() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("word", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property word1() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("word1", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property zeus() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("zeus", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property zoll() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("zoll", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property zoll_m() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("zoll_m", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property zoll_mmm() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("zoll_mmm", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property - + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Drawing.Bitmap. ''' Friend ReadOnly Property zoll_s() As System.Drawing.Bitmap Get Dim obj As Object = ResourceManager.GetObject("zoll_s", resourceCulture) - Return CType(obj, System.Drawing.Bitmap) + Return CType(obj,System.Drawing.Bitmap) End Get End Property End Module diff --git a/Aviso/My Project/Resources.resx b/Aviso/My Project/Resources.resx index 0a26c30..a94b1d6 100644 --- a/Aviso/My Project/Resources.resx +++ b/Aviso/My Project/Resources.resx @@ -536,7 +536,7 @@ ..\Resources\plus.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - 3.6.2.8 + 3.6.7.1 ..\Resources\statusBtn_vorgeschrieben_Aktiv.jpg;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a @@ -604,7 +604,4 @@ ..\Resources\ATANAK_Instructions_Export_T1.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - - \ No newline at end of file diff --git a/Aviso/Resources/WLAN/RunNHide.exe b/Aviso/Resources/WLAN/RunNHide.exe new file mode 100644 index 0000000..e92627b Binary files /dev/null and b/Aviso/Resources/WLAN/RunNHide.exe differ diff --git a/Aviso/WLAN/cWLANTicket.vb b/Aviso/WLAN/cWLANTicket.vb new file mode 100644 index 0000000..fc735b3 --- /dev/null +++ b/Aviso/WLAN/cWLANTicket.vb @@ -0,0 +1,145 @@ + +Imports System.IO + +Class sWLANTicket + + + Public Shared Function printTicket(Optional AVISO As VERAG_PROG_ALLGEMEIN.cAviso = Nothing) As Boolean + Dim usr As String = "" + Dim pwd As String = "" + If genTicket(usr, pwd) Then + + Dim rpt As New rptWLANTicket() + + rpt.TextBox4.Text = Now.ToShortDateString & " " & Now.ToShortTimeString + rpt.TextBox9.Text = Now.AddHours(24).ToShortDateString & " " & Now.AddHours(24).ToShortTimeString + rpt.TextBox1.Text = usr + rpt.TextBox5.Text = pwd + rpt.TextBox11.Text = "FrontOffice_Guest" + + If AVISO IsNot Nothing Then + rpt.TextBox13.Text = AVISO.LKW_Nr + rpt.TextBox15.Text = AVISO.Frächter + End If + + Dim printer = SDL.cProgramFunctions.getDruckernameBySearch("INFO", True) + If printer = "" Then printer = SDL.cProgramFunctions.getDruckernameBySearch("EPSON", True) + If printer <> "" Then + SDL.cProgramFunctions.printRpt(rpt, printer, True) + Else + SDL.cProgramFunctions.showRpt(rpt, "AVISO", False) + End If + + Return True + End If + Return False + End Function + + Public Shared Function genTicket(Optional ByRef user As String = "", Optional ByRef pwd As String = "") As Boolean + 'Dim a, b As String + user = UsernamePasswordGenerator("u") + pwd = UsernamePasswordGenerator("p") + Return AddGastWLANUser(user, pwd) + ' MsgBox(a & vbCrLf & b) + End Function + + Public Shared Function UsernamePasswordGenerator(x As String, Optional ByVal Zeichenanzahl As Integer = 6) As String ' wenn u dann Username, sonst Password + Dim str As String + Dim up As String + If x = "u" Then + str = "ABCDEFGHIJKLMNOPQRSTUVWXYZ" + Else + str = "0123456789" + End If + + Dim r As New Random + For i As Integer = 0 To Zeichenanzahl - 1 + up &= str(r.Next(0, str.Length)).ToString + Next + + Return up + 'MsgBox(up) + + End Function + + Public Shared Function AddGastWLANUser(Username As String, Optional ByVal Password As String = "verag1", Optional ByVal Zugangsdaten As String = "WLANAdmin@192.168.0.97 -pw 6a0D5Ys93uugLi3uVciV", Optional ByVal AblaufZeit As Integer = 2) + Try + If Not File.Exists(Application.StartupPath & "\Resources\WLAN\AddWLANUser.bat") Then File.Create(Application.StartupPath & "\Resources\WLAN\AddWLANUser.bat") + Dim AddWLANUser As String = Application.StartupPath & "\Resources\WLAN\AddWLANUser.bat" + Dim exptime As String = Date.Now.AddHours(AblaufZeit).ToString("yyyy-MM-dd HH:mm") + Dim battext As String = "" + battext = "( + echo configure terminal + echo dynamic-guest username " & Username & " + echo password " & Password & " + echo expire-time " & exptime & " + echo group Fahrer_Gruppe + + echo exit + echo exit + echo exit + ) | plink -ssh " & Zugangsdaten & " + exit" + + WriteToFile(AddWLANUser, battext) + Threading.Thread.Sleep(1500) + + Dim Add As New Process + Add.StartInfo.FileName = Application.StartupPath & "\Resources\WLAN\RunNHide.exe" + Add.StartInfo.Arguments = AddWLANUser + Add.Start() + Return True + Catch ex As Exception + MsgBox(ex.Message & ex.StackTrace) + Return False + End Try + End Function + + + Public Shared Function DeleteGastWLANUser(Username As String, Optional ByVal Zugangsdaten As String = "WLANAdmin@192.168.0.97 -pw 6a0D5Ys93uugLi3uVciV") + Try + + If Not File.Exists(Application.StartupPath & "\Resources\WLAN\DELWLANUser.bat") Then File.Create(Application.StartupPath & "\Resources\WLAN\DELWLANUser.bat") + Dim DELWLANUser As String = Application.StartupPath & "\Resources\WLAN\DELWLANUser.bat" + Dim battext As String = "" + battext = "( + echo configure terminal + + echo no dynamic-guest " & Username & " + + + echo exit + echo exit + echo exit + ) | plink -ssh " & Zugangsdaten & " + exit" + + WriteToFile(DELWLANUser, battext) + Threading.Thread.Sleep(1500) + + Dim del As New Process + del.StartInfo.FileName = Application.StartupPath & "\Resources\WLAN\RunNHide.exe" + del.StartInfo.Arguments = DELWLANUser + del.Start() + + 'Process.Start(Application.StartupPath & "\RunNHide.exe " & DELWLANUser) + Return True + Catch ex As Exception + MsgBox(ex.Message & ex.StackTrace) + Return False + End Try + End Function + + Public Shared Function WriteToFile(filepath As String, texttowrite As String) + Try + Dim objWriter As New System.IO.StreamWriter(filepath) + objWriter.Write(texttowrite) + objWriter.Close() + Return True + Catch ex As Exception + MsgBox(filepath & vbCrLf & " konnte nicht geschrieben werden." & vbCrLf & ex.Message) + Return False + End Try + End Function + +End Class \ No newline at end of file diff --git a/Aviso/WLAN/rptWLANTicket.Designer.vb b/Aviso/WLAN/rptWLANTicket.Designer.vb new file mode 100644 index 0000000..f472ce6 --- /dev/null +++ b/Aviso/WLAN/rptWLANTicket.Designer.vb @@ -0,0 +1,343 @@ + +Partial Public Class rptWLANTicket + Inherits GrapeCity.ActiveReports.SectionReport + + 'Form overrides dispose to clean up the component list. + Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean) + If disposing Then + End If + MyBase.Dispose(disposing) + End Sub + + 'NOTE: The following procedure is required by the ActiveReports Designer + 'It can be modified using the ActiveReports Designer. + 'Do not modify it using the code editor. + Private WithEvents PageHeader As GrapeCity.ActiveReports.SectionReportModel.PageHeader + Private WithEvents Detail As GrapeCity.ActiveReports.SectionReportModel.Detail + Private WithEvents PageFooter As GrapeCity.ActiveReports.SectionReportModel.PageFooter + + Private Sub InitializeComponent() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(rptWLANTicket)) + Me.PageHeader = New GrapeCity.ActiveReports.SectionReportModel.PageHeader() + Me.Picture1 = New GrapeCity.ActiveReports.SectionReportModel.Picture() + Me.Detail = New GrapeCity.ActiveReports.SectionReportModel.Detail() + Me.TextBox3 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.PageFooter = New GrapeCity.ActiveReports.SectionReportModel.PageFooter() + Me.ReportHeader1 = New GrapeCity.ActiveReports.SectionReportModel.ReportHeader() + Me.TextBox2 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox6 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox1 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox4 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox5 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox7 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.ReportFooter1 = New GrapeCity.ActiveReports.SectionReportModel.ReportFooter() + Me.TextBox8 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox9 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox10 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox11 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox12 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox13 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox14 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox15 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + Me.TextBox16 = New GrapeCity.ActiveReports.SectionReportModel.TextBox() + CType(Me.Picture1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox3, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox6, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox4, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox5, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox7, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox8, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox9, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox10, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox11, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox12, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox13, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox14, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox15, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.TextBox16, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me, System.ComponentModel.ISupportInitialize).BeginInit() + ' + 'PageHeader + ' + Me.PageHeader.Height = 0! + Me.PageHeader.Name = "PageHeader" + ' + 'Picture1 + ' + Me.Picture1.DataField = "" + Me.Picture1.Height = 0.6043308! + Me.Picture1.HyperLink = Nothing + Me.Picture1.ImageData = CType(resources.GetObject("Picture1.ImageData"), System.IO.Stream) + Me.Picture1.Left = 0.02165365! + Me.Picture1.Name = "Picture1" + Me.Picture1.SizeMode = GrapeCity.ActiveReports.SectionReportModel.SizeModes.Zoom + Me.Picture1.Top = 0! + Me.Picture1.Width = 2.638189! + ' + 'Detail + ' + Me.Detail.Height = 0! + Me.Detail.Name = "Detail" + ' + 'TextBox3 + ' + Me.TextBox3.Height = 0.17! + Me.TextBox3.Left = 0! + Me.TextBox3.Name = "TextBox3" + Me.TextBox3.OutputFormat = resources.GetString("TextBox3.OutputFormat") + Me.TextBox3.Style = "font-size: 9pt; font-weight: normal; text-justify: distribute; ddo-char-set: 0" + Me.TextBox3.Text = "Username:" + Me.TextBox3.Top = 1.890945! + Me.TextBox3.Width = 1.13189! + ' + 'PageFooter + ' + Me.PageFooter.Height = 0! + Me.PageFooter.Name = "PageFooter" + ' + 'ReportHeader1 + ' + Me.ReportHeader1.Controls.AddRange(New GrapeCity.ActiveReports.SectionReportModel.ARControl() {Me.Picture1, Me.TextBox3, Me.TextBox2, Me.TextBox6, Me.TextBox1, Me.TextBox4, Me.TextBox5, Me.TextBox7, Me.TextBox8, Me.TextBox9, Me.TextBox10, Me.TextBox11, Me.TextBox12, Me.TextBox13, Me.TextBox14, Me.TextBox15, Me.TextBox16}) + Me.ReportHeader1.Height = 4.02126! + Me.ReportHeader1.Name = "ReportHeader1" + ' + 'TextBox2 + ' + Me.TextBox2.Height = 0.17! + Me.TextBox2.Left = 0! + Me.TextBox2.Name = "TextBox2" + Me.TextBox2.OutputFormat = resources.GetString("TextBox2.OutputFormat") + Me.TextBox2.Style = "font-size: 9pt; font-weight: normal; ddo-char-set: 0" + Me.TextBox2.Text = "Start Date:" + Me.TextBox2.Top = 1.12126! + Me.TextBox2.Width = 1.13189! + ' + 'TextBox6 + ' + Me.TextBox6.Height = 0.17! + Me.TextBox6.Left = 0! + Me.TextBox6.Name = "TextBox6" + Me.TextBox6.OutputFormat = resources.GetString("TextBox6.OutputFormat") + Me.TextBox6.Style = "font-size: 9pt; font-weight: normal; text-justify: distribute; ddo-char-set: 0" + Me.TextBox6.Text = "Password:" + Me.TextBox6.Top = 2.175591! + Me.TextBox6.Width = 1.13189! + ' + 'TextBox1 + ' + Me.TextBox1.Height = 0.2845668! + Me.TextBox1.Left = 0.8716536! + Me.TextBox1.Name = "TextBox1" + Me.TextBox1.OutputFormat = resources.GetString("TextBox1.OutputFormat") + Me.TextBox1.Style = "font-size: 16pt; font-weight: bold; text-align: left; text-justify: distribute; d" & + "do-char-set: 0" + Me.TextBox1.Text = "USER" + Me.TextBox1.Top = 1.823622! + Me.TextBox1.Width = 1.714961! + ' + 'TextBox4 + ' + Me.TextBox4.Height = 0.17! + Me.TextBox4.Left = 0.8716536! + Me.TextBox4.Name = "TextBox4" + Me.TextBox4.OutputFormat = resources.GetString("TextBox4.OutputFormat") + Me.TextBox4.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 0" + Me.TextBox4.Text = "Date:" + Me.TextBox4.Top = 1.12126! + Me.TextBox4.Width = 1.714961! + ' + 'TextBox5 + ' + Me.TextBox5.Height = 0.2845668! + Me.TextBox5.Left = 0.8716536! + Me.TextBox5.Name = "TextBox5" + Me.TextBox5.OutputFormat = resources.GetString("TextBox5.OutputFormat") + Me.TextBox5.Style = "font-size: 16pt; font-weight: bold; text-align: left; text-justify: distribute; d" & + "do-char-set: 0" + Me.TextBox5.Text = "Password:" + Me.TextBox5.Top = 2.108268! + Me.TextBox5.Width = 1.714961! + ' + 'TextBox7 + ' + Me.TextBox7.Height = 0.2845668! + Me.TextBox7.Left = 0! + Me.TextBox7.Name = "TextBox7" + Me.TextBox7.OutputFormat = resources.GetString("TextBox7.OutputFormat") + Me.TextBox7.Style = "font-size: 16pt; font-weight: bold; text-align: center; text-decoration: underlin" & + "e; text-justify: distribute; ddo-char-set: 0" + Me.TextBox7.Text = "WLAN-Ticket" + Me.TextBox7.Top = 0.6940945! + Me.TextBox7.Width = 2.586614! + ' + 'ReportFooter1 + ' + Me.ReportFooter1.Height = 0! + Me.ReportFooter1.Name = "ReportFooter1" + ' + 'TextBox8 + ' + Me.TextBox8.Height = 0.17! + Me.TextBox8.Left = 0.0000003688037! + Me.TextBox8.Name = "TextBox8" + Me.TextBox8.OutputFormat = resources.GetString("TextBox8.OutputFormat") + Me.TextBox8.Style = "font-size: 9pt; font-weight: normal; ddo-char-set: 0" + Me.TextBox8.Text = "End Date:" + Me.TextBox8.Top = 1.293701! + Me.TextBox8.Width = 1.13189! + ' + 'TextBox9 + ' + Me.TextBox9.Height = 0.17! + Me.TextBox9.Left = 0.8716537! + Me.TextBox9.Name = "TextBox9" + Me.TextBox9.OutputFormat = resources.GetString("TextBox9.OutputFormat") + Me.TextBox9.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 0" + Me.TextBox9.Text = "Date:" + Me.TextBox9.Top = 1.293701! + Me.TextBox9.Width = 1.71496! + ' + 'TextBox10 + ' + Me.TextBox10.Height = 0.17! + Me.TextBox10.Left = 0! + Me.TextBox10.Name = "TextBox10" + Me.TextBox10.OutputFormat = resources.GetString("TextBox10.OutputFormat") + Me.TextBox10.Style = "font-size: 9pt; font-weight: normal; ddo-char-set: 0" + Me.TextBox10.Text = "WLAN Name:" + Me.TextBox10.Top = 1.499213! + Me.TextBox10.Width = 1.13189! + ' + 'TextBox11 + ' + Me.TextBox11.Height = 0.17! + Me.TextBox11.Left = 0.871653! + Me.TextBox11.Name = "TextBox11" + Me.TextBox11.OutputFormat = resources.GetString("TextBox11.OutputFormat") + Me.TextBox11.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 0" + Me.TextBox11.Text = "Date:" + Me.TextBox11.Top = 1.499213! + Me.TextBox11.Width = 1.71496! + ' + 'TextBox12 + ' + Me.TextBox12.Height = 0.17! + Me.TextBox12.Left = 0! + Me.TextBox12.Name = "TextBox12" + Me.TextBox12.OutputFormat = resources.GetString("TextBox12.OutputFormat") + Me.TextBox12.Style = "font-size: 9pt; font-weight: normal; ddo-char-set: 0" + Me.TextBox12.Text = "Truck-Nr:" + Me.TextBox12.Top = 2.511024! + Me.TextBox12.Width = 1.13189! + ' + 'TextBox13 + ' + Me.TextBox13.Height = 0.17! + Me.TextBox13.Left = 0.8716528! + Me.TextBox13.Name = "TextBox13" + Me.TextBox13.OutputFormat = resources.GetString("TextBox13.OutputFormat") + Me.TextBox13.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 0" + Me.TextBox13.Text = "Date:" + Me.TextBox13.Top = 2.511024! + Me.TextBox13.Width = 1.71496! + ' + 'TextBox14 + ' + Me.TextBox14.Height = 0.17! + Me.TextBox14.Left = 0! + Me.TextBox14.Name = "TextBox14" + Me.TextBox14.OutputFormat = resources.GetString("TextBox14.OutputFormat") + Me.TextBox14.Style = "font-size: 9pt; font-weight: normal; ddo-char-set: 0" + Me.TextBox14.Text = "Company:" + Me.TextBox14.Top = 2.681103! + Me.TextBox14.Width = 1.13189! + ' + 'TextBox15 + ' + Me.TextBox15.Height = 0.17! + Me.TextBox15.Left = 0.8716528! + Me.TextBox15.Name = "TextBox15" + Me.TextBox15.OutputFormat = resources.GetString("TextBox15.OutputFormat") + Me.TextBox15.Style = "font-size: 9pt; font-weight: bold; text-align: left; ddo-char-set: 0" + Me.TextBox15.Text = "Date:" + Me.TextBox15.Top = 2.681103! + Me.TextBox15.Width = 1.71496! + ' + 'TextBox16 + ' + Me.TextBox16.Height = 1.170079! + Me.TextBox16.Left = 0! + Me.TextBox16.Name = "TextBox16" + Me.TextBox16.OutputFormat = resources.GetString("TextBox16.OutputFormat") + Me.TextBox16.Style = "font-size: 7pt; font-weight: normal; text-align: justify; text-justify: auto; ver" & + "tical-align: middle; ddo-char-set: 0" + Me.TextBox16.Text = resources.GetString("TextBox16.Text") + Me.TextBox16.Top = 2.851181! + Me.TextBox16.Width = 2.659843! + ' + 'rptWLANTicket + ' + Me.MasterReport = False + Me.PageSettings.Margins.Bottom = 0.1968504! + Me.PageSettings.Margins.Left = 0.1968504! + Me.PageSettings.Margins.Right = 0.1968504! + Me.PageSettings.Margins.Top = 0.1968504! + Me.PageSettings.Orientation = GrapeCity.ActiveReports.Document.Section.PageOrientation.Portrait + Me.PageSettings.PaperHeight = 11.0! + Me.PageSettings.PaperWidth = 8.5! + Me.PrintWidth = 2.659842! + Me.ScriptLanguage = "VB.NET" + Me.Sections.Add(Me.ReportHeader1) + Me.Sections.Add(Me.PageHeader) + Me.Sections.Add(Me.Detail) + Me.Sections.Add(Me.PageFooter) + Me.Sections.Add(Me.ReportFooter1) + Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Arial; font-style: normal; text-decoration: none; font-weight: norma" & + "l; font-size: 10pt; color: Black; ddo-char-set: 204", "Normal")) + Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 16pt; font-weight: bold", "Heading1", "Normal")) + Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-family: Times New Roman; font-size: 14pt; font-weight: bold; font-style: ita" & + "lic", "Heading2", "Normal")) + Me.StyleSheet.Add(New DDCssLib.StyleSheetRule("font-size: 13pt; font-weight: bold", "Heading3", "Normal")) + CType(Me.Picture1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox3, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox2, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox6, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox1, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox4, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox5, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox7, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox8, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox9, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox10, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox11, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox12, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox13, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox14, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox15, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.TextBox16, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me, System.ComponentModel.ISupportInitialize).EndInit() + + End Sub + Private WithEvents Picture1 As GrapeCity.ActiveReports.SectionReportModel.Picture + Private WithEvents TextBox3 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Private WithEvents ReportHeader1 As GrapeCity.ActiveReports.SectionReportModel.ReportHeader + Private WithEvents ReportFooter1 As GrapeCity.ActiveReports.SectionReportModel.ReportFooter + Private WithEvents TextBox2 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Friend WithEvents Shape1 As GrapeCity.ActiveReports.SectionReportModel.Shape + Private WithEvents TextBox6 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Private WithEvents TextBox7 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Public WithEvents TextBox1 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Public WithEvents TextBox4 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Public WithEvents TextBox5 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Private WithEvents TextBox8 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Private WithEvents TextBox10 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Public WithEvents TextBox11 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Public WithEvents TextBox9 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Private WithEvents TextBox12 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Public WithEvents TextBox13 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Private WithEvents TextBox14 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Private WithEvents TextBox16 As GrapeCity.ActiveReports.SectionReportModel.TextBox + Public WithEvents TextBox15 As GrapeCity.ActiveReports.SectionReportModel.TextBox +End Class diff --git a/Aviso/WLAN/rptWLANTicket.resx b/Aviso/WLAN/rptWLANTicket.resx new file mode 100644 index 0000000..85afb62 --- /dev/null +++ b/Aviso/WLAN/rptWLANTicket.resx @@ -0,0 +1,1882 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + + AAEAAAD/////AQAAAAAAAAAEAQAAABZTeXN0ZW0uSU8uTWVtb3J5U3RyZWFtCgAAAAdfYnVmZmVyB19v + cmlnaW4JX3Bvc2l0aW9uB19sZW5ndGgJX2NhcGFjaXR5C19leHBhbmRhYmxlCV93cml0YWJsZQpfZXhw + b3NhYmxlB19pc09wZW4dTWFyc2hhbEJ5UmVmT2JqZWN0K19faWRlbnRpdHkHAAAAAAAAAAACAggICAgB + AQEBCQIAAAAAAAAAAAAAAP2MAQD9jAEAAQEBAQoPAgAAAP2MAQACAPiMAQD/2P/gABBKRklGAAECAQAA + AAAAAP/uAA5BZG9iZQBkAAAAAAH/2wBDAAYEBAQFBAYFBQYJBgUGCQsIBgYICwwKCgsKCgwQDAwMDAwM + EAwODxAPDgwTExQUExMcGxsbHB8fHx8fHx8fHx//2wBDAQcHBw0MDRgQEBgaFREVGh8fHx8fHx8fHx8f + Hx8fHx8fHx8fHx8fHx8fHx8fHx8fHx8fHx8fHx8fHx8fHx8fHx//wAARCAI9B9ADAREAAhEBAxEB/8QA + HQABAAEEAwEAAAAAAAAAAAAAAAcDBAYIAQIFCf/EAGMQAAEDAgIEBggODggFAwQBBQABAgMEBREGITES + B0FRYSITCHGBkTKyFHQ3oUJSYtIjc5PTlFVWFxix0XKCkqIzszRUtBU1NsFDU6MkhHUWwmOklbWDRNTw + 4cMl4kXxJnZH/8QAGgEBAAIDAQAAAAAAAAAAAAAAAAUGAQMEAv/EADoRAQABAgIEDAYCAgMBAQEBAAAB + AgMRBCExEgXwQVFhcYGhsdEyMxWRweEiUhNCcvGCYiMUNEPSJP/aAAwDAQACEQMRAD8A2pAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAABrrvw6y2a93+fJcu2210FXSx08M6TVPTdJtSoqqnMe1MEw4gI/8ArtZ++QrV3Kn4UB9d + rP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3 + Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrt + Z++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5 + U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9dr + P3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3K + n4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ + ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U + /CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UB9drP + 3yFau5U/CgPrtZ++QrV3Kn4UB9drP3yFau5U/CgPrtZ++QrV3Kn4UD2MrdazfFmu7xWjL+U7fcK+XSkU + TajBreF8j1lRrGpwucqIBs5lj/dK2mJ+Z1okuz+dLFbmypBHineI6VznPVPVYN7AHrAAAAAAAAAABVRE + xVcE4wLGsvtnom7dVWRRNxwxVya+LQeqaZnU81VRGuWOXfezky1yOiqKpyyomOwxjnY46sMEOi3krtcY + xDnu521ROEyxus6weXY1wpqGomX1XNRPRVFOqndN2dcxDlq3vajVEy8io6xM+OFPZ2q3jfLsr3Ea82xu + eeOrsaKt8xxU9qwl6wl/X8lboWfdPV3/AAtNkbnjjq7Hid81cVPaU+/jNMzah3i1O3oYlkRMF0qjmtw/ + GMVbqojDTOmSne1c46I0QpM6wWZk7+ip3djFPtnqd0U/lLEb4q/GF3F1iLq3DpLTE/jVJVT0Ng8Tuf8A + 5dn1e43z/wAe36PTpusTRLh4zapU9Ukbmr4Soaqt0V8Uw2074o44l7dFv4yXOqJP01Mq+qYrk7qIaKt2 + 3o4sW+nedmePDqZTRZ5yvVsjdHXMZ0qbUaSc1XJxoinJVaqjXDspu0zql7UNVTTpjDKyRPWOR32DW2Kg + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADRXreeeWp8hpPBUCFQAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAASzua6vOad4czK+fatWV2u9sucjedNgullMxcNteDa71 + OVdAG7GRd3uU8j2dtqy5QtpYNCzzLzp53omG3NIvOcvoJwIiAZGAAAAAAAB1kkjjarpHIxqa3OXBPRAx + W/7z8o2XaZPWNlnT+pj5zseVExVO4dNrKXLmqHNezlu35pYXX7/aB1NK6kppmTNVEjhe1rVcirpXbxkR + NHIdlO6bmOmYwcVW+LeGiJxYDmbeVe7vVMWCsqqSkVE6SFJGqqLjp2XNax2GHGpI5fd9FEfdEVSjcxvG + uuftmaaXlZgbQyos1tuM1VRMkRjYauRVnWRzcXyNZgibGhEx14m7L7UaKqYirm1dDTmNmdNFUzTz6+lb + 0cFxbF0VTArqF2nYnc2FEx9NE+TBGu7HbxPdc044xP3c2n44PFEV4YTH28+j4YutVaKamcj318T4H4rE + 6Nr3uc1Fw4G9HtJwptii7NX8Zx4dfYxXZin+UYcOrtUNizNXv6iZPuGRL4cp7+/mjt8Hn7OeezxcdLaU + /wDbTqvLO3D0Iv6Rs18sfD6m1RyT8fovqCotax1uFG9MKdcfblXFNtmjvDVcprxjTx8jbbqownRxcqxd + PaXf+zlb9zOn9MamzZr5Y+H1apqo5J+P0cY2dyfk6iNePpGSehsRjCvmMaOfh1CU1tfgkVY5juFZ4Va3 + tLE6Z34o2qo1x8J8cGdmidU/GPDFffu2SibhTuhqLguOKo9uMPI2N+y9ZPveb91q0/sirXjFPf8ATv6G + 79c0asJq7url7ul5NVDVslVapkjZXaXLKjkcqrw87Sp0UzExoc9UVROldW/MV+tytWjrpoUbgrWo5Vam + HrXYt9A1XMtbr1xDbbzNyjy1SzGzb8c40CtbVOZWxJhij02XL29KJ2kOK5uq3PlmYd1ve1yPNESkGwb+ + 8u1mzHcon0Uq63L3mPIuKp3VQjru7blOr7kja3naq1/akWgvdrr42SUtQx6SIjmJjgqoulFTj7RwTGE4 + SkInGMYXphkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGivW888tT5DSeCoEKgAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADlrXOcjWornOXBrU0qqrwIBtDuK6qclT4tmXeFA + sdPzZaLLzsUe/ha+s4Wt4ei1r6fDS1Q2vgp4KeCOnp42wwRNRkUUbUaxrWpgjWtTBERE4AO4AAAAAALe + suNFRM26mZsScCOXSvDoQzEYsTODEvpKtFwrZbdaKuF1WxF2UcuO0qIq8xe9dhhpwVTfXlblNO1VExS0 + UZq3XVs01RNTA94V3zfSW9PG6ilqIKuVI02OlhkTHFdn8p3ujSqL6B3ZC3arq0RVjEc0/JwZ+5doo0zT + hM88fNjyR23K8UctzttsuXjjUa+OCZ0kkeHO72XpUwXjbgdeNV+cKaq6cOWPDByYU2Ixrpoq2uSdXxxX + +c7dW32gt00FudbUZtNiZOrEWRFaitZsxq5yKiNXZRzUNOTuU2qqomra6G7O26r1NMxTs9Lx6PKtss9K + y6Zgp6mrpOa6NaXovF3o5ObznSMkci8jU7aHTXmqrk7FuYiefHHuwctGUotxt3ImY5sMO/F4dxvUDpkS + z0qWumamyjWOV0ztOlXTLz9PFjgdVuxOH3ztT2fBy3L8Y/ZGxHb8XlPc57le9yuc7Srl0qq8p0RGDmnS + uqGSJzXUdQ5GwTLix7tUcupr+xwO5OVENdcT5o1x2ttuY8s6p7J4a1rLDJFI+KRuzJGqte1daKi4Khsi + YmMYappmJwl0wUywvLcntVd5Mv5xhqua46fFttaqujwWWBsa3GAF7SJ4rB487BZVVWUjV9UnfSfecHru + wpqr+6dn4+DdR9sbXw8eHGsl0qqquKrrVTa1K0FfWwM6OOVyRLriXnRr2WOxavcNdVumdcPdNyqNESq+ + M0U+ippth6/11OuwuPGsa4s7Tdk87FUap+PDxetumdcfDw/wuVy4/a0VDcMNrxdWr41hjq8X17XD32HK + a/8A0c3h8W3/AM/P/wD18Fk6S2wqqR075nJo2p37LV+8jwVPwzZs1TrnDo4fJrxpjVGPTw+bKrLvQqbf + RMpJaBk0cKIyDYkezZYiYI1dtJVXDg0kdf3XFdWMVYY83+EjY3rNFOzNOOHP/l7mXN+14o5UjucSS06r + oWPF2yn3L1x7jk7Bru7qjD7J+LbZ3tP84+CWsu7x8tXuNqxVDY3rhiirzcV4FVcFb98iEVdsV0ThVCWt + Zii5GNMsqa5rkRzVRWrpRU0oqGluAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGivW888tT5DSeC + oEKgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFehoa2vrYKGhgfU1lS9sVPTxN + V73veuDWtamlVVQNz9wHVpocpR0+Zc2RR1maHI2Slo3YPhoVVMU42vmT1Wpq976oCfgAAAAAAW9dcKKg + p31NZMyCBiYukeqIiInZM00zM4QxVVERjKPrvvUdVV8dqsEKuqJ12WSyJztnWr9j0jETTtO7LUcd1OSw + pmqvREcOHycFWdxqimjTM8OHZi8uvyXPdqmR94uk9RA5rcIYsI8XY4u21Xb2k0JgmhOQxRnYoj7KYifi + zXkpuT99UzHNoY/dskZXt0ivt15W3XaFqvgjfPHjtNTHDDmvRXdk7LWdu1x91G1RPM47uRtUT9tezXHO + p5Kt9bm2b98ZgmWrp6BUhpadyIjHPREc5zmoiIvBjx8OoznblOXjYtxhNWmWMlbqzE7dycYp0Q9SK70V + bmF9qy9a6Vs1K53jNwlgTYi2NC4NbsOVdrm607homzVTb27lVWE6ox1t8XqaruxappxjXOGpi2ZcvZ3Z + enVM07qied7o6Z8EmD3MfzVSOJHbTWYLzuDjU78tmLGxhEYRGvHxcGZy+Y/ZjM4zOrDwZnb8p5Miolg0 + qkKsbVMqZHIu3hj7ZE9dhquTSmDfuVI25mr81Y8urDxSdvKWIpw5NeM/LhzLe8ZYyfXUk1Pb7c6WoiRE + Sa3tbixy6NL3OjicqcLVdierOZvUzE1VaP8AlwxeL2Vs1xMU06f+PDBFt7sF1stSynuMPQySM6RiI5r0 + VuKpraqprQnrN+i7GNMoC/YrtThVGDzjc04r6oVKqjZVf18GzDUcrcMIn9xNlewnGaqftqw4p1fNtqna + px440T8llibWpe278lXeTL+cYarmuOnxbbeqro8FjgnAbGrBVpaV9RUMhRUbtLznrqa1Exc5eRrUVTzV + VhGLNFG1ODmuqGzzYxorYI0SOBi60Y3VjhwrrdyqoopwjTrZuV4zo1LdUPTzir01DJO10rnJFTMXCSd+ + KNReJMNLnciHiquI0cbZRRM6dUKq10dOmzb2rG7hqn4dMv3OGKRp9zp9cef14+b4cX1ev2bPl+PH9OGl + Y6cceE2NS78fSdNmvZ4wmpJkXZmb9/p2uw7HkwNX68PLo7uHQ3ftx82nv4dKlPQKkSz0z+np2985Ewez + HR7YzTs9nSnKZivThOieGpiq3oxjTHDWtD3g1vUyzRz1d9paWGqWjfM7Z6dMdSJtKmHDjhhgug581XFN + uZmMcHTlaJquRETs4p2sdXdrNsMirZKiFrcHxTIjmq71SYYbOPDgVeuuKuLBaqKJp48Wa2vM9DWKkcv+ + HnX0rl5qryO+2a2x7AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGivW888tT5DSeCoEKgAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALq2Wy4XS4U9ut1PJV11XI2Kmpomq573uXBGtRA + N5NwfV7tmQKKK9XljKzOM7F6Sbvo6Nr00xQ8Cuw0Pk4dSc3WEzAAAAAAA8qtv1PHtR0zmzStXBzkXFrV + 7XCJhiJYfc7vYK1rprjV0tQyndtKsr43ox7OJFVcFQ30W7sToiqMelpruWpj7pp0dC1y6y0VTHXagpYo + IqjaZBIyNrHPja7S5yIiKivei9rA9Zia6fsqmZwecvFFUbdMRGL0LlcqK2Ub62tkWKmjw25Ea5+G0uCa + GI5damq1aqrq2adbbdu00U7VWpiud6uirsveNVFGi29XMdHVzKrJVRVxasMaJtrteuVvLoO/JUVU3MIn + 7uSPnwlH56umu1jMfbyzr6o8cHj5Wz/lWzWJaZlNPFK17ndAmEqvVdTttdhNSJjoOnNZC7cuY4xLmyu8 + LNq3hhMdrvk7MWWYLheLtPVqyurXLI2CRrYk2FdtbDFc9WK7FeF39JjOZe7NNFER9tPWzk8zaiquuZ+6 + rqZ/bbpQXGLpaSVJGoiK5U4MeDFOavaVSIuWqqJwlMW7tNcY0yrQpRSyOqIejkk7x0zNlV49lXJ9g8zt + Rol6jZnTCja7VTW2mdBAr3I+SSaR8i7T3PlcrnKq6OM9Xbs1zjLzatRRGEdLyM9ZZpr1Z5HPekU9Ix8s + MmDNaNx2XOcmKNXDTgqHTkczNqvmlzZ/LRdo54Qt+5rg3FZ40p40XBZZlRjVw9Sq9/8AeYll/dTxaehW + P01cejp4dy4oltNJMrZ6l88crVinSGPmKx3CjpFa7Fq4OTma0PFe3VGiMOnh83ujYpnTOPR9fBSqXUFJ + UvhSh23xuVrunmc9q4cLViSDQvAeqYqqjHH4R44vNWzTOGz8Z8MFegrKZY67CggbhTquh0+n2xmjTKp4 + uUTjH3Tr5vB6t1xhP2xq5+bnWXjtLs7K2+BON7XTo7tYyOb6Bt2J/Kezwa/2R+MdvivWOtEVArtmoppK + zFiORzJlSJqptKjcIcEc9MNfApqmK5q4pw6vFtiaIp442uvR2LP92slTGkqI514I1XopOTmvwRyrxNcq + mz9mGuMGv9WPlmJctt3iydNcWPian5OmVFZLIqa9CpzWpwuXtY6cMTc2tFPxIt7Omr4ca2qquWpc3awZ + GxMIomaGMTian9K6V4T3TREPFdc1LdUPTy7RwyyyJHEx0kju9a1Fcq9hEMTMRpl6iJnUuVtU0f6VLFS8 + krsX48Sxxo+RO201/tidUTPDl1Nn6pjXMRw5NbtC+30siSx1E8krNSxtbEmlMFTacr1wXlYeaoqqjCYj + v4fFmmaaZxiZx+HD4LhJLVVuVaahY2rVcUp5pHKyTR6RY+h2XY6dnUupOBDXMV0650c31xbYmirVT93P + 9MFrBdfE6ps8FFDDUROxY5HTorXJ2ZT3VZ2owmZmOrweKb2zOMRETHT4pcyXcLpcLKk9yiWKZX4xOVHI + j4nNa5r02lVVRcSuZ23RRXhTOj5rJkblddvGuNPye05pyOx61pzNWUOzFNjPTJo2VXnNT1q/0AZjQXGk + roelppEe30zdTmrxKgFyAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGivW888tT5DSeCoEKgAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAVaWlqaupipaWJ89TO9scEEbVe973rg1rWpiqqqr + giIBvP1edwVNu/tyXq9sjqM3VrMHuTB7aKNyaYYncL1/rHp9ymjS4JoAAAAACjWVlLRUz6mqlbDBGiuf + I9cERE5VMxEzOEMTMRGMoZzhvjrblNNQZbVKeijRfGLnKnpdSua1fQ0Kq8CEzY3bFMbVzX+KFzG8pqnZ + t6vyR6j8w3d08drjq6qNVRaqdNt0krtOCyuRVRE0rssxwTlXSSWFu3hNezHJzdHijMbtzGKNqeXn6fBS + tGTsw3WeWGlpVRaeRIal0ipGkb1xxR21p0YacEU9Xc5btxEzOvU82cncuTMRGrWmzLVkSzWant/SumdE + 3nvcqqm07S7ZRdTcdSFYzN79lc1YYLTlrH6qIpxxeRm3OdpoKGeFjm1MuLoZGIjXNR+pWc7Fqu49Co3h + 4Ed05TJ111ROrhw4aubN52iimY18OHDXE94zLcrrFT086tjo6VjWU9JEitiajU2UXBVcqrhwqpYLOWpt + zMxrnjV29mqrkRE+WNUcTy8Tfg58XuWDJd/vsMs9FCiU8aLhLIuy170TvGca+gnCpy385btTEVTpdeXy + Vy7EzTGhnmUt3FN+4mVVTNUU9zq49tskT3RrC1yc1NlFTa0d9tdgis3vGf2YRETTHalspu6P14zMxVPY + t8u0+d7HfX2ttBHNBUKquq2tdHT4cEqrGiRouCYYbKOXUesxVYu29vawmOLj6OV4y1N+1c2NnGJ4+Lp5 + PmzOeuv9JGvS29tYunCWlfst0aeex/PT7zbXkI2m3bq1VYdPDwSlVy5Trp2ujh3YvDzLvAtFNaKyGJ8k + V2dG6KOklieyRj3Jgjl2mo3BMcdek6stu+uquJnycuLkzO8KKaJiPPyYInbXJWokNxlc5/8AU1j1Vz2K + q44P1q6P0U1pwotgm3s6aY6uHGr0XNrRVPXw4lpUQTU8zoZm7L2601oqLpRUVNCoqaUVDZTMTGMNdVM0 + zhK4qcKihhqtckWFNP2kxhd22IrfvTXToqmOvx4c73Vppierw4cxbkToq7yZfzjBc109Piza1VdHzhbU + 9O+eeOFmCOkcjUVdSY8K8iHuqrCMWumnGcHe4TsnqVWPHoI0SOBF0L0bNDcU411rymLdOEadb1cqxnRq + VIaeGnhbVVbdtXJjTUy6NvT37+JnhcHCp5qqmqcI654cbNNMUxjPVHDiFvFXKqpV7NVGuqOVNDE4o1bg + saJxNwTkH6YjVo4cfKz++Z82nhxciuyyOrYVqrfj0DcemSZUaseCbS87BEkRETHmptetPE3tmcKtfNw0 + cNL3FjajGnVz8NPDQtl/dlPoRHVsvGuMcPc0SPT8A9/fP/Hv8O9r+yn/AJT2ePcpy3KrfGsTHJDA7Q6G + FEjaqeu2e+7LsVMxaiNOuecm7VOjVHMtERVXBNOOhEPbwPY5rla5Fa5FwVF0KimBnmRMi2m8Wx1wr5Hy + Kr3Rshjdso3Z4VVNKqpEZ/PV26tmlMZDIUXKNqpxnXIj6ZEqaVzpWLg1sr8FcrtSMlXRiq+lf96unBTG + Tz21onh0eHWznchs6Y4dPynqlnOWIqyLL9BFVta2WOCNiI3aRdlrURu01yNVHbOtOMic1NM3Kpp1YpfK + xVFqmKuR6SpiaHQpOaBzTVdTRzpNTyLHInCmpU4lThQDNLHmenr9mCfCGr1I30r/ALnHh5APbAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAGivW888tT5DSeCoEKgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAA5RFVcE0qupANz+rLuCTK9HDnHM1P/wD5HVx42+jkTTRQvTDacn9tI1dPqW6NauA2EAAA + AADzMw5jtVgt0lfcpkiiZ3rfTPdwNanCqmy1aquVbNMaWu7dpt07VU6EQ2feDcc351aydnRWyGKR9JSJ + pRrmqmzJJxu4uL0SUzOTizZx/ljpRWWzs37+H8YjQtM8ZPzLeb3ItDHGlAjI3IqubGjn4Ki48LlT0MeV + T1kc3at2/u8zznsndu3Pt8qxy7lHeNb5pKOllS20syo6efaikauGjFqJtOx7htzGby1cbUxtTHS05fJ5 + midmJ2YnoSVZLNS2mgZSU+LsFV8sz9L5JHd9I9eFVIW9em5VjKcsWYt07Mf5Usx3mG0W2SpkkRjsMGOV + u3h67Y2mY4dnWqJwnrL2ZuVYPOZvxbpxQpe7xRXWvfV1D6h6uXmtRscaInYRXJiutV4VLPZs1W6cIw7V + Wv3qblW1OPYsMbQvpahv3zF/oQ2/fzNP2c7lIrMuKrUVDF4ESBjvR6Zv2BjXyR8fozhRyz8PqmTdjVRT + 5Vjjie+RlLLJCjnsRjtaSakc/wDtOMre86Ji7jPHGKy7sribOEcU4MsRETUcCQcgAMN3hZabdI4KhlOl + RUN9pjhjZszvVy4/l1cjWNa1FXnMVCR3fmdiZjHCOz4fVG7wy37IicMZ7fj9Ee3rdzmO3MbNHTPqoHcE + SI+Rq8TmMV/dTEmLO8bVejHCUNf3ddo0xGMPEgkjqIkoqpyMczRTVDv6tfUPX1Cr+CunjOqqMJ2o6+HK + 5aZxjZnq4cnc5oIZG1ctunbsOqEWBWu0bMqLjGvF36IirxKpi5MYRVHFp6mbcTtTTPHo6+J1tyKkdeip + gqUzsUX3Rhm5rp6flLFv+XR84cUntFHUVS4bT08Xgx43p7Y5Owzmr90gr01RHXw4cRRopmerx7O8poYY + oUrKpu0xVVKeD+1cnC7/AJbeHj1JwqiqZmdmOvm+pTERG1PVz/R0SKtuE8kvfrrllcqMYxNSYquDWpwI + naQY00RgxhVXOLurrfSaI2pWVCf1j0VIWr61mhz+y7BPWqYwqq1/bHbw4YvWNNOr7p7OHDBby11ZJMyZ + 8zukjw6JyLs7GGlEYiYI1E4EQ9RbpiMMHiblUzjiu0pZLpE+elgV1ZHpqIImKqPTV0jGtTQuPfNTspox + w17X65wmdHDQ27H7Ixpj7uPxZTlLLuT6mgel9d4pcInLtsmqGxbTFXQuxijm4alxODN5i9TV/wBemnox + SGTy1iqn/s0Vc84Mgms2UMtRuvVBUxxSsjVIWSPSdkirqRqaX4qvCxfQOKL16/OxVHy4dbtmzYsR+ymY + jt+vwYtdM1ZarMxU17WCRysj6Oqo5II5WPVEVNpHOkbhodoXZ4NR3Wsrdptzbx6Jx+jgu5u1Vdi5h0xh + 9UjZaulkuNuY60YNp4UbGsWyrVjwboa7HiQhczauUVffrlN5a7brp+zVD0nsa5qteiOaqYKi6UVDnxdO + GLq5oFNUA6OTECk5oFJUVFxTQqcIGU5fzYuLaS4u5I6lfsP+33QMtRUVMU1AAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAGivW888tT5DSeCoEKgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2Y6 + qu4pLnUQ5/zJT42+mftWGikTRNMxf0p6L6SNyczjdp1NTaDbwAAAAALW4XCKkjxXnSL3jP6VAgPebLV5 + lzPBTULn1D6dOgmVXIlO2VzlXYbjgm3h32GldXAT+7sLVuaqtGOnnw8Ff3lE3bsU0acNHNj4suyVk+LL + 1CqPVsldNgs8rex3qKvAhG53Nzeq/wCMJPJZOLNP/KWSOfHGm09yNTVi5cExXsnHEYu2ZiHdEMMoxve9 + etpL7VQ0EMU9BEiwx9IioqytxxkxTThjow4k4CcsbqpqtxNU4VIC/vaqm5MUxE0xwxYhmS93Sue2Kvnd + LULg+pTU1rl0tia1NDUjRdPrlXEkstYop00xo4vHr7kdmb9deiqdPH4dXe8M6nIAZFlDJtfmGsRER0Nv + Yvt9Xs6Ew9K3HDacvoHHm85TZjlq5HZk8lVeq5KeVN1ls9JaLbBb6RFSGFMNpcNpyrpc52HCqlYvXZuV + TVOuVps2abdMUxqhe4Gptc4AMAOMAKNRWU1MsaTv6NJF2Wvci7GOpEV+Gy1Vx0Yrp4D1TRNWp5qrinWj + HerabLT3GknWNaaauSRZKmPS1XsVul8fDjtaVbp5FJzdd2uaZjXFPEgt62qIqidU1cbDX0c07I6abBap + rf8AAVDV2mTsT+qRya3J6ThTvV4MJKK4jTGrj5ufx+KNmiZ0Tr4p5ebw+Du9Nt1ZVJqq6RZXcknSsbKn + 4aKuHFgeY0YRyVfLQzPHPLT89LpLSxMSJk2PitE1EmamhZKmTnOjb67Uxy8CN7CLmKp4tdXdy8OViaI0 + Y6qe2eT5dTpVMa2ZZ7n+W0JFb4tCtamhrXLp6Nqep77sazNM6MKdXLw19zFUaca9fJw1d5UU9ynYzxnY + oaRvOiikXomIi+mbHpkf90iOXjUU1Uxq+6fj26iqmudf2x8OzWt1ZaIu/klqn8KRokLOyj3o9y/gIevv + nkjt4fF5+yOWezh8HC3FI9FPSwQ+uVnTOXtzdIncRB+vHXMz2dzH7MNURHb3ui3W5LKyV1TI90aorEe5 + XImHBgujDkM/qpwwwY/dXjji4uEUTZGTwJs09S3pGMRcdhccHx/euTRyYLwi3M6p1wzciNcapWipwoe2 + t1MsJF3PySeMXGLxhGxo1jvFFwxcqqqLImnFNnQi9lOQhd8RGFM4dfyTm5pnGqMer5pMVCCTzoqAU3IB + 0VMAKb2gUXIBScgGQZczO+jVtJWuV1Kuhki6Vj//AI/YAzdrmuajmqjmuTFFTSiooHIAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAGivW888tT5DSeCoEKgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + BKG4Lc9U7xs2I2pa6PLdsVkt3qExTaRVxZTsX1UuyvYbivEBv/R0lLRUkNHSRNgpadjYoIY0RrGMYmy1 + rUTUiImAFUAAAAWtwr46SLFdMju8Z/SoEZbwM4La7dLJHUROukqtbHC53PRrtbtlFR2CId2Ryv7a9MTs + uHPZr9VGiY2mL7vaRjYqjNF6nRG0zVbTI7Q2Nru+c1qIjUV2prW9zSh27wr0xaojXrcG76NE3rk6tSRG + 1rI6Dx2s/wALEjFkkSRcFY3Xz+JcNfKQ+xjVs06U1FeFO1VoR/bKGrz3fH3ate6OwUMispKfFWq9W4Lh + o1Y6Fe7XwJyTF2uMrb2KfUq1zw7ENaoqzdzbq9OnVHDte/vEzdUZfoIYqRn+MrdtIplwVsaM2dp2HC7n + pgcm78pF6qZny0uveOcmzTER5qkQ2aklnq3SthdOlM1Zlja1Xq5yLgxqomOKK9Ux5MSxXq4iMMcMdCuW + aJmccMcNLh9srFe59VLFA9yqsizSt6RHLpXajRXSY/emYuxxYz1cIYm1VxzEdM8JXFrsUdwro6GnqVqK + mbHo2U0au1JtLisy06ImCHi7fminamMI5/pi92rEV1bMTjM8n1wZ1Yd0sXTpJd+kSKNUVIkexOk5HIza + 2U7DyKv71nD7OHDoS1jdMY418OHSkmmpqemgZBTxthhjTZjjYiNaiciIQ1VU1TjOtNU0xTGEaIVcDy9G + ADABgAwAs7tQRV9vlo5oW1EU2CSQve6NqojkXvmIruA2Wq5oqiqJwa7tuK6ZpmMYlGd/yXerTT+NuuE9 + VTuckfirI/G0T1O0yRzWq1MMO9XAm7GcouThsxE8uruQeYyVduMdqZjk83e8mitUkiOidTOax64viZDU + 7DlT0yxyMRGv9cyVuHYOiu7hpx7Y7/GJc9FqZ0Ydk90/KYZXSZEqqimSVytRZOcrZNaq5Wq/awRNpXdG + 3FcE4V4SPrz0ROHDhpSFGRmYx4cNDx7rl6poZlarZVkjx2ZmMc53O0vVHsbJsPculzthVXgVqc06bWYi + qOLh8O/463Ndy80Tx8Pj8cPhqeA+mqadq9HHPSJp9spKSR715XTTrFImPDs6OQ64qieSemqO6MYck0zG + rGOime+cJeVMy3MVXSw1cjnKu1I9zYsV49LJPsm+JqnVNPf4OerZjXFXd4qa1Vubh0dCi+6yvcn4nRGd + irl7P8sbdPFT2/4PH6XZw/dtPj6raqMfz2A/XP5T2eB+yPxjt8XVa9qd5SU7U+4V3hOcP188n7OaF1Fc + Fmts7Fp4FdTubOxOjTBGPVI5NXCrljNc28Ko0zp0fPxbIuY0zojRp1dXgs0r4cefQ07/AH1vgSNNn655 + Z7PBri5HHTHb4jq2kdrt8DU4dh06L2tqRxjYn8p7PBma6fxjt8WS7u7tb6XM8LI6Z0TqyN1Or3TIrUxw + emhWt0q5iJ3xw7xtVVWp06tOp3btvU03YiI82jWmBUK2szqqAdHIBScgHRUApPaBSchgUnIZHvZZzK6h + e2jq3KtG5cGPX+rVf+EDO0VHIiouKLpRU1KgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGivW888tT5DSeCo + EKgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD08tZdu2ZL9Q2K0Q9PcbhK2Gnj1Jiutz + l4Gtbi5y8CJiB9GN2m760ZCyhRZdtqbXQp0lZVKmDp6l6J0kruyqYNTgaiJwAZSAAAAKFZVx0sKyP16m + t41Ag7ebvDuUdydbrbUNY9Gf4udml7HKq+1tX0uCa8NJNbuyNNVO3XHQhN45+qmrYonpRrRxLV1avqHu + WNuMtVIq4u2G6XaV9M7UmPCqEzXOzGjqQlEbU6et6cObK1jqeN8bHUUFSlWtI3FrXvaiJGj1081jWNai + cSGmcpTOM/ymMMW+M3VGEfxiccOHIr3vNGZM0y9G9F8Xj5yUsCKkbUT078VXuuXBOQ82MrasRjx8svV/ + NXcxOHFyQoUVwrrXGkaXmeBjdKUtFI56Iq6dKo5sWnjRXdg9126a9OxE888MXii5Vb0bcxzRPCO9RrL6 + +ol6V0azza0qKx7qmRMdeh2EWHZYeqLGEYao5tH17Xmu/jOOuefT9OwqrhXPs7I5ZnK2plV3Rd6xGQoi + N2WNwaiK57uD0opt07eiNUd5Vcq2MJnXPcv8j5UjzHc5Keao6CCBnSSbOCyOxXDBqL9k1Z3NTZpxiMZl + tyOUi9VhM4RCTLfu5stvvtFXUcbmRUkb1dtvc5XzKqIxy4ro2U2tXIQlzeFdduaauPuTlvd1FFyKqeLv + ZfgR6RcgAAAABwqoiKqrgiaVVQMDzfvCipZEp7TWwsexV6WfRPtaMNljGo5MU9c5qdklcpkJq01xPdw7 + UTm94RToomO/h2MDqrtW3hXOnlqriyNcXS1UqQUzFXjjYuy3tPJWm1Tb1YU9EYzw6kTXdqua5mrpnCOH + W70c9NEiSRMZsI7Ya+GJWtc9cPa4VX/Eyu0pre1E4eDHFdMzr7+/+MfCWaKojTHd3fyn4wyKmzlXwU7m + JUbLGYo5UVHbKMcxsi4poVE6XQrUwVyO4MDjqydMzq4cXd3O2nOVRGvhx9/e8243aasfhUIj5nOczo3K + 1UWVi4PjTbR8e2i6U22qjkwwVq803W7UU6tXDTy4dGrn1tFy7NWvXw0cmPTr5tTw3RQSuc6GnbPI3HpG + wK6mq2qmvah58ej/AJbV5cDqiZjXOHTpj46/i5ZiJ1Rj0aJ+Gr4KLaxXfo12qKZ39nOsiN7CPiV+Pba1 + D1NHLTE9H1eYr5Kpjp+j2cv0bp3Ty3qtfJR00UkqNb0c7JNhqrsrK7pGMcq4bKOTTq0HNmK8MIoj7pnn + jsdOXoxxm5P2xHNPaxpbmrl9vpaaZqam9EkXowdEp2/q5JmOvHvxcX7eWInqw7sBKm2P/KUbmL/yJVan + ckSVfRGzVxT8Y8MDao44+E+OK6o4bVJDWpHUSQq6HSk0aKxqJKxdL43OculE1MNdc1xMYxjp+U8NbZRF + ExOEzGj5xw1LP91Sv0080NQnBsSI1y9hkmw/8U2ftiNcTHDma/1TOqYnhzraopaqmejKiF8L1TFGyNVq + qnYVEPVNUVapxeaqZjRMYKeKoqOauCppRU1opl5TbkB98ny+yqu07p3Tu2qbbw2kiwRExVERVxXFdPAV + feEW4uYURhhr6Vr3dNybeNc446uhkaocLudFQCm5AKbkA6KmKAUXNAouQCk5AMnylmNYXtt1Y72py4U8 + i+lVfSLycQGagAAAAAAAAAAAAAAAAEQdZbebmnd/lS13LLskMdVV1/i0yzxpK3o+he/Qi4YLi1ANdPre + b5f1mh+KN+2A+t5vl/WaH4o37YD63m+X9ZofijftgPreb5f1mh+KN+2A+t5vl/WaH4o37YD63m+X9Zof + ijftgPreb5f1mh+KN+2A+t5vl/WaH4o37YD63m+X9ZofijftgT71Y97Gb94dDf5sySQSPt0tMym6CJIk + RJWyK7HBVx7xAJtAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABg+8nfLkXd7Sq691qSXFzdqn + tNNhJVScS7GKIxq+qeqJxYgZwAAAAAAAAAAAAHD3sjY6SRyMYxFc97lwRETSqqqgQjvC62e7vLMstFZk + fmW5xKrXeKuRlI1yY6FqVRyO/wDTa5OUCB8z9bre3dnvbbZqWxU66GspIWySbPrpKjpdPK1GgR7c96+8 + 25uctbmq6ytdrj8cnZHp/wCWxzWcPEB478z5lerVfdq1ysXaYq1Eq4Lxpi7QBdUme88Ub+ko8xXOmfoX + ahrKiNcU1aWvTjAzGwdZLfNZXNSPMUtdC3XDcGMqkd2XyIsvceBMWSOuvBI+OmzpZOgRdD7jbFVzUXjd + TSrtInGqSL2ANisqZzytm22Jc8uXKG5Ua4I98TucxypjsyRuwfG7kciKB7QAAAAAdJ54aeGSeeRsUETV + fLK9UaxrGpi5znLoRETSqqBq/vV64qU1TNat31PHUdGqskvtU1XRqqYovi8PNx5Hv0et4QNf77vi3pX2 + Rz7lmi4yNfjtQxTup4dKYfkYOjj1etA8L/dGZuk6T971vSYbO34xLtbOOOGO1qA9O2b0N5Frc1bfmi60 + 6N1RtrJ1jXDHWxXKxdfCgE4bgusBvazDvBs+VrnXQ3WgrnSJUSVEDGzRxRQvlc5skPRacGa37QG3oGPZ + 6z5lnI9glvmYarxekjXYijam1NNKqYtihZim09cOwmtVRMVA1Ez91vd4V7qJYMtJHl21rikasa2arc3j + fK9Fa3H1jUVPVKBE9w3g58uMvS1+Y7nVSYqqLLWTvwx4sX6O0BaQ5rzTCrVhvNdGrXbTVZUzNwdjtYpg + 7XjpAyKzb7t7dme11Fmy4qjNLY6mZauNP/TqelZhyYAba9WPefnbeBYLvV5mdTzJQVEVPS1MMPQyPcrF + fL0myvRrhizDZanDyARxvw6xu8vJ+9G9Zcss9Iy2UPivi7Zadsj06akhmfi5V08+RQME+t5vl/WaH4o3 + 7YD63m+X9Zofijftgbx0Ez56Gmmk7+WJj3YaExc1FUCuAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAaK9bzzy1PkNJ4KgQqAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAANy+qRujSx2Fc83eDC7XiPZtbHpphol09IiKmh0+GOPqMPVKBsSAAAAOssrIo3SPXBrU + xVQMVr62SrnV66GJoY3iQDDb5k7I8SVF3uVMkUbcZJ1a97GqvI1jk5zl4tZIWM5fnCimUffyeXjGuuEZ + 3JlPVMe600KUNLUrtKjnuwbBG5WsWSSRytRZHo5Vbj6VMCbtTNPnnamO/wCnzQV2Iq8lOzE93Tz/ACh5 + n/6ym0J/jpuNdqOBOwnNkf8Ai9s6Puq/4x2+He5/sp/5T2ePcp1Nwq6hiRvfhC1cWwMRGRovGjG4Nx5d + Z6ptxGnjearkzo4lse3hfWmy3S7VHi9upn1EiYK7Z1NRVwxc5cETtmq7eotxjVODbas13JwpjFKtr3VW + p1FR/vd8k1RDEjHQxv2Y0VXOkVMUTaXnPXTiQN3ele1OxoiZT9rdVGzG3pmIX9HuuypS1qVTWTP2V2mQ + ukXYaqcWCI7uuNVe87tVOGhto3XZpqx0/FlqIiIiJoRNCIR6RcgAGADADnACnUTwU8Ek870jhiar5JHL + gjWppVVUzTTMzhGtiqqIjGdSO94WbvHqOC1WCdtS2sa91ZLCuOzE1UTZV3pUXTtY8HIpMZDKbNU13Iww + 1IbeGb2qYotzjjrRurLfSd+qVtQnpGqqQNXlcmDpPvcE5VJnGqr/AIx2/RDYU0/8p7PqrPc98UdVcnL0 + CIq0lEzBiO41a1uCMj0aXImK8HCqeYjCcKdfHPDXL1M4xjVq4o4aocyVc8UTayXBtTMxWUUTUwbDDpRX + tTgxXFG/fO14KIpiZ2Y1Rr554eBNcxG1OudXNHDxevl6zLd73JZElSBIqRYHPVFdg5j2vlwTRj7YrsDn + zF79dG3hj92Ph2OjL2f2V/rxw+3Dx7WYUuTKK0U7qu+wpW09QxrK5G7TmwujRWpUaMFXabpc7DFqrxYk + dVnKrk4W5wmNXPzcNaRpydNuMbkbUTr5ufhqeNvBjyVM+m/d87Yrpg1vSRY9F0aMRWLKvKmGDk08Z0ZC + b8Y7Ufbw1ObeEWJw2Zwq4a2GVFS5ZnQXeFXyt0LUNVEm06Udtd7Ki68V1pqcSVNOjGieri+nDQjaqtOF + cdfH9eGlTWkqKdPHKCZZYo9PTxKrZI8dCbbU5zOzq4lU9bcT9tUPOxMfdTLr+81l0VkEdTxvVNiXs9Iz + ZVy/dYj9WHlnA/bj5oxFprdP+jzrBJ/Y1OrsNlYmC/fNanKNqqNcY9Hh/k2aZ1Th0+P+FxBa6+GmnR0K + udVLHS0yNwckj3yI/GNzcWuROiwXBeFDxVdpmY06sZnh1vdNqqInRrwiOHUyPeHY7ZabVZIYqZkNxWJU + qnM9NsNajldh3y7a6zh3ffquV1zM4046HdvGxRbooiIwqw0sMguFdTsVkM72RquLoscWKvKxeavbQkqr + dM64RlNyqnVKp4/BIv8AiaSN/G+H2l/aRuMf4h5/XMap+f17Xv8AZE64+X07EgZGznKr4LO1H1UaN2ae + JzEbKxrE0Na9vMeiInp0Z2SHz2SjTXq7uHRimchnZ0Ua+Tl4dOCQ2OV7EcrHRqutjsMU5FwVUIaYwTUT + iKhhl0VAKbkApuQCm9oFFyGBRchkUnoBnGUMxeNxpQVTsaqNPanr6dicH3SAZMAAAAAAAAAAAAAAAA11 + 67X8g2L/AFVP2aUDTUAAAAAAAAAA216jn8Kzd7vReBMBs+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAPLzJmjL2WbVLdr9Xw263xd9PO7BFXga1Exc9y8DWoqqBqtvW64V1uCzWvIETrdRrix96qGotTIm + r2mNcWxIvA52LvuVA1urKysraqWrrZ5Kmrncr56iZ7pJHvXSrnvcqucq8agfU4AAAAAAAAAAAebmPMdl + y3Zaq9XqqZR22jZtzzv4OBGtRNLnOXQ1qaVXQgGje+nrE5m3gVM1uoHyWrKbVwjt7HbMlQienqnNXnad + KMTmpyqm0BEIAAAAAAAHs5TzhmXKV4iu+Xq+W310WjbjXmvbrVkjFxZIxfUuRUA3d3F9YKz7xqX92V7W + W7NlOzamo0XCKoa3vpabaVV0a3MXS3lTSBLwAAAA1v65e8OstVhtuTrfMsUl626i5uYuDlpYlRrIvuZZ + MVd9xhqVQNOwAAABsD1L7J43vIuN1e3GO2W16MdxS1EjGN/u2yAbpgaAdZHeHWZw3mXGFJldaLHLJb7b + Ci8xOidszSpwKssjVXH1OynABFQAAAA3w6pdk/du5mgqFTZfdqqqrXJw/lPF2qvZbToBrJ1o/Ptmb/I/ + +PpwIqAAfUq0/wAKovcIvAQC6AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAANFet555anyGk8FQIVAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJJ3B7rp + N4WfKeiqI3LYrfhV3mVNCdE1eZDj6qZ3N49naXgA+hMUUUUTIomNjijajY42ojWta1MERETQiIgHYAAA + AY7ebh08nQxr7UxdK8ageXJJHFG6SRyNYxMXOXUiIZiMdEMTOEYyiTOmZEvFyZTO2pKeJ6NpLcx2ztSK + uCPqHJqVce8TSia1auJYsllv1048fHPh496uZ3M/sqw4uKPHw7mK3q4Pqqt0bH40cCrHSxtxSNGN5qK1 + vBtYYqd9m3sxzzrR9+5tVf8AGNSwNzSAehZLFc71Wto7fF0kq6XOXQ1jeFzncCGm9fpt07VUt1ixVdq2 + aYTlk/KtNl21+LMVJamVduqnRMNp3Aietamoq+bzU3q8eLiWnJ5WLNGHHxveOV1gDADkAYAyGAHOAGHb + wc12m322ptcr1fWVUewsEeCuRkiYOVVXQzRqVU5cFJHIZWuuqK41Qjs/mqKKZonXKG6m4SSx9BE1tPS4 + 49BHjgqpqV6rpevZ1cGBY6bcROM6ZVuq5MxhGiFWKCGjibUVbUfM9EdT0i8KLqkk9bxN9N2NfmapqnCP + j4PUUxTGM9UeLrTtdW1MlVWPVYY06SofoRVRNDWN0YIru9bo0dhDNX2xhTrYp+6catSpSTOqrp43M1FZ + Aizujw5iMhbiyPBfS6EYh5rjZpwjj0fHhizRO1VjPFp+HDB6eRru22391yqMXsjjcsy63bL3ta53KuDs + TTnbW3b2Yb8je2Lm1KUs+3uot+XHS0MqMqKjZRiqiK9InKiPc1rsNW0icmJBZGzFdzCrVCez9+aLWNOu + Ua5ry022ujpG1LaqaOFJqd+Ldt8OGL2uYirgrFxczjbjp0E1lczt6cMIx09PDXzoTNZbY+3HHRjHRw1c + zwIKmGaFtJWrhG3RT1GGLolVccF4XRrwt4NacKL11UzE40/5+rkpqiYwq/x9FF7Ky3VSKjlilbzo5WLo + Vrk0Oa5NbXIeommuHiYqonnVekoa38sjaSqX+uYntL19exqcxeVmj1vCeMKqdWmO3hwxe8aateiezh0f + BbVNJUU0iRzMwVyYsVFRzXIupWuTFHJyobKa4mNDXVRNM6Wb7vIJW5opaBj3JHRxy1FaxF5rpnNRmDk4 + ejVzU+6RSL3hVH6pq5cIjo+vcld3Uz+2KfxiZnp+ne53pz0k2ZWU9S6SJYadiRzNwezByuXnM5q6+FHd + oxuumYtYxys71qpm7hOjCGE1FunijWZitnpv7eJdpiY6trU5nYciKSdNyJnDVKLqtzEY644cNL2sqZFr + cxQT1ENTFTxQuVi7eLnK/ZRyc1NTdOvE5c3nqbMxExM4uvKZCq9EzExGDKsmW6ehu9ZItCjLtbmpBWUs + LkRs0U2CtmiR6o1HczViiKi8BH5y5FVERtfZVpiZ4pjilIZK3NNczs/fTomI44njhImlURVTBVTHBdad + whU26qgHRUA6OQCk5AKaoBSegFFyAUXIB1jllglZNE5WSxqjmOTWioBJlgvMV1oGzJg2ZnNnjTgdxpyL + wAekAAAAAAAAAAAAAABrr12v5BsX+qp+zSgaagAMjybu7znnOWqiyxbH3KSiax1U2N8bNhJFVGKvSOZr + 2V1AZR9W7fb81p/fqb4UB9W7fb81p/fqb4UB9W7fb81p/fqb4UB9W7fb81p/fqb4UB9W7fb81p/fqb4U + B9W7fb81p/fqb4UDY3qnbu855Mt+ZIsz2x9tkrZqV1K2R8b9tI2yo9U6Nz9W0msCfAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAABoD1nLvda3fHfqSrq5p6WgkiioqeR7nRwsdTxuc2NirstRXKqrhrUCKQ + AH1UAAAAAAAAAAOs00UMT5pntjijar5JHqjWta1MVc5V0IiIBoT1hd9dVvDzG6it8jmZTtcitt0Orp5E + xa6qkTXi7UxF71vKrgIjAAdo45JZGxxtV8j1RrGNRVc5yrgiIia1UCWMpdV3e/mOFlR+7I7NSyJiyW6y + LTuXswtbJOnbjQDOYupDm1WIs2ZKBkmGlrIpnpj2V2PsAedeOpbvIpY1kttztlx2U/JK+WCRfuUfGrO6 + 9AIfzhu9zrk2qSmzLaKi2ueqtilkajoZFTX0czFdE/71ygY6AAurZc7ha7hT3G3VElJXUkjZaapicrXs + e1cUc1UA393Cb4KbeRlPpqlWRZjtuzDd6ZuhFVU5lQxvqJcF0cDkVOLEJNAAANF+t9cH1W+OeByqqUFB + SU7MeJzXT6NPHMoEJgANx9xvVkyOuTbZmDN1Ct1u11gZWMppnvbBTwzNR8TejY5u09WKiu28cFXDBMNI + SXUdXzcxURrG/KlGjXIiKsfSRu0cTmPa5O6B6WQN0uSMgTXKTK9G+jS6rF4zG+aSZESDb2EYsqvcie2u + 9MBlVdVMpKKoqn4bFPG+V2K7KYMarlxVdWoD5a1E81RPJUTOV80znSSPXW5zlxVV7KgUwPeyJlKszfnC + 05ao3dHNc6hsSyqmKRxpi6WTDh2I2udhyAbzZf6tO5yz2+OldYY7lM1qJLWVznyyyOwwVypijG9hjUAq + XLq2blK+PZkyzDA7DBslNNUQOTXp9rkai6+FFAzrLWXrblywUFitjXMoLdC2Cma9dp2w31TtGKrwqBpl + 1j93ufrvvnzDcLVlq63Cgn8T6GspaGpmhfsUMDHbMkbHNdsuarVwXWgEa/RPvT+Zt8/7bWfBgPon3p/M + 2+f9trPgwPpBbGPZbaRj2q17YY0c1UwVFRiIqKigXIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAB5NyyjlS6VK1VystBXVSojVnqaaGaRWt1JtPa5cEAtvo9yD82rV8R + pvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAP + o9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD8 + 2rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8R + pvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAP + o9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD8 + 2rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8R + pvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAPo9yD82rV8RpvYAP + o9yD82rV8RpvYAehasv2GzpKlpttLbkmwWZKSCOBHq3HZ2uja3HDFcMQL8AAAAebeq/oIeiYvtsiaeRo + GO8qgQ5nHP8AcK6pqqGgndHb9tW7SYI56N0aFbp2Vwx14r2NBZMnkKaYiqqPuVnO7wqrmaaZ+1jFpTCq + dPq8WjkmReJ7Gr0a++bJ33dWHLw7nBa148mnh1rM2tQBdUNtra6VI6aNXrijVcqo1qK5cGorlwRMV1cZ + rruU0xjL3bt1VzoTxk3LEGX7PHS4NdVyc+smT0z14EX1LdSFVzmZm7XjxcS2ZPLRZow4+N7xyusA5AGB + zgZAABb1ldFSLB0rXK2eVIUe1MWtc5FVFeuOhNGGPHge6KJqxw4oeK64pwx45R3ed60LpK62QRq2N6yQ + RXSJypsYqrUkaxMVds68UcnYJizuucIqnp2UPe3rGM0x0bSObvJcpa58txldPUvRq9M5drbajURjkdwo + rU0KTFqKYpwp0Qhr01TVjVpl3iijoYmVNQ1H1T0R1NTOTFGouqSVF4PUt4da83vsTM1ThGrjn5Rw+mYi + KYxnXxR854dmuze6eonVzldLNK7SulznOVfRU2RERHM1zMzPOua97YGNt8SorYl2qh6enmwwXTwtZ3re + 2vCeKIx+6eEPdycPtjhLiLGG1TS6nVMjYGrxsjwkkT8LoxOmuI5NPDtI0UTPLo8fk7WxVSOuVFwVKZVR + U90YYu8XT8pZtap6PnD16zNtffai2wXDZ9pjfSPmTHF6TojFkfjoxTQvZQ56MrTaiqaePT8HRXm6rs0x + VxaPix9slRTVCPRVZPC7Rjra5q6tPEdkxExzS48ZieeFa4RRKrKqnbs09RiuwmpkiYbcfYRVxb61U4Tx + bmdU64e7kRrjVLmlqonxJSVmK0+KrHKiYuicvC3jaq983uaRVTOOMa+8pqiY2atXctquklppejkwXQjm + PauLXNXU5q8KKe6aoqjGGuumaZwl6dDVyWulR86JK+XB9LSP0ozHT0/Gx2HeYa9a6MNrRXR+ydHXPy8W + +3X+uNPVHz8OGPp5MV9Pmaiq7bUOSndIjKxj1RJGROXnpImpzPXp29lcDRnNNqaao08XTw4u9vyWi7FV + M6OPo4cfc9PfHb3RXmkrkx6Oph6NfuonafQeho3PcxomnknvdG+LeFcVcsdzA4KienkSSGR0b00bTVVF + w4tBK1UxMYSiaapicYZZkPMsdHmCBsrOiSsVIJXw4Njer1wYr4+9RUdwtw7Gkjs/ltq3OHFp4Skchmdm + 5GOja0cISheMtUVyk8ZbJLR3BrdiOtp3uZIiIuKIqIuy5MeBUIKzmaqIw0TTySn72WprnHTFXLCysN0r + qaZ1lvsjVuEeK0lWuDW1UXqm+vbqc02X7VNUbdvy8cfjLXl7tVM/ruebin8oe4jmPYj2ORzHJi1yLiio + upUVDjmMHZE4uqoB1cgFJyAU3IBTegFByGBSchkUXoBeWK8S2q4tnTFYXc2dnGxf6U1oBKMUscsTJY3I + 6N6I5jk1Ki6UUDsAAAAAAAAAAAAADXXrtfyDYv8AVU/ZpQNNQAG0HUc/iubvcKLw5gNtAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA+e3WR89uafd4f2aICNAAH1UAAAAAAAAAANfut9vMksGU + oMo26XYuOYUcta5qqjmUDFwemj+2fzPuUcgGlgAD1Ms5avOZr7R2Ky07qq5V0iRwRN1caucvpWtaiuc5 + dSaQN7tzm4DKm7ujiq3xsuWaHN/xN2kbj0auTnMpmu/JsTVtd87h0aECUgAAC0u1ntV4t81tutJDXUFQ + 3ZnpahjZI3Jytcipo4ANLusP1dH5HV2ZctJJPlWV6NqIHKr5KF71waiuXS6Fy6GuXSi6Ha0VQgcABnG5 + neLU5Az9b72jnfu97vFrtC1VwkpJVRH6E1rHokbytQD6NQyxTRMmiekkUjUfG9q4tc1yYoqKnAqAdgAG + gXWmke7fpmNrlxSNKFrE4k8Qgdh3XKBFAAD6i2CBlPYrbTx47ENLDGzHXg2NqJjhhxAX4ADys2fyrefI + an8y4D5gAAJe6qLGO33WVXIiqyGtcxV4F8VkTFO0qgb7AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAA6TzMhidK/vWpioGJVNQ+ondK/W5dXEgHh5xqJafK1zliesb0gcjXpoVNrm6O6dOTpibtMT + yubO1TFmqY5EAFvU5eUnNoa2Tgc2OHtukR//AOI11eaOHDW2UeWeHDUto45JHtjjar5HqiNY1MVVV1Ii + Ie5nDW1xGOiF94tR0emsXp6hNVJG7mov/NkTwW6eNWqatqavLojl8OHxbtmmnzaZ5PHh8Ek7s8vOq4mX + 6vRNhjnNtlK1EbFHhodKjU9NjoRdejFcVIbeWY2Z/XT1zx9Ca3Zl9qP2Vf6xxdKRyGTQBaXG8Wq2sa+v + q4qZHd70jkaq9hNamy3Zrr8sTLXcvUUeaYhcwTQzxNmhkbJE9Ecx7FRyKipiioqch4mmYnCXumqJjGFQ + wyoQ3CgnmdBBUxSzMTF0THtc5E1Yq1FxPc26ojGYnB4puUzOETGKueHt4uarxXWq2yVVPTLNG1jukmYu + Lo+JyR4Lta+FUROHiOnK2ablWEzg5s1eqt04xGLCd52aLVU2Ojttvq21j5HtlklY9H4NiRWptqnpnOXH + tEnu3LV01zVVGCL3nmqKrcU0zijEm0G9minho6Rn7yj6dr+dRQKiK6PFfy2nQrP+Wuh/JrXnrpmqft0c + vh9eJ00VRTH3aeTx+nGs62jqX9JWMl8chc7akqW4q5Fcv9a1ecxezoXgVTZRXEfbqnk8GuuiZ+7XHL4u + aL/CU7q9dEqqsdGnDt4c+T7xF0euVOJTFf3Ts/Eo+2Nrj4vFYm1qXlxRI2UtMi/koWvf93N7YvbRrmtX + sGu3pxnn7m25owjm79Lm2/kq/wAmX84wXNdPT4lvVV0eCxNjWvLrz6pKlFxSrY2dV9e7RJ/eI412tWHJ + o8Oxsu68eXT49pb5I37dHM7ZhqMNl66mSp3j15NOy7kVRcj+Ua4Lc/xnVPeosoqt9S6mZE507FVr40TS + it0Ox4sOE9TXERjjoeYomZww0vVpaigpYm0lY9lTKiqsMiJ0kVM9cdP/ADUVe+anN4U2tRoqpqqnGNHf + Ph39DfTVTTGE6e6PHu6Xk18dUyrk8acr5nLtOkVdrb2tKOR3pkdrRTfbmJjRqc9yJidOtSimlhkbLE90 + cjFxa9qqiovIqHqYiYwl5iZicYTNnW0OzZlakrLXg+VmFTCj+aro3MVHs06Edjhr4itZK7/57s019CzZ + 2z/6LUVUdKGJoZYZXRTMWORi4PY5MFReVFLLExMYwrMxMThLq1zkVFaqo5q4tVNCoqCYIlJeUN6DEhdS + 5gkwWJmMVYjXOc/DRsva1F53L3SDze7NONv4J3J700YXPizGaPLOaqBY1fFX07VR2LHc6NypoXFqo5ik + bE3bFWOmmUnMWsxThoqh4XS1eUrtb7Yj+ly7XPWKB0umSCVfSbSYYtVy4pjy8R07MZiiqr/9Ke1y7VWX + rpo//OrsZeqEak3RUA6OQCk5AKapoAovQCi9AKL0AovQDMciXvFFtU7tLcX0qrxa3M/pQDMgAAAAAAAA + AAAAAa69dr+QbF/qqfs0oGmoADaDqOfxXN3uFF4cwG2gAAAAAAAACMOsbnPMuT92k16y5WeI3NlXTxNq + OjimwZI5UcmxMyRmnsAan/Wj37fOb/obf/8AHAfWj37fOb/obf8A/HA2s3Jbxa667mqfOGdbox0kTqt9 + fcZWRQMSOGd7G4thaxmhqIiYNxXlUDXfet1rs55guM9FlCoksNgY5WQzxIja2dqaNt8ulYsdaNjwVOFV + Ah2bN2bJpummvVfJMqqvSPqpnOxXWuKuxAyXK+/TexlqVjrfmSrlhb/7WtetXCqepRk/SbP3uCgbpbiN + 5t63i5LW+3W2R26aOodSo+F7linWNrVdKxjk2mNxds4K52lF0gSMAAireh1jt3+Q3yULpVvN9Zii2yic + 1ejcnBUTLi2LsaXetA1tzb1ud616lkZapafL9G7Q2KkjbLNs+umnR648rGtAjW5byN4Vzer7hma6VKqu + OElZO5qdhu3sp2kAsG5ozM1XObd61qvXF6pUSoqrhhivO0gZFZN9m9qyva6gzXccGri2OomWqjTh/J1H + Ss9ACZMi9dO9U0kdNnW1R19NiiPuFv8AaZ2p6p0L16ORfuXMA2dybnnKucrS265cuEdfSLgkiNxbJE5f + SSxuwex3I5OxoA90AAAw/e/f7tl/dpmG9Wifxa50NI6WlqNhkmw9HImOxI17F18KAaYfWj37fOb/AKG3 + /wDxwH1o9+3zm/6G3/8AxwNmOq5vCzhnjKF2uGaLh+8KymuC08EvQwQbMfQxv2dmBkTV5zl0qmIF7vd6 + x+Tt3zpLbCn75zI1NNtgejWQqurxiXByM+5RFdyImkDVzN/Wc3vZjkejLutlo3d7S2pPF9lPdsXT4/8A + qAR/UZwzbUvWSpvdfM9yo5z5KqZ6qrcFaqqrl1YJgBe2reVvCtMyS23MtzpnIu0rWVc2wq+uYrla7Vwo + BMW7/rj5ztc0VNnCmjvtvxRJKuFrIK1jeNNnZhkwTgVrVXhcBtlk3O2Wc5WOK9ZerWVlFLodhokieiaY + 5WLzmPTiXspo0ge4Bb3GWSG31Msa7MkcT3sdoXBWtVUXSBoR9aPft85v+ht//wAcCPcyZkvWZb3VXy91 + Hjd0rXI+qqNiOPbVrUYi7ETWMTmtRNCAeYAAlX60e/b5zf8AQ2//AOOBkG73rH757vn7LVquGYenoLhd + aGlrIfE6Fm3DNUsjkbtMga5u01ypi1UUDd8AAAAAAAD537/83vzVvYv1cj9ukpJ1t9DguLUhpF6LFvI9 + 6Ok++AjsABuf1QN2VPZ8pvzrXQ43a+7UdE5yaYqGN+HNx1LM9u0vG1GgbCgAAAABbXO20N0t1Tba+FtR + Q1kT4KmB6YtfHI1WuavZRQPm/vRyNU5Hz3dstyqr4qSXao5na5KaVEkhfxY7DkR2HpsUAxQABv51X84O + zJuitjZ37dZZXPtdQqriuzAiLD/cPYnaA9HrCZuzDlLdbcr5l6r8SulPLTMiqOjilwSSdjHpsTNkYuLV + VNKAaj/Wj37fOb/obf8A/HAwDNOab7mq+1V+v1V45dqzY8ZqdiOLa6KNsTOZE1jEwYxqaGgeSAAlOHrP + b8oYmRR5l2Y42oxjfEbeuCNTBE004Hb60e/b5zf9Db//AI4Eob8t+G9HLH+zf3HevFP3rl+kr6//AAtJ + L0lTLjtye2wv2ccNTcE5AIqq+szvuq6WakqMybdPURuimZ4lQJtMeitcmKU6KmKLwAReAA9jKebsw5Sv + cN8y9V+JXSna9kVR0cUuCSNVj02JmyMXFqqmlAM9+tHv2+c3/Q2//wCOBnG5PrAb3My70rBY73fvG7XW + yyMqqfxSij20bBI9E24oWPTnNRdCgbjgagb+9/e9jKu9i+2Gw33xO00fivi1N4rRy7PS0cMr+fLC964v + e5dLgI/+tHv2+c3/AENv/wDjgPrR79vnN/0Nv/8Ajgb726WSa300si7UkkTHvdoTFXNRVXQBcAAAEXb1 + esPkTd8slDNIt1zA1MUtFI5NpiqmKeMSri2LsaXcOzgBrPm7rbb173K9lrngy/RKuDIqONskuz6+eZHr + jysRoEbXHeLvAuT9uvzLdKpccUSWsqHImvUivwTWuoCxbmjMzVc5t3rWq9cXqlRKiquGGK87SB7tn3x7 + 1LQ9H0Oa7m1G6UjlqZJ4/e5lkZ6AEuZG65+baCWOnzhb4bxR6pKylalNVpxu2U9of9yjWdkDaTI28HKe + eLOl1y3XNq4EwbPCvNmgevpJo15zF0aOBeBVQDIwAAABD29frNZJyLNNa6NFvuYY8WyUVO9GwwPT0tRP + zka71rUc7jwA1kzZ1n97+YZXpHdv3LSOXm0tsYkGynuy7U/4/aAwCszpnGte99ZfbjUvkRUkdNVzyK5F + 14q56444gdqXO2c6SVJaS/3Gnlb3skVXOxyYKi6Fa9F1oBneVus5visEjNq8rd6VqptU1zYlQjuzLzZ/ + 7wDYzdZ1rcm5tnhtd/jTLt6lVGRdK/bo5nLoRGTKjdhy+penIjlUCcgAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADwr9W7T0pmLz + W6X9niA8hEAi/evmepWpWwQt2KdiMkqX8L1XnNbyImheyT26stGH7J18SA3tmpx/XGrjRwhNIR61vo1q + LNWOV7Yo2VFNtyyLg1E2J8eVy8jUxOe5XhXHRPydFujGiemPmoSV0cLHQW9HRscitkqHYJNIi6FTRjsN + X1KL2VU9xRM6avhxPE3IjRT8eNZtTDSbGpMe6GqrpsvTxTrtU1POrKVy60xRHvb2EV2Kdkru9qaYuRMa + 5jSsu6KqptzE6onQybMeYqCw22StqnIrkTCGBFRHSP4Gt/pXgOHL5eq7Vsw7sxmKbVO1KPPpazFWo6Gh + oIIpFRV6VyucjE4XOVytaiJxu0Ex7Vbp01VShvdblWimmGPOur6qWsSSf943SZvTpVyNRY0khRV2YmOT + gjV+GKa8MG6EU7P1bMRhGzTGjDp5evDxcf7dqZxnaqnTj0cnVj4PJob7eaGpfU0lbNFPJ+VkR64ux9Vj + r7ZvrsUVRhMRg56L9dM4xM4rqvzdmW4QdBV3GaSHhjR2yi/dI3Da7Z4t5S1ROMUxi93M3drjCapwebTV + VTSzNnppXwTN72SNyscnYVuCm+qmKowmMYaaappnGJwlmcW8PNdupUZV1iTVWHtdO+Nivai+mmdhj2G6 + +NU4Y2d32q50Ro4aklG8L1EaZxnhreNVZ9zhVNVst0lRF19FsxejGjTppyNmnVTHe5q8/eq11T3PAVVV + cV1nU5F7SwRQQpW1TNtiqqU1Ov8AWuTWrsFRejbw8a6E4VTXVMzOzHXzfVtppiI2p6uf6LWeeWeV00rl + fI9cXOU900xEYQ11VTM4yrW5KlayNtNKsEi44yoqt2WomLnKqadlGoqryHm5hhp0vVvHa0Tgva660FbP + hNS7EMadHBJAqRPRiKulzMHRqqqquVGo3Twmui1VTGidPPwx722u7TVOmNHNww7nSjtdDV1UUUVe1rHv + RHJMx0b0bjznaOkZoTT35mu7VTEzMcOHMxRapqmIirhw53FZbrlVVks8cTZnzPdJ0dNJHOqbS44YROeK + LlNMRGOrl0d5XbqqqmcMceTT3K9vs92bHXNdRVDVWnVERYnouPSM0ajzcu0aNMa+V6t2a9OidXIs1sd4 + RNp9FNGxfTyMcxv4TkRDZ+6jlhr/AE18krt9sc61RunqaeJaaVWK7pUl5kqbTEwh6VdDmvXVwmuLn36I + nTzeOHM2Ta+zTMaOfHux51p/+og04y1j04MEhjx7OL3uT8E9/fPN28O1r+yOfs4di5r6+orrc2WPCFkS + tiqqeLFrXf2UjtKufoTZxcq4Ya+ceKLcU1YTp5Pm2V3JqpxjRy/KeHzeQdDmX1NNFUwpRVTkZs4+K1Dv + 6ty6dh3/AC3L+Cunjx1VRMTtR18OVtpmKo2Z6uHIsZoZYZXxStVkjFVrmrrRUNsTExjDVMTE4SzPL29K + 7WulpKCeCOpoqfBiuXaSbo01Ii47PNTQmgjcxuyiuZqicKp+CTy+9K7cRTMY0x8VpmnN1szFVJ0luZRs + TmsrGc6o0atvDZa5vrdacC8fvK5SqzGirHm4mvNZyi9OmnDn41DLVBlqG4qzMrn+LSNR1HPErugfpXFX + Oam1hwcmlFwU9Zm5dmn/AKtfHyvOWt2oq/7dXFyJVdkPKCsRv7siw40V2PdxxID/AN178pWH/wAFn8YX + NpyzZLPLLLbabxd0yI2VEe9UcjdKc1zlTQa72ZruRhVOODZZy1u3MzTGGJmK2NuNrliSFs1Qz2ylRy7O + ErUXZVrtOy7ToUxl7uxVjjhHH0GYtbdGGGM8XSuaeNzKWFjm7Dmsa1W47WComGGOjE11TjMttMYRDlTy + 9OjkApuQCkqaQKb0AoPQCi5AKLkA6QzzU08dRC7Zlicj2O5UXECWbTcYrjb4auPQkjec31Lk0Ob2lAuw + AAAAAAAAAAAA1167X8g2L/VU/ZpQNNQAG0HUc/iubvcKLw5gNtAAAAAAAAAEK9b3zN1Pl1J4SgaKgAM1 + uu8y6VO7KyZApVdBa6CSequOC4eMTyzvkjauHpImqionC5fWtAwoAB3iikllZFE1XySORrGNTFVcq4Ii + JygfSvdplCLJ+Q7JlxiNSSgpWNqXNwwdUP587tHqpXOUDJgNWesh1kqulq6rJWSqropYVWG83mJee16a + HU9O5O9Vup79eOhMMMQNUnOc5yucquc5cXOXSqqvCoHAAAAAAZBknPWZslX2K9ZerHUtXHzZGa4po8cV + jmZqexeLtpgukDffc9vdse8rLaXCjRKa6UuzHdbYrsXwyKmhzeF0b/SO7WtFAz0ABgG/7zNZs8hd4TQP + nUAAlTIm+645G3X3XLtg2or/AHivdKtww0U1N0Ecauj/AOa5yKjV9Lr14ARdLLLLK+WV7pJZHK6SRyq5 + znOXFVVV0qqqB0AAAAEj7id6tZu8ztT1b5XfuGvcynvdOmKtWFVwSZG+rhV203kxThA+hjHsexr2ORzH + Iitci4oqLpRUVALa7fwqt9wl8BQPlqAAAAAGV7p/Onk3/XLb+2RgfSkAAAAAAHmZpu6WXLN3vC6rbRVF + YvD+QidJw/cgfMB73yPdI9Vc96q5zl1qq6VVQOoF1ardUXO6Udtp9NRWzx08KLq25XoxvouA+n1mtVJa + LRQ2qjbsUlvp4qWnYmjCOFiMancaBeAAAAAAA1N67uWY46/LeZom8+ojmt1U73JUmg/OSdwDV0ABtJ1H + 745tZmmxPVVbJHTV0LeBFjc+KVe30jO4BKPWw8yV393o/wBpYBoUAAAAAACa+sx//wA8/wD9Vof+ICFA + AAAAAkvq3ee3K3u837NKB9CQNAOtH59szf5H/wAfTgRUAA+pVp/hVF7hF4CAXQADXjrL9YSfKu3k/KdQ + jcwysRblcGYKtHG9EVscf/Oe1ccfSN5VRWhprNNLNK+aZ7pJZHK+SR6q5znOXFXOVdKqqgdAAAAAAyPI + Ofsx5GzHBfrDP0VRFzZoXYrFPEqoropWoqbTXYdlF0pgqAfQzd3nyz56ylRZjtS4RVLdmencqK+CdmiS + F+HC1dXGmC8IGSgANZus31hqmzyz5IyhVLFckRWXq6RKm1Cjk/R4XIuiTBee70upOdjgGoqqrlVVXFV0 + qq61UDgAAAAANnOrL1hqulrqXI2bqtZqCoVsFkuUy4ugkXBrKaVy643amKvero73vQ24AAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + 87MN5gs1mqrlNiqQMVWMTW966GMTlc7QhstW5rqimONru3IopmqeJDVpm3hvuMlWscs7Vc6aoiqH7EUk + ki4dFFtri1kaOx2mppVOFMCUvRl9nDGI6NfTPPKKszmdrHCZ6dXRHNC5v+81LZFNS/u6WC8swToZ9hYm + 4pij9tjl207B4y+7NuYnaiaOZ7zG9P1xMbMxXz6kUV1bVV1ZLWVT1kqJ3K+R68Kr2CwUURRTFMaoV65c + muqap1yrU9HEyFtVWqrIHfkom4JJLh6nHHZbxuVOxieaq5mcKdfdw5HqmiIjGrV38OVcy10tRZahitbH + Cypp+ihj0MYnRz44IuK4rwqq4rwqeIoiK45cJ+T3NyaqJ5MY+by2pj2Doc7sYZZRYt4V5stlfbKRkS4v + V0M724uZtd9o1O06Ux//ALcN/IUXK9qcXfY3hXao2acHlzvrbjItyvFU9Y3qqJK9dqSRU9LE1cNCcfep + 3EXfTFNH20Rw53PVNVc7Vc8ObhgtamvdJF4vAxIKRFxSJq4q5U1Okdo23ehxIhspownGdMvFVeMYRohQ + gmkgmjmiXZkicj2O4nNXFD1VETGEvEVTE4wuLhBGyRs8DdmlqU6SFMcdnTg5n3jtGngwXhPNuqcMJ1w9 + 3KYxxjVK3iiklkbHG1XyPVEYxqYqqrwIh7mYiMZeIiZnCF8r4rauELmy3BO+mRUcyFeKNdTnp6vUnpeB + xqwmvX5e9txijV5u7hyvPVVVVVVxVdKquvE2tIBd0dLGsbqqpxSljXDBFwdI/WkbV09ly8CcuCL4rqnV + GtsopjXOpSq6qWqmWWTBNCNYxuhrWpoa1qcCIhmmmKYwh5rqmqcZUT08r79Et3FU1qfgwIv2ZHN7icTj + V5quanv+nDU2+Wnnq7vrw1rE2tS8t+EcVXUrrZEsca8G3NzMPe1evaNdzTMRz931wbLeiJnm7/piszY1 + r22/kq/yZfzjDXc109Pi229VXR4LI2NS8t2EjaqmX+uhcrOR8XtqL2VRit7ZruaMJ5J79Dbb04xyx3aV + Cno6upV6U0EkyxptP6Nrn7LU4VwRcEPVVcU65weaaJq1Ri7UNS2Cf2xFdBIix1DE1qx2vDlTvm8qIYrp + xjRrKKsJ06nWrpnU1Q+Fyo7ZwVr01Oa5MWuTkc1UVDNFW1GJXTszgonp4X8StuELaaRUStiRG0si6Oka + mqJ3L6hfvdWGGqfsnH+PH4+Pxbo++MP5cXh4fB5yoqKqLoVNaG5oXlvtFbXwVk9O1FioYlnqHroRG44Y + JyrwGq5epomIn+U4NtuzVXEzH8YxlI+QsgxS2Z896Yyopq9jJaWmxdixFTHpMUw2XORU1cBC5/PzFeFG + iadcprIZCJoxuaYq1QkNrEYxrE1NRETHkIaZxTcRg4VAOAOjkApqgHRUApuQCk5AKb00AUHoBRcgFF6A + UHoBk2QrwtPWut0rsIannRY8EiJ/xIgEgAAAAAAAAAAAABrr12v5BsX+qp+zSgaagAPUseacz2B8z7Dd + 620vqEak7qGplplkRuKtR6xOZtYYrhiB6/0sb0/nlfP+5VnwgD6WN6fzyvn/AHKs+EAfSxvT+eV8/wC5 + VnwgD6WN6fzyvn/cqz4QB9LG9P55Xz/uVZ8IBsX1Oc35sv8Acs0Mv17r7synhpFgbXVU1SkaufKjlYkr + n7OOCY4AbPAAIV63vmbqfLqTwlA0VAAAJO3ZdXneFvApUuNDDFbrK5VRlyrlcxkuC4O6FjWvfJgqYY4b + OOjHEDPbn1J89QUrpLfe7dWTtTHoHpNBtcjXbMiY9nADx9ye5PNtNvttlvzTaZ6CKy7V1nWRuMUiUzk6 + FY5W7UcjVnczvVXRiBvCBEvWU3pSZEyE+O3TdFf72rqS3OauD4mbPt9Q3ljaqI1eBzmqBoMqq5VVVxVd + KqutVA4A9GwZfvWYbvT2ey0clfcqt2xBTRJi5y61VVXBGtRNKuVcETSoGzeSepRA6liqc6XuRlQ9MX2+ + 2IxEZyOqJWvRy8eEfYVQMwqepluokhcyKru0EipzZW1ELsF5UdCqKBC29Xqp5uyfRS3ex1H+4bNCiuqE + jjWOrhYmtzokV6PanC5i48KtRAIMAAZdut3i3Xd/nGjzBQq58LHdHcKRFwbUUr1TpI14McNLV4HIigfR + qz3agvFpo7tb5Umoa+GOoppU9NHK1HNXuKBeAYBv+8zWbPIXeE0D51AAAE67kOrDdc8UkOYMxTyWnLci + 40zI2olVVtT00e2itjj4nqi48CYaQNlbV1cNy9upmwMy1BUqiYOmqnyzyOXDDFVe9UT71EQDGc/9Uzdv + fbdM7LtP/t68o1Vp5oXyPpnvRNDZYXufg1eOPBU16dQGl2ZMu3fLd9rbFeIFp7lb5VhqYlXFEVNKK1U1 + tc1Uc1eFFxA8wAB9F9w99lvm5/K1fK7blSiSle9darRvdTKq48K9DpAziqgSopZoFXZSZjo1drw2kVMQ + NZfqOWr53T/EmfDAa5bzcmxZMz1dssRVTq2O2yMjbVOYkav24mSYqxFdh3+GsDFwAG2v1HLV87p/iTPh + gPUyt1ObbYMz2i/MzRNUPtNbTVzYFpGNSRaaVsqMVySrhtbGGOAGxYAAAAAAMA3+1i0e5vNkqLhtULoc + cMfy7mxf8YHzqAAZ7uHt7a/fFlKByYoy4RVGHLTYzouni6MD6LgAAAAAAAQT1yqBlRumgqFRNuiulPKj + uHB8csSpq4ekQDSEABOnU3rVp97ksKY4VlrqYVRMMObJFLp97A223m5Ao8+5Pqss1dXJRQVT4nuqImtc + 9FhkbIiIjtGnZAhX6kOVvnLXe8wga373Mj0uRt4V2ytSVMlZT27xfYqZWo17unpop1xRujQsuAGHgANu + qPqUZXqKOCdcyVzVljY9WpDDgiuai4AVvqQ5W+ctd7zCBl28LqzWPOv7i8avVVSfuK2Q2qLoo43dIyDH + CR21qVceADBbz1L8sUForq9mY6176SnlnaxYYkRyxsV6IvZwA1LAAZtucyBR59z7RZZq6uSigqo53uqI + mtc9FhidIiIjtGnZA2K+pDlb5y13vMIGQZA6qOX8m5wtuZqa+1dXPbXveynkijaxyvjdHgqt0+nAnQDQ + DrR+fbM3+R/8fTgRUAA+pVp/hVF7hF4CAXQGJb1s9wZFyFdcyPRr6imj2KGF2qSplXYhaqaFVNpdp2Hp + UUD5w3G4Vtyr6m4V0zqitrJXz1M79LnySOVz3L2VUC2A9bKuVb7mq+0tjsdK6ruNW7ZjjbqRPTPe7U1j + U0ucuoDbTI3UzydQUkc2cKya8XByIstNTPdT0jF4WorcJn4eq2m/cgZjU9VfcbNC6NmX307lTBJo62tV + 7eVNuZ7e6gEC77eqxWZOtk+ZMrVUtzsVMivrqSdEWqpo+GTaYjWyxt9MuyitTTpTFUDX4ABPXVD3hy2L + Prsr1Uqpa8xtVkbHLzWVsTVdE5OLpGo6NcNa7PEBu0Bgm+zeIzIO7y43yNU/eT0SktLHJii1cyKjFwXW + kaI6RU4UbgB86qionqaiWpqJHTVEz3STSvVXPe964uc5y6VVVXFVApgZfux3Y5k3iZjbZrKxGMYiSV1d + Ki9DTw44bT1TWq6mtTS5eTFUDcPKHVT3S2KkY24UL7/X7KdLV1z3o1XYc7YgjVsbW8W1tKnGB6d76tW5 + i7UroFy9HQvXvKmhkkgkYvGmDlYv3zVQDVPfh1f73u2qGV9PK65ZYqZOjp6/ZwkheuKtiqGpoRyp3rk0 + O5F0ARMByiqi4poVNSgfQPq57yJc87t6SorpelvVrd4hc3KvOe+NqLHM7HhkjVFVfVbQEoAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAABqD1md6+8XLW9Ke12G/VVvt7aSmkbTQuajEe9qq5dKLrAin6ft + 8nzsrvwm+xAfT9vk+dld+E32ID6ft8nzsrvwm+xAfT9vk+dld+E32ID6ft8nzsrvwm+xAfT9vk+dld+E + 32ID6ft8nzsrvwm+xAfT9vk+dld+E32ID6ft8nzsrvwm+xAfT9vk+dld+E32IG8G5m8XO87rct3S6VD6 + u4VdI2SpqZNL3vVzkxXADNAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAPAzBUo+VtOmlsfOd91/wDY + CH95WZqmJ6Uturp4npKsVQyNejRqxsRyo1zcHKjumTHFeAm925aJ01RGrh3IPeeamNFNUxp08OtGsj3v + crnuV710uc5cVVeypORGCCmcV7DTw0sTaqrbtvem1T0q4ptJwPkw1M4k1u7Gk1zVNU4R1y2RTFMY1dUc + OJa1FRNUSulmdtPdw6kRE0IiImhERNCIh7ppiIwhrqqmZxlcUabVFXM9TGyVOy2RrfsSKea/NHDie6PL + Vw41tqTA9vEAF+2mgompLWt6SociLFRqqpgi6UdNhgqJxN1ryJr1bU1aKdXL4N2zFOmrXyeK1qameplW + WZ209cETQiIiJqa1qYI1E4ETQbKaYiMIa6qpmcZUjLy5Av7W3xratrkx6Zdqnfr6OVE1rxMciYP7S+lN + V37fu5OH+Pq3Wvu+3l4f5+jtVPbbulooP0pMY6qp0ovE6OPHBUbwOXW7sa8Uxt/dOrigqnY+2NfHLmwU + NXVXBjqeh/ePi+E01HjpfG1UxRERUcuvgxF+uKadM7OPGZeiaqtEbWHElXPGT33yz0D7TQR09Y1zFcxz + WQuZCsa8xyp6l2CbJBZLN/qrnbnGPjpT+dyn7aKdinCfhoRvJki/w3d9tlppHOhakkssLHytRiptYt2U + 5y8CJxkzGdtzRtRPx0IWclcivZmPhpeVcKpZpEjaxYaeDFkMC+lTHTtcbnLpcvHyaDfbpwjHXMtFyrGc + NUQtT21rigpmVFQjZFVsDEWSd6a0jbpdhjoxXU3lwPNyrCNGt7t04zp1OtZUuqal8zkRu0uDWJqa1Ewa + 1ORrUREFFOzGDFdW1OKienleyqkVphjTQ+pldM/lZGmxGv4SyGuNNc83DwbZ0URHLwj5rI2NS+tn5Kv8 + mX84w13NdPT4ttvVV0eC2pKSpq6mOmpYnTVEq7McbExcqnuquKYxnRDxRRNU4RplIuWd1N3p7jQ19xmh + jiiekstM1Vc/m6UYujZ0rr06iGzO9KJpmmmJ6Uzlt1VxVFVUx0JSZFHHjsMazHXsoifYIOZmU7ERCO8+ + ZCud4vUEtrpqaKF8b1mnROjcsiafbMO+2tCNVE7JL5HPU26JiqZx4akPnsjVcriaIjDhrYNW5bzAlIsV + Rb6htVQLsKvROVr4XLo2XImy7YevAq6HcSEpRmLeOMVRhV3ouvL3MMJpnGnm4mPqioqoqYKmhUU63Iur + Zba65VbaWhj6WpciqyPaa1Vw0rhtK3FTxcuU0RjVqe7dqqucKdb1b9l68QNbJcKV1PcNhXytXB3TMboW + VqtVyK9v9Ymv03Gpz2MxROimcae7m8Pg338vXGmqMKu/n8filLIOWG2jLrY6qJPGq322rY5McEVOZGqL + 6luvlxIHP5n9lzGNVOpP7vyv67eE66tbKEaiNRETBE0IicRwu91VAOigdQOrkApuQDooFNyAUnIBTXUB + RegFF6AUXoBQegFJskkMzJY3bMkbkexya0c1cUUCXbRcY7jbYKxmHtrUV6JwOTQ5O0oF4AAAAAAAAAAA + Ndeu1/INi/1VP2aUDTUAAAAAAAABtB1HP4rm73Ci8OYDbQABCvW98zdT5dSeEoGioADLd1GSX523g2bL + i7SU9XOjq17VwVtNEiyzqi8C9GxUby4AfSGioqSho4KKjibT0lNG2GngjTZYyNiI1rWompERMAKwAABo + R1o85vzJvauNNHJt0NhRLZTNx0I+JVWoXDj6dzmryNQCIgAG+PVp3R0eSsmU93rYEXM18hZPVyuTnwwP + 58VM3HS3BuDpON2vvUAmMAAA0k61+6WkylmanzJZoEgsl+c/pqdiYMgrW857Wp6VsrV22pwKjtSYAQMA + A3T6mucpbrkGuy5UP25svVKeL4rpSlq9qRjfvZWydrBANgQMA3/eZrNnkLvCaB86gAGY7n8mx5y3k2LL + 0yK6jqqjpK1E0Y00DVmmTFNW0yNWovGoH0ggghp4Y4IGNihiajIo2IjWta1MGtaiakRAO4ADTfrr2Gnp + c72S8xNRr7nQuhnw9M+kk0OXl2Jmt7QGuYADe/qk1Cy7lrexUwSCrrI0XHWizK//AIwJlAAfPbrI+e3N + Pu8P7NEBGgAD6qAAAAAAAAAI16yPmSzT7hD+0xAfPUABJfVu89uVvd5v2aUD6EgAAAAAAAQv1uui+hms + 29ra8dpOjwww2uk9NybOPbA0TAATP1R1mTfRQ9GiKxaOrSVV1o3oscU++wA3tAAaAdaPz7Zm/wAj/wCP + pwIqAAfUq0/wqi9wi8BALoAB5WbP5VvPkNT+ZcB8wAAEwdU/z22j3Cs/Zngb6AAAGgHWj8+2Zv8AI/8A + j6cCKgAH1KtP8KovcIvAQC6A1U67uan7WXMqRPVGYSXSrZwKuKwU69rCYDVYABuj1Ocg0tryRPm+oiRb + lfZXx00qppZR071j2W46U25mvV3GiN4gNgwAHSaGKeGSGZjZIZWqySNyIrXNcmCtVF1oqAaGZh6tW89c + 6Xe25fy/UT2mCsmbb6yV0cMTqbaVYndJM9iO5ipjhwgZDZOphvMrNl9zr7ba4175iySVEqfexs6P+8Ak + rJ3U1s1kutDdq3NNbPW0E0dVA6ihipdmWF6PYuMi1OpzQNiwNQOuxml9RmaxZYik9ooKV1dUMRdCzVL1 + YzaTjayLFPugNagAG/vVlyNS5X3VWuo6NEuN+jbc62bDnObMm1Ttx4mQq3RxqvGBK4ADx845Xtuasr3L + L1ybtUlygfC5cMVY5UxZI3H00b0RzeVAPmZcqCpt1xqrfVN2amjmkp52pqSSJyscndQC2A2D6mOaX0G8 + G4Zfe/CnvdGr2M46ijXbZ/dPlA3RAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADRXreeeWp8hp + PBUCFQAAAAAAAAAAB9FdwPmayn5C3wnAZ+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACnUztgp5Jnam + Iq9vgEEsKhq5auFtVNG6KSXF7o3pz248CpxnqunCcNbzRVjGMxghreRcLfW3qGSgajYFic6RdhY1dMkr + 43ucioi4+1omniLLu63VTRMVa8ezD6qzvK5TVciadWHbj9HgQQxUsLauqYj3PTGlp3anYLh0j09Qi/hL + yYnZVM1Tsx1zw43FTEUxtT1Rw4lrNNLNK6WVyvkeuLnLwqbIiIjCGuqqZnGXQywvrPitakP6w19OicG1 + K1WMx7D1RTVe8uPJp+DbZ82HLo+K1a1z3I1qK5zlwa1NKqq8CGyZeIh6Htds1YSXLj0OZB/Q6T0G/dd7 + p01/17/p39Gvboo/t3fXu6dXnuc57lc5Vc5y4uculVVeFTdENUy4DDkCpT081TM2GFu3I7UmpME0qqqu + hERNKquoxVVERjL1TTMzhC6nqIaaF1JRu2ttMKmpTQsmHpWYoipH6Lta8CJ4ppmZxnqjhxvdVUUxhT1z + w4nePC5RshXRcI0RsLl/rmomCMX17dTeNNHFjifsnH+PczH3xh/Lv+r3t2T7VFmeJa2eWmqk5tIrVa2N + z1RWujk2kVeci6OU5N5RXNqdmImOP6Ovds0RdjamYni+qccCsLQ5A1pu1wqrjcqitq1Txid6ukREwRF4 + kTk1F0tW4opimNUKVduTXVNU65Wh7a19NjSW9kOqerwlm5Ik/Jt++Xnr96prj7qseKO/ho+LbP204cc9 + 3F4/BYmxqALy64NqGU6JglLGyFW8T0TGRPfHONdrVjy8I7Gy7rw5OE9qzNjWv7Uxz2VzGIrnOp1RrU0q + qrIzQiGq7Orp+UttqNfR84S3u5yQllpf3hXMT96VDdDV09DGunY+6X03cK/vDO/snZp8sdqw7uyX6o2q + vPPYzUjUm4AAFA8O+5Ny9e0VaylRJ11VMXMlT75O+++xOmxnLlryzo5HLfydu75o08qH8z5cq8qXyFGy + rJDik9JOnNcqNdqXic3DgLFlsxF+3PwlXczl5y9yOTXDOL5R3DOcdrvOXazooqd2zJBMqsWKVFRVfsoi + o5URcF5NRF2a6cttUXI19qUv0VZnZrtzq7GfMR6Maj1Rz0RNpyJgirwrgRMpeHJhl1VAOihl1UMOqgU3 + IB0UDo4Ck9AKS6wKT0AoPQCi4Ci9NAFvIgGYburpsyz2yRdDvboceNMEencwUDOgAAAAAAAAAABrr12v + 5BsX+qp+zSgaagAJB3R7mb7vNqLnBaa6lonWtkT5lq+kwckyuRNno2v1bHCBJP1Jc/fLtq7tT8EA+pLn + 75dtXdqfggH1Jc/fLtq7tT8EA+pLn75dtXdqfggH1Jc/fLtq7tT8EBL/AFeNxeYd2VZe57tX0la26R07 + IUpOlxasLpFXa6RjNe3wATWAAhXre+Zup8upPCUDRUABsR1KLU2feBebm5u0lDbFiYvE+omZp1epicgG + 5gAAB0nmZBBJNJ3kTVe7DSuDUxUD5cXS4T3K51dxqFxnrJpKiVdfPler3eioFqBkm7awR5g3gZdssrdu + nrrhTRVDVTHGFZEWXR7migfTBEREwTQiakAAAAEVdZ+ww3fcvfFc3antvQ19M71LoZWo9feXvTtgaAAA + Ngepbdn028q5W5XYQ19rkXZ45YJo3N4eBjngbpgYBv8AvM1mzyF3hNA+dQACduprQsqd7c8zkTGitNTO + zHjdLDDo7UqgbvAAAGrfXlgR1Jk2fHTHJcI9nj220y49rYA1PAAb1dULzN03l1X4SATUAA+e3WR89uaf + d4f2aICNAAH1UAAAAAAAAAR71g6R9VuYzXE3HFtH0ujTohkZKvoMA+doADPNxFwSg3w5SnVdnbuMVPjo + /wDc4wYaePpAPowAAAAAAABA/XLuDabdRTU2PPrbrTx7PrWRSyqvdYgGkYACc+pzRun3vPlTHCktdTM7 + DiV8UWntygbwgANAOtH59szf5H/x9OBFQAD6lWn+FUXuEXgIBdAAPKzZ/Kt58hqfzLgPmAAAmDqn+e20 + e4Vn7M8DfQAAA0A60fn2zN/kf/H04EVAAPqVaf4VRe4ReAgF0Bol1uLk6r30V1OrsUt9HSUzUx1I6JKj + DVxz4gQwAA+k+6K3Mt263KdI1MFZaaN8iJq6SSFsj/x3KBloAAAAAAAHz76zNzdcN9mZHbWLKd8FNGnE + kNNG1yak9PtKBF4ADbKxdczKtrslvtiZbrVShpoabFs0SNXoY0Zox4OaBffXeyt82q736EB9d7K3zarv + foQH13srfNqu9+hA1bzxfqXMOcr3fqWB1NBda2etZA9Uc5nTyLIqOVNGOLgPDAz3cNdHWzfFlKpa7ZWS + 4R0uKaNFWi0ypo4+lwA+i4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAaK9bzzy1PkNJ4KgQqA + AAAAAAAAAAPoruB8zWU/IW+E4DPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAARtvyzK625bjtsD9mpu + T9lcFwVIWaXr29De2SW67G3cxnVSjN6X9i3sxrqYNNmGxZXy66ms9WtZea2NjnzK5ZNhXNx2lXvW7KOX + Zbx6zqpy9y/cxrjCily1Zi3YtYUTjXUw+aJnRwVlZi+JkSc1VXamme50uzjrw9sxevFyqhJUzpmmnl+E + av8ACMqjRFVXJ8Z1/wCXlTzy1EzppVxe7XwIiJoRERNSImhEOimmIjCHNVVMzjLoemACtCkvSxpCjlmV + ydGjcVdtY6MMOHE8zhhpeqccdGt7F1dHbql607USqqk6VZG4KyFsmuOJUxTFq4tV3aTjXntY1xp1R288 + um7hROjXPZzQ8Q6XKAEAqQQSzyshhar5Hrg1qa1UxVVERjLNNMzOELupmhpoXUdI5Hq7BKqpT06pp2Gc + PRov4S6eLDXTE1TjPVHDjbKqopjZjrnhxLE2tQB6KTRXHBJ3pFcE7ypcuDZcNSSr6V3E/wDC9UacJo1e + Xk5Ojw+DdjFevzcvL0+PxZXJvGzbaaGGhmkjkrmoivWVmL42Yc1HrjznuTT2MOFVOGN32blU1R5XfO8L + 1umKZ8zxrtvCzXc6daees6OF3ftgake1yK5vOw5MTotZC1ROMRp53Pd3hdrjCZ0czHDscS4t9OyeoRJV + VKeNFkncmtI26Vw5V1JyqeLlWEaNb3bpxnTqdKqpkqaiSd+COkXHZTU1NSNTkamhD1TTsxgxVVtTipGX + lc2yGOavgZKmMG0jp0TX0bOdJ+Kini5MxTOGt7txE1RjqUZ5pJ55J5Fxklcr3ryuXFT1TGEYQ81TjOMu + hlhJe6HLb3zTX2ob7S1FhpWr6Z2KK5/3uCInL2CF3tmMIi3GvjTe6ctjM3J1aoSqQSeAOFA4A8++XWS1 + 0DqxlHNWtYqdLHBsq5rOF+CqmOHIbrFqK6sMYjpab92bdO1hNXQ8K3bzsqVrJHLLLTdEiOek0a6Gq5G4 + +19ImtyHTc3Zdp5JctvedqrljpeKyooc9Zui2Yllsdojcr1fiiSySLgmjWiLs4pjwN5TpmmrK2df319j + miqnNXo0fZR2s4tdmttqikht8KQQyyLM6NqqrdtyIi4Iqrh3qaE0EZdvVXJxqnGUpas024wpjCF4pqbX + UDhTA6KZZdFDDgDo4CmoFNwFN6AUnAU3oBQegFFyAUHoBQemgDvba99vuVPWNx9pejnInC3U5O20CY45 + GSRtkYu0x6I5rk4UVMUA7AAAAAAAAAAGuvXa/kGxf6qn7NKBpqAA2g6jn8Vzd7hReHMBtoAAAAAAAAAh + Xre+Zup8upPCUDRUABtR1GoGrLnOoVF2mtt0bV4MHLUq7wUA2sAAAPOzLHLLly6xxflX0dQ2PThzlici + aeyB8vAAEjdXdYE305U6fvPGnYa+/wChk2NXr8APocAAAAMK31+aPN/+lVX5pQPnAAAmrqh+eWm8hq/B + QDeoDAN/3mazZ5C7wmgfOoABsT1JmMXeFfJFRNttpc1ruFEdUwqqdvZQDcsAAA1g68f8Kyj7vW+BCBqU + AA3q6oXmbpvLqvwkAmoAB89usj57c0+7w/s0QEaAAPqoAAAAAAAAA8jONmW+ZSvdmREVblQVNI3Hjnhd + GnouA+YaorVVFTBU0Ki60UDgC5tlwqLdcqS4Uy7NTRzR1ELuJ8Tke1e6gH0+sd3pL1ZaC70btqkuNPFV + U7uOOZiPb6DgL0AAAAAAGo/XczPHNecu5Zifi6jglr6pqadNQ5I4kXiVEhevYUDWMABtB1H7I590zRfH + NwbDBT0UTuNZnulkROx0LO6BtoAA0A60fn2zN/kf/H04EVAAPqVaf4VRe4ReAgF0AA8rNn8q3nyGp/Mu + A+YAACYOqf57bR7hWfszwN9AAADQDrR+fbM3+R/8fTgRUAA+pVp/hVF7hF4CAXQGgHWj8+2Zv8j/AOPp + wIqAAfTXd7/IOWv9Kof2ZgHvgAAAAAAAfOXfm+Z+9/NyzIqP/eU6JimHNa7Bn4qIBgoAAAAAAAADIt3L + 3x7wssSMVWvZdqFzXJrRUqWKioB9MgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA0V63nnlqfI + aTwVAhUAAAAAAAAAAAfRXcD5msp+Qt8JwGfgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA1q3yXz96Z1 + qI2O2oKBraaPDVinOev4TsF7BZ92Wtm1E/lpVfel3auzH46GH0NKtTNsq7o4mIr55cMUZGmt39CJwrgh + 211bMOCijanmXl8nSaam6NFZTtp42wRqu1stRMNfGq4qvKeLFOETjrxbMxVjMYasHnIb2gA7MarnI1Ex + VVwRE4TBD0pHJbWOhYqLcHorZpEX8i1dCxt9evpl4NXGaY+/T/Hvb5+zR/LuU0Txi2L/AGtEuPKsMi4d + xki/jnrVV/bv/wAdzGun+vd/nvWRsagDsxj3vaxjVc9yo1rUTFVVdCIiIJnAiMV9NIyhhdSwuR1VImzV + zIuKNRf6pip+OvDqTR32qI2pxnVxePg3TOzGEa+Pw8VgbWkAAXtDEyGJa+dqOjjdswROTFJJU04KnC1m + OLu0nCa65xnZhtojCNqeEuyXNahFjuSOqWKqqk+PtzFVcVVrl1pj6V2jiw1mP14eXR3H7cfNp71Oe3Pb + G6enclTSppWViaWY6PbGa2LwadHEqmabnFOiWKrejGNMcNa0NjWvnr4tbGxouE1YvSS8aQsXBjfvnYuV + ORqmuPuqx4o7+HzbZ+2nDjnu4fJYmxqALygwZDWVCrgrIejjXjfKqMVvvavXtGuvTMRz931wbLeiJnm7 + /piszY1vTy5Yau+3aG302jbXallwxSONO+evY+yacxfi1RNUt+XsTdrimGw1voKa30MFDTN2IKdiRxpw + 4JwryrrUqNyua6pqnXK327cUUxTGqFc8Pbw825ppMuW1KuZizSyO6OCBFRqudhjpXTgicK4HTlcrN6rC + NDlzeaizTjOl5eRs/szHNNSTU/i9bE1ZURi7THRo5G610oqbSG/O5D9MRMTjS0ZLP/umYmMKmXqR6RcA + QzmOz09FvI6CeVtLQV70lfI7Q3o6hFbKi8W07abyFky96astjGmqn5albzFmKczhOimr562U5UyHfMuX + zpoK+Ka1ytc2pYrXNe5ERdjmaW4ovDtcZwZrPW71vCacKuJ35XI3LNzGKsaONnZFJVwoHCgcAdFA6KB1 + A6uApOA6KBTdqApOApv1AUHAUXAUX6wLd6awLeRNAEn5GuPjlgiY5cZKVVgd2G6W/iqiAZAAAAAAAAAA + Aa69dr+QbF/qqfs0oGmoADaDqOfxXN3uFF4cwG2gAAAAAAAACFet75m6ny6k8JQNFQAG2vUc/hWbvd6L + wJgNnwAADrJGySN0cibTHorXNXUqKmCoB8uLvbpbZda23TflaKeWnk4OdE9WL6LQLQDJN21/jy/vAy7e + pXbFPQ3CmlqHKuGEKSIkun3NVA+mCKipimlF1KAAAAIp60F+itG5i9tc7Ca5LDQU6eqdLKjnp70x6gaA + gANhOpXaJKjeNdbmrVWGgtj2bSYYJLUTRoxF7LI3gboAYBv+8zWbPIXeE0D51AANiupL/P19/wBKX9pi + A3KAAANYOvH/AArKPu9b4EIGpQADerqheZum8uq/CQCagAHz26yPntzT7vD+zRARoAA+qgAAAAAAAAAB + 86N+uUHZU3qX+2NZsUstQ6tofU9BVe3MRvIxXKz70DAgAG5HU+3nwXTLUmRq+VEudn2prbtLplo5HbTm + pjwwyO/BcmGpQNjAAAAAAs71eLdZbTV3a5ztp6ChifPUzO1NYxMV7K8ScIHzc3j51rM7Z2uuZapHM8fm + VaeFy49FAxEZDHo0c2NqIuGtdIGNAAN9eqtlB2Xt0dBUTs2Ku+yPukqLr6OVEZBp4lhja/74CXwAGgHW + j8+2Zv8AI/8Aj6cCKgAH1KtP8KovcIvAQC6AAeVmz+Vbz5DU/mXAfMAABMHVP89to9wrP2Z4G+gAABoB + 1o/Ptmb/ACP/AI+nAioAB9SrT/CqL3CLwEAugNEetvbnUm+ivqHN2UuFJSVLV40bElPj3YMAIZAAfRjc + Rd47rueylUxqipFboqRcPVUeNM70YQM8AAAMAzfv23a5PzL/ALezHcZKGu6Fk6v6CaaJGyY7KK6Fsiov + N4gPRs297dfeUb+7s02yV78FbC+pjilXH/lSqx/oAZZHJHIxJI3I9jtLXNVFRU5FQDsB89+slb30O+zM + 8bkXCWaKoaq8KT08cmjQnC7ACMwAG9Vq6ru5CvtdHXNtEytq4I52q2sqkRUkYjtGMnKBd/VP3JfJE/xy + p9mA+qfuS+SJ/jlT7MB9U/cl8kT/AByp9mA+qfuS+SJ/jlT7MB9U/cl8kT/HKn2YFzbOrBucttypLjSW + qZlXRTR1FO9auociSROR7FVFfguDmgSsAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGivW888t + T5DSeCoEKgAAAAAAAAAAD6K7gfM1lPyFvhOAz8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALa51kdFb6 + irkXZZDG57ncSImszTGM4MVVYRi1BrquSsrairl/KVEj5X/dPcrl+yXSinZiIjiUm5VNUzPKuaz/AAsL + aBv5XFH1i8O3wR/+mmv12PEh4o+6dr4ePX3Pdf2xs/Hw6u91rv0ehXHFVgXHtTyJ9hD1b11dPyh5uaqe + j5ytUNjWAelHhboUk/8A6hK1Fj/5LHJij/dHel9SmnWqYaZ++cP49/0bo+yP+Xd9VgbWpXoqnxapbIrd + uPS2WPHDajemy9uPK1TzXTjGD3RVhOJW0q01Q6NHbca4OikwwR7HJi13bTuCirajErp2ZwUEPTw9FF/d + sOP/APUJm+8xuT849PwU5V5urzz/AMY7fo3eSP8AlPZ9Xnm1pAAFajpX1U7YmuRjcFdJI7vWMamLnL2E + PNdWzGL1RTtTg711U2eRrYkVlNCmxTxrrRqLjivrnLpdymKKcNetmurGdGqFse3h3gnnglSWCR0cjdT2 + qqLp0LqMVUxMYSzTVMTjD0qN1DcqhsVXF4u9UV0lXToiIjWornufFoauDU9Js9s017VEYxp5p8f8t1Gz + XOE6OePDwwcV1FU1lRJU0mxVRL3jIFVzmMamy1qxqiSIjGoiY7OHKZorimMJ0dPDAromqcY09HhreWqK + i4LoU3NABeOwjtDE9NUzq5yethaiMVOysr+4a4019Ed/+GydFHTPd/mXFqtNwutbHR0MLpp5FwRE1Inq + nLqRE41F27Tbp2qpwgtWqrlWzTGMp0yZk6ky3QKxHJNXT4LVVHAqpqaz1qeiVjOZub1X/GNS05PJxZp/ + 5TrZEcbsFAiXevW011vVvtFvRai4U6ujkRmlNuZW7Mf3SbOniJ/ddE26Kq6tFM/JX961xcrpop01R82c + ZLynTZdtbYcEfXTYOq504XepavqW8HdIvOZqb1eP8Y1JXJ5WLNGH8p1sgU5HW4AsrnZLTdI+juFJFUph + givaiuT7l3fN7Sm23ero8s4NVyzRX5oiV1GxrGNY3vWojUx06E0GqZxbIjByGXAHCgcAdXAdFA6KBw4C + k4DooFNwFJwFN2oCg9AKL9YFF4FB6aQLaQDKN29esVzqKJy8ypj22p6+P/8AiqgSMAAAAAAAAAAa69dr + +QbF/qqfs0oGmoADaDqOfxXN3uFF4cwG2gAAAAAAAACFet75m6ny6k8JQNFQAG2vUc/hWbvd6LwJgNnw + AAABoD1nMpPy7vfvDms2aS8q260zsO+8Zx6b+/bIBFIADfHq073KPOuTKe0Vs6Jmaxwsgq4nLz5oGcyK + pbjpdi3BsnE7X3yATGAAAaSda7e3SZtzNBlqzTpNZLA5/TVDFxZPWu5r3NVO+ZE3mNXhVXa0wUCBgAG7 + XU7yXJZt3dTf6mPYqsxVHSRYpgvilNjHFjjxvdI5ORUAnoDAN/3mazZ5C7wmgfOoABsV1Jf5+vv+lL+0 + xAblAAAGsHXj/hWUfd63wIQNSgAG9XVC8zdN5dV+EgE1AAPnt1kfPbmn3eH9miAjQAB9U2PY9jXscjmO + RFa5FxRUXSioqAcgAAAAAAAANdOuNu2lu+W6TOlvi26yxosFxa1MXOopHYtfx+0yu7jnLwAabAAPRy9m + C75evVJerPUupLlQyJLTzs1o5OBUXQ5rk0OauhU0KBvZuX6wOWN4dDDRVMkdtzXGzCptj12WyqiaZKVz + l57V17GO03hxTnKErgAAFleb1abJbZ7nd6uKht9M1Xz1M7kYxqJyrwrwJrUDSjrC9YWbP0y5fy+slNlK + mk2nvdiyStkYvNkkbrbE1dLGLpx5ztOCNCDwAGY7pcgVWfM+WzL0TXJSyP6a5TN/qqSJUWV+PAqpzG+u + VAPo/TU0FLTxU1PG2KngY2OGJqYNaxibLWonEiIBUAAaAdaPz7Zm/wAj/wCPpwIqAAfUq0/wqi9wi8BA + LoAB5WbP5VvPkNT+ZcB8wAAEwdU/z22j3Cs/Zngb6AAAGgHWj8+2Zv8AI/8Aj6cCKgAH1KtP8KovcIvA + QC6A1U67uVZNvLma4mYswktdW/DUuKz06dvGUDVYABtj1M95NItDW5Br5UZVMkfXWfaXRIx6J08LeVqt + 6RE4cXcQG0YAClV1dNR0s1XVStgpaeN0s8z1RrGRsRXOc5V1I1ExUD5ub1s5/wC894V7zG3HxetqFSjR + yYKlNC1IoMU4F6NjVXlAxMD3MoVeaf35Q27LtwqqGvuFTFT060k0sLllmekbdMatXWqAfTKiplpaOCmW + V8ywRsj6aVyvkfsNRu09y6VcuGKqBp911csPpM52fMcbFSnulGtNK9E0dPSPVdK8GMcrcPuQNcgAG/PV + iz7TZp3XW+jdKjrrl9jbdWxY85GRJhTPw4nQoiY+qRQJbAAeDnzNdJlLJ13zHVOakdtpnysa7U+XDZhj + 7MkitanZA1gs/XfzNErf3zlmiq09MtHPLS6ORJEqgM6s3XT3dVKNbdLVc7dIuG05jYaiJF4ecj2P/EAk + fJu/PddnG4w2uw3pJ7pOj1joZIZ4ZF6Nqvdh0jGtXBrVXQoGeAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAABor1vPPLU+Q0ngqBCoAAAAAAAAAAA+iu4HzNZT8hb4TgM/AAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAADB98N2WgybVRtXnVTViVOHYcmwvovQ7d329q7HM4t4XNm1PO13tyJC19e9MegwSBF1Omd3v4 + Hfr2EThLLc0/by9ysUaPu5O/hpWmKucrnLiq6VVdaqbWpeSor7VTya1jlljXkaqMe1O6rjXGiueiHudN + EdMrQ2ta/o446aDx+dqPXFW0kLtKPemt7k9Qz0V0cZqrmap2Y622iIpjanqWr5JJXulkcr5HuVz3uXFV + VdKqqmyIiNENczMzjLqAAv6f/G0nimGNTBi+lXhc3W+L/iZy4ppVyGqr7Zx4p1+LdT90YccavDwKNkdL + AlfO1HPXFKOFyYo5yaFkcnCxi912jSiOFc7U7MdbFEbMbU9XDh3rKSR8j3SSOV73qrnvcuKqq6VVVU2x + GDXM4uAwAAL+pxoqXxRNFTOiPq+Nre+ZF/xO5cE1tNVP3TjxRq8W2r7Yw451+CwNrUAAL5iLTWx0mqWt + Xo2caRRqivX75+CIvI5DXOmro722Ptp/t3LFFVFRUXBU0oqGxqXqXeqfoqkZWJqxqG7T8OLpU2ZcE4to + 1/qji0dHhqbf3TOvT0+Os6Szy9/FNSuXW6NyTM7CRv2Hd2RRhXHJPZw+BjRPFMdvD4s1yvkKlvdTA6ap + 27ZQwsbIxqOZK98qLOjV1tbol04KvFykbmc9NqJwj7qp7tHySeWyMXZjGftpjv0/NKlttNttlOlPb6Zl + NEmtrEwVV43LrcvKpBXLtVc41TinbdqmiMKYwXZrbADE94GY7ra6JlLaaWWatq0ciTxsV6RNTBMdCLzl + x5p35DL0V1Y1z9sdqPz+Yrt04URM1T2MT3VWCoW+VdxuUL2VFOzGFJ2ua9Xyqu1JzkxXBEVMeU796X42 + IppnRPJzODddif2TVVGmOXnSuQKfAOoADgwOFMgB1UDgDhTApqZZdVDDqoFNwFNQOjgKTtYFJdQFF/CB + QeBReBQfrAt5EArWSt8RvNHVY4Njlbtr6xV2XfiqoEzgAAAAAAAAAGuvXa/kGxf6qn7NKBpqAA2g6jn8 + Vzd7hReHMBtoAAAAAAAAAhXre+Zup8upPCUDRUABtr1HP4Vm73ei8CYDZ8AAAAQr1pt1s2cckNu9shWW + +5e26iKNiYvmpXInTxJwq5NlHt7ComlwGioAD0bBmC9Zeu9PeLLWSUFypHbcFTEuDmrqVFRcUc1U0K1U + wVNCgbN5J668DaWKmzpZJH1DEwfcLYrFR/K6nlcxGrx4SdhEAy+o65u6iOFz4qS7TyInNiSnhbivZdOi + IBC+9XrWZuzhRS2ix0/+3rNMitqFjkWSrmYutrpURiMavC1iY8CuVAIMAAZpuk3aXPeHnOksdKjo6NFS + a6ViJikFM1ee7i2nd6xOFy8WIH0Yt1vo7bb6a30MTYKOjiZBTQt71kcbUaxqdhqAXAGAb/vM1mzyF3hN + A+dQADYrqS/z9ff9KX9piA3KAAANYOvH/Cso+71vgQgalAAN6uqF5m6by6r8JAJqAAaA9aOk8W345iwb + ssn8UmZpxx2qOHaX8NHARSAA2yyD1zMv0eW6Shzbaq990o4mQOqre2GVk6Rt2ekc2WWBWOXDSiYp2NQF + 3Sdcdl6zhY7JZbB4tQXG40tJVV1fLtSJDPMyN7mQwpg1zWuVUxe7sAbLgAAAAAAAUqukpqylmpKqJs9L + URuinheiOY+N6K1zXIutHIuCgfP/AH8bma/dxmd/i7HzZYuD3PtFYuK7KLpWnld/aR8Hqm87jRAjAAB2 + jkkikbJG5WSMVHMe1VRzXIuKKipqVAJcyf1p97eW4Y6aWuivlHGiNbFdGLK9E93Y6OZV+7e4DP4evDe0 + jak2VKZ8vpnMq5GNXsNWN+HdA8y99dfPdTE6O0WW325XJgksqy1T26NbdMLMceNqpyAQxnLeJnXOdW2p + zNdp7i5i4xQvVGQxqv8AZwxo2JnZRoGOAAKtLS1NXUxUtLE+epne2OCCNqve971wa1rUxVVVVwREA346 + vO5qPd1ld0twa1+Z7sjZLnImDuhaiYspmOTHQzHFyprdyIgErgAAGgHWj8+2Zv8AI/8Aj6cCKgAH1KtP + 8KovcIvAQC6AAeVmz+Vbz5DU/mXAfMAABMHVP89to9wrP2Z4G+gAABoB1o/Ptmb/ACP/AI+nAioAB9Sr + T/CqL3CLwEAugMS3r5Dp895DuuXJFayoqY+koJ36o6qJduF2OCqibSbLsPSqoHzhuNvrbbX1NvroXU9b + RyvgqYH6HMkjcrXtXsKgFsBXoa6toK2CuoZ301ZTPbLT1ETlY9j2Li1zXJpRUUDZzIPXTnpqOKjzxaJK + 2WJuy6627o2ySYJgivpnrHHtLwq17U9agGcz9czdPHC58dLdppETmxtp4Wqq9l06IgEGb4+s3mXPtHLZ + LbT/ALly5Ivt8CP26ipRFxRJpERqIzRjsNTsq4CFgAGwPU/3dS3rOsmbquLG15fRW07nJzX10rcGImOv + oo3K9eJdkDdMCON/+7h+fN3FdbqWNH3iiVK61cazRIuMae6xuczsqi8AHz0ex7HuY9qte1VRzVTBUVNC + oqKB1AyndxvHzJkDMkV8scqI9E6OrpJMVhqIVXFY5ETuoqaUUDcjJPWq3V5hpI0udauXrkqIktJXI7ot + pdexUNRY1byu2V5AMluO/wA3OW+ldUzZsoJGN9JTvWpkXsRwpI/0ANU+sD1hJ94r47LZoZKLK1JJ0uEu + iaqlbijZJWtVUaxuPNZp4104I0IVAAbYdTLdvLDDX5+r4tnxhrqCy7SLirEdjUTJjowVzUjavI9ANpAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA0V63nnlqfIaTwVAhUAAAAAAAAAAAfRXcD5msp+Qt8 + JwGfgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABCm/m6LJWxW9i49BDGj2ppxWoer0T/pya3VR/Lho/yh + N7XP48NP+EU3FUjfHRMXmUqK168czvyi9pU2U5GoTNvT93L3cSFu6J2eTv41qnCbGteUidJQVkPC1I6h + qcKrG7YVE+9lVe0a69FUT1cPg2UaaZjr4fF1oqVsz3PlVWU0Kbc7017OOCNb65y6E+0eq6sNWuXminHX + qh1rKp9TNtqmwxqI2KJO9YxO9anY9HWKKdmGK69qVPgQ9MQAALu3QI6VaiRzo6emwfLIxcHY481jF9W5 + U0cWvgNdyrRhGuWy3TpxnVC6ukv7za65RtRkjERtTTM72NNTXsT1C6l4ndlDxajY+2eqeHG93Z2/ujrj + hxPLN7QAAL23xsjY+vmajo4FRImO1PmXS1MOFG987ucJruTj9scfc224w+6eLvWkkj5JHSSOV73qrnuV + cVVVXFVVTZEYNczjpdQwAd4IZJ5o4Yk2pJXIxjeNXLghiqYiMZZppmZwhXuU8ctSrYVxp4ESGDlYzRtf + fri5eVTzbpmI065erlUTOjVC1PbwAVaWnfU1UNOzDbme2NuOrFy4J9kxVVhEzyPVNO1MRyps3YNa+yVl + Y1FRtZWzSx4+oTZa1O1sla3lP3xHJTCzbs8k1ctUswI5IgACFd7y1a5qb0rVSFKeNKZeBW4qrvx1Usm6 + cP1aNeOlWd7Y/t06sNCpuddL/ueoa12DFpHrI3jwkZh6KmN74fqj+3i9box/bP8AXwTKVxZADhQOAOFA + 4UABwoHUDhTA6KZZdFDDhQKTgOigU3AUnawKagUHgUXgUXgUHgW8nCBbPQCZrDWLWWaiqVXF0kTdtfXI + mDvxkAvwAAAAAAAAGuvXa/kGxf6qn7NKBpqAA2g6jn8Vzd7hReHMBtoAAAAAAAAAhXre+Zup8upPCUDR + UABtr1HP4Vm73ei8CYDZ8AAAAANTOsV1aKqGpqs4ZGpFmppVdNdrJCmL43quLpqZid8xdbo00t9LzdDQ + 1fVFRcF0KmtAOAAAAAAyXIW73NOer7HZsvUizzLgtRUOxbBTxr/WTSIi7LfRXUiKoG/O6XdTYd2+WW2q + 3e31s6pLc7k5qJJUTImHLsxt1MZjo7KqqhmwADAN/wB5ms2eQu8JoHzqAAbFdSX+fr7/AKUv7TEBuUAA + AawdeP8AhWUfd63wIQNSgAG9XVC8zdN5dV+EgE1AANQOurk6opsyWfN0MarR19P+76p6JobUQK58e0vH + JE/R9woGtQAABfWOu/d97t9eq7PilTDPtadHRyI/HRp4OAD6jAAAAAAAAAPJzVlWxZqsVVY75Stq7dVt + 2ZI3a0X0r2O1te1dLXJqA0a3y9XnNW72plrqZj7rlZzsYbnG3F8KKuhlU1veLwbfeu5F5qBEwAAAAAAA + HpZey5fcx3aC02OiluFxqFwip4W4ryucuprU4XOVEThUDdXcL1crdkJkd+vqx1+bZGYMVvOhokcnObDi + nOkVFwdJ2m6MVcE2gAAADQDrR+fbM3+R/wDH04EVAAPqVaf4VRe4ReAgF0AA8rNn8q3nyGp/MuA+YAAC + YOqf57bR7hWfszwN9AAADQDrR+fbM3+R/wDH04EVAAPqVaf4VRe4ReAgF0AA146y/V7nzSj845Up0dmG + JiJc7exMFrI2IiNkj/5zGphh6dvKiI4NNZYpYpXxSsdHLG5WyRuRWua5q4KioulFRQOgAAAAAZbuz3Z5 + k3hZkjs1mj2WNwfX170XoaaHHBXvVNar6Vuty9tUD6E5FyXZcl5Xocu2dmzSUbMFkdhtyyOXGSWRU1ue + 7T6CaEA94ABqf1nur3VpWVefMpUyzQzKst9tkLcXskXS6qianfNdrkamlF52pV2Q1bAAAAAABJm5Hcpe + 95F+Zix9LlmkkT963PDBNCbXQQ499K/8VF2l4EUN/bTarfaLXS2u2wNpqCiiZBSwM71kcabLU7iAXYAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAaK9bzzy1PkNJ4KgQqAAAAAAAAAAAPoruB8zWU/IW+E + 4DPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA10z3cEq81ZhuWOLLfUwRwIv9pFHJGxE4Fwk5+HEiliy + tGFuin8onvj5aFczVeNyur8Zjun56Ue61xXWSqIdk1KGV3anIlwgaqKrZV6F6ImK7MyLG7BOPB2g8XY+ + 2fj8Hu1P3Rz6PjoVrn/hVW1sXRTPXxlyennTmu+9Z3re2vCebX3ffy6uh6u/b9nJr6Xnm5pd+IwyAd4I + JaiZkMTdqSRyNYmrSvKpiqqIjGXqmmZnCFzXTxIjaOndtU0Cri9MfbJF0Ok06cOBvJyqp4opnXOuXuuq + PLGqFGmqZaaZssS4OTFFRUxRUVMFa5F1oqaFQ91UxMYS8U1TTOMLirpYnxLWUaf4dVwlhxVXQuXgXHSr + V9K7tLpPFNUxOzVr73uumJjap1dyyNjU7wQSzzRwxJtSSORjG8aquCazFVURGMs00zM4QuLjPErmU1Ou + 1TUyK2NyaNty9/J98qaPWoicB4t0zrnXPDB7uVRqjVHDFaGxrAAF9b/aKeprF79jehgw/tJUVFX72NHd + hcDXc0zFPDQ229ETV1fH6JPy7u+sNsy5JWZihSaeaNJJ2u2sYW60YzZ523x4acdCcsHmM/crubNucIjt + TmXyFui3tXIxmexFl0fRPuE7qGB9NSbSpDDI5XPa1NHOVeEnbUVbMbU4ygrs0zVOzGELU9ta8tXNqnTf + 2EUkqLxOaxdhfw1aa7urDlbLWvHkTdu1ibHkq24JgrkkcvKqyvKzvGcb9XDiWfd0YWKeHG9+vuFFb6Z1 + TWzNggbgiyPXBMV0Ihy0W6q5wpjGXXXcpojGqcIXB4ewDB97dFa5MtpV1KbNZDI1lG9uGKuevOYvrdlF + XtEnuquqLmEap1ove1FE2sZ1xqRBbLrcLXWMrKCZ0FQzU5vCnC1yalReJSw3bVNcYVRjCvWrtVFW1TOE + pOXetX3COOlsVokqLi+NFkV3OYx+HOVGsxVWoupVVCE9rpo03KsKU37pVXot041PKntO9Gu6ZtZ4yk73 + RTwObKxrGuR2yrU2HbLNEm0v3Jvpu5WnDDDDVqaKrWaqx2scdE60p22Crgt9PDWT+M1UcbWzz4Im29E0 + rgmBBXKomqZpjCE9bpmKYiqcZXB4exQOqgAOFA6gcKYHRTLLooYcKBTcBTUDo4Ci7WBTUCi8Cg8Ci8Cg + 8C3k4QLaTWBJm7mqWbL6xKummmexE5HYPT0XKBlIAAAAAAAACIOstuyzTvAypa7bl2OGSqpK/wAZmSeR + Im9H0L2aFXHFcXIBrp9UPfL+rUPxtv2gH1Q98v6tQ/G2/aAm7qx7m867vK6/zZkip42XGKmZTdBMkqqs + TpFdjgiYd+gE+AAAAAAAAAI26wWRL/njd1NYbCyN9wfVQTNbM9I2bEblV3OUDV76oe+X9WofjbftAPqh + 75f1ah+Nt+0BPvVj3T5v3eUN/hzJHBG+4y0z6boJUlRUibIjscETDv0Am0AAAAAAEV7zerhu8z3JLXvh + dZ75Ji51yoUa3pHrwzxKmxJyrocvqgNcc39ULelZnvks6U2YaRFXZdTSJBPspwuhnVqY8jHuAjK6btN4 + lqkVlxyzdKZWrhtPpJ9hfuXo1Wu7SgWCZSzUq4JZq5VXUni03sQMhse5He1e5GsoMq3BEdoSWphWki14 + flKnomeiBM+Q+pZdZpI6rO92jpKdMHOttuXpJnJ6l870RjPvWv7KAbOZSyZljKNpZacu2+K30LNKsjRV + c92GG3JI5VfI71zlVQPaAAAMT3r5cueZd3V+sNrax1wuFKsNM2R2wxXq5F0uXVqA1B+qHvl/VqH4237Q + D6oe+X9WofjbftATB1adx+fN3+a7pcsxRU8dLV0Hi0KwTJK7pOmY/SiImCYNUDYoAAAhLrObp837w6Gw + Q5bjgkfbpal9T08qRIiStjRuGKLj3igQF9UPfL+rUPxtv2gH1Q98v6tQ/G2/aA2h6vuRL/kfd1DYb8yN + lwZVTzObC9JGbEjkVvOQCSQAHjZvyhYc3ZfqrDfaZKm31bcHJqex6aWyRu9K9i6UX+gDTfeD1Sd4lgqJ + Z8usTMlpRVWNYVbHVsbxSQOVNpU1e1q7HXggEUVeRs7UcywVeX7lTzJrjlpJ2O4tTmIApMiZ3rJOjo8v + XOpk9RDR1D3aeRrFAkDKvVa3w36RizWttlpHa6m5SNiwTh9pZ0k2PZYnZA3yoopoaOCKd6STRxsZLImO + DnNaiOVMcV0qBWAAAAAAAAAcPYyRjo5Go9j0Vr2OTFFRdCoqKBCG8Lql7vMyyS1tlV+WrnIquVaVqSUj + nLwrTKrdn/03NTkAgPNHVL3u2Zz30NLT32mbivSUMzUfs8sU/RPx5GbQEdXPdvvBtb1bcctXSlw9NJRz + o1ew7Y2V7SgeP+6br+pT+9P+0BXpct5irH9HSWusqJNCbEUEr1xXVoa1QMvsG4HfDfHNSkyvWQMdp6Wt + alE1E4/8SsSqnYAmDJPUor5HMqM6XtlPFrdb7Ym3IqcTqiVqNavYjd2QNkclbvcnZJt3iGWrZFQxOw6a + VMXzSqnDLK7F7+2uCcGAGRAAAAABqhvw6uW8vOG9G9ZjssFI+2V3ivi7pahsb16Gkhhfi1U0c+NQME+q + Hvl/VqH4237QD6oe+X9WofjbftAbx0EL4KGmhk7+KJjHYaUxa1EUCuAAsb/RzVtiuNHAiLPU0s0MSKuC + bckbmtxXsqBpH9UPfL+rUPxtv2gH1Q98v6tQ/G2/aAkLcN1eN5GS95dvzBfIaVlupoqhkroqhsj8ZYXM + bg1E9U4DagAAA1Q34dXLeXnDejesx2WCkfbK7xXxd0tQ2N69DSQwvxaqaOfGoGCfVD3y/q1D8bb9oB9U + PfL+rUPxtv2gN46CF8FDTQyd/FExjsNKYtaiKBXAAAIt3q9XfIm8Fz66VjrTf3J/FqRrcZF1J4xEuDZc + OPFHcG1gBrLm3qmb2bHI99upob/RpiqTUMjWyo310Myxvx5GbQEb3Dd5n63SLHX5bulM5F2fbaOdqKvI + qswXtAWqZSzUq4JZq5VXUni03sQMgsm5TezepGsoMqXHB+hslRA6liXBcPylR0TPRAmPInUtvlRNFVZ1 + ukdDSouL7fb16aocnqXTOTo4/vUeBtDlHJmWcoWeO0ZdoI6Chj0q1iYukfhgr5Hri571w75yge0AAAAI + S3o9VXJGb55rnZX/AO3L3KqvlfBGj6WZ66VWSDFuy5V9NGqcao5QNdM0dVrfDYpHrDamXmlbpSptsrZc + f/Sf0c2PYYBgNbkHPVDJ0dbly50z9WzNR1DF1Y+mYnGBbtyjmtzka2y17nOXBrUpplVVXgTmgZPYNxG9 + 2+yMbRZWromPVPbqyPxOPBfTbVR0WKdjECct3XUwjilirs+XFs6NVHLZ7erkY7h2ZahyNdhwKjGpyOA2 + ZtFntVmtsFstVJFQ2+lbsU9LA1GRsbr0InGulV4VAvAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAaK9bzzy1PkNJ4KgQqAAAAAAAAAAAPoruB8zWU/IW+E4DPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AB1lkSOJ8jlwaxquVeRExA1RusyT22pqlVVlrq5aqTTzdl6zNZo40cx/aUtluMK4jkpw7voqNycaJn8q + se/6vCTWdbjdk1KGV9S4UtK6sX8vJjFSpwpo58naRdlvKuPpTXV907PFx+HD5tlP2xtcfF48PkXBOmip + 61P61vRTe6xIiL+EzZd2VUW9EzTwwkuaYirhjCyNrU7qYZAL9P8ABUeOqsq2rh6yB2j8KTwfujV5quaO + /wCnf0N3lp557vr3dKwNrS5Aq0tVNTSpLEqY4YOa5EVrmrra5q6FReIxVTFUYS9U1TTOMLmWkhqYnVNC + mCMRXVFJji6NE1uZjpfHy62+m411xXMThV8eHG9zRExjT8OHE5gxo6F1SuieqR0VPyR97K/77vE++4hV + 91WHFHCPH4FP2048c8J8PisDa1AAABkthgX/AHLYrckSSLFPFLUMVMcXyK178fuI2tRU40U479X/AFV1 + cztsU/8AbRTzxw+CeZZYoYnyyvSOKNFc97lwajU0qqqpVYiZnCFrmYiMZQNn/MkN+v756ZP8HA1IYHYY + K9E0q9eHSurkLVkMvNq3hOuVUz+Zi7cxjVDGjscS8pl6O21sia5Fip1RfUucsqqnbhQ11aao65+XzbKd + FMz0R8/kyfKO8uusNvdQTU/jtO3FaVqv2FjVVxVMcHYt4cDizW7qbtW1E4Txu7KbyqtU7MxtRxPIzRm6 + 65jqklqlSOCP8hSsx2Gca6da8anRlspRZjCNfK58zm6704zq5E35SrFrMsWuocque6mjR7l0qrmN2XL3 + UKzmqNm7VHOs+Ur2rVM8z1jndCBc85vuF9uD6eVGMo6OWRtPGxFTHnbO09VVcXYIWrJZSm1TjGuYVTPZ + uq7VhOqJ0MYO1wpL3Q5joqdZLHKxyVNVKstPIiIqOwj5zXLrTBGYoQu9svVP/ZGqITe6cxTH/XOuZSqQ + SecKBwAUDhQOAOFA6gcKYHRTLLooYcKBTcBTUDo4Ci/WBTXWBRfrAoPAovAovAt5OEC1k1gZtuuqfbLh + SqutI5WJ2NprvsoBn4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAaK9bzzy1PkNJ4KgQqAAAAAAAAAAAPoruB8zWU/IW+E + 4DPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB5Gb6t9Hla7VLPykVJM5n3WwuynbU22Kdq5THPDTmKtm3 + VPNLV6vcjoq2Jq4pTy08TUTUrYWPi2u2uC9stVvXE8sT24SqtydFUckx2Yw8pNZ0OVXpKd1ROyFqo3aX + nPXU1qaXOXka1FVTzVVsxi90U7U4KldUtnn9rRW08aJHTsXgjbqx5V753Kqi3ThGnWXKsZ0auJWt3t6S + 0C/+5wWD3dmOx+FirO2ebmj7uTu4aXq3pxp5e/hoWSoqLguhUNrU7KYZXVBBE97pqhP8LTptypq2l9LG + i8b10ciYrwHi5VMaI1y2W6YnTOqFGpqJaid88q4vkXFcEwRORETUiakQ9U0xEYQ81VTM4ypmXlyAAubb + HPJWxJDIsL2rtrMiqnRtYm05+j1LUVTxcmIp0vduJmrRoX1bUUd3nVzdminbzIGOVGwuYneoq6Ejfxr3 + qrp5pqopqtxyx2/Xv6W2uqm5PJPZ9O7oeXPBNBK6KZjo5G98xyYKndN9NUTGMNFVMxOEuhlhcW6hnr6+ + noYMOmqZGxRq7Q1HPXBFXDHQeblcUUzVOqHu3RNdUUxrlL2Xd01moFbPc3fvCpTT0apswIv3Ot3b0chX + sxvSurRT9sdqw5fdVFGmv7p7GO5ztdptGd6OWOq8Rpa5uNasK+2RI9VbI5Nat6Rq6+ydmTu13LExhtTT + q5/8OPOWqLd+Jx2Yq183+UpTU9tutu6KRGVdDUNTh2mPbrRcUXkIOKqrdWMaKoTs003KcJ00y10vFI2j + u9dSNTBtNUSxNTXoY9W/0Fvs17VETyxCnXqNmuY5JlaGxrXtQuxaqSLDB0j5Z1XjauzG3uLG4106a5no + htq0URHTLmx2x10vFJb2u2PGZWxq/XstVecvaQXrmxRNXIWLW3XFPLKVsz5Vt2X8o3N9jokWeZiMqZnu + V72w/wBYqK5eLWiEDls1VdvU7c6I1dKezOVptWav1xpnX0Ku6K5JU5YdSKvPoZnMw4diT2xq91XHnetv + C7j+UPW6bm1aw/GWXXWtjobbVVki7LKeJ8ir9y1VI+1RtVRTyykLtezTNXJDWhVVVVVXFV0qpdFKZDkP + L8N9zFFSVCKtLG101S1FwVWMwTDHlc5EOTPX5tW5mNeqHZkcvF25ETq1ykyn3fR0Odaa925YoLfG1/S0 + ulHI90To/a0RMMOci6yFqz+1YmirGauXrTdOQ2b8XKcIp5OpmZGpJwoHABQOqgAOFA6gcKYHRTLLooYc + KBTcBTUDo4Ci7WBTXWBRfrAoPAovAoPAoSa1AtZNYGSbt5+jzG6PHRNA9uHGqK13/CBKIAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAaK9bzzy1PkNJ4KgQqAAAAAAAAAAAPoruB8zWU/IW+E4DPwAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAABjm8SobT5PuEzm7TGNa57eNrXo5U7aIdGVjG5EOfNThbmWsFAu3DXRuXF8kO0xF4XMkY9y/gI4 + tVeiY6VTt6Yq6PmtE1m1pX8X+Gtz5NU1XjHHxpE1ee5Punc3tOQ1T91WHFHfw+TbH2048c93D5rI3NTs + iqi4poVNSgX1walRG24s/rV2apPUz61XsSJzk5cU4DVb0Ts/Do+jbc0xtfHp+q0RFXBETFV0IiGxrhe3 + BfF2Nt7F/IrtVKpqdOuhU0a0YnNTlxXhNVvT93Lq6Pq23NH28mvp+ixNrUAcgAL5F8VtvFNXd1IGO/43 + t/F4lNfmq5qe/h3tvlp56u7h3LE2NS8guK9E2nq4/GaZuhjVXZkjT/lvwXZ7CoreQ1zb04xolspuaMJ0 + xw1OzrYkyK+3yeNNRMXRYbMzU5Y8V2uyxV5cB+zDzaO5n9ePl09/DoZVuyyjXV91gvEidFb6OTba9yaZ + JG6ms5EXWpwbyzVNNE0fyl37tylVdcV/xhMVbW0lDSy1dXK2GnhTakkdqRCu0UTVOEaZWOuuKYxnREIJ + is99zjdrpX0LOmc16yu6RyN0PcqRxtV2jHZTQirqQtM3reXoppq0KrFm5mK6qqdKV93VuuduytBS3CNY + pmySKyF3fNYr1XBeyuKkDvC5TXdmadSe3fbqotRFWvSjberZqW3Zk6Wn2kSvYtTKiriiSOe5HYci4Ykz + uy9NdrCf46ENvSzFF3GP5aWGkijV5dE2JKeDghp4u7I3pnJ2nSKhrtacZ558Gy7owjkiPH5vV3fTRxZy + tb3pi1ZVYiJxvY5jfRcaM/GNmp0ZCcL1LMt5N3Vc02203CV0NjVrJapI3K1XNke5jlds8DdnQhHbutf9 + VVdMffxJHeN3/tpoqn7ON6kV5yNlC7yUcDvFop6aJ8ixo+ZqqjnLGu0m2uKtfj2MDRNm/mKMZ04TPM6I + vWMvXsxoxiOdhNzzvebyt6hdUL+7JY3Phpla3mtbKxGacNrVr0knbyVFvYnD7uXqRd3O13NuMft5OuGH + Egjma7o5+izbsYfl6aWPuK1//ARu9acbPRKT3TVhe6YlNZWlmAOFA4A4UDhQAHCgdQOFMDopll0UMOFA + puApqBTcBSdrAprwgUXgUHgUXgUHgW7+EC2eB6uSZ+hzVQrwPc9i/fMcn2QJgAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + ADRXreeeWp8hpPBUCFQAAAAAAAAAAB9FdwPmayn5C3wnAZ+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAM + K3x1PQZAuLk1v6ONE+7ka1fQcdu76cb1Li3jVhYqa42hzf3hExy7LJlWB7/UtmasbndpH4llu+WebT8N + Kr2fNHPo+OhRhp5ZallOxPbZHpG1q6Ocq4ae2e5qiIxeIpmZw41evmjkqVbEvtEKJFBwYsZo2sON64uX + lUxbjCNOt6uVRM6NULY2NbkC6oKmOKR0cyK6lnTYnamlUTgc31zF0p3NSmu5TjGjXD3bqwnTqleRUr7c + 6WqkVFWDBKN7dT5HptMkbyNbz+zgi6zXNW3hHLr4djbTRsYzyavH5vMN7QAAOQK9FTeM1LIldsMXF0km + vZY1Np7vvWoqnmurZjF6op2pwK6p8ZqXyo3YYuDYo8cdmNqbLG48ODURMRRTsxgV1bU4qB6eQDlrnNcj + mqqOTSipoVFAyewbwL9bEdCj1nZLoVdHSbS+mRVRzXO5XNVV4zhv5C3Xp1O6xn7lGjWq5out5vM76VLp + 47FA5GrSrswudIxNlz0jTBj9p2OyjVVeQxlrVFuMdnZx49b1mbtdycNraw4tSSN3uVJrBQSufVpUJXJH + J0SM2OjciLimO0uOO0nAmohs/mou1Row2Uzu/KzapnTjtMsOBII53tZYuVe2G7UjWvhooXpUt2kRyNRd + raTHQqJpxJjdWZpoxonXVOhDb1y1VeFcaqY0oopoJKipip40xkme2NieucuCfZJ6qrCJmUBTTjMRHGyl + mQc03ieor6ak6Olne6WB0z0YrmOVVbstVdrVxnDOetW4imZ0w74yF25M1RGieV7+Wd2OYbZf7bXzyQdD + EvTT7Kq5zFRE9rwVExVdrDFNGjsY8mZ3lbrt1Uxji68tu25RcpqnDBludckUmYoGPjRkNxYrWtq3bWiN + FVVaqJ32vRicGTzs2Z5aeRIZ3JRejkq5WIZg3RS01qSpttTJWVsDMZ4Xt/KIif1SJiqKiam4riSFjesV + V4VRhE8NKOzG6ZpoxpnGqOGhzlTdTXujkmvMni0VRFsLTR4LLgrmu5zu9b3vKM1vSnVRpw4+JnK7rq11 + 6MeLjZJdN1WWKm3eLUcfiVS3Do6tFfIuhdO01XIjsUOK3vO7TVjVpjkdl3ddqqnCn7Z5XuZdy9Q2K2w0 + dOxiyMaiT1KMRjpXcLnYYr6K4HLmMxVdqmZ+HI68vl6bVMUx8eV6pobwDgDgDhQOFAAdVA4A4UwOimWX + RQw6qBTcBTUDo4Ck7WBSUCi8Ci8Ci8Cg8C2k4QLZ4F3luXo8x213HUxt/Ccjf6QJrAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAADRXreeeWp8hpPBUCFQAAAAAAAAAAB9FdwPmayn5C3wnAZ+AAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAI439SuZkljUXRJVxNdyoiOd/QSW6o/wC3qRm9p/6etrw1VRdGheAsisw9mZEjlqrmmls0aOhVNXS1 + SKj0+8wkTsohz06Yijk7o4Q6atEzXy98+Gl5KazpcwZYcgdo43yPbGxque9Ua1qaVVV0IiGJnAiMdD2Z + paeobHZ1e1EpMWUtSq81ZXLjIjl1bD3aGrwYJxqc9MTH38uuOZ1TMT9nJqnneTJHJFI6ORqskYqtexyY + KipoVFRToicdMOeYw0S6hgAIBft/w1sV39dXc1vJAx2lfv5G4ferxmvzVc1Pf/jvbfLTz1d3+e5YmxqA + AAC9tXMqH1apilGxZk+7RUbH/eObjyGu7pjDl4dzba0TjyafDtXuWbHbrnLM+43OK3UlMiOlc9fbHovB + G1df/wBaDVmb1VERs0zVMtmWsU1zO1VFMRw0Jhs1xyXZqako6K5R9HUphBtzuk2sE0quKq2PVxN06CvX + rd65MzVTq5uGKxWbli3EU01a+fhg92G5W6d6MhqoZXrqayRrlXtIpyzbqjXEuuLlM6phh29K7VDLcy1U + dVTRyVeKVUUkjWS9GmCpgrlRrUXTjta+Akd2WomrbmJ0akbvO7MU7FMxp1sNyJki61WYKaorKZ0VBSOb + UOmcmMcitXFjY3JzX4rxLqJHPZ2im3MUz906EdkclXVciao+2NKbERERERMETUhWlmAAAAAA4AAcAcAA + ODA4UyAHVQOAOrgOigdFA4UCm4CmoFNwFJwFNdQFB/CBReBReBQfrAt5ALZ6gVbI7Zv1udxVUK9yRoE4 + gAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAABor1vPPLU+Q0ngqBCoAAAAAAAAAAA+iu4HzNZT8hb4TgM/AAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAEZ9YDH/ZtNhq8djx97kJTdPqz/AF8EXvf0o/t4tfE1ljVl7FW1VsNLFtKslOqz + SMXDQyoVUZwY4JsY6fVnNR6kzy/Lh2OquP8AriOT58O15SHS5XK6xBLlDIvrf7RFNXKmmJOjgX/nSIuC + p9w1Fd2cDVc0zFPDBtt6Imrhis2rpNrU9GNW3GNsLlwuEaI2F6/1zU0JGvr09KvDq4jTP2Tj/Hub4++M + P5d7z1RUVUVMFTQqLrRTa1AYVaWnfU1McDMEdI5Goq6kx4V5E1qYqqwjF6pp2pwVLhURz1TnRIqQMwjg + RdaRsTZbjhwqiYrynm3TMRp1s3KomdGpbnt4AAAC9cqw2ljMedWSdI5OHo4cWsXsOc5/4JrjTX0fNtnR + R0/JRo6CvrXujo6aWpkYm05kLHSKjccMVRqLo0nqu5TT5piHmi3VV5YmVWntdXJdKe3Sxvp6ieWOLZka + rXNWRyNRVauC8J5quxFM1RpiIZptTNcUzomZezFu7zg6ukpo6B6LC9W+MOVGRrh6Zr3K3aTsHPOfs7OM + zrdMbvvbWEU6kmZByVPY4qipubmT3GqVuLkVX7DG6k2nImlVXT2iFz2ci7MRTophN5DJTaiZr01SzAjk + iAAAAABwoAABwoHABQODA4MjhQOFA4A6qBTUDqB1cBTcB0UCm7UBRdqApu1AUHgUXgUXgUH8IFtIugC3 + eoHe0fxmg8oi/OIBOgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAaK9bzzy1PkNJ4KgQqAAAAAAAAAAAPoruB8zWU/IW+E + 4DPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABHG/qNz8kMciaGVcTndhUc37Kkluqf+3qRm9o/wCnrhrx + Ex8kjI2Ji96o1qcaquCFkmcIxVmIxnB6jqqL97zNe/8AwcmNK52tEhaiMY7l2NlruyhoimdiOXX1uia4 + 25/HV1PPmhkgmkhkTCSNytenKi4Kb6ZiYxhoqpmJwlxwIZeRDIv7ivQsgoU0dA3bmT/nSIiu/BajWdlD + Vb041cvc23NGFPJ38NCxNrU78phl6CPjuSI2VyMuCaGTOVEbNxNevA/icuvh4zThsavL3N2O3r83esZI + 5I5HRyNVkjFVr2ORUVFTQqKim6Jx0w1TGGiV3Se0UNRVLofJ/hoOPnp7aqdhnNX7o11aaojr8OHM2UaK + Znq8eHOszY1AAAARFVcE0qupALy7qjaxadq4spWtgTDVjGmD1T7p+07tmu15ceXS2XfNhyaGRbt81W+w + XSbx5i9DVtbGtQ3T0eCqulvCi8Jx7wy1V2mNnXDs3dmqbVc7WqeNMlRa7Rc3UlbLDHUPgcyekqE1pgqO + arXJwLr4iu03K6MaYnDHRKyVWqK8KpjHDTEr81NoAAAAAADhQAAAB1AAcKBwoADhQOqgcKYHVTI6KB1A + 6OUCm4DooFN+oCk4Ck9dAFB6gUXKBReoFu9dCgW8igW0i6AK9iTav1tbx1UCf3jQJyAAAAAAAAAAAAAA + AAAAFlPe7LBj09fTRYaV25o24IvZU2RaqnVEtc3aI1zCh/uvK/yxQ/GYfZHr/wA9z8Z+EvP/AKLf5U/G + HeLMmXZceiulHJhr2Z4lw7jjE2K4/jPwZi/ROqqPiv45YpW7Ub2vai4KrVRUx7RrmMGyJiXYwyAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANFet555any + Gk8FQIVAAAAAAAAAAAH0V3A+ZrKfkLfCcBn4AABhX017o/nfavjUX2wH017o/nfavjUX2wH017o/nfav + jUX2wH017o/nfavjUX2wH017o/nfavjUX2wH017o/nfavjUX2wH017o/nfavjUX2wH017o/nfavjUX2w + H017o/nfavjUX2wH017o/nfavjUX2wH017o/nfavjUX2wH017o/nfavjUX2wH017o/nfavjUX2wH017o + /nfavjUX2wH017o/nfavjUX2wH017o/nfavjUX2wH017o/nfavjUX2wH017o/nfavjUX2wH017o/nfav + jUX2wH017o/nfavjUX2wH017o/nfavjUX2wMygnhnhjnhekkMrUfHI1cWua5MUVF4lQDuAAAYVvjplqN + 39xRO+j6ORF+4ka5fQQ7d31YXqeHE4t4042auHG1wtDtivZKmuBHzsx1bULFkbj22oWW75cOXR8dCr2v + NjyafhpWqajY1wvqn/E0kVWmmWLCCo41wT2p/bamz97ymun7Zw64+bbX90Y9U/JaJxG1qXdsiY6qSSRE + dDTtWeVrtSozSjV+7dg3tni7OjCNc6Hu1GnGdUaVvLK+WR8si7Ukiq57l4VVcVU9xGEYPEzjOMuplh2b + qwMEOQyvo6qCqY2CuXZe1EbDWImLmomhGyImlzE4++Tgx1GqaZp00/BuiqKtFXx8VS9009FJDQSM2Up4 + ++TU+Ry4yORdS4O5mPrTFmqKomrl4fXrZvUzTMU8nD6dTzTc0OQAAC8tCI2sSocmLKVrp1x1YxpixF+6 + fsp2zXd1YcuhstebHk0rNVVVxXWbGsAmrdLeHVuXHUcjtqW3ydGmOvon85no7Sdore9bOzcxj+Szbqvb + VvZn+LNyMSYAAAAAHGIAAAA4UDgAoHBgcGQA6qB4sOaKOsuXiFsY6ufE7ZrJ49EMKJr2pF0OdxNbidNW + Wqpp2qvt5OWXNTmqaqtmj7uXkh7CnK6XRTLLooYcKBTcoFNQOjgKT1Apu1gUpFAoPUCi5QKL11gW8igW + 0igW8i6AL3K0fSZktreKojd+C7a/oAm0AAAAAAAAAAAAAHnXvMVjsVJ41d62Kjh9Ksi85ypwMYmLnLyN + Q22rNdycKYxart6i3GNU4IrzF1iqOJzosv251QqaEqqtdhnaiZzlTsub2CWs7mmdNc4dCHvb6iNFEY9K + Prtvh3g3JVRbm6kiXVFSNbCidh6J0ndcSVvdtmn+OPSjbm8r9f8ALDoYrW3a61zldXVs9U5dazSvkVfw + lU66bdNOqIhx1XKqtczK1PbwAAO8M88D0khkdE9NT2KrV49aGJiJ1sxMxqe9bd4eeLaqeKXurRre9ZJI + szE+8l22+gc9eTtVa6YdNGdvU6qpZtY+sNmWlVrLvRwXGLhkjxgl7OKbTF/BQ4bu57c+WZp7Xfa3zcjz + RFXYlDK29vJmYXMgiqloq5+hKSrRI3KvEx+KsdyIjseQib+77tvThjHLCWy+8bV3RE4TySzM4XeAAAAA + AAAaxfTjvG/X4vi8PsS1+12OTtlUvdb/AC9kH047xv1+L4vD7Ee12OTtk91v8vZB9OO8b9fi+Lw+xHtd + jk7ZPdb/AC9kH047xv1+L4vD7Ee12OTtk91v8vZDMd1G87OGYc3R2261TJqR0EsisbFGxdpiIqaWtRTh + 3hkbVu1tUxpxd278/du3dmqdGCbCCT4AAAAAAABjG8u+XKxZJuV1tsiRVtP0PRPc1Hom3URxu5rkVO9c + p15G1TcuxTVqnHucmeu1W7M1U64w70E/TjvG/X4vi8PsSwe12OTtlXfdb/L2QfTjvG/X4vi8PsR7XY5O + 2T3W/wAvZB9OO8b9fi+Lw+xHtdjk7ZPdb/L2QfTjvG/X4vi8PsR7XY5O2T3W/wAvZCWdzGcr/me2XGe8 + Ttnlp52RxK1jI8GqzFdDEQh955ai1VEUxrhNbszNd2mZrnVKRCMSYAAAQ7vj3j5syzmaloLRUshppaJk + 72uijkVZHSysVcXoq6mITe7clbu25mqNOPgg95525auRTTOjZ+csE+nHeN+vxfF4fYkh7XY5O2Ud7rf5 + eyD6cd436/F8Xh9iPa7HJ2ye63+Xsg+nHeN+vxfF4fYj2uxydsnut/l7IPpx3jfr8XxeH2I9rscnbJ7r + f5eyD6cd436/F8Xh9iPa7HJ2ye63+Xsg+nHeN+vxfF4fYj2uxydsnut/l7IPpx3jfr8XxeH2I9rscnbJ + 7rf5eyD6cd436/F8Xh9iPa7HJ2ye63+Xsg+nHeN+vxfF4fYj2uxydsnut/l7IPpx3jfr8XxeH2I9rscn + bJ7rf5eyFdm/neC1G4zUz8Naugbp7OyqegeZ3TZ5/i9Rve/yx8F5B1h86sX22koJm46cY5Wr2lSXD0DX + O57XLVw6myN83eOKe3xexQ9ZGpRUSvsbHpwvgnVmH3r2P8I017ljiq7G+jfc/wAqe1mNj35ZFubmx1E0 + tsmdowq2YMx90Yr2p2XYHFd3Vep1RtdDttb2s1652elntNU01VAyemlZPBIm1HLG5Hsci8KObiikdVTM + ThKSpqiYxjUqGGQAAAAAAGE73cz3jLeVWXC0ythqlqo4le5jXpsOa9VTByKnpUO/d1im7c2atWDg3lfq + tW9qnXihj6cd436/F8Xh9iTntdjk7ZQPut/l7IPpx3jfr8XxeH2I9rscnbJ7rf5eyD6cd436/F8Xh9iP + a7HJ2ye63+Xsg+nHeN+vxfF4fYj2uxydsnut/l7IPpx3jfr8XxeH2I9rscnbJ7rf5eyD6cd436/F8Xh9 + iPa7HJ2ye63+Xsg+nHeN+vxfF4fYj2uxydsnut/l7IPpx3jfr8XxeH2I9rscnbJ7rf5eyD6cd436/F8X + h9iPa7HJ2ye63+Xsg+nHeN+vxfF4fYj2uxydsnut/l7IPpx3jfr8XxeH2I9rscnbJ7rf5eyD6cd436/F + 8Xh9iPa7HJ2ye63+Xsg+nHeN+vxfF4fYj2uxydsnut/l7IPpx3jfr8XxeH2I9rscnbJ7rf5eyD6cd436 + /F8Xh9iPa7HJ2ye63+Xsg+nHeN+vxfF4fYj2uxydsnut/l7IZHu83sZ3vWcrZbLhWRyUdS97ZmJDE1VR + I3OTnNaippQ5c5u+1RaqqpjTHO6slvG9cu001TonmT0V5YwAAAgDPW9zPNpzddLbQ1kcdJSzrHCxYYnK + jURF1q1VUseV3dZrtU1TGmY5Vbze8b1F2qmJ0RPI8H6cd436/F8Xh9idHtdjk7Zc3ut/l7IPpx3jfr8X + xeH2I9rscnbJ7rf5eyD6cd436/F8Xh9iPa7HJ2ye63+Xshe2bfvnOG60sl0nZVW5JE8agbDGxyxrodsu + aiLimtDXd3TammdmMKulstb3uxVG1ONPHobF0lXTVlLDV00iS087GyQyt1OY9MWqnZQrNVM0zhOuFnpq + iqMY1SqmHoAAAAAAAAgDPW9zPNpzddLbQ1kcdJSzrHCxYYnKjURF1q1VUseV3dZrtU1TGmY5Vbze8b1F + 2qmJ0RPI8H6cd436/F8Xh9idHtdjk7Zc3ut/l7IPpx3jfr8XxeH2I9rscnbJ7rf5eyD6cd436/F8Xh9i + Pa7HJ2ye63+XshJW5bPmZc0VV1jvNQ2dtKyF0KNjZHgr1eju8RMe9Qi955S3ainZjXild15u5emrbnVg + lMiEwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA0V63nnlqfIaTwVAhUAAAAAAAAAAAfRXcD + 5msp+Qt8JwGfgAAHyrAAAAAAAAAAAAAAAAAAAAAAAAPpduvrErd2uVKtFxWa0ULnaccHeLM2kx5F0AZM + AAAY5vEp21GTrjC5dlr2Na53Ejno1V7SKdGVnC5EufNRjbmOVq9Rcynr3OTByQpG3jRzpWY/io5C1V6Z + p6flKp0aIq6PnC1brNjSuaCpZBMrZcVppm9HUNbrViqi4pytVEc3lQ8104xo1w2UVYTp1TrcVVO+mndE + 5UXDBWvTU5rkxa5ORzVxQzTVtRixXTszguERIbW53p6uTYT3OJEc7tOe5v4J5119Hz4dr1qo6flw7Fmh + tagDlFwUDsphld2trPGunkTGKlas70XSi7HeNXke/Zb2zXdnRhHHobbUacZ4tJBcZWo6OoTxmnkcr5In + quO07W9jtbX8vDwoqaBVbjXGiSm5OqdMO0tvbJG6ehcs8LU2pI10Sxp65qa2+ubo48NQi5hoq0T2E28d + NOmO1ZGxqcgXdvtF0uL9igpJal2pejYrkTsqmhO2a7l2ijzTENluzXX5YmV7cLTcrJSzwXGndTVVS9sb + EdpxjZz34KmLVTaWPSimu3dpuTE0zjEcPFtuWqrUTFUYTPDweOdDmAJX3L26SOjuFxdijJnsgjTgXo0V + zlw+/Qgd8XMaqaeTSn9zW8KaquXQkrEhk0AAGIHGIAAAAAcKoHAADhQOFAx+fPWXKe9vtE9R0U8SL0s0 + mDIWuREXYV7lTTpOunI3Jo24jR2uOrPWor2JnT2PXpLjb61quo6mKpa3DaWF7ZETHVjsqpz126qfNEw6 + aLlNXlmJRVvDzxfmXmptFJI6ipaf2t+xofJtNRdpXa0RUdoRCd3fkrc0RXP3TKA3jnrkVzRH2xD1NzaX + BaKve+V3iDXtbDEuGz0qpi9U4U0bJo3xs7VP5Ojc21s1fikVSGTTooHRQOFUCm5QKagdHKBScukCmoFF + 6gUXqBReoFB66ALeRQLaRQLeVQPayHCkua6JF1MV71+9jcqeiBMQAAAAAAAAAAAARbvI300ljkltVhRl + ZdW4tnqF50MDtSpo796cWpOHiJbJbsm591einvRGe3pFv7aNNXZCA7teLpd619bc6qSrqpO+lldiuHEn + A1E4ETQWK3bpojCmMIVu5dqrnGqcZWZ7eAAAAAAAAAAAkPIW+S/ZdfFR3Fz7lZ0wb0T1xmibq9qevAnq + XaOLAjc3u2i5pp+2pJ5PeddrRV91LYix321X22xXK1ztqKWZNDk1tcmtrk1tcnCilau2qrdWzVGErPav + U3KdqmcYX5rbAAAAAANJS9qCAAAEibhvODD5NP4KEbvb0euEnuj1+qWyxVlrAAAAAAAAMJ30+bO8/wCW + /aojv3Z69PX3Sj96f/PV1d8NWy2KiAAAE99XD+CXjymP82V7fXnp6Fj3J5KulL5CpsAAANd+sT/O1F/p + sX5+csu5vSn+3yhWN9erH9fnKLSWRAAAAAAAAAAAAAAAB7eWM6ZjyzVJPaat0TVXGWmdzoZPu410dvXx + KaL+WouxhVDosZq5anGmfBsRu83p2fN0SUzkSjvLG7UtG5cUeia3QuXvk401p6JWs5kKrOnXTy+KzZLe + FN7Rqq5PBm5wJAAAAAACNOsD/Ikfl0PgSEpuj1upFb49H/aGuBZ1WAAAAAAAAAAAAAAAAADMN0XnGsvu + sn5l5xbx9Crhxu7dvr08OJtUVFcAAAA1O3o+cG+eUr9hC4ZD0aehTc/69XSxY63GAAAE5bgs89JG/Kld + Jz49qW1ucutul0kP3vft5MeIgN75X/8ASOvxWDc+bx/656vBNBBp4AAAAAAAA1O3o+cG+eUr9hC4ZD0a + ehTc/wCvV0sWOtxgACZurb+m333Kn8KQhN9aqetO7j11dXzToV9YQAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAGivW888tT5DSeCoEKgAAAAAAAAAAD6K7gfM1lPyFvhOAz8AAA+VYAAAAAAAAAAAAAA + AAAAAAAAAB9DOrlcfH9ymVptraWOnkp11qqeLzyQomnkjAkgAAA8rNtI6ryvdqZnfy0kzWcjthdle6bb + FWFdM88NV+nG3VHNLVmvbsxVsjUwbUS08rVTUjZmSS7PaXR2i0250xHJE9mEKpc1TPLMduMvLQ6XK7KY + ZX9N/jaZKRf0qFFWk9e3vnRdnHFzeXFOFDXV9s48U6/Ftp+6MOONXh4OLng2WOmRMPFY2xKnDt6XyY9i + R7kM2tWPLw7mLuvDk4T2rM2tTkAB2auKYGBeovQ2pf7Srkw4lSOLT20e93daa9dfR8+Ha3aqOn5cOxZm + xqdopZYpGyRPdHIxcWPaqo5FThRUMTETolmJmNML3xmiq1wrGdBMv/uoWpgq/wDMiTBO23DsKpr2aqdW + mOT6tu1TV5tE8v0Uqi31EDEl0S06rg2oiXajVeLHW1fWuRF5D1TcidHG8VW5jTxJh3S0VRTZV6WVeZVz + vmiZxNREjx7asK7vWuJu4RxQse6aJi1jPHLLLhbLdcYOgr6aOpi4GyNR2C8aY6l5UOC3dqonGmcEhctU + 1xhVGLAcxbn6Wd6zWOZKVy66aZXOj+9fznJ28SWy+9pjRcjHnhE5jdETptzhzSwqv3eZuo6hsLqB8ySO + RrJYFSRiqq4aVTvU+6wJKjP2aox2sOlGV7vvUzhs49CZ8q2X9y2GktzlR0kTVWZzdSyPVXOw7alczV79 + lyalkytn9VuKXrHO6AAAAAWV3vFvtFC+ur5Oip48EVURXKqrqREThU2WrVVyrZp1tV69Tbp2qtS3y5mK + iv8AQLXUbJGQo9Y8JURq7TURV1K7jPeYy9VqrZq1vOXzFN2nap1PVNDe4xA4AAcKoAwLO7XBlutlVXvb + ttponyq1OHZTHDtm21b26op5Za7tzYpmrkhrnW1k9ZVz1lQ7amne6SReNz1xX7JcaKIpiIjVCmV1zVMz + OuUm7qLvZFR1spaJ8VwWJZqurcrXI/ZcjdehUTF6YJgQe9bVfmmftx0Qnd1XrfkiPuw0ytM8Z3skdwli + ttBTVdwa1Y5bnIxrlauGGEa4YuVvqsTZkslXNMTVVMU/i157PW4qmKaYmr8lllfem610EVBW0LZYYU2Y + 5afZjdh65mCNVeXQbM1uv9lW1TOmeVqyu9f107NUaI5Ei2HNNmvsKyUE2MjUxkp382VnZb/Smghr+Vrt + ThVCby+aouxjTPVxvUVTndDqB1coFJygdFUDo5QKLlA6OXQBQeoFF6gUXqBQeukC3eoFs9QLeRQMq3YQ + dJmCSXghp3rjyuc1v9KgSoAAAAAAAAAAAIm30bzpLPGuXbNNsXOZuNbUsXnQRuTQxq8D3ouOPpU7OiY3 + Zkdv76vLxc6G3pn9j/ro83HzNfixq0AAAAAAAAAAAAAAynd/n655QuyTwqstumVEr6PHQ9iembjqe30q + 9rUcmcylN6nCfNxS7MnnKrNWMeXjhtPa7nQ3W3U9xoZUmpKpiSQyJwovHxKmpU4FKlctzRVNM64W+3ci + umKo1Sujw9gAAAA0lL2oIAAASJuG84MPk0/goRu9vR64Se6PX6pbLFWWsAAAAAAAAwnfT5s7z/lv2qI7 + 92evT190o/en/wA9XV3w1bLYqIAAAT31cP4JePKY/wA2V7fXnp6Fj3J5KulL5CpsAAANd+sT/O1F/psX + 5+csu5vSn+3yhWN9erH9fnKLSWRAAAAAAAAAAAAAAAAAqU1TUUtRHU00joaiFyPilYqtc1zVxRUVNSoY + qpiYwnUzTVMTjGts7ur3ixZutLoqrZjvVEiJVxpoSRq6GzMTiX0ycC9lCqZ/J/pq0eWdXgtu787+6nCf + PGvxZycCQAAAABGnWB/kSPy6HwJCU3R63Uit8ej/ALQ1wLOqwAAAAAAAAAAAAAAAAAZhui841l91k/Mv + OLePoVcON3bt9enhxNqiorgAAAGp29Hzg3zylfsIXDIejT0Kbn/Xq6WLHW4wAAAuLdcKu3V9PX0cixVV + NI2WGROBzVxQ810RVExOqXqiuaZiqNcNtsl5qpM0ZdpbtT4NdImxUwp/VzN79n9KciopTszl5tVzTPCF + 0yuYi7RFUcJe4c7oAAAAAAAanb0fODfPKV+whcMh6NPQpuf9erpYsdbjAAEzdW39NvvuVP4UhCb61U9a + d3Hrq6vmnQr6wgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANFet555anyGk8FQIVAAAAAAAA + AAAH0V3A+ZrKfkLfCcBn4AAB8qwAAAAAAAAAAAAAAAAAAAAAAADeDqcXXxzdJJSKvOttzqIEb62Rkc6L + 2FWVQJ0AAAOsjGvjcxyYtcitVF4lTADU68QJT0FVSKipNQ1y0r0w0bMazOZp41V7+4Wy1ONcTxTTj3fR + UbsYUTH41Yd/1eEh1OSXZNWAIXdqai3GnV3eRvSWRU0KjI+e9dHrWqeLs/bLZaj7oXFaqV7ZLjGiJOq4 + 10TdW05fyrU9S5V08TuRUPNH2fbxcXg9V/f90a+PxeepvaHKAAOUAv7tiypSm1eJsSBU4ntxWT+8c41W + tMY8unw7G67onDk0ePasjY1AACtSVFXDKniznJI/m7LdO2i+lVulHIvEqHmumJjS90VTE6GxGXKKeisV + DS1DWsnjib0rGIiNa9dLkRE0aFXgKhmK4quTMasVwy9E024ideD0TS3OcQOQAADGpN4mUm1a0raxZJWq + 5H7EcitbsIquVXK1EwREXUdsbvvYY4OKd4WccMXsUF5tNfTLU0dXFPA1MXvY5OamvnJrb2zmrs10ThVE + xLpovUVxjTMTDD8z717XQxrDZtmvrEdsq9yO6BqJrXFNnb5NlcOUkctuuurTX9sdqNzO9aKYwo+6ex6u + S89UWZIlhWNYLjCzbnh0qxUxRNpjuLFdS6U5TRnMlVZnHXTLoyeepvRhqqhT3nW6ursqTMo2rI+GRk0k + bUxc5jcdrDsY7XaM7tuU03YxY3lbqqszs8SHrbmG50C0jYp3pT0c/jDIWuViK52yjkVU4HIzDuliuZem + vHGNMxgrlvMVUYYToicWw9LUx1NNFURqixzMbIxUVFTByYppTQpUKqZpmYniXCmqKoiY41Q8vQAVQODA + 4MiOt8Ukv7uo2Nkc1vSYSMRyojkcirzm8OCx6CY3REbUobfEzswiZy46OAsCvEckkbtqNysd6pqqi+gY + mIlmJmNTqZYcAXdtW5MqmS27pG1MXOSSLFFbyqqak48dBqu7MxhVqbbW1E4060nZNzlXTSw0N2qo6qee + V0TZIka7YcrdqNr3swZztl6c3HskFnMnTETVRGERCeyWdqmYprnGZnhzcrPFIlLujlApqoHRygU3qBSc + BTeoFB6mBRcpkUXKBQeusC3kUC2eoFu9dIEgbqKbm3GqVNaxxMXsbTnf0ASAAAAAAAAAAAeLnHMlPlvL + lbd5sFdAzCCNfTzO5sbO25dPIb8tYm7XFMcbRmb8Wrc1TxNRq+uqq+tnrauRZaqpe6WaR2tznLiqlyoo + imIiNUKVXXNUzM65UD08gAAB2jjkle2ONivkcuDWNRVVV5EQTODMRi96i3fZ3rWo+nsdYrF0o98Lo2r2 + FejUU56s5ap11Q6Kcneq1Uz8HofRFvG+RZffIfZmr3Gx+Xe2+23/AMe5aVe7XPtI1XS2KrVG61ijWX83 + tnunO2Z1VQ11ZG9GumWPVFNU00qw1MT4Zm99HI1WOTsouCnTFUTGMOaqmYnCVMywAAAACXdwedX0dzfl + irf/AISuVZKFXL3k6Ji5ickjU7qcpDb2yu1T+yNca+hNbozWzV+udU6ulPpXVkAAAABpKXtQQAAAkTcN + 5wYfJp/BQjd7ej1wk90ev1S2WKstYAAAAAAABhO+nzZ3n/LftUR37s9enr7pR+9P/nq6u+GrZbFRAAAC + e+rh/BLx5TH+bK9vrz09Cx7k8lXSl8hU2AAAGu/WJ/nai/02L8/OWXc3pT/b5QrG+vVj+vzlFpLIgAAA + AAAAAAAAAAAAAAPXynmSsy3f6S70qqroH+2x8EkTtEjF+6b3F0mnMWIu0TTPG35e/NquKo4m3dur6a4U + FPXUr9umqo2zQv42vTaT7JTK6JpmYnXC60VxVTExqlcHl6AAACNOsD/Ikfl0PgSEpuj1upFb49H/AGhr + gWdVgAAAAAAAAAAAAAAAAAzDdF5xrL7rJ+ZecW8fQq4cbu3b69PDibVFRXAAAANTt6PnBvnlK/YQuGQ9 + GnoU3P8Ar1dLFjrcYAAAAJA3N55/25mJKOrk2bTc1bFPj3scuOEcvImnZdyLjwEdvLK/toxjzUpLdmb/ + AFV4T5amzRVVsAAAAAAAanb0fODfPKV+whcMh6NPQpuf9erpYsdbjAAEzdW39NvvuVP4UhCb61U9ad3H + rq6vmnQr6wgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANFet555anyGk8FQIVAAAAAAAAAAA + H0V3A+ZrKfkLfCcBn4AAB8qwAAAAAAAAAAAAAAAAAAAAAAADarqPXlMc12V7tP8AhKyBvvkcq/mwNqgA + AABrlvBtyUmbMw29U5lwqYJYMf7SWOSRqpwJjJzNPAqlhyteNFFX4xPfHy0q5m6MLldP5THxwn56Ed6U + XDhQlUS7Iplhe0ODIayfU5kOxGvrpXIxU97V5qr0zEc/d9cG63qmebv+mKjS1MtPM2WNU2m8CpiiouhW + uThRU0Kh7qpiYwlrpqmmcYXNVTxPi8bpE/w6qiSR44uicvpV4VavpXf0nmiqYnCdfe910xMbUau5Zm1q + cgXlpYi10cjk2mU6Onei6lSJFfs/fbOBruz9uHLo+LZaj7seTT8Fqr3K5XOVXOcuLlXSqqp7wa8XIZAA + Eh7qspU1dI6+VeLm0kyNpI9GysjURyudw83abhykPvTNzT/1xxxpTO68pFf/AGTxToS4QCwAAAAVyIiq + q4ImtVA8HMucbJaLfI+Sra6okY5KaKFUe9XYaFwTUiLwqdeWyldyrVo43Jmc3Rbp0zp4kF23Q+olXSkd + PLj/AOo3ok9GRC0XOKOePFVbfHPNPgtGve3a2XK3aTZdguGKcSmyYa4l62VcuT5gu7LfFIkTdlZJpV07 + MbcEVUTRiuKohz5rMRao2pdGVy83q9mHv5NrqHLefqulmeviqyT29sz8NGEqbDncGlY0ReycmcoqvZeJ + jXoq7HZk66bOYmJ1aae1NJW1lQfvOsC2zMUlRFFsUVcnSxqiYMSTVI1MOHHndss+7b+3bwmdNKr7zsbF + zGI+2peZCz/VWqB9DWN6e207FlaqflI0V7UVG6cFTnY4GvPZGLk7VOiqW3IZ+bcbNWmmEtW650FypWVd + DOyogfqexcdPEqa0XkUr9y3VROFUYSsFu5TXGNM4wuFU8PYYHBkAIPzrcaiuzDfmzK7Zp2pFBGqd6kUz + GoqJy4ud2yz5O3FNujDj+cSq2duTXcrx4vlMMPJFHLmgttwuE6QUVPJUSuXBGxtVdfGupO2eLlymiMap + we7dqqucKYxZVR7p81T6ahIaRqa0fIj3dpI9tMeyqEfXvW1GrGUhRum9OvCFlc8qXKzrhJaJ6niqJOdF + ycyBXYL909ewbLeapuaqojm/z4Nd3KVW9dEzz8XZ4vNgpcxXifxKngklc1cVpo2JHGxeNWojGM7Km6qu + 3bjametppou3J2YiejhoZ9kHIVwt9S+svMbY1Y5j6aBHI5ekYi4PVWKqaEeqYERn8/TXGzR1pjd+76qJ + 2q+pILlIdMqblA6KB0VQKTlApqvCBReoFF6gUXKBReugChIoFtIoFvIoFu7WBLO7ekWDLTJFTBamV8va + TBieABlIAAAAAAAAABB3WMv7lqLZYI3cxjVralqalc5Vjix7CNf3Sf3NZ0VV9Sv76vaaaOtCxOIEAAAJ + c3ebjZ7pTw3XMj30tFIiPgoGc2aRqpijpHekavF33YIbOb1iidm3pnlTWS3TNcbVzRHImuyZYy/Y4Uht + NBDRt1K6Nqbbvunri93bUgrt+u5ONU4p61YotxhTEQ9M1NwAAsbtYrNeKdae6UUNZCqKiNmYjsMeFqrp + avKhst3aqJxpnBruWqK4wqiJQhvK3JLaqaW8Zb25qGJFfU0DlV8kTU0q6N2t7U4UXSnLwT2S3ptzs3Nf + Kr+e3VsRtW9XIiImUKAAAFairKiirIKymfsVFNI2WF6cD2Kjmr3UMVUxVExOqXqmqaZiY1w3GsN2hu9l + obpDojrYI5kbr2Ve1FVv3q6Ck3bc0VzTPFK8WbkV0RVHHC+NbYAAAGkpe1BAAACRNw3nBh8mn8FCN3t6 + PXCT3R6/VLZYqy1gAAAAAAAGE76fNnef8t+1RHfuz16evulH70/+erq74atlsVEAAAJ76uH8EvHlMf5s + r2+vPT0LHuTyVdKXyFTYAAAa79Yn+dqL/TYvz85ZdzelP9vlCsb69WP6/OUWksiAAAA2ts+77JEtooZZ + LHRPkfTxOe5YWKqqrEVVXQVC5nLsVT906+VcbWTszTH2xq5F39HWRPkGh94Z9o8f+y9+U/F7/wDFZ/Cn + 4H0dZE+QaH3hn2h/7L35T8T/AMVn8KfgfR1kT5BofeGfaH/svflPxP8AxWfwp+B9HWRPkGh94Z9of+y9 + +U/E/wDFZ/Cn4Kcm7PIEjtp1ipEXDDms2U7jcDMZ69H8pYnI2Z/jC1qd0W7qoaqPssbMUwxjfLGqfgPQ + 907xvx/J4q3bYn+PexDMfV4tM0Tpcv1slJUJpbT1S9JCvJtoiPb2ecdtnfFUeeMY5nFf3LTPknCedCd8 + sV1sVyltt0p3U9XFrYulFaupzXJoc1eBUJ21dpuU7VM4wgLtmq3Vs1RhKwNjWAAAGx24G+Pr8nSW+V2M + lrndGzFcV6KX2xn4yuTtFZ3va2bu1+ULRue7tWtn8ZSYRSWAAACNOsD/ACJH5dD4EhKbo9bqRW+PR/2h + rgWdVgAAAnDc1kLKN9yi+tu1uZVVSVcsaSudI1dhrWKiYNc1OFSB3lm7lu5hTOEYLBuzJ2rlrGqMZxZ3 + 9EW7n5Fi98m9mR/uN/8ALuSHttj8e8+iLdz8ixe+TezHuN/8u49tsfj3n0RbufkWL3yb2Y9xv/l3Httj + 8e8+iLdz8ixe+TezHuN/8u49tsfj3n0RbufkWL3yb2Y9xv8A5dx7bY/HvPoi3c/IsXvk3sx7jf8Ay7j2 + 2x+PefRFu5+RYvfJvZj3G/8Al3Httj8e8+iLdz8ixe+TezHuN/8ALuPbbH4959EW7n5Fi98m9mPcb/5d + x7bY/HvPoi3c/IsXvk3sx7jf/LuPbbH4959EW7n5Fi98m9mPcb/5dx7bY/HvXVr3bZItVfDcLfao6esp + 1VYZkfKqtVUVq6HPVNSni5nbtcbNVWMS928jZoq2qacJhkpyusAAANTt6PnBvnlK/YQuGQ9GnoU3P+vV + 0sWOtxgAAAAAbK7ls8/7gy+ltrJNq7WtrY3q5edJBqjk5VTvXd3hKvvPK/rr2o8tXetW683+yjZnzU9y + RSMSgAAAAAGp29Hzg3zylfsIXDIejT0Kbn/Xq6WLHW4wABM3Vt/Tb77lT+FIQm+tVPWndx66ur5p0K+s + IAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADRXreeeWp8hpPBUCFQAAAAAAAAAAB9FdwPmayn + 5C3wnAZ+AAAfKsAAAAAAAAAAAAAAAAAAAAAAAAmvqiX5LZvhp6Nztll4oqmi06tprUqW9v8Aw+CdkDek + AAAAQnv+tasqaa5MTDpomI9yaFRad7kRf+oJrdVf8eGn/CE3tb/lw0f5RNcUSR0dazvalFc9OKVNEje2 + vOTkchL29H28ndxIa5p+7l7+NaIbWpfNTYs6rjpnqERE9xYuP541/wA+iO//AA2Roo6Z7v8AKzNrXKvS + 1UtNL0keCoqbL2O0te1dbXJwop5qpiqHqiuaZxhcVNLE+JaujxWn0dLGul8Tl4HcbeJ39J5prnHCrX3v + VdEYbVOruWaG1qX1P7XbauXHnSrHTtTjRV6R6p2OjanbNVWmqI6/k206KJnl0fNZG1qcouHYA7GGQCVd + zD61aS5Mc5fEWSMWJuCYdK5F21RdfetboIHfEU40/l8k/uaasKvx+aSSFTTnEyABVREVVXBE0qq6sAIR + z3nuqvVatLSP6K2U0mMKsxR0jm4p0jl18K4IWfI5GLdOM+aVXz2em7VhT5YY5++K1/6QrKpOFahjZHYJ + wdI5OkROw47P008Wjocf7quPT08MV3S1du8QrJJaLYSRI4FSCRze+f0uPtiTf2Jrqoq2oiJ59Pw4sOVs + prp2ZmY5tHx48eRadBaX95VyxqvBLCmynJtMe9V/BNm1XHF2tezRPH2MryLY8yU1W292VtPXwtSSF6K9 + 0aKuyiq3ntY7i4Dgz163VGxXjTOt35GxdpnbowqjUxeptt1mnklejaieVyvk6KWOZyucuK4pG5y44ndT + coiMNUdEw4arVczjrnpie5KWQc2V/irbXfaeenlgaiQVk0b2texNCNe5U0OTjXX2dcFnsrTjt25iceJP + ZDNVYbFyJjDjZXerLbb9a3UdWnSQSoj45WKmLVw5r2O06dJwWb1VqrGNbvvWabtGzOpE+ZcmPy/U1TKR + s81FJR6KiRqKnSdI3FqKzkThRCey2c/bEY4RVtaupAZnJ/qmcMZp2dfW8LLl4vNiuEdZSMlViKnTQYOR + krOFrtC9peA6sxZou07M/wCHJl71dqraj/LYGnldLTxSuYsbpGNcsa6VarkxwXsFSqjCcFvpnGMXcwyA + cKoGAZusFgqrxNWR1kTrrNC6nW2pMxjpZFjcxnNRHOVyrspwYYEtlL9ymiKcJ2YnHHDUiM3l7dVc1RMb + cxhs463hRbtc0Yp0VNbqVMdLnq6dcOxIkre4h1TvK1xzVPZ3YOWN23eKKI7e/FJNjtEdpt0dI2V0z26Z + Jnrpc5deCamt4mpoQhL96blWOpN2LP66dnHFfKpqbnRVA6gcKoHRygU1UDoqgU3KBTcoFNy4IBRcoFFy + gUXqBReoFu9dYFs9dIFvIoFLhDCdrLReI2mjpFTB0MLGPT1yJzvRDK8AAAAAAAAAANWt8lc6r3i3ZccW + QLFAxOJI4mov42Jbd204WKVQ3nXjfq4cTCjucAAAy/dRYae956t1LVNR9LErqmaNdTkharmtVOFFfs4p + xHHvC7NuzMxr1O3d1mLl6InVrbVlQXEAAAAAABq/vhybHlvNTn0kfR2y5ItRStTvWOxwljT7ly4pyKha + 925n9tvT5qVS3llf1XNHlq0wwUkEcAAAGym4S5urMhtp3Li631MsCIuvZdhMn51UKvvajZvY8sfRat0X + NqzhyT9UjEYlAAAA0lL2oIAAASJuG84MPk0/goRu9vR64Se6PX6pbLFWWsAAAAAAAAwnfT5s7z/lv2qI + 792evT190o/en/z1dXfDVstiogAABPfVw/gl48pj/Nle3156ehY9yeSrpS+QqbAAADXfrE/ztRf6bF+f + nLLub0p/t8oVjfXqx/X5yi0lkQAAAG5ti/glv8mh/NoUi7556ZXq15I6IXprbAAAAAAAGA75cnQX7Kk9 + bHH/APsrUx1RTyInOdG1MZY140VqYpyoSO7czNu5Efxq0I3eeWi5bmf5U6WsZalTAAACYurfVK27Xqlx + 0SwQyqnuT3N//KQu+qftpnnTm5KvuqjmTwV5YgAAAjTrA/yJH5dD4EhKbo9bqRW+PR/2hrgWdVgAAA2P + 6v38iSeXTeBGVje/rdS07n9H/aUlkWlQAAAAAAAAAAAAAAAAA1O3o+cG+eUr9hC4ZD0aehTc/wCvV0sW + OtxgAAAAAezlDM9ZlnMFLd6XFehdhPDjgkkLtD2L2U1cS4KaMzYi7RNMt+WvzariqG3FruVHdLdT3Gik + SWlqo2ywvTha5MdKcCpwoU65RNFU0zrhdLdcV0xVGqVyeHsAAAAGp29Hzg3zylfsIXDIejT0Kbn/AF6u + lix1uMAATN1bf02++5U/hSEJvrVT1p3ceurq+adCvrCAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAA0V63nnlqfIaTwVAhUAAAAAAAAAAAfRXcD5msp+Qt8JwGfgAAHyrAAAAAAAAAAAAAAAAAAAAAAAA + Mh3e5h/25nqwXxXbMdvr6eaZdXtTZE6VO2zFAPpmioqYppRdSgAAADCN8NoW4ZIrXtTGSkas+PCjGYPd + h+Ch2ZC5s3Y53FvC3tWp5muFvVJmvoHL+XVHQLxTJ3v4aLs9xeAstzR93J3Kzb0/by961VFRVRUwVOBT + a1LyoXYoKONPTJJPjyud0f8A+E8U6apnq4fF7q0UxHTPy+S15T21uUMsK1LVTU0qSRO2XalRURUVF1tc + i6FavCinmqmJjCXqmqaZxhdyUsNUx09C3Ze1FdNR4qqtRNKujVcVcxO6nKmk8RXNOir4+LZNEVaafh4O + tVjHQUUK+nSSoXkWR3R4dyFF7ZmjTVM9XD4vNeimI6+HwWZtawDlFw7AHbsGGWU5W3g3TL9M6kjhiqKR + dpzY3JsOSR3plc3S7tnDmshRdnGZmJd+V3hXZjCIiYSzlPMrL9bknWFYKhiN6eLHFqK9MW7K8qaSv5rL + fqqwxxhYMpmf2044YS9w5nUGB4ubMyW6xWp09axZkmxijp24Isiqi4piupMNanVlMvVdrwp4nNm8xTao + xq04te1LcqAGF23mWh+K/lqhuynuLHY/nkNf8+iO/wDw2/w6Z7v8rQ2NSZtz8WxleZ+n2yrkd3GMb/QV + ze0/9sf18Vl3RH/VP9vBEd1qWVV0rKliIjJ55JGoiYIiPerkwTtlgtU7NMRyQr12rarmeWVqiqi4ouCp + wnt4ZzkLeDUWuojoLrUK60qjka5zdp0TlXFFxTnbKrwaSLz2QiuNqiPv70pkM/NE7Nc/Z3JOzJmC3We2 + uqKtqzMemiBmCuezFEcqY6MERxCZaxVcqwjQnMzmKbdOM6UR5olo2JTXWyXGd1BWuei0Mkj0khfHgrmL + zl5vOTDSWDLRVporpjap4+VXs1NOiuiqdmri5E0W25UVyooq2ilSWnlTFrk9FFTgVOFCtXLdVFWzVrWW + 1cprp2qZ0KN9vMFnt619Qxz6dj42yqz0jZHozbXkTE92LM3KtmNbzfvRbp2p1I33j5rqFqYVst+26aRO + fTUrtlWOb6bpI0TFF4ldoJnd2VjCdujTyz4IXeOanGNivRyR4qWSM35nr+ms0cj6mtqnI6Kumcr/ABeJ + EwleuOvBMNlPVGc7lLVGFc6KY4uXkYyOcu140Rpqnj5OVmds3d5coK5lejZqisjf0rZppXKvSY47S7Oy + irjxkbd3hdqp2dERzQk7W7rVFW1pmeeWTnA7nVVMjoqgdVUDgDo5QKaqB1VQOiqBScoFNVApPUCi5QKL + lApOUCg9QLeRQLd6gWz10gejlegWuv8AQ0+GLVla+RPWM57vQaBN4AAAAAAAAAAA1O3o+cG+eUr4KFwy + Ho09Cm5/16ulix1uMAAZjujvdPZ8+W6epcjKedXUsj11N6ZuyxV5NvZx5Di3jamuzMRr1u7d12KL0TOq + dDakqK4AAAAAAAI23+WZtbkjx5rfbbZURy7XD0cq9E5O69q9olN03dm7h+UIre9ras4/jP0a3FnVYAAV + WUdXI1HRwSPa7UrWuVF7iGJqjleopmeJO/V3hrqegvVNVQSQYSwSMSVjmY7bXouG0iY94V/fMxNVMxPK + sO5YmKaomORLxCpsAAANJS9qCAAAEibhvODD5NP4KEbvb0euEnuj1+qWyxVlrAAAAAAAAMJ30+bO8/5b + 9qiO/dnr09fdKP3p/wDPV1d8NWy2KiAAAE99XD+CXjymP82V7fXnp6Fj3J5KulL5CpsAAANd+sT/ADtR + f6bF+fnLLub0p/t8oVjfXqx/X5yi0lkQAAAG5ti/glv8mh/NoUi7556ZXq15I6IXprbAAAAAAAHWWKOW + J8UjdqORqte1dSoqYKhmJwYmMWlU0fRyvjxx2HK3FNS4LgXqJxhQ5jCXQMAACXurjArr7d6jThHSsj5O + fJj/AMBDb6n7KY503uSPvqnmT4V1YwAAAjTrA/yJH5dD4EhKbo9bqRW+PR/2hrgWdVgAAA2P6v38iSeX + TeBGVje/rdS07n9H/aUlkWlQAAAAAAAAAAAAAAAAA1O3o+cG+eUr9hC4ZD0aehTc/wCvV0sWOtxgAAAA + AAJk3B558XqX5VrpMIahVltjnLobJrki+/75vLjwqQm9srjH7I4tac3Rm8J/XPHqTsV9YgAAAAanb0fO + DfPKV+whcMh6NPQpuf8AXq6WLHW4wABM3Vt/Tb77lT+FIQm+tVPWndx66ur5p0K+sIAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAADRXreeeWp8hpPBUCFQAAAAAAAAAAB9FdwPmayn5C3wnAZ+AAAfKsA + AAAAAAAAAAAAAAAAAAAAAAAAfSDcxmdMzbrst3dXbc0lFHBVOxxVZ6b2iVV7L41UDNAAAC3uNHFW0FRR + yptR1EbonovCjkwM01YTjDFVMTExPG07rqSWiraiklTCWnkfE9PXMcrV+wXKiraiJjjUqumaZmJ4lxWf + 4qBK5PyuKMq09fwSf+pw+ux40PNH2zs/Dw6u57r+6Nrj4/Hr73WtVUgoWrwQL6M0jv6TNvXPT8oebmqn + o+crZFwNjU5MsuUUMO8cj2Pa9jla9io5j2rgqKmlFRUMTGLMTg9m6upquukgnVKetgRsCzL+SkdE1GO2 + 09I5XIvOTm8eGlxz2saacY00zp4cPB03cKqsJ0VRo5tHDhreVPTz08qxTMVj04F4l0oqLwovAqHRTVEx + jDmqpmmcJUz0wAcoqoB2RUXsmGUqZNp8zW5l0r6GlZVUOiCKnfIsckjqRvRo+PmuRU0YLqxILOVWq9mm + qcKtfx06U9k6btG1VTGNOr4aNDHWb182trFmc+F0S/8AtViRI07CphJ+Mdk7rs7OGnpx4Q443re2sdHR + hwl6tXvkq5ba+OnoUp7g7mtn29tjcdbkaqJp4kU56NzxFWMzjS6K98TNOERhUwO4Xe63FzHV9XLVLHj0 + fSvc/Z2sMdlFXRjgStu1RR5YiEVcvV1+aZlaGxqAL2oRG2qjbwukml7TthiejGprp889TbV5I6/l4LI2 + NS9gvd3p6NKKCslhpUk6VI43K1NvDDHFMFNdVmiatqYjFtpvVxTsxMxCyNjUAAJXuV1jj3cU1JdmpJca + ihV9OxNLkjarWxyOXRsrsub2SAt2pnMzNHlirSsFy7EZaIr8006Pkign1fSJumzMylqZLJUu2Y6p3SUj + lXQkuGCs++RNHL2SH3rltqP2Rxa0zunMxTP6549SULjSxVdDPTSxNnjmY5jonrg12KalVMcOyQduqaao + mJwTtyiKqZiYxxa43GhqqGtmpamF0E0TlR0TtacWnhTl4S5W64qpiYnGFLuUTRVMTGEsk3Y1N0jzVBBR + ORIp0VKxrkxasTE2l7C+pXjOLedNM2pmri1dLt3ZVXF6Ip49fQnAqy1OqqZHRVDLqqhhwBwqgU3KB0VQ + OiqBTcoFNygU3LggFFygUXKBSeoFF68AFB7gLaRQLeRwFBdYGc7rLdt1tXcHJzYWJFH909cVw7CN9ECS + QAAAAAAAAAABrFvwt7qTeHWyYYMrYoaiPsdGkar+FGpa91142I5sYVLetGzfnnwlgRII4AAAJq3cb8oY + KaG05qc/CNEZBdURXrsomCJOiYuXD1aY8qcJBZ3dUzO1b+HgnslvaIjZufHxTRQXGguNK2qoKmOqpn97 + NC9HtXttVSDrommcJjCU9RXTVGNM4wuDy9AAAAApVdHSVlM+lrII6mmlTCSCZrZGOTHHBzXIqLpPVNU0 + zjE4S81UxVGExjCwZlXK7NnYs9C3Zw2dmmiTDDVhg09zmLn5T8Za4y9v8afhC5js9pjdtR0VOx2rFsTE + XDtIeZuVTxy9xbpjihcRwwxIqRRtjRdaNRE+weZmZeoiIdzDIAAAAAGkpe1BAAACRNw3nBh8mn8FCN3t + 6PXCT3R6/VLZYqy1gAAAAAAAGE76fNnef8t+1RHfuz16evulH70/+erq74atlsVEAAAJ76uH8EvHlMf5 + sr2+vPT0LHuTyVdKXyFTYAAAa79Yn+dqL/TYvz85ZdzelP8Ab5QrG+vVj+vzlFpLIgAAANzbF/BLf5ND + +bQpF3zz0yvVryR0QvTW2AAAAAAAPNzLeIrNl+4XSVyNbSQPkaq8L0TmN++dghtsW9uuKeWWq/ciiiau + SGm5dlGAAADYHq7Wd1Ply4XR6YLX1CRx8rKdq6fw5HJ2iub5uY1xTyR3rLuW3hbmrlnuSyQ6ZAAACNOs + D/Ikfl0PgSEpuj1upFb49H/aGuBZ1WAAADY/q/fyJJ5dN4EZWN7+t1LTuf0f9pSWRaVAAAAAAAAAAAAA + AAAADU7ej5wb55Sv2ELhkPRp6FNz/r1dLFjrcYAAAAAACpTVM9NURVNO9Yp4XtkikauDmvauLVReRTFV + MTGEs01TE4xrbY7vM4wZry1BcEVG1kftNfEnpZmppVE9S7vmlPzmWmzcmni4lyyWZi9birj42SnK6wAA + A1O3o+cG+eUr9hC4ZD0aehTc/wCvV0sWOtxgACZurb+m333Kn8KQhN9aqetO7j11dXzToV9YQAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAGivW888tT5DSeCoEKgAAAAAAAAAAD6K7gfM1lPyFvhOAz8 + AAA+VYAAAAAAAAAAAAAAAAAAAAAAAAA3B6lGa/GssXvK80mMttqW1tKxdfQ1Tdl6NTibJFiv3QGyYAAA + A1p312H9153nnY3CnuTG1TOLbXmyJ+E3Htll3bd2rURx06FY3na2bszxVaWE0dUtPLtK3bieismixwR7 + F1t/pReBcFO6unGHDRVhK8vkCQz0/Rqr6d9PG6CRU2dpipxcaLii8prsVYxOOvF7v04TGGrCHnob3O7I + vAGQySurZGyW40sUiYxvlYj09arkx9A8XJwpmeZ7tRjVEc6nLM+aV8si4ySOV7ncauXFT1EYRhDzVOM4 + yuIK9WxJT1LPGKVO9Yq4PZjrWN+C7Popxop5qt6cY0Tw1vVNzRhOmOGp2kt6PY6aif4xC1MXswwlYnr2 + adHrm4px4ajEXMNFWiexmbeOmnTHasza1PTsuW73envbbaV06R/lH4tYxuPArnq1uPIaL2ZoteacG+zl + rl3yxizXL26S4trYai7TRRwRPR7oIlV73bOnZVcNlEx7JGZje1OzMURpSeX3RVtRNcxglWNjI2NYxqNY + 1MGtTQiIhBTOKfiMGPXvIOWbrHJtUraapkXa8ZgRGOR3GqJzXY8OKHXZz923OvGOSXHeyFq5GrCeWGJ0 + O5l/jLvH7ii0qLzUgbhI5OVX4o30SQr3xo+2nTzo+jc2n7qtHM9mg3SZZpqlJpnz1bE72CVzUbj67YRq + qc1e9btUYRhDpo3TapnGcZe5/svKfR9H+6qbZTh2E2vwu+9E5f8A2XsfNLr/APFZww2YWlTu3ybUaVt6 + RrxxPkZ6COw9A2U7xvR/Jqq3dZn+LzJ90ljlqYVWqnbRwR7DadFbtaXuf+UVNWL9Wz2zfTvWuInRGMtF + W6bczGmcIWN53O0L4dqz1T4qja0sqXI6PZ4kVjNpPRNtne9WP3xo5mq9uenD7J0861odzEiwuWuuSMmV + Oa2Biuai8aq5WqvcQ9174jH7adHO8UbmnD7qtPMwa85eudoVq1kSxRyve2BX4Ne9rFw2+jx2kReUlbOY + pueWUVey9VvzQyTIuZsrUlGtqvlBG5kkjnpWSRtlTFyImDkVFc1E2daYnFnstdqnbt1dWp25HM2qY2Ll + PXrZrmCiyzSZSr7jaaGikwhVIp4o4nYK9UbtI9EXS3axIyxXdqvU01zVr50nmKLVNmqqimnVzIukvFfd + X1k9bIj3x0SQxoiIiNYyRmDURCdizTbwin8kFN6q5jNX4+Dw1cnAdLkd6eokgqYqhi4SRPbIxeVq4oYq + pxiYZpqwmJ5GxjbvRLaG3Zz9miWFKhX4K5UjVu1jg1FXQnIU39VW3sfyxwXT9tOxt/xwxQjnPNT8wVUS + vjjTxRZI2VEaOb0sauxY5WuxVuhNWPCWjJ5X9MTz9ir53N/umObteLb7lW22sjrKKV0NREuLXt+wvGi8 + KHTct0107NUYw5bdyqirapnCU95XzBFe7HBcEVGyKmzUsTUyVvfJ2OFOQqWay82rk0/Bb8rmIu24q+L1 + HOajVcq4NRMVXkOd0PHpM3ZbrKxtHTXCKWod3jEVedyNcqbKryIp0V5S7TTtTTODmozlqqrZiqMVe7Xu + 2WqmkqK2oZEjGq5GK5Ee7BNTW61VTxas1XJwphsu36LcY1SwKyb1aytu1PSVsUFLSzy7KzNR6qjVx2W6 + XYYquCK70CWv7rppomaZmZiERY3rVVXFNURETKR3KQicU1UDqqgdHKBScoHRV4QKT3AUXKBScoFFygUH + uAoPcBbvUC3kdpApBhMmRrZ4hlyma5MJaj/ESdmTDZ/FRAy98AAAAAAAAAAAQ71icuPnt1vv8LMVpHLT + Vap/ZyrjG5eRr8U++Jvc17CqaJ49KD31YxpiuOLRKBywK6AAAAC+tF9vNnqPGLXWzUc2jF0L1btInA5E + 0OTkU13LVNcYVRi2W7tdE40zgkaxdYTNFGjY7tSwXONNcif4eZey5iOj/EIy7ue3V5ZmntSlnfNynzRF + XYz+zb+cjVyNbWOntkq6FSeNXsx5HxbejsohHXd03qdWFSStb3s1a8aWb2rMVhuzdq2XCnrNGKthlY9y + dlqLinbOG5Zro80TDvt3qK/LMS9A1NoAAAAAAAAAAAAGkpe1BAAACRNw3nBh8mn8FCN3t6PXCT3R6/VL + ZYqy1gAAAAAAAGE76fNnef8ALftUR37s9enr7pR+9P8A56urvhq2WxUQAAAnvq4fwS8eUx/myvb689PQ + se5PJV0pfIVNgAABrv1if52ov9Ni/Pzll3N6U/2+UKxvr1Y/r85RaSyIAAADc2xfwS3+TQ/m0KRd889M + r1a8kdEL01tgAAAAAFOpqaemgfUVMrIYIkV0ksjkaxrU1qrl0IZppmZwhiqqIjGdTXnfBvSizE9LLZnq + tngftT1GlPGJG6sEXBdhvBjrXTwIWXd2Q/X99Xm7lZ3ln4u/ZR5e9F5KogAAXNsttZc7jTW+jZ0lVVSN + ihZxucuGnk4zzXXFFM1Tqh7t0TXVFMa5bf5bsdNYrFQ2inXGKjibHt4YbTtb3qnrnKril3rs3K5qnjXa + xai3RFMcT0jU2gAABGnWB/kSPy6HwJCU3R63Uit8ej/tDXAs6rAAABsf1fv5Ek8um8CMrG9/W6lp3P6P + +0pLItKgAAAAAAAAAAAAAAAABqdvR84N88pX7CFwyHo09Cm5/wBerpYsdbjAAHvWHKlXerJeq6jxfPZ2 + QzuhRMduFyvSRU5W7KO7GJz3cxFFdMT/ACdNnLzcoqmNdLwTocwAAAZpuqzu7KuZGPneqWquwhr28DUx + 5kv/AKar3MThz+V/db0eaNTv3fmv03NPlnW2la5rmo5qorVTFFTSiopUlvcgAAGp29Hzg3zylfsIXDIe + jT0Kbn/Xq6WLHW4wABM3Vt/Tb77lT+FIQm+tVPWndx66ur5p0K+sIAAAAAAAAAAAAAAAAAAAAAAAAAOs + kscUbpJXoyNulz3KiIicqqB4dZnzJtGqtnvNLtJrayRJFTspHtAee/e1u+a5WrdkxTigqFTupGqAcx72 + N30i4NuzUXDHnQ1DU7ro0A9OjzrlGtVEp7xSOcupiysY5ew1ytUD2Wua5qOaqK1dKKmlFA5AAAAAAAAA + aK9bzzy1PkNJ4KgQqAAAAAAAAAAAPoruB8zWU/IW+E4DPwAAD5VgAAAAAAAAAAAAAAAAAAAAAAAACV+r + FnD/AG1vdtSSv2KO8o61VOOrGoVFh/v2R9rEDf0AAAARtv2y4tyyo25ws2qi1P6RVTX0MmDZE7S7Lu0S + W672zc2eKpGb0s7Vva46WuqLihY1bevJUxPipqapdhTywtcyTWsUjcY9tMNOC7GDk4uVEOeKZxmY14/F + vmqJiInVMfDhxvOnglgmdFKmD29tNOlFRU1oqaUU6KaomMYaKqZicJdEPTw7IuPZMMry1J7fI9dHRwTu + x5eicjfxlQ13Z0dcd7bajTM809y0RTa0uyLwKGXaOSSKRskblY9q4te1VRUVOFFQTETrImY0w9mz0rsw + XGK3uh/xk64JVxIjVRETFzpWaGuRETFVTB3KpzXqv00zVjoji8HTZo/dVFOH3Tx+Kd7Ra6W122CgpW4R + QMRuOGCuXhcvK5dKlVu3ZuVTVPGtlm1FumKY1QvDW2GIHOIHOIDEBiByAAAAIQ3pwzRZumdLN0rZoo5I + m6eYzDZ2NPK1V0cZZ91zE2YwhV96RMXpxnXDENpCQRuKvHca6KlmpIpnspajZ6aFFXYcrVxaqpq0Kh5m + 3TMxMxph7i5VETTE6JVbb+Sr/Jl/OMPNzXT0+L1b1VdHzhYm1qAMnse8C9Wq3vtytjrKFzFYyGdFXYR2 + tEVqouyuOo4b+QouVbWqrmd1jeFdunZ81POxlzXI1HK1Ua7HZXgXDXgp24uHB1Mjskj2sVm0uyulW46O + 4ecGcXv1Gasw01sp6OCtkjoqmnb7XoVURquhcjXKiuai9HwKclOVt1VTVMfdE/V2VZu5TRFMT9sx9GOI + q4oqLgvAuo7HHDNv9h+KWZ97zDWpFJsueyjVyOWR2CrG1ZWuf3/rUXQRf/v2q/1246+TqSv/AINmj9ly + cObl62JWyd0d3pJ2x7TmVEb2xImhVR6KjUQ77tONExzI61VhXE87YhVKaurqqgdFUCm5QKblApvcBRco + FJygUnqBReoFB7gLeRwFvI4Cg5dIF/l61uul5paLDFkj0WXkjbzn/ioBOLWta1GtTBqJgiJwIgHIAAAA + AAAAAAAsr1aKO8Wmqtda3bpquN0UicKY6nJytXSnKbLVyaKoqjXDXdtxXTNM6paj5oy5X5dvlVaa5uEt + O7BkmGDZI10skbyOT7RcrF6LtEVRxqXmLFVquaZ4nlG1pAAAAAAActc5rkc1Va5NKKmhUUDJbNvLzzaM + EpLxO6NuqGdUnZhxI2VH7PawOW5kbNeumO512s9eo1VT397O7J1jLrFssvVriqW6lmpnLC/sqx3SNcvb + aR93c1M+SrDpSNrfVUeenHoSHYd8eQ7wrI/HvEKh/wDU1rei0+6Yui/GI27u29RxYxzcMUlZ3nZr48J5 + +GDNI5I5GNkjcj2OTFr2qioqcaKhwzGDvicXYwyAAAAAAAAaSl7UEAAAJE3DecGHyafwUI3e3o9cJPdH + r9UtlirLWAAAAAAAAYTvp82d5/y37VEd+7PXp6+6UfvT/wCerq74atlsVEAAAJ76uH8EvHlMf5sr2+vP + T0LHuTyVdKXyFTYAAAa79Yn+dqL/AE2L8/OWXc3pT/b5QrG+vVj+vzlFpLIgAAAJgousTW0tFT0qWON6 + QRsiR3jDkx2Go3HDo+QhatzRMzO12JujfUxERs6udW+slW/IUXxh3wZj2WPy7Hr3yfx7fofWSrfkKL4w + 74Meyx+XYe+T+Pb9D6yVb8hRfGHfBj2WPy7D3yfx7fo4f1kbgrV2LHEjuBVncqdzYQey0/l2HvdX49qj + 9Y+9/I9N75IZ9lo/KXn3uv8AGFjV9YbOcrNmnpaGmVfTpHI9ydjakVvoGync9qNc1S11b5uzqimGEZgz + nmjMLsbvcZaliLi2HFGRIvGkTEazHlwO+zlrdvyxgj72auXfNOLxTe0AAABsBuS3bSWqBMyXeLYuNQzC + gp3pg6GJyYK9yLqfIncb2cErm9M7tz+unyxr51k3VkdiP2VeadXMloh00AAAACNOsD/Ikfl0PgSEpuj1 + upFb49H/AGhrgWdVgAAAy3K+8/NWWbatutckLaZZHTKkkSPXaciIulV9acd/I27tW1VrduXz9y1Ts04Y + PX+nneD/AG1N7w37Zp9ps8/xbvd7/N8D6ed4P9tTe8N+2PabPP8AE93v83wPp53g/wBtTe8N+2PabPP8 + T3e/zfA+nneD/bU3vDftj2mzz/E93v8AN8D6ed4P9tTe8N+2PabPP8T3e/zfA+nneD/bU3vDftj2mzz/ + ABPd7/N8D6ed4P8AbU3vDftj2mzz/E93v83wPp53g/21N7w37Y9ps8/xPd7/ADfA+nneD/bU3vDftj2m + zz/E93v83wPp53g/21N7w37Y9ps8/wAT3e/zfBfWLfdnutvluo55adYamphhlRIURdmSRGuwXHiU13d1 + 2aaJmMdETxtlnet6quInDTMcTYgrSzgAAAA1O3o+cG+eUr9hC4ZD0aehTc/69XSxY63GAAJm6t6ItZfk + VMUWKnRUXVhtSEJvrVT1p3cmurq+bEN7WRlyvmRzqaPZtNw2pqJU1MXH2yL7xV0etVDs3fmv20afNGvx + cW8cp+m5o8s6vBhB3o8AAANiNxeef3tZ1y/WyY3C2MTxZXLpkpUwRvbj73sYFa3rldirbjy1d/1WfdOb + 26difNT3fRKREpcAAanb0fODfPKV+whcMh6NPQpuf9erpYsdbjAAEzdW39NvvuVP4UhCb61U9ad3Hrq6 + vmnQr6wgAAAAAAAAAAAAAAAAAAAAAAC0ul2ttqon1txqGU1LH30j14eBERNKqvAiaQIizVvyrJXPp8uQ + pTxavHp2o6ReVka4tb99j2EAjW6Xy8XWVZblWzVb8cU6V6uRPuWrob2gysgAAAB6VozJfrPIj7ZXzUuC + 4qxj12FX1zFxY7toBJuU9+TleylzLCiNXBEuFO3VyyRJj3WfghhLdLV01XTR1NLK2enlTailjVHNci8K + KgFUAAAAAAGivW888tT5DSeCoEKgAAAAAAAAAAD6K7gfM1lPyFvhOAz8AAAjX6t25L5rQe/VPwoD6t25 + L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe + /VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwo + D6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25 + L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoD6t25L5rQe/VPwoFSn6u25mmq + IqiDLMMc8L2yRSNmqUc17Fxa5F6XWioBIwAAAAo1lJBWUk9JUNR8FRG6KVi6la9NlU7imaapicYYqpiY + wnVLUbNVhqMv5grbVOi408ipG5fTRrpY7ttLdYuxcoiqONT8xZm3XNM8S1q8FpqFUT+pciry9NIv2FQ9 + Ua56flDxXqp6PnKpTzR1MLaSpcjHs0UtQ7U3HT0b19Qq8PpV5MRVE0zjHWzTMVRsz1T8uhbSxSwyuila + rJGLg5q60U2RMTGMNVVMxOEup6eV7RKvi1cur2lrUXlWaPR3EU1V66en5S229VXR84Whta8HKKGHZF7g + ZZ3ujoKh9/lreid4tFA9vTKi7PSOc1EajtWOGJFb2uR+uKcdOKW3Rbmbk1YaMEwIpXVjdsTA5MgAA5xA + YgMQAAC3uNZ4nb6mr2Fl8WifL0aLgrthquwRV48D3bo2qojll4uV7NM1ckNe8w3yqvd2muNS1rHy4Ikb + McGtamDU08hb8vYi1RFMKdmL83a5ql5puaQC+tv5Kv8AJl/OMNVzXT0+Lba1VdHzhYm1qMQOAPZtmbLt + QQwUzehqKOmcr46eeGORqK5VVyo5W7aKuOtFOW7laK5mdMTPHEy6rWbroiI0TTHFMQrX/ONXeY1jlo6O + BFRER8MWEiIio7Q9yuVNXAebGTi3piap63rMZyq7GExTHUx9VOtxrqrVXUVC71Mb4+5K5/8A+Q10eaeH + E21aaaeHGs+ye2tUmrKueOOOaaSSOFNmFj3K5rE4moq6O0YiiI0xGtmquqdEzqe7u+oW1mbKJr27UcKu + nd/6bVVq/h7Jx7wubNmefQ7N3W9q9HNpTeqlWWx0VQOjnAU3KB0VcEAoucBQnmjijdJK9GRtTFz3KiIi + cqqIiZ1MTMRplgtx3o0UMz4qaldN0c2wsu0mw6NrsFcxU4VTUSlvddUxjM4aEXc3rTE4RGOlldJXU1bS + x1dM9JIJW7THJ9heVOEja6JpmYnXCSoriqImNUj3Hl7UHuA83960D6vxRs7VqedhHwrs99hwLh/9alNk + 2qojaw0NcXaZnZx0u0jjW2PFumaLPbtpssySTJ/URc52PEvA3tqdFrK116o0Oe7maKNc6Ujbj7fWVdFV + Zmrm9GtYvQ0EHAyBulXcquXhGYpppnZji72cvVVVG1PH3JSOdvAAAAAAAAAAAAAwrefu6ps32pHQbMV5 + pEVaKddCOTWsUi+pdwcS6eM7sjnJs1afLOtwZ/JRep0eaNXg1iuFvrbdWTUVdC6nqoHKyWF6YOa5C10V + xVGMaYVKuiaZwmMJhbnp5AAAAAAAAAAD2cv5yzNl6RH2i4S0zMcXQY7ULl9dE7Fi9w0XstbueaMW+zmb + lryzgl/KHWDoqhWUuZqbxSVcE8fp0V0S8r49L29lu12EIbMbnmNNuceaU3lt8xOi5GHPCXKKto66ljq6 + OZlRTTJtRTRuRzHIvCioQ1VM0zhOiU1TVFUYxOMKx5egAAAAANJS9qCAAAEibhvODD5NP4KEbvb0euEn + uj1+qWyxVlrAAAAAAAAMJ30+bO8/5b9qiO/dnr09fdKP3p/89XV3w1bLYqIAAAT31cP4JePKY/zZXt9e + enoWPcnkq6UvkKmwAAA136xP87UX+mxfn5yy7m9Kf7fKFY316sf1+cotJZEAAAAAAAAAAAAAAAFzbrbX + 3Krjo6CnkqqqVcI4Ymq5y9pOBOFTzXXTTGNU4Q9UUVVThTGMp23a7k4rXLDd8yIye4MwfT0CYOihcmlH + PXU96cWpOUr+d3pNf229XKsWR3VFE7VzTVyJbIZNAAAAAARp1gf5Ej8uh8CQlN0et1IrfHo/7Q1wLOqw + AAAAAAAAAAAAAAAA9TKn80Wfy6m/PNNWY9Oronubsv6lP9o724xSV4AAAABqdvR84N88pX7CFwyHo09C + m5/16ulix1uMAATN1bf02++5U/hSEJvrVT1p3ceurq+aUs+5Qps1ZbqLZJstqU9top1/q5mpzV7Du9dy + KRGUzE2a4q4uNL5zLRetzTx8XS1Mq6Spo6qakqo1hqad7oponaFa9i4OavYVC401RVGMapU2qmaZwnXC + kZeQAB6WXb9XWC9Ul2onYT0r0ds44I9upzHYelc3FFNV61FyiaZ1S22b0264qjXDbmwXuhvlnpbrQu2q + arYj28bV1OY7la7FFKbetTbqmmdcLrZuxcpiqNUr81tgBqdvR84N88pX7CFwyHo09Cm5/wBerpYsdbjA + AEzdW39NvvuVP4UhCb61U9ad3Hrq6vmnQr6wgAAAAAAAAAAAAAAAAAAAAAHjZrzXa8tWt1dXOxcuLaen + avPlf6lv9K8AGueac23jMtwWruEnMbikFMzFIom8TU+yq6VA8UMgAAAAAAAGYbvd4VbletSKVXT2edye + M02OKsVf6yPicnCnD3FDDYqkqqarpoqqmkSWnnakkUrdKOa5MUVAKoAAAAAaK9bzzy1PkNJ4KgQqAAAA + AAAAAAAPoruB8zWU/IW+E4DPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIg3+5SSpoqfMNMzGopk6 + Kqw1ui0qi/e6V7GJLbrzGzVNE6pRG9cvtUxXGuO5Ci861RORcVine1ycSSNarfAcTceeehBzpojmlbGx + qX0M8NVE2mqnIx7E2aeqX0qcDJMNKs4l1t7BrmmaZxj4NsVRVGE9UreeCanlWKZuy9vbRUXSioqaFRU1 + KhspqiYxhrqpmJwlcQJhbKp/D0kMf4SPd/wHmfNHX8nqI+yemPmoRMklkbFG1XyPVGsY1FVyqupERD3M + xGmXimJmcISXZd0UUlAkl2qZIquRuKQw7OEarqRyqjtpePAhL295irCiNCcs7oiaca508z2LNuqy/ROV + 9a51wkxXYR+MbETg5rV0r2Vw5Dnvb1uVeX7XRZ3Vbp833MxpqenpoGQU8bYYY0wZGxEa1E5EQjqqpqnG + dMpKmmKYwjRCsinl6cooZcooYdkUwGIHJkAAAAAAjvPG7SpuVdLdLS+NJpETpaRyIxFc1ETFjtWK4cPd + JjJbyiinYr1cqGz27Jrq26NfIjuuyrmOhiWaqt08cSYo6TYVzUw0aVbjghMUZq1XOEVQhq8pdojGaZwe + VidDnXttX2qv8mX84w1XNdPT8pbbWqro+cLE2tQBy5qt75FRVTFEXiUxizg4VQOuIYcBnBdyqv7qpsU1 + Tzoi/eRGqPPPRHzbKvJHTPyWaqbWpcstde9iSLCsUS97LMqRMXsOkVqL2jVN2nVj822LNWvD46Gd7qLa + yO51tU2dkyxwpE7o0fst6RyO75yNRfyfARO9buNMRhhpTG6bURXM446ElqpBp10c4CmqgU1UCm9wFJzg + LSup46ukmppMFjmY6N2KY6HJhqPVFU0zExxPNdMVUzE8aCLrbqm2181FUJhLC7DHgcmtHJyKmktVq5Fd + MVRxqpctTRVNM8T18oZorLVULT6ZqOVHOdAq4YPRqqitXgVcMDlzmWpuRjqqdeTzVVucNdLJKTeZa5pd + iqp5KZq6pEVJETs4Ii9xFI+vdtcRonFIUbyomdMYF7z1bIre51Ir5Z5UVIEVFZii6NvTg7Z+yeLORqmr + Tqh7u56iKdGuWGVSVtHS2y9YuSrnkkej171GM2UjbhxYbXaUkKZpqmqjihwVRVTFNfHKjVZivF2qo4Z6 + hWQyvazoouYxEcuHBr7ZinL0W4xiNJVmK7k4TJl6y1GY8yQUMDcVqp+cicDXO09jWertz9dDFq3+yvBu + TaLZT2u10tvp0RsNLG2NiJo1JpXtrpICZxT0RguzDIAAAAAAAAAAAAADE897trFm+mRalPFrlE3Zp7hG + iK9E4GvTRtsx4O4qHZlM7XZnRpp5HFm8jRejToq5Wu+b93eZ8rTO/eFMslHj7XXw4vgdjqxdhzF5HYFl + y+ct3Y+2dPJxqzmclcsz90aOXiYydTkAAAAAAAAAAABk+SN4N+ylWpJRSLLQvdjVW+RV6KROFU9Q/icn + bxTQcuaydF6NOvldeVzldmdGrkbNZTzZaM0WiO5W2TFq82eB2HSRSYaWPT/6xKrmMvVaq2alsy+Ypu07 + VL2TQ3gAAAA0lL2oIAAASJuG84MPk0/goRu9vR64Se6PX6pbLFWWsAAAAAAAAwnfT5s7z/lv2qI792ev + T190o/en/wA9XV3w1bLYqIAAAT31cP4JePKY/wA2V7fXnp6Fj3J5KulL5CpsAAANd+sT/O1F/psX5+cs + u5vSn+3yhWN9erH9fnKLSWRAAAAAAAAAAAAAAAB7WWs45iy1O+az1a06yYdKxWtex6JwOa9FQ0X8tRdj + CqMW+xma7U40Tgl7KXWDoalzKbM1N4nIuCePUyOdD9/Gu09vaV3aIbMbnmNNuceaU3lt8xOi5GHPCXKK + to66ljq6OZlRTTJtRTRuRzHIvCioQ1VM0zhOiU1TVFUYxOMKx5egAAAARp1gf5Ej8uh8CQlN0et1IrfH + o/7Q1wLOqwAAAAAAAAAAAAAAAA9TKn80Wfy6m/PNNWY9Oronubsv6lP9o724xSV4AAAABqdvR84N88pX + 7CFwyHo09Cm5/wBerpYsdbjAAEzdW39NvvuVP4UhCb61U9ad3Hrq6vmnQr6woP3+5F2XtzZQR81+zFdG + tTU7vY5u33ju1yk9ujNf/nPV4K/vjKf/AK09fihUnUCAAAErbic8/uy6uy7XSYUNxdjSOcuiOp1I3sSp + o+6w4yI3rldunbjXTr6Pomd05vYq/XOqrV0/VsIVtZQDU7ej5wb55Sv2ELhkPRp6FNz/AK9XSxY63GAA + Jm6tv6bffcqfwpCE31qp607uPXV1fNOhX1hAAAAAAAAAAAAAAAAAAAAAUa2tpqGjmrKp6RU1Ox0ksi6k + a1MVUDWTOubazM97lrplVlM3FlHT46I4kXR987W5ePkwA8EMgHq5eyvfMw1fi1rpnTK3DpZV5scaLwve + uhPsgSlZdwtCxjX3m4ySya1hpERjE5Nt6Oc78FAwyWHc/kCNuD7c6VfVPnnRfxHtQClV7mchzsVsVLNS + KvpoZ5FVPfVkQDBsz7j7rRMfU2Oo/eELcVWmkRGTonrVTmv9DsARnJHJFI6ORqskYqtexyKjkVNCoqLq + DLqAAmHcbmx7kny3VPx2EWe348CY+2xp3dpO2GEvAAAAABor1vPPLU+Q0ngqBCoAAAAAAAAAAA+iu4Hz + NZT8hb4TgM/AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAs7xbIbpbKmgmw2KhitxVMcF1tdguvBdJ7 + or2ZiXiujaiYarXyxTWqrudulbsdG7bjZxSQO2XsRfWskVycbcF4Sz2r21szw0/4+Kr3bOxNUcNH+fgx + 9qnW43YML2nrInxNpqxFdA38lK3BZIsfU4983javawNdVExONOvvbKa4wwq1d3DkXsdqq1tskMTendUV + VM2lfFzmyYsnTm6u2i6U4TXN2NrGdGETj2NsWZ2ZiNONUYc/mTRlnL9FZLZDTQxNSdGotRNrc+RUTaXa + 14Y6itZnMVXapmZ0cSz5XL02qIiI08b2Ucc7odkUDkDnEDlFA5xA5xDLnEMGIHO0BziYDEBiAxA4xMhi + BH28nJttdaJrtQUrYayByPn6NNlHxquDsWpzcUx2scCX3bnKtuKKpxplD7yyVOxNdMYVQjK2/kq7yZfz + jCcua6enxQVrVV0fOFjoNjUljdplK2ttcV6qo2VFVUbXQI7BzY2Iqt0Jq2lVF08HdK/vLN1bc0RoiFi3 + Zk6diLk6ZlnVRS0tQ3ZnhZM3Vg9qOT0SKprmNU4JaqiKtcYo/ue56jllV9vrnU7HKqrFKxJETFcURqor + FwTlxJe3veqI+6nFD3dzUzP21YMfXdNmdamSNj6dIWuVI53vVEe3gXZaj3Idfu1rDHTi5PaLuOGhZXDI + tztqKtTTVU+z3y00TZI1Tkej3OTtsNlvPU16ppjpn6fNquZCujXFU9EfX5Kdotr7pH4nb7c6eSOoRJUq + XvVsaPaqbTljSHZTmGb139f3VVYaOL64sWbX7I2aacdPH9MGbRbtVbBh+81gmw76lgjhROTaTGR3bcRU + 7y0+XGOecfolo3Zo82E80RH1eEu6W8StZLLcIlnfpmR6OcqL91iu0dXu1EaIpnBye0VzpmqMWaZSyvT5 + eoHwMkWaomcj6ibDBFVEwRGpwIhF5vNTeqx1RCVyeUizThrmXtOccrrU1UDoqgU3uApOcYFJzjIpOcBj + 2ZMqW29N6SXGKraxWRTt4OFNpPTIinVl83Va0RqcuYylN3TOtG9Vl6utF/o6KVzZXTuYsTo8cFR7lZgu + KJgvGTNOZpuW5qjiQ1WWqt3IpnjebLTJb3q2rYjqxq6KZdKMXjk4F5G93iXZFe3q8vL4NexsTp83Io0k + FRc7nDBtK6WoejVeunBOFew1DFyqLdEzyPVuma6ojjlJt0sdDXWttucmxHE1EgcmtitTZavLoIC3fqpr + 2k9csU1UbLHaDd8yGbpKisV6JijEjYjV0oqY4qrtKa00HXc3hjGiHJbyGE4zKUNx+75tsqqq8zKkrWKs + VI9UwVXL3zsPWtXZTsuOfMZn9mDoy+W/XimM5XUAAAAAAAAAAAAAAAAOskcckbo5Go+N6K17HIioqLrR + UUzE4MTGKPMz7jcn3hXzULXWerdp2qdEdCq8sKqifgK0krG9btGifujn8UZf3Tar0x9s83gizMO47O9q + V0lLCy60yadulX2xE5Yn7LsfudolrO9LVev7Z50Re3Veo1fdHMwOsoq2indT1lPJTTt76GZjo3p2WuRF + JGmqKoxicYR1VE0zhMYSomXkAAAAAAAAAZFkTOlwylfY7hT4yUz8GV1Ljolix0pyObravHyYnNm8tTeo + 2Z18Tqymaqs17UauNtfbLlR3O309wopElpKpiSwyJwtcmPaXjQqFdE01TTOuFxt1xXTFUapXJ4ewAAA0 + lL2oIAAASJuG84MPk0/goRu9vR64Se6PX6pbLFWWsAAAAAAAAwnfT5s7z/lv2qI792evT190o/en/wA9 + XV3w1bLYqIAAAT31cP4JePKY/wA2V7fXnp6Fj3J5KulL5CpsAAANd+sT/O1F/psX5+csu5vSn+3yhWN9 + erH9fnKLSWRAAAAAAAAAAAAAAAAAAZRkbeFfMo1ySUj1noHuRaq3vd7XInCrdew/1ydvFNByZrJ0Xo06 + +V15TOV2Z0eXkbO5YzNasyWeG6W2Tbgk0PY7Q+N6d8x6cDk/+5Vb9iq1Vs1LbYv03adql6ppbgAAAjTr + A/yJH5dD4EhKbo9bqRW+PR/2hrgWdVgAAAAAAAAAAAAAAAB6mVP5os/l1N+eaasx6dXRPc3Zf1Kf7R3t + xikrwAAAADU7ej5wb55Sv2ELhkPRp6FNz/r1dLFjrcYAAmbq2/pt99yp/CkITfWqnrTu49dXV806FfWF + Qr6GkuFFPQ1caS0tTG6KaNdTmPTBUPVFc0zExrh5roiqJidUtSs75Uq8rZiqbVPi6Nq9JSTL/WQOVdh/ + Z4F5UUuOVzEXaIqjr6VMzWXmzcmmeroeCdDmAAHLHvY9r2OVr2qjmuauCoqaUVFQTBEtqd1udmZry1HN + M5P3pR4QXBmhFV6JzZMOKREx7OKcBUc/lf03MI8s6lwyGa/dbxnzRrZgcTuanb0fODfPKV+whcMh6NPQ + puf9erpYsdbjAAEzdW39NvvuVP4UhCb61U9ad3Hrq6vmnQr6wgAAAAAAAAABb1txt9BF0tdUxUsX9pM9 + sbdHK5UAx6p3o5Cp3K2S7xuVFw9rZLKndjY5AKcW9fd/K/ZbdmovroZ2J3XRogHuWzMdgumCW64U9U5U + x2IpGuenZbjtJ3APRAAAAACKd+mZnQUdNl+nfg+q/wARWYf2TVwjav3T0x+9AhYMgGRZGydV5pvLaONV + ipIkSStqUTHYj4kx9M7U3u8AYbIWezW2z2+Kgt0DYKaJNDW61Xhc5fTOXhVQL0AAAARnvfyFBX2+XMFv + iRtwpG7dY1qfloWppcvrmJpx4u0BBgZAPTyxd32fMFvubVwSmma6TDhjVcJE7bFVANrEVFRFRcUXSioG + AAAAAaK9bzzy1PkNJ4KgQqAAAAAAAAAAAPoruB8zWU/IW+E4DPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAEU75MsxMkizGjFWldhTXbYTFzGORY2ToicTXqx3IqEnkbszGxx648Pmi8/aiJ2+LVV4/JAdXS + zUtTJTzN2ZI3bLk/pTkXWhP0VxVGMK9XRNM4S6Ip7eV5a6Ca43GmoYfylRI2NFwVdnaXBXKicDU0qa7t + yKKZqnie7Vua6opjjTxYLBbrJQtpaJmGpZpV7+RyJhtOX+jgKpfzFV2rGpbcvl6bVOFL1EU0t7lFA7o4 + DsjgO2IABiBziBziBziAxA5xDJiAxAYgcYgMQw4xA8+52WiuEb2yOkhke3Y6aCR0b0THHRhox7KG61eq + o1aelpu2Ka406OhH17yLnSmqG/uq51FZTSOROdO6N7MeF+LkRUTjTuEvZz1iqPvpiJ6EPfyF+mfsqmqO + lnmXLVUWu0QUdTUvqqhuLpZnqruc5cVRqrp2U4MSJzN2Llc1RGEJfLWpt0RTM4y9M0N7hVA6q4DorgOu + jFVw0rrXjA4VQLV9Y1laylemz0rFfC/1SsXnt7KIqKnHp4j3FH24vG3hVhyqdwrUpIWyK3aV8sUTW44a + ZZGxp3NrEUUbU4c09hcr2Yx547ZVVU8PboqgdHOAoucBTc4Ck5wFJzgKL3cIHkXK1xVNbS1zUalVTOTB + zkxxjVecmnUvCim63dmmmaeKWm5ZiqqKuOGB5rsN2rs1TJTUzlZUIxY5dTMGxta5VdqTBSUyuYoosxjO + pF5nL11XpwjW9nLuT47TMlXPN01Xsq1EamDGbWvDHSq4aMTjzOcm5GzEYQ7ctk4tztTOMvfVThdq4ttB + UXCuho6dMZZ3I1vEnGq8iJpUMJxtlvgt1BBRQJhFA1GovCq8Ll5VXSGVyAAAAAAAAAAAAAAAAAAAAC2u + Frtlyh6C4UkNZD/Zzxtkbp5HIp7ouVUzjTODxXbpqjCqIlhV43H5BuKudFSy26V3p6SRUTH7iTpGJ2kQ + 7re9L1OudrpcF3dVmrVGz0MIu/VxuDNp1nu8Uya2xVTHRL2NtnSY/god9vfVP8qfg4Lm5Kv41fFg153V + Z9tO06e0yzRN/rqXCoaqceEaucnbRDvtZ+zXqq+OhH3d33qNdPw0sVkjkje6ORqse1cHMcioqLxKinZE + 4uOYwdQwAAAAABNvV6zY9Vq8sVL8WtRaugx4NOEzE7qORPuiC3xl9VyOifkn9zZjXbnpj5ptIFPgAABp + PLG6OV8bu+Y5WrhqxRcC9xOKhTGDqGAABIm4bzgw+TT+ChG729HrhJ7o9fqlssVZawAAAAAAADCd9Pmz + vP8Alv2qI792evT190o/en/z1dXfDVstiogAABPfVw/gl48pj/Nle3156ehY9yeSrpS+QqbAAADXfrE/ + ztRf6bF+fnLLub0p/t8oVjfXqx/X5yi0lkQAAAGw1s3DZIqbbSVEklb0k0Mcj8JmImL2oq4e18pW697X + YqmNCzW90WZpidOpc/V+yJ/aV3vzPgzx7ve5nv2ez/y+J9X7In9pXe/M+DHu97mPZ7P/AC+J9X7In9pX + e/M+DHu97mPZ7P8Ay+J9X7In9pXe/M+DHu97mPZ7P/L4qMnV3yS5VVtZcWY6mpLCqJ3YVX0T1G+bvJT2 + +LzO5bXLV2eCyqOrjYnJ/h7vVRrxyMjk09rozZG+q+OmGudyUcVUvAunVzvsLXOtt1p6zBMUZMx1O5eR + MFmT0Tot75onzUzHb4Oe5uSuPLVE9nijfMGVswZeqfF7xRSUr17x7kxjfh6iRuLHdpSUs36LkY0ziir2 + XrtzhVGDyja0gAABmO6/Pc2U8wMklcq2msVsVwi1ojcebKieqjxx5UxQ4s9lIvUf8o1O7IZubNf/ABnW + 2ojkZIxskbkfG9Ecx7VxRUXSioqFRmMFwicXIAABGnWB/kSPy6HwJCU3R63Uit8ej/tDXAs6rAAABNe5 + 7d1k3MOU3194t/jVWlVJEknTTx8xrWKiYRvY30y8BBbyzl23cwpnCMOZPbtyVq7a2qoxnHllnP0Lbs/k + b/qar4U4Pc7/AOXZHgkPa8v+PbPifQtuz+Rv+pqvhR7nf/LsjwPa8v8Aj2z4n0Lbs/kb/qar4Ue53/y7 + I8D2vL/j2z4n0Lbs/kb/AKmq+FHud/8ALsjwPa8v+PbPifQtuz+Rv+pqvhR7nf8Ay7I8D2vL/j2z4n0L + bs/kb/qar4Ue53/y7I8D2vL/AI9s+J9C27P5G/6mq+FHud/8uyPA9ry/49s+J9C27P5G/wCpqvhR7nf/ + AC7I8D2vL/j2z4n0Lbs/kb/qar4Ue53/AMuyPA9ry/49s+J9C27P5G/6mq+FHud/8uyPA9ry/wCPbPiq + 0m6Dd1SVUNVT2nYnp3tlhf4xUrg9io5q4LKqLgqcJ5q3jfmMJq0TzR4PVO7bFM4xTpjnnxZicTuAAAAB + qdvR84N88pX7CFwyHo09Cm5/16ulix1uMAATN1bf02++5U/hSEJvrVT1p3ceurq+adCvrCAYFvgyMmZc + uuqKSPau9tR0tLgnOkZrki5cUTFvL2SR3dmv1V4T5akdvLKftoxjzU8MGsRalSAAADKN3Oc5sqZlhrlV + VoJvabhEmnaicvfInqmLzk7nCcmdy0Xrcxx8TryWamzcieLjbXwTQzwxzwvSSGVqPjkauLXNcmKKi8So + VCYmJwlcomJjGGqO9Hzg3zylfsIW/IejT0Kdn/Xq6WLHW4wABM3Vt/Tb77lT+FIQm+tVPWndx66ur5p0 + K+sIAAAAAAAB1kkjjjdJI5GRsRXPe5URERExVVVdSIBEGdt9cm3JQZYwRqLsvub24qvuLHeE5O1wgRTX + XCvr6h1TXVElTO7vpZXK93dcqhlbgAOWuc1yOaqtc1cUVNCoqAZvlXe3mayyMirJFudAmCOhndjI1PWS + ri7tOxQMJzy5mW05htza62y9JGvNkjdokjfhjsvbwKB6gAABq/ny8reM23Ot2tqJZnRQLwdFFzGYdlG4 + geAGQDZHdbltlkylSq5mFZXolVUu4eemLGr9yzDt4hhlwAAAAAcOa17Va5Ec1yYOaulFReBQIti3CWla + qWSoucy07pHOjghY1jmsVea3besmKonDsge9QbnsiUmCvo5Kt7dTqiV691rFY1e4BklBlvL1vwWhttNT + ObqfHExrvwkTaA9EAAAAANFet555anyGk8FQIVAAAAAAAAAAAH0V3A+ZrKfkLfCcBn4AAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAChX0NLX0U9FVMSWmqWOimjXUrXJgqHqmqaZxjXDzVTFUTE6paz59yrVWq + 6JbahF6SNOjoKl39bG38m1fumYbK+qRyatVhyt+JjajVx83DuwVzN2JidmdfFz8O/FhDmua5UVFRUXBU + XQqKhIxKOmEybtrbboMu09ZC2OSqn21mnRE2052HR7WGOCYJoK3vK7VN2aZ1Qsu7bVMWoqjXLMEUj0i7 + IoHZFA5RQOyOA7I4DsjgOcQOQADEDnEBiAxAYgMQGIHGIAAAxA4VQOquA6q4DqqgdVUDhVA6qoFhdqR9 + VTt6F6R1UD0mpZF1JI3FNPrXIqtdyKpstV7M6dU6Ja7tE1Ro1xphg2Zs/wBOlJRtZArblT1SOq6KTH2t + 0GOjaTQqbeGCoSmWyE4zp+2adE9KKzW8I2Y0fdFWmOhkWU81U1/oOk0R1kWipgTgXgc3H0qnDm8rNqrD + +PE7spm4vU4/y43tOccrrUnOApOcBTc4Ck5wFJ7gKD3AUHuAovcBbudiB1DCTN22XVpqVbvUNwnqU2aZ + q+li9V999jshlm4AAAAAAAAAAAAAAAAAAAAAAAAAAedd8uWG8R9HdLfBWJhgiyxtc5PuXYbTe0ptt3q6 + PLMw1XLFFfmiJR1mTq+5crGvlsdRJbKjSrYXqs0Crxc5ekb2dpewSVjfFdPnjajtRl/c1urTROzPxhDO + a8kZjytVJDdqZWRvVUhqo124ZMPUv4+RcF5Ccy+aouxjTKBzGVuWZwqjweCdDnAAAD3MkXl1lzbarkjt + lkFQxJlxw9qeuxJ+I5TRmrW3bqp5nRlbv67tNXO2+KWuwAAAaW3Jjo7jVMemDmTSNcnKjlRS80T9sKHX + GFUrc9PIAAz3cd5xqD3Ko/MuI/enoT1d6R3V68dfc2dKotoAAAAAAABg++uRrd2t2aut60zW9nxmN32E + O/dkf99PX3Sj96T/AP56urvhq6WxUQAAAn/q5RtTLl1k9M6sRq8WDYmqnhFd31P309Cybkj/AK6ulLZD + JoAAANd+sT/O1F/psX5+csu5vSn+3yhWN9erH9fnKLSWRAAAAbm2L+CW/wAmh/NoUi7556ZXq15I6IXp + rbAAAAAAAFnd7PbLxQS0Fzp2VVJKmD4pExTkVF1tcnAqaUPdu5VRO1TOEvFy1TXTs1RjDV7eVkOfKF98 + XarpbbVIslBUO1q1F5zHcG2zHTyYLwlsyWbi9Rj/ACjWqOeyk2K8P4zqYkdjiAAADZfcdmV13yYyjmdt + VVpf4s5V1rFhtQr2m8370q29bGxdxjVVp8Vr3Vf27WE66dHgkMjUmAAI06wP8iR+XQ+BISm6PW6kVvj0 + f9oa4FnVYAAANj+r9/Iknl03gRlY3v63UtO5/R/2lJZFpUAAAAAAAAAAAAAAAAANTt6PnBvnlK/YQuGQ + 9GnoU3P+vV0sWOtxgACZurb+m333Kn8KQhN9aqetO7j11dXzToV9YQABrfvtyL+4r7+96KPZtd0crlRq + c2Kp1vZo1I7vm9viLPuvNfso2Z81Pcq29cp+uvajy1d6NSURQAAAT1uEzz43ROyvXSY1FIiyW5zl0uh1 + vj7LF0p63sFe3tlcJ/ZGqdax7ozeMfrnXGpF29Hzg3zylfsIS2Q9GnoRGf8AXq6WLHW4wABM3Vt/Tb77 + lT+FIQm+tVPWndx66ur5p0K+sIAAAAAAABCG97eDLW1kuXrZLs0FOuzXSsX8rKi6WYp6Ri6+NewBF4ZA + K1JRVlZL0NJBJUSrqjiY57u41FUC7q8tZio4lmq7VWU8Sa5JaeVjU7bmogHnAAPbyjmu45Zu8ddSOVY1 + VG1VOq82WPHS1eX1K8AYbM2m6Ud1ttPcaN+3TVLEkjdw6daLyouheUC7AsL/AFy2+xXGuRcHUtNNM1dW + ljFcnooBqeGQC+sVB+8b3QUGnCqqIoXYcT3o1V7igbYtajURrUwamhETUiBgAAAAAAAAAAAAAAAAaK9b + zzy1PkNJ4KgQqAAAAAAAAAAAPoruB8zWU/IW+E4DPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD + Et5WSYc0ZfmhY1EuMLVfRyevbpRqrxLq7anVlMxNquJ4uNy5zLRdomOPiazSRSVT3wStWO6wqrHsdoWV + W6Fav/NTD777rvrHE7OmPL3fTu6NVZmNrRPnjt+vf065J3Uxzx5fme9fapKhyxt4Uwa1rvRQhd6zE3I6 + E5umJi3PSzdHEYlHdHAdkUDsigcooHZFA5RwHZHAco4DnaA5xAYgc4gAADEBiBxiA2gOFcB1VwHCuA6q + oHCqBwqgdVUDqrgOiuA6K4CMd6eX1jmZe4GcyXCOsw4HomDHr2U0dzjJvdeYxj9c9SC3rlsJ/ZHWwqzX + irtFxirqZ2D415zOB7F75juRSTv2ablM0yi7F6q3VFUJttd4obrRMrKOTpIn6FTUrXcLXJwKhVb1qq3V + s1LZZvU3KdqlXc41tqm5wFNzgKTnAUXuAoPeBQe4Cg9wFMMPeydlx96ujWyIviUGD6l3GnAxOV32AymR + jGsajGIjWtREa1NCIiakQDkAAAAAAAAAAAAAHj3fOOVbPOtPc7pTUtQjUcsEkidJsu1LsJztJvt5a5XG + NNMzDRczNuicKqoiXhVO+bdvBii3dJHepjhndw4a0Zs+idFO7b8/x7Yc9W87Efy7JeVUdYHIkX5NlbUe + 5wsT85Iw2xui9PJHW01b4sx+U9TyajrH2Vv6NZ6mT3SSOP7CSG6Ny18dUNNW+6OKmVpR9YmarudHT/ua + Omppp4455XVCyK2Nzka9yYRxpiiLie6tzRFMztYzhyPFO+pmqI2cIx5U1kEngAAAAAAACzu9ot13t01u + uMDaikqG7MkbvQVF1oqa0VNR7t3KqKtqmcJh4uW6a6ZpqjGJanZ2ytPljMlXaJVV8cSo+mmVMOkhfpY7 + Rw4aF5cS4ZW/F23FSmZrLzauTS8I6HOAAAG5eX6xa6w22tcu0tVSwTK7XiskbXY+iUi9Ts1zHJMr1Zq2 + qInliF+a2wAAab5nh6DMl2h0p0VZUMwdoXmyuTSXaxONumeaFGvxhcqjnl5ptagABm25ebot5Noxdstf + 07F5dqnkwT8LA4d5xjYq6u+HfuucL9PX3S2kKkt4AAAAAAABH2/aXY3eVTcMelngb2MHo7/hJLdUf98d + Eoze0/8ARPTDWYtKqAAABsR1dokbkytkVuDpLhIm1xtbDFh6KqVrfM/9sf1+crPuWP8Aqn+3yhKREpcA + AANd+sT/ADtRf6bF+fnLLub0p/t8oVjfXqx/X5yi0lkQAAAG5ti/glv8mh/NoUi7556ZXq15I6IXprbA + AAAAAAADAt9tjjueQ6ufZRai2uZVQu4cEVGyJjxbDlXtEjuu7s3ojiq0I7etrbszPHTpaxFqVIAAAJY6 + utxdFme40CrhHV0nS4cb4JGo38WRxD75oxtxVyT3pncteFyaeWO5sEVxZQABGnWB/kSPy6HwJCU3R63U + it8ej/tDXAs6rAAABsf1fv5Ek8um8CMrG9/W6lp3P6P+0pLItKgAAAAAAAAAAAAAAAABqdvR84N88pX7 + CFwyHo09Cm5/16ulix1uMAATN1bf02++5U/hSEJvrVT1p3ceurq+adCvrCAAPJzVlyizHYau0ViYMqGe + 1yYYrHImlkifcu+0bsvem1XFUcTTmLEXaJpnjaj3m01tnulVbK5nR1VJIscreDFNSpxo5NKLxFyt3Irp + iqNUqVdtzRVNM64WZ7eAABd2i61tpudNcqGTo6ulkSSJ/KnAvGipoVOI8XLcV0zTOqXu3cmiqKo1wvM2 + 3qK95jrrtExYmVr0l6NdKtVWptNx4cFPGXtfroinkbMzd/ZcmrleQbmgAATN1bf02++5U/hSEJvrVT1p + 3ceurq+adCvrCAAAAAAAxveHmN2X8qVdbE7Zq5ESnpF4elkxRFT7lqK7tAayKqqqqq4qulVUMgGVbvcj + T5quqxvc6G20uD6ydNeCrzY2eudh2tYYbEWmy2u0UbaO20zKWnb6ViaVXjc7W5eVdIF6BG28rddQ3Kjm + utmgbBdIUWSSCJERlQ1NKpspoSTiVNfDxgQSGQCYdw+YnuSty/M/FrU8bpEXg0o2Vqd1q4dkMJeAxreV + MsORbw9McVg2NGjQ97Wf8QGsoZAMm3aQtlz3Z2u1JMr9WOljHOT0UDDZkAAA6VE8cEEk8mPRxNc9+Glc + GpioGDfTVkb+1qPeV+2A+mrI39rUe8r9sB9NWRv7Wo95X7YD6asjf2tR7yv2wH01ZG/taj3lftgPpqyN + /a1HvK/bAy+zXejvFsguVErlpalFdEr02XYI5WrinZQC9AAAAGivW888tT5DSeCoEKgAAAAAAAAAAD6K + 7gfM1lPyFvhOAz8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQVvz3fOp6hc1WyPCGVUS5RsTvJ + NTZtHA7U7l7JObtzWMfrq6vBBbzymE/sp6/Fd5GbKmWKJ835aZHSyOwwV205dly8aq3DTwkdnpj9s4ao + SWRif1RjrlkCKcjrdkcB3RwHdHAco4Dsigc4gc4gc4gc7QHO0A2gOdoBtANoBtANoDjaA42gONoDjEDj + EDhVA4VQOqqB1VwHRVA6q4Dqq4AW1ZBBV08lNUMSSGVqskYupUU9U1TTOMa4eaqIqjCdUoQzVlursVes + L8X0siqtNPwObxL65OEs+VzMXacY18aq5rK1WqsJ1cT093+ZEtVRUU8sMk1PUIjlWFqvcxzMdKpxKi6T + n3hlv2RExMRMOrd2Z/XMxMTMSk6juNHXQdPSTMmjxwVzHI7BU1ouGOkga7dVM4TGCfouU1xjTOLu5x4e + 1JzuACi9wFF7wKLnAUHvApKoFegoamvrIqSmZtzzO2WJ9lV5E1qGE1WCyU1mtsdHDpcnOml4XvXW5f6O + QMvRAAAAAAAAAAAAAAA166xFAsObKGtRMGVVGjVXjfFI5F/Fc0sm5q8bcxySrO+qMLsTywiol0OAAAG3 + 2SL62+5Ttl02tuSeBqTr/wA6PmS/jtUpmatfruVU867ZW9+y3TVzPcOd0AAAAAAAAECdY+nibfLPUJh0 + slNJG9OHZjkxbj25FLDuWfsqjnVzfdMbdM8yICaQgAAAbd7vnufkawK7WlBTt7TY0RPQQpucj/uq/tK6 + 5Of+mj+sPfOZ0gADUjePTLTZ8v0aphtVs0vD/Wu6Th+6LlkqsbNPQpedpwvVdLHDpcoAAyHd5XtoM8WS + peuyxKuNj3cTZV6NVXkwcc2co2rVUczpyVezepnnbclNXUAAAAAAAAizrEVSR5PoqdF509cxcPWxxSY+ + i5CX3NTjdmf+KH31VhaiP+Xi14LIrIAAAbLbhqfot30L/wC3qZ5O45Gf8BV97Tje6oWvdEYWOmZSIRiT + AAADXfrE/wA7UX+mxfn5yy7m9Kf7fKFY316sf1+cotJZEAAABubYv4Jb/JofzaFIu+eemV6teSOiF6a2 + wAAAAAAAA8DeAsf+xr/0iYt/d9Th910Ttn8bA6Mn61P9oc2c9Gv+stRC5qUAAAEgbi5HM3iUbUwwkhqG + u7HRq7R+CR29Y/6J6YSW6Z/746JbNFVWwAARp1gf5Ej8uh8CQlN0et1IrfHo/wC0NcCzqsAAAGx/V+/k + STy6bwIysb39bqWnc/o/7Sksi0qAAAAAAAAAAAAAAAAAGp29Hzg3zylfsIXDIejT0Kbn/Xq6WLHW4wAB + M3Vt/Tb77lT+FIQm+tVPWndx66ur5p0K+sIAAARFv6yL47QNzPQx41VE1GXBrU0vp/SydmNV0+t+5Jnd + Oa2Z/XOqdXShN75Tap/ZGuNfR9EBFiVwAAAAAAAAmbq2/pt99yp/CkITfWqnrTu49dXV806FfWEAAAAA + ABDm/wBuarParW1ea1slVI3jVy7DF7Wy4CIwyAbE7nrXHRZHpZkbhLXPkqJVw098rGfiMQMM2AAANYd4 + VrZa853WkjbsxJN0sbU1I2ZqSoidjbwAx4Msj3c3N1uzraZ0XBsk6U8nFsz+1Lj2NvEMNnAMX3nsc7Id + 4RqYr0TV7SSNVfQA1oDIBlG7GRrM+WdztSyub23Ruan2Qw2XAAALO8/weu8nl8BQNTAyAAAAABsruu/k + G0e5v/OvDDKgAAABor1vPPLU+Q0ngqBCoAAAAAAAAAAA+iu4HzNZT8hb4TgM/AAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAFOppqeqp5aaojbLBM1WSxuTFrmuTBUVDNMzE4wxVTExhLBbzYUtL2Np2bNEi + I2FE1NREwRvaFUzM4yU0xEYQ89rzDLuigdkcB2RQOyOA7I4Dsigc7QHOIHOIDEDnEBiAxAYgMQGIDEDj + EDjEBiB12gOFUDqrgOquA6q4DqqgdVdgBTc4Cm5xgYznyjrayyI2kpkq3xytkdCuPeo1ybSI1Wq5UVU0 + egd2QrppuaZw0OLP26qrf2xjpRHVVla9FhmcrGNXTA1qRsRU/wCW1GtRe0WCmimNMK5VXVOiWRbubtU0 + 98bQIuNPWo7bavA6NivRyfg4HDvK1E29rjpSG7Ls03NniqSg5xALApOeBRe8Cg5wFF7wKKqAa1znI1qK + rlXBETSqqoYSzkbKiWik8bqmp+8ahvOT+zYulGdn1QZZSAAAAAAAAAAAAAAAAifrE2hajLdvujG4uoKl + Y3rxR1DdK/hxtQmNzXMLk08sdyG31bxtxVyT3tfSxq0AAAEydX3OLKeqqMsVb8GVTlqLeq/2qN9sj++a + 1HJ2F4yE3vlsYi5HFrTm5szhM2549MJ2K+sQAAAAAAABrTv0v8V0zu+mgftQ2uJtKqouKdLir5e2iu2V + 7Bad1Wdi1jP8tKqb2vRXewj+OhHZJIwAAANxsq0rqTLFnpHY7VPRU0TsdeLImtX7BScxVjcqnlme9eMv + Ts26Y5KY7nqGpuAAGsW/CiWm3iV0mGDauKCdqf8ApJGv40alr3XVjYjmxVLetGF+efBgRII4AAEVUVFR + cFTSiprxA25yDmiHMuVqK5tci1GwkVa1PSzsREenb75ORSm5uxNq5NPFxdC6ZPMRdtxVx8fSyE5nUAAA + AAAA1+6w2YY6u/0Vlhcjm22J0lRhwSz4Lsr9yxrV++LHuezhRNc/y+Stb5vbVcUR/H5omJhDAAABtduo + o1o93lkiVMFdAs3ankdKnhlQ3hVtX6p5+5cd307NimObv0ssON2gAABrv1if52ov9Ni/Pzll3N6U/wBv + lCsb69WP6/OUWksiAAAA3NsX8Et/k0P5tCkXfPPTK9WvJHRC9NbYAAAAAAAAR9vxv0NtyNPR7SJU3R7a + eFvDso5HyO7CNbh20JLdVqar0TxU6UZvW9FFmY46tDWYtKqAAABJfV/pHTZ6fMne01FLIq8HOcyNE/HI + ve9WFnDllK7npxvY8kNjysLSAAI06wP8iR+XQ+BISm6PW6kVvj0f9oa4FnVYAAANj+r9/Iknl03gRlY3 + v63UtO5/R/2lJZFpUAAAAAAAAAAAAAAAAANTt6PnBvnlK/YQuGQ9GnoU3P8Ar1dLFjrcYAAmbq2/pt99 + yp/CkITfWqnrTu49dXV806FfWEAAAOssUcsT4pWo+KRqtexyYtc1yYKiovApmJwYmMdEtU95eSpcqZll + pGNVbdUYzW+RdOMarpYq+qYuhe0vCW7I5r91vH+Ua1Oz2V/Tcw/jOpiZ2OMAAAAAABM3Vt/Tb77lT+FI + Qm+tVPWndx66ur5p0K+sIAAAAAADX7fbOsud1Yq4pBSwxonEi7T8PxwMBDIBllr3o5ytdvgt9HVsZS0z + diJiwxuVG9lW4hhdfTHn79dj94i9iA+mPP367H7xF7EB9Mefv12P3iL2IGMXy+XG93GS43GRJauVGte9 + rUYmDERqaGoiakDKwAq0s7qeqhqG99C9sjey1UUDbprkciOauLV0oqalQMPHzlSLV5TvFOiYufRzbCeu + axXN9FANWAyAeplWtbQ5mtVW5cGQVcL3/cpIm16AG1YYAAFnef4PXeTy+AoGpgZAAAAAA2V3XfyDaPc3 + /nXhhlQAAAA0V63nnlqfIaTwVAhUAAAAAAAAAAAfRXcD5msp+Qt8JwGfgAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAABSqqWGqgdDM1HMcmoDAbxaprbUqx2Kwu0xycacQFkjgO6PA7IoHZHAco4DsjlA7I + 8DlHAc4gc7QHO0A2gG0AxAYgNoDjaAbQHG0BwrgOqvA6q4DqrgOFUDqrkQDo54HRXAU3OA6K4Do5wGCb + zbTSvtzLmxrI6mKRGPdoR0jX6MPXK3DuYkpuy9MVbHEi952adnb40eW6vmoK6Cshw6SB6Pai6lw1ovZT + QS92iK6ZpnjQ9quaKoqjiTBbr/brhHH0UzG1D2NkdSq5OkbtNR2luvRjrK1dsVUTpjRyrNav01xGE6eR + dPeaW5Rc4Ci94FFVxA4DCSch5MSnay7XGP8AxDsHUsDk7xOB7k9VxcXZ1GWdAAAAAAAAAAAAAAAAAHj5 + xsLb9li5WlUTbqoXNhVdSSt50Sr2HtQ35a7+u5FXJLRmbP7Lc08sNP5I5IpHxyNVkjFVr2roVFRcFRS6 + ROKkzGDqGAABUpamopamKpppHRVED2yRSsXBzXtXFFReRTFVMTGE6maapicY1tmt2W9ChzXRNpKxzKe/ + QtwmgxREmRE/KRf8TeDsFVz2RmzOMaaO5bMhn4vRhOivvZ4R6RAAAAAAj/elvQo8r0MlBQSNmv8AO3CO + NNKQNcn5WTgx9S1devUSWQyM3Z2p8nejd4Z+LMbNPn7ms8kkkkjpJHK+R6q573Liqqq4qqqWmIwVSZxd + QwAAPWylZX3vM1stbW7SVVQxsicUaLtSL2mIqmnMXf125q5Ibsta/Zcpp5ZbiFKXgAAAIM6x9pc2ss93 + a3FskclJK7iVjukYnb23k/uW5oqp61e33b001dSGCcQQAAAZju03hVWT7ur3o6a01WDa6maunRqkZj6Z + vopo7HFnsnF6n/lGp3ZHOTYq/wCM62z1qu1tu1BFX26oZU0kyYxysXFOVF4UVOFFKpct1UTs1RhK227l + NdO1TOMLs8PYAAAAMR3ibw7blC1uc5WzXadqpQ0WOlV1dJJhpSNq93UnJ2ZPJ1Xqv+PHLizudps0/wDK + dUNWq6tqq6snrauRZaqpe6WaV2tz3riqltopimIiNUKhXXNUzM65UD08gACpS001VUw00Ldqad7Y428b + nrsondUxVVERjLNNMzOENzbZQxW+20lBF+SpIY4I+DmxtRieghR669qqZnjXq3Rs0xTHFC5PL2AAAGu/ + WJ/nai/02L8/OWXc3pT/AG+UKxvr1Y/r85RaSyIAAADc2xfwS3+TQ/m0KRd889Mr1a8kdEL01tgAAAAA + ADy8x5nsmXbe6vu1S2CFEXYZrkkcnpY2a3L/APS6DdZsV3KsKYxab9+i1TtVTg1ez9nivzfe1rqhOhpY + kWOipUXFI48cdPG52ty/0IWvKZWmzRhGvjVLOZuq9XjOrihjR1OQAAAJ26uVldHb7reZG4eMSMpYFXii + TbeqdlXt7hX983caqaOTSsW5LWFNVfLoTIQicAAEadYH+RI/LofAkJTdHrdSK3x6P+0NcCzqsAAAGx/V + +/kSTy6bwIysb39bqWnc/o/7Sksi0qAAAAAAAAAAAAAAAAAGp29Hzg3zylfsIXDIejT0Kbn/AF6ulix1 + uMAATN1bf02++5U/hSEJvrVT1p3ceurq+adCvrCAAAADE95mSos15alpWNT95U2M1vkXBPbETSxV9TIm + he0vAdmRzX6bmP8AGdbiz2V/dbw/lGpqnLFJFK+KVqsljcrXscmDmuauCoqLwoW+JxU+Yw0S6hgAAAAA + CZurb+m333Kn8KQhN9aqetO7j11dXzToV9YQAAAAAAGvG+aNzc+VTl1PigcnY6NG/wBAGDhkAAAAAAAA + Abc0f6HB7mzwUDCq5rXNVrkxaqYKi8KKBqhfrY+13qutz0VFpJ5IkVeFrXKjV7bcFDKwAAbSZLvjL5li + 33FHbUskSMqONJo+ZJj98mIYe2AA6yRskjdHI1HMeite1dKKipgqKB4f+w8l/IlH7yz7QD/YeS/kSj95 + Z9oB/sPJfyJR+8s+0BBe9S3UFuzpV0tDAympmMhVsMTUa1FdG1VwRONQMSDIBsruu/kG0e5v/OvDDKgA + AABor1vPPLU+Q0ngqBCoAAAAAAAAAAA+iu4HzNZT8hb4TgM/AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAABb19BT1tO6CZuLV1LwovGgEf3W11FuqFilTFi/k5OBUAtEcB3R4HdHgdkVAOUVQOdoDlHAd + toBtKBztgc7YDaAbQDbA42wG2BxtKBwrgOFcBxtKBwqgdVcgHRXgdFcB0VwHRXAdFcB0c4Cm5wGO55o3 + VmW6prE2pIdmZifcLi78TE68jc2bsc+hyZ63tWp5tKH8SxK4ua6eWK5yvjerJIZFbG9q4OTo+ai4pyIa + aIiaIx426uZiuZhJ+W75HdrXHMr0WpjRGVLeFHpw4cTtZAZqz+uvDi4lgy179lETx8b0HvOd0KSriB1D + CQMi5JVyx3W5x83Q6lpncPE96fYQMpDAAAAAAAAAAAAAAAAAAADW3fllBbNmhbrTswoLxjNiiaG1CflW + /fY7fbXiLRurM7dvZnXT3KtvXLbFzajVV38aNyTRQAAAd4ZpoJWTQyOimjVHRyMVWua5NKKippRTExEx + hLMTMTjCU8qb/wC+29jKa+06XSBuhKlqpHUInLo2H9xF5SJzG6KKtNE7Pcl8vviunRXG1Hake177t3tc + 1vSVslDI7+qqonoqdl0aSM/GIu5uu9TxY9CVt71sVceHS96HeBkaZu0y/wBAiYIvPqIo108j3NNE5O9H + 8avg6Izlmf50/F1n3h5Fh7+/0K4JjzJ45PAVwjJ3p/jV8Cc7Zj+dPxeFc9+G72iavRVktdIn9XTQvX8a + To2eidFvdd6riw6XNc3rYp1Tj0I6zV1gL7XxvprFTNtcLtHjL1SSoVPW6NhncVeJSTy+6KKdNc7XcjMx + viurRRGz3ornnnqJnzzyOlmkVXSSvVXOc5dauculVJaIiIwhDzMzOMuhlgAAAJl6vOVXSVlXmaoZ7XAi + 0tCqprkciLK9PuW4N7akJvjMYRFuOmU7ubL4zNyeLRCdSvrCAAAGLbzcruzJk6toIm7VZEiVNEnCs0WK + o1OV7VcztnXkb/6rsTOrVLjz+X/bammNeuGpyoqKqKmCprQuCmgAAAA9vK+c8xZYqlntFW6Jrlxlp3c6 + GT7ti6O3r5TRfy1F2MKodGXzVdqcaZS5YesXbZGNZfbbJBLqdPSKkkarx7D1a5qffOIa7uaqPJOPSmrO + +qZ89OHQy2k3z7ualqL+9ehcutksMzVTHl2Fb6Jx1bsvx/Hth207zsT/AC7JXj96m71jVct8p1ROLbcv + cRqqeIyF78Ze53hY/KHmV2/Dd3StVY66SrenpIIJMV7CyJG30TbRuu/PFh1tVe9bEcePUwXMvWIrp43w + ZeoEpNrQlZVKkkicrYk5iL2Vd2DvsbmiNNc480I6/vqZ0URhzyiS4XGvuNZJWV9Q+pqpl2pJpXK5yr2V + 9BCZooimMIjCELXXVVONU4ytz08gAABIO5DLTrvnSGskZjSWhPGpFVNHS6oW48e3zvvSN3pf2LWHHVo8 + Unuqxt3ceKnT4NmSrLWAAAADXfrE/wA7UX+mxfn5yy7m9Kf7fKFY316sf1+cotJZEAAABMFF1ia2loqe + lSxxvSCNkSO8YcmOw1G44dHyELVuaJmZ2uxN0b6mIiNnVzq31kq35Ci+MO+DMeyx+XY9e+T+Pb9D6yVb + 8hRfGHfBj2WPy7D3yfx7fofWSrfkKL4w74Meyx+XYe+T+Pb9D6yVb8hRfGHfBj2WPy7D3yfx7fo6SdZC + 5qidFZIGrw7Uz3fYa0RuWn8p+DE77q/GPioS9Y7MK4dFaaRvHtOld9hWnqNy0flLzO+6+KmHkXHf1n+r + YrYX0tDjoV1PDiv986Y3Ubpsxrxnpnwwaa973qtWEdEeOLBbnd7pdapau5VctZUu0LLM9Xuw4kx1JyIS + FFumiMKYwhHXLlVc41TjK0PbwAAAFSmp56moipqdiyTzvbHFG3W5712WtTsqpiqqIjGWaaZmcI1tvcm5 + diy7lmgtDMFdTRJ0701OmdzpHdt6rhyFMzN79lyauVdstZ/VbinkeyaG8AARp1gf5Ej8uh8CQlN0et1I + rfHo/wC0NcCzqsAAAEh5C3wVOUbG61R2xlY10z5+ldKsa4vRqYYIx3qSNze7ovV7W1hoSeU3lNmjZ2cd + LI/rJVvyFF8Yd8Gc3ssfl2Or3yfx7fofWSrfkKL4w74Meyx+XYe+T+Pb9D6yVb8hRfGHfBj2WPy7D3yf + x7fofWSrfkKL4w74Meyx+XYe+T+Pb9D6yVb8hRfGHfBj2WPy7D3yfx7fofWSrfkKL4w74Meyx+XYe+T+ + Pb9D6yVb8hRfGHfBj2WPy7D3yfx7fofWSrfkKL4w74Meyx+XYe+T+Pb9D6yVb8hRfGHfBj2WPy7D3yfx + 7fofWSrfkKL4w74Meyx+XYe+T+Pb9D6yVb8hRfGHfBj2WPy7D3yfx7fofWSrfkKL4w74Meyx+XYe+T+P + b9Et5OzA/MOWqG8vhSndWNc5YUdto3Ze5nfKiY97xENmbP67k0444JrLXv224rwwxeyaG8AAanb0fODf + PKV+whcMh6NPQpuf9erpYsdbjAAEzdW39NvvuVP4UhCb61U9ad3Hrq6vmnQr6wgAAAAAQFv5yL4jcG5n + oY8KWudsXBrU0Mn4JOxImv13ZLFunNbVP651xq6Fb3vlNmr9kap19P1RETKFAAAAAAmbq2/pt99yp/Ck + ITfWqnrTu49dXV806FfWEAAAAAABBO/eiWLNFJVInMqaRrceN8b3Iv4rmgRsGQDZvdvWtrMj2eRrtrYp + 0hXkWFViw/EDDJAAAAAAAAAEGb8svrSX2C8xN9puDEZMqcE0SImn7pmz3FAjMMgEjbns7xWa4vs9fJsW + 6veixSOXmxT96irxNemCKvY4MQwnkAAAAAAGuu+P+fq33OD800DCgyAbK7rv5BtHub/zrwwyoAAAAaK9 + bzzy1PkNJ4KgQqAAAAAAAAAAAPoruB8zWU/IW+E4DPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAALavt9NXU7oJ24tXUvCi8aAYDd7PVWyfZem1C78nKmpezygWCOA7o4wOyOMjsjwOyPQDtigHOIDF + QOdpQG0A2gG0A2gG0oHG0oDEDjFAOFcgHVXgdVeB1VwHRXGB1VxkdFcB1VwFNXAdHP4gKTngUpFRzVa5 + MUVMFRdWCmYYwR9d8hMpJWVdBI6WCN7XS079LkYi4uVrk14cWBLWt4bUbNWvlRN3d8UztU6uRh8lNsuc + +skSJyrisTedLiuvFuODfvlRTv2/xcOxh5nemvVRQybVu/wyYptLjtPeiLjg9yphhyIiHiuzFcfdpe6L + 00eXQk20XWK6W+OsjarEfijmLpVrmrgqEDetTRVsynbN2K6dqF2amxIeS8hq1Y7ld49Oh1PSO4OJ0ifY + b3QykAAAAAAAAAAAAAAAAAAAAAHh5zypRZoy/UWmq5jpE26afDFYpm949PsLxpih0ZbMTariqHPmsvF6 + iaZanXmz3CzXSotlwiWGrpXqyRi6uRzV4WuTSi8RcLVymumKqdUqbdtVUVTTVrhZHtrAAAAAAAAAAAAA + AAPUyxly45ivVPaaBuM07uc9U5scad9I7kahqv3qbVE1S3WLFV2uKaW29gslDY7PSWmhbs01JGjGY63L + rc5eVzlVVKbeuzcqmqdcrpZtRbpimNUL81tgAAAANdd92QH2a7uv9DH/APq7k9Vna1NENQ7S5PuZO+Tl + xTiLNuvN7dOxPmp7lY3rk9irbjy1dkovJVEAAAAAAAAAAAAAAAHeGGWeaOGFiyTSuRkcbUxc5zlwRERO + FVMTMRGMsxEzOENqt2WS25UyzFSyon7xqVSe4PTT7YqaGIvExNHZxXhKjnsz+65j/GNS4ZDK/pt4fynW + y043aAAAADXfrE/ztRf6bF+fnLLub0p/t8oVjfXqx/X5yi0lkQAAAAAAAAAAAAAAAAAACYdw+QnVVZ/u + qvjwpaZVZbWOTv5dTpdPpWak9d9yQu9s3hH66dc605ujJ4z+yrVGpPJXliAAACNOsD/Ikfl0PgSEpuj1 + upFb49H/AGhrgWdVgAAAAAAAAAAAAAAAAAAbV7ovNzZfcpPzzyo7x9erhxLhu30KeHGy84ncAANTt6Pn + BvnlK/YQuGQ9GnoU3P8Ar1dLFjrcYAAmbq2/pt99yp/CkITfWqnrTu49dXV806FfWEAAAAACzvNoobxa + qq2VzOkpauNY5W8OC6lTiVq6UXjPdq5NFUVRrhru24rpmmdUtRs05crsuX2qtFYntlO7BkmGDZI10skb + yOb9ouVi9F2iKo41LzFibVc0zxPKNzSAAAACZurb+m333Kn8KQhN9aqetO7j11dXzToV9YQAAAAAAEcb + 8bI6sy1Bco27Ultl5/JFNg1y/howCBwyAStuTzlBSSy5drpEZHUv6Wge5cE6VUwdHj67BFby9kMJpAAe + ZmS+0listVdKlyIyBiqxi63yLoYxOVyga2wZ1zbBM+aG71UbpHOe5qSv2MXLivMVdnXyAe9Q75c9U2HS + VMVWicE8LPsx9GvogZjk7fFeL1eqO0zWmJ8lU/ZdLBI5iMaibT37Lkkx2Woq4bQErAAPEznlqHMeXqm2 + PwbK5OkpZF9JMzSxewveryKoGsFVS1FJUy0tTGsVRA9Y5Y3aFa5q4Ki9sMqQACT8g74ZrZFFa7+j6ihY + iMhrG86WJqamvT07U7qcoYTHar3aLtTpUW2riq4l1rG5FVMeBzdbV5FQC9AAeTe815dskauudfFTuRMU + iVdqVexG3F69wCK82b8KypbJS5dhWliXFq102CyqnrGaWs7K49oCLZ55qiZ888jpZpFV0kj1VznOXSqq + q6VUMugADZXdd/INo9zf+deGGVAAAADRXreeeWp8hpPBUCFQAAAAAAAAAAB9FdwPmayn5C3wnAZ+AAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAApVVLBVQuhnYj43a0UDBL7lyotzllixkpV1OTW3kU + DxkcB2RwHZHAdkcB2R/KByj1A52wOekA52wG2gDbQBtoBxtgNsDhXgdVeBwrwOquMDqrjI6q4DqrgOqu + A6K4DorwKbngU3P4gKbngUnPAovVqoqLpRdCooYRFmOy1Fsr5W9E5KRz1Wnkw5qtXSiY8aaiw5e/FymN + OnjQGYsTbqnRoeRibmhJG7lVq7YlFTNWWqbKqdE1q7S7eluHHqIbP0zFePKmchVE0YJ0yhkOK3bFdckS + WvTnRxa2RL/xO5eDg4zhdzMQAAAAAAAAAAAAAAAAAAAAAAGDbzt2dJm+hSenVtPe6ZqpTVC6GyN19FKq + Jjs+pX0vdO/I56bM4TpolH5/IxejGNFcNaLparhaq+aguMD6argdsyxPTBU5U40XWipoUtNu5TXG1TOM + Kpct1UVbNUYTC1PbwAAAAAAAAAAAABe2ay3O83GK3WyndU1cy4MjZxcLnLqa1OFVPFy7TRTtVThDZatV + V1bNMYy2d3cbu6DJ9sVuLai7VKItbV4aNGno48dKMb6OteBEqmdzk3quSmNULZkslTYp5ap1yzA4ncAA + AAABa3S2UN0t89vr4mz0lSxWTRO1Ki/YVF0ovAp7t1zRVFUa4eLluK6Zpq1S1i3jbtbnlGvV7UdU2aZ3 + +FrcNWOqOXDU9O4utOJLXks7Tejkq5FSzuRqszy08UsMO1wgAAAAAAAAAAAAcsY972sY1XPcqNa1qYqq + roRERBMkQ2A3Q7p32ZWX+/RIl0VP8HRu0+Lovp3/APMVNSel7Oqubx3ht/ZR5eOeVZd27u2Pvr83FHJ9 + UskOmQAAAAANd+sT/O1F/psX5+csu5vSn+3yhWN9erH9fnKLSWRAAAAAAAAAAAAAAAAAAZ/uy3WXDNVV + HXVrXU9gif7ZMuLXT7K6Y4vsOdwdkjs9n6bUYRpr7klkN31XpxnRR39DZakpKajpYqSlibDTQMSOGJiY + Na1qYIiIVeqqapxnWtVNMUxhGpVPL0AAAEadYH+RI/LofAkJTdHrdSK3x6P+0NcCzqsAAAAAAAAAAAAA + AAAAADavdF5ubL7lJ+eeVHePr1cOJcN2+hTw42XnE7gABqdvR84N88pX7CFwyHo09Cm5/wBerpYsdbjA + AEzdW39NvvuVP4UhCb61U9ad3Hrq6vmnQr6wgAAAAAAI133ZG/fti/fFFHtXS1NVyo1OdLTa3s5VZ3ze + 3xkpuvNfrr2Z8tXeit65T9lG1Hmp7mt5Z1WAAAABM3Vt/Tb77lT+FIQm+tVPWndx66ur5p0K+sIAAAAA + ACjXUVNXUc9HUsSSnqGOilYvC16YKBq7mrLdZl291FsqUVejXaglwwSSJ3ePTspr4l0Bl5ABFVFRUXBU + 0oqASJlrfVmG1wMprjE26wMTBkj3LHOiasFkwcju23HlDDIpt/8ARJFjDZ5HTYd6+ZrWovZRrl9ACOc3 + Z4vmaKhr697WU8SqsFJEipGzHh0qqudyqBj4ZAJr3JZPfS0smYqxitlqm9FQtcmlIcUV0n36pgnJ2Qwl + QAAAjTevu4fd43Xu0RbVzib/AIqBuudjU0K1OGRqd1OXACC3NVqq1yKjkXBUXWihkAAVIKiop5Ulp5Xw + yt72SNytcnYVMFA9qnz9nSBuzHeqtUTQm3K6Tw9oMKVZnPNtY1W1F4q3sXWxJntavZa1UQDxnOVyq5yq + rlXFVXWqhkAAAL2z2W53mvjobbA6oqZNTW6kThc5V0NanGoGzeUbJLY8t0FqlkSWWljVskjUVGq5zleu + GPAiuwDD1wAAABor1vPPLU+Q0ngqBCoAAAAAAAAAAA+iu4HzNZT8hb4TgM/AAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAOHNa9qtciOauhUXUBiV9yevOqLcnK6n9iBib0fG9WSNVr2rg5qpgqAEc + ByjgO22ByjgOdsDnbMBtgc7QDaA42gG2BxtgcK4yOFeBwrwOquA4VwHVXgdFcB1V4HRXgU1eBTc8Cm6Q + Cm54FJzwKTngUpGMkarJGo9jtDmuTFFTlRTMTgxMYrCn3UMzFVolrg8XVq+3SJi2BEX1WvDsN/8Audlr + O106J0uO5kqKtMaE2ZI3f2TKdEkdI1JaxyYTVbmoiryMbp2G+ivCqnNduzXOMum1aiiMIZOa2wAAAAAA + AAAAAAAAAAAAAAAAAAMdzlkLL+bKNIblDs1MaYU9bFgk0fIjsNLfWro7Z05bN12Zxp1cjlzOUovRhVr5 + UA5w3PZsy6580UK3O2txVKumaqua1P7SLS5vopyljy28bdzRP21c6t5ndty1pj7qeWGCnejwAAAAAAAA + ARFVURExVdSAZ/k/cxmu/ujnq41tVtdpWoqGqkjm/wDLh0OXsuwTlI7M7zt29EfdVzeKSy27LlzTP208 + /gn3KOSMv5VovFrXBhI9E8Yq5OdNKqeqdxetTBCu5jNV3pxqnqWPLZWizGFMdb3jndIAAAAAAABRraKk + rqWWkrIWVFLM3YlhkRHNc1eBUU9U1TTOMaJeaqYqjCdMISzzuCqI3yV2U3dLEuLnWyV2D2+5SO0OTkeu + PKpO5Xe8ToufFAZvc8xptfDwQ/XW+ut9U+krqeSlqY1wfDK1WPTtOwJqiuKoxicYQldE0zhMYSoHp5AA + AAAAAAAGRZVyDmjM8qJa6Ny02OElbLzIGceL177DibivIc2Yzdu1H3Tp5ON1ZfJ3Ls/bGjl4k+5B3R2L + K2xWTYXC84Y+NvbgyJcNKQs04fdLp7Gorub3jXd0Rop4a1jye7qLOmfuq5fBnZHpEAAAAAABrv1if52o + v9Ni/Pzll3N6U/2+UKxvr1Y/r85RaSyIAAAAAAAAAAAAAAAPasOTM0X96NtVtmqGKuHT7OxCnZlfssTu + mi7mbdvzTEN9nK3LnliZTBkvcDQ0b463M0za2ZuDm2+HFIEX/mPXBz+wiInZQhczveatFvRz8acyu54p + 03Jx5uJL0MMUMTIYWNjijajY42IjWtaiYIiImhEQhpmZnGU1EREYQ7GGQAAAARp1gf5Ej8uh8CQlN0et + 1IrfHo/7Q1wLOqwAAAAAAAAAAAAAAAAAANq90Xm5svuUn555Ud4+vVw4lw3b6FPDjZecTuAAGp29Hzg3 + zylfsIXDIejT0Kbn/Xq6WLHW4wABM3Vt/Tb77lT+FIQm+tVPWndx66ur5p0K+sIAAAAAAABrDvfyN/tn + MSz0kezaLkrpaXBObG/H2yHk2VXFvrV5FLXu7NftownzU8MVS3llP1XMY8tXDBgZII4AAAJm6tv6bffc + qfwpCE31qp607uPXV1fNOhX1hAAAAAAAAMazzke35qtqQyr0FbBi6kq0TFWqutrk4WO4UA14zBlq8Zfr + nUdzp1ik09HImmORqemY7U5P/pQy8wAAAAAJI3d7qKy6zRXO9xOp7U1UfHTvRWyVHCmjW2Pl4eDjDCdm + MZGxscbUYxiI1jGpgiImhEREA5AAAAGB573U2zMLn11AraG7rpfJh7VMv/Mamp3rk7eIEI3/ACvfbBU9 + BdKR8GKqkcuGMT8PUPTmr9kMvKAAAAAABVpKOrrJ209JC+oneuDIomq96ryNaiqBI2V9yN6rlbPfJP3b + TLp6BuD6hyeixnbxXkDCYbBlqy2Cj8VtdM2Bi4LI/XI9U4XvXS4D0wAAAAA0V63nnlqfIaTwVAhUAAAA + AAAAAAAfRXcD5msp+Qt8JwGfgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB5d4y9Q3N + uL29HOic2Zuvt8YGC3WxXG2PXpWbcPpZm96vZ4gPPR4HKPA52gOdoDnaAbQHO0A2gONoBtANoDjaA42w + OqvA4V4HVXAdVeB0V4HRXgdHPApukApueBTc8Ck6QCmrgDGPkejGNVz3Lg1qJiqqvAiIGGbZc3b1NRs1 + N4VaeHWlKn5R33S+l+z2AykWko6Wjp2U9LE2GBmhrGJggFYAAAAAAAAAAAAAAAAAAAAAAAAAAAADGsxb + uMmZgV0lwtsfjLtK1UOMMqrxuczDa++xOqznbtvyzocl7I2rnmjTyo9u/Vwo3K59ovEkSelhqo0k/vI1 + Z4BJW99T/Kn4I25uSP41fFilduCz5TqvQeKVjeDoptlcOVJWxnZRvezOvGHHXue9GrCet41Ruk3iwLg+ + ySrpw9rfFJrTH0j3G+N42J/l3ued3X4/j3LN+7fPjHK1bDWqqcUTnJ3UxQ9xnbP5Q8Tkb34y7R7tc/SK + qNsVYmHqo1b4WBic7Zj+UMxkb0/xle0257ePUYbNmexFw0ySwR4IvI56KeKt5WI/l3vdO7b8/wAe57dB + 1fc71CotTLR0bfTI+Vz3auBI2uT8Y56972o1Yy6KNzXp14Qyu0dXK1xq193u01RwrFTMbCnY2nrKqp2k + OS5vqqfLTh0uy3uSmPNVj0JBy9u+yfl9UfbLZFHUN1VMmMs2PJJJtOb97gRt7OXbnmnQkrOTtW/LTpZC + czqAAAAAAAAAAAAA8295bsN8g6C7UMNZGnerI1Fc37l6YOb2lNtq9XbnGmcGq7YouRhVGKPLz1ecr1Tn + PtlbUW5ztUbsKiJvYR2w/uvJK3vi5HmiKuxGXdzW58szT2sRrurrmmNVWiuFHUtT+0WSJy9pGyJ+MdtG + +bc64mHFXuW5GqYl4lRuP3jxLgy3Rz8sdRAnhvYb43pYnj7Jc87qvxxY9cLGTdLvFjarnWSZUT1LonL3 + GvU2RvCx+TXO7r8fxUvou3g/IdT3E+2Z/wDfZ/KGP/Bf/GVeLdFvGl2dmyyJtatuSFnd2nph2zzO8bEf + y73qN235/j3PSpNxG8KdU6Wmp6THWs07Fw966Q1Vb1sxxzPU207pvzriI62R2zq4V7nNW6XmKJqd8ylj + dIq8iPkWPDs7JzXN9U/xp+Lqt7kq/lV8Gd2DctkS0ObK6kdcahulJK13SNx9zRGx91qkfe3ner49mOZI + Wd12aNOG1POziOOOONscbUZGxEaxjURERE1IiIcEzikIjB2MMgAAAAAAAGEZ43T2bN92iuVbWVNPLDA2 + mayHY2Va1734rtNcuOMinfld4VWadmIidOKPze7qL1W1MzGjBj31c8r/ACnXf3PsDp95uckdrm9lt/lV + 2H1c8r/Kdd/c+wHvNzkjtPZbf5Vdh9XPK/ynXf3PsB7zc5I7T2W3+VXYfVzyv8p139z7Ae83OSO09lt/ + lV2H1c8r/Kdd/c+wHvNzkjtPZbf5Vdh9XPK/ynXf3PsB7zc5I7T2W3+VXYfVzyv8p139z7Ae83OSO09l + t/lV2H1c8r/Kdd/c+wHvNzkjtPZbf5VdjvH1dcnoi9LcLg5eDZfA37MTjE75u8lPb4sxuW1y1dng7/V2 + yT+u3L32D4Ax7zd5Ke3xZ9ltctXZ4KsfV7yMxuDp6+RfVOmjx/Fiahid8XuSnh1sxuazy1cOpWj3BZBY + io5KuTHhdNq/Ba08zve9zfB6jc9nn+K8g3IbuIlRXW582CYe2VE+vj5r2nid6X54+yHuN1WI4u2XuW3I + GSraqOo7LSMemlsjomyPTsPk2nJ3TRXm7tWuqXRRk7VOqmHvoiIiIiYImhETVgczpAAAAAAAAPBzpk+h + zZZ22utmlghbM2fbh2draYjkROcjkw5x0ZbMzZq2ohzZrLRep2ZnBgv1c8r/ACnXf3PsCQ95uckdqP8A + Zbf5Vdh9XPK/ynXf3PsB7zc5I7T2W3+VXYfVzyv8p139z7Ae83OSO09lt/lV2H1c8r/Kdd/c+wHvNzkj + tPZbf5Vdh9XPK/ynXf3PsB7zc5I7T2W3+VXYfVzyv8p139z7Ae83OSO09lt/lV2H1c8r/Kdd/c+wHvNz + kjtPZbf5Vdh9XPK/ynXf3PsB7zc5I7T2W3+VXYfVzyv8p139z7Ae83OSO09lt/lV2H1c8r/Kdd/c+wHv + NzkjtPZbf5Vdh9XPK/ynXf3PsB7zc5I7T2W3+VXYfVzyv8p139z7Ae83OSO09lt/lV2H1c8r/Kdd/c+w + HvNzkjtPZbf5Vdh9XPK/ynXf3PsB7zc5I7T2W3+VXYfVzyv8p139z7Ae83OSO09lt/lV2H1c8r/Kdd/c + +wHvNzkjtPZbf5Vdh9XPK/ynXf3PsB7zc5I7T2W3+VXYkXLNgpsv2Kks9NI+WCka5rJJMNtUc5X6dlET + 0xGX703K5qnjSdizFuiKY4npmpuAAEb5h3G5evl6rLtUV9XFNWSLI+OPotlFVMMExYq8BKWd6126IpiI + 0Iu9umi5XNUzOl5/1c8r/Kdd/c+wNnvNzkjtavZbf5Vdh9XPK/ynXf3PsB7zc5I7T2W3+VXYfVzyv8p1 + 39z7Ae83OSO09lt/lV2MpyJu1tWTZayWhqp6ha1rGyJPsYIkauVMNlrfVHJm87VfiMYiMHZlMjTYmcJm + cWXnE7QAAAAAAADxs3ZTtmabNJarjtJG5zZI5mYbcb26nNxRUxwVU7Cm/L5iq1VtUtGZy9N6jZqYB9XP + K/ynXf3PsCR95uckdqN9lt/lV2H1c8r/ACnXf3PsB7zc5I7T2W3+VXYfVzyv8p139z7Ae83OSO09lt/l + V2H1c8r/ACnXf3PsB7zc5I7T2W3+VXYynIm7W1ZNlrJaGqnqFrWsbIk+xgiRq5Uw2Wt9UcmbztV+IxiI + wdmUyNNiZwmZxZecTtAAAAAAAAAFtcbXbrnSupbhTR1VO7SsUrUcmPGmOpeUCPbzuKy9VOdJbKqa3uXV + G72+JOwjla/8YDF6ncLmVjl8Wr6OVqaukWWNV7SMenogWzNxmc3ORFlomIvpllkwTuRqoHqUG4K4uci3 + C6wxN9M2njdIvYRX9H9gDOsubrco2N7J46daysZgraiqVJFaqcLWYIxORcMeUDLgAAAAAAAKVVS0tXA+ + nqoWTwPTB8UjUe1U5WrigGEXrcxk64K6SmZLbpnaf8O7GPHljftfiqgGI124K6NVfELrBMnAk8b4vRZ0 + oHlS7kM6s71aSXThzJVTt85jQOI9yOdnqu0lLHyumX/ha4D06PcFenqnjt0poU4ehZJN4XQgZRadx2VK + VUfXSz3B6a2Od0Ua9qPB/wCOBnFqslotMHQW2jipI/TJE1Gq7D1S63dsC9AAAAAAAA0V63nnlqfIaTwV + AhUAAAAAAAAAAAfRXcD5msp+Qt8JwGfgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + 4exj2qx7Uc1dCtXSigYxd8kU0+MtA5IJNfRLpYq/0AYfX22uoJNirhdHxO1tXsLqAtUenGBztcoHO0Bz + tqA2wG2A21A42gG0BxtcoHVXoBwrwOqvA6q9AOqvA6K8Do6QCm54HRXgU3SAUnPUDrjiBkliyHerpsyy + N8TpF09LKi7Sp61mte3ggEjWLKlnszUWmi26nDB1TJznr2OBqdgD2AAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAANFet555anyGk8FQIVAAAAAAAAAAAH0V3A+ZrKfkLfCcBn4AAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAADpNBDPGsczGyRu1tciKnogY1c8iUE+L6J600i+kXnM+2gGKXHLd4oM + VmgV8af1sfPb6GlO2B5e3ygc7fKA2+UBt8oDb5QONvlA4V6cYDbQDqsgHCv5QOqvA6LIB0WQDqrwOivA + 6OkApueoHMMNRUSpFBG6WV3esYiucvYRAMqtG7a81atkrXNoYV1o7nyqn3KaE7agZzZsnWK07L4YOlqG + /wDuJue/HjbwN7SAe2AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAaK9bzzy1PkNJ4KgQqAAAAAA + AAAAAPoruB8zWU/IW+E4DPwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA8u4 + ZZstdis1M1si/wBZHzHehr7YGOV27p2l1DVY8Ucyf8TftAeBWZVzBSqu1SPlanpofbE/F0+gB5csc0Lt + iaN0bk1teitXuKBT20A420AdIBwsgHVZAOqvA6q8DqrwOqyAdFkAr01tulZ+i0k06cccbnInZVEA92g3 + dZjqsHTMZSMXhldi78Fu16IGTW3dhaIFR1dNJWPTW1PamdxFV34wGVUNst9BH0dHTxwN4dhqIq9lda9s + C5AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADRXreeeWp8hpPBUCFQAAAAAAAAAAB9FdwPmay + n5C3wnAZ+AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA6SwQzN2ZY2yN4 + nIip6IHmVOU8u1GPSUMaKvDHjH4CtA82fd1YZMVjdNDyNeip+MigWMu7GmXHoq97eLaYjvsK0C2fuwqM + eZcGqnLGqf8AEoFNd2NdwV0X4DvtgE3X1q66+NOwxy/0gVGbrJFX2y5IicTYsfsvAuot11sRU6atnenC + jUY37KOAv6fd1liLv4ZJ/dJHJ4GwB61Ll2xUmCwUEDHJoR2wiu/CXFQPQRERME0ImpAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADRXreeeWp8hpPBUCFQAAAAAAAAAAB9FdwPmayn5C3wnAZ+AA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAANFet555anyGk8FQIVAAAAAAAAAAAH0V3A+ZrKfkLfCcBn + 4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA0z60uQs83rexUV1my7c7lROo6ZiVVHRVE8Sua1dpu3 + GxzcU4dIERfRPvT+Zt8/7bWfBgPon3p/M2+f9trPgwH0T70/mbfP+21nwYD6J96fzNvn/baz4MB9E+9P + 5m3z/ttZ8GA+ifen8zb5/wBtrPgwH0T70/mbfP8AttZ8GA+ifen8zb5/22s+DAfRPvT+Zt8/7bWfBgPo + n3p/M2+f9trPgwN8dyNuuFu3T5YobhTS0dbT0bWT0tQx0Usbtp3Nex6I5q9lAM4AAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAf/2Qs= + + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + dd.MM.yyyy ddd + + + Sie erklären sich damit einverstanden, das drahtlose Netzwerk nicht für ungesetzliche Zwecke zu nutzen und übernehmen die volle Verantwortung für Ihre Handlungen. +You agree not to use the wireless network for any purpose that is unlawful and take full responsibility of your acts. +Kablosuz agi yasadisi amaclarla kullanmamayi ve eylemlerinizin tum sorumlulugunu ustlenmeyi kabul ediyorum. + + + + dd.MM.yyyy ddd + + + 0, 0 + + + 0, 0 + + \ No newline at end of file diff --git a/Aviso/WLAN/rptWLANTicket.vb b/Aviso/WLAN/rptWLANTicket.vb new file mode 100644 index 0000000..437500f --- /dev/null +++ b/Aviso/WLAN/rptWLANTicket.vb @@ -0,0 +1,8 @@ +Imports GrapeCity.ActiveReports +Imports GrapeCity.ActiveReports.Document +Imports VERAG_PROG_ALLGEMEIN + + +Public Class rptWLANTicket + +End Class diff --git a/Aviso/frmAddAktenvermerkShort.vb b/Aviso/frmAddAktenvermerkShort.vb index 403f621..8fc5062 100644 --- a/Aviso/frmAddAktenvermerkShort.vb +++ b/Aviso/frmAddAktenvermerkShort.vb @@ -141,6 +141,9 @@ btnZollDEEingereicht.Click, btnSBG.Click, btnNKD.Click, btnWAI.Click, btnSFD.Cli insertVermerk("DE Zoll (DIGITAL) fertig", 83) If myAviso.LKW_fertig Then VERAG_PROG_ALLGEMEIN.cMeineFunktionenAVISO.LKWFertig(myAviso.AvisoID) : frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) SQL.doSQL("UPDATE AVISO SET ZOLLDigitalEingereicht=0, LKW_fertig=1 where avisoid=" & AvisoID, "AVISO") + + AvisoStatusFunctions.printFinish(myAviso) + Else insertVermerk("DE Zoll DIGITAL eingereicht", 82) SQL.doSQL("UPDATE AVISO SET ZOLLDigitalEingereicht=1 where avisoid=" & AvisoID, "AVISO") @@ -232,6 +235,7 @@ btnZollDEEingereicht.Click, btnSBG.Click, btnNKD.Click, btnWAI.Click, btnSFD.Cli End Sub + Sub insertVermerk(Text As String, VermerkCodeId As Integer, Optional Beschreibung As String = "") 'Daten zuweisen und speichern Dim myVermerk As New cVermerk diff --git a/Aviso/frmAvisoWeiterleiten.Designer.vb b/Aviso/frmAvisoWeiterleiten.Designer.vb index 7140623..a334c26 100644 --- a/Aviso/frmAvisoWeiterleiten.Designer.vb +++ b/Aviso/frmAvisoWeiterleiten.Designer.vb @@ -73,6 +73,7 @@ Partial Class frmAvisoWeiterleiten Me.btnFrontoffice = New System.Windows.Forms.Button() Me.btnVERIMEX = New System.Windows.Forms.Button() Me.btnAMBAR = New System.Windows.Forms.Button() + Me.btnATILLA = New System.Windows.Forms.Button() Me.Panel5 = New System.Windows.Forms.Panel() Me.Label6 = New System.Windows.Forms.Label() Me.dgvAnmhaenge = New System.Windows.Forms.DataGridView() @@ -586,6 +587,7 @@ Partial Class frmAvisoWeiterleiten Me.MyFlowLayoutPanel1.Controls.Add(Me.btnFrontoffice) Me.MyFlowLayoutPanel1.Controls.Add(Me.btnVERIMEX) Me.MyFlowLayoutPanel1.Controls.Add(Me.btnAMBAR) + Me.MyFlowLayoutPanel1.Controls.Add(Me.btnATILLA) Me.MyFlowLayoutPanel1.Dock = System.Windows.Forms.DockStyle.Top Me.MyFlowLayoutPanel1.Location = New System.Drawing.Point(0, 0) Me.MyFlowLayoutPanel1.Name = "MyFlowLayoutPanel1" @@ -658,6 +660,17 @@ Partial Class frmAvisoWeiterleiten Me.btnAMBAR.Text = "AMBAR" Me.btnAMBAR.UseVisualStyleBackColor = True ' + 'btnATILLA + ' + Me.btnATILLA.FlatStyle = System.Windows.Forms.FlatStyle.Popup + Me.btnATILLA.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + Me.btnATILLA.Location = New System.Drawing.Point(3, 52) + Me.btnATILLA.Name = "btnATILLA" + Me.btnATILLA.Size = New System.Drawing.Size(120, 43) + Me.btnATILLA.TabIndex = 11 + Me.btnATILLA.Text = "ATILLA" + Me.btnATILLA.UseVisualStyleBackColor = True + ' 'Panel5 ' Me.Panel5.BackColor = System.Drawing.Color.SeaShell @@ -840,4 +853,5 @@ Partial Class frmAvisoWeiterleiten Friend WithEvents clmnAnhFileName As DataGridViewTextBoxColumn Friend WithEvents btnVERIMEX As Button Friend WithEvents btnAMBAR As Button + Friend WithEvents btnATILLA As Button End Class diff --git a/Aviso/frmAvisoWeiterleiten.vb b/Aviso/frmAvisoWeiterleiten.vb index 22d25cb..7699e72 100644 --- a/Aviso/frmAvisoWeiterleiten.vb +++ b/Aviso/frmAvisoWeiterleiten.vb @@ -31,6 +31,18 @@ Public Class frmAvisoWeiterleiten Exit Sub End If + Dim AVISO = VERAG_PROG_ALLGEMEIN.cAviso.getAvisoById(AvisoId) + + If AVISO.FIRMA = "ATILLA" Then + + For Each p As Control In MyFlowLayoutPanel1.Controls.OfType(Of Button).Where(Function(ctrl) ctrl.Name <> "btnATILLA" And ctrl.Name <> "btnVERIMEX").ToList + MyFlowLayoutPanel1.Controls.Remove(p) + Next + If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "ATILLA" Then btnVERIMEX.PerformClick() + Panel2.Enabled = False + Else + btnATILLA.Visible = False + End If 'tbcntr.Appearance = TabAppearance.FlatButtons 'tbcntr.ItemSize = New Size(0, 1) 'tbcntr.SizeMode = TabSizeMode.Fixed @@ -39,13 +51,7 @@ Public Class frmAvisoWeiterleiten loaded = True End Sub - Private Sub Panel2_Paint(sender As Object, e As PaintEventArgs) - End Sub - - Private Sub MyFlowLayoutPanel1_Paint(sender As Object, e As PaintEventArgs) - - End Sub 'Private Sub Button6_Click(sender As Object, e As EventArgs) ' Dim flp As FlowLayoutPanel = flpFi @@ -198,7 +204,7 @@ Public Class frmAvisoWeiterleiten ' initButtons(sender) 'End Sub - Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnVERAG.Click, btnIMEX.Click, btnUNIPED.Click, btnFrontoffice.Click, btnVERIMEX.Click, btnAMBAR.Click + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles btnVERAG.Click, btnIMEX.Click, btnUNIPED.Click, btnFrontoffice.Click, btnVERIMEX.Click, btnAMBAR.Click, btnATILLA.Click 'flpAbteilung.Controls.Clear() flpTeams.Controls.Clear() ' flpNiederlassung.Controls.Clear() @@ -240,9 +246,18 @@ Public Class frmAvisoWeiterleiten End If ElseIf sender Is btnFrontoffice Then addBtn(flpFirma, "F", "FRONTOFFICE", "FRONT-OFFICE", True) + ElseIf sender Is btnATILLA Then + addBtn(flpFirma, "F", "ATILLA", "ATILLA", True) ElseIf sender Is btnVERIMEX Then - addBtn(flpFirma, "F", "VERIMEX", "VERIMEX", True) - + 'addBtn(flpFirma, "F", "VERIMEX", "VERIMEX", True) + Dim whereTeams = "" + If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "ATILLA" Then whereTeams = " AND team_bezeichnung='TEAM EXPORT' " + Dim dt As DataTable = SQL.loadDgvBySql("SELECT team_id, team_bezeichnung FROM tblTeams WHERE team_firma='VERIMEX' " & whereTeams & " order by team_id", "ADMIN") + If dt IsNot Nothing Then + For Each t In dt.Rows + addBtn(flpTeams, "T", t("team_id"), t("team_bezeichnung"),, "VERIMEX") + Next + End If ElseIf sender Is btnAMBAR Then addBtn(flpFirma, "F", "AMBAR", "AMBAR", True) @@ -353,5 +368,4 @@ Public Class frmAvisoWeiterleiten dgvAnmhaenge.ClearSelection() End Sub - End Class \ No newline at end of file diff --git a/Aviso/frmDokumenteSchicken.vb b/Aviso/frmDokumenteSchicken.vb deleted file mode 100644 index 831cb2f..0000000 --- a/Aviso/frmDokumenteSchicken.vb +++ /dev/null @@ -1,33 +0,0 @@ -Public Class frmDokumenteSchicken - Dim AVISO As VERAG_PROG_ALLGEMEIN.cAviso - - Sub New(AVISO As VERAG_PROG_ALLGEMEIN.cAviso) - - ' Dieser Aufruf ist für den Designer erforderlich. - InitializeComponent() - Me.AVISO = AVISO - ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu. - - End Sub - Private Sub frmDokumenteSchicken_Shown(sender As Object, e As EventArgs) Handles Me.Shown - btnOK.Focus() - End Sub - - Private Sub btnOK_Click(sender As Object, e As EventArgs) Handles btnOK.Click - Try - If cbxInfoblattFurDigitalabfertigungDrucken.Checked And cbxInfoblattFurDigitalabfertigungDrucken.Visible Then - Dim path = SDL.FormularManagerNEU.Finish_AVISO(AVISO) - Dim oPS As New System.Drawing.Printing.PrinterSettings - If path <> "" Then VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaGS(path, oPS.PrinterName) - End If - Catch ex As Exception - - End Try - End Sub - - Private Sub frmDokumenteSchicken_Load(sender As Object, e As EventArgs) Handles Me.Load - If Not VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("PRINT_Freigabe_FinishDigital") Then - cbxInfoblattFurDigitalabfertigungDrucken.Visible = False - End If - End Sub -End Class \ No newline at end of file diff --git a/Aviso/frmEintragAviso.designer.vb b/Aviso/frmEintragAviso.designer.vb index 7373e6f..794d66c 100644 --- a/Aviso/frmEintragAviso.designer.vb +++ b/Aviso/frmEintragAviso.designer.vb @@ -72,7 +72,7 @@ Partial Class frmEintragAviso Me.optTelefonisch = New System.Windows.Forms.RadioButton() Me.Label12 = New System.Windows.Forms.Label() Me.cbxHandling = New System.Windows.Forms.CheckBox() - Me.cboGrenzstelle = New System.Windows.Forms.ComboBox() + Me.cboGrenzstelle = New VERAG_PROG_ALLGEMEIN.MyComboBox Me.lblAktenuebersicht = New System.Windows.Forms.Label() Me.grpAviso = New System.Windows.Forms.GroupBox() Me.PictureBox1 = New System.Windows.Forms.PictureBox() @@ -702,7 +702,7 @@ Partial Class frmEintragAviso Me.cboGrenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.cboGrenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cboGrenzstelle.FormattingEnabled = True - Me.cboGrenzstelle.Items.AddRange(New Object() {"", "SUB", "SBG", "WAI", "NKD", "SFD", "NEU", "AMB", "???"}) + Me.cboGrenzstelle.Items.AddRange(New Object() {"", "SUB", "SBG", "WAI", "NKD", "SFD", "NEU", "AMB", "WO_GE", "???"}) Me.cboGrenzstelle.Location = New System.Drawing.Point(243, 139) Me.cboGrenzstelle.Name = "cboGrenzstelle" Me.cboGrenzstelle.Size = New System.Drawing.Size(74, 28) @@ -1868,7 +1868,7 @@ Partial Class frmEintragAviso Friend WithEvents optVorgeschrieben As System.Windows.Forms.RadioButton Friend WithEvents cbxHandling As System.Windows.Forms.CheckBox Friend WithEvents dtpDatum As System.Windows.Forms.DateTimePicker - Friend WithEvents cboGrenzstelle As System.Windows.Forms.ComboBox + Friend WithEvents cboGrenzstelle As VERAG_PROG_ALLGEMEIN.MyComboBox Friend WithEvents lblAktenuebersicht As System.Windows.Forms.Label Friend WithEvents grpAviso As System.Windows.Forms.GroupBox Friend WithEvents grpAktVerzollung As System.Windows.Forms.GroupBox diff --git a/Aviso/frmEintragAviso.vb b/Aviso/frmEintragAviso.vb index 6e6c154..b4ed687 100644 --- a/Aviso/frmEintragAviso.vb +++ b/Aviso/frmEintragAviso.vb @@ -92,6 +92,13 @@ Public Class frmEintragAviso kdAvisierer.initKdBox(Me) kdAuftraggeber.initKdBox(Me) + cboGrenzstelle.Items.Clear() + cboGrenzstelle.fillWithSQL("SELECT [grz_Grenzstelle],[grz_BezeichnungCBO] FROM tblGrenzstelle where [grz_Firma]='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' OR grz_Cluster='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "' AND grz_Aktiv=1 order by grz_Reihenfolge, grz_Grenzstelle", False, "AVISO", True,, "ALLE") + cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("???", "???")) + cboGrenzstelle.changeItem("") + + + sbLkwNationalitaet.initSearchBox(Me.FindForm, " [Code] ,[Description] as Land FROM tbl_DY_ZollDE_C0008_LaenderFull", {"Code", "Description"}, " (StartDate is null OR StartDate< GETDATE()) AND (EndDate is null OR EndDate> GETDATE()) ", "Code", "Code", "Code", "FMZOLL", , 400, 200) If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then @@ -235,7 +242,7 @@ Public Class frmEintragAviso grpAktVerzollung.Visible = False cbxSendungsvorlagen.Visible = False Button3.Visible = False - cboGrenzstelle.Text = "SUB" + cboGrenzstelle.changeItem("SUB") cbxAuftraggeberfurAlleSendungen.Visible = False If ATILLA_NEUERAKTENDECKEL Then UsrCntlEintragAvisoAtilla.Visible = True @@ -269,7 +276,7 @@ Public Class frmEintragAviso kdFrächter.Text = "" If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_abteilung <> "QS" Then If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG <> "" Then - cboGrenzstelle.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG + cboGrenzstelle.changeItem(VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG) End If End If Else @@ -323,8 +330,8 @@ Public Class frmEintragAviso Else optUnbekannt.Checked = True End If - cboGrenzstelle.Text = myAviso.Grenzstelle - cboImEx.Text = If(myAviso.ImEx, "") + cboGrenzstelle.changeItem(myAviso.Grenzstelle) + cboImEx.Text = If(myAviso.ImEx, "") hStatus = myAviso.Status If myAviso.Ankunft = LeerDatum Then dtpAnkunft.Value = Now.Date @@ -602,7 +609,7 @@ Public Class frmEintragAviso End If - If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "ATILLA" Then + If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("FIELDS_AVISO_Mandatory_FreachterKdNr") Then If Not cbxFrächterUnbekannt.Checked Then If kdFrächter.KdNr_value <= 0 Then kdFrächter.Focus() @@ -610,22 +617,28 @@ Public Class frmEintragAviso Exit Sub End If End If + End If + + If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("FIELDS_AVISO_Mandatory_AvisiererKdNr") Then If kdAvisierer.KdNr_value <= 0 Then kdAvisierer.Focus() lblErr_KdNr.Visible = True Exit Sub End If + End If - Else - If cboGrenzstelle.Text.Trim = "" Then + + If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA <> "ATILLA" Then + If cboGrenzstelle._value.Trim = "" Then ' MsgBox("Bitte die Grenzstelle eingegeben.", vbInformation) lblErr_Grenzstelle.Visible = True cboGrenzstelle.Focus() Exit Sub End If - End If + + If cGlobal.Aktive_ID = 0 Then ' nur wenn Neuanlage! If datVoraussichtlichesEintreffen.Visible AndAlso CDate(datVoraussichtlichesEintreffen.Value.ToShortDateString) < CDate(dtpDatum.Value.ToShortDateString) Then 'ohne Uhrzeit lblErrVorraussuchtlEintreffen.Visible = True @@ -813,7 +826,7 @@ Public Class frmEintragAviso If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "ATILLA" Then myAviso.Grenzstelle = "SUB" Else - myAviso.Grenzstelle = cboGrenzstelle.Text + myAviso.Grenzstelle = cboGrenzstelle._value ' MsgBox(myAviso.Grenzstelle) End If @@ -921,7 +934,12 @@ Public Class frmEintragAviso 'If myAviso.FIRMA = "IMEX" Then - myAviso.Zollstelle = SDL.cProgramFunctions.isLeerNothing(txtBestimmungszollstelle._value) + If myAviso.Grenzstelle = "???" Then + myAviso.Zollstelle = SDL.cProgramFunctions.isLeerNothing(txtBestimmungszollstelle._value) + Else + myAviso.Zollstelle = Nothing + End If + myAviso.Warenort = If(pnl.Visible, cbxWarenort.Checked, False) 'End If @@ -1003,7 +1021,7 @@ Public Class frmEintragAviso End If If cbxAktenzettelDrucken.Checked Then SendungOptions.PrintSendungATILLA("PRINT", TMP_SND_Atilla, myAviso, cboPrinter.Text) Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Case "IMEX", "UNISPED", "AMBAR", "FRONTOFFICE", "VERIMEX" Dim anzahlSendungen = ADMIN.getValueTxtBySql("SELECT count(*) FROM tblSendungen WHERE tblSnd_AvisoID=" & tmpId, "AVISO") ' bei Neuanlage=0 @@ -1034,7 +1052,7 @@ Public Class frmEintragAviso If kdAvisierer.KdNr_value > 0 Then tblSnd_AuftraggeberKdNr = kdAvisierer.KdNr_value tblSnd_Auftraggeber = kdAvisierer.Text End If - + AvisoDAL.insertSendungEmpty(tmpId, cnt, filiale_tmp, abfnr_tmp, 0, abfArt, tblSnd_AuftraggeberKdNr, tblSnd_Auftraggeber, fremd) ' INSERT Next @@ -1042,7 +1060,7 @@ Public Class frmEintragAviso Else lblSendungsanzahl.Visible = True txtSendungen.Focus() - : Me.Cursor = Cursors.Default : Exit Sub + Me.Cursor = Cursors.Default : Exit Sub End If End If @@ -1088,15 +1106,15 @@ Public Class frmEintragAviso Else lblSendungsanzahl.Visible = True txtSendungen.Focus() - : Me.Cursor = Cursors.Default : Exit Sub + Me.Cursor = Cursors.Default : Exit Sub End If End If End If End Select - - + + ' If Not IsNumeric(txtSendungen.Text) Or txtSendungen.Text = "0" Then 'txtSendungen.Text = "1" @@ -1131,13 +1149,13 @@ Public Class frmEintragAviso Try System.Diagnostics.Process.Start(hMail) Catch ex As Exception - MsgBox("Beim Mail-Versenden ist ein Fehler aufgetreten: " & vbCrLf & vbCrLf & ex.Message) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,,"Beim Mail-Versenden ist ein Fehler aufgetreten") End Try End If End If - : Me.Cursor = Cursors.Default + Me.Cursor = Cursors.Default 'Jetzt wird Fenster geschlossen Me.Close() VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID = tmpId @@ -1148,7 +1166,7 @@ Public Class frmEintragAviso Catch ex As Exception Me.Cursor = Cursors.Default - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -1174,7 +1192,7 @@ Public Class frmEintragAviso End Sub Sub getFilialeAndAbfertNr(ByVal cnt, ByRef filialeNr, ByRef abfertigungsNr, ByRef fremd) If cnt <= txtSendungen.Text Then - Select Case cboGrenzstelle.Text + Select Case cboGrenzstelle._value Case "SUB" : filialeNr = 4803 Case "SBG" : filialeNr = 5003 Case "WAI" : filialeNr = 5103 @@ -1369,7 +1387,7 @@ Public Class frmEintragAviso Private Sub optOhneAviso_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles optOhneAviso.CheckedChanged dtpAvisoEingangDatum.Visible = optAvisoEingang.Checked dtpAvisoEingangZeit.Visible = optAvisoEingang.Checked - cboGrenzstelle.Text = VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG + cboGrenzstelle.changeItem(VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG) If optOhneAviso.Checked Then optUnbekannt.Checked = True If optOhneAviso.Checked Then cbxAktenzettelDrucken.Checked = True @@ -1623,12 +1641,12 @@ Public Class frmEintragAviso pnl.Visible = False ' cboImEx.Visible = (cboGrenzstelle.Text = "WAI" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "IMEX" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "UNISPED") - Label1.Visible = (cboGrenzstelle.Text = "WAI" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "IMEX" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "UNISPED") + Label1.Visible = (cboGrenzstelle._value = "WAI" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "IMEX" Or VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "UNISPED") Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA Case "VERAG", "FRONTOFFICE", "UNISPED", "IMEX", "AMBAR" - If cboGrenzstelle.Text = "???" Then + If cboGrenzstelle._value = "???" Then txtBestimmungszollstelle.initSearchBox(Me.FindForm, "[basncd_dstnr] ,[basncd_dstnr] +' - ' + [basncd_name] +' (' +[basncd_alpha]+')' as displayPARAM,[basncd_dstnr] as Nr,[basncd_name] as Dienststelle,[basncd_alpha] as Land FROM basncd", {" [basncd_dstnr]", "basncd_name"}, " [basncd_gbdat] >= getdate() ", " basncd_alpha,[basncd_name]", "basncd_dstnr", "displayPARAM", "ATLAS", , 400, 200, {"displayPARAM", "basncd_dstnr"}) 'txtBestimmungszollstelle.Visible = True 'lblZA.Visible = True @@ -1743,7 +1761,7 @@ Public Class frmEintragAviso End If End If Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub diff --git a/Aviso/frmDokumenteSchicken.Designer.vb b/Aviso/frmFreigabeSetzen.Designer.vb similarity index 53% rename from Aviso/frmDokumenteSchicken.Designer.vb rename to Aviso/frmFreigabeSetzen.Designer.vb index 5f51b67..e98aaca 100644 --- a/Aviso/frmDokumenteSchicken.Designer.vb +++ b/Aviso/frmFreigabeSetzen.Designer.vb @@ -1,5 +1,5 @@  _ -Partial Class frmDokumenteSchicken +Partial Class frmFreigabeSetzen Inherits System.Windows.Forms.Form 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. @@ -22,58 +22,104 @@ Partial Class frmDokumenteSchicken 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. _ Private Sub InitializeComponent() - Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDokumenteSchicken)) + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmFreigabeSetzen)) Me.pnl = New System.Windows.Forms.Panel() + Me.btn = New System.Windows.Forms.Button() + Me.Panel1 = New System.Windows.Forms.Panel() + Me.Button1 = New System.Windows.Forms.Button() + Me.Label6 = New System.Windows.Forms.Label() Me.cbxInfoblattFurDigitalabfertigungDrucken = New System.Windows.Forms.CheckBox() Me.Label2 = New System.Windows.Forms.Label() Me.rtbSonstigeInfo = New System.Windows.Forms.RichTextBox() Me.rtbDokumente = New System.Windows.Forms.RichTextBox() - Me.btnOK = New System.Windows.Forms.Button() - Me.Header = New System.Windows.Forms.Panel() - Me.Label1 = New System.Windows.Forms.Label() - Me.Button1 = New System.Windows.Forms.Button() - Me.lblTitle = New System.Windows.Forms.Label() - Me.btnClose = New System.Windows.Forms.Button() Me.lblText = New System.Windows.Forms.Label() Me.pnl.SuspendLayout() - Me.Header.SuspendLayout() + Me.Panel1.SuspendLayout() Me.SuspendLayout() ' 'pnl ' Me.pnl.BackColor = System.Drawing.Color.White Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnl.Controls.Add(Me.btn) + Me.pnl.Controls.Add(Me.Panel1) Me.pnl.Controls.Add(Me.cbxInfoblattFurDigitalabfertigungDrucken) Me.pnl.Controls.Add(Me.Label2) Me.pnl.Controls.Add(Me.rtbSonstigeInfo) Me.pnl.Controls.Add(Me.rtbDokumente) - Me.pnl.Controls.Add(Me.btnOK) - Me.pnl.Controls.Add(Me.Header) - Me.pnl.Controls.Add(Me.lblTitle) - Me.pnl.Controls.Add(Me.btnClose) Me.pnl.Controls.Add(Me.lblText) Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill Me.pnl.Location = New System.Drawing.Point(0, 0) Me.pnl.Name = "pnl" - Me.pnl.Size = New System.Drawing.Size(316, 452) + Me.pnl.Size = New System.Drawing.Size(494, 392) Me.pnl.TabIndex = 0 ' + 'btn + ' + Me.btn.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) + Me.btn.ForeColor = System.Drawing.Color.White + Me.btn.Location = New System.Drawing.Point(274, 314) + Me.btn.Name = "btn" + Me.btn.Size = New System.Drawing.Size(206, 62) + Me.btn.TabIndex = 99 + Me.btn.Text = "OK" + Me.btn.UseVisualStyleBackColor = False + ' + 'Panel1 + ' + Me.Panel1.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.Panel1.Controls.Add(Me.Button1) + Me.Panel1.Controls.Add(Me.Label6) + Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top + Me.Panel1.Location = New System.Drawing.Point(0, 0) + Me.Panel1.Name = "Panel1" + Me.Panel1.Size = New System.Drawing.Size(492, 41) + Me.Panel1.TabIndex = 98 + ' + 'Button1 + ' + Me.Button1.BackColor = System.Drawing.Color.Red + Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) + Me.Button1.ForeColor = System.Drawing.Color.White + Me.Button1.Location = New System.Drawing.Point(408, -1) + Me.Button1.Margin = New System.Windows.Forms.Padding(0) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(85, 33) + Me.Button1.TabIndex = 1 + Me.Button1.Text = "x" + Me.Button1.UseVisualStyleBackColor = False + ' + 'Label6 + ' + Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) + Me.Label6.ForeColor = System.Drawing.Color.White + Me.Label6.Location = New System.Drawing.Point(13, 6) + Me.Label6.Name = "Label6" + Me.Label6.Size = New System.Drawing.Size(467, 26) + Me.Label6.TabIndex = 51 + Me.Label6.Text = "Freigabe setzen" + Me.Label6.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + ' 'cbxInfoblattFurDigitalabfertigungDrucken ' Me.cbxInfoblattFurDigitalabfertigungDrucken.AutoSize = True Me.cbxInfoblattFurDigitalabfertigungDrucken.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!) - Me.cbxInfoblattFurDigitalabfertigungDrucken.Location = New System.Drawing.Point(11, 348) + Me.cbxInfoblattFurDigitalabfertigungDrucken.Location = New System.Drawing.Point(117, 285) Me.cbxInfoblattFurDigitalabfertigungDrucken.Name = "cbxInfoblattFurDigitalabfertigungDrucken" Me.cbxInfoblattFurDigitalabfertigungDrucken.Size = New System.Drawing.Size(300, 24) Me.cbxInfoblattFurDigitalabfertigungDrucken.TabIndex = 97 Me.cbxInfoblattFurDigitalabfertigungDrucken.Text = "Infoblatt für Digitalabfertigung drucken" Me.cbxInfoblattFurDigitalabfertigungDrucken.UseVisualStyleBackColor = True + Me.cbxInfoblattFurDigitalabfertigungDrucken.Visible = False ' 'Label2 ' Me.Label2.Cursor = System.Windows.Forms.Cursors.Hand Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label2.Location = New System.Drawing.Point(3, 183) + Me.Label2.Location = New System.Drawing.Point(3, 157) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(422, 25) Me.Label2.TabIndex = 96 @@ -82,137 +128,56 @@ Partial Class frmDokumenteSchicken ' 'rtbSonstigeInfo ' - Me.rtbSonstigeInfo.Location = New System.Drawing.Point(6, 211) + Me.rtbSonstigeInfo.Location = New System.Drawing.Point(6, 185) Me.rtbSonstigeInfo.Name = "rtbSonstigeInfo" - Me.rtbSonstigeInfo.Size = New System.Drawing.Size(301, 130) + Me.rtbSonstigeInfo.Size = New System.Drawing.Size(474, 94) Me.rtbSonstigeInfo.TabIndex = 95 Me.rtbSonstigeInfo.Text = "" ' 'rtbDokumente ' - Me.rtbDokumente.Location = New System.Drawing.Point(6, 59) + Me.rtbDokumente.Location = New System.Drawing.Point(6, 69) Me.rtbDokumente.Name = "rtbDokumente" - Me.rtbDokumente.Size = New System.Drawing.Size(301, 121) + Me.rtbDokumente.Size = New System.Drawing.Size(474, 85) Me.rtbDokumente.TabIndex = 94 Me.rtbDokumente.Text = "" ' - 'btnOK - ' - Me.btnOK.DialogResult = System.Windows.Forms.DialogResult.OK - Me.btnOK.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnOK.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!) - Me.btnOK.Location = New System.Drawing.Point(81, 389) - Me.btnOK.Name = "btnOK" - Me.btnOK.Size = New System.Drawing.Size(133, 50) - Me.btnOK.TabIndex = 93 - Me.btnOK.Text = "OK" - Me.btnOK.UseVisualStyleBackColor = True - ' - 'Header - ' - Me.Header.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) - Me.Header.Controls.Add(Me.Label1) - Me.Header.Controls.Add(Me.Button1) - Me.Header.Dock = System.Windows.Forms.DockStyle.Top - Me.Header.Location = New System.Drawing.Point(0, 0) - Me.Header.Name = "Header" - Me.Header.Size = New System.Drawing.Size(314, 24) - Me.Header.TabIndex = 92 - ' - 'Label1 - ' - Me.Label1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Label1.ForeColor = System.Drawing.Color.White - Me.Label1.Location = New System.Drawing.Point(3, 0) - Me.Label1.Name = "Label1" - Me.Label1.Size = New System.Drawing.Size(241, 24) - Me.Label1.TabIndex = 88 - Me.Label1.Text = "Info" - Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleLeft - ' - 'Button1 - ' - Me.Button1.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Button1.BackColor = System.Drawing.Color.Red - Me.Button1.FlatAppearance.BorderColor = System.Drawing.Color.White - Me.Button1.FlatAppearance.BorderSize = 0 - Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button1.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.Button1.ForeColor = System.Drawing.Color.White - Me.Button1.Location = New System.Drawing.Point(280, -1) - Me.Button1.Name = "Button1" - Me.Button1.RightToLeft = System.Windows.Forms.RightToLeft.Yes - Me.Button1.Size = New System.Drawing.Size(35, 25) - Me.Button1.TabIndex = 86 - Me.Button1.Text = "X" - Me.Button1.UseVisualStyleBackColor = False - ' - 'lblTitle - ' - Me.lblTitle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblTitle.ForeColor = System.Drawing.Color.White - Me.lblTitle.Location = New System.Drawing.Point(-4, 0) - Me.lblTitle.Name = "lblTitle" - Me.lblTitle.Size = New System.Drawing.Size(241, 24) - Me.lblTitle.TabIndex = 91 - Me.lblTitle.Text = "LKW Standzeit Benachrichtigung" - Me.lblTitle.TextAlign = System.Drawing.ContentAlignment.MiddleLeft - ' - 'btnClose - ' - Me.btnClose.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.btnClose.BackColor = System.Drawing.Color.Red - Me.btnClose.FlatAppearance.BorderColor = System.Drawing.Color.White - Me.btnClose.FlatAppearance.BorderSize = 0 - Me.btnClose.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnClose.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.btnClose.ForeColor = System.Drawing.Color.White - Me.btnClose.Location = New System.Drawing.Point(287, -1) - Me.btnClose.Name = "btnClose" - Me.btnClose.RightToLeft = System.Windows.Forms.RightToLeft.Yes - Me.btnClose.Size = New System.Drawing.Size(35, 25) - Me.btnClose.TabIndex = 90 - Me.btnClose.Text = "X" - Me.btnClose.UseVisualStyleBackColor = False - ' 'lblText ' Me.lblText.Cursor = System.Windows.Forms.Cursors.Hand Me.lblText.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, CType((System.Drawing.FontStyle.Bold Or System.Drawing.FontStyle.Underline), System.Drawing.FontStyle), System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.lblText.Location = New System.Drawing.Point(3, 28) + Me.lblText.Location = New System.Drawing.Point(3, 38) Me.lblText.Name = "lblText" Me.lblText.Size = New System.Drawing.Size(422, 35) Me.lblText.TabIndex = 89 Me.lblText.Text = "Folgende Dokumente sind an den Kunden zu senden:" Me.lblText.TextAlign = System.Drawing.ContentAlignment.MiddleLeft ' - 'frmDokumenteSchicken + 'frmFreigabeSetzen ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font - Me.ClientSize = New System.Drawing.Size(316, 452) + Me.ClientSize = New System.Drawing.Size(494, 392) Me.Controls.Add(Me.pnl) Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) - Me.Name = "frmDokumenteSchicken" + Me.Name = "frmFreigabeSetzen" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen Me.Text = "frmDokumenteSchicken" Me.pnl.ResumeLayout(False) Me.pnl.PerformLayout() - Me.Header.ResumeLayout(False) + Me.Panel1.ResumeLayout(False) Me.ResumeLayout(False) End Sub Friend WithEvents pnl As System.Windows.Forms.Panel Public WithEvents lblText As System.Windows.Forms.Label - Public WithEvents lblTitle As System.Windows.Forms.Label - Friend WithEvents btnClose As System.Windows.Forms.Button - Friend WithEvents Header As System.Windows.Forms.Panel - Public WithEvents Label1 As System.Windows.Forms.Label - Friend WithEvents Button1 As System.Windows.Forms.Button - Friend WithEvents btnOK As System.Windows.Forms.Button Public WithEvents rtbDokumente As System.Windows.Forms.RichTextBox Public WithEvents Label2 As Label Public WithEvents rtbSonstigeInfo As RichTextBox Friend WithEvents cbxInfoblattFurDigitalabfertigungDrucken As CheckBox + Friend WithEvents Panel1 As Panel + Friend WithEvents Label6 As Label + Friend WithEvents Button1 As Button + Friend WithEvents btn As Button End Class diff --git a/Aviso/frmDokumenteSchicken.resx b/Aviso/frmFreigabeSetzen.resx similarity index 100% rename from Aviso/frmDokumenteSchicken.resx rename to Aviso/frmFreigabeSetzen.resx diff --git a/Aviso/frmFreigabeSetzen.vb b/Aviso/frmFreigabeSetzen.vb new file mode 100644 index 0000000..19dcdf1 --- /dev/null +++ b/Aviso/frmFreigabeSetzen.vb @@ -0,0 +1,41 @@ +Public Class frmFreigabeSetzen + Dim AVISO As VERAG_PROG_ALLGEMEIN.cAviso + + Sub New(AVISO As VERAG_PROG_ALLGEMEIN.cAviso) + + ' Dieser Aufruf ist für den Designer erforderlich. + InitializeComponent() + Me.AVISO = AVISO + ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu. + + End Sub + Private Sub frmDokumenteSchicken_Shown(sender As Object, e As EventArgs) Handles Me.Shown + btn.Focus() + End Sub + + Private Sub btnOK_Click(sender As Object, e As EventArgs) Handles btn.Click + If False Then + Try + If cbxInfoblattFurDigitalabfertigungDrucken.Checked And cbxInfoblattFurDigitalabfertigungDrucken.Visible Then + Dim path = SDL.FormularManagerNEU.Finish_AVISO(AVISO) + Dim oPS As New System.Drawing.Printing.PrinterSettings + If path <> "" Then VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaGS(path, oPS.PrinterName) + End If + Catch ex As Exception + MsgBox(ex.Message & ex.StackTrace) + End Try + End If + Me.DialogResult = DialogResult.OK + Me.Close() + End Sub + + Private Sub frmDokumenteSchicken_Load(sender As Object, e As EventArgs) Handles Me.Load + If Not VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("PRINT_Freigabe_FinishDigital") Then + cbxInfoblattFurDigitalabfertigungDrucken.Visible = False + End If + End Sub + + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + Me.DialogResult = DialogResult.Cancel + End Sub +End Class \ No newline at end of file diff --git a/Aviso/frmHauptfenster.Designer.vb b/Aviso/frmHauptfenster.Designer.vb index 4bfd2b6..69968bd 100644 --- a/Aviso/frmHauptfenster.Designer.vb +++ b/Aviso/frmHauptfenster.Designer.vb @@ -239,6 +239,7 @@ Partial Class frmHauptfenster Me.Button12 = New System.Windows.Forms.Button() Me.btnNeu = New System.Windows.Forms.Button() Me.SplitContainer3 = New System.Windows.Forms.SplitContainer() + Me.UsrCntlBenachrichtigungen1 = New AVISO.usrCntlBenachrichtigungen() Me.pnl = New System.Windows.Forms.Panel() Me.Button10 = New System.Windows.Forms.Button() Me.gridMyAviso = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) @@ -322,7 +323,6 @@ Partial Class frmHauptfenster Me.EUTaricToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.Timer_REFRESH = New System.Windows.Forms.Timer(Me.components) Me.UsrCntlTestsystem1 = New VERAG_PROG_ALLGEMEIN.usrCntlTestsystem() - Me.UsrCntlBenachrichtigungen1 = New AVISO.usrCntlBenachrichtigungen() Me.conMenuAviso.SuspendLayout() Me.MenuStrip1.SuspendLayout() Me.Top.SuspendLayout() @@ -1381,7 +1381,7 @@ Partial Class frmHauptfenster Me.pnlDetailsRechts.Dock = System.Windows.Forms.DockStyle.Fill Me.pnlDetailsRechts.Location = New System.Drawing.Point(0, 0) Me.pnlDetailsRechts.Name = "pnlDetailsRechts" - Me.pnlDetailsRechts.Size = New System.Drawing.Size(480, 599) + Me.pnlDetailsRechts.Size = New System.Drawing.Size(481, 599) Me.pnlDetailsRechts.TabIndex = 0 ' 'Label6 @@ -1866,8 +1866,8 @@ Partial Class frmHauptfenster ' Me.SplitContainer2.Panel2.Controls.Add(Me.SplitContainer3) Me.SplitContainer2.Panel2MinSize = 650 - Me.SplitContainer2.Size = New System.Drawing.Size(885, 298) - Me.SplitContainer2.SplitterDistance = 234 + Me.SplitContainer2.Size = New System.Drawing.Size(884, 300) + Me.SplitContainer2.SplitterDistance = 210 Me.SplitContainer2.SplitterWidth = 1 Me.SplitContainer2.TabIndex = 0 ' @@ -1881,7 +1881,7 @@ Partial Class frmHauptfenster Me.pnlLinks.Dock = System.Windows.Forms.DockStyle.Fill Me.pnlLinks.Location = New System.Drawing.Point(0, 86) Me.pnlLinks.Name = "pnlLinks" - Me.pnlLinks.Size = New System.Drawing.Size(234, 212) + Me.pnlLinks.Size = New System.Drawing.Size(210, 214) Me.pnlLinks.TabIndex = 0 ' 'Panel2 @@ -1894,7 +1894,7 @@ Partial Class frmHauptfenster Me.Panel2.Dock = System.Windows.Forms.DockStyle.Top Me.Panel2.Location = New System.Drawing.Point(0, 0) Me.Panel2.Name = "Panel2" - Me.Panel2.Size = New System.Drawing.Size(234, 111) + Me.Panel2.Size = New System.Drawing.Size(210, 111) Me.Panel2.TabIndex = 10 ' 'Label7 @@ -1916,7 +1916,7 @@ Partial Class frmHauptfenster Me.lblErrVermerk.ForeColor = System.Drawing.Color.Red Me.lblErrVermerk.Location = New System.Drawing.Point(12, 158) Me.lblErrVermerk.Name = "lblErrVermerk" - Me.lblErrVermerk.Size = New System.Drawing.Size(208, 27) + Me.lblErrVermerk.Size = New System.Drawing.Size(184, 27) Me.lblErrVermerk.TabIndex = 1 Me.lblErrVermerk.Text = "Bei diesem Status kann kein Vermerk erfasst werden!" Me.lblErrVermerk.TextAlign = System.Drawing.ContentAlignment.BottomLeft @@ -1939,7 +1939,7 @@ Partial Class frmHauptfenster Me.Label20.BackColor = System.Drawing.Color.Red Me.Label20.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.Label20.ForeColor = System.Drawing.Color.White - Me.Label20.Location = New System.Drawing.Point(49, 180) + Me.Label20.Location = New System.Drawing.Point(49, 182) Me.Label20.Name = "Label20" Me.Label20.Size = New System.Drawing.Size(28, 19) Me.Label20.TabIndex = 9 @@ -1953,7 +1953,7 @@ Partial Class frmHauptfenster Me.picAVISOMessenger.BackgroundImage = Global.AVISO.My.Resources.Resources.aviso_messenger Me.picAVISOMessenger.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Zoom Me.picAVISOMessenger.Cursor = System.Windows.Forms.Cursors.Hand - Me.picAVISOMessenger.Location = New System.Drawing.Point(1, 132) + Me.picAVISOMessenger.Location = New System.Drawing.Point(1, 134) Me.picAVISOMessenger.Name = "picAVISOMessenger" Me.picAVISOMessenger.Size = New System.Drawing.Size(59, 55) Me.picAVISOMessenger.TabIndex = 7 @@ -1966,7 +1966,7 @@ Partial Class frmHauptfenster Me.lblVersion.AutoSize = True Me.lblVersion.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblVersion.ForeColor = System.Drawing.Color.Black - Me.lblVersion.Location = New System.Drawing.Point(3, 199) + Me.lblVersion.Location = New System.Drawing.Point(3, 201) Me.lblVersion.Name = "lblVersion" Me.lblVersion.Size = New System.Drawing.Size(47, 13) Me.lblVersion.TabIndex = 6 @@ -1991,7 +1991,7 @@ Partial Class frmHauptfenster Me.pnlLinksOben.Dock = System.Windows.Forms.DockStyle.Top Me.pnlLinksOben.Location = New System.Drawing.Point(0, 0) Me.pnlLinksOben.Name = "pnlLinksOben" - Me.pnlLinksOben.Size = New System.Drawing.Size(234, 86) + Me.pnlLinksOben.Size = New System.Drawing.Size(210, 86) Me.pnlLinksOben.TabIndex = 1 ' 'Label22 @@ -2052,10 +2052,19 @@ Partial Class frmHauptfenster 'SplitContainer3.Panel2 ' Me.SplitContainer3.Panel2.Controls.Add(Me.pnl) - Me.SplitContainer3.Size = New System.Drawing.Size(650, 298) - Me.SplitContainer3.SplitterDistance = 164 + Me.SplitContainer3.Size = New System.Drawing.Size(673, 300) + Me.SplitContainer3.SplitterDistance = 169 Me.SplitContainer3.TabIndex = 3 ' + 'UsrCntlBenachrichtigungen1 + ' + Me.UsrCntlBenachrichtigungen1.Dock = System.Windows.Forms.DockStyle.Fill + Me.UsrCntlBenachrichtigungen1.Location = New System.Drawing.Point(0, 0) + Me.UsrCntlBenachrichtigungen1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) + Me.UsrCntlBenachrichtigungen1.Name = "UsrCntlBenachrichtigungen1" + Me.UsrCntlBenachrichtigungen1.Size = New System.Drawing.Size(169, 300) + Me.UsrCntlBenachrichtigungen1.TabIndex = 0 + ' 'pnl ' Me.pnl.Controls.Add(Me.Button10) @@ -2064,7 +2073,7 @@ Partial Class frmHauptfenster Me.pnl.Dock = System.Windows.Forms.DockStyle.Fill Me.pnl.Location = New System.Drawing.Point(0, 0) Me.pnl.Name = "pnl" - Me.pnl.Size = New System.Drawing.Size(482, 298) + Me.pnl.Size = New System.Drawing.Size(500, 300) Me.pnl.TabIndex = 0 ' 'Button10 @@ -2097,7 +2106,8 @@ Partial Class frmHauptfenster Me.gridMyAviso.Name = "gridMyAviso" Me.gridMyAviso.ReadOnly = True Me.gridMyAviso.RowHeadersVisible = False - Me.gridMyAviso.Size = New System.Drawing.Size(482, 277) + Me.gridMyAviso.RowHeadersWidth = 62 + Me.gridMyAviso.Size = New System.Drawing.Size(500, 277) Me.gridMyAviso.TabIndex = 0 ' 'Panel6 @@ -2115,7 +2125,7 @@ Partial Class frmHauptfenster Me.Panel6.Dock = System.Windows.Forms.DockStyle.Top Me.Panel6.Location = New System.Drawing.Point(0, 0) Me.Panel6.Name = "Panel6" - Me.Panel6.Size = New System.Drawing.Size(482, 21) + Me.Panel6.Size = New System.Drawing.Size(500, 21) Me.Panel6.TabIndex = 1 ' 'lblMeineAviso @@ -2137,10 +2147,11 @@ Partial Class frmHauptfenster Me.cboMy_Grenzstelle.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.cboMy_Grenzstelle.BackColor = System.Drawing.Color.WhiteSmoke Me.cboMy_Grenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboMy_Grenzstelle.DropDownWidth = 120 Me.cboMy_Grenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.cboMy_Grenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) Me.cboMy_Grenzstelle.FormattingEnabled = True - Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(163, 1) + Me.cboMy_Grenzstelle.Location = New System.Drawing.Point(181, 1) Me.cboMy_Grenzstelle.Name = "cboMy_Grenzstelle" Me.cboMy_Grenzstelle.Size = New System.Drawing.Size(64, 21) Me.cboMy_Grenzstelle.TabIndex = 26 @@ -2150,7 +2161,7 @@ Partial Class frmHauptfenster Me.Label18.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label18.AutoSize = True Me.Label18.ForeColor = System.Drawing.Color.White - Me.Label18.Location = New System.Drawing.Point(95, 4) + Me.Label18.Location = New System.Drawing.Point(113, 4) Me.Label18.Name = "Label18" Me.Label18.Size = New System.Drawing.Size(62, 13) Me.Label18.TabIndex = 25 @@ -2161,7 +2172,7 @@ Partial Class frmHauptfenster Me.cbx_My_LKW.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.cbx_My_LKW.AutoSize = True Me.cbx_My_LKW.ForeColor = System.Drawing.Color.White - Me.cbx_My_LKW.Location = New System.Drawing.Point(39, 3) + Me.cbx_My_LKW.Location = New System.Drawing.Point(57, 3) Me.cbx_My_LKW.Name = "cbx_My_LKW" Me.cbx_My_LKW.Size = New System.Drawing.Size(50, 17) Me.cbx_My_LKW.TabIndex = 24 @@ -2175,7 +2186,7 @@ Partial Class frmHauptfenster Me.cboMy_QS.Checked = True Me.cboMy_QS.CheckState = System.Windows.Forms.CheckState.Indeterminate Me.cboMy_QS.ForeColor = System.Drawing.Color.White - Me.cboMy_QS.Location = New System.Drawing.Point(425, 3) + Me.cboMy_QS.Location = New System.Drawing.Point(443, 3) Me.cboMy_QS.Name = "cboMy_QS" Me.cboMy_QS.Size = New System.Drawing.Size(15, 14) Me.cboMy_QS.TabIndex = 23 @@ -2189,7 +2200,7 @@ Partial Class frmHauptfenster Me.cboMy_VB.Checked = True Me.cboMy_VB.CheckState = System.Windows.Forms.CheckState.Indeterminate Me.cboMy_VB.ForeColor = System.Drawing.Color.White - Me.cboMy_VB.Location = New System.Drawing.Point(446, 3) + Me.cboMy_VB.Location = New System.Drawing.Point(464, 3) Me.cboMy_VB.Name = "cboMy_VB" Me.cboMy_VB.Size = New System.Drawing.Size(15, 14) Me.cboMy_VB.TabIndex = 22 @@ -2207,7 +2218,7 @@ Partial Class frmHauptfenster Me.cboMyAvisoAnzeige.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.cboMyAvisoAnzeige.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) Me.cboMyAvisoAnzeige.FormattingEnabled = True - Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(282, 1) + Me.cboMyAvisoAnzeige.Location = New System.Drawing.Point(300, 1) Me.cboMyAvisoAnzeige.Name = "cboMyAvisoAnzeige" Me.cboMyAvisoAnzeige.Size = New System.Drawing.Size(127, 21) Me.cboMyAvisoAnzeige.TabIndex = 21 @@ -2217,7 +2228,7 @@ Partial Class frmHauptfenster Me.Label17.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Label17.AutoSize = True Me.Label17.ForeColor = System.Drawing.Color.White - Me.Label17.Location = New System.Drawing.Point(233, 3) + Me.Label17.Location = New System.Drawing.Point(251, 3) Me.Label17.Name = "Label17" Me.Label17.Size = New System.Drawing.Size(48, 13) Me.Label17.TabIndex = 20 @@ -2227,7 +2238,7 @@ Partial Class frmHauptfenster ' Me.lblAkte.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.lblAkte.ForeColor = System.Drawing.Color.White - Me.lblAkte.Location = New System.Drawing.Point(811, 6) + Me.lblAkte.Location = New System.Drawing.Point(829, 6) Me.lblAkte.Name = "lblAkte" Me.lblAkte.Size = New System.Drawing.Size(207, 19) Me.lblAkte.TabIndex = 1 @@ -2261,7 +2272,7 @@ Partial Class frmHauptfenster Me.tabVorgeschrieben.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.tabVorgeschrieben.Location = New System.Drawing.Point(4, 34) Me.tabVorgeschrieben.Name = "tabVorgeschrieben" - Me.tabVorgeschrieben.Padding = New System.Windows.Forms.Padding(3) + Me.tabVorgeschrieben.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3) Me.tabVorgeschrieben.Size = New System.Drawing.Size(753, 0) Me.tabVorgeschrieben.TabIndex = 3 Me.tabVorgeschrieben.Text = "3.Vorgeschrieben" @@ -2272,7 +2283,7 @@ Partial Class frmHauptfenster Me.tabFreigegeben.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.tabFreigegeben.Location = New System.Drawing.Point(4, 34) Me.tabFreigegeben.Name = "tabFreigegeben" - Me.tabFreigegeben.Padding = New System.Windows.Forms.Padding(3) + Me.tabFreigegeben.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3) Me.tabFreigegeben.Size = New System.Drawing.Size(753, 0) Me.tabFreigegeben.TabIndex = 5 Me.tabFreigegeben.Text = "5. Freigegeben" @@ -2283,7 +2294,7 @@ Partial Class frmHauptfenster Me.tabNichtEingetroffen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.tabNichtEingetroffen.Location = New System.Drawing.Point(4, 34) Me.tabNichtEingetroffen.Name = "tabNichtEingetroffen" - Me.tabNichtEingetroffen.Padding = New System.Windows.Forms.Padding(3) + Me.tabNichtEingetroffen.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3) Me.tabNichtEingetroffen.Size = New System.Drawing.Size(753, 0) Me.tabNichtEingetroffen.TabIndex = 6 Me.tabNichtEingetroffen.Text = "Nicht eingetroffen" @@ -2294,7 +2305,7 @@ Partial Class frmHauptfenster Me.tabAnkunft.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.tabAnkunft.Location = New System.Drawing.Point(4, 34) Me.tabAnkunft.Name = "tabAnkunft" - Me.tabAnkunft.Padding = New System.Windows.Forms.Padding(3) + Me.tabAnkunft.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3) Me.tabAnkunft.Size = New System.Drawing.Size(753, 0) Me.tabAnkunft.TabIndex = 4 Me.tabAnkunft.Text = "4. Ankunft" @@ -2305,7 +2316,7 @@ Partial Class frmHauptfenster Me.tabVorbereitet.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.tabVorbereitet.Location = New System.Drawing.Point(4, 34) Me.tabVorbereitet.Name = "tabVorbereitet" - Me.tabVorbereitet.Padding = New System.Windows.Forms.Padding(3) + Me.tabVorbereitet.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3) Me.tabVorbereitet.Size = New System.Drawing.Size(753, 0) Me.tabVorbereitet.TabIndex = 2 Me.tabVorbereitet.Text = "2.Vorbereitet QS" @@ -2315,7 +2326,7 @@ Partial Class frmHauptfenster Me.pnlAktOption.Dock = System.Windows.Forms.DockStyle.Top Me.pnlAktOption.Location = New System.Drawing.Point(0, 0) Me.pnlAktOption.Name = "pnlAktOption" - Me.pnlAktOption.Size = New System.Drawing.Size(885, 5) + Me.pnlAktOption.Size = New System.Drawing.Size(884, 5) Me.pnlAktOption.TabIndex = 1 ' 'Button8 @@ -2325,7 +2336,7 @@ Partial Class frmHauptfenster Me.Button8.ForeColor = System.Drawing.Color.Black Me.Button8.Image = CType(resources.GetObject("Button8.Image"), System.Drawing.Image) Me.Button8.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button8.Location = New System.Drawing.Point(527, 214) + Me.Button8.Location = New System.Drawing.Point(525, 214) Me.Button8.Name = "Button8" Me.Button8.Size = New System.Drawing.Size(89, 34) Me.Button8.TabIndex = 3 @@ -2342,7 +2353,7 @@ Partial Class frmHauptfenster Me.btnFertig.ForeColor = System.Drawing.Color.Black Me.btnFertig.Image = CType(resources.GetObject("btnFertig.Image"), System.Drawing.Image) Me.btnFertig.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnFertig.Location = New System.Drawing.Point(631, 214) + Me.btnFertig.Location = New System.Drawing.Point(629, 214) Me.btnFertig.Name = "btnFertig" Me.btnFertig.Size = New System.Drawing.Size(102, 34) Me.btnFertig.TabIndex = 0 @@ -2358,7 +2369,7 @@ Partial Class frmHauptfenster Me.tabAlle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.tabAlle.Location = New System.Drawing.Point(4, 34) Me.tabAlle.Name = "tabAlle" - Me.tabAlle.Padding = New System.Windows.Forms.Padding(3) + Me.tabAlle.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3) Me.tabAlle.Size = New System.Drawing.Size(753, 0) Me.tabAlle.TabIndex = 0 Me.tabAlle.Text = "Alle" @@ -2369,7 +2380,7 @@ Partial Class frmHauptfenster Me.tabErfasst.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.tabErfasst.Location = New System.Drawing.Point(4, 34) Me.tabErfasst.Name = "tabErfasst" - Me.tabErfasst.Padding = New System.Windows.Forms.Padding(3) + Me.tabErfasst.Padding = New System.Windows.Forms.Padding(3, 3, 3, 3) Me.tabErfasst.Size = New System.Drawing.Size(753, 0) Me.tabErfasst.TabIndex = 1 Me.tabErfasst.Text = "1. Erfasst" @@ -2413,7 +2424,7 @@ Partial Class frmHauptfenster Me.SplitContainer1.Panel2.Controls.Add(Me.pnlDetailsRechts) Me.SplitContainer1.Panel2MinSize = 300 Me.SplitContainer1.Size = New System.Drawing.Size(1372, 601) - Me.SplitContainer1.SplitterDistance = 889 + Me.SplitContainer1.SplitterDistance = 888 Me.SplitContainer1.SplitterWidth = 1 Me.SplitContainer1.TabIndex = 7 ' @@ -2426,7 +2437,7 @@ Partial Class frmHauptfenster Me.pnlDetailsLinks.Location = New System.Drawing.Point(0, 0) Me.pnlDetailsLinks.MinimumSize = New System.Drawing.Size(324, 564) Me.pnlDetailsLinks.Name = "pnlDetailsLinks" - Me.pnlDetailsLinks.Size = New System.Drawing.Size(887, 599) + Me.pnlDetailsLinks.Size = New System.Drawing.Size(886, 599) Me.pnlDetailsLinks.TabIndex = 0 ' 'splitMain @@ -2449,8 +2460,8 @@ Partial Class frmHauptfenster ' Me.splitMain.Panel2.Controls.Add(Me.SplitContainer2) Me.splitMain.Panel2.Controls.Add(Me.pnlAktOption) - Me.splitMain.Size = New System.Drawing.Size(885, 597) - Me.splitMain.SplitterDistance = 290 + Me.splitMain.Size = New System.Drawing.Size(884, 597) + Me.splitMain.SplitterDistance = 288 Me.splitMain.TabIndex = 0 ' 'gridAviso @@ -2472,6 +2483,7 @@ Partial Class frmHauptfenster DataGridViewCellStyle3.SelectionForeColor = System.Drawing.SystemColors.HighlightText DataGridViewCellStyle3.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.gridAviso.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle3 + Me.gridAviso.ColumnHeadersHeight = 25 Me.gridAviso.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing DataGridViewCellStyle4.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle4.BackColor = System.Drawing.SystemColors.Window @@ -2495,13 +2507,14 @@ Partial Class frmHauptfenster DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] Me.gridAviso.RowHeadersDefaultCellStyle = DataGridViewCellStyle5 Me.gridAviso.RowHeadersVisible = False + Me.gridAviso.RowHeadersWidth = 62 Me.gridAviso.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing DataGridViewCellStyle6.WrapMode = System.Windows.Forms.DataGridViewTriState.[False] Me.gridAviso.RowsDefaultCellStyle = DataGridViewCellStyle6 Me.gridAviso.RowTemplate.ReadOnly = True Me.gridAviso.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] Me.gridAviso.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect - Me.gridAviso.Size = New System.Drawing.Size(885, 82) + Me.gridAviso.Size = New System.Drawing.Size(884, 80) Me.gridAviso.TabIndex = 1 Me.gridAviso.TabStop = False ' @@ -2533,7 +2546,7 @@ Partial Class frmHauptfenster Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top Me.Panel1.Location = New System.Drawing.Point(0, 0) Me.Panel1.Name = "Panel1" - Me.Panel1.Size = New System.Drawing.Size(885, 208) + Me.Panel1.Size = New System.Drawing.Size(884, 208) Me.Panel1.TabIndex = 2 ' 'cboImEx @@ -2582,6 +2595,7 @@ Partial Class frmHauptfenster Me.cboTeams._value = "" Me.cboTeams.BackColor = System.Drawing.Color.WhiteSmoke Me.cboTeams.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboTeams.DropDownWidth = 200 Me.cboTeams.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.cboTeams.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cboTeams.FormattingEnabled = True @@ -2628,7 +2642,7 @@ Partial Class frmHauptfenster Me.lblEintraege.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.lblEintraege.BackColor = System.Drawing.Color.Transparent Me.lblEintraege.ForeColor = System.Drawing.Color.White - Me.lblEintraege.Location = New System.Drawing.Point(586, 56) + Me.lblEintraege.Location = New System.Drawing.Point(585, 56) Me.lblEintraege.Name = "lblEintraege" Me.lblEintraege.Size = New System.Drawing.Size(169, 15) Me.lblEintraege.TabIndex = 14 @@ -2642,13 +2656,14 @@ Partial Class frmHauptfenster Me.cboGrenzstelle._value = "" Me.cboGrenzstelle.BackColor = System.Drawing.Color.WhiteSmoke Me.cboGrenzstelle.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboGrenzstelle.DropDownWidth = 200 Me.cboGrenzstelle.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.cboGrenzstelle.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cboGrenzstelle.FormattingEnabled = True Me.cboGrenzstelle.Items.AddRange(New Object() {"ALLE", "SUB", "SBG", "WAI", "NKD", "NEU", "AMB", "???"}) Me.cboGrenzstelle.Location = New System.Drawing.Point(379, 30) Me.cboGrenzstelle.Name = "cboGrenzstelle" - Me.cboGrenzstelle.Size = New System.Drawing.Size(67, 24) + Me.cboGrenzstelle.Size = New System.Drawing.Size(107, 24) Me.cboGrenzstelle.TabIndex = 13 ' 'Label4 @@ -2675,7 +2690,7 @@ Partial Class frmHauptfenster Me.pnlTime.Controls.Add(Me.Label5) Me.pnlTime.Location = New System.Drawing.Point(446, 0) Me.pnlTime.Name = "pnlTime" - Me.pnlTime.Size = New System.Drawing.Size(439, 57) + Me.pnlTime.Size = New System.Drawing.Size(437, 57) Me.pnlTime.TabIndex = 12 ' 'MyComboBox1 @@ -3075,6 +3090,7 @@ Partial Class frmHauptfenster ' 'cntxt ' + Me.cntxt.ImageScalingSize = New System.Drawing.Size(24, 24) Me.cntxt.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BundesanzeigerToolStripMenuItem, Me.EUTaricToolStripMenuItem}) Me.cntxt.Name = "cntxt" Me.cntxt.Size = New System.Drawing.Size(158, 48) @@ -3107,14 +3123,6 @@ Partial Class frmHauptfenster Me.UsrCntlTestsystem1.Size = New System.Drawing.Size(152, 28) Me.UsrCntlTestsystem1.TabIndex = 8 ' - 'UsrCntlBenachrichtigungen1 - ' - Me.UsrCntlBenachrichtigungen1.Dock = System.Windows.Forms.DockStyle.Fill - Me.UsrCntlBenachrichtigungen1.Location = New System.Drawing.Point(0, 0) - Me.UsrCntlBenachrichtigungen1.Name = "UsrCntlBenachrichtigungen1" - Me.UsrCntlBenachrichtigungen1.Size = New System.Drawing.Size(164, 298) - Me.UsrCntlBenachrichtigungen1.TabIndex = 0 - ' 'frmHauptfenster ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) diff --git a/Aviso/frmHauptfenster.vb b/Aviso/frmHauptfenster.vb index 2491a5f..2c0482d 100644 --- a/Aviso/frmHauptfenster.vb +++ b/Aviso/frmHauptfenster.vb @@ -156,6 +156,8 @@ Public Class frmHauptfenster Me.AutoScaleMode = AutoScaleMode.Dpi hideErr.Interval = 3000 + VERAGSQL = New VERAG_PROG_ALLGEMEIN.SQL + EnableDoubleBuffered(gridAviso) EnableDoubleBuffered(gridMyAviso) 'Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA @@ -190,15 +192,19 @@ Public Class frmHauptfenster Dim OptionenDAL As New cOptionenDAL cboGrenzstelle.Items.Clear() - cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE", "")) - cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUB", "SUB")) - cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SBG", "SBG")) - cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("WAI", "WAI")) - cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NKD", "NKD")) - cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SFD", "SFD")) - cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NEU", "NEU")) - cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("AMB", "AMB")) + cboGrenzstelle.fillWithSQL("SELECT [grz_Grenzstelle],[grz_BezeichnungCBO] FROM tblGrenzstelle where [grz_Firma]='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' OR grz_Cluster='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "' AND grz_Aktiv=1 order by grz_Reihenfolge, grz_Grenzstelle", False, "AVISO", True,, "ALLE") cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("???", "???")) + 'cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE", "")) + 'cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUB", "SUB")) + 'cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SBG", "SBG")) + 'cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("WAI", "WAI")) + 'cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NKD", "NKD")) + 'cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SFD", "SFD")) + 'cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NEU", "NEU")) + 'cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("AMBAR", "AMB")) + 'cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("WO: GE TRANSPORT", "WO_GE")) + ''cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("WO: KITA", "WO_KITA")) + 'cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("???", "???")) cboGrenzstelle.changeItem("") cboImEx.Items.Clear() @@ -210,15 +216,19 @@ Public Class frmHauptfenster cboMy_Grenzstelle.Items.Clear() - cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE", "")) - cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUB", "SUB")) - cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SBG", "SBG")) - cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("WAI", "WAI")) - cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NKD", "NKD")) - cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SFD", "SFD")) - cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NEU", "NEU")) - cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("AMB", "AMB")) + cboMy_Grenzstelle.fillWithSQL("SELECT [grz_Grenzstelle],[grz_BezeichnungCBO] FROM tblGrenzstelle where [grz_Firma]='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' OR grz_Cluster='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "' AND grz_Aktiv=1 order by grz_Reihenfolge, grz_Grenzstelle", False, "AVISO", True,, "ALLE") cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("???", "???")) + 'cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("ALLE", "")) + 'cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SUB", "SUB")) + 'cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SBG", "SBG")) + 'cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("WAI", "WAI")) + 'cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NKD", "NKD")) + 'cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("SFD", "SFD")) + 'cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("NEU", "NEU")) + 'cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("AMBAR", "AMB")) + 'cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("WO: GE TRANSPORT", "WO_GE")) + ''cboGrenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("WO: KITA", "WO_KITA")) + 'cboMy_Grenzstelle.Items.Add(New VERAG_PROG_ALLGEMEIN.MyListItem("???", "???")) cboMy_Grenzstelle.changeItem("") cboMyAvisoAnzeige.Items.Clear() @@ -265,9 +275,13 @@ Public Class frmHauptfenster lblErweitereSuche.Visible = False MDMParkplatzkartenToolStripMenuItem.Visible = False + ' SplitContainer3.Panel1Collapsed = True Button10.Visible = False - SplitContainer3.Panel1Collapsed = True + If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Weiterleiten", "AVISO") Then + Button10.Visible = True + SplitContainer3.Panel1Collapsed = True + End If Case Else If Not VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_Weiterleiten", "AVISO") Then @@ -342,11 +356,16 @@ Public Class frmHauptfenster If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("VERIMEX", "AVISO") Then 'MenuStrip1.Items.Clear() - MenuStrip1.Items.Remove(FunktionenToolStripMenuItem) + 'MenuStrip1.Items.Remove(FunktionenToolStripMenuItem) ' MenuStrip1.Items.Remove(StatistikToolStripMenuItem) StatistikToolStripMenuItem.DropDownItems.Remove(SDLAuswertungenToolStripMenuItem1) StatistikToolStripMenuItem.DropDownItems.Remove(SDLAuswertungenToolStripMenuItem) + For Each i In FunktionenToolStripMenuItem.DropDownItems + If i IsNot ToolStripMenuItem3 Then + i.Visible = False + End If + Next 'While MenuStrip1.Items.Count > 1 ' MenuStrip1.Items.RemoveAt(1) @@ -478,6 +497,7 @@ Public Class frmHauptfenster End Sub Sub initEAviso() + If VERAGSQL Is Nothing Then VERAGSQL = New VERAG_PROG_ALLGEMEIN.SQL '?? Label22.Text = VERAGSQL.getValueTxtBySql("SELECT count(*) FROM [tblNCTS_TR] where ncts_AVISO_einarbeitet=0 AND ncts_Partnersystem='ATEZ'", "FMZOLL") '"XX" If Label22.Text = "0" Then Label22.Text = "" Label22.Visible = Label22.Text <> "" @@ -564,7 +584,7 @@ Public Class frmHauptfenster ' .Columns(10).Visible = False ' End If - .Columns("Grenzstelle").Width = 40 + .Columns("Grenzstelle").Width = 55 .Columns("Grenzstelle").HeaderText = "Grenz." .Columns("Grenzstelle").HeaderCell.Style.Alignment = DataGridViewContentAlignment.MiddleCenter .Columns("Grenzstelle").DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter @@ -650,7 +670,7 @@ Public Class frmHauptfenster End With Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -662,57 +682,7 @@ Public Class frmHauptfenster If id > 0 Then pnlDetailsRechts.Visible = True - Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA - 'Case "VERAG" - ' If pnlDetailsRechts.Controls.Count = 0 Then - ' Dim usrCntl As New usrcntlAktDetails(id) - ' usrCntl.Dock = DockStyle.Fill - ' pnlDetailsRechts.Controls.Add(usrCntl) - ' Else - ' If reloadIfSameId Then - ' DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) - ' Else - ' If DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID <> id Then - ' DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) - ' End If - ' End If - ' End If - - Case "ATILLA" - If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Or VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("DAKOSY", Me.FindForm) Then - - If pnlDetailsRechts.Controls.Count = 0 Then - Dim usrCntl As New usrcntlAktDetailsATILLANeu(id) - usrCntl.Dock = DockStyle.Fill - pnlDetailsRechts.Controls.Add(usrCntl) - Else - DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLANeu).reload(id) - End If - Else - If pnlDetailsRechts.Controls.Count = 0 Then - Dim usrCntl As New usrcntlAktDetailsATILLA(id) - usrCntl.Dock = DockStyle.Fill - pnlDetailsRechts.Controls.Add(usrCntl) - Else - DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLA).reload(id) - End If - End If - Case Else - If pnlDetailsRechts.Controls.Count = 0 Then - Dim usrCntl As New usrcntlAktDetails(id) - usrCntl.Dock = DockStyle.Fill - pnlDetailsRechts.Controls.Add(usrCntl) - Else - If reloadIfSameId Then - DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) - Else - If DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID <> id Then - DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(id) - End If - End If - End If - End Select - + showPnlRight(id, reloadIfSameId) Else pnlDetailsRechts.Visible = False @@ -722,6 +692,41 @@ Public Class frmHauptfenster Me.Cursor = Cursors.Default End Sub + + Sub showPnlRight(AvisoId, reloadIfSameId) + ' MsgBox(VERAG_PROG_ALLGEMEIN.cAviso.getFirmaByAvisoId(AvisoId)) + Select Case VERAG_PROG_ALLGEMEIN.cAviso.getFirmaByAvisoId(AvisoId) + + Case "ATILLA" + 'If pnlDetailsRechts.Controls.Count > 0 Then + ' MsgBox(pnlDetailsRechts.Controls(0).Name) + 'End If + If pnlDetailsRechts.Controls.Count = 0 OrElse pnlDetailsRechts.Controls(0).Name <> "usrcntlAktDetailsATILLANeu" Then + pnlDetailsRechts.Controls.Clear() + Dim usrCntl As New usrcntlAktDetailsATILLANeu(AvisoId) + usrCntl.Dock = DockStyle.Fill + pnlDetailsRechts.Controls.Add(usrCntl) + Else + DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLANeu).reload(AvisoId) + End If + + Case Else + If pnlDetailsRechts.Controls.Count = 0 OrElse pnlDetailsRechts.Controls(0).Name <> "usrcntlAktDetails" Then + pnlDetailsRechts.Controls.Clear() + Dim usrCntl As New usrcntlAktDetails(AvisoId) + usrCntl.Dock = DockStyle.Fill + pnlDetailsRechts.Controls.Add(usrCntl) + Else + If reloadIfSameId Then + DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(AvisoId) + Else + If DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID <> AvisoId Then + DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).reload(AvisoId) + End If + End If + End If + End Select + End Sub ' Dim AVISOBinding As New cBinding("AVISO") Public Sub Aviso_anzeigen(hSort As String, Optional showDetails As Boolean = True) @@ -833,8 +838,15 @@ Public Class frmHauptfenster Dim search = txtSuche.Text.Trim If search <> "" Then hSQL += " AND (LKW_Nr LIKE '%" & search & "%' OR letzterMitarbeiter LIKE '%" & search & "%' OR Auftraggeber LIKE '%" & search & "%' OR Frächter LIKE '%" & search & "%' OR DakosyRef LIKE '%" & search & "%' )" + + 'If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "ATILLA" And search.Length = 8 Then 'AbfertigungsNr Suche für ATILLA, length, damit nicht unnötig der Verweis zu tblSendungen hergestellt wird --> performance + ' hSQL += " AND (LKW_Nr LIKE '%" & search & "%' OR letzterMitarbeiter LIKE '%" & search & "%' OR Auftraggeber LIKE '%" & search & "%' OR Frächter LIKE '%" & search & "%' OR DakosyRef LIKE '%" & search & "%' OR (SELECT count(*) FROM tblSendungen WHERE AbfertigungsNr LIKE '%" & search & "%' AND FilialenNr=4801 AND tblSnd_AvisoID=AvisoId)>0 ) " + 'Else + ' hSQL += " AND (LKW_Nr LIKE '%" & search & "%' OR letzterMitarbeiter LIKE '%" & search & "%' OR Auftraggeber LIKE '%" & search & "%' OR Frächter LIKE '%" & search & "%' OR DakosyRef LIKE '%" & search & "%' )" + 'End If End If + hSQL += " ORDER BY Ankunft ASC, AvisoEingang ASC, Datum ASC" ' MsgBox(hSQL) 'If hSort = "" Then @@ -955,15 +967,18 @@ Public Class frmHauptfenster gridMyAviso.DefaultCellStyle.Font = gridFont gridMyAviso.RowTemplate.Height = rowHeight 'muss vor Bindung sein - - If gridMyAviso.Columns IsNot Nothing AndAlso gridMyAviso.ColumnCount > 0 Then ' Sunst komischer Fehler DataAreaMouseLeave - 'gridMyAviso.Columns.Clear() 'Macht CellMouseLeave-Fehler????? - Try + Try + If gridMyAviso.Columns IsNot Nothing AndAlso gridMyAviso.ColumnCount > 0 Then ' Sunst komischer Fehler DataAreaMouseLeave gridMyAviso.Columns.Clear() - Catch ex As Exception + End If + gridMyAviso.DataSource = Nothing + + 'gridMyAviso.Columns.Clear() 'Macht CellMouseLeave-Fehler????? + + Catch ex As Exception + + End Try - End Try - End If 'If gridMyAviso.ColumnCount = 0 Then Exit Sub @@ -998,7 +1013,12 @@ Public Class frmHauptfenster Dim sqlStrFirma As String = "" If VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER <> "" And cbxCluster.Checked Then - sqlStrFirma &= " AND ( FIRMA='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' OR CLUSTER='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "' ) " + If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "VERIMEX" Then + sqlStrFirma &= " AND ( FIRMA='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' OR CLUSTER='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "' OR FIRMA='ATILLA' ) " + Else + sqlStrFirma &= " AND ( FIRMA='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' OR CLUSTER='" & VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER & "' ) " + End If + Else sqlStrFirma &= " AND FIRMA='" & VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA & "' " End If @@ -1080,6 +1100,8 @@ Public Class frmHauptfenster If VERAGSQL Is Nothing Then VERAGSQL = New VERAG_PROG_ALLGEMEIN.SQL '? vlt hilfts... Dim errOcc = False + + gridMyAviso.DataSource = VERAGSQL.loadDgvBySql_Param(sqlStr, "AVISO", 1500, list, False, errOcc) If errOcc Then pic.Visible = True @@ -1300,7 +1322,7 @@ Public Class frmHauptfenster End With Catch ex As Exception - MsgBox(ex.Message & vbNewLine & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try ' Grid_aktiv = True @@ -1341,7 +1363,7 @@ Public Class frmHauptfenster End If Catch ex As Exception - MsgBox(ex.Message & vbNewLine & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -1407,8 +1429,7 @@ Public Class frmHauptfenster Catch ex As Exception - MsgBox("gridMyAviso_CellFormatting" & vbNewLine & ex.Message & vbNewLine & ex.StackTrace) - + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -1631,7 +1652,7 @@ Public Class frmHauptfenster DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).openSnd(sndidTmp) End Select Catch ex As Exception - MsgBox(ex.Message) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try txtSuche.Text = "" End If @@ -1675,7 +1696,7 @@ Public Class frmHauptfenster Next Catch ex As Exception - + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name, "LOG") End Try End Sub @@ -1753,6 +1774,7 @@ Public Class frmHauptfenster If DateDiff(DateInterval.Second, hMerkZeit, Now) > 60 Then avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) 'hMerkZeit wird in aviso_anzeigen aktualisiert UsrCntlBenachrichtigungen1.initDgvAvisoBenachrichtigungen(Grid_aktiv, gridFont) + End If Catch ex As Exception @@ -1878,7 +1900,7 @@ Public Class frmHauptfenster btnRefresh.PerformClick() 'Aviso_anzeigen("") Catch ex As Exception - + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name, "LOG") End Try Me.Cursor = Cursors.Default End Sub @@ -2062,48 +2084,58 @@ Public Class frmHauptfenster End If - VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID = tmpid Details_aktiv = True If pnlDetailsRechts.Controls.Count > 0 Then - Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA - Case "ATILLA" - If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Or VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("DAKOSY", Me.FindForm) Then - Dim usrcntl As usrcntlAktDetailsATILLANeu = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLANeu) - If aktWithoutCheckTime Or usrcntl.AvisoID <> tmpid Then - Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) - Else - If DateDiff(DateInterval.Second, usrcntl.aktiv, Now) > 60 Then 'Wenn die Details länger als 60 Sek inaktiv sind (Prüfung durch click und keydown) - Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) - End If - End If - Else - Dim usrcntl As usrcntlAktDetailsATILLA = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLA) - If aktWithoutCheckTime Or usrcntl.AvisoID <> tmpid Then - Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) - Else - If DateDiff(DateInterval.Second, usrcntl.aktiv, Now) > 60 Then 'Wenn die Details länger als 60 Sek inaktiv sind (Prüfung durch click und keydown) - Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) - End If - End If - End If - Case Else - Dim usrcntl As usrcntlAktDetails = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails) - If aktWithoutCheckTime Or usrcntl.AvisoID <> tmpid Then - Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) - Else - usrcntl.changeCurrentSndId() - If DateDiff(DateInterval.Second, usrcntl.aktiv, Now) > 60 Then 'Wenn die Details länger als 60 Sek inaktiv sind (Prüfung durch click und keydown) - Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) - End If - End If - End Select - End If + Dim usrcntlAvisoID = -1 + Dim usrcntlAktiv As DateTime + If pnlDetailsRechts.Controls(0).Name = "usrcntlAktDetailsATILLANeu" Then + usrcntlAvisoID = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLANeu).AvisoID + usrcntlAktiv = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLANeu).aktiv + Else + usrcntlAvisoID = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID + usrcntlAktiv = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails).aktiv + End If + + If aktWithoutCheckTime Or usrcntlAvisoID <> tmpid Then + Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + Else + If DateDiff(DateInterval.Second, usrcntlAktiv, Now) > 60 Then 'Wenn die Details länger als 60 Sek inaktiv sind (Prüfung durch click und keydown) + Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + End If + End If + + + 'Select Case VERAG_PROG_ALLGEMEIN.cAviso.getFirmaByAvisoId(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + + ' Case "ATILLA" + ' If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Or VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("DAKOSY", Me.FindForm) Then + ' Dim usrcntl As usrcntlAktDetailsATILLANeu = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLANeu) + ' If aktWithoutCheckTime Or usrcntl.AvisoID <> tmpid Then + ' Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + ' Else + ' If DateDiff(DateInterval.Second, usrcntl.aktiv, Now) > 60 Then 'Wenn die Details länger als 60 Sek inaktiv sind (Prüfung durch click und keydown) + ' Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + ' End If + ' End If + ' End If + ' Case Else + ' Dim usrcntl As usrcntlAktDetails = DirectCast(pnlDetailsRechts.Controls(0), usrcntlAktDetails) + ' If aktWithoutCheckTime Or usrcntl.AvisoID <> tmpid Then + ' Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + ' Else + ' usrcntl.changeCurrentSndId() + ' If DateDiff(DateInterval.Second, usrcntl.aktiv, Now) > 60 Then 'Wenn die Details länger als 60 Sek inaktiv sind (Prüfung durch click und keydown) + ' Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + ' End If + ' End If + 'End Select + + End If Catch ex As Exception - ' pic.Visible = True - + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name, "LOG") End Try End Sub @@ -2134,7 +2166,7 @@ Public Class frmHauptfenster Catch ex As Exception - MsgBox(ex.Message & vbNewLine & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -3167,6 +3199,13 @@ Public Class frmHauptfenster VERAG_PROG_ALLGEMEIN.cAllgemein.LOAD_DATA() VERAG_PROG_ALLGEMEIN.cAllgemein.LOAD_BER() closeOK = True + + For Each ft As Form In Application.OpenForms + If ft.GetType.ToString = "SDL.frmSpeditionsbuchSuche" Then ft.Close() + If ft.GetType.ToString = "SDL.frmRechnungenSuche" Then ft.Close() + Next + + Dim f As New frmHauptfenster f.Show() f.Visible = True @@ -3519,6 +3558,7 @@ Public Class frmHauptfenster End If Catch ex As Exception + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -3713,7 +3753,7 @@ Public Class AvisoStatusFunctions End If Catch ex As Exception - + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name, "LOG",,,,, "ERR_HFST_SETDATE") End Try Return Now End Function @@ -4067,7 +4107,7 @@ Public Class AvisoStatusFunctions Try System.Diagnostics.Process.Start(hMail) Catch ex As Exception - MsgBox("Beim Mail-Versenden ist ein Fehler aufgetreten: " & vbCrLf & vbCrLf & ex.Message) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name, VERAG_PROG_ALLGEMEIN.ERROR_OP.SHOW, "Beim Mail-Versenden ist ein Fehler aufgetreten") End Try End If ' ---------------------------------- @@ -4542,7 +4582,7 @@ Public Class AvisoStatusFunctions Return True Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) Return False End Try End Function @@ -4643,7 +4683,7 @@ Public Class AvisoStatusFunctions belegVorhanden = False End If Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End If End If @@ -4677,6 +4717,11 @@ Public Class AvisoStatusFunctions Dim tmpid = -1 'Status ist Ankunft - jetzt auf Freigabe setzen und Dauer berechnen If allowEveryState Or Aviso.Status = VERAG_PROG_ALLGEMEIN.cGlobal.Status_Ankunft Then + + If Not setFreigabeMsg(Aviso) Then + Return False + End If + Aviso.Status = VERAG_PROG_ALLGEMEIN.cGlobal.Status_Freigegeben Aviso.Freigabe = Now Aviso.Dauer = CInt(DateDiff(DateInterval.Minute, Aviso.Ankunft, Now)) @@ -4705,53 +4750,53 @@ Public Class AvisoStatusFunctions AvisoDAL.addAenderung(tmpid, "LKW ist fertig - nicht gesetzt", "LKW ist fertig - nicht gesetzt, deshalb automatisch gesetzt mit FREIGABE") End If - End If - 'Wenn DE oder AT Zoll eingereicht -> automatisch fertigstellen XXXXXXXXXX - ' MsgBox(AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 17)) - If AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 17) Then - ' MsgBox(AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 18)) - If Not AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 18) Then - Dim myVermerk As New cVermerk - myVermerk.AvisoID = Aviso.AvisoID : myVermerk.Datum = Now - myVermerk.Mitarbeiter = VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter : myVermerk.MitarbeiterId = VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.MitarbeiterID - myVermerk.Hinweis_Vermerk = "DE Zoll fertig" : myVermerk.VermerkCodeId = 18 - VermerkeDAL.SpeichernVermerk(myVermerk) - End If - End If - If AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 19) Then - If Not AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 20) Then - Dim myVermerk As New cVermerk - myVermerk.AvisoID = Aviso.AvisoID : myVermerk.Datum = Now - myVermerk.Mitarbeiter = VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter : myVermerk.MitarbeiterId = VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.MitarbeiterID - myVermerk.Hinweis_Vermerk = "AT Zoll fertig" : myVermerk.VermerkCodeId = 20 - VermerkeDAL.SpeichernVermerk(myVermerk) - End If - End If - - - 'nach dem erfolgreichem Speichern wird jetzt noch ein automatisches Mail für den Frächter und Auftraggeber erstellt - - SendFreigabeEmail(Aviso) - - showFreigabeMsg(Aviso) - - - - If True Then - - If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AUTONACHERFASSUNG", CONTROL.FindForm) Then - Dim doAutoNacherf = True ' (vbYes = MsgBox("Autonacherfassung durchführen?", vbYesNoCancel)) - If doAutoNacherf Then - AUTONACHERFASSUNG(CONTROL, AvisoID) + 'Wenn DE oder AT Zoll eingereicht -> automatisch fertigstellen XXXXXXXXXX + ' MsgBox(AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 17)) + If AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 17) Then + ' MsgBox(AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 18)) + If Not AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 18) Then + Dim myVermerk As New cVermerk + myVermerk.AvisoID = Aviso.AvisoID : myVermerk.Datum = Now + myVermerk.Mitarbeiter = VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter : myVermerk.MitarbeiterId = VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.MitarbeiterID + myVermerk.Hinweis_Vermerk = "DE Zoll fertig" : myVermerk.VermerkCodeId = 18 + VermerkeDAL.SpeichernVermerk(myVermerk) End If + End If + If AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 19) Then + If Not AvisoDAL.VermerkExistsInAvisoByID(Aviso.AvisoID, 20) Then + Dim myVermerk As New cVermerk + myVermerk.AvisoID = Aviso.AvisoID : myVermerk.Datum = Now + myVermerk.Mitarbeiter = VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.Mitarbeiter : myVermerk.MitarbeiterId = VERAG_PROG_ALLGEMEIN.cGlobal.AktiverMitarbeiter.MitarbeiterID + myVermerk.Hinweis_Vermerk = "AT Zoll fertig" : myVermerk.VermerkCodeId = 20 + VermerkeDAL.SpeichernVermerk(myVermerk) + End If + End If + + + 'nach dem erfolgreichem Speichern wird jetzt noch ein automatisches Mail für den Frächter und Auftraggeber erstellt + + SendFreigabeEmail(Aviso) + + + + + If True Then + + If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AUTONACHERFASSUNG", CONTROL.FindForm) Then + Dim doAutoNacherf = True ' (vbYes = MsgBox("Autonacherfassung durchführen?", vbYesNoCancel)) + If doAutoNacherf Then + AUTONACHERFASSUNG(CONTROL, AvisoID) + End If + + End If End If End If Return (tmpid > 0) End Function - Sub showFreigabeMsg(AVISO As VERAG_PROG_ALLGEMEIN.cAviso) + Function setFreigabeMsg(AVISO As VERAG_PROG_ALLGEMEIN.cAviso) As Boolean Dim text = "" Dim text_Freigabe = "" @@ -4772,15 +4817,45 @@ Public Class AvisoStatusFunctions text_Freigabe &= AVISO.Freigabe_Info End If - If text <> "" Or text_Freigabe <> "" Then + If True Then ' If text <> "" Or text_Freigabe <> "" Then - Dim f As New frmDokumenteSchicken(AVISO) + Dim f As New frmFreigabeSetzen(AVISO) f.rtbDokumente.Text = text f.rtbSonstigeInfo.Text = text_Freigabe - f.cbxInfoblattFurDigitalabfertigungDrucken.Checked = (SQL.DLookup("COUNT(*)", "Vermerke", " AvisoID=" & AVISO.AvisoID & " and VermerkeCode=82", "AVISO", 0) > 0) - f.ShowDialog() + If AVISO.Grenzstelle = "SUB" Then ' Nur in Suben! + f.cbxInfoblattFurDigitalabfertigungDrucken.Checked = (SQL.DLookup("COUNT(*)", "Vermerke", " AvisoID=" & AVISO.AvisoID & " and VermerkeCode=82", "AVISO", 0) > 0) + End If + + If f.ShowDialog() = DialogResult.Cancel Then + Return False + End If End If + Return True + End Function + + + Shared Sub printFinish(myAviso As VERAG_PROG_ALLGEMEIN.cAviso) + Try + Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL + If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("PRINT_Freigabe_FinishDigital") Then + If myAviso.Grenzstelle = "SUB" Then ' Nur in Suben! + If (SQL.DLookup("COUNT(*)", "Vermerke", " AvisoID=" & myAviso.AvisoID & " and VermerkeCode=82", "AVISO", 0) > 0) Then + Dim path = SDL.FormularManagerNEU.Finish_AVISO(myAviso) + Dim oPS As New System.Drawing.Printing.PrinterSettings + If path <> "" Then + VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaGS(path, oPS.PrinterName) + MsgBox("Finish-Zettel wird gedruckt!") + End If + End If + End If + + End If + Catch ex As Exception + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) + End Try + End Sub + Public Sub AUTONACHERFASSUNG(CONTROL As Control, AvisoID As Integer) If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("VERIMEX", "AVISO") Then MsgBox("Keine Berechtigung!") @@ -4834,7 +4909,7 @@ Public Class AvisoStatusFunctions Next Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try CONTROL.FindForm.Cursor = Cursors.Default End Sub @@ -4937,7 +5012,7 @@ Public Class AvisoStatusFunctions End If Try If frmHauptfenster.pnlDetailsRechts.Controls.Count > 0 Then - Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA + Select Case VERAG_PROG_ALLGEMEIN.cAviso.getFirmaByAvisoId(AvisoID) 'Case "VERAG" ' If DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID = AvisoID Then ' DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetails).showInfo("Akt übernommen", 2) @@ -4947,10 +5022,6 @@ Public Class AvisoStatusFunctions If DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLANeu).AvisoID = AvisoID Then DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLANeu).showInfo("Akt übernommen", 2) End If - Else - If DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLA).AvisoID = AvisoID Then - DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetailsATILLA).showInfo("Akt übernommen", 2) - End If End If Case Else If DirectCast(frmHauptfenster.pnlDetailsRechts.Controls(0), usrcntlAktDetails).AvisoID = AvisoID Then @@ -5015,7 +5086,7 @@ Public Class AvisoStatusFunctions Return True Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) Return False End Try @@ -5165,6 +5236,16 @@ Public Class AvisoStatusFunctions SENDUNG_TMP.saveSachbearbeiter = True + If SENDUNG_TMP.tblSnd_Vorgeschrieben IsNot Nothing Then + MsgBox("Sendung wurde bereits auf 'Vorgeschrieben' gesetzt - Status nicht mehr möglich!") + Return False + End If + If SENDUNG_TMP.tblSnd_Vorbereitet IsNot Nothing Then + MsgBox("Sendung wurde bereits auf 'QS Vorbereitet' gesetzt - Status nicht mehr möglich!") + Return False + End If + + If SENDUNG_TMP.tblSnd_AbklaerungTR Is Nothing Then SENDUNG_TMP.tblSnd_AbklaerungTR_MA = VERAG_PROG_ALLGEMEIN.cAllgemein.USRID SENDUNG_TMP.tblSnd_FilialeAbklaerung = VERAG_PROG_ALLGEMEIN.cAllgemein.getSTAMMFILIALE @@ -5239,18 +5320,20 @@ Public Class AvisoStatusFunctions Shared Function getGrenzstelleZollstelle(hGrenzstelle As String, AVISO As VERAG_PROG_ALLGEMEIN.cAviso) As String - If hGrenzstelle <> "" Then + If hGrenzstelle.Replace("???", "") <> "" Then Dim Standorte As New cStandorteDAL Dim Standort As New cStandort Standort = Standorte.LesenStandort(0, hGrenzstelle, "") If Not IsNothing(Standort) Then Return Standort.Standort_Text.Trim End If + Else + If AVISO.Zollstelle IsNot Nothing AndAlso AVISO.Zollstelle.ToString <> "" Then + hGrenzstelle = VERAGSQL.getValueTxtBySql("SELECT [basncd_name] FROM basncd WHERE basncd_dstnr='" & AVISO.Zollstelle & "' ", "ATLAS") + End If End If - If AVISO.Zollstelle IsNot Nothing AndAlso AVISO.Zollstelle.ToString <> "" Then - hGrenzstelle = VERAGSQL.getValueTxtBySql("SELECT [basncd_name] FROM basncd WHERE basncd_dstnr='" & AVISO.Zollstelle & "' ", "ATLAS") - End If - Return hGrenzstelle + + Return hGrenzstelle.Replace("???", "") End Function @@ -5291,6 +5374,11 @@ Public Class AvisoStatusFunctions hText = hText.Replace("%Firma_simple%", "ATILLA") hText = hText.Replace("%Firma%", "ATILLA Spedition GmbH") + Case "AMBAR" + + hText = hText.Replace("%Firma_simple%", "AMBAR") + hText = hText.Replace("%FirmaTR%", "Ambar Logistic Bad Reichenhall") + hText = hText.Replace("%Firma%", "Ambar Logistic in Bad Reichenhall") Case Else hText = hText.Replace("%Platzhalter2%", "") @@ -5340,13 +5428,28 @@ Public Class AvisoStatusFunctions Try Dim PathTmp = (New VERAG_PROG_ALLGEMEIN.cDATENSERVER(DsId)).GET_TOP1_PATH(False) If PathTmp <> "" Then anhaenge.Add(PathTmp) : found = True - Catch ex As Exception : MsgBox(ex.Message & ex.StackTrace) : End Try + Catch ex As Exception : VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) : End Try If Not found Then AvisoStatusFunctions.insertSendungsVermerk(s.tblSnd_SendungID, AVISO.AvisoID, "ERR: VBD nicht gefunden: " & s.FilialenNr & "/" & s.AbfertigungsNr, 47) 'AvisoStatusFunctions.insertVermerkAllg(AVISO.AvisoID, "ERR: VBD nicht gefunden: " & s.FilialenNr & "/" & s.AbfertigungsNr, 46, , "(AUTO)") MsgBox("ACHTUNG: Das Versandbegleitdokument konnte nicht automatisiert ermittelt werden." & vbNewLine & "Bitte dem Kunden das VBD per E-Mail zustellen!" & vbNewLine & vbNewLine & "Sendung: " & s.FilialenNr & "/" & s.AbfertigungsNr) End If End If + Case 7 'Ausfuhr + + getDataFronDY_AES(s.tblSnd_SendungID, AtcMrn, DsId, s.FilialenNr, s.AbfertigungsNr, DsId2) + MsgBox(DsId) + If KUNDE_ERW.EmailFreigabe_ABDPDF And IsNumeric(DsId) Then 'VBD anhängen + Try + Dim PathTmp = (New VERAG_PROG_ALLGEMEIN.cDATENSERVER(DsId)).GET_TOP1_PATH(False) + If PathTmp <> "" Then anhaenge.Add(PathTmp) : found = True + Catch ex As Exception : VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) : End Try + If Not found Then + AvisoStatusFunctions.insertSendungsVermerk(s.tblSnd_SendungID, AVISO.AvisoID, "ERR: ABD nicht gefunden: " & s.FilialenNr & "/" & s.AbfertigungsNr, 47) + 'AvisoStatusFunctions.insertVermerkAllg(AVISO.AvisoID, "ERR: VBD nicht gefunden: " & s.FilialenNr & "/" & s.AbfertigungsNr, 46, , "(AUTO)") + MsgBox("ACHTUNG: Das Ausfuhrbegleitdokument konnte nicht automatisiert ermittelt werden." & vbNewLine & "Bitte dem Kunden das ABD per E-Mail zustellen!" & vbNewLine & vbNewLine & "Sendung: " & s.FilialenNr & "/" & s.AbfertigungsNr) + End If + End If Case Else getDataFronDY_EZA(s.tblSnd_SendungID, AtcMrn, DsId, s.FilialenNr, s.AbfertigungsNr, DsId2) If s.tblSnd_Abfertigungsart_ID = 23 Then @@ -5369,7 +5472,7 @@ Public Class AvisoStatusFunctions Dim PathTmp2 = (New VERAG_PROG_ALLGEMEIN.cDATENSERVER(DsId2)).GET_TOP1_PATH(False) If PathTmp2 <> "" Then anhaenge.Add(PathTmp2) : found = True End If - Catch ex As Exception : MsgBox(ex.Message & ex.StackTrace) : End Try + Catch ex As Exception : VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) : End Try If Not found Then AvisoStatusFunctions.insertSendungsVermerk(s.tblSnd_SendungID, AVISO.AvisoID, "ERR: Steuerbescheid nicht gefunden: " & s.FilialenNr & "/" & s.AbfertigungsNr, 47) ' AvisoStatusFunctions.insertVermerkAllg(AVISO.AvisoID, "ERR: Steuerbescheid nicht gefunden: " & s.FilialenNr & "/" & s.AbfertigungsNr, 46, , "(AUTO)") @@ -5401,8 +5504,8 @@ Public Class AvisoStatusFunctions Platzhalter_ersetzen = hText End Function - Private Shared VERAGSQL As New VERAG_PROG_ALLGEMEIN.SQL + Private Shared VERAGSQL As New VERAG_PROG_ALLGEMEIN.SQL Shared Function getEZOLL_Steuerbescheid(KUNDE_ERW As VERAG_PROG_ALLGEMEIN.cKundenErweitert, AVISO As VERAG_PROG_ALLGEMEIN.cAviso, SENDUNG As VERAG_PROG_ALLGEMEIN.cSendungen) As List(Of String) Dim LIST As New List(Of String) @@ -5455,7 +5558,7 @@ Public Class AvisoStatusFunctions End Select End If Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Return False @@ -5524,6 +5627,27 @@ Public Class AvisoStatusFunctions Return False End Function + Shared Function getDataFronDY_AES(SendungsId, ByRef AtcMrn, ByRef dsId, FilialenNr, AbfertigungsNr, ByRef dsId2) As Boolean + If SendungsId Is Nothing Then Return False + If Not IsNumeric(AbfertigungsNr) Then Return False + If AbfertigungsNr <= 0 Then Return False + + Dim dt = VERAGSQL.loadDgvBySql("SELECT isnull(dy_ABD_dsId,'') as DsId, isnull(aes_MRN,'') as ATC FROM tblDakosy_Zollanmeldungen inner join tblDakosy_AES on dy_id=aes_dyaAnmID where dy_SendungsId='" & SendungsId & "' and dy_status <= 70 order by dy_status desc, dy_Erstellung desc", "FMZOLL") + If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then + AtcMrn = dt.Rows(0)("ATC") + dsId = dt.Rows(0)("DsId") + Return True + Else + Try 'AT-Zollsystem + 'Dim sql As New VERAG_PROG_ALLGEMEIN.SQL + 'AtcMrn = sql.getValueTxtBySql("SELECT CRN FROM zsAnmRefs WHERE (VorgangID = 'EF') AND (LRN LIKE '" & FilialenNr & "/" & AbfertigungsNr & "%' OR LRN LIKE '" & FilialenNr & "-" & AbfertigungsNr & "%') ORDER BY GeaendertAm DESC", "EZOLL") + 'dsId = sql.getValueTxtBySql("SELECT TOP 1 DokumentId_Steuerbeleg FROM [Speditionsbuch] where DokumentId_Steuerbeleg is not null AND FilialenNr='" & FilialenNr & "' AND AbfertigungsNr='" & AbfertigungsNr & "' ", "FMZOLL") + 'dsId2 = sql.getValueTxtBySql("SELECT TOP 1 DokumentId_Mitteilung FROM [Speditionsbuch] where DokumentId_Mitteilung is not null AND FilialenNr='" & FilialenNr & "' AND AbfertigungsNr='" & AbfertigungsNr & "' ", "FMZOLL") + '....... FEHLT NOCH !!!! + Catch : End Try + End If + Return False + End Function Function SpeditionsbuchEintrag(AvisoID As Integer, SendungID As Integer) As posNr If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("VERIMEX", "AVISO") Then @@ -5589,7 +5713,7 @@ Public Class AvisoStatusFunctions Return posNr Catch ex As Exception - MsgBox(ex.Message & vbNewLine & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) Return Nothing End Try End Function diff --git a/Aviso/frmLaufzettel.Designer.vb b/Aviso/frmLaufzettel.Designer.vb new file mode 100644 index 0000000..fdb449d --- /dev/null +++ b/Aviso/frmLaufzettel.Designer.vb @@ -0,0 +1,414 @@ + _ +Partial Class frmLaufzettel + Inherits System.Windows.Forms.Form + + 'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen. + _ + Protected Overrides Sub Dispose(ByVal disposing As Boolean) + Try + If disposing AndAlso components IsNot Nothing Then + components.Dispose() + End If + Finally + MyBase.Dispose(disposing) + End Try + End Sub + + 'Wird vom Windows Form-Designer benötigt. + Private components As System.ComponentModel.IContainer + + 'Hinweis: Die folgende Prozedur ist für den Windows Form-Designer erforderlich. + 'Das Bearbeiten ist mit dem Windows Form-Designer möglich. + 'Das Bearbeiten mit dem Code-Editor ist nicht möglich. + _ + Private Sub InitializeComponent() + Me.components = New System.ComponentModel.Container() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmLaufzettel)) + Me.lbl = New System.Windows.Forms.Label() + Me.cbxDokumenteDrucken = New System.Windows.Forms.CheckBox() + Me.cbxDigitalLZ = New System.Windows.Forms.CheckBox() + Me.CheckBox2 = New System.Windows.Forms.CheckBox() + Me.CheckBox3 = New System.Windows.Forms.CheckBox() + Me.CheckBox4 = New System.Windows.Forms.CheckBox() + Me.dgvLaufzettelDruck = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) + Me.clmnLzPrint_ID = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.clmnLzPrint_Name = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.PrintDocId = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.printTyp = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.dgvDigitalMailanfügen = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) + Me.clmnLzMail_ID = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.clmnLzMail_Name = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.DocId = New System.Windows.Forms.DataGridViewTextBoxColumn() + Me.btnLaufzettelDrucken = New System.Windows.Forms.Button() + Me.MyPanel1 = New VERAG_PROG_ALLGEMEIN.MyPanel(Me.components) + Me.cbxVPSplit = New System.Windows.Forms.CheckBox() + Me.pnlZumZoll = New System.Windows.Forms.Panel() + Me.Button3 = New System.Windows.Forms.Button() + Me.btnDIGITAL = New System.Windows.Forms.Button() + Me.Button1 = New System.Windows.Forms.Button() + Me.pnl = New System.Windows.Forms.Panel() + Me.btn = New System.Windows.Forms.Button() + Me.Button2 = New System.Windows.Forms.Button() + Me.cboPrinter = New VERAG_PROG_ALLGEMEIN.MyComboBox() + CType(Me.dgvLaufzettelDruck, System.ComponentModel.ISupportInitialize).BeginInit() + CType(Me.dgvDigitalMailanfügen, System.ComponentModel.ISupportInitialize).BeginInit() + Me.MyPanel1.SuspendLayout() + Me.pnlZumZoll.SuspendLayout() + Me.pnl.SuspendLayout() + Me.SuspendLayout() + ' + 'lbl + ' + Me.lbl.AutoSize = True + Me.lbl.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.lbl.ForeColor = System.Drawing.Color.White + Me.lbl.Location = New System.Drawing.Point(11, 8) + Me.lbl.Name = "lbl" + Me.lbl.Size = New System.Drawing.Size(88, 24) + Me.lbl.TabIndex = 0 + Me.lbl.Text = "Laufzettel" + ' + 'cbxDokumenteDrucken + ' + Me.cbxDokumenteDrucken.AutoSize = True + Me.cbxDokumenteDrucken.Checked = True + Me.cbxDokumenteDrucken.CheckState = System.Windows.Forms.CheckState.Checked + Me.cbxDokumenteDrucken.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) + Me.cbxDokumenteDrucken.Location = New System.Drawing.Point(17, 25) + Me.cbxDokumenteDrucken.Name = "cbxDokumenteDrucken" + Me.cbxDokumenteDrucken.Size = New System.Drawing.Size(189, 24) + Me.cbxDokumenteDrucken.TabIndex = 1 + Me.cbxDokumenteDrucken.Text = "Dokumente drucken" + Me.cbxDokumenteDrucken.UseVisualStyleBackColor = True + ' + 'cbxDigitalLZ + ' + Me.cbxDigitalLZ.AutoSize = True + Me.cbxDigitalLZ.Enabled = False + Me.cbxDigitalLZ.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) + Me.cbxDigitalLZ.Location = New System.Drawing.Point(284, 25) + Me.cbxDigitalLZ.Name = "cbxDigitalLZ" + Me.cbxDigitalLZ.Size = New System.Drawing.Size(239, 24) + Me.cbxDigitalLZ.TabIndex = 2 + Me.cbxDigitalLZ.Text = "DIGITAL: An Mail anfügen" + Me.cbxDigitalLZ.UseVisualStyleBackColor = True + ' + 'CheckBox2 + ' + Me.CheckBox2.AutoSize = True + Me.CheckBox2.Checked = True + Me.CheckBox2.CheckState = System.Windows.Forms.CheckState.Checked + Me.CheckBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold) + Me.CheckBox2.Location = New System.Drawing.Point(18, 14) + Me.CheckBox2.Name = "CheckBox2" + Me.CheckBox2.Size = New System.Drawing.Size(230, 24) + Me.CheckBox2.TabIndex = 3 + Me.CheckBox2.Text = """zum Zoll"" Zettel drucken" + Me.CheckBox2.UseVisualStyleBackColor = True + ' + 'CheckBox3 + ' + Me.CheckBox3.AutoSize = True + Me.CheckBox3.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!) + Me.CheckBox3.Location = New System.Drawing.Point(284, 14) + Me.CheckBox3.Name = "CheckBox3" + Me.CheckBox3.Size = New System.Drawing.Size(77, 24) + Me.CheckBox3.TabIndex = 4 + Me.CheckBox3.Text = "AT Zoll" + Me.CheckBox3.UseVisualStyleBackColor = True + ' + 'CheckBox4 + ' + Me.CheckBox4.AutoSize = True + Me.CheckBox4.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!) + Me.CheckBox4.Location = New System.Drawing.Point(376, 14) + Me.CheckBox4.Name = "CheckBox4" + Me.CheckBox4.Size = New System.Drawing.Size(80, 24) + Me.CheckBox4.TabIndex = 5 + Me.CheckBox4.Text = "DE Zoll" + Me.CheckBox4.UseVisualStyleBackColor = True + ' + 'dgvLaufzettelDruck + ' + Me.dgvLaufzettelDruck.AKTUALISIERUNGS_INTERVALL = -1 + Me.dgvLaufzettelDruck.AllowUserToAddRows = False + Me.dgvLaufzettelDruck.AllowUserToResizeColumns = False + Me.dgvLaufzettelDruck.AllowUserToResizeRows = False + Me.dgvLaufzettelDruck.BackgroundColor = System.Drawing.Color.White + Me.dgvLaufzettelDruck.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize + Me.dgvLaufzettelDruck.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnLzPrint_ID, Me.clmnLzPrint_Name, Me.PrintDocId, Me.printTyp}) + Me.dgvLaufzettelDruck.Location = New System.Drawing.Point(18, 53) + Me.dgvLaufzettelDruck.Name = "dgvLaufzettelDruck" + Me.dgvLaufzettelDruck.ReadOnly = True + Me.dgvLaufzettelDruck.RowHeadersVisible = False + Me.dgvLaufzettelDruck.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect + Me.dgvLaufzettelDruck.Size = New System.Drawing.Size(260, 266) + Me.dgvLaufzettelDruck.TabIndex = 6 + ' + 'clmnLzPrint_ID + ' + Me.clmnLzPrint_ID.HeaderText = "Column1" + Me.clmnLzPrint_ID.Name = "clmnLzPrint_ID" + Me.clmnLzPrint_ID.ReadOnly = True + Me.clmnLzPrint_ID.Visible = False + ' + 'clmnLzPrint_Name + ' + Me.clmnLzPrint_Name.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill + Me.clmnLzPrint_Name.HeaderText = "Datei" + Me.clmnLzPrint_Name.Name = "clmnLzPrint_Name" + Me.clmnLzPrint_Name.ReadOnly = True + ' + 'PrintDocId + ' + Me.PrintDocId.HeaderText = "printDocId" + Me.PrintDocId.Name = "PrintDocId" + Me.PrintDocId.ReadOnly = True + Me.PrintDocId.Visible = False + ' + 'printTyp + ' + Me.printTyp.HeaderText = "printTyp" + Me.printTyp.Name = "printTyp" + Me.printTyp.ReadOnly = True + Me.printTyp.Visible = False + ' + 'dgvDigitalMailanfügen + ' + Me.dgvDigitalMailanfügen.AKTUALISIERUNGS_INTERVALL = -1 + Me.dgvDigitalMailanfügen.AllowUserToAddRows = False + Me.dgvDigitalMailanfügen.AllowUserToResizeColumns = False + Me.dgvDigitalMailanfügen.AllowUserToResizeRows = False + Me.dgvDigitalMailanfügen.BackgroundColor = System.Drawing.Color.White + Me.dgvDigitalMailanfügen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize + Me.dgvDigitalMailanfügen.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnLzMail_ID, Me.clmnLzMail_Name, Me.DocId}) + Me.dgvDigitalMailanfügen.Enabled = False + Me.dgvDigitalMailanfügen.Location = New System.Drawing.Point(284, 53) + Me.dgvDigitalMailanfügen.Name = "dgvDigitalMailanfügen" + Me.dgvDigitalMailanfügen.ReadOnly = True + Me.dgvDigitalMailanfügen.RowHeadersVisible = False + Me.dgvDigitalMailanfügen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect + Me.dgvDigitalMailanfügen.Size = New System.Drawing.Size(260, 365) + Me.dgvDigitalMailanfügen.TabIndex = 7 + ' + 'clmnLzMail_ID + ' + Me.clmnLzMail_ID.HeaderText = "Column1" + Me.clmnLzMail_ID.Name = "clmnLzMail_ID" + Me.clmnLzMail_ID.ReadOnly = True + Me.clmnLzMail_ID.Visible = False + ' + 'clmnLzMail_Name + ' + Me.clmnLzMail_Name.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill + Me.clmnLzMail_Name.HeaderText = "Datei" + Me.clmnLzMail_Name.Name = "clmnLzMail_Name" + Me.clmnLzMail_Name.ReadOnly = True + ' + 'DocId + ' + Me.DocId.HeaderText = "DocId" + Me.DocId.Name = "DocId" + Me.DocId.ReadOnly = True + Me.DocId.Visible = False + ' + 'btnLaufzettelDrucken + ' + Me.btnLaufzettelDrucken.BackColor = System.Drawing.Color.PapayaWhip + Me.btnLaufzettelDrucken.Enabled = False + Me.btnLaufzettelDrucken.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnLaufzettelDrucken.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!) + Me.btnLaufzettelDrucken.Image = Global.AVISO.My.Resources.Resources.printer + Me.btnLaufzettelDrucken.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnLaufzettelDrucken.Location = New System.Drawing.Point(18, 424) + Me.btnLaufzettelDrucken.Name = "btnLaufzettelDrucken" + Me.btnLaufzettelDrucken.Padding = New System.Windows.Forms.Padding(10, 0, 20, 0) + Me.btnLaufzettelDrucken.Size = New System.Drawing.Size(260, 69) + Me.btnLaufzettelDrucken.TabIndex = 8 + Me.btnLaufzettelDrucken.Text = "Laufzettel drucken" + Me.btnLaufzettelDrucken.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnLaufzettelDrucken.UseVisualStyleBackColor = False + ' + 'MyPanel1 + ' + Me.MyPanel1.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.MyPanel1.Controls.Add(Me.cboPrinter) + Me.MyPanel1.Controls.Add(Me.cbxVPSplit) + Me.MyPanel1.Controls.Add(Me.pnlZumZoll) + Me.MyPanel1.Controls.Add(Me.Button3) + Me.MyPanel1.Controls.Add(Me.btnDIGITAL) + Me.MyPanel1.Controls.Add(Me.Button1) + Me.MyPanel1.Controls.Add(Me.btnLaufzettelDrucken) + Me.MyPanel1.Controls.Add(Me.cbxDokumenteDrucken) + Me.MyPanel1.Controls.Add(Me.dgvDigitalMailanfügen) + Me.MyPanel1.Controls.Add(Me.dgvLaufzettelDruck) + Me.MyPanel1.Controls.Add(Me.cbxDigitalLZ) + Me.MyPanel1.Dock = System.Windows.Forms.DockStyle.Fill + Me.MyPanel1.Location = New System.Drawing.Point(0, 45) + Me.MyPanel1.Name = "MyPanel1" + Me.MyPanel1.Size = New System.Drawing.Size(564, 571) + Me.MyPanel1.TabIndex = 9 + ' + 'cbxVPSplit + ' + Me.cbxVPSplit.AutoSize = True + Me.cbxVPSplit.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + Me.cbxVPSplit.Location = New System.Drawing.Point(18, 400) + Me.cbxVPSplit.Name = "cbxVPSplit" + Me.cbxVPSplit.Size = New System.Drawing.Size(173, 21) + Me.cbxVPSplit.TabIndex = 6 + Me.cbxVPSplit.Text = "nach Vorpapier splitten" + Me.cbxVPSplit.UseVisualStyleBackColor = True + ' + 'pnlZumZoll + ' + Me.pnlZumZoll.BackColor = System.Drawing.Color.PapayaWhip + Me.pnlZumZoll.Controls.Add(Me.Button2) + Me.pnlZumZoll.Controls.Add(Me.CheckBox2) + Me.pnlZumZoll.Controls.Add(Me.CheckBox3) + Me.pnlZumZoll.Controls.Add(Me.CheckBox4) + Me.pnlZumZoll.Dock = System.Windows.Forms.DockStyle.Bottom + Me.pnlZumZoll.Location = New System.Drawing.Point(0, 520) + Me.pnlZumZoll.Name = "pnlZumZoll" + Me.pnlZumZoll.Size = New System.Drawing.Size(562, 49) + Me.pnlZumZoll.TabIndex = 12 + ' + 'Button3 + ' + Me.Button3.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button3.Location = New System.Drawing.Point(18, 325) + Me.Button3.Name = "Button3" + Me.Button3.Size = New System.Drawing.Size(260, 36) + Me.Button3.TabIndex = 11 + Me.Button3.Text = "nur Anlagen drucken" + Me.Button3.UseVisualStyleBackColor = True + ' + 'btnDIGITAL + ' + Me.btnDIGITAL.BackColor = System.Drawing.Color.PapayaWhip + Me.btnDIGITAL.Enabled = False + Me.btnDIGITAL.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnDIGITAL.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!) + Me.btnDIGITAL.Image = Global.AVISO.My.Resources.Resources.digitalerAkt_small + Me.btnDIGITAL.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnDIGITAL.Location = New System.Drawing.Point(284, 424) + Me.btnDIGITAL.Name = "btnDIGITAL" + Me.btnDIGITAL.Padding = New System.Windows.Forms.Padding(10, 0, 20, 0) + Me.btnDIGITAL.Size = New System.Drawing.Size(260, 69) + Me.btnDIGITAL.TabIndex = 10 + Me.btnDIGITAL.Text = "Laufzettel DIGITAL" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "E-Mail öffnen" + Me.btnDIGITAL.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnDIGITAL.UseVisualStyleBackColor = False + ' + 'Button1 + ' + Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button1.Location = New System.Drawing.Point(18, 363) + Me.Button1.Name = "Button1" + Me.Button1.Size = New System.Drawing.Size(260, 36) + Me.Button1.TabIndex = 9 + Me.Button1.Text = "Laufzettel anzeigen" + Me.Button1.UseVisualStyleBackColor = True + ' + 'pnl + ' + Me.pnl.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer)) + Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnl.Controls.Add(Me.btn) + Me.pnl.Controls.Add(Me.lbl) + Me.pnl.Dock = System.Windows.Forms.DockStyle.Top + Me.pnl.Location = New System.Drawing.Point(0, 0) + Me.pnl.Name = "pnl" + Me.pnl.Size = New System.Drawing.Size(564, 45) + Me.pnl.TabIndex = 10 + ' + 'btn + ' + Me.btn.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btn.BackColor = System.Drawing.Color.Red + Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btn.Font = New System.Drawing.Font("Microsoft Sans Serif", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.btn.ForeColor = System.Drawing.Color.White + Me.btn.Location = New System.Drawing.Point(483, -1) + Me.btn.Margin = New System.Windows.Forms.Padding(0) + Me.btn.Name = "btn" + Me.btn.Size = New System.Drawing.Size(80, 45) + Me.btn.TabIndex = 0 + Me.btn.Text = "X" + Me.btn.UseVisualStyleBackColor = False + ' + 'Button2 + ' + Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button2.Location = New System.Drawing.Point(468, 8) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(83, 36) + Me.Button2.TabIndex = 13 + Me.Button2.Text = "nur z.Zoll drucken" + Me.Button2.UseVisualStyleBackColor = True + ' + 'cboPrinter + ' + Me.cboPrinter._allowedValuesFreiText = Nothing + Me.cboPrinter._allowFreiText = False + Me.cboPrinter._value = "" + Me.cboPrinter.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList + Me.cboPrinter.DropDownWidth = 300 + Me.cboPrinter.FormattingEnabled = True + Me.cboPrinter.Location = New System.Drawing.Point(18, 495) + Me.cboPrinter.Name = "cboPrinter" + Me.cboPrinter.Size = New System.Drawing.Size(260, 21) + Me.cboPrinter.TabIndex = 23 + ' + 'frmLaufzettel + ' + Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font + Me.BackColor = System.Drawing.Color.White + Me.ClientSize = New System.Drawing.Size(564, 616) + Me.Controls.Add(Me.MyPanel1) + Me.Controls.Add(Me.pnl) + Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None + Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon) + Me.Name = "frmLaufzettel" + Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen + Me.Text = "Laufzettel" + CType(Me.dgvLaufzettelDruck, System.ComponentModel.ISupportInitialize).EndInit() + CType(Me.dgvDigitalMailanfügen, System.ComponentModel.ISupportInitialize).EndInit() + Me.MyPanel1.ResumeLayout(False) + Me.MyPanel1.PerformLayout() + Me.pnlZumZoll.ResumeLayout(False) + Me.pnlZumZoll.PerformLayout() + Me.pnl.ResumeLayout(False) + Me.pnl.PerformLayout() + Me.ResumeLayout(False) + + End Sub + + Friend WithEvents lbl As Label + Friend WithEvents cbxDokumenteDrucken As CheckBox + Friend WithEvents cbxDigitalLZ As CheckBox + Friend WithEvents CheckBox2 As CheckBox + Friend WithEvents CheckBox3 As CheckBox + Friend WithEvents CheckBox4 As CheckBox + Friend WithEvents dgvLaufzettelDruck As VERAG_PROG_ALLGEMEIN.MyDatagridview + Friend WithEvents dgvDigitalMailanfügen As VERAG_PROG_ALLGEMEIN.MyDatagridview + Friend WithEvents btnLaufzettelDrucken As Button + Friend WithEvents MyPanel1 As VERAG_PROG_ALLGEMEIN.MyPanel + Friend WithEvents pnl As Panel + Friend WithEvents btn As Button + Friend WithEvents Button1 As Button + Friend WithEvents Button3 As Button + Friend WithEvents btnDIGITAL As Button + Friend WithEvents pnlZumZoll As Panel + Friend WithEvents cbxVPSplit As CheckBox + Friend WithEvents clmnLzMail_ID As DataGridViewTextBoxColumn + Friend WithEvents clmnLzMail_Name As DataGridViewTextBoxColumn + Friend WithEvents DocId As DataGridViewTextBoxColumn + Friend WithEvents clmnLzPrint_ID As DataGridViewTextBoxColumn + Friend WithEvents clmnLzPrint_Name As DataGridViewTextBoxColumn + Friend WithEvents PrintDocId As DataGridViewTextBoxColumn + Friend WithEvents printTyp As DataGridViewTextBoxColumn + Friend WithEvents Button2 As Button + Friend WithEvents cboPrinter As VERAG_PROG_ALLGEMEIN.MyComboBox +End Class diff --git a/Aviso/frmLaufzettel.resx b/Aviso/frmLaufzettel.resx new file mode 100644 index 0000000..154a8b5 --- /dev/null +++ b/Aviso/frmLaufzettel.resx @@ -0,0 +1,1274 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + text/microsoft-resx + + + 2.0 + + + System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + True + + + True + + + True + + + True + + + True + + + True + + + True + + + + + AAABAAEAgIAAAAEAIAAoCAEAFgAAACgAAACAAAAAAAEAAAEAIAAAAAAAAAgBABMLAAATCwAAAAAAAAAA + AABmMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/5uDd///////////////////////39fT/dEkm/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP+AXUL///////////////////////////////////////////////////////// + /////////////////////////////3RJJv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/3RJJv/39fT///////// + /////////////2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+AXUL///////////////////////// + //+YfWv/ZjMA/2YzAP9mMwD/ZjMA/3RJJv/u6+n/////////////////9/X0/3RJJv9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/39fT//////////////////////8Gzqv9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/t6ec/9TLxf//////////////////////y7+4/62a + jf9mMwD/ZjMA/5h9a////////////3RJJv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/3RJJv////////////////////////////// + ///Lv7j/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/u6+n///////// + ////////////////////////////////////////////////////////////////////////o4x9/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/+bg3f//////////////////////jG5Y/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/7ennP//////////////////////5uDd/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/5h9 + a///////////////////////wbOq/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/dEkm//// + ////////////////////////o4x9/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/rZqN//// + /////////////////////////////////////////////+bg3f+Mblj/t6ec////////////o4x9/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/jG5Y//////////////////////////////////////+Mblj/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/9TLxf////////////////////////////////////////////// + ///////////////////////////////////Lv7j/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/wbOq//// + //////////////////+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/5uDd//////////////////// + //+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/9TLxf//////////////////////gF1C/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+YfWv///////////////////////////90SSb/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/8u/uP////////////////////////////////////////////// + //////////////f19P/m4N3///////////+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////////////////////// + /////////////93W0f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/t6ec//// + ///////////////////39fT/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+jjH3//////////////////////8u/uP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/4BdQv///////////////////////////3RJJv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/gF1C//f19P/////////////////Lv7j/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7en + nP//////////////////////9/X0/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////// + ///////////////////Uy8X/gF1C/2YzAP9mMwD/t6ec//f19P///////////////////////////9TL + xf9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/8Gzqv//////////////////////7uvp/////////////////62ajf9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+Mblj///////////////////////////90SSb/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/4xu + WP//////////////////////5uDd/2YzAP9mMwD/ZjMA/2YzAP9mMwD/t6ec//////////////////// + ///Uy8X/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/t6ec//////////////////// + ///////////////////////////////////////////////////////////////////Uy8X/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA//f19P//////////////////////y7+4/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/gF1C/+7r6f//////////////////////9/X0/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/5uDd//////////////////// + //+jjH3/////////////////7uvp/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/3RJ + Jv///////////////////////////6OMff9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA//f19P//////////////////////dEkm/2Yz + AP9mMwD/ZjMA/2YzAP/m4N3//////////////////////6OMff9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/7uvp//////////////////////////////////////////////////// + /////////////////////////////7ennP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+jjH3///////// + //////////////////+Mblj/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/jG5Y//////////////////// + ////////dEkm/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP/39fT//////////////////////2YzAP/Lv7j/////////////////t6ec/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/+bg3f//////////////////////wbOq/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/1MvF//////////////////////+YfWv/ZjMA/2YzAP9mMwD/gF1C//////////////////// + ///39fT/dEkm/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+YfWv///////// + ////////////////////////////////////////////////////////////////////////o4x9/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7ennP///////////////////////////2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/1MvF//////////////////////+jjH3/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/jG5Y//////////////////// + ///m4N3/ZjMA/4BdQv/39fT////////////39fT/gF1C/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/wbOq///////////////////////Uy8X/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////////////////////// + /////////////////////////////////////////////+7r6f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/Uy8X/////////////////7uvp/2YzAP9mMwD/ZjMA/2Yz + AP+Mblj///////////////////////////90SSb/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/t6ec//// + ////////////////////////ZjMA/2YzAP9mMwD/dEkm//////////////////////////////////// + /////////////7ennP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP+jjH3//////////////////////9TLxf9mMwD/ZjMA/7ennP////////////// + ///Lv7j/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////////////////////// + /////////////////////////////////////////////+bg3f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/6OMff////////////////////////////////////////////////////////////// + ///////////////////d1tH/jG5Y/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/4Bd + Qv//////////////////////rZqN/2YzAP9mMwD/ZjMA/62ajf//////////////////////5uDd/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////////////////////////90SSb/ZjMA/2Yz + AP9mMwD/5uDd////////////////////////////////////////////1MvF/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7ennP////////////// + ////////t6ec/2YzAP9mMwD/dEkm//f19P////////////////+YfWv/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/4xuWP////////////////////////////////////////////////////////////// + /////////////2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/dEkm//////////////////// + ////////////////////////////////////////////////////////////////////////mH1r/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7ennP/////////////////39fT/dEkm/2Yz + AP9mMwD/wbOq///////////////////////Uy8X/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/6OM + ff///////////////////////////6OMff9mMwD/ZjMA/2YzAP/Bs6r///////////////////////// + ///////////////////39fT/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/1MvF//////////////////////+tmo3/ZjMA/2YzAP9mMwD/rZqN//// + /////////////+bg3f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA//f19P////////////// + ////////////////////////////////////////////////////////mH1r/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/7uvp//////////////////////90SSb/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP+jjH3/5uDd///////////////////////39fT/dEkm/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/+7r6f////////////////+3p5z/ZjMA/2YzAP/Uy8X//////////////////////7en + nP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/dEkm////////////////////////////wbOq/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/u6+n///////// + /////////////4xuWP9mMwD/ZjMA/2YzAP9mMwD/7uvp/////////////////62ajf9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/3dbR///////////////////////Bs6r/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/Uy8X///////// + /////////////5h9a/9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP90SSb/7uvp//////////////////// + //+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/o4x9//////////////////f1 + 9P+AXUL/ZjMA//f19P//////////////////////jG5Y/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/1MvF///////////////////////39fT/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP/Bs6r//////9TLxf+3p5z/t6ec/5h9a/9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/dEkm////////////////////////////dEkm/2YzAP9mMwD/ZjMA/2Yz + AP+tmo3/////////////////7uvp/3RJJv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/Bs6r///////// + /////////////+bg3f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7ennP//////////////////////t6ec/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP/Lv7j//////////////////////8Gzqv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/1MvF/////////////////8u/uP90SSb///////////////////////// + //90SSb/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+YfWv///////////////////////// + //+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/+7r6f//////////////////////o4x9/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+YfWv///////// + /////////////+7r6f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/d1tH/////////////////t6ec/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/6OMff///////////////////////////3RJJv9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/mH1r//// + ///////////////////Uy8X/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/+bg3f////////////// + ////////t6ec/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+AXUL///////// + /////////////62ajf//////////////////////5uDd/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP/Bs6r///////////////////////////+YfWv/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP+tmo3//////////////////////+7r6f9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/7ennP//////////////////////1MvF/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/5h9a///////////////////////gF1C/2YzAP9mMwD/ZjMA/2YzAP9mMwD/gF1C//// + ////////////////////////jG5Y/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP90SSb//////////////////////+7r6f9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/4BdQv/Lv7j///////////////////////////+Mblj/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP+3p5z///////////////////////////////////////// + ///Lv7j/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/d1tH///////// + //////////////////+3p5z/dEkm/2YzAP9mMwD/t6ec////////////////////////////rZqN/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/y7+4//// + ///////////////////Bs6r/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/93W0f////////////// + ///Uy8X/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/9/X0//////////////////////////////////// + /////////////////////////////////////////////3RJJv9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP/m4N3///////////////////////////////////////////////////////////////////////// + ////////wbOq/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP/u6+n//////////////////////////////////////7ennP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/Uy8X///////////////////////////////////////// + /////////////////////////////8u/uP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP/m4N3//////////////////////62ajf9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/gF1C//////////////////////+YfWv/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP/Uy8X///////////////////////////////////////////////////////////////////////// + ////////mH1r/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/8u/uP////////////////////////////// + /////////////////////////////////////////////9TLxf9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/6OMff////////////////////////////// + ////////jG5Y/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP+tmo3/9/X0//////////////////////////////////////////////////////+tmo3/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/dEkm//// + ////////////////////////jG5Y/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/y7+4//// + /////////////+7r6f90SSb/ZjMA/2YzAP9mMwD/ZjMA/7ennP////////////////////////////// + //////////////////////////////////////////////////+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/t6ec////////////////////////////////////////////////////////////5uDd/7en + nP+Mblj/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/93W0f////////////////////////////////9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/o4x9/7ennP/39fT///////// + /////////////9TLxf+3p5z/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2Yz + AP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/ZjMA/2YzAP9mMwD/AAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAA + AAEAAAACAAAAAwAAAAMAAAAFAAAABwAAAAkBAQEMAQEBEAMDAxQFBQUYBwcHHQUFBSAGBgYkBQUFJwQE + BCsFBQUtBQUFLwUFBTEFBQUxBgYGLgYGBioFBQUkBQUFHgMDAxgEBAQSAQEBDQEBAQkAAAAGAAAABAAA + AAIAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAQAAAAAAAAABAAAAAgAAAAIAAAADAAAABAAAAAcAAAAJAgICDAICAhAEBAQVBAQEGgUF + BSAFBQUnBQUFLQUFBTQGBgY6BgYGPwUFBUQEBARIBQUFSgUFBU0GBgZPBgYGUAYGBk8GBgZMBQUFRwUF + BUAFBQU5BQUFMQYGBikGBgYhBgYGGQQEBBMBAQENAAAACQAAAAUAAAADAAAAAgAAAAEAAAABAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAAAAAAAAAQAAAAIAAAACAAAAAwAAAAUAAAAHAAAACAIC + AgwCAgIPBQUFFAQEBBkGBgYgBQUFJgUFBS4FBQU2BQUFPgUFBUYGBgZPBQUFVwUFBV0FBQVhBAQEZgQE + BGgFBQVqBQUFawUFBWwFBQVsBQUFawUFBWkFBQVlBQUFYAYGBlkFBQVSBQUFSAUFBT8GBgY0BQUFKgUF + BSAEBAQXAgICEAAAAAoAAAAGAAAABAAAAAIAAAABAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAAAAAQAAAAEAAAABAAAAAgAA + AAMAAAAEAAAABgAAAAgBAQELAgICDwMDAxMFBQUYBgYGHgUFBSUGBgYsBQUFNAUFBT0FBQVGBQUFTwUF + BVgGBgZgBQUFaQYGBm8FBQV2BgYGegUFBX4FBQV/BQUFgQUFBYEFBQWBBQUFgQUFBYAFBQWABAQEfQIC + AngCAgJ1AwMDcQMDA2wDAwNkAwMDWwQEBFIFBQVKBQUFPgUFBTEFBQUmBAQEHAICAhMBAQEMAAAACAAA + AAQAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAEAAAABAAAAAQAAAAIAAAADAAAABAAAAAYAAAAIAQEBCwICAg4DAwMTBQUFGAUFBR4GBgYkBQUFKwUF + BTMFBQU7BQUFRAYGBk4FBQVXBQUFXwUFBWgGBgZwBQUFdwYGBn0FBQWDBQUFhwUFBYsFBQWNBQUFjgUF + BY8FBQWPBQUFjwUFBY8EBASLAwMDiAQEBIkLCwuSFhYWpioqKsA3NzfeNzc34jMzM94lJSW7Dw8PhwQE + BGUFBQVeBgYGUgUFBUQFBQU2BQUFKQUFBR8DAwMVAQEBDgAAAAkAAAAFAAAAAwAAAAIAAAABAAAAAQAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAAEAAAACAAAAAgAAAAQAAAAFAAAABwAAAAoCAgINAgICEQUF + BRcFBQUcBgYGIwUFBSsFBQUyBQUFOgYGBkQFBQVNBgYGVQUFBV8FBQVnBgYGbgUFBXYGBgZ9BQUFggUF + BYcFBQWLBQUFjwUFBZEFBQWUBQUFlQUFBZYFBQWWBQUFlgUFBZYFBQWVAwMDkA0NDaEdHR3ALCws2jc3 + N/FJSUn/Tk5O/0lJSf9FRUX/QUFB/z09Pf81NTX4HBwcuAUFBXkFBQVvBQUFZQUFBVcFBQVJBQUFOwUF + BS0EBAQiAgICGAICAhABAQEKAAAABgAAAAMAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQAAAAIAAAADAAAABAAA + AAcAAAAKAQEBDQMDAxEFBQUWBQUFGwYGBiIFBQUpBgYGMQUFBTkGBgZCBQUFSwUFBVUFBQVdBQUFZgUF + BW4FBQV1BgYGfAUFBYEFBQWHBQUFiwUFBY4FBQWRBQUFkwQEBZUEBASVAgIClgAAAJQAAACSAAAAkgEB + ApUFBQWYBQUFmAQEBJQYGBjBMDAw+DY2Nv80NDT/Pz8//01NTf9ISEj/RERE/0BAQP87Ozv/ODg4/zU1 + Nf8zMzP/Hh4ezwUFBYYFBQV+BQUFdQYGBmkFBQVbBQUFTgUFBT8EBAQxBgYGJQQEBBsBAQESAAAADAAA + AAgAAAAEAAAAAgAAAAEAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAEAAAACAAAABQAAAAkAAAAOAgICFAUFBRoFBQUgBgYGKAUFBS8FBQU4BQUFQQUF + BUoGBgZTBQUFXAYGBmUFBQVtBQUFdAUFBXsFBQWABQUFhgUFBYsFBQWOBQUFkQUFBZMEBASVAwMDlQAA + AJUAAACSAAAAkwQEBZcTExCgKyghsTYxKL80Lya+GxkUqAEBApQBAQKREhISvSgoKP8oKCj/JSUl/yoq + Kv9JSUn/SkpK/0VFRf9AQED/ODg4/zIyMv8vLy//MDAw/y4uLv8sLCz/GBgYzAQEBIoFBQWJBQUFggYG + BnkFBQVuBQUFYAUFBVIFBQVDBQUFNQUFBSkFBQUeBAQEFAEBAQ4AAAAJAAAABQAAAAMAAAABAAAAAQAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAYAAAANAQEBFQMD + AyEFBQUrBQUFNQUFBT8FBQVIBgYGUQUFBVsGBgZjBQUFawYGBnMFBQV6BgYGgAUFBYUFBQWKBQUFjgUF + BZAFBQWTBAQElQICApUAAACUAAAAkQAAAJQICAiZJSQhp0NBObtkYFPPgnxq542Eb/aNg2r+i35k/4l7 + Yf96bVX6SUAx0A4NDKcXFxjzGxsb/xoaGv8XFxf/Li4u/05OTv9HR0f/QEBA/0RERP9oaGj/dXV1/1VV + Vf8uLi7/Jycn/ygoKP8lJSX/Dg4OswMDA48FBQWRBgYGjAUFBYQFBQV8BQUFcQUFBWUFBQVXBQUFSAQE + BDoFBQUtBAQEIQMDAxcDAwMQAAAACgAAAAYAAAADAAAAAgAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAEAAAAEAAAACgMDAxYFBQUlBQUFNgUFBUQFBQVSBQUFXgUFBWcFBQVxBQUFeAUF + BX8FBQWFBQUFiQUFBY0FBQWQBQUFkgQEBJQCAgKUAAAAkwAAAJEAAQGUDQwMmzAvK6tSUEfAfHlr1p2Z + h+ywq5b6uLKb/7Stlf+ooIj/m5J7/4yCav+Dd17/gXRc/35xWP9/cFT/SD8v9ggJCv8PDw//EBAQ/w4O + Dv81NTX/TExM/0RERP9GRkb/amlp/39/f//S0tP/3Nzd/5CQkP8xMTH/ICAg/yIiIv8aGhrtBgYGmgQE + BJUFBQWVBQUFkgUFBY0FBQWHBgYGfwYGBnUFBQVoBQUFWwYGBk0FBQU+BAQEMAUFBSQEBAQaAwMDEgAA + AAsAAAAHAAAABAAAAAIAAAABAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgAAAAQCAgINBgYGGwQE + BC4FBQVCBQUFVQUFBWQFBQVwBQUFegYGBoMGBgaJBQUFjgUFBZEEBASTAQECkwAAAJMAAACRAQEBlRAQ + D5w4NzKuXFpQxIOBc9mqp5Xwvrum/MfErf/Fwav/v7mk/7iznP+xq5T/qqON/6Kag/+Yj3j/i4Fp/4N3 + Xv+BdFz/fG9X/3hqUP9fU0D/GRkZ/wEBAv8AAAH/BAQD/zk5Of9ISEj/Pj4+/2JiYv9paWn/SkpK/2ho + aP/e3t//+vr6/5ubm/8kJCT/HBwc/xsbG/8NDQ3ABAQEkgUFBZgFBQWXBQUFlQUFBZMFBQWPBQUFiQUF + BYIFBQV4BQUFbQYGBl8FBQVRBQUFQwUFBTUFBQUoBAQEHQMDAxQCAgINAAAACAAAAAUAAAADAAAAAQAA + AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAACAAAABAICAgwHBwcaBQUFKwUFBT4FBQVQBgYGYAYGBm4FBQV5BAQEgQEB + AoYAAACJAAAAigAAAZAQEA6bNTQurGFfVMSMiXrapKGO8qShjv3Bvqn/zMmz/8XCrP/Bvqj/vbqk/7u3 + ov+5tJ//tbCa/7CqlP+qo43/o5uE/5mRev+Ng2v/hXpg/4N2Xv99cVj/c2VM/4ByXP+dj4T/bWRd/xkY + GP8FBQb/Pj4+/0ZGRv8+Pj7/cXFx/3x8fP92dnb/X19f/4SEhP/5+fn/7u7u/2JiYv8VFRX/GBgY/xER + EeUFBQWXBQUFmAUFBZkFBQWYBQUFmAUFBZYFBQWUBQUFkAUFBYsGBgaEBQUFfAUFBXAGBgZkBgYGVQUF + BUcEBAQ5BQUFLAUFBSADAwMWAQEBDwAAAAoAAAAGAAAAAwAAAAIAAAABAAAAAQAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAAADAAAACAIC + AhEEBAQeBAQELAICAjoAAAFFAAAATgAAAFcEBARnFRUTgDs6NJ1jYle9iYd416imkvCoppL+paKS/5WT + iP+cm5X/qKem/6yqm//DwKr/wL2o/7+8pv+9uqT/u7ei/7q1oP+4s53/tK+Z/6+okv+hmYL/kYhw/35y + Wf9wYkf/cmRF/3RmS/9yZEr/gXJc/6majP+xoZP/dm1m/xMTFP85OTn/Q0ND/z09Pf98fHz/k5OU/5CQ + kf+Li4r/ampq/7e3t//j4+P/oKCg/yAgIP8TExP/EhIS/AcHB6gFBQWWBQUFmQUFBZkFBQWZBQUFmAUF + BZgFBQWXBQUFlAUFBZIFBQWNBQUFhwYGBn4GBgZ0BQUFaAUFBVkFBQVLBQUFPAUFBS8FBQUjAwMDGQEB + AREAAAALAAAABwAAAAQAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAIAAAADAAAABAAAAAYAAAAKDAsLFxwcGThDQjtjcG5im5KQ + f8ixrprrsK2Z/q2rmf+fnZH/n56X/7KysP/Ozs7/8PDx//7+////////ubep/8G+p//Cv6r/w8Cq/8PA + qv/AvKf/tbCa/6agif+OhW3/fG9X/3NjTf9lUz7/a15N/2xmZP9NSFL/V0xB/1tONv93aVP/p5iL/6aX + iv+fkYX/NzY1/zg5Of9AQED/ODg4/4SEhP+DhIX/goKD/6Wlpv98fHz/gYGB/76+vv+srKz/Ojo6/w4O + Dv8SEhL/CQkJvgQEBJMFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZgFBQWYBQUFlwUFBZYFBQWSBQUFjwYG + BokGBgaBBgYGdwYGBmsGBgZeBQUFTwQEBEEEBAQzBAQEJgMDAxwBAQETAAAADQAAAAcAAAAFAAAAAwAA + AAEAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAgIBwNNjUvMXt5bHCem4qxwL2o3r+8pv+0sZ//p6aZ/6emn/+5ubb/zc3N/+7u7//8/P3///////// + ///////////////////Bv7H/x8Wt/7+7pf+wqpT/l494/4F4Y/90aVX/bGFQ/3Vyaf93f33/fpmf/3y0 + xv9twtP/R37e/woW6v8qNK7/e3Jj/31yY/+mlon/pJWI/6qajf9jXln/PT0+/0JCQv8yMjL/dHR0/4KD + hP9ZWlz/iYmK/4KCgv9ubm7/mpqa/5iYmP9KSkr/DAwM/w8PD/8JCQnNBAQEkgUFBZkFBQWZBQUFmQUF + BZkFBQWZBQUFmQUFBZkFBQWZBQUFmAUFBZcFBQWWBQUFlAUFBZAGBgaLBgYGgwUFBXoFBQVvBQUFYgUF + BVMFBQVFBAQENwQEBCkEBAQfAgICFQAAAA8AAAAJAAAABQAAAAMAAAACAAAAAQAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAzcmzCsjFryuWk4Nlioh5pMXCrdPGw67+zsu0/8nFsP/DwKn/xsS3/9DQ + 0P/v7/D//f3+/////////////////////////////////////f/t7Ob/0MzA/5mSff94b1r/YllH/0pB + NP8/OjL/nJSO/5uUjv+ls7n/xuXt/5Pp//9m4///eOr//03l//9opfj/U0zw/zg/vP+Ce3H/jYV7/6WW + iP+klYj/qJiL/4l/dv9DQ0P/SEhI/zExMf9NTU3/lZWV/1tcXf9paWr/eHh4/2FhYf97e3v/gICA/0hI + SP8LCwv/DQ0N/wgICNYFBQWUBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUF + BZgFBQWYBQUFlgUFBZQFBQWRBQUFjAUFBYYFBQV9BQUFcgUFBWUFBQVXBAQESQUFBTsEBAQuAwMDIgMD + AxgBAQEQAAAACwAAAAYAAAAEAAAAAgAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAMK/qpnCv6rSwr+q/crH + sf/MyLL/w8Cr/8PAq//Cv6r/wr+q/767o//f3tL///////////////////////////////3/7Ovk/83K + vv+mn4//e3Ri/1lRQP9COy7/OjUu/zc1Mv81NTX/NTU2/zM0Nf+wqqf/r6af/7TDyf/Z+///oOz//1Xg + //9j4///gOz//6G89P9GPuT/NDi1/4F7cP+Gfnb/oJKG/6WWiP+lloj/opSH/01LSf9KS0v/Nzc3/y0t + Lf93d3f/h4eH/3Jycv9hYWH/U1NT/2FhYf9ubm7/Pj4+/wkJCf8KCgr/BgYG2QUFBZQFBQWYBQUFmQUF + BZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWYBQUFmAUFBZcFBQWVBQUFkgUF + BY4FBQWIBQUFgAUFBXUFBQVqBQUFXAUFBU4EBAQ/BAQEMgQEBCUDAwMbAQEBEgAAAAwAAAAIAAAABQAA + AAIAAAABAAAAAAAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAwr+q+8K/qv/Cv6r/wr+q/8K/qv/Cv6r/wr+q/8K/qv/Cv6r/v7yl/+Lh + 1v/////////+/+zr5P/NyL3/o5yN/3dvXv9WTj7/PTcr/zEtJv8uLCr/LS0t/y0uL/8tLi//MDEy/0A/ + P/9PTU3/ZGNi/7Wuqv+6sKj/wb26/8Xd5f/E6vT/uOXx/7/i6//j5+b/x8DL/2tli/9oZYT/gntz/4F7 + dP+ZjYL/ppaJ/6WWif+uoJP/dG1n/z09Pv9GRkb/KCgo/zo6Ov97e3v/YGBg/0lJSf9JSUn/UVFR/2xs + bP8fHx//CAgI/wgICP8FBQXUBQUFkQUFBZQFBQWXBAQEmQAAAZYAAAGVAgIDlwUFBZkFBQWZBQUFmQUF + BZkFBQWZBQUFmQUFBZkFBQWZBQUFmAUFBZgFBQWXBQUFlQUFBZMFBQWPBQUFiQUFBYIGBgZ5BQUFbQUF + BWAFBQVSBQUFRAQEBDUEBAQpBAQEHgICAhUAAAAOAAAACQAAAAUAAAADAAAAAQAAAAEAAAABAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADCv6rvwr+q/8K/ + qv/Cv6r/wr+q/8PAq//GxK//yMWw/8jFsP++uqP/ubSj/6agkf93cF//Uks7/zYxJv8rJyH/JyYj/yUl + Jv8mJyj/KCkq/y8vMP9DQ0P/VlZW/29ubv9/fn7/hYSD/358e/9qamn/rqei/7atpP/Tzsr/2tTR/9rT + 0P/e1NH/3dXS/97Y1v/LxsD/hX5w/4R9cP+BenT/gHpz/4+FfP+nmIv/qZuQ/7Cil/+lmpH/Ozs6/0tL + TP80NDT/ICAg/zk5Of9oaGj/ZGRk/19fX/9sbGz/PDw8/wkJCf8JCQn/BQUF/wEBAfkBAQHhAwMDuwAA + AZ0EBQWXHx0ZqCQiHa0TEhCgAQEClQAAAJUEBASYBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUF + BZgFBQWYBQUFlwUFBZcFBQWUBQUFkAYGBosGBgaFBQUFfAYGBnEFBQVkBQUFVgUFBUgEBAQ6BAQELAMD + AyEDAwMXAQEBEAAAAAoAAAAGAAAAAwAAAAIAAAABAAAAAQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAMK/qu/DwKv/xsSv/8jFsP/Fwqz/vbmj/66okv+UjXf/b2dV/1BJ + O/80LyX/JCEb/x8eHP8dHR7/HyAi/yQlJv8xMDD/RURD/1pYV/9ycG//gX9+/4B/f/91dHT/YGBg/1BP + T/9BQUH/OTo6/zY3N/+gmZX/tayj/9HMx//a1dL/2dTS/9nV0v/a1dP/3tnY/8rFwv+AenT/f3hy/4F6 + dP+AenT/hX12/6aZjv+uoZb/sqab/72xp/90b2r/Kyss/05OTv8nJyf/Ghoa/yMjI/86Ojr/Pj4+/ycn + J/8LCwv/CwsL/wcHB/8DAwP/AAAA/wAAAP8AAAD/FhUS73BpWOaLgWn5hnph/XNoUfJVTT3WLSslsQgI + CJgAAACUAgIDmAUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZgFBQWXBQUFlQUF + BZIGBgaNBQUFhwUFBX4FBQV0BQUFZwUFBVoFBQVMBAQEPQUFBTAEBAQkBAQEGQEBAREAAAALAAAABwAA + AAQAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAxsOv8MG9 + pv+qo4v/kIVu/39zXv9rYlP/UUpB/x4cF/8ZGBf/FRYX/xobHP8iIiL/MzIx/0dFQ/9eW1j/cW5r/3h1 + dP9ycG//ZWRj/1FQUP9CQkL/NTU1/zExMf8vLy//MjIy/zg4OP9HRkb/V1ZV/6efmv+xp57/0MrH/9nU + 0P/Z09D/2dTR/9rV0v/e2df/ycTB/4B6dP9+eHL/gHp0/4B3av+AeXH/nJKJ/7Sonv+1q6L/vLKp/7qx + qv9BPz3/Li4v/0lJSf8hISH/FhYW/xEREf8ODg7/DQ0N/w0NDf8JCQn/BAQE/wEBAf8AAAD/AAAA/wkJ + B/97dGD/lIhu/35yWP90ZUv/cWJI/3RlSf+FeWD/bWVS5j88M7wODw2cAAAAkwEBApcFBQWZBQUFmQUF + BZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWYBQUFlwUFBZYFBQWTBQUFjgUFBYkFBQWBBQUFdwUF + BWwFBQVeBQUFUAUFBUEEBAQ0BAQEJgQEBBwCAgITAQEBDQAAAAgAAAAEAAAAAgAAAAEAAAABAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB6b1nzV01C/1xfXf9ngIH/X5us/23F4f9Sg5b/HRgW/zYz + Mf9JRkP/X1tX/25pZf9uamf/ZWNg/1VUUv9CQkH/NTU1/ywsLf8qKir/Kikp/zAwMP85OTn/Tk1N/2Ri + Yv93d3b/hYSD/4SDgv96eHj/qaGa/66kmv/Qysb/2dPQ/9jSz//Z09D/2tTR/93Y1f/JxMH/gHl0/354 + cv+AenX/fnRi/393af+Jgnz/s6if/7uxqf++ta7/yL+4/7KqpP8vLy3/JCUl/0BAQP8lJSX/ExMT/xAQ + EP8ODg7/CwsL/wcHB/8CAgL/AAAA/wAAAP8AAAD/Ojct/5SIb/97bVX/bmBG/25gRv90Zkz/dmlQ/3hq + UP9uYkj/fnRc/4Z+au9NST3GGRgVoQAAAJMAAAGWBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUF + BZkFBQWZBQUFmAUFBZcFBQWWBQUFlAUFBZAFBQWLBQUFgwUFBXoGBgZvBQUFYgYGBlQFBQVFBQUFNwUF + BSoFBQUfAgICFgICAg4AAAAJAAAABQAAAAMAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEw8 + G40rKWT/erT2/4L1//9n6f//j/D//6i7wP9hWFH/Yl1Z/1dUUf9EQkH/NDQz/ykpKv8kJSX/IyQk/yYm + Jv8tLS3/Ozo5/09OTf9lY2L/fHt6/4WDg/+Af3//c3Ny/15eXv9QUFD/RERE/z4+P/+akYv/rqSZ/9DK + xv/Y09D/19LP/9jT0P/Y09H/3dfV/8nDwP+AenT/f3hy/4F6df9/dmb/gHZk/4B4b/+elY7/wbix/8O6 + tP/Iv7r/1MvF/7q0r/9SUE7/JSUk/ycoKP8iIiP/GRkZ/xEREf8JCQn/BAQE/wAAAP8AAAD/AAAA/wAA + AP9OSTv/i31j/3BhR/9wYkf/e25U/4J3X/+IfWT/gnZd/2laQf9PRDL/g3Ze/4J2W/96cVv0XllNzh0d + GaYAAQGUAAABlgUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZgFBQWXBQUFlgUF + BZQFBQWRBQUFjAUFBYUEBAR6AQEBbAEBAV0BAQFPAwMDRQUFBToFBQUtBQUFIgQEBBgBAQEQAAAACgAA + AAYAAAAEAAAAAgAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAZFxEFD07kPZ+vP//eOz//4Lk+//L5ev/p5+a/yEg + IP8fHyD/HB0e/x0dHv8jIiP/LCsr/z08Ov9SUE3/aWZk/3l2c/96eHb/c3Fw/2VkY/9QT0//RERE/zg4 + OP81NTX/NDU1/zk5Of9AQED/U1JR/6Wdlv+topj/0MnF/9fSzv/X0c7/19LP/9jT0P/c19T/yMPA/4F7 + dP+AeXL/gXp1/392aP+BeW//gHZm/4R9dv+yqqP/zcO+/8zEv//Qy8b/2tTR/9zX1P+0sK7/cW9t/z07 + Ov8aGhr/BQYG/wAAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/0tFNv+Bc1j/bl9E/3lsUv+Ge2L/koly/5qR + ev+UinL/e25V/0Y7Kv9vYUr/a11D/1lOOP+Sh27/hXtj+VlTQ9YiIB2nAAAAlQUFBZkFBQWZBQUFmQUF + BZkFBQWZBQUFmQUFBZkFBQWZBQUFmQUFBZgEBASYBAQElgICApICAgKPBQUFkhAQEJofHx+vIiIitR8f + H6oRERF/BAQEVgQEBEsFBQU/BQUFMQQEBCUFBQUaAgICEgAAAAwAAAAHAAAABAAAAAIAAAABAAAAAQAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAB0c24UeXaY9a7D3P/N2Nb/zs3J/97Syf+emZL/FRUV/yopJ/9APTr/VVFO/2lkYf9ybWr/b2xp/2Vi + Yf9UU1L/QkJC/zc3N/8vMDD/LS4u/zExMf85ODj/R0ZG/19dXf9vbm7/gH5+/4eFhf+DgYD/sqmj/6+l + m//OyMT/19HO/9fQzf/X0c7/2NLP/9vX0//Iw7//g3t1/4B6c/+Ce3X/gHZo/4N8df+CeGz/gHZn/42E + fv/Fvrn/2tTQ/9XQzf/Y1NL/3dnY/+He3f/j3tv/0cvH/6+ppP+HgX3/YV1a/w0MDP8AAAD/AAAA/wAA + AP8AAAD/Lioh/3prUP9wYkn/f3Na/5CGbv+hmoP/rqiS/6ihi/+Jf2n/YVZE/4N3X/9zZkv/Sz8t/29i + TP93aU7/a19H/4mAa/YuKySxAAAAkwQEBJkFBQWZBQUFmQUFBZkFBQWZBQUFmQQEBJcCAgKVAgICkwYG + BpgMDAyhFxcXtiMjI80yMjLmRkZG+UxMTP9ISEj/QkJC/zk5OfojIyPBCAgIcQQEBFwGBgZRBAQEQwUF + BTUFBQUoBAQEHQMDAxQBAQENAAAACQAAAAUAAAACAAAAAQAAAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAG1rahaqo5n12czB/9PIwP/SycH/1c7H/7Ot + pv9sZmH/cmxo/2FcWf9UUU//QkFA/zU1Nf8sLC3/Jygo/ygoKP8wMDD/Ojk5/09OTf9lY2L/eXd2/4SD + gv+Hhob/fXx8/21tbf9ZWVn/S0tL/z4+P/+poZz/tqyi/87Iw//W0c3/1tDN/9bRzv/X0c//3NXT/8jC + v/+DfHX/gnpz/4N8dv+Ad2j/g3x0/4V9d/+CeWv/f3Vn/46Gf//Iw7//5+Tj/+Ti4f/i4OD/39zc/9rX + 1f/X0tD/1c/J/9fNx//FvLb/GxoY/wAAAP8AAAD/AAAA/wAAAP8HAQD/W043/3lqTv+Cdl3/lItz/6ii + jP+7t6L/wLym/4uBbf+KgG7/npV+/4qBaP9XTDn/dmpU/3BhRv9NQCv/cmZQ/3RoU+8cGhemAAAAlAAA + AJQDAwOYBQUFmQUFBZgEBASUCAgInRUVFbIkJCTMODg45DQ0NPgyMjL/MzMz/0NDQ/9NTU3/RUVF/z4+ + Pv85OTn/NjY2/zQ0NP8jIyPaCAgIgAUFBW4FBQVkBgYGVgUFBUcFBQU5BQUFLAQEBCECAgIXAQEBDwEB + AQoAAAAGAAAAAwAAAAIAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAbmxrFqSdmPXTysP/0MrC/9HJwv/Uzcb/t7Ks/21sbP9nZ2f/S0xM/zAwMf8lJSX/LS0s/z48 + O/9WU1H/aGVj/3h2c/99enj/d3Z0/2xra/9ZWVj/SEhI/zw8PP81NTX/ODg5/0FAQf9PTk7/YmFh/7u0 + sP+4r6b/zcbC/9bQzP/W0Mz/1tHN/9fRzv/b1dL/yMK//4R9dv+Ce3T/g3x2/4F3aP+EfXX/hX52/4Z+ + d/+Eemz/gHVl/4Z+dP+vqaT/3NrY/+3t7f/v7e7/6Obl/9/c2//Z09D/zsbB/7auqP8aFBD/AAMF/wAO + F/8AJ0H/AD9r/wAcOP8OEBD/WEct/4NyU/+ViW7/oJiB/6Sdh/+Ph3H/jYJw/7y4pP+3spz/mJB6/29j + UP+TinP/hXlf/1FFMf9mWkX/dGVK/4t8bfltZFvYMCwosQUGBZgAAACSAgIClhsbG8UxMTHxNjY2/0ND + Q/8zMzP/ISEh/yAgIP8oKCj/SkpK/0hISP8/Pz//Q0ND/z4+Pv8xMTH/Kioq/ywsLP8bGxvYBQUFhAUF + BX4GBgZ0BQUFaAUFBVoFBQVMBQUFPgUFBTAFBQUkBgYGGgMDAxIBAQELAAAABwAAAAQAAAACAAAAAQAA + AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABubmsWo52Y9dLJwv/QycH/0cnC/9XO + xv+wq6X/Xl1d/25sa/+Cf33/i4iF/4SBfv+EgH3/d3Nw/2JgX/9XVVT/RUVE/zk6Ov8wMTH/Ly8v/zo6 + Ov9HRkb/X11e/3Jxcf+Bf3//iYeH/4ODgv92dHT/wby5/7y0q//NxsH/19DM/9bPy//W0Mz/1tHN/9rV + 0f/Iwr7/hX53/4N8df+FfXf/gXho/4V+df+Gfnf/h393/4iAeP+GfXL/gndn/350ZP+If3P/oZqS/7Ot + pv+8trH/urWw/62moP+imJD/k4d9/xdhkv8Ac8P/AI7v/wCZ//8Amv//AG3X/wBXr/8BO3L/KDlF/1tQ + Pv9vXD7/aFg+/3JlUP+gmIP/tbCZ/7KumP+GfGj/pZ2K/6ymj/+ZkXn/ZFlG/4N3Yv94a1H/jn9v/6uc + jv+omIv/g3dt5kU/ObocGxrJICAh/yIiI/8rKyv/PDw8/xQUFP8TExP/EBAQ/ysrK/9NTU3/QUFB/1NT + U/+BgYH/urq7/5aWl/89PT3/ISEh/yIiIv8PDw+5BAQEigUFBYkEBAR+AgICcwEBAWUBAQFXAgICSgMD + Az8FBQU0BQUFKAUFBRwDAwMUAAAADQAAAAgAAAAFAAAAAwAAAAIAAAABAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAG9uaxajnJf10cfB/9DIwf/QycH/08zE/722r/+NiYX/lJCN/4+Miv+GhIP/fn59/3R0 + dP9jZGT/T09Q/0JDQ/8+Pj3/TkxM/2JgX/92dHL/g4GA/4KCgf97enr/bm1t/1lZWf9KSkr/RERE/0FC + Qv+8uLb/wbqy/8zGwP/V0Mv/1c/L/9bQzP/X0M3/2tTR/8jCvv+Gfnf/hH11/4V+d/+CeGj/hn52/4d/ + d/+Hf3f/iH94/4mAef+JgXn/iH50/4V7bP+Bd2f/f3Rl/4F2Zv+Cd2f/gnZl/4Z6af+NgXf/F4fP/wCS + 9v8Amv//AJn//wCU/f8Abtf/AG/a/wBy4P8AadL/AFao/xVFb/88R0v/bmFI/4d0Vf97blT/bWJN/5SL + d/++u6X/wb2o/5OKdf+LgW7/o5uE/5CGb/+ThHX/pJWI/6WWif+rm43/rJyO/5SHfP9iWlT/KScl/ykq + K/8kJSX/AgIC/wUFBf8CAgL/LCws/0lJSf9ISEj/cnJy/1RUVf+FhYb/8vP0/7u7u/80NDT/Gxsb/xcX + F+4EBASVBAQEjwsLC5gaGhqpKioqwSoqKsUfHx+jCwsLbwMDA04FBQVGBQUFOQQEBCsEBAQgAwMDFgEB + AQ4AAAAJAAAABQAAAAIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAb25rFqKclvXRx8D/0MjA/9DI + wf/UzcX/ta+p/2RkZP9iYmP/X2Bg/2NjY/9vbm3/eXh3/4yJiP+cmpf/op+d/5+dnP+cmpr/iYiH/3Rz + c/9dXV3/VFRU/05PT/9TU1P/X15e/3BwcP9/fn//lJKS/9jV0//BurL/y8S//9XPy//Vz8v/1dDL/9bQ + zP/Z1ND/y8TB/4iAef+FfXb/hn54/4J4af+Hf3b/iH94/4iAeP+JgHj/iYB4/4qBef+Lgnr/jIN7/4yD + e/+Ng3r/jYN5/42Def+OhHr/h3xr/4+CeP8XebX/AIfi/wCX/v8AmP//AJT8/wBv1/8AbdX/AG7W/wBw + 2f8AdOH/AHPi/wBs0/8FWaP/I1B0/0VKSP90ZUz/mIhp/5mNc/+DemX/iX9s/8G9qP+8uKH/m5F//5uM + fv+llon/pJWI/6SViP+klYj/qJmL/6ycjv+cjYH/gndv/z47OP8HCAf/CgoK/wgICP8tLS3/Q0ND/1RU + VP+EhIT/e3t7/2FhYf+tra3//v7+/4aGhv8XFxf/FRUV/xwcHNgsLCzdPj4+9ExMTP9JSUn/RERE/z4+ + Pv8yMjLuFhYWngQEBGEFBQVZBQUFSgUFBTwFBQUuBAQEIQEBARYAAAAOAAAABwAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABvb2wWopyW9dHHv//PyMD/z8jA/9TNxf+xrKb/ZmRj/316eP+Kh4T/lJCO/5uX + lf+YlZP/j42M/4iHh/99fX3/dnd3/3N0dP90dHT/d3h3/4GBgf+Lior/m5ub/6inp/+wr6//s7Ky/6ur + qv+gn5//29rY/9DKw//Lxb//1c/L/9XPy//Wz8v/1tDM/9jTz//RzMj/i4N7/4Z+dv+Hf3j/gnhp/4h/ + d/+IgHj/iYB4/4mBef+KgXn/ioF5/4uCev+Mg3r/jYN7/42Ee/+OhHv/j4V8/5CGfP+IfWz/j4N4/xd3 + rv8Ahd3/AJf+/wCY//8AlPz/AHDY/wBu1v8AcNj/AHDY/wBx2f8Actr/AHTd/wB55v8AduT/AGzO/wla + n/8nTmn/QEI9/2hZQf+Yi3D/n5eA/1ZUSv94bWP/q5uO/6SViP+klYj/pJWI/6SViP+klYj/pJWI/6aX + iv+vnpD/mIuA/yQkI/8bGxr/Gxsb/zQ0NP8+Pj7/WVlY/5SUlP+Ojo//kpGS/3Z2dv/IyMj/srKy/y0t + Lf8ODg7/Hx8f/zU1Nf9JSUn/SUlJ/0FBQf85OTn/NDQ0/zMzM/8vLy//FBQUrgQEBHAFBQVpBQUFWgUF + BUoFBQU5BAQEKQICAhoAAAAPAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHBvbBaim5b10Ma//8/I + wP/PyMD/0svD/7y2r/+JhYL/h4SC/358e/90c3P/ampr/2hoaP9mZ2f/a2tr/3Z1df+BgID/kI+O/6Cd + nP+opqX/qqqo/6inpv+cnJz/k5OT/4iHiP+FhYX/kJCQ/5+fn//m5eT/2NPO/8vEv//Vz8v/1c/K/9bP + y//W0Mz/2dLP/9HLx/+MhHz/h393/4iAef+DeWn/iYB3/4mAeP+JgXn/ioF5/4qCef+Lgnr/jIJ6/4yD + ev+NhHv/joR7/4+FfP+QhXz/kIZ9/4l9bP+Qg3j/F3as/wCE3P8Alv7/AJj//wCU/P8Acdn/AG/X/wBx + 2f8Actr/AHLa/wBz2/8AdNz/AHbe/wB33/8AeuP/AH3r/wB66P8Abcz/BVWW/xk7Vf8YHiH/IRYL/4Bt + XP+kk4T/pZaK/6aXiv+llon/pJWI/6SViP+klYj/pJWI/6majf+ajoP/ODc3/y4uL/8vLy//PT09/z4+ + Pv9NTU3/hoaH/2hqa/+UlZb/dnZ2/5GRkf+pqan/RUVF/wsLC/8PDw//MzMz/0xMTP9CQkL/RUVE/1tb + W/9NTU3/Li4u/ykpKf8mJib9DQ0NoQQEBHYFBQVvBQUFXwUFBU0FBQU4BQUFJgICAhYAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAcG9sFqGblfXQxb7/z8fA/8/IwP/UzcT/sKqk/1ZXWP9cXFz/X19f/2pp + aP93dXT/hYOB/5SRj/+dmpj/oJ6c/5+dnP+Tk5P/jIyM/4OEhP+AgID/iYiH/5WTkv+op6X/wb+9/9nX + 1f/s6+r///7+///////Z1dD/y8O9/9XPy//Vzsr/1c/L/9bQy//Z087/0cvH/4yEfP+If3f/iYB5/4N5 + av+JgHj/ioF5/4qBef+Lgnn/i4J6/4yDev+Mg3r/jYN7/46Ee/+PhXz/j4V8/5CGfP+Rhn3/iX1s/46D + ev8Wdq3/AITb/wCW/v8AmP//AJT8/wBz2/8Acdn/AHLa/wBz2/8AdNz/AHTc/wB13f8Adt7/AHjg/wB5 + 4f8AeuL/AHvj/wCA6v8Ag/H/AH7q/wVzzf85fbD/XnSC/3tvYv+Od2L/nIh1/6SUhv+nmIv/pZaJ/6SV + iP+klYj/qZuO/5yQhv9DQkH/OTo6/zo6Ov9DQ0P/RERE/zU1Nf+EhIT/ZWVm/25vb/9ubm7/c3Nz/4iI + iP9JSUn/CgoK/woKCv86Ojr/SEhI/0hISP9qamr/lpaX/9DQ0f+Ki4v/LS0t/yAgIP8aGhrlBQUFfAUF + BW4GBgZgBQUFTwUFBTsFBQUoAwMDGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABwb2wWoZqV9c/F + vf/PyL//z8i//9PLw/+1rqj/dHFv/4iDgP+RjYr/lJGN/5OQjf+HhoT/fn5+/3l5ef90dHX/e3p5/4WD + gP+VkY7/qqSf/721sP/Mxr//29XQ/+Te2v/q5eL/8Ozo//Lw7v/39vX//////+Dd2f/Kw7z/1c/K/9XO + yv/Vz8r/1tDM/9jSz//Ry8f/jYV9/4mAeP+KgXr/hHlq/4qBeP+Lgnn/i4J6/4yCev+Mg3r/jYN6/42D + e/+OhHv/joV8/4+FfP+Qhnz/kYZ9/5GHff+LfWz/h4R//xB2sf8Ag9r/AJb+/wCY//8AlPz/AHTc/wBy + 2v8Ac9v/AHTc/wB13f8Adt7/AHbe/wB33/8AeOD/AHri/wB74/8AfOT/AH3l/wB/5/8AgOn/AITv/wCE + 8/8AhO//FoDS/zl4pv9fb3b/f3Bf/5V+av+ijn3/p5eK/6eYi/+rnJD/mo+E/zo5Of8yMjP/NDQ0/zY2 + Nv9LS0v/Ly8v/1VVVf+Kior/ampq/1ZWVv9YWFj/cXFx/zo6Ov8GBgb/BgYG/zs7O/9CQkL/YmJi/29v + b/9TU1P/pKSl//7+/v+Hh4f/HBwc/xoaGv8MDAyWBAQEVAYGBk4FBQU+BQUFLgUFBR8BAQESAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAHFvbhagmpT1z8S8/8/Hv//PyMH/1MvD/7u1rv93dHP/b25t/2tr + av9naGj/c3Jy/4GAfv+RjYr/oZuW/6yjnP+vpZv/tamg/72yqP/CuLD/yr+3/87Gvv/TzMX/2tTQ/+Ld + 2f/l4d7/6OXi/+jl4v/g3dr/x8K7/83GwP/Vzsr/1c7K/9XPyv/W0Mv/2NLO/9HLx/+Ohn3/ioF4/4uC + ev+Eemr/i4J5/4yCev+Mg3r/jIN6/42De/+NhHv/joR7/46Ee/+PhXz/kIZ8/5CGff+Rh33/kod+/4t9 + bP+IhH//EHaw/wCD2v8Alv7/AJj//wCU/P8Adt7/AHPb/wB13f8Add3/AHbe/wB33/8AeOD/AHnh/wB5 + 4f8Ae+P/AHzk/wB95f8Afub/AH/n/wCB6f8Agur/AIPr/wCE7f8Ah/P/AIn3/wKI7v8YgdD/PXWc/2Vu + cf+GdGT/nYZy/6+cjP+ZjoT/LCws/ysrK/8sLCz/KSkp/0BAQP9CQkL/JiYm/2BgYP9qamr/UVFR/1pa + Wv9oaGj/FxcX/wcHB/8GBgb/Ozs7/0BAQP9ycnL/jo6O/4ODhP9tbW3/0dHR/9TU1P9AQED/ERER/xAQ + EMMEBAQ1BQUFMQUFBSYFBQUbAQEBEgAAAAoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcnBtFqGa + lfXQxb7/0cnC/9HLw//Wzsf/uLKs/3t6ev+WlZP/r6yq/8O/u//MxsH/0cnD/9DFvv/Iv7b/wbiv/7uw + p/+1qaD/tKmf/7qwp/++taz/wrix/8e+tv/Du7P/v7ev/762rv+5sqj/ubKo/8G4sP/Hv7j/1M3I/9TO + yf/Vzsn/1c/L/9bQy//Z087/0svH/4+Gfv+LgXn/jIN7/4V6av+Mgnn/jIN6/42De/+NhHv/jYR7/46E + e/+OhXz/j4V8/5CGfP+Qhn3/kYd9/5KHff+SiH7/i35s/4iFgP8QdrD/AIPa/wCW/v8AmP//AJX9/wB3 + 3/8Add3/AHbe/wB33/8Ad9//AHjg/wB54f8AeuL/AHvj/wB85P8AfeX/AH7m/wB/5/8AgOj/AIHp/wCD + 6/8AhOz/AIXt/wCG7v8AiPD/AInz/wCM+f8Ajv3/BIvv/xuAyf9Dc5L/cXd2/4V2aP85MSz/IR4c/yMi + Iv8iIiL/JCQk/0pKSv8wMDD/Hx8f/0ZGRv9dXV3/WFhY/yUlJf8ICAj/BAQE/w4ODv8/Pz//Ozs7/3R0 + dP+EhIb/lJSW/4aGhv+MjIz/wsLC/2pqav8PDw//EBAQ4QYGBiwDAwMUAgICEQEBAQwAAAAHAAAABAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABxcG0XopyX9tLJwf/TzMb/083I/9LMxv/a1ND/8O3s//Lu + 6//r5+P/5N/b/97Z1P/X0cv/08vE/8/Gv//Ivrf/vLOr/7Wqof+rn5X/pZmO/6yil/+vppv/s6qg/722 + rP/CurH/ycG4/9HKw//TzcX/1M7H/9XPyf/Uzcj/1M7J/9XOyv/Vz8r/1tDL/9jSzv/Sy8f/j4d+/4uC + ef+NhHv/hXtr/42Cev+NhHv/joR7/46Ee/+OhHv/j4V8/4+FfP+QhXz/kYZ9/5GHff+Sh33/koh+/5OI + fv+Lfmz/iIWA/xB2sP8Ag9r/AJb+/wCY//8Alf3/AHjg/wB33/8Ad9//AHjg/wB44P8AeeH/AHri/wB7 + 4/8AfOT/AH3l/wB+5v8Afub/AIDo/wCB6f8Agur/AIPr/wCF7f8Ahu7/AIfv/wCI8P8AivL/AIvz/wCN + 9f8Ajvj/AJH//wCT//8Gje3/GHq9/zBjh/8cJi7/GhMP/xoTDv8YFhT/JSUk/0hJSf8oKCj/EhIS/xAQ + EP8MDAz/CgoK/wgICP8CAgL/Kioq/0hISP84ODj/YGBg/3t8ff9lZmf/hISF/3Fxcf+Wlpb/eHh4/xAQ + EP8NDQ31AwMDMgAAAAIAAAAGAAAABAAAAAMAAAABAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHJy + bxOhm5bt1MvE/9XPyv/Vz8v/083I/+Db1//5+Pb/8u/t/+/s6v/q5+P/39rW/9XQyv/Jwrv/ubGn/7Sr + ov+zqZ//s6qg/721q//EvbP/ycK5/9DJwf/Sy8P/0svD/9PMxP/SzMT/0cvD/9HKw//Sy8T/08zG/9PM + xv/SzMf/08zH/9TNyP/Vz8r/2dPO/9HLx/+Qh3//jIN6/46EfP+MgHD/kod+/46Ee/+OhHv/j4V8/4+F + fP+QhXz/kIZ8/5CGff+Rh33/kod9/5KIfv+TiH7/lIl//4x+bP+JhoD/EHaw/wCD2v8Alv7/AJj//wCV + /f8AeuH/AHjg/wB54f8AeeH/AHri/wB64v8Ae+P/AHzk/wB95f8Afub/AH7m/wB/5/8Agen/AILq/wCD + 6/8AhOz/AIbu/wCH7/8AiPD/AInx/wCK8v8AjPT/AI31/wCO9v8AkPj/AJH5/wCU/v8Al///AJn//wOL + 6P8IZaL/DjpW/xIXG/8QCAP/IRoW/z49PP8qKir/FhYW/w8PD/8JCQn/AgIC/xcXF/85OTn/RERE/0FB + Qf88PDz/iYmJ/2xtbv9tbm7/W1tb/3Fxcf9paWn/Dw8P/woKCvkBAQEvAAAAAAAAAAIAAAABAAAAAQAA + AAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAdnVyDJ6aldvVzcX/19HN/9fSzf/V0Mv/4t3a//b0 + 8//p5uL/0c3H/8XAuP+/uLD/urKp/7+3sP/IwLr/zca//9TOyP/X0cz/1s/J/9TNx//Sy8T/z8nB/8/H + vv/Oxr7/zsa+/8/Hv//RycH/08zE/9XOyP/X0cz/3djU/+Ld2v/k4N3/5ODd/+Hc2f/d19T/0szH/5GH + f/+Qhnz/hHtz/0tEO/9za2T/koh//4+FfP+QhXz/kIZ8/5CGff+Rhn3/kod9/5KHfv+SiH7/k4h+/5SJ + f/+UiX//jH5s/4qGgf8QdrD/AIPa/wCW/v8AmP//AJX9/wB74/8AeuL/AHri/wB74/8Ae+P/AHzk/wB9 + 5f8AfeX/AH7m/wB/5/8AgOj/AIHp/wCC6v8Ag+v/AITs/wCF7f8Ahu7/AIjw/wCJ8f8AivL/AIvz/wCM + 9f8Ajvb/AI/3/wCQ+P8Akvr/AJP7/wCV/f8Alv//AJr//wCg//8CnP//BYfe/whbkv8IK0H/DxAR/yIZ + E/8iHBj/FxYV/xISEv8ZGRn/Ly8v/zAwMP8zMzP/TExM/ysrK/9WVlb/fn5+/1RUVP9JSUn/ZmZm/0lJ + Sf8ICAj/BwcH+AEBASwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAB1dHEMn5uW3NbPyP/Z1M//2dTQ/9nU0P/c2NP/y8W+/8S8tf/MxL7/z8nC/9bPyv/b1dH/29TQ/9rT + z//Z0s3/1tDL/9TOyf/SzMf/0szG/9TNx//Vz8j/2dPN/9/a1f/k4dz/6+jl//Lv7f/39fT/+ff3//f3 + 9v/x7+3/6ufl/+Pf3P/d2NP/2tTQ/9nTzv/TzMj/lImB/4+Fe/+OhXz/b2ZZ/0VAO/+Adm7/k4l//5CG + ff+Rhn3/kod9/5KHff+SiH7/k4h+/5SJfv+UiX//lIl//5WKf/+Nf23/ioaB/xB2sP8Ag9r/AJb+/wCY + //8Alf3/AHzk/wB74/8AfOT/AHzk/wB95f8AfeX/AH7m/wB+5v8Af+f/AIDo/wCB6f8Agur/AIPr/wCE + 7P8Ahe3/AIbu/wCH7/8AiPD/AIry/wCL8/8AjPT/AI71/wCP9/8AkPj/AJL6/wCS+v8AlPz/AJX9/wCX + //8Bl///Apj//wOa//8Env//BKP//wad/v8Ff83/BE5+/xk2SP8tKyv/SkE7/zItK/8lJCP/JiYm/yQk + JP89PT3/QkJC/yEhIf9PT0//ampq/2hoaP9eXl7/FxcX/wcHB/8EBAThAQEBEwAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAHJwbgyemZTc19DK/9rV0P/c19L/3NfT/9vW + 0v/d2NT/3tjU/93X1P/d19P/3NbR/9rU0P/Z0s7/2NLN/9rTz//b1dH/39vX/+bi4P/t6uj/8/Hv//n4 + +P/9/fz//f39//z8/P/49vX/7+3q/+fj3//e2dX/19DL/9TMx//RysT/083H/9jRzP/f2NP/3dfS/9TO + yv+bkYj/j4R6/5CGff+YjHv/ZF1V/25mXv+VioD/kod9/5KHfv+SiH7/koh+/5OIfv+UiH7/lIh+/5WJ + f/+VioD/loqA/41/bf+Kh4H/EHaw/wCD2v8Alv7/AJj//wCV/f8Afub/AH3l/wB95f8Afub/AH7m/wB/ + 5/8Af+f/AIDo/wCB6f8Agen/AILq/wCD6/8Ahe3/AIbu/wCH7/8AiPD/AInx/wCK8v8AivL/AIz0/wCN + 9f8Ajvf/AI/3/wCR+f8Akvr/AJT8/wCV/f8Alv7/AJf//wGY//8Cmf//A5r//wSa//8Fm///Bp7//wei + //8Jp///DJ/9/xKCyP8ucJv/N0pW/xwYF/8dFQ//HBkW/x0cHP9DRET/NDQ0/xcXF/8jIyP/Kioq/xMT + E/8JCQn/BgYG/wEBAa0AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAbmxpDJuWkd3X0cr/3NfT/97Z1f/e2dX/3tnV/93Y1P/d2NT/3djU/9zX0//d2NT/39rX/+Tf + 3P/p5uP/7+zq//Xz8v/39/b/+Pj3//f29f/08vD/7ero/+fj3//f2db/2NHM/9HKw//QyL//0cnC/9fQ + yf/e19L/5uDb/+zn4//l4d//2NXU/8LBwP/Ev7v/2NLN/5uSif+PhXv/k4l+/3x3cP9ZVlX/fHZw/6GX + jv+TiH7/kYZ7/5KHff+UiH7/lIh+/5WJf/+fk4n/nJCF/5eLgP+Win//jX9t/4yIgf8RdrD/AIPa/wCW + /v8AmP//AJX9/wB/5/8Afub/AH/n/wB/5/8Af+f/AIDo/wCA6P8Agen/AILq/wCD6/8AhOz/AITs/wCG + 7v8Ah+//AIjw/wCJ8f8AivL/AIvz/wCM9P8AjfX/AI72/wCP9/8Akfn/AJL6/wCT+/8AlP3/AJb+/wCX + //8BmP//Apj//wOZ//8Emv//BZv//wab//8HnP//CJ3//wme//8KoP//CaX//wmm//8Qnvf/EXq6/xNM + bv8UIiv/Ew0J/xkRDP88OTf/MjIy/xUVFf8NDQ3/DAwM/wkJCf8DAwP/AAAA5AAAAI4AAAAvAAAAAwAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABta2gLmpWQ2tjSy//d2dX/3trX/9/a + 1v/f2tb/4NvY/+Ld2v/l4d7/6efk/+3r6f/x7+7/8fDu//Lw7v/v7Ov/6+jm/+bk4P/h3dr/3NfT/9jS + zf/W0Mr/2NDL/93W0f/j3Nj/6OPe/+vn4v/f3Nn/0M7M/7W0tP+UlJP/c3Ny/1pZWP9CQD7/IiEf/4F/ + e//h29f/nZOL/5CFfP+YjoP/SUVA/yUjIf9NTEr/iYWD/56Zlf+ooJn/n5SK/5SIff+Thnz/lIl//2xo + ZP9ybWn/lYyE/56SiP+PgG3/jIiB/xF2sP8Ag9r/AJb+/wCY//8Alf3/AIDo/wB/5/8AgOj/AIDo/wCB + 6f8Agen/AILq/wCC6v8Ag+v/AITs/wCF7f8Ahu7/AIbu/wCI8P8AifH/AIry/wCL8/8AjPT/AI31/wCO + 9v8Aj/f/AJD4/wCR+f8Ak/v/AJT8/wCV/f8Al///AZf//wGY//8Cmf//A5r//wSa//8Fm///Bpz//wed + //8Inv//Cp7//wqf//8LoP//DKH//wyj//8Oqf//D6n//xCZ7f8Rcav/Dj1Z/w4XHf8lHRj/KSIe/xwZ + GP8ODg7/BQUF/wAAAP8AAAD/AAAA/wAAAPcAAAA8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAHBubAOVkY3F2NLN/9/a1//i3tv/5eHe/+jk4v/q5+X/7Ono/+zq6P/s6ef/6ebk/+bi + 3//j39z/39vX/93X1P/d2NP/4NvX/+bh3f/q5uP/8e3q//Lv7P/g3dz/zs3M/62srP+KiYn/aWho/1RS + Uf9IRED/SEQ+/1BKQ/9VTkf/W1RO/19ZUv88ODP/fXl3/+Te2v+kmpL/kIV7/5SJf/9zamL/opOH/56P + gf+JfHH/Pjw6/1ZWV/+GhIT/qqWi/7CnoP+hloz/bGNb/zk0Mf9ZU07/fXZv/5WLf/+PioT/EXaw/wCD + 2v8Alv7/AJj//wCV/f8Agur/AIHp/wCC6v8Agur/AILq/wCD6/8Ag+v/AITs/wCF7f8Ahe3/AIbu/wCH + 7/8AiPD/AInx/wCK8v8Ai/P/AIz0/wCN9f8Ajvb/AI/3/wCQ+P8Akfn/AJL6/wCT+/8Alf3/AJb+/wCX + //8BmP//Apn//wOZ//8Emv//BZv//wab//8HnP//CJ3//wme//8Kn///C6D//wyg//8Nof//DqL//w+j + //8QpP//Eaf//xKt//8Tq///EZXh/wxlmf8LM0v/CQ8T/wIAAP8AAAD/AAAA/wAAAP8AAAD/AAAA/wAA + AEwAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAamhlAZGOisDb1dH/5N/c/+fj + 4P/n4+L/5uPh/+Xi3//j393/4t7b/+Hd2f/j39v/6OTh/+7q5//y7+z/+PXz//Hv7f/b2tn/xsbF/6Sk + pP96enn/WVlY/z49PP87NzT/Lion/0hCPP9aUkv/aGBY/3RrYv98cmn/fHJq/3ZtZf9tZl7/amNc/zw3 + M/9taWf/5+Hc/6aclP+Rhnz/lYl//3tyav+0qJ7/saOY/6GUiP92bmT/XFRN/z46Nv8+PDz/ZWZm/5qZ + mP+7tbH/s6mi/5eMgv9+c2n/j4R4/4+LhP8Sd7D/AIPa/wCW/v8AmP//AJX9/wCE7P8Ag+v/AIPr/wCD + 6/8AhOz/AITs/wCF7f8Ahe3/AIbu/wCG7v8AiPD/AIjw/wCJ8f8AivL/AIvz/wCM9P8AjfX/AI72/wCP + 9/8AkPj/AJH5/wCS+v8Ak/v/AJX9/wCW/v8Al///AZj//wKY//8Dmf//BJr//wSb//8Fm///Bpz//wed + //8Inf//CZ7//wqf//8LoP//DKH//w2i//8Oov//D6P//xCk//8Rpf//EqX//xOm//8Tq///FLH//xSr + //8RjdD/DF6L/wUlN/8BAwX/AAAA/wAAAP8AAAD/AAAASgAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAjYqGrdrU0f/i3tv/49/c/+Pf3f/n4+H/7+vp//Tx7v/39fP//fv5/+3s + 7P/X19b/vr6+/5WVlf9tbGz/T09O/zg3Nf8qJyT/Mi4q/zkzLv8WExH/KSYj/yglIv8yLir/Z19Y/2tj + W/9tZV3/cGhg/3RrYv92bWX/eG9n/3RsZP9waWH/Qjw3/2hlY//q5OD/raOb/5GGe/+ViX7/gXlz/8jA + uv/DubH/q6CW/3VtY/9tZV3/amJa/1pTTP8+OTT/LCkn/0FBQf93dnj/q6mo/8G7t/+bjn7/jIeB/xN4 + sP8AhNr/AJf+/wCY//8Alv7/AIXt/wCE7P8AhOz/AIXt/wCF7f8Ahe3/AIbu/wCH7/8Ah+//AIjw/wCI + 8P8AivL/AIry/wCL8/8AjPT/AI31/wCO9v8Aj/f/AJD4/wCR+f8Akvr/AJP7/wCU/P8Alf3/AJf//wGX + //8BmP//Apn//wOa//8Emv//BZv//wac//8HnP//CJ3//wme//8Kn///C6D//wyg//8Nof//DqL//w+j + //8QpP//EaT//xKl//8Tpv//E6f//xOn//8UqP//Far//xew//8YtP//GKz//xSLyv8NVHv/BR0r/wAA + AP8AAABGAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABta2io3dnV/+Tg + 3v/18/H//fz7/+vq6f/Ozs3/tLS0/4WFhf9cXFv/Ozs7/ycmJv8JCAj/EQ8O/xMRD/8YFRP/Pzs2/0pE + QP9JRD//Ih8d/xIQEP8wLSr/S0VB/2FaU/9iW1T/ZV5X/2lhWf9sZV3/cGhg/3NrYv92bmX/eXBn/3Zu + Zf9RS0X/XlpZ/+fh3f+xqKH/kYZ7/5WJfv+Gf3r/2tbU/9TOyP+0qqL/aWJa/15XUP9ZU0z/VE5I/1JL + Rv9MRkH/OjUx/yQgHv8kIiL/Tk5Q/6qjnv+NiIH/EXeu/wCG2v8BmP7/AJj//wCW/v8Ahu7/AIXt/wCG + 7v8Ahu7/AIbu/wCH7/8Ah+//AIjw/wCI8P8AifH/AIry/wCK8v8AjPT/AIz0/wCN9f8Ajvb/AI/3/wCQ + +P8Akfn/AJL6/wCT+/8AlPz/AJX9/wCW/v8Al///AZj//wKZ//8Dmf//BJr//wWb//8Gm///B5z//wed + //8Inv//CZ7//wqf//8LoP//DaH//w2i//8Oov//D6P//xCk//8Rpf//EqX//xOm//8Tp///E6j//xSo + //8Wqv//F6r//xir//8Zrf//G7T//xy2//8bq/n/FoK9/xJqmnEAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAEJBQKbe2db/8e3r/7i4uP9GRkb/Ly8w/xMSEv8EBAT/CAcH/w4N + DP8aGBf/FhUT/wwLC/8XFhX/HRwa/zEuK/81MS7/KCYk/yIgHv8uKyn/SUM//1ZQSv9YUkz/WlNN/15X + UP9hWlP/Zl5X/2lhWv9tZV3/cGhg/3NrYv92bmX/e3Jp/1lSS/9VUlD/5eDc/7eup/+Shnv/lYl9/42H + gv/n5eX/3trX/7iwqf9dVlD/U0xH/09JRP9JRD//RD87/z87N/87NzT/ODQx/y8sKP8YFxb/lY+K/5GM + hf8SeK7/AYfa/wOZ/v8Bmf//AJb+/wCI8P8Ah+//AIfv/wCH7/8AiPD/AIjw/wCJ8f8AifH/AIry/wCK + 8v8Ai/P/AIz0/wCM9P8Ajvb/AI72/wCP9/8AkPj/AJH5/wCS+v8Ak/v/AJT8/wCV/f8Alv7/AJf//wGY + //8Cmf//A5n//wSa//8Em///BZv//wac//8Hnf//CJ3//wme//8Kn///C6D//wyg//8Nof//DqL//w+j + //8QpP//EaT//xKl//8Tpv//E6f//xOn//8UqP//Fan//xaq//8Xq///GKz//xms//8arf//G67//xyx + //8et///H7j/qAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACmlohYg3t06M7K + x//28vD/jo2N/wAAAP8PDg7/EhER/xUUFP8UFBT/FxUV/xYWFv8PDw7/GhkY/yglI/8wLSv/HBoZ/xgX + Fv8rKSb/Pzo2/0hDP/9LRkH/TkhD/1JMRv9WUEr/WlNN/15XUP9iW1T/Zl5X/2piWv9tZV3/cGhf/3Nq + Yf92bWX/Zl1V/1BOTP/h3Nj/vrau/5WIff+ViX7/mZKL/+Xj4v/f29f/vbWv/19ZVP9FQDv/RD86/z87 + N/86NjP/NTIv/zEuK/8sKSf/KCYj/xkYGP+RioX/ko2H/xR4r/8CiNr/BZr+/wOa//8Bl/7/AInx/wCI + 8P8AifH/AInx/wCJ8f8AivL/AIry/wCL8/8Ai/P/AIz0/wCM9P8AjfX/AI72/wCP9/8AkPj/AJD4/wCR + +f8Akvr/AJP7/wCU/P8Alf3/AJb+/wCX//8BmP//AZn//wOZ//8Dmv//BJr//wWb//8GnP//B5z//wid + //8Jnv//Cp///wqf//8LoP//DaH//w6i//8Oov//D6P//xCk//8Rpf//EqX//xOm//8Tp///E6j//xSo + //8Wqf//Fqr//xer//8YrP//Ga3//xqt//8brv//HK///x2w//8esf+kAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAKaWiaeakIb/xcK///Tw7v+srKv/DAwM/xgXF/8TEhL/Dg0N/wsL + C/8REBD/FRQU/xwbGv8iIB//JiMi/yonJf8nJCP/My8s/zo2M/89ODX/QTw4/0ZBPP9KRT//TkhD/1JM + Rv9WUEr/WVNN/15WUP9gWVL/Y1xU/2dfV/9rY1v/cmpi/4F5cf91bWb/REJA/93Y1P/EvLb/l4p+/5aJ + fv+elY3/4t7b/9/Z1f+8tK3/e3dz/1NPS/84NDD/NDAt/zEuK/8sKif/KCYk/yQiIf8iIB//CQkJ/4iB + fP+Uj4j/FHmv/wOJ2v8Gm/7/BJv//wKY/v8Ai/P/AIry/wCK8v8AivL/AIvz/wCL8/8Ai/P/AIz0/wCM + 9P8AjfX/AI72/wCO9v8Aj/f/AJD4/wCR+f8Akvr/AJL6/wCT+/8AlPz/AJX9/wCW/v8Al///AZj//wGY + //8Dmf//A5r//wSa//8Fm///Bpz//wec//8Hnf//CJ7//wme//8Kn///C6D//wyg//8Nov//DqL//w+j + //8QpP//EaT//xKl//8Tpv//E6f//xOn//8UqP//Fan//xaq//8Xq///GKz//xms//8arf//G67//xyv + //8dr///HrD//x+x/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAqp2Rn6Oa + kv+8ubf/8/Du/8C/v/8cHBz/Ozo6/ywsLP8cHBz/GBgY/xQUFP8TEhL/FhUU/xoYF/8eHBv/IyEf/yon + Jf8tKij/Mi4r/zYyL/87NjP/Pzo2/0M+Of9HQTz/S0ZB/1BKRf9VT0n/XldR/2hhW/9zbWf/gXp0/5CK + hP+clpH/qqWf/5CKhP9EQT7/2NTQ/8vDvv+ZjIH/mIt//6SYjv/NxsD/z8a//6yimv9yb2z/cG1r/1ZT + Uf8zMC7/JSMg/yIgHv8gHh3/HRsa/xsZGf8FBQX/iYJ9/5WQif8Weq//BIra/wec/v8GnP//A5n+/wCM + 9P8Ai/P/AIvz/wCM9P8AjPT/AIz0/wCN9f8AjfX/AI72/wCO9v8Aj/f/AJD4/wCR+f8Akfn/AJL6/wCT + +/8AlPz/AJT8/wCV/f8Alv7/AJf//wGY//8BmP//A5n//wOa//8Emv//BZv//wab//8HnP//B53//wid + //8Jnv//Cp///wug//8MoP//DaH//w6i//8Po///EKP//xGk//8Rpf//Eqb//xOm//8Tp///E6j//xSo + //8Vqf//Fqr//xer//8YrP//Ga3//xqt//8brv//HK///x2w//8esP//H7H/pAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC1qqCftKym/7Wyr//x7ez/zczM/yYmJv9BQUH/QUFB/0FB + Qf89PDz/ODc3/zIxMf8uLSz/LCsq/y0sK/8wLi3/Mi8t/zQxL/85NjT/PTo3/0M/Pf9LSET/Uk5K/1tX + U/9kYFz/b2tm/3p2cv+FgXz/jYiE/5WQjP+alZH/nJeT/5+alf+loJv/kIqE/zs4Nf/Szsv/083G/5uO + g/+fkof/gndu/yklI/9gXFj/b2pn/2RiYP9lYmD/Z2Vk/15cW/9BQD//JyUk/xkXFv8TERH/ERER/wME + BP+Kg33/lpCJ/xZ7r/8Gi9r/CZ3+/wed//8Fmv7/AI71/wCN9f8AjfX/AI31/wCN9f8Ajvb/AI72/wCP + 9/8Aj/f/AJD4/wCQ+P8Akfn/AJL6/wCS+v8Ak/v/AJT8/wCV/f8Alv7/AJb+/wCX//8BmP//Apj//wKZ + //8Dmf//BJr//wWb//8Gm///Bpz//wed//8Inf//CZ7//wqf//8Ln///C6D//wyh//8Oov//DqL//w+j + //8QpP//EaX//xKl//8Tpv//E6f//xOn//8UqP//Fan//xaq//8Xq///GKz//xms//8arf//G67//xyv + //8dr///HrD//x+x//8gsv+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALyy + qZ/Evbf/sK2q/+vo5v/Z2Nf/MTEx/zg4OP86OTn/Ojk5/zo5Of87Ojr/PDw8/z49Pf9BQED/RURE/0pJ + SP9NTEv/UlBP/1dVU/9cWVj/Yl9d/2lmY/9va2n/dXJv/3l1cv98eXX/gX15/4WAfP+JhID/jIeD/5CL + hv+Tj4r/mZSP/6Cblv+Vj4n/QT47/9DMyP/a1ND/nZCF/5+Rhf+QhHr/ExEQ/0RCQf9dW1n/WVdV/1lX + Vv9YV1b/W1lY/11cXP9XVlb/SEdH/zc2Nv8qKyr/EhIT/5aPiv+Uj4f/F3uv/weM2v8Knv7/CZ7//wab + /v8Aj/b/AI72/wCP9/8Aj/f/AI/3/wCP9/8AkPj/AJD4/wCR+f8Akfn/AJL6/wCS+v8Ak/v/AJT8/wCV + /f8Alf3/AJb+/wCX//8Al///AZj//wKY//8Cmf//A5n//wSb//8Em///Bpv//wac//8Hnf//CJ3//wme + //8Kn///Cp///wug//8Mof//DaH//w6i//8Po///EKT//xGk//8Spf//E6b//xOm//8Tp///E6j//xSp + //8Vqf//Fqr//xir//8YrP//Ga3//xqt//8brv//HK///x2w//8esP//H7H//yCy/6QAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAvbOsn83Fwf+tqaf/5eLg/+bk4/89PT3/MTAw/zc1 + Nf81NTX/NTQ0/zU0NP81NDT/NTQ0/zc2Nv85ODj/Pj08/0RCQv9KSEf/T01M/1VSUf9aV1X/Xlxa/2Rh + Xv9pZWP/bmpn/3NvbP95dXH/f3t3/4SAfP+Ggn3/iYR//4qEf/+CfXj/e3Vw/2tlX/8kIh//y8fE/9/a + 1f+lmI7/mIt//4+Def8sKCT/GxoZ/z8+Pf9QTk3/UE9O/09NTf9PTk3/UE9P/1NTU/9YV1f/X15e/1tb + W/8cHB3/lo+K/5WQh/8YfK//CYza/wyf/v8Kn///B5z+/wCR+P8AkPj/AJD4/wCQ+P8Akfn/AJH5/wCR + +f8Akvr/AJL6/wCT+/8Ak/v/AJT8/wCV/f8Alf3/AJb+/wCW//8Al///AZj//wGY//8Cmf//A5n//wSa + //8Emv//BZv//wab//8GnP//CJ3//wid//8Jnv//Cp///wqf//8LoP//DKD//w2h//8Oov//D6L//xCj + //8RpP//EaX//xKm//8Tpv//E6f//xOo//8UqP//Fan//xaq//8Xqv//GKv//xms//8arf//G67//xyv + //8dr///HrD//x+x//8gsv//IbL/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAC5rqafyL+5/6mkoP/Z19b/9vX0/0lJSf8qKSn/NDMz/zExMf8wMDD/Ly4u/y8uLv8vLi7/MS8w/zEx + Mf80MzP/OTg4/z8+Pf9GREL/S0pI/1JQTv9YVVP/W1hV/15bWP9gXFn/XFhV/1ZSTv9OSkb/RUE9/0I/ + O/8+Ozj/Ozg1/0dDQf9UUk//ZmNh/4WCf//c1tT/4dzY/62hlv+Qg3j/W1NM/2phWf9sY1r/LCcl/x0c + HP8tLi7/QUFB/0lJSf9LSkr/Tk1N/1BQUP9WVVX/UlFR/x4eH/+ck43/lY6H/xp9rv8Kjdr/DaD+/wuh + //8Jnf//AJL5/wCR+f8Akfn/AJL6/wCS+v8Akvr/AJP7/wCT+/8Ak/v/AJT8/wCV/f8Alf3/AJb+/wCX + //8Al///AJf//wGY//8CmP//Apn//wOZ//8Dmv//BJr//wWb//8Gm///B5z//wid//8Inf//CZ7//wme + //8Kn///C6D//wyg//8Nof//DaL//w6i//8Qo///EKT//xGl//8Spf//E6b//xOn//8Tp///FKj//xWp + //8Vqv//Fqr//xir//8YrP//Gq3//xuu//8brv//HK///x6w//8esP//H7H//yCy//8hs/+kAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAALGkmqjCtqz/qKCa/8vIx//+/Pz/XVxc/yUk + JP8xMTH/Li4u/y0sLP8rKir/Kyoq/ysqKv8rKir/LCsr/ywrK/8rKir/Li0s/y4sK/8sKSj/KCYl/yMi + IP8nJST/Kyoo/y4sKv88OTj/UlBO/2hmY/99e3j/lZKQ/62qp//JxcL/1dHN/9/b1//q5uL/7unl/+Hd + 2P/g29j/s6mf/5yMgP+klYj/pZeK/6aYi/+dj4T/cWde/zo1MP8aGRj/HBwd/zIyMv9ERET/T09P/1dX + V/9KSUn/JCUl/6uhmv+TjYT/Gn6u/wuP2v8Pov7/DaH//wqf//8AlPv/AJP7/wCT+/8Ak/v/AJT8/wCU + /P8AlPz/AJX9/wCV/f8Alf3/AJb+/wCW/v8Al///AJj//wGY//8Cmf//Apn//wOZ//8Emf//BJr//wWb + //8Fm///Bpz//wad//8Hnf//CJ7//wme//8Kn///C5///wug//8Mof//DaH//w6i//8Oov//D6P//xCk + //8RpP//EqX//xOm//8Tpv//E6f//xOo//8Vqf//Far//xaq//8Xq///GKz//xms//8arf//G67//xyv + //8dsP//HrD//x+x//8gsv//IbP//yKz/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAqpuOaHduZr6EfHVYuba18vz7+v91dXX/IyIi/zIyMv8sKyv/KCcn/yMjI/8dHBz/FhYW/xAP + D/8JCQn/Dw4P/xcXF/8gHx//MzIy/0xKSv9nZmX/g4KB/56bmv+4trX/1NLP/+Lf3f/o5uP/8e3q//Lu + 6v/r5+P/5uHc/9/Z1P/Y0s3/1M3H/9DJw//NxsD/zMW+/8vDvf/Hvrn/vLGq/62imf+ilIn/nY+C/5+Q + hP+nmIv/pZeK/4yAdf9bU0z/Lysn/xsaGf8eHh//LCwt/x8fIP84Ojz/uq2k/5CKgv8bf6//DJDa/xCj + /v8Oov//C5///wCV/P8AlPz/AJX9/wCV/f8Alf3/AJb+/wCW/v8Alv7/AJb//wCX//8Al///AJj//wGY + //8Cmf//Apn//wOZ//8Dmv//BJr//wSb//8Fm///Bpv//wac//8GnP//CJ3//wme//8Jnv//Cp///wuf + //8LoP//DKH//w2h//8Oov//DqL//w+j//8QpP//EaT//xKl//8Tpv//E6f//xOn//8UqP//FKn//xWp + //8Wqv//F6v//xir//8ZrP//Gq3//xuu//8cr///Ha///x6w//8fsf//ILL//yCy//8hs///IrT/pAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADg0MYAIDAl6OjIrh/Pr4/42M + jP8RERH/Ghoa/xcXF/8eHh3/JCQk/zIxMf9PTk7/bW1s/4yLiv+npqb/w8LB/97d3P/u7Ov/8/Hw//j3 + 9f/59/T/8+7s/+rm4//i3Nj/2NPN/9HJxP/Kwrz/xr22/8K5sf+/ta7/vbSs/7+1rv+/tq//wLex/8K5 + s//GvLf/yL65/8vCvf/OxsH/zsjC/8nCu/+8sqr/raGW/6KTh/+fkIL/o5SH/6qajf+klYn/jYB1/2ph + WP9PSEH/OzUw/4R8d/+xoZT/koyE/x1/r/8Nkdr/EaT+/w+j//8Mof//AZb+/wCW/v8Alv7/AJb+/wCX + //8Al///AJf//wCX//8BmP//AZj//wGY//8CmP//Apn//wOZ//8Dmv//BJr//wSa//8Fm///BZv//wac + //8HnP//B53//wid//8Inv//CZ7//wqf//8LoP//C6D//wyh//8Nof//DqL//w6i//8Po///EKT//xGk + //8Spf//E6b//xOm//8Tp///E6j//xSo//8Vqf//Fqr//xeq//8Yq///GKz//xmt//8arf//G67//xyv + //8dsP//HrD//x+x//8gsv//IbP//yKz//8jtP+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAQAAAASmBfXaPt6+n/xsXF/2tqav+SkpL/r6+w/8bHx//h4eH/9fX1//v6 + +/////////z8//bz8f/t6uj/4t3Z/9fQyv/NxL3/xLuz/760q/+4raT/tKie/7Omnf+zqJ7/tKif/7Wq + oP+3rKP/ua+m/7uxqf+9tKz/v7av/8G4sf/CurP/xLu1/8e+uP/JwLr/y8K9/8zDv//OxsH/0MvF/9TO + yv/Tzcn/ysO+/7yyq/+sn5T/opSH/6CRg/+llYj/rJyO/6ucjv+pmYz/qJiL/6iWiP+Sj4n/G4Cx/w+R + 2v8Spf7/EKT//w2h//8BmP//AJf//wCX//8Bl///AZj//wGY//8BmP//AZj//wKY//8Cmf//Apn//wOZ + //8Dmv//BJr//wSa//8Fm///BZv//wac//8GnP//B5z//wed//8Inf//CZ7//wme//8Kn///C6D//wyg + //8Mof//DaH//w6i//8Oov//D6P//xCk//8RpP//EaX//xOm//8Tpv//E6f//xOo//8UqP//Fan//xaq + //8Wqv//F6v//xis//8ZrP//Gq3//xuu//8crv//HbD//x6w//8fsf//ILL//yGy//8is///I7T//yO1 + /6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcG5rMr+8 + u//49vb/+/r6//37+//39fP/7+zq/+Le2v/Vzsj/yL+3/76zqv+2qp//rqCV/6maj/+nmIz/qJqN/6ia + jv+pm4//q56S/66hlv+wpJr/s6ee/7SpoP+2q6L/uK2k/7mvpv+7san/vLKr/760rf+/tq//wbix/8K6 + s//EvLb/x724/8nAu//Lwr3/zMS//87Hwf/PycP/0cvG/9LNyv/W0c7/2NPS/9fS0P/MxsH/u7Gp/6yf + lP+jk4b/opKF/6SUh/+llon/q5mK/4uPjP8VgLT/EZPa/xOl/v8Rpf//DqL//wKY//8BmP//AZj//wKY + //8Cmf//Apn//wKZ//8Dmf//A5n//wOZ//8Dmv//BJr//wSb//8Fm///BZv//wac//8GnP//B5z//wed + //8Inf//CJ7//wme//8Kn///Cp///wug//8MoP//DKH//w2h//8Oov//DqL//w+j//8QpP//EaT//xGl + //8Tpf//E6b//xOn//8TqP//FKj//xWp//8Vqv//Fqr//xer//8YrP//Gaz//xqt//8brv//HK7//x2v + //8esP//H7H//x+x//8gsv//IbP//yK0//8jtP//JLX/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABta2gBgX98kLewqPa7r6X/tKec/62fkv+llon/opKF/6GS + hP+gkIP/oJCC/6GRhP+jlIf/ppeL/6iajv+qnJD/q56S/62flP+uoZf/sKOZ/7Glm/+zqJ7/tamg/7ar + ov+4raT/ua+n/7uxqf+8s6v/vrSt/7+2r//BuLH/wrqz/8W8tv/Ivrn/ycC7/8vCvf/MxL//zsjB/8/J + xP/Ry8j/0s3K/9TPzP/V0c7/19PR/9vX1f/d2tn/29fV/9LLx//EuLD/uKib/7Gdj/+0mYf/aoiS/wyC + u/8Tk9r/E6b+/xKm//8Po///A5n//wOZ//8Dmf//A5n//wOZ//8Dmf//A5r//wSa//8Emv//BJr//wSb + //8Fm///BZv//wac//8GnP//B5z//wed//8Inf//CJ3//wme//8Jnv//Cp///wqf//8LoP//DKD//w2h + //8Nov//DqL//w+j//8Po///EKT//xGk//8Rpf//EqX//xOm//8Tp///E6j//xSo//8Vqf//Fan//xaq + //8Xq///GKv//xms//8Zrf//Gq3//xuu//8cr///HbD//x6w//8fsf//ILL//yGz//8is///I7T//yS1 + //8ltf+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAeHJsLX52b3KRhnu5mIuA5qGShf+llon/ppaJ/6aWif+lloj/pJWI/6WWif+nmIz/qJqO/6qc + kP+rnpL/rZ+U/66hl/+wo5n/saWb/7Oonv+1qaD/tqui/7itpP+5r6f/u7Gp/7yzq/++tK3/v7av/8G4 + sf/CurP/xb22/8i+uf/JwLv/y8K9/83Ev//OyMH/0MrE/9HLyP/Uzsv/19LO/9zV0f/g2NP/4tnU/+Pa + 1//h2db/1tPR/8PMz/+pusD/gZ6p/1aGmv8fga3/EYe//xOW3f8Tp/7/E6b//xCk//8Emv//BJr//wSa + //8Emv//BJr//wSa//8Emv//BZv//wWb//8Fm///Bpv//wac//8GnP//B5z//wed//8Inf//CJ3//wme + //8Jnv//Cp///wqf//8LoP//C6D//wyg//8Nof//DaL//w6i//8Po///EKP//xCk//8RpP//EqX//xKm + //8Tpv//E6f//xOo//8TqP//FKn//xWp//8Wqv//F6v//xir//8YrP//Ga3//xqt//8brv//HK///x2v + //8esP//H7H//yCy//8hsv//IrP//yK0//8jtf//JLX//yW2/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB9dnEchX52SId/ + d4mUiX7Bm46C56GThv+llon/p5iK/6majf+pm4//qpyQ/6uekv+tn5T/rqGW/7Cjmf+xpZv/s6ie/7Wp + oP+2q6L/uK2k/7mvpv+7san/vLOr/760rf+/tq//wbix/8K6s//EvLb/yL65/8vCvf/Qxb//08jC/9bM + w//XzMX/2M7J/9LJxf/Fwr//tbu8/6Cwtf+Ho63/aZan/06Npf83h6b/In6j/xV+qf8Pg7T/D4a6/xKJ + v/8Ujsr/FJvl/xSo/v8Tp///EaT//wWb//8Fm///BZv//wWb//8Fm///BZv//wab//8Gm///Bpz//wac + //8HnP//B5z//wed//8Inf//CJ3//wme//8Jnv//Cp///wqf//8Ln///C6D//wyg//8Mof//DaH//w6i + //8Oov//D6P//xCj//8QpP//EaT//xKl//8Spv//E6b//xOn//8Tp///E6j//xSo//8Vqf//Fqr//xer + //8Yq///GKz//xms//8arf//G67//xyu//8cr///HrD//x+x//8fsf//ILL//yGz//8itP//I7T//yS1 + //8ltv//Jrb/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAACBenQbgnt0Q4Z+dnuPhnyzmY2D2aKW + iv+pnJD/rZ+T/7Cilv+wo5f/sKSZ/7Glm/+zp57/tKmg/7arov+4raT/ua+m/7yxqP++s6z/wrav/8W5 + sf/Ju7P/yby0/8q+tv/Jvbf/wriy/7Syr/+kra3/kKOm/3eXn/9ci5j/RYOW/zR9lP8kd5P/GHaX/xR6 + n/8UfaX/FIGq/xWEsf8Yi7z/Go/D/xqSyv8amdj/GJzh/xeg6v8Wpvf/Fan//xOo//8Spf//B5v//wab + //8GnP//Bpz//wac//8GnP//B5z//wec//8Hnf//B53//wid//8Inf//CJ7//wme//8Jnv//Cp///wqf + //8Ln///C6D//wug//8Mof//DaH//w2h//8Oov//D6P//w+j//8QpP//EaT//xGl//8Spf//E6b//xOm + //8Tp///E6f//xOo//8UqP//Fan//xaq//8Xq///GKv//xis//8ZrP//Gq3//xuu//8crv//HK///x2w + //8esP//H7H//yCy//8hs///IrP//yO0//8ktf//JbX//yW2//8mt/+kAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB7dnAQioJ7L4B6dGOSiYGblo2FxaOYj/CsoZb/saWb/7Wo + n/+4raP/t6yj/7uroP+9rKH/vK6l/7aro/+qp6L/nKOh/4ydnv96lZn/Zo6X/0+Gkv8+gpL/MX2Q/yR4 + j/8ceJL/GnqV/xt7mP8bfZz/HYKj/yCJrv8ijrj/I5TB/yOcz/8joNj/IqPg/yGp7P8hrfX/H675/x6v + /v8cr///Gq7//xis//8Wqv//FKj//xKm//8InP//B5z//wec//8Hnf//B53//wed//8Inf//CJ3//wid + //8Inv//CZ7//wme//8Jnv//Cp///wqf//8Ln///C6D//wug//8Mof//DaH//w2h//8Oov//DqL//w+j + //8Qo///EKT//xGk//8Rpf//EqX//xOm//8Tpv//E6f//xOn//8TqP//FKj//xWp//8Wqv//F6v//xir + //8YrP//Gaz//xqt//8brv//G67//xyv//8dsP//HrD//x+x//8gsv//IbP//yKz//8jtP//I7X//yS1 + //8ltv//Jrf//ye3/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABta2gCi4R+Hnt2cUSSioN7mZGJrJSNhrmhkIaihKix0Gexxv9SlaX/QoeW/zaB + kf8sfY7/JX2Q/yJ/lP8jf5b/JIGZ/ySEnf8nh6L/KY2r/yqRs/8slrv/LJ/I/yyk0/8tqt7/LbHp/y22 + 8v8suPn/K7n9/ym5//8nuf//Jbf//yO1//8hs///H7H//x2v//8brf//Gaz//xeq//8Vqf//Eqb//wmd + //8Inf//CJ3//wid//8Inf//CJ7//wme//8Jnv//CZ7//wme//8Kn///Cp///wqf//8LoP//C6D//wyg + //8Mof//DaH//w2h//8Nov//DqL//w6i//8Po///EKP//xCk//8RpP//EqX//xKl//8Tpv//E6b//xOn + //8TqP//FKj//xSp//8Vqf//Fqr//xar//8Yq///GKz//xms//8arf//G67//xuu//8cr///Ha///x6w + //8fsf//H7H//yGy//8is///IrT//yO0//8ktf//Jbb//ya2//8nt///KLj/pAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABH1v17Pc77/zSmxv8ukqn/Lo2i/y+No/8xkqv/M5iz/zOcu/81pcf/N6zT/zey + 3P84uuj/OL/y/zjC+f83w/3/NsT//zTD//8ywv//MMD//y69//8su///Kbn//ye3//8ltv//I7T//yGz + //8fsf//HbD//xuu//8ZrP//Fqr//xOo//8PpP//CJ7//wme//8Jnv//CZ7//wme//8Kn///Cp///wqf + //8Kn///Cp///wug//8LoP//C6D//wyg//8Mof//DaH//w2h//8Nov//DqL//w6i//8Po///D6P//xCk + //8RpP//EaX//xKl//8Tpv//E6b//xOn//8Tp///E6j//xSo//8Uqf//Fan//xaq//8Wqv//GKv//xis + //8ZrP//Gq3//xuu//8brv//HK///x2v//8esP//HrH//x+x//8gsv//IbP//yK0//8jtP//JLX//yW2 + //8mtv//Jrf//ye4//8ouP+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEba/4RIz/n/Qbrf/z6y + 1P8+ttf/P7re/0HB6P9DyPL/Q8z5/0PO/v9Bzv//QM///z7O//88y///O8r//znH//83xP7/NcL+/zPA + /v8xv/7/L73+/yy7/v8quv7/KLj//yW2//8jtP//ILL//xyw//8Zrf//GKz//xmt//8arf//IrD//xKl + //8Hnf//BJv//wed//8Jnv//Cp///wuf//8LoP//C6D//wug//8MoP//DKD//wyg//8Nof//DaH//w2i + //8Oov//DqL//w+i//8Po///D6P//xCk//8QpP//EaT//xGl//8Tpf//E6b//xOm//8Tp///E6f//xOo + //8UqP//Fan//xWp//8Wqv//F6r//xes//8YrP//Gaz//xqt//8brv//G67//xyv//8dr///HrD//x6x + //8fsf//ILL//yGz//8is///I7T//yS1//8ltf//Jbb//ya3//8nt///KLj//ym5/6QAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAS9T+hErV/f9K1Pz/StT+/0vW//9K1///Sdb//0jU//9G0///RNH//0PP + /v9Bzv7/P8z+/z3K/v87yf7/Ocj+/zjF/v82w/7/M8H+/zG//v8uvf7/Krv+/ye4/v8mt///J7f//yi3 + //8tuv//N7///0HG//9MzP//WNT//2Xb//9v4f//Z9z//0/N//84vv//IK///xCj//8Jn///BZz//wie + //8Kn///DKD//w2h//8Nov//DaH//w6i//8Oov//DqL//w+j//8Po///EKT//xCk//8QpP//EaT//xGl + //8Spv//E6b//xOn//8Tp///E6f//xOo//8UqP//Faj//xWp//8Vqv//Fqr//xer//8Xq///Gaz//xqs + //8arf//G67//xuu//8cr///Ha///x6w//8esf//H7H//yCy//8hsv//IrP//yO0//8jtf//JLX//yW2 + //8mt///J7f//yi4//8puf//Kbn/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABN1v6ETdf+/03X + //9N1///Tdf+/0zW/v9L1f7/SNT+/0jT/v9G0f7/RND+/0LO/v8/zf7/Psv+/zvJ/v84x/7/NcT+/zXD + /v81wv7/NsL+/zrE/v9CyP7/Ssz+/1PS//9d1///Z93//23g//9y4///dub//3jm//935v//duX//3Xl + //925v//euj//3rp//9z5P//aN3//1LP//89wP//JrL//xWn//8Mof//B57//wmf//8Mof//DaL//w+j + //8QpP//EKP//xGk//8QpP//EaT//xKl//8Spv//E6b//xOm//8Tpv//E6f//xOn//8TqP//FKj//xSp + //8Vqv//Fqr//xeq//8Xq///GKv//xms//8ZrP//Gq3//xuu//8brv//HK///x2v//8esP//H7H//x+x + //8gsv//IbL//yGz//8jtP//I7X//yW2//8ltv//Jrf//ye3//8ouP//Kbn//ym5//8puf+kAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAE/Z/olP2f7/UNn+/0/Z/v9P2P7/Ttf+/0zW/v9K1f7/SNP+/0XS + /v9D0P7/Qs/+/0PO/v9Dzv7/R8/+/0zR//9S0///Wtb//2Da//9o3v//beD//2/i//9z5P//dOX//3Tk + //9z5P//cuP//3Pk//9y4///c+P//3Pk//9z5P//dOT//3Tk//905P//deX//3bm//945///e+n//3vp + //935v//buH//1nT//9Exv//Lbf//xqr//8Rpf//CqD//wuh//8Oo///D6P//xGl//8Spv//E6b//xOm + //8Tp///E6f//xOn//8UqP//FKj//xWo//8Vqf//Fqr//xaq//8Wq///GKv//xis//8YrP//Ga3//xqu + //8brv//HK///x2v//8dsP//HrD//x6x//8fsf//ILL//yGz//8hs///I7T//yO1//8ktf//Jbb//ya3 + //8nt///KLj//ym5//8puf//Kbn//ym5/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAStT/S1Hb + /vpS2/7/Utv+/1Lb/v9Q2f7/T9j+/0/X/v9R1v7/Vtj//1rZ//9e2v//Y9z//2ne//9s3///buH//3Di + //9w4v//cOL//2/i//9w4f//cOL//3Di//9x4v//ceL//3Lj//9y4///cuP//3Pj//9z4///dOT//3Tk + //915P//deX//3Xl//915f//duX//3bl//925f//duX//3fm//945///e+n//3zq//945///ceP//2DY + //9Ny///N73//yGv//8WqP//D6P//w2i//8PpP//Eab//xKn//8TqP//FKj//xSp//8Vqf//Fqr//xaq + //8Xqv//F6v//xir//8YrP//Gaz//xqt//8arf//G67//xyu//8dr///HbD//x6w//8fsf//ILL//yCy + //8hs///IrP//yO0//8jtf//JbX//yW2//8mt///J7f//yi4//8ouf//Kbn//ym5//8puf//Kbn/pAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAU9z+OFLa/qdI0f/oSdD//03S//9T1P//Wtb//1/Z + //9j2v//Z93//2rf//9r3///bN///23g//9u4P//buH//2/h//9v4f//b+H//3Dh//9w4v//ceL//3Hj + //9y4///cuP//3Pj//9z4///dOT//3Tk//905P//deT//3Xk//915f//deX//3bl//925f//duX//3bl + //925f//duX//3bl//925f//duX//3fm//935v//euf//3zp//945///c+T//2Xb//9Tz///QMT//yq2 + //8brP//Eqf//w6k//8Qpv//Eqj//xSp//8Wqv//F6v//xir//8YrP//Gaz//xmt//8arf//G67//xuu + //8cr///Ha///x6w//8esP//H7H//yCy//8gsv//IbP//yKz//8jtP//I7X//yS1//8ltv//Jrf//ye3 + //8ouP//KLn//ym5//8puf//Kbn//ym5//8puf+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAADjC/xk6wf9IO8P/dT7F/6dDyP/XRsv/8kzO//9T0v//V9X//13Y//9i2v//Zdz//2nd + //9q3///beD//27h//9w4f//ceL//3Hi//9y4///cuP//3Pj//9z4///dOP//3Tk//905P//dOT//3Xk + //915f//deX//3bl//925f//duX//3bl//925f//dub//3fm//935v//d+b//3fm//925v//duX//3bl + //925f//duX//3bl//925f//d+b//3nn//945///dOX//2ne//9Z1P//R8n//zK8//8isv//Gav//xKo + //8Uqf//Far//xer//8ZrP//Gq3//xuu//8brv//HK///x2v//8esP//HrH//x+x//8gsv//ILL//yGz + //8is///I7T//yO1//8ktf//Jbb//ya3//8mt///KLj//yi4//8puf//Kbn//ym5//8puf//Kbn//ym5 + /6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAADnB + /wM3wP8qO8P/TDzD/35ByP+3RMr/2krM//tQ0f//VtT//1zX//9h2v//Zdz//2je//9r4P//buH//3Hi + //9x4///c+P//3Pk//905P//dOT//3Xk//915P//deT//3Xl//925f//duX//3fl//935f//d+X//3fl + //935v//d+X//3fm//935v//d+b//3fm//935v//dub//3bl//925f//duX//3Xl//905f//dOT//3Tl + //905P//deX//3fm//925v//dOX//23h//9e1///T87//zzC//8qt///H7H//xis//8XrP//GKz//xqu + //8cr///HrD//x+w//8fsf//ILL//yGy//8hs///IrP//yO0//8jtf//JLX//yW2//8mtv//Jrf//yi3 + //8ouP//Kbn//ym5//8puf//Kbn//ym5//8puf//Kbn/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA3wP8KPMP/NDvE + /1k+xv+LQ8r/xEjM/+FNz///VNP//1nW//9f2f//Zdz//2nf//9t4P//b+H//3Li//9z5P//dOT//3Xl + //925f//duX//3fl//935f//d+X//3fm//935v//d+b//3fm//945f//d+b//3fm//935v//d+b//3fl + //935f//duX//3bl//925f//duX//3Xl//915P//deT//3Tk//9z5P//c+P//3Lj//9y4///cuP//3Pk + //905P//cuP//27h//9i2v//VNH//0TI//8yvf//J7b//x6w//8brv//HK///x2w//8gsv//IbP//yK0 + //8jtP//I7X//yS1//8ltv//Jrb//ya3//8ot///KLj//ym5//8puf//Kbn//ym5//8puf//Kbn//ym5 + //8puf+kAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAO8P/Fj/H/zc+x/9nQcn/m0bM + /8dMz//sU9P//1nW//9e2f//ZNz//2je//9s4P//cOL//3Hi//9z5P//deX//3bl//935f//eOb//3jm + //945v//eOb//3jm//945v//eOb//3jm//945v//eOb//3fl//935f//d+X//3fl//925f//duX//3Xl + //915P//dOT//3Pk//9z4///cuP//3Lj//9x4v//cOL//3Di//9v4f//buH//2/i//9x4v//cOL//27h + //9l3P//WtX//0zM//87w///Lrv//yW1//8fsv//ILP//yGz//8jtP//Jbb//ya2//8mt///J7j//yi4 + //8puf//Kbn//ym5//8puf//Kbn//ym5//8puf//Kbn//ym5/6QAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAD/I/yFCyf8+Qsr/cEfN/6hLz//NUNL/8lbV + //9c2P//Ydr//2bd//9q3///buH//3Hi//9z5P//deX//3fm//945v//eOb//3nm//955v//eOb//3jm + //945v//d+b//3fm//935f//d+X//3bl//925f//deX//3Xl//915P//dOT//3Tk//9z5P//cuP//3Lj + //9x4v//cOL//2/i//9v4f//buH//23g//9t4P//bN///2zg//9t4P//beD//2vf//9m3f//XNb//1HP + //9Cx///Nb///yy7//8ltv//JLb//yS2//8mt///KLj//ym5//8puf//Kbn//ym5//8puf//Kbn//ym5 + //8puf//Kbn/pAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAEDJ/wVEy/8kQ8v/SEbN/39Kz/+xTdH/01LT//pZ1///Xtn//2Tc + //9p3///beH//3Hi//9z4///deX//3fl//935v//eOb//3jm//945v//eOb//3fm//935f//d+X//3bl + //925f//deX//3Xk//905P//dOT//3Pj//9y4///cuP//3Hi//9x4v//cOL//2/h//9v4f//buD//23g + //9s4P//a9///2rf//9q3v//aN7//2jd//9p3v//ad7//2nd//9m3P//X9j//1bT//9JzP//PcX//zTA + //8ruv//J7j//ya3//8nuP//KLj//ym5//8puf//Kbn//ym5//8puf+kAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAABDy/8LRsz/J0XM/1RHzv+ITND/tFDT/+BX1v/+XNj//2Hb//9m3f//at///27h + //9w4v//cuP//3Xl//925f//d+X//3fl//935f//d+X//3bl//925f//duT//3Xk//905P//dOT//3Pj + //9z4///cuP//3Hi//9x4v//cOL//2/h//9u4f//buH//23g//9s4P//a9///2vf//9p3v//ad3//2jd + //9n3P//Ztz//2bc//9n3f//aN3//2fd//9n3f//Ytr//1vV//9Pz///Qsf//zfB//8uvP//Kbn//yi4 + //8ouP//Kbn//ym5/6UAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAR83/FEbO/yxHzv9eTND/kU3R/7xS0//oWNb//1zY//9i2///Zt7//2rf//9u4f//cOL//3Lk + //905P//dOX//3Xl//915f//deX//3Xk//905P//dOT//3Pj//9y4///cuP//3Hi//9w4v//cOL//2/h + //9u4f//beD//23g//9s3///a9///2ne//9o3v//Z93//2Xc//9k2///ZNv//2Pa//9h2v//X9n//17Y + //9d2P//XNf//1rW//9Z1f//VdP//07P//9Eyv//OML//y+9//8ruv//Kbn/owAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEnO + /xZGzf80SM7/Z0vQ/5dN0f/CUtP/7lfW//9b2P//Ydr//2Xc//9p3///bOD//27h//9w4v//cuL//3Lj + //9z4///c+P//3Hi//9w4v//b+L//27g//9t4P//a9///2vf//9p3v//Z93//2Xc//9j2///Ydr//1/Y + //9c1///WdX//1fU//9W1P//VNP//1HR//9Nz///Ss3//0jM//9Fyv/8Qcf/8j7G/9o+xf/FPcX/rj7F + /5g7w/9/NsD/YjG9/0Qsu/8cAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAETM/wJIzf8WQ8z/PEfO + /25Jzv+bTND/xVDS/+9V1P//Wdf//1/Z//9j2///Zt3//2je//9o3v//Zt3//2Tc//9h2v//X9j//13Y + //9c1///Wtf//1nW//9V0///UNH//03P//9Lzf//Sc3/+0bL//VCyP/kP8b/zj7G/7k8xf+iPsT/jjrC + /3Y3wf9eNsD/RDW//ys4wP8YNsD/DTW//wQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABDzP8DRcz/FkHL/z9GzP9vRsz/mEnO + /8NO0P/oUdL/71HS/+9R0v/vTdD/70jN/+NEy//UQ8r/x0PK/7lByP+lQsn/k0HJ/4M8xf9sOcL/WzjB + /0Y2wf8wOsT/GjrC/w83wP8HAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA + AAAAAAAAAAAAAAAAAAAAAAAA//////////////////////////////////////////////////////// + //////////////////////////////////////////////////////////////////////////////// + //////AAAAA////////////////wAAAAP///////////8AAAAAAAAAP///////////AAAAAAAAAD//// + ///8AAAAAAAAAAAAAP///////AAAAAAAAAAAAAD////AAAAAAAAAAAAAAAAAP///wAAAAAAAAAAAAAAA + AD//8AAAAAAAAAAAAAAAAAAP//AAAAAAAAAAAAAAAAAAD//AAAAAAAAAAAAAAAAAAAP/wAAAAAAAAAAA + AAAAAAAD/wAAAAAAAAAAAAAAAAAAAP8AAAAAAAAAAAAAAAAAAAD8AAAAAAAAAAAAAAAAAAAA/AAAAAAA + AAAAAAAAAAAAAPAAAAAAAAAAAAAAAAAAAADwAAAAAAAAAAAAAAAAAAAA8AAAAAAAAAAAAAAAAAAAAPAA + AAAAAAAAAAAAAAAAAADwAAAAAAAAAAAAAAAAAAAA8AAAAAAAAAAAAAAAAAAAAPAAAAAAAAAAAAAAAAAA + AADwAAAAAAAAAAAAAAAAAAAA8AAAAAAAAAAAAAAAAAAAAPAAAAAAAAAAAAAAAAAAAADwAAAAAAAAAAAA + AAAAAAAA8AAAAAAAAAAAAAAAAAAAAPwAAAAAAAAAAAAAAAAAAAD8AAAAAAAAAAAAAAAAAAAA/AAAAAAA + AAAAAAAAAAAAAPwAAAAAAAAAAAAAAAAAAAD/AAAAAAAAAAAAAAAAAAAA/wAAAAAAAAAAAAAAAAAAAP/A + AAAAAAAAAAAAAAAAAAD/wAAAAAAAAAAAAAAAAAAA//AAAAAAAAAAAAAAAAAAAP/wAAAAAAAAAAAAAAAA + AAD/+AAAAAAAAAAAAAAAAAAA//gAAAAAAAAAAAAAAAAAAP/4AAAAAAAAAAAAAAAAAAD/+AAAAAAAAAAA + AAAAAAAA//gAAAAAAAAAAAAAAAAAAP/4AAAAAAAAAAAAAAAAAAD/+AAAAAAAAAAAAAAAAAAA//gAAAAA + AAAAAAAAAAAAAP/4AAAAAAAAAAAAAAAAAAD/+AAAAAAAAAAAAAAAAAAA//gAAAAAAAAAAAAAAAAAA//4 + AAAAAAAAAAAAAAAAAAP/+AAAAAAAAAAAAAAAAAA///gAAAAAAAAAAAAAAAAAP//4AAAAAAAAAAAAAAAA + H///+AAAAAAAAAAAAAAAAB////gAAAAAAAAAAAAAAAAf///4AAAAAAAAAAAAAAAAH///+AAAAAAAAAAA + AAAAAB////gAAAAAAAAAAAAAAAAf///4AAAAAAAAAAAAAAAAH///8AAAAAAAAAAAAAAAAB////AAAAAA + AAAAAAAAAAAf///wAAAAAAAAAAAAAAAAH///8AAAAAAAAAAAAAAAAB////AAAAAAAAAAAAAAAAAf///w + AAAAAAAAAAAAAAAAH///8AAAAAAAAAAAAAAAAB////AAAAAAAAAAAAAAAAAf///wAAAAAAAAAAAAAAAA + H///8AAAAAAAAAAAAAAAAB////AAAAAAAAAAAAAAAAAf///wAAAAAAAAAAAAAAAAH///8AAAAAAAAAAA + AAAAAB////AAAAAAAAAAAAAAAAAf///wAAAAAAAAAAAAAAAAH///+AAAAAAAAAAAAAAAAB////gAAAAA + AAAAAAAAAAAf///8AAAAAAAAAAAAAAAAH////gAAAAAAAAAAAAAAAB////8AAAAAAAAAAAAAAAA///// + gAAAAAAAAAAAAAAAf////+AAAAAAAAAAAAAAAH/////wAAAAAAAAAAAAAAH/////+AAAAAAAAAAAAAAD + //////4AAAAAAAAAAAAP////////AAAAAAAAAAAA/////////4AAAAAAAAAAAH/////////gAAAAAAAA + AAA/////////8AAAAAAAAAAAH/////////4//AAAAAAAAA////////////wAAAAAAAAH///////////8 + AAAAAAAAA////////////AAAAAAAAAH///////////wAAAAAQAAA///////////8AAAAAOAAAH////// + /////AAAAAHwAAA///////////wAAAAD+AAAP//////////+AAAAB/4AAD///////////wAAAA//AAA/ + //////////+AAAAf/4AAH///////////wAAAP//AAD////////////AAAD//4AA////////////4AAB/ + //AAP////////////AAA///4AH////////////8AAf///gD/////////////gAP///+D//////////// + /8AH///////////////////wH/////////////////////////////////////////////////////// + //////////////////////////////////////////////////////////////////////////////// + //////////////////////////////////////////////////////////////////////////////// + //////////////////////////////////////////////////////////////////////////////// + //////////////////////////////////8= + + + \ No newline at end of file diff --git a/Aviso/frmLaufzettel.vb b/Aviso/frmLaufzettel.vb new file mode 100644 index 0000000..9c73cfa --- /dev/null +++ b/Aviso/frmLaufzettel.vb @@ -0,0 +1,521 @@ +Imports System.Drawing.Printing +Imports Microsoft.Office.Interop + +Public Class frmLaufzettel + + Dim AvisoID = -1 + Dim DIGITAL As Boolean = False + Dim AVISO As VERAG_PROG_ALLGEMEIN.cAviso = Nothing + Dim SENDUNG_LIST As List(Of VERAG_PROG_ALLGEMEIN.cSendungen) = Nothing + Dim DIGITAL_T1 As Boolean = False + Dim DIGITAL_Rg As Boolean = False + Dim jeVP As Boolean = False + Sub New() + + ' Dieser Aufruf ist für den Designer erforderlich. + InitializeComponent() + + ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu. + + End Sub + Sub New(AvisoID As Integer, SENDUNG_LIST As List(Of VERAG_PROG_ALLGEMEIN.cSendungen), DIGITAL As Boolean, DIGITAL_T1 As Boolean, DIGITAL_rg As Boolean, jeVP As Boolean) + + ' Dieser Aufruf ist für den Designer erforderlich. + InitializeComponent() + + ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu. + Me.AvisoID = AvisoID + AVISO = VERAG_PROG_ALLGEMEIN.cAviso.getAvisoById(AvisoID) + Me.SENDUNG_LIST = SENDUNG_LIST + Me.DIGITAL = DIGITAL + Me.DIGITAL_T1 = DIGITAL_T1 + Me.DIGITAL_Rg = DIGITAL_rg + Me.jeVP = jeVP + End Sub + + Sub New(AVISO As VERAG_PROG_ALLGEMEIN.cAviso, SENDUNG_LIST As List(Of VERAG_PROG_ALLGEMEIN.cSendungen), DIGITAL As Boolean, DIGITAL_T1 As Boolean, DIGITAL_rg As Boolean, jeVP As Boolean) + + ' Dieser Aufruf ist für den Designer erforderlich. + InitializeComponent() + + ' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu. + Me.AvisoID = AVISO.AvisoID + Me.AVISO = AVISO + Me.SENDUNG_LIST = SENDUNG_LIST + Me.DIGITAL = DIGITAL + Me.DIGITAL_T1 = DIGITAL_T1 + Me.DIGITAL_Rg = DIGITAL_rg + Me.jeVP = jeVP + End Sub + + Public Shared Sub initDrucker(cboPrinter As ComboBox, Optional srch As String = "") + ' alle installierten Drucker ermitteln und + ' in in ein ArrayList-Objekt speichern + Dim sPrinters As New ArrayList + For Each sPrinter As String In PrinterSettings.InstalledPrinters + sPrinters.Add(sPrinter) + Next + + ' Array sortieren + sPrinters.Sort() + + ' jetzt alle Drucker in sortierter Reihenfolge in einer + ' ComboBox zur Auswahl anbieten + Dim oPS As New System.Drawing.Printing.PrinterSettings + For i As Integer = 0 To sPrinters.Count - 1 + cboPrinter.Items.Add(sPrinters(i)) + Next + + + If sPrinters.Count > 0 Then + cboPrinter.SelectedIndex = 0 + If srch <> "" Then + For Each i In cboPrinter.Items + If i.ToString.ToUpper.Contains(srch.ToUpper) Then + cboPrinter.SelectedItem = i + Exit Sub + End If + Next + Else + For Each i In cboPrinter.Items + If i.ToString = oPS.PrinterName Then + cboPrinter.SelectedItem = i + Exit Sub + End If + Next + End If + End If + End Sub + + + Sub initLZ() + + cbxVPSplit.Checked = jeVP + + dgvDigitalMailanfügen.Rows.Clear() + dgvLaufzettelDruck.Rows.Clear() + + Dim ANH_LIST As New List(Of VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge) + VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.LOAD_LIST_ByAviso(ANH_LIST, AvisoID) 'LÄDT alle Aviso-Anhänge + For Each ll In ANH_LIST + If ll.anh_LaufzettelDruck Then + dgvLaufzettelDruck.Rows.Add(ll.anh_id, ll.anh_Name, ll.anh_docId, ll.anh_Typ) + 'Select Case ll.anh_Typ + ' Case "PDF" : VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ll.anh_docId)}) + ' ' Case "BILD" : VERAG_PROG_ALLGEMEIN.cFormularManager.Print_PICTURE({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ll.anh_docId)}) + ' Case Else : Process.Start(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ll.anh_docId)) + 'End Select + End If + Next + + 'If loadAttachRg Then + If DIGITAL Then + If DIGITAL_T1 Then + 'Falls CMR, Vorpapier in den Unterlagen vorhanden, werden diese beigefügt + For Each l In ANH_LIST + Select Case l.anh_Art.ToString.ToUpper + Case "VORPAPIER" ', "CMR" + dgvDigitalMailanfügen.Rows.Add(l.anh_id, l.anh_Name, l.anh_docId) + End Select + Next + End If + + If DIGITAL_Rg Then + For Each s In SENDUNG_LIST + Select Case s.tblSnd_Abfertigungsart_ID + 'Falls RECHNUNGen in den Unterlagen vorhanden, werden diese beigefügt + Case "5", "45", "28", "26", "38" 'T1, Ü-T1, DE-FISK + Dim ANH_LIST_SND As New List(Of VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge) + VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.LOAD_LIST_BySendung(ANH_LIST_SND, s.tblSnd_SendungID) 'LÄDT alle Aviso-Anhänge + For Each l In ANH_LIST_SND + Select Case l.anh_Art.ToString.ToUpper + Case "RECHNUNG", "HANDELSRECHNUNG" + dgvDigitalMailanfügen.Rows.Add(l.anh_id, l.anh_Name, l.anh_docId) + 'Mail.Attachments.Add(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(l.anh_docId), Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue) + End Select + Next + End Select + Next + End If + + 'Markierte Anhänge + For Each l In ANH_LIST + 'Markierte: + If l.anh_GestellungslisteAnfuegen Then + dgvDigitalMailanfügen.Rows.Add(l.anh_id, l.anh_Name, l.anh_docId) + ' Mail.Attachments.Add(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(l.anh_docId), Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue) + End If + Next + End If + End Sub + + Private Sub frmLaufzettel_Load(sender As Object, e As EventArgs) Handles Me.Load + initDrucker(cboPrinter) + + If DIGITAL Then + cbxDigitalLZ.Enabled = True + dgvDigitalMailanfügen.Enabled = True + btnDIGITAL.Enabled = True + cbxDigitalLZ.Checked = True + CheckBox2.Checked = False + pnlZumZoll.Visible = False + Else + btnLaufzettelDrucken.Enabled = True + End If + + 'pnlZumZoll + If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA <> "FRONTOFFICE" And VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG <> "WAI" Then + CheckBox2.Checked = False ' Wenn nicht FO, dann normal nicht gewählt... + If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG <> "SUB" And VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG <> "WAI" Then '... und nur in SUBEN ersichtlich + pnlZumZoll.Visible = False + End If + End If + + If SENDUNG_LIST Is Nothing Then + SENDUNG_LIST = New List(Of VERAG_PROG_ALLGEMEIN.cSendungen) + VERAG_PROG_ALLGEMEIN.cSendungen.LOAD_LIST(SENDUNG_LIST, -1, AvisoID) 'LÄDT alle SENDUNGSDATEN + End If + initLZ() + + resetDGV(dgvDigitalMailanfügen) + resetDGV(dgvLaufzettelDruck) + End Sub + + Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click + Me.Close() + End Sub + + Private Sub btnLaufzettelDrucken_Click(sender As Object, e As EventArgs) Handles btnLaufzettelDrucken.Click + doLZ(False) + Me.Close() + End Sub + + Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click + AVISO.LOAD_Vorpapiere() + Dim VP_Enum = VERAG_PROG_ALLGEMEIN.cSendungen.VP_Enum(SENDUNG_LIST) 'Filtert nach eindeutigen Vorpapieren + + Dim paths As New List(Of String) + If Not genLZ(paths, False, VP_Enum) Then + Exit Sub + End If + + If paths.Count = 1 Then '1 Gestellungsliste + Process.Start(paths(0)) + ElseIf paths.Count > 0 Then 'Mehrere Gestellungslisten zusammenführen + Dim outputFile As String = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath("Gestellungsliste_Merge.pdf", ".pdf", True,, "Merge") ' "result.pdf" + VERAG_PROG_ALLGEMEIN.cFormularManager.mergePDFs(paths, outputFile) + Process.Start(outputFile) + End If + + End Sub + + Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click + printLZAnlagen() + End Sub + + Sub printLZAnlagen() + ' If cbxDigitalLZ.Checked Then + resetDGV(dgvLaufzettelDruck) + For Each r As DataGridViewRow In dgvLaufzettelDruck.Rows + Try + Dim typ = r.Cells("printTyp").Value + Dim path = VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(r.Cells("printDocId").Value) + + Select Case typ + Case "PDF" : VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({path}, cboPrinter.SelectedItem.ToString) + ' Case "BILD" : VERAG_PROG_ALLGEMEIN.cFormularManager.Print_PICTURE({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ll.anh_docId)}) + Case Else : Process.Start(path) + End Select + r.DefaultCellStyle.BackColor = Color.LimeGreen + dgvLaufzettelDruck.Refresh() + Catch ex As Exception + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, ) + End Try + Next + 'End If + End Sub + Sub printzZAnlagen() + ' Fahrer zum Zoll! + '------------------------------------------------ + + If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("PRINT_zumZOLL") Then + If CheckBox2.Checked Then + If VERAG_PROG_ALLGEMEIN.cAllgemein.NIEDERLASSUNG = "WAI" Then + Try + Dim path = SDL.FormularManagerNEU.zumZOLL_AVISO_WAI(AVISO) + If path <> "" Then VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaGS(path, cboPrinter.SelectedItem.ToString) '(New System.Drawing.Printing.PrinterSettings).PrinterName) + Catch ex As Exception : MsgBox(ex.Message & ex.StackTrace) : End Try + Else + Try + Dim path = SDL.FormularManagerNEU.zumZOLL_AVISO(AVISO, If(CheckBox3.Checked, "AT", If(CheckBox4.Checked, "DE", ""))) + If path <> "" Then VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaGS(path, cboPrinter.SelectedItem.ToString) '(New System.Drawing.Printing.PrinterSettings).PrinterName) + Catch ex As Exception : MsgBox(ex.Message & ex.StackTrace) : End Try + End If + End If + End If + + '------------------------------------------------ + End Sub + + Sub resetDGV(dgv As DataGridView) + + dgv.ClearSelection() + + For Each r As DataGridViewRow In dgv.Rows + r.DefaultCellStyle.BackColor = Color.White + Next + + End Sub + + Sub doLZ(digitalDruck) + Me.Cursor = Cursors.WaitCursor + + resetDGV(dgvDigitalMailanfügen) + resetDGV(dgvLaufzettelDruck) + Me.Refresh() + + + If Not digitalDruck Then + printzZAnlagen() + End If + + ' Dim loadAttachRg = True ' (sender Is Button15) + + 'Dim ANH_LIST As New List(Of VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge) + 'VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.LOAD_LIST_ByAviso(ANH_LIST, AvisoID) 'LÄDT alle Aviso-Anhänge + 'For Each l In ANH_LIST + ' If l.anh_LaufzettelDruck Then + ' If vbYes = MsgBox("Es wurden Anhänge zum Drucken markiert! Sollen diese gedruckt werden?", vbYesNoCancel) Then + ' For Each ll In ANH_LIST + ' If ll.anh_LaufzettelDruck Then + ' Select Case ll.anh_Typ + ' Case "PDF" : VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ll.anh_docId)}) + ' ' Case "BILD" : VERAG_PROG_ALLGEMEIN.cFormularManager.Print_PICTURE({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ll.anh_docId)}) + ' Case Else : Process.Start(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(ll.anh_docId)) + ' End Select + ' End If + ' Next + ' End If + ' Exit For + ' End If + 'Next + + 'DIGITALE ABFERTIGUNG: + If (digitalDruck) Or cbxVPSplit.Checked Then ' digital oder splittung --> per Vorpapier + Try + Dim SENDUNG_LIST As New List(Of VERAG_PROG_ALLGEMEIN.cSendungen) + VERAG_PROG_ALLGEMEIN.cSendungen.LOAD_LIST(SENDUNG_LIST, -1, AvisoID) 'LÄDT alle SENDUNGSDATEN + + AVISO.LOAD_Vorpapiere() + Dim VP_Enum = VERAG_PROG_ALLGEMEIN.cSendungen.VP_Enum(SENDUNG_LIST) 'Filtert nach eindeutigen Vorpapieren + + Dim paths As New List(Of String) + If Not genLZ(paths, digitalDruck, VP_Enum) Then + Me.Cursor = Cursors.Default + Exit Sub + End If + 'AVISO.LOAD_Vorpapiere() + 'Dim VP_Enum = VERAG_PROG_ALLGEMEIN.cSendungen.VP_Enum(SENDUNG_LIST) 'Filtert nach eindeutigen Vorpapieren + + 'Dim paths As New List(Of String) + 'If pruef Then paths.Add(SDL.FormularManagerNEU.LaufzettelZollDE_VP(AvisoID, False,, "XXXX")) + 'For Each VP In VP_Enum + ' paths.Add(SDL.FormularManagerNEU.LaufzettelZollDE_VP(AvisoID, False,, VP)) + 'Next + + + If digitalDruck Then 'NUR BEI DIGITALANMELDUNG! + + Dim outl As New Outlook.Application + Dim Mail As Microsoft.Office.Interop.Outlook.MailItem + Mail = outl.CreateItem(0) + + Dim tX As VERAG_PROG_ALLGEMEIN.cTextkonserve = Nothing + Select Case AVISO.Grenzstelle + Case "SUB" + Mail.To = "abfertigung.za-suben@zoll.bund.de" + tX = New VERAG_PROG_ALLGEMEIN.cTextkonserve("LAUFZETTEL_DIGITAL", "LAUFZETTEL_DE_DIGITAL_SUB", "DE", VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA) + Case "WAI" + Mail.To = "" + tX = New VERAG_PROG_ALLGEMEIN.cTextkonserve("LAUFZETTEL_DIGITAL", "LAUFZETTEL_DE_DIGITAL_WAI", "DE", VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA) + Case "SBG" + Mail.To = "" + tX = New VERAG_PROG_ALLGEMEIN.cTextkonserve("LAUFZETTEL_DIGITAL", "LAUFZETTEL_DE_DIGITAL_SBG", "DE", VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA) + Case Else + Mail.To = "" + tX = New VERAG_PROG_ALLGEMEIN.cTextkonserve("LAUFZETTEL_DIGITAL", "LAUFZETTEL_DE_DIGITAL_SUB", "DE", VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA) + End Select + + Dim MAIL_SUBJ = tX.txt_betreff.Replace("%LKWKennzeichen%", AVISO.LKW_Nr) + Dim MAIL_BODY = tX.txt_text.Replace("%LKWKennzeichen%", AVISO.LKW_Nr) + + addVPList(MAIL_BODY, VP_Enum) + Mail.HTMLBody = "
" & MAIL_BODY & SDL.cFakturierung.getSignature("DE", tX.txt_firmaSig, True, True) & "
" + Mail.Subject = MAIL_SUBJ + If VP_Enum.Count > 1 Then + Mail.Subject &= ", " & VP_Enum.Count & "x Vorpapier" + ElseIf VP_Enum.Count = 1 Then + Mail.Subject &= ", " & VP_Enum(0) + End If + + For Each p In paths + Mail.Attachments.Add(p, Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue, , "Gestellungsliste.pdf") + Next + + + If cbxDigitalLZ.Checked Then + For Each r As DataGridViewRow In dgvDigitalMailanfügen.Rows + Try + Dim path = VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(r.Cells("DocId").Value) + Mail.Attachments.Add(path, Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue) + + r.DefaultCellStyle.BackColor = Color.LimeGreen + dgvDigitalMailanfügen.Refresh() + Catch ex As Exception + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, ) + End Try + Next + End If + + 'If loadAttachRg Then + ' If cbxLZT1.Visible AndAlso cbxLZT1.Checked Then + ' 'Falls CMR, Vorpapier in den Unterlagen vorhanden, werden diese beigefügt + ' For Each l In ANH_LIST + ' Select Case l.anh_Art.ToString.ToUpper + ' Case "VORPAPIER" ', "CMR" + ' Mail.Attachments.Add(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(l.anh_docId), Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue) + ' End Select + ' Next + ' End If + + ' If cbxLZRg.Visible AndAlso cbxLZRg.Checked Then + ' For Each s In SENDUNG_LIST + ' Select Case s.tblSnd_Abfertigungsart_ID + ' 'Falls RECHNUNGen in den Unterlagen vorhanden, werden diese beigefügt + ' Case "5", "45", "28", "26", "38" 'T1, Ü-T1, DE-FISK + ' Dim ANH_LIST_SND As New List(Of VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge) + ' VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.LOAD_LIST_BySendung(ANH_LIST_SND, s.tblSnd_SendungID) 'LÄDT alle Aviso-Anhänge + ' For Each l In ANH_LIST_SND + ' Select Case l.anh_Art.ToString.ToUpper + ' Case "RECHNUNG", "HANDELSRECHNUNG" + ' Mail.Attachments.Add(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(l.anh_docId), Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue) + ' End Select + ' Next + ' End Select + ' Next + ' End If + 'End If + + 'Markierte Anhänge + 'For Each l In ANH_LIST + ' 'Markierte: + ' If l.anh_GestellungslisteAnfuegen Then + ' Mail.Attachments.Add(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(l.anh_docId), Microsoft.Office.Interop.Outlook.OlAttachmentType.olByValue) + ' End If + 'Next + Mail.Display() + + Else 'Keine Digitalabfertigung, DRUCK! + Try + + For Each p In paths + VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({p}, cboPrinter.SelectedItem.ToString) + Next + + 'If paths.Count = 1 Then '1 Gestellungsliste + ' Process.Start(paths(0)) + 'ElseIf paths.Count > 0 Then 'Mehrere Gestellungslisten zusammenführen + ' Dim outputFile As String = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath("Gestellungsliste_Merge.pdf", ".pdf", True,, "Merge") ' "result.pdf" + ' VERAG_PROG_ALLGEMEIN.cFormularManager.mergePDFs(paths, outputFile) + ' Process.Start(outputFile) + 'End If + Catch ex As Exception + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, ) + End Try + End If + + + + Catch ex As Exception + MsgBox("Fehler beim erstellen der E-Mail:" & vbNewLine & ex.Message & ex.StackTrace) + End Try + + Else + Dim path = SDL.FormularManagerNEU.LaufzettelZollDE(AvisoID, False) + If path <> "" Then + 'Process.Start(path) + VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({path}, cboPrinter.SelectedItem.ToString) + End If + + End If + + If cbxDokumenteDrucken.Checked Then + printLZAnlagen() + End If + + Me.Cursor = Cursors.Default + End Sub + + + Function genLZ(ByRef paths As List(Of String), digitalDruck As Boolean, VP_Enum As List(Of String)) As Boolean + Dim pruef = False + For Each s In SENDUNG_LIST + Select Case s.tblSnd_Abfertigungsart_ID.ToString + Case "38", "26" 'AT - Keine Prüfung + Case Else + If If(s.tblSnd_Vorpapier, "") = "" And If(s.tblSnd_Vorpapier2, "") = "" And If(s.tblSnd_Vorpapier3, "") = "" Then + pruef = True + End If + End Select + Next + + If pruef Then ' VP fehlen + If Not digitalDruck Then 'Wenn LZ Druck + If vbYes <> MsgBox("Nicht alle Sendungen haben ein Vorpapier eingetragen!" & vbNewLine & "Soll der Laufzettel trotzdem erstellt werden?", vbYesNoCancel) Then + Return False + End If + Else ' Digitalabfertigungn + MsgBox("Nicht alle Sendungen haben ein Vorpapier eingetragen!" & vbNewLine & "Laufzettelerstellung wird abgebrochen.") + Return False + End If + End If + + + paths = New List(Of String) + If pruef Then paths.Add(SDL.FormularManagerNEU.LaufzettelZollDE_VP(AvisoID, False,, "XXXX")) + For Each VP In VP_Enum + paths.Add(SDL.FormularManagerNEU.LaufzettelZollDE_VP(AvisoID, False,, VP)) + Next + + Return True + End Function + Sub addVPList(ByRef MAIL_BODY As String, VP_Enum As List(Of String)) + Dim Platzhalter = "

" + Platzhalter &= "" + For Each VP In VP_Enum + Platzhalter &= "" + Next + Platzhalter &= "
Vorpapier:
" & VP & "
" + MAIL_BODY = MAIL_BODY.Replace("%Platzhalter%", Platzhalter) + End Sub + + Private Sub btnDIGITAL_Click(sender As Object, e As EventArgs) Handles btnDIGITAL.Click + doLZ(True) + End Sub + + Private Sub CheckBox3_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox3.CheckedChanged + If sender.checked Then + CheckBox4.Checked = False + End If + End Sub + + Private Sub CheckBox4_CheckedChanged(sender As Object, e As EventArgs) Handles CheckBox4.CheckedChanged + If sender.checked Then + CheckBox3.Checked = False + End If + End Sub + + Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click + printzZAnlagen() + End Sub +End Class \ No newline at end of file diff --git a/Aviso/frmSendungsdetailsNEU.Designer.vb b/Aviso/frmSendungsdetailsNEU.Designer.vb index 5341c1e..929a9fe 100644 --- a/Aviso/frmSendungsdetailsNEU.Designer.vb +++ b/Aviso/frmSendungsdetailsNEU.Designer.vb @@ -23,8 +23,8 @@ Partial Class frmSendungsdetailsNEU Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() - Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmSendungsdetailsNEU)) + Dim DataGridViewCellStyle1 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle2 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle3 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle4 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() @@ -35,8 +35,10 @@ Partial Class frmSendungsdetailsNEU Me.Panel4 = New System.Windows.Forms.Panel() Me.TabControl1 = New System.Windows.Forms.TabControl() Me.tbAnhang = New System.Windows.Forms.TabPage() + Me.btnDirektAnfuegen = New System.Windows.Forms.Button() Me.dgvAnhang = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components) Me.Panel19 = New System.Windows.Forms.Panel() + Me.btnQuckScan = New System.Windows.Forms.Button() Me.Panel21 = New System.Windows.Forms.Panel() Me.Label53 = New System.Windows.Forms.Label() Me.btnEORIPruef = New System.Windows.Forms.Button() @@ -48,7 +50,6 @@ Partial Class frmSendungsdetailsNEU Me.btnPDFZusammenfueren = New System.Windows.Forms.Button() Me.btnMailVorlage = New System.Windows.Forms.Button() Me.btnOptionen = New System.Windows.Forms.Button() - Me.btnDirektAnfuegen = New System.Windows.Forms.Button() Me.btnImportAssi = New System.Windows.Forms.Button() Me.lblAnhaenge = New System.Windows.Forms.Label() Me.tbKundenInfo = New System.Windows.Forms.TabPage() @@ -72,6 +73,10 @@ Partial Class frmSendungsdetailsNEU Me.ToolStripMenuItem20 = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem18 = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem19 = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem21 = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem22 = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem23 = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem24 = New System.Windows.Forms.ToolStripMenuItem() Me.ToolStripMenuItem12 = New System.Windows.Forms.ToolStripMenuItem() Me.TabPage1 = New System.Windows.Forms.TabPage() Me.pnlKundenZolltarif = New System.Windows.Forms.Panel() @@ -371,6 +376,7 @@ Partial Class frmSendungsdetailsNEU Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components) Me.ToolStripMenuItem14 = New System.Windows.Forms.ToolStripMenuItem() Me.NurÖffnenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.pnl.SuspendLayout() Me.Panel4.SuspendLayout() Me.TabControl1.SuspendLayout() @@ -471,6 +477,7 @@ Partial Class frmSendungsdetailsNEU ' 'tbAnhang ' + Me.tbAnhang.Controls.Add(Me.btnDirektAnfuegen) Me.tbAnhang.Controls.Add(Me.dgvAnhang) Me.tbAnhang.Controls.Add(Me.Panel19) Me.tbAnhang.Location = New System.Drawing.Point(4, 22) @@ -480,6 +487,21 @@ Partial Class frmSendungsdetailsNEU Me.tbAnhang.Text = "Anhang" Me.tbAnhang.UseVisualStyleBackColor = True ' + 'btnDirektAnfuegen + ' + Me.btnDirektAnfuegen.Enabled = False + Me.btnDirektAnfuegen.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnDirektAnfuegen.Image = CType(resources.GetObject("btnDirektAnfuegen.Image"), System.Drawing.Image) + Me.btnDirektAnfuegen.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnDirektAnfuegen.Location = New System.Drawing.Point(648, 75) + Me.btnDirektAnfuegen.Name = "btnDirektAnfuegen" + Me.btnDirektAnfuegen.Size = New System.Drawing.Size(142, 34) + Me.btnDirektAnfuegen.TabIndex = 4 + Me.btnDirektAnfuegen.Text = "Direkt anfügen ..." + Me.btnDirektAnfuegen.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnDirektAnfuegen.UseVisualStyleBackColor = True + Me.btnDirektAnfuegen.Visible = False + ' 'dgvAnhang ' Me.dgvAnhang.AKTUALISIERUNGS_INTERVALL = -1 @@ -508,11 +530,11 @@ Partial Class frmSendungsdetailsNEU ' 'Panel19 ' + Me.Panel19.Controls.Add(Me.btnQuckScan) Me.Panel19.Controls.Add(Me.Panel21) Me.Panel19.Controls.Add(Me.btnPDFZusammenfueren) Me.Panel19.Controls.Add(Me.btnMailVorlage) Me.Panel19.Controls.Add(Me.btnOptionen) - Me.Panel19.Controls.Add(Me.btnDirektAnfuegen) Me.Panel19.Controls.Add(Me.btnImportAssi) Me.Panel19.Controls.Add(Me.lblAnhaenge) Me.Panel19.Dock = System.Windows.Forms.DockStyle.Top @@ -521,6 +543,21 @@ Partial Class frmSendungsdetailsNEU Me.Panel19.Size = New System.Drawing.Size(1206, 45) Me.Panel19.TabIndex = 0 ' + 'btnQuckScan + ' + Me.btnQuckScan.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnQuckScan.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnQuckScan.Image = CType(resources.GetObject("btnQuckScan.Image"), System.Drawing.Image) + Me.btnQuckScan.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnQuckScan.Location = New System.Drawing.Point(631, 5) + Me.btnQuckScan.Name = "btnQuckScan" + Me.btnQuckScan.Size = New System.Drawing.Size(107, 34) + Me.btnQuckScan.TabIndex = 108 + Me.btnQuckScan.Text = "Quick-Scan" + Me.btnQuckScan.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnQuckScan.UseVisualStyleBackColor = True + Me.btnQuckScan.Visible = False + ' 'Panel21 ' Me.Panel21.BackColor = System.Drawing.Color.FromArgb(CType(CType(255, Byte), Integer), CType(CType(255, Byte), Integer), CType(CType(192, Byte), Integer)) @@ -655,20 +692,6 @@ Partial Class frmSendungsdetailsNEU Me.btnOptionen.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.btnOptionen.UseVisualStyleBackColor = True ' - 'btnDirektAnfuegen - ' - Me.btnDirektAnfuegen.Enabled = False - Me.btnDirektAnfuegen.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.btnDirektAnfuegen.Image = CType(resources.GetObject("btnDirektAnfuegen.Image"), System.Drawing.Image) - Me.btnDirektAnfuegen.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.btnDirektAnfuegen.Location = New System.Drawing.Point(630, 5) - Me.btnDirektAnfuegen.Name = "btnDirektAnfuegen" - Me.btnDirektAnfuegen.Size = New System.Drawing.Size(129, 34) - Me.btnDirektAnfuegen.TabIndex = 4 - Me.btnDirektAnfuegen.Text = "Direkt anfügen ..." - Me.btnDirektAnfuegen.TextAlign = System.Drawing.ContentAlignment.MiddleRight - Me.btnDirektAnfuegen.UseVisualStyleBackColor = True - ' 'btnImportAssi ' Me.btnImportAssi.FlatStyle = System.Windows.Forms.FlatStyle.Flat @@ -800,7 +823,7 @@ Partial Class frmSendungsdetailsNEU ' 'MenuStrip ' - Me.MenuStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem13, Me.ToolStripMenuItem7, Me.ToolStripMenuItem6, Me.ToolStripMenuItem11, Me.ToolStripMenuItem17, Me.ToolStripMenuItem12}) + Me.MenuStrip.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem13, Me.ToolStripMenuItem7, Me.ToolStripMenuItem6, Me.ToolStripMenuItem11, Me.ToolStripMenuItem17, Me.ToolStripMenuItem21, Me.ToolStripMenuItem12}) Me.MenuStrip.Location = New System.Drawing.Point(0, 0) Me.MenuStrip.Name = "MenuStrip" Me.MenuStrip.Size = New System.Drawing.Size(1206, 24) @@ -906,6 +929,40 @@ Partial Class frmSendungsdetailsNEU Me.ToolStripMenuItem19.Size = New System.Drawing.Size(95, 22) Me.ToolStripMenuItem19.Text = "T2" ' + 'ToolStripMenuItem21 + ' + Me.ToolStripMenuItem21.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripMenuItem22, Me.ToolStripMenuItem23, Me.ToolStripMenuItem24}) + Me.ToolStripMenuItem21.Image = Global.AVISO.My.Resources.Resources.plus + Me.ToolStripMenuItem21.Name = "ToolStripMenuItem21" + Me.ToolStripMenuItem21.Padding = New System.Windows.Forms.Padding(8, 0, 8, 0) + Me.ToolStripMenuItem21.Size = New System.Drawing.Size(71, 20) + Me.ToolStripMenuItem21.Text = " MIC" + Me.ToolStripMenuItem21.ToolTipText = "Neue Zollanmeldung" + ' + 'ToolStripMenuItem22 + ' + Me.ToolStripMenuItem22.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1 + Me.ToolStripMenuItem22.Name = "ToolStripMenuItem22" + Me.ToolStripMenuItem22.Size = New System.Drawing.Size(176, 22) + Me.ToolStripMenuItem22.Text = "MIC Import senden" + ' + 'ToolStripMenuItem23 + ' + Me.ToolStripMenuItem23.Font = New System.Drawing.Font("Segoe UI", 9.0!) + Me.ToolStripMenuItem23.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1 + Me.ToolStripMenuItem23.Name = "ToolStripMenuItem23" + Me.ToolStripMenuItem23.Size = New System.Drawing.Size(176, 22) + Me.ToolStripMenuItem23.Text = "MIC Transit senden" + ' + 'ToolStripMenuItem24 + ' + Me.ToolStripMenuItem24.Enabled = False + Me.ToolStripMenuItem24.Font = New System.Drawing.Font("Segoe UI", 9.0!) + Me.ToolStripMenuItem24.Image = Global.AVISO.My.Resources.Resources.weiterleiten_small1 + Me.ToolStripMenuItem24.Name = "ToolStripMenuItem24" + Me.ToolStripMenuItem24.Size = New System.Drawing.Size(176, 22) + Me.ToolStripMenuItem24.Text = "MIC Export senden" + ' 'ToolStripMenuItem12 ' Me.ToolStripMenuItem12.Image = Global.AVISO.My.Resources.Resources.android_note @@ -4409,40 +4466,40 @@ Partial Class frmSendungsdetailsNEU ' 'cntxtAnh ' - Me.cntxtAnh.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MarkiertePDFsDruckenToolStripMenuItem, Me.EMailAnfügenToolStripMenuItem, Me.KopierenZwischenablageToolStripMenuItem, Me.LaufzetteldruckJANEINToolStripMenuItem, Me.GestellungslisteAnfügenJANEINToolStripMenuItem}) + Me.cntxtAnh.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MarkiertePDFsDruckenToolStripMenuItem, Me.EMailAnfügenToolStripMenuItem, Me.KopierenZwischenablageToolStripMenuItem, Me.LaufzetteldruckJANEINToolStripMenuItem, Me.GestellungslisteAnfügenJANEINToolStripMenuItem, Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem}) Me.cntxtAnh.Name = "cntxtAnh" - Me.cntxtAnh.Size = New System.Drawing.Size(251, 114) + Me.cntxtAnh.Size = New System.Drawing.Size(286, 158) ' 'MarkiertePDFsDruckenToolStripMenuItem ' Me.MarkiertePDFsDruckenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.pdfprint Me.MarkiertePDFsDruckenToolStripMenuItem.Name = "MarkiertePDFsDruckenToolStripMenuItem" - Me.MarkiertePDFsDruckenToolStripMenuItem.Size = New System.Drawing.Size(250, 22) + Me.MarkiertePDFsDruckenToolStripMenuItem.Size = New System.Drawing.Size(285, 22) Me.MarkiertePDFsDruckenToolStripMenuItem.Text = "Markierte PDFs drucken" ' 'EMailAnfügenToolStripMenuItem ' Me.EMailAnfügenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.email_big1 Me.EMailAnfügenToolStripMenuItem.Name = "EMailAnfügenToolStripMenuItem" - Me.EMailAnfügenToolStripMenuItem.Size = New System.Drawing.Size(250, 22) + Me.EMailAnfügenToolStripMenuItem.Size = New System.Drawing.Size(285, 22) Me.EMailAnfügenToolStripMenuItem.Text = "E-Mail anfügen" ' 'KopierenZwischenablageToolStripMenuItem ' Me.KopierenZwischenablageToolStripMenuItem.Name = "KopierenZwischenablageToolStripMenuItem" - Me.KopierenZwischenablageToolStripMenuItem.Size = New System.Drawing.Size(250, 22) + Me.KopierenZwischenablageToolStripMenuItem.Size = New System.Drawing.Size(285, 22) Me.KopierenZwischenablageToolStripMenuItem.Text = "Kopieren (Zwischenablage)" ' 'LaufzetteldruckJANEINToolStripMenuItem ' Me.LaufzetteldruckJANEINToolStripMenuItem.Name = "LaufzetteldruckJANEINToolStripMenuItem" - Me.LaufzetteldruckJANEINToolStripMenuItem.Size = New System.Drawing.Size(250, 22) + Me.LaufzetteldruckJANEINToolStripMenuItem.Size = New System.Drawing.Size(285, 22) Me.LaufzetteldruckJANEINToolStripMenuItem.Text = "Laufzetteldruck JA/NEIN" ' 'GestellungslisteAnfügenJANEINToolStripMenuItem ' Me.GestellungslisteAnfügenJANEINToolStripMenuItem.Name = "GestellungslisteAnfügenJANEINToolStripMenuItem" - Me.GestellungslisteAnfügenJANEINToolStripMenuItem.Size = New System.Drawing.Size(250, 22) + Me.GestellungslisteAnfügenJANEINToolStripMenuItem.Size = New System.Drawing.Size(285, 22) Me.GestellungslisteAnfügenJANEINToolStripMenuItem.Text = "Gestellungsliste anfügen JA/NEIN" ' 'ToolStripMenuItem3 @@ -4779,6 +4836,13 @@ Partial Class frmSendungsdetailsNEU Me.NurÖffnenToolStripMenuItem.Size = New System.Drawing.Size(247, 22) Me.NurÖffnenToolStripMenuItem.Text = "nur öffnen" ' + 'AbrechungFremdeGrenzeAktDruckenToolStripMenuItem + ' + Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.printer + Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Name = "AbrechungFremdeGrenzeAktDruckenToolStripMenuItem" + Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Size = New System.Drawing.Size(285, 22) + Me.AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Text = "Abrechung: Fremde Grenze Akt drucken" + ' 'frmSendungsdetailsNEU ' Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!) @@ -5214,4 +5278,10 @@ Partial Class frmSendungsdetailsNEU Public WithEvents txtAnzahlPos As VERAG_PROG_ALLGEMEIN.MyTextBox Friend WithEvents Label4 As Label Friend WithEvents AuftragATANAKToolStripMenuItem As ToolStripMenuItem + Friend WithEvents btnQuckScan As Button + Friend WithEvents ToolStripMenuItem21 As ToolStripMenuItem + Friend WithEvents ToolStripMenuItem22 As ToolStripMenuItem + Friend WithEvents ToolStripMenuItem23 As ToolStripMenuItem + Friend WithEvents ToolStripMenuItem24 As ToolStripMenuItem + Friend WithEvents AbrechungFremdeGrenzeAktDruckenToolStripMenuItem As ToolStripMenuItem End Class diff --git a/Aviso/frmSendungsdetailsNEU.resx b/Aviso/frmSendungsdetailsNEU.resx index 66b1bb3..02d41b0 100644 --- a/Aviso/frmSendungsdetailsNEU.resx +++ b/Aviso/frmSendungsdetailsNEU.resx @@ -118,6 +118,65 @@ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V + kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw + fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx + mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg== + + + + + iVBORw0KGgoAAAANSUhEUgAAAB4AAAAeCAYAAAA7MK6iAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAApmSURBVEhLrZd3WFRHF8YvXWUJgtQtCihRqkGC6Ec0 + xk4MJioaoiYSwEIEgoKIUSCJESWQxKBCsKCAofe+9F1pC+wuvTcpokiRFpSob2ZXA/nqP1/med6duTPn + nN89M3PvnaUAUGFht6mSslJxe3Jyclt+Qf6XqWmp59Mz0q+TOjwpOSkjKSkpLzEpMS8hMaEqPiG+iaiZ + tCuIRH25iYmJ2cQuLiU1JZT4hGRkZFzIyMzwzszMPPbw4cNdotgPWoWUo89lMUf8kx4fRhUW5Kv09vXH + NTU3oaWlBW1tbejo6EBnZye6u7tw/3437vfcR29PD3p7e2fV0zt33UPGuoldd3c3Ors6xf7t7e1obW3F + 8MhoUVd18QoP35/nwNu+iqdu/hLS3MCvwOCDXtL1Ang5Q+rfX7X/z/L86RSejg8hJy3xmblrqAzpegVW + dUhYG3Q9FJwSHrKLysDhN4MjaJ1VkUj8FnCFbWKxi8qRmpWHtOw85HDKUVLTgbL6LpTWdoLX0I2Kph5U + NfdC2NaPmrY+COtbMDAwgMK8fBi5JX48C978ddqHafd4sA9mw8T2EpZutMWK9x2x3PK1th+F7tbDpD6G + ZZvtoKy/EfLaZpDXMoOS3gax/XLLY2KbN4mNyEfkv0JUk/5N7jdwNCSXJNCAIyGlJ2fBi5zYEvt/ZufZ + hhTAyDECEjQGGaH+iyRBySiAmr8I1DxlUNLy/8FmTpJKOjA5mYC9gTlwDOW2stwK5s+CVV2LqIVfpCmu + d7s9usbhCjRMPyIjBCBylpAmoAWQmK8ESQV1SC9kQEZ5MWQWaUFWeQlklBZDSpEOiQUqoGRpxEfqld9r + qRlugalDEHZ+HQNtj1wjBedcMVP8wziRQal5llOLHeMPLbOwxiK9d0DTsYCC7lYoG3wAFWMrqL61E2pE + 6iYiWZH2DqgabYOKwSYoL18HRZ3VoLGMIaemCykFDRJZEhLScnhDxwzL138MQ/c0T+VTJRTTNVtyDuyS + S7FOFS5keAtlVd8/fU1SRu6lLMlKfokZaCKRtVTQXv0XkWstUzJmIoYtoOtDRlUXFI1OslaBjIoWmRUW + mQ0mZOQXQsvKLZHlU0OjnypcRHfOnMuY6VJIMd1yacyva2QZR6M+VNYxfaGktRLK2sZEK6GkZYyFS4yh + uNgYCqyVWMB4C3KMVZDUXAUJuhlklqyFov5maL97ALrbDmO+znqoGbwLDcMN0NB9G6zPbzhq+tRKEIaK + pkvaHFjTOVUElqJ7CajFey9E6JjugPbO89Dadw3MXYFQsboK1Y/I2u8OBHNfIJbaXIbR/gCsc7iMD8mO + PXIxEudusBGUWYsMYS+2u4eDWu2DJbv8obV6D1g73DiMs+ULmG55spouf8lY83g6RT9ZQDFPFSiu2HWm + 33CXJ1ifJoD2bhSW7InEP1zisME9ETt9UnDw+wwcv5qDszfz4R9TjJC0SoTn1CC6oA4JRXXgVrej5tEU + 9A6mgDILg/FnAdB/32WGeSJTj+7OoRjOeXNgulMmpe7GoXS+TFq7xsYbq1wjQP8kDjSzEKhv/BmH3P3g + 5ncLJy6FwfNyDHyCU3DxDhs/RhUhOKkUYVl8xBFoRnkr8oSdePRkDLz6PtC2/4qF1tex/tNvoO2csEXd + rZhiOP3TrmZTSidLKOMvo+x3OPnjbe8MaOxNgOr2MMhaxWG17Q18ExSN01dT4HMjE34ReQiMu4eb6TxE + 5lUjpbgJufx2lDT2orpzEM29IyQsUNE1DrUj8TC394PZybseyu48inmiaA6s6V5EKbhwKKvTIcEOl0Kx + yicfi6xioLYnCqr2mZDfF4cvLkQhOKEAAZFF+CWZZJnNR3xRPTJ55HVa043K1gdo6h1Gz9AkRqd/x/OX + YjZSGwax0vEKdntcKVQ7UUJYFXNgaTV98hToUhcu+fd5xXFg7FWENyx/hfpniWA4ZmL+sQIYOCUjPLkI + EWw+okiWqSVNyBN0oLSxDzVdg+h4OIbB8aeY/pP4l5Ih6AT5Kr3QWGaqKKVmMAcWlWXq841L8rMRmC+A + 4Tku5C0joHk4DQxnNliexZA4UoBTIYWorG1BenkLOLX3UdU2l+XY9PP/+R1raOuGkY66tYhFLufA9nZ2 + Xs9GHyG6ohm0z9LI43AdlE0SJOyyIOVYCMqJB+poLhK4jWjvf4yGnmEMPHmKp/+a4MuXeDg8iYrGB4hm + 1+NiBA+JnGo8GR3G2bPnwv8NnJKcXCn69nLqurD1TCbeOZWFbb5cWAaUwfJyFaxu1MPIvxruJNDg8Bju + D46jc2AYnf2DqO/oI349iCnpwPeJ1Th67R62e2fB0IHsE+vbCEwuw8zUCAT8qkE5OTnpWbAaKePj46QJ + PH78GMOPB0hrBs+mJzA9OYaJ0SGMDw/iGWlX1jYj914lKgT1KKuqRTmpSwWNKKvrQDn5Ftd2DqD70ROM + Tk3jOYkyOTWBkeFhcWxRMTAwMCTVKzCLybJ4Qp69Fy9e4B6Xi9xsNspKilFOxCstRTW/CnU1QtQK+Wis + r0G1UIDGhga0t7WihRyVGurrUFctQENdDbERQFBVKfbjlZahmMsBp6gQ4xMTYrCpqan1LPjNN5cfmpiY + xLOZZ/juuwvw8PgK58/7wtfXD35+Abh6NQgxsTG4ezccsXExKCY31NLajGYC5XAKERMTjajoSNwJC8cP + P1wW+/j6XiKxfMWxfHy+FZ+/XpL137Jl67ezYAsLC7+Zmd8xPT2NwCtXcYWAIiOjER0di7j4eMTGxiM5 + ORUpKSkEHIuEhHhkZ2cjJycH5FQJcgIlY6nENhHRMbEIC49AaWkJSoj8A34iN/MTOTR2ERRgY/NJzCyY + 3EWUuJeU0Nt3SLA0lJWVi1VRUQk+XyBWdXUtauvqwSN9XG4xybwUVVUC1NbWQSAQkjZfbF9cXIKmpmbU + EdvUtHTcuhWKR48GxfEdHA5zSfUKrK2tc7eOOHeS6bhzJwx9ff0YH58gG20Iw8MjGBl9AtEeGBsbF0u0 + LFOTv2GS1KJr0dgosRkZGcHjoSHxBu3pER13e0nfqHjGiu8Vo40cc9esWVs4CybFVV9PD7a2tti/f//s + tPwdZWhoGPZ29ti3dy/MzMxEsB9J9yz4baLB9zZuwob3NoK1mIVVpquwafMm7NmzB3b2dnA94QpvH2/4 + +/sjKCiITN8t3L5zm9Q3ce3aNbKh/MgL4iyOOx3HgYMHYLnDEu+ssxDHIk8raa8XgUQ6MAum0WhKUlJS + XvLytB5NTc2XklKvD3p/g+bNkwOdQQeDyZwisWNZLNbcc0zeJpSMjAxdWlr6A2VlZTcTE5OAnVY7Iw4d + OpTt7Oxc6e7u3nrmzJn+c+fODZF6/PTp05Oenp5TRL+JRPqmyNi4l5fXCKkHSObtHh4eVU5OTmybj23C + 1q9bd3Hp0qWfE6i+kpLS3D+JP4ukpCQlLy9P0el0WbIeimS9GSSIXnBwsHlsbOyWrKys3Vwu9yCPx7MX + CARHhELhMT6ff7SiosJe1M9ms3fHxcVtJVNvTsDLra2tNczNzeWZTKbEvHnzXlNETFB/AFyHwBGvedXw + AAAAAElFTkSuQmCC + + iVBORw0KGgoAAAANSUhEUgAAASwAAAEsCAYAAAB5fY51AAAABGdBTUEAALGPC/xhBQAAAAd0SU1FB9YD @@ -1462,14 +1521,6 @@ kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg== - - - - - iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V - kEEKgCAQRfVKeaaOEXSL6hbRNrC9dQ3PUd/IxagLGcZFA48PjjyYrzCd1vqWAC7TTog8wFiBTUUR7Igw - fK6ZIRVFsGsolKCtEFl7cmneGpBEuIGeyZoJJSBCpAcXE18Sindow4LJngklIELk8j1wmEpC8Q5PMDNx - mVCCPwiVeQBaqAV4Jfq5XQAAAABJRU5ErkJggg== diff --git a/Aviso/frmSendungsdetailsNEU.vb b/Aviso/frmSendungsdetailsNEU.vb index 492e7c8..93758b9 100644 --- a/Aviso/frmSendungsdetailsNEU.vb +++ b/Aviso/frmSendungsdetailsNEU.vb @@ -209,7 +209,7 @@ Public Class frmSendungsdetailsNEU initDataBinding() End If 'bsSendungen.Position = tmpsendId ' bsSendungen.Find("tblSnd_SendungID", SendungID) - Catch ex As Exception : MsgBox(ex.Message) : End Try + Catch ex As Exception : VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) : End Try e.Handled = True e.SuppressKeyPress = True End If @@ -326,14 +326,18 @@ Public Class frmSendungsdetailsNEU TabControl1.TabPages.Remove(tbZollabfertigung) End If - If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("Vorauskasse", Me) Then - btnImportaviso.Visible = True - btnVorauszahlung.Visible = True - ' ToolStripMenuItem13.Enabled = True + If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_ANHAENGE_QuickScan", Me) Then + btnQuckScan.Visible = True End If + If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("Vorauskasse", Me) Then + btnImportaviso.Visible = True + btnVorauszahlung.Visible = True + ' ToolStripMenuItem13.Enabled = True + End If - cboFiliale._allowFreiText = Nothing + + cboFiliale._allowFreiText = Nothing Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.CLUSTER Case "FRONTOFFICE" cboFiliale._allowFreiText = Nothing @@ -487,7 +491,7 @@ Public Class frmSendungsdetailsNEU 'If RadioButton.Checked Then initKundenzolltarifChecked(txtAuftraggeber) If cboZolltarif._value = 0 Then initKundenzolltarifChecked(txtAuftraggeber) Catch ex As Exception - MsgBox(ex.Message & vbNewLine & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try initWarnKd_AndKdInfo(txtAuftraggeber, picWarnAuftraggeber) @@ -566,7 +570,7 @@ Public Class frmSendungsdetailsNEU Catch ex As Exception closeWithoutSave = True - MsgBox("Fehler beim Laden der Sendungsdaten." & ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler beim Laden der Sendungsdaten.") Me.Close() End Try End Sub @@ -650,7 +654,7 @@ Public Class frmSendungsdetailsNEU End If Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -718,7 +722,7 @@ Public Class frmSendungsdetailsNEU Catch ex As Exception 'evtl. bei poschanged fehler - MsgBox("BUTTON; " & ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -876,6 +880,15 @@ Public Class frmSendungsdetailsNEU newRow.tblSnd_Colli = "" newRow.tblSnd_Gewicht = "" newRow.tblSnd_Colli = "" + + newRow.tblSnd_VG_MA = Nothing + newRow.tblSnd_Vorgeschrieben = Nothing + newRow.tblSnd_QS_MA = Nothing + newRow.tblSnd_Vorbereitet = Nothing + newRow.tblSnd_AbklaerungTR = Nothing + newRow.tblSnd_AbklaerungTR_MA = Nothing + + newRow.tblSnd_SendungID = -1 newRow.ABRECHNUNG.Clear() SENDUNG_LIST.Add(newRow) @@ -1215,7 +1228,7 @@ Public Class frmSendungsdetailsNEU pnlT1.Controls.Add(usrcntl_ATA) Case 44 usrcntl_ATB.txtATBT1.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_ATB_T1, "") - usrcntl_ATB.txtATbNr.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_ATB_Nr, "") + usrcntl_ATB.txtATBNr.Text = loadValue(SENDUNG_LIST(CURRENT_INDEX).tblSnd_ATB_Nr, "") pnlT1.Controls.Add(usrcntl_ATB) End Select @@ -1269,7 +1282,7 @@ Public Class frmSendungsdetailsNEU 'SAVE_ME ??????!!!!!!! Catch ex As Exception - MsgBox("ERR: " & ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try loaded = True ' Me.Enabled = True @@ -1361,7 +1374,7 @@ Public Class frmSendungsdetailsNEU lblgesGewicht.Text = If(gesGewicht = 0, "-", gesGewicht.ToString("N1")) & " kg" Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub Sub binddata(o As Object, bindingParam As String, bindingSource As BindingSource, dataName As String, Optional bindingNullValue As Object = Nothing, Optional formatString As String = "") @@ -1595,7 +1608,7 @@ Public Class frmSendungsdetailsNEU SENDUNG_LIST(CURRENT_INDEX).tblSnd_Vorpapier3 = cboVorpapier3.Text.Trim SENDUNG_LIST(CURRENT_INDEX).tblSnd_Vorpapier3_Pos = txtVorpapier3Pos.Text.Trim - SENDUNG_LIST(CURRENT_INDEX).tblSnd_anzahlHandling = txtAnzahlPos.Text.Trim + 'SENDUNG_LIST(CURRENT_INDEX).tblSnd_anzahlPOS = txtAnzahlPos.Text.Trim End Sub @@ -1732,7 +1745,7 @@ Public Class frmSendungsdetailsNEU Catch ex As Exception - MsgBox("Fehler beim initialisieren der Drucker!" & ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler beim initialisieren der Drucker!") End Try End Sub @@ -1987,12 +2000,25 @@ Public Class frmSendungsdetailsNEU End If Button4.Enabled = btnLeihgeld.Enabled + cntlAvisierer_Eust.Visible = True + cntlAuftr_Eust.Visible = True + cntlEmpf_Eust.Visible = True + cntlAbsender_Eust.Visible = True + cntlFrachtf_Eust.Visible = True + pnlT1.Controls.Clear() Select Case cboAbfertigungsart._value Case "5", "6", "24", "33", "34" pnlT1.Controls.Add(usrcntl_NCTS) Case "26", "28" pnlT1.Controls.Add(usrcntl_FISKAL) + + cntlAvisierer_Eust.value = "" : cntlAvisierer_Eust.Visible = False + cntlAuftr_Eust.value = "" : cntlAuftr_Eust.Visible = False + cntlEmpf_Eust.value = "" : cntlEmpf_Eust.Visible = False + cntlAbsender_Eust.value = "" : cntlAbsender_Eust.Visible = False + cntlFrachtf_Eust.value = "" : cntlFrachtf_Eust.Visible = False + Case "23" pnlT1.Controls.Add(usrcntl_ATA) Case "44" @@ -2031,7 +2057,7 @@ Public Class frmSendungsdetailsNEU End With Catch ex As Exception - MsgBox("Offert-ERR: " & ex.Message) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -2089,7 +2115,7 @@ Public Class frmSendungsdetailsNEU End With Catch ex As Exception - MsgBox("Belege-ERR: " & ex.Message) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -3108,7 +3134,7 @@ Public Class frmSendungsdetailsNEU End If SAVE_ME() Catch ex As Exception - MsgBox(ex.Message) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try initDataBinding() End Sub @@ -3466,7 +3492,7 @@ Public Class frmSendungsdetailsNEU Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Me.Cursor = Cursors.Default ' frmNacherfassung.showAll() @@ -3595,10 +3621,10 @@ Public Class frmSendungsdetailsNEU Private Sub tbcntr_SelectedIndexChanged(sender As Object, e As EventArgs) Handles tbcntr.SelectedIndexChanged If tbcntr.SelectedTab Is tbVorkosten Then - initDGVVorkosten + initDGVVorkosten() ElseIf tbcntr.SelectedTab Is tbBAR Then initDGVBelege() - End If + End If End Sub Sub initDGVVorkosten() @@ -3627,11 +3653,16 @@ Public Class frmSendungsdetailsNEU Try If TabControl1.SelectedTab Is tbAnhang Then If dgvAnhang.SelectedRows.Count > 0 Then - Process.Start(VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(dgvAnhang.SelectedRows(0).Cells("anh_docId").Value)) + Dim docPath = VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(dgvAnhang.SelectedRows(0).Cells("anh_docId").Value) + If Not IO.File.Exists(docPath) Then + MsgBox("Die Datei existiert nicht!") + Else + Process.Start(docPath) + End If End If End If Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -3741,11 +3772,11 @@ Public Class frmSendungsdetailsNEU Mail.Display() Catch ex As Exception - MsgBox("Fehler beim Öffnen der Mail!") + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler beim Öffnen der Mail!") End Try End If Catch ex As Exception - MsgBox("Fehler beim Öffnen der Mail!") + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler beim Öffnen der Mail!") End Try End Sub @@ -3807,7 +3838,7 @@ Public Class frmSendungsdetailsNEU Process.Start(outputFile) ' VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.OPEN_PATH() Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End If End Sub @@ -3909,11 +3940,11 @@ Public Class frmSendungsdetailsNEU Mail.Display() Catch ex As Exception - MsgBox("Fehler beim Öffnen der Mail!") + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler beim Öffnen der Mail!") End Try End If Catch ex As Exception - MsgBox("Fehler beim Öffnen der Mail!") + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler beim Öffnen der Mail!") End Try End Sub @@ -4030,7 +4061,7 @@ Public Class frmSendungsdetailsNEU Case 1 : btnUIDPruef.BackgroundImage = My.Resources.del End Select Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Me.Cursor = Cursors.Default End Sub @@ -4064,7 +4095,7 @@ Public Class frmSendungsdetailsNEU Case 1 : btnEORIPruef.BackgroundImage = My.Resources.del End Select Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Me.Cursor = Cursors.Default @@ -4095,7 +4126,7 @@ Public Class frmSendungsdetailsNEU 'Catch ex As Exception - ' MsgBox(ex.Message & ex.StackTrace) + ' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) 'End Try 'Me.Cursor = Cursors.Default End Sub @@ -4196,7 +4227,7 @@ Public Class frmSendungsdetailsNEU initDGVVorkosten() Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End Sub @@ -4216,7 +4247,7 @@ Public Class frmSendungsdetailsNEU Dim VK_ID = -1 Private Sub dgvVorkosten_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs) Handles dgvVorkosten.CellDoubleClick, dgvVorkosten.CellContentDoubleClick - If e.RowIndex >=0 Then + If e.RowIndex >= 0 Then Try ' Dim VK = SENDUNG_LIST(CURRENT_INDEX).VORKOSTEN.Find(Function(x) x.sndvk_id = dgvVorkosten.SelectedRows(0).Cells("clmnVK_id").Value) Dim VK = SENDUNG_LIST(CURRENT_INDEX).VORKOSTEN(dgvVorkosten.SelectedRows(0).Cells("clmnVK_id").Value) @@ -4229,7 +4260,7 @@ Public Class frmSendungsdetailsNEU btnVorkostenAdd.BackgroundImage = My.Resources.stift Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try End If End Sub @@ -4280,8 +4311,8 @@ Public Class frmSendungsdetailsNEU End While My.Computer.FileSystem.WriteAllBytes(Path, My.Resources.ATANAK_Instructions_Import, False) Catch ex As System.Exception - ' MsgBox(ex.Message) - MsgBox("ERROR 01: " & ex.Message & vbNewLine & ex.StackTrace) + ' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) Me.Cursor = Cursors.Default Exit Sub @@ -4329,7 +4360,7 @@ Public Class frmSendungsdetailsNEU End If Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Me.Cursor = Cursors.Default End Sub @@ -4363,8 +4394,8 @@ Public Class frmSendungsdetailsNEU End While My.Computer.FileSystem.WriteAllBytes(Path, My.Resources.ATANAK_Instructions_Export, False) Catch ex As System.Exception - ' MsgBox(ex.Message) - MsgBox("ERROR 01: " & ex.Message & vbNewLine & ex.StackTrace) + ' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) Me.Cursor = Cursors.Default Exit Sub @@ -4411,7 +4442,7 @@ Public Class frmSendungsdetailsNEU End If Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Me.Cursor = Cursors.Default End Sub @@ -4445,8 +4476,9 @@ Public Class frmSendungsdetailsNEU End While My.Computer.FileSystem.WriteAllBytes(Path, My.Resources.ATANAK_Instructions_Export_T1, False) Catch ex As System.Exception - ' MsgBox(ex.Message) - MsgBox("ERROR 01: " & ex.Message & vbNewLine & ex.StackTrace) + ' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) + + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) Me.Cursor = Cursors.Default Exit Sub @@ -4492,7 +4524,7 @@ Public Class frmSendungsdetailsNEU End If Catch ex As Exception - MsgBox(ex.Message & ex.StackTrace) + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name) End Try Me.Cursor = Cursors.Default End Sub @@ -4539,12 +4571,86 @@ Public Class frmSendungsdetailsNEU Mail.Display() Catch ex As Exception - MsgBox("Fehler beim Öffnen der Mail!") + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler beim Öffnen der Mail!") End Try End If Catch ex As Exception - MsgBox("Fehler beim Öffnen der Mail!") + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler beim Öffnen der Mail!") End Try End Sub + Private Sub btnQuckScan_Click(sender As Object, e As EventArgs) Handles btnQuckScan.Click + Try + Me.Cursor = Cursors.WaitCursor + If frmSendungAnhangImport.quickScan(AvisoId, SENDUNG_LIST(CURRENT_INDEX).tblSnd_SendungID) Then + initAnhang() + End If + Catch ex As Exception + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler QuickScan") + End Try + Me.Cursor = Cursors.Default + + End Sub + + Private Sub ToolStripMenuItem22_Click(sender As Object, e As EventArgs) Handles ToolStripMenuItem22.Click + ' VERAG_PROG_ALLGEMEIN.cMIC.send_MIC_AvisoSendung(AVISO, SENDUNG_LIST(CURRENT_INDEX)) + End Sub + + Private Sub ToolStripMenuItem23_Click(sender As Object, e As EventArgs) Handles ToolStripMenuItem23.Click + SAVE_ME() + If Not IsNumeric(SENDUNG_LIST(CURRENT_INDEX).AbfertigungsNr) OrElse CInt(SENDUNG_LIST(CURRENT_INDEX).AbfertigungsNr) < 100000 Then MsgBox("Abfertigungsnummer angeben!") : Exit Sub + Dim frMZA As New SDL.frmZollanmeldung("T1", Nothing, AVISO, SENDUNG_LIST(CURRENT_INDEX), Now.ToString("yy"), "MIC") + frMZA.Show() + AddHandler frMZA.FormClosed, Sub() + initdgvZollAnmeldungen() + End Sub + End Sub + + Private Sub AbrechungFremdeGrenzeAktDruckenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles AbrechungFremdeGrenzeAktDruckenToolStripMenuItem.Click + + Dim SENDUNG = SENDUNG_LIST(CURRENT_INDEX) + + If IsNumeric(SENDUNG.AbfertigungsNr) AndAlso CInt(SENDUNG.AbfertigungsNr) > 100000 Then + Else + MsgBox("Abfertigungsnummer angeben!") + Exit Sub + End If + If Not SENDUNG.tblSnd_Fremdspedition And SENDUNG.tblSnd_Abfertigungsart_ID <= 0 Then + MsgBox("Abfertigungsart angeben!") + Exit Sub + End If + + Dim Printername = "" + Dim oPS As New System.Drawing.Printing.PrinterSettings + Try + Printername = oPS.PrinterName + Catch ex As System.Exception + End Try + + + 'Aktendeckel + SendungOptions.PrintSendung("PRINT", Me.SENDUNG_LIST(CURRENT_INDEX), Me.AVISO, Printername, If(sender Is LaufzettelDruckenToolStripMenuItem, "LAUFZETTEL", "AKT"), SENDUNG_LIST.Count) + + 'Steuerbescheide drucken + Dim SP_LIST As New VERAG_PROG_ALLGEMEIN.cSpeditionsbuchList(SENDUNG.FilialenNr, SENDUNG.AbfertigungsNr) + For Each s In SP_LIST.LIST + If s.DokumentId_Steuerbeleg IsNot Nothing AndAlso s.DokumentId_Steuerbeleg > 0 Then + VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(s.DokumentId_Steuerbeleg)}) + End If + If s.DokumentId_Mitteilung IsNot Nothing AndAlso s.DokumentId_Mitteilung > 0 Then + VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(s.DokumentId_Mitteilung)}) + End If + Next + + 'Handelsrechnungen + Dim ANH_LIST_SND As New List(Of VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge) + VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge.LOAD_LIST_BySendung(ANH_LIST_SND, SENDUNG.tblSnd_SendungID) 'LÄDT alle Aviso-Anhänge + For Each l In ANH_LIST_SND + Select Case l.anh_Art.ToString.ToUpper + Case "RECHNUNG", "HANDELSRECHNUNG" + VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(l.anh_docId)}) + End Select + Next + + End Sub End Class diff --git a/Aviso/frmZollstopp.Designer.vb b/Aviso/frmZollstopp.Designer.vb index 84ba7ee..f9d7d00 100644 --- a/Aviso/frmZollstopp.Designer.vb +++ b/Aviso/frmZollstopp.Designer.vb @@ -32,6 +32,7 @@ Partial Class frmZollstopp Me.btnOffnen = New System.Windows.Forms.Button() Me.Label3 = New System.Windows.Forms.Label() Me.rtbAbsender = New VERAG_PROG_ALLGEMEIN.MyRichTextBox() + Me.lklEmpfangerUbernehmen = New System.Windows.Forms.LinkLabel() Me.SuspendLayout() ' 'rtbZollstop @@ -139,12 +140,23 @@ Partial Class frmZollstopp Me.rtbAbsender.TabIndex = 1 Me.rtbAbsender.Text = "" ' + 'lklEmpfangerUbernehmen + ' + Me.lklEmpfangerUbernehmen.AutoSize = True + Me.lklEmpfangerUbernehmen.Location = New System.Drawing.Point(413, 260) + Me.lklEmpfangerUbernehmen.Name = "lklEmpfangerUbernehmen" + Me.lklEmpfangerUbernehmen.Size = New System.Drawing.Size(120, 13) + Me.lklEmpfangerUbernehmen.TabIndex = 9 + Me.lklEmpfangerUbernehmen.TabStop = True + Me.lklEmpfangerUbernehmen.Text = "Empfänger übernehmen" + ' 'frmZollstopp ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.BackColor = System.Drawing.Color.White Me.ClientSize = New System.Drawing.Size(551, 626) + Me.Controls.Add(Me.lklEmpfangerUbernehmen) Me.Controls.Add(Me.Label3) Me.Controls.Add(Me.rtbAbsender) Me.Controls.Add(Me.btnOffnen) @@ -172,4 +184,5 @@ Partial Class frmZollstopp Friend WithEvents btnOffnen As Button Friend WithEvents Label3 As Label Friend WithEvents rtbAbsender As VERAG_PROG_ALLGEMEIN.MyRichTextBox + Friend WithEvents lklEmpfangerUbernehmen As LinkLabel End Class diff --git a/Aviso/frmZollstopp.vb b/Aviso/frmZollstopp.vb index 89449a8..38f7fbd 100644 --- a/Aviso/frmZollstopp.vb +++ b/Aviso/frmZollstopp.vb @@ -13,7 +13,6 @@ Private Sub frmZollstopp_Load(sender As Object, e As EventArgs) Handles Me.Load If SND Is Nothing Then Me.Close() rtbAbsender.Text = SND.tblSnd_Absender - rtbEntladestelle.Text = SND.getEmpfaengerAdress() rtbZollstop.Text = SND.getNCTSAdress() End Sub @@ -31,4 +30,8 @@ End Try Me.Cursor = DefaultCursor End Sub + + Private Sub lklEmpfangerUbernehmen_LinkClicked(sender As Object, e As LinkLabelLinkClickedEventArgs) Handles lklEmpfangerUbernehmen.LinkClicked + rtbEntladestelle.Text = SND.getEmpfaengerAdress() + End Sub End Class \ No newline at end of file diff --git a/Aviso/usrCntlBenachrichtigungen.vb b/Aviso/usrCntlBenachrichtigungen.vb index 78a3ad3..033d6c3 100644 --- a/Aviso/usrCntlBenachrichtigungen.vb +++ b/Aviso/usrCntlBenachrichtigungen.vb @@ -49,7 +49,7 @@ whereMA &= " ) " - Dim sqlStr As String = "SELECT tblAvisoBenachrichtigungen.*, LKW_Nr, Status FROM [tblAvisoBenachrichtigungen] INNER JOIN AVISO on AvisoId=ab_AvisoID WHERE ab_status=0 " & whereMA & " ORDER BY ANKUNFT desc,ab_Datum ASC" + Dim sqlStr As String = "SELECT tblAvisoBenachrichtigungen.*, LKW_Nr, Status FROM [tblAvisoBenachrichtigungen] INNER JOIN AVISO on AvisoId=ab_AvisoID WHERE ab_status=0 " & whereMA & " ORDER BY CASE WHEN ANKUNFT <'01.01.2001' THEN '01.01.2999' ELSE ANKUNFT end ASC,ab_Datum ASC" Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) @@ -184,6 +184,22 @@ + 'NEIN; weils zB Waidhaus dann alles sieht und übernimmt + 'If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER IsNot Nothing Then + ' If CInt(If(VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId, "-1")) <= 0 Then cbxTeams.Checked = True + 'End If + + 'Nur VERIMEX + Select Case VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA + Case "VERIMEX" + If VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER IsNot Nothing Then + If CInt(If(VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId, "-1")) <= 0 Then cbxTeams.Checked = True + End If + Case "ATILLA" + cbxCluster.Visible = False + cbxTeams.Visible = False + End Select + ' MyComboBox2.changeItem(VERAG_PROG_ALLGEMEIN.cAllgemein.MITARBEITER.mit_teamId) End Sub diff --git a/Aviso/usrcntlAktDetails.Designer.vb b/Aviso/usrcntlAktDetails.Designer.vb index bd57436..4be2ba4 100644 --- a/Aviso/usrcntlAktDetails.Designer.vb +++ b/Aviso/usrcntlAktDetails.Designer.vb @@ -62,10 +62,12 @@ Partial Class usrcntlAktDetails Me.btn = New System.Windows.Forms.Button() Me.dgvSendungen = New System.Windows.Forms.DataGridView() Me.Panel7 = New System.Windows.Forms.Panel() + Me.btnQuckScan = New System.Windows.Forms.Button() Me.picArrowDown = New System.Windows.Forms.PictureBox() Me.Panel4 = New System.Windows.Forms.Panel() + Me.Button2 = New System.Windows.Forms.Button() Me.cbxVPSplit = New System.Windows.Forms.CheckBox() - Me.Button15 = New System.Windows.Forms.Button() + Me.btnLZDruckDIGITAL = New System.Windows.Forms.Button() Me.btnSendungslisteUNISPED = New System.Windows.Forms.Button() Me.cbxAlleFirmen = New System.Windows.Forms.CheckBox() Me.Button12 = New System.Windows.Forms.Button() @@ -74,7 +76,7 @@ Partial Class usrcntlAktDetails Me.cboFormulareRgAn = New VERAG_PROG_ALLGEMEIN.MyComboBox() Me.Label4 = New System.Windows.Forms.Label() Me.Button8 = New System.Windows.Forms.Button() - Me.Button10 = New System.Windows.Forms.Button() + Me.btnLZDruck = New System.Windows.Forms.Button() Me.Button9 = New System.Windows.Forms.Button() Me.btnKasse_LG = New System.Windows.Forms.Button() Me.cbxLZRg = New VERAG_PROG_ALLGEMEIN.MyCheckbox(Me.components) @@ -154,6 +156,7 @@ Partial Class usrcntlAktDetails Me.DispolisteTRToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.DispolisteENToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.pnlOptionen = New System.Windows.Forms.Panel() + Me.btnWlanTicket = New System.Windows.Forms.Button() Me.Button13 = New System.Windows.Forms.Button() Me.Button14 = New System.Windows.Forms.Button() Me.btnLöschen = New System.Windows.Forms.Button() @@ -239,6 +242,7 @@ Partial Class usrcntlAktDetails ' 'SplitContainer.Panel2 ' + Me.SplitContainer.Panel2.Controls.Add(Me.btnQuckScan) Me.SplitContainer.Panel2.Controls.Add(Me.picArrowDown) Me.SplitContainer.Panel2.Controls.Add(Me.Panel4) Me.SplitContainer.Panel2.Controls.Add(Me.Button18) @@ -247,7 +251,7 @@ Partial Class usrcntlAktDetails Me.SplitContainer.Panel2.Controls.Add(Me.addVermerk) Me.SplitContainer.Panel2.Controls.Add(Me.pnlMAInfo) Me.SplitContainer.Size = New System.Drawing.Size(575, 496) - Me.SplitContainer.SplitterDistance = 230 + Me.SplitContainer.SplitterDistance = 228 Me.SplitContainer.TabIndex = 91 ' 'pnlAlt @@ -260,7 +264,7 @@ Partial Class usrcntlAktDetails Me.pnlAlt.Dock = System.Windows.Forms.DockStyle.Fill Me.pnlAlt.Location = New System.Drawing.Point(0, 0) Me.pnlAlt.Name = "pnlAlt" - Me.pnlAlt.Size = New System.Drawing.Size(575, 230) + Me.pnlAlt.Size = New System.Drawing.Size(575, 228) Me.pnlAlt.TabIndex = 72 Me.pnlAlt.Visible = False ' @@ -589,6 +593,7 @@ Partial Class usrcntlAktDetails DataGridViewCellStyle2.SelectionForeColor = System.Drawing.SystemColors.HighlightText DataGridViewCellStyle2.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.dgvSendungen.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle2 + Me.dgvSendungen.ColumnHeadersHeight = 34 Me.dgvSendungen.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing DataGridViewCellStyle3.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle3.BackColor = System.Drawing.SystemColors.Window @@ -612,6 +617,7 @@ Partial Class usrcntlAktDetails DataGridViewCellStyle4.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.dgvSendungen.RowHeadersDefaultCellStyle = DataGridViewCellStyle4 Me.dgvSendungen.RowHeadersVisible = False + Me.dgvSendungen.RowHeadersWidth = 62 Me.dgvSendungen.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing DataGridViewCellStyle5.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.dgvSendungen.RowsDefaultCellStyle = DataGridViewCellStyle5 @@ -621,7 +627,7 @@ Partial Class usrcntlAktDetails Me.dgvSendungen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvSendungen.ShowCellErrors = False Me.dgvSendungen.ShowRowErrors = False - Me.dgvSendungen.Size = New System.Drawing.Size(575, 230) + Me.dgvSendungen.Size = New System.Drawing.Size(575, 228) Me.dgvSendungen.TabIndex = 71 Me.dgvSendungen.TabStop = False ' @@ -633,16 +639,31 @@ Partial Class usrcntlAktDetails Me.Panel7.Location = New System.Drawing.Point(4, 19) Me.Panel7.MaximumSize = New System.Drawing.Size(2, 250) Me.Panel7.Name = "Panel7" - Me.Panel7.Size = New System.Drawing.Size(1, 105) + Me.Panel7.Size = New System.Drawing.Size(1, 103) Me.Panel7.TabIndex = 15 ' + 'btnQuckScan + ' + Me.btnQuckScan.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnQuckScan.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnQuckScan.Image = CType(resources.GetObject("btnQuckScan.Image"), System.Drawing.Image) + Me.btnQuckScan.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnQuckScan.Location = New System.Drawing.Point(468, 194) + Me.btnQuckScan.Name = "btnQuckScan" + Me.btnQuckScan.Size = New System.Drawing.Size(107, 34) + Me.btnQuckScan.TabIndex = 107 + Me.btnQuckScan.Text = "Quick-Scan" + Me.btnQuckScan.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnQuckScan.UseVisualStyleBackColor = True + Me.btnQuckScan.Visible = False + ' 'picArrowDown ' Me.picArrowDown.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left), System.Windows.Forms.AnchorStyles) Me.picArrowDown.BackgroundImage = Global.AVISO.My.Resources.Resources.arrow_down_orange Me.picArrowDown.BackgroundImageLayout = System.Windows.Forms.ImageLayout.Stretch Me.picArrowDown.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle - Me.picArrowDown.Location = New System.Drawing.Point(1, 225) + Me.picArrowDown.Location = New System.Drawing.Point(1, 226) Me.picArrowDown.Name = "picArrowDown" Me.picArrowDown.Size = New System.Drawing.Size(34, 34) Me.picArrowDown.TabIndex = 104 @@ -654,8 +675,9 @@ Partial Class usrcntlAktDetails Me.Panel4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.Panel4.BackColor = System.Drawing.Color.PapayaWhip Me.Panel4.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.Panel4.Controls.Add(Me.Button2) Me.Panel4.Controls.Add(Me.cbxVPSplit) - Me.Panel4.Controls.Add(Me.Button15) + Me.Panel4.Controls.Add(Me.btnLZDruckDIGITAL) Me.Panel4.Controls.Add(Me.btnSendungslisteUNISPED) Me.Panel4.Controls.Add(Me.cbxAlleFirmen) Me.Panel4.Controls.Add(Me.Button12) @@ -664,20 +686,39 @@ Partial Class usrcntlAktDetails Me.Panel4.Controls.Add(Me.cboFormulareRgAn) Me.Panel4.Controls.Add(Me.Label4) Me.Panel4.Controls.Add(Me.Button8) - Me.Panel4.Controls.Add(Me.Button10) + Me.Panel4.Controls.Add(Me.btnLZDruck) Me.Panel4.Controls.Add(Me.Button9) Me.Panel4.Controls.Add(Me.btnKasse_LG) Me.Panel4.Controls.Add(Me.cbxLZRg) Me.Panel4.Controls.Add(Me.cbxLZT1) - Me.Panel4.Location = New System.Drawing.Point(204, 27) + Me.Panel4.Location = New System.Drawing.Point(203, 27) Me.Panel4.Name = "Panel4" Me.Panel4.Size = New System.Drawing.Size(265, 227) Me.Panel4.TabIndex = 102 Me.Panel4.Visible = False ' + 'Button2 + ' + Me.Button2.BackColor = System.Drawing.Color.White + Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button2.ForeColor = System.Drawing.Color.Black + Me.Button2.Image = Global.AVISO.My.Resources.Resources.spedbuch_small + Me.Button2.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button2.Location = New System.Drawing.Point(52, 166) + Me.Button2.Margin = New System.Windows.Forms.Padding(0) + Me.Button2.Name = "Button2" + Me.Button2.Size = New System.Drawing.Size(76, 20) + Me.Button2.TabIndex = 117 + Me.Button2.Text = "TEST" + Me.Button2.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Button2.UseVisualStyleBackColor = False + Me.Button2.Visible = False + ' 'cbxVPSplit ' Me.cbxVPSplit.AutoSize = True + Me.cbxVPSplit.Checked = True + Me.cbxVPSplit.CheckState = System.Windows.Forms.CheckState.Checked Me.cbxVPSplit.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.cbxVPSplit.Location = New System.Drawing.Point(207, 5) Me.cbxVPSplit.Name = "cbxVPSplit" @@ -686,22 +727,22 @@ Partial Class usrcntlAktDetails Me.cbxVPSplit.Text = "je VP" Me.cbxVPSplit.UseVisualStyleBackColor = True ' - 'Button15 + 'btnLZDruckDIGITAL ' - Me.Button15.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Button15.BackColor = System.Drawing.Color.White - Me.Button15.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button15.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) - Me.Button15.ForeColor = System.Drawing.Color.Black - Me.Button15.Image = Global.AVISO.My.Resources.Resources.digitalerAkt_small - Me.Button15.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button15.Location = New System.Drawing.Point(134, 57) - Me.Button15.Name = "Button15" - Me.Button15.Size = New System.Drawing.Size(128, 36) - Me.Button15.TabIndex = 113 - Me.Button15.Text = "Laufzettel" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "DIGITAL" - Me.Button15.TextAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button15.UseVisualStyleBackColor = False + Me.btnLZDruckDIGITAL.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnLZDruckDIGITAL.BackColor = System.Drawing.Color.White + Me.btnLZDruckDIGITAL.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnLZDruckDIGITAL.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) + Me.btnLZDruckDIGITAL.ForeColor = System.Drawing.Color.Black + Me.btnLZDruckDIGITAL.Image = Global.AVISO.My.Resources.Resources.digitalerAkt_small + Me.btnLZDruckDIGITAL.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnLZDruckDIGITAL.Location = New System.Drawing.Point(134, 57) + Me.btnLZDruckDIGITAL.Name = "btnLZDruckDIGITAL" + Me.btnLZDruckDIGITAL.Size = New System.Drawing.Size(128, 36) + Me.btnLZDruckDIGITAL.TabIndex = 113 + Me.btnLZDruckDIGITAL.Text = "Laufzettel" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "DIGITAL" + Me.btnLZDruckDIGITAL.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnLZDruckDIGITAL.UseVisualStyleBackColor = False ' 'btnSendungslisteUNISPED ' @@ -819,21 +860,21 @@ Partial Class usrcntlAktDetails Me.Button8.TextAlign = System.Drawing.ContentAlignment.MiddleRight Me.Button8.UseVisualStyleBackColor = False ' - 'Button10 + 'btnLZDruck ' - Me.Button10.BackColor = System.Drawing.Color.White - Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button10.ForeColor = System.Drawing.Color.Black - Me.Button10.Image = Global.AVISO.My.Resources.Resources.spedbuch_small - Me.Button10.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button10.Location = New System.Drawing.Point(134, 22) - Me.Button10.Margin = New System.Windows.Forms.Padding(0) - Me.Button10.Name = "Button10" - Me.Button10.Size = New System.Drawing.Size(128, 36) - Me.Button10.TabIndex = 6 - Me.Button10.Text = "Laufzettel" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Zoll DE" - Me.Button10.TextAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button10.UseVisualStyleBackColor = False + Me.btnLZDruck.BackColor = System.Drawing.Color.White + Me.btnLZDruck.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnLZDruck.ForeColor = System.Drawing.Color.Black + Me.btnLZDruck.Image = Global.AVISO.My.Resources.Resources.spedbuch_small + Me.btnLZDruck.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnLZDruck.Location = New System.Drawing.Point(134, 22) + Me.btnLZDruck.Margin = New System.Windows.Forms.Padding(0) + Me.btnLZDruck.Name = "btnLZDruck" + Me.btnLZDruck.Size = New System.Drawing.Size(128, 36) + Me.btnLZDruck.TabIndex = 6 + Me.btnLZDruck.Text = "Laufzettel" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "Zoll DE" + Me.btnLZDruck.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnLZDruck.UseVisualStyleBackColor = False ' 'Button9 ' @@ -901,9 +942,9 @@ Partial Class usrcntlAktDetails Me.Button18.FlatStyle = System.Windows.Forms.FlatStyle.Flat Me.Button18.Image = CType(resources.GetObject("Button18.Image"), System.Drawing.Image) Me.Button18.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button18.Location = New System.Drawing.Point(446, 225) + Me.Button18.Location = New System.Drawing.Point(447, 226) Me.Button18.Name = "Button18" - Me.Button18.Size = New System.Drawing.Size(129, 34) + Me.Button18.Size = New System.Drawing.Size(128, 34) Me.Button18.TabIndex = 103 Me.Button18.Text = "Import-Assistent ..." Me.Button18.TextAlign = System.Drawing.ContentAlignment.MiddleRight @@ -927,6 +968,7 @@ Partial Class usrcntlAktDetails DataGridViewCellStyle7.SelectionForeColor = System.Drawing.SystemColors.HighlightText DataGridViewCellStyle7.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.gridVermerke.ColumnHeadersDefaultCellStyle = DataGridViewCellStyle7 + Me.gridVermerke.ColumnHeadersHeight = 34 Me.gridVermerke.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.DisableResizing DataGridViewCellStyle8.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft DataGridViewCellStyle8.BackColor = System.Drawing.SystemColors.Window @@ -950,6 +992,7 @@ Partial Class usrcntlAktDetails DataGridViewCellStyle9.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.gridVermerke.RowHeadersDefaultCellStyle = DataGridViewCellStyle9 Me.gridVermerke.RowHeadersVisible = False + Me.gridVermerke.RowHeadersWidth = 62 Me.gridVermerke.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing DataGridViewCellStyle10.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.gridVermerke.RowsDefaultCellStyle = DataGridViewCellStyle10 @@ -959,7 +1002,7 @@ Partial Class usrcntlAktDetails Me.gridVermerke.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.gridVermerke.ShowCellErrors = False Me.gridVermerke.ShowRowErrors = False - Me.gridVermerke.Size = New System.Drawing.Size(575, 204) + Me.gridVermerke.Size = New System.Drawing.Size(575, 206) Me.gridVermerke.TabIndex = 70 Me.gridVermerke.TabStop = False ' @@ -1107,7 +1150,7 @@ Partial Class usrcntlAktDetails Me.pnlMAInfo.Controls.Add(Me.txtMAinfo_Vorgeschrieben) Me.pnlMAInfo.Controls.Add(Me.txtMAinfo_VorbereitetQs) Me.pnlMAInfo.Dock = System.Windows.Forms.DockStyle.Bottom - Me.pnlMAInfo.Location = New System.Drawing.Point(0, 234) + Me.pnlMAInfo.Location = New System.Drawing.Point(0, 236) Me.pnlMAInfo.Name = "pnlMAInfo" Me.pnlMAInfo.Size = New System.Drawing.Size(575, 28) Me.pnlMAInfo.TabIndex = 106 @@ -1889,6 +1932,7 @@ Partial Class usrcntlAktDetails Me.pnlOptionen.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) Me.pnlOptionen.BackColor = System.Drawing.Color.Black Me.pnlOptionen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle + Me.pnlOptionen.Controls.Add(Me.btnWlanTicket) Me.pnlOptionen.Controls.Add(Me.Button13) Me.pnlOptionen.Controls.Add(Me.Button14) Me.pnlOptionen.Controls.Add(Me.btnLöschen) @@ -1900,6 +1944,22 @@ Partial Class usrcntlAktDetails Me.pnlOptionen.TabIndex = 82 Me.pnlOptionen.Visible = False ' + 'btnWlanTicket + ' + Me.btnWlanTicket.BackColor = System.Drawing.Color.White + Me.btnWlanTicket.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnWlanTicket.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.0!) + Me.btnWlanTicket.ForeColor = System.Drawing.Color.Black + Me.btnWlanTicket.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnWlanTicket.Location = New System.Drawing.Point(3, 151) + Me.btnWlanTicket.Name = "btnWlanTicket" + Me.btnWlanTicket.Size = New System.Drawing.Size(109, 28) + Me.btnWlanTicket.TabIndex = 103 + Me.btnWlanTicket.TabStop = False + Me.btnWlanTicket.Text = "WLAN Ticket" + Me.btnWlanTicket.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnWlanTicket.UseVisualStyleBackColor = False + ' 'Button13 ' Me.Button13.BackColor = System.Drawing.Color.White @@ -1980,8 +2040,7 @@ Partial Class usrcntlAktDetails ' 'usrcntlAktDetails ' - Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!) - Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Dpi + Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.None Me.Controls.Add(Me.pnlOptionen) Me.Controls.Add(Me.pnlDetailsRechts) Me.Name = "usrcntlAktDetails" @@ -2138,7 +2197,7 @@ Partial Class usrcntlAktDetails Friend WithEvents tbAnhang As TabPage Friend WithEvents Button18 As Button Friend WithEvents Button9 As Button - Friend WithEvents Button10 As Button + Friend WithEvents btnLZDruck As Button Friend WithEvents cboFormulareRgAn As VERAG_PROG_ALLGEMEIN.MyComboBox Friend WithEvents Label4 As Label Friend WithEvents Button11 As Button @@ -2160,8 +2219,11 @@ Partial Class usrcntlAktDetails Friend WithEvents MitarbeiterAnzeigenToolStripMenuItem As ToolStripMenuItem Friend WithEvents txtMAinfo_AbklaerungTR As TextBox Friend WithEvents picMAinfo_AbklaerungTR As PictureBox - Friend WithEvents Button15 As Button + Friend WithEvents btnLZDruckDIGITAL As Button Friend WithEvents cbxLZRg As VERAG_PROG_ALLGEMEIN.MyCheckbox Friend WithEvents cbxLZT1 As VERAG_PROG_ALLGEMEIN.MyCheckbox Friend WithEvents cbxVPSplit As CheckBox + Friend WithEvents Button2 As Button + Friend WithEvents btnQuckScan As Button + Friend WithEvents btnWlanTicket As Button End Class diff --git a/Aviso/usrcntlAktDetails.resx b/Aviso/usrcntlAktDetails.resx index 16f09be..990d427 100644 --- a/Aviso/usrcntlAktDetails.resx +++ b/Aviso/usrcntlAktDetails.resx @@ -118,6 +118,57 @@ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + iVBORw0KGgoAAAANSUhEUgAAAB4AAAAeCAYAAAA7MK6iAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAApmSURBVEhLrZd3WFRHF8YvXWUJgtQtCihRqkGC6Ec0 + xk4MJioaoiYSwEIEgoKIUSCJESWQxKBCsKCAofe+9F1pC+wuvTcpokiRFpSob2ZXA/nqP1/med6duTPn + nN89M3PvnaUAUGFht6mSslJxe3Jyclt+Qf6XqWmp59Mz0q+TOjwpOSkjKSkpLzEpMS8hMaEqPiG+iaiZ + tCuIRH25iYmJ2cQuLiU1JZT4hGRkZFzIyMzwzszMPPbw4cNdotgPWoWUo89lMUf8kx4fRhUW5Kv09vXH + NTU3oaWlBW1tbejo6EBnZye6u7tw/3437vfcR29PD3p7e2fV0zt33UPGuoldd3c3Ors6xf7t7e1obW3F + 8MhoUVd18QoP35/nwNu+iqdu/hLS3MCvwOCDXtL1Ang5Q+rfX7X/z/L86RSejg8hJy3xmblrqAzpegVW + dUhYG3Q9FJwSHrKLysDhN4MjaJ1VkUj8FnCFbWKxi8qRmpWHtOw85HDKUVLTgbL6LpTWdoLX0I2Kph5U + NfdC2NaPmrY+COtbMDAwgMK8fBi5JX48C978ddqHafd4sA9mw8T2EpZutMWK9x2x3PK1th+F7tbDpD6G + ZZvtoKy/EfLaZpDXMoOS3gax/XLLY2KbN4mNyEfkv0JUk/5N7jdwNCSXJNCAIyGlJ2fBi5zYEvt/ZufZ + hhTAyDECEjQGGaH+iyRBySiAmr8I1DxlUNLy/8FmTpJKOjA5mYC9gTlwDOW2stwK5s+CVV2LqIVfpCmu + d7s9usbhCjRMPyIjBCBylpAmoAWQmK8ESQV1SC9kQEZ5MWQWaUFWeQlklBZDSpEOiQUqoGRpxEfqld9r + qRlugalDEHZ+HQNtj1wjBedcMVP8wziRQal5llOLHeMPLbOwxiK9d0DTsYCC7lYoG3wAFWMrqL61E2pE + 6iYiWZH2DqgabYOKwSYoL18HRZ3VoLGMIaemCykFDRJZEhLScnhDxwzL138MQ/c0T+VTJRTTNVtyDuyS + S7FOFS5keAtlVd8/fU1SRu6lLMlKfokZaCKRtVTQXv0XkWstUzJmIoYtoOtDRlUXFI1OslaBjIoWmRUW + mQ0mZOQXQsvKLZHlU0OjnypcRHfOnMuY6VJIMd1yacyva2QZR6M+VNYxfaGktRLK2sZEK6GkZYyFS4yh + uNgYCqyVWMB4C3KMVZDUXAUJuhlklqyFov5maL97ALrbDmO+znqoGbwLDcMN0NB9G6zPbzhq+tRKEIaK + pkvaHFjTOVUElqJ7CajFey9E6JjugPbO89Dadw3MXYFQsboK1Y/I2u8OBHNfIJbaXIbR/gCsc7iMD8mO + PXIxEudusBGUWYsMYS+2u4eDWu2DJbv8obV6D1g73DiMs+ULmG55spouf8lY83g6RT9ZQDFPFSiu2HWm + 33CXJ1ifJoD2bhSW7InEP1zisME9ETt9UnDw+wwcv5qDszfz4R9TjJC0SoTn1CC6oA4JRXXgVrej5tEU + 9A6mgDILg/FnAdB/32WGeSJTj+7OoRjOeXNgulMmpe7GoXS+TFq7xsYbq1wjQP8kDjSzEKhv/BmH3P3g + 5ncLJy6FwfNyDHyCU3DxDhs/RhUhOKkUYVl8xBFoRnkr8oSdePRkDLz6PtC2/4qF1tex/tNvoO2csEXd + rZhiOP3TrmZTSidLKOMvo+x3OPnjbe8MaOxNgOr2MMhaxWG17Q18ExSN01dT4HMjE34ReQiMu4eb6TxE + 5lUjpbgJufx2lDT2orpzEM29IyQsUNE1DrUj8TC394PZybseyu48inmiaA6s6V5EKbhwKKvTIcEOl0Kx + yicfi6xioLYnCqr2mZDfF4cvLkQhOKEAAZFF+CWZZJnNR3xRPTJ55HVa043K1gdo6h1Gz9AkRqd/x/OX + YjZSGwax0vEKdntcKVQ7UUJYFXNgaTV98hToUhcu+fd5xXFg7FWENyx/hfpniWA4ZmL+sQIYOCUjPLkI + EWw+okiWqSVNyBN0oLSxDzVdg+h4OIbB8aeY/pP4l5Ih6AT5Kr3QWGaqKKVmMAcWlWXq841L8rMRmC+A + 4Tku5C0joHk4DQxnNliexZA4UoBTIYWorG1BenkLOLX3UdU2l+XY9PP/+R1raOuGkY66tYhFLufA9nZ2 + Xs9GHyG6ohm0z9LI43AdlE0SJOyyIOVYCMqJB+poLhK4jWjvf4yGnmEMPHmKp/+a4MuXeDg8iYrGB4hm + 1+NiBA+JnGo8GR3G2bPnwv8NnJKcXCn69nLqurD1TCbeOZWFbb5cWAaUwfJyFaxu1MPIvxruJNDg8Bju + D46jc2AYnf2DqO/oI349iCnpwPeJ1Th67R62e2fB0IHsE+vbCEwuw8zUCAT8qkE5OTnpWbAaKePj46QJ + PH78GMOPB0hrBs+mJzA9OYaJ0SGMDw/iGWlX1jYj914lKgT1KKuqRTmpSwWNKKvrQDn5Ftd2DqD70ROM + Tk3jOYkyOTWBkeFhcWxRMTAwMCTVKzCLybJ4Qp69Fy9e4B6Xi9xsNspKilFOxCstRTW/CnU1QtQK+Wis + r0G1UIDGhga0t7WihRyVGurrUFctQENdDbERQFBVKfbjlZahmMsBp6gQ4xMTYrCpqan1LPjNN5cfmpiY + xLOZZ/juuwvw8PgK58/7wtfXD35+Abh6NQgxsTG4ezccsXExKCY31NLajGYC5XAKERMTjajoSNwJC8cP + P1wW+/j6XiKxfMWxfHy+FZ+/XpL137Jl67ezYAsLC7+Zmd8xPT2NwCtXcYWAIiOjER0di7j4eMTGxiM5 + ORUpKSkEHIuEhHhkZ2cjJycH5FQJcgIlY6nENhHRMbEIC49AaWkJSoj8A34iN/MTOTR2ERRgY/NJzCyY + 3EWUuJeU0Nt3SLA0lJWVi1VRUQk+XyBWdXUtauvqwSN9XG4xybwUVVUC1NbWQSAQkjZfbF9cXIKmpmbU + EdvUtHTcuhWKR48GxfEdHA5zSfUKrK2tc7eOOHeS6bhzJwx9ff0YH58gG20Iw8MjGBl9AtEeGBsbF0u0 + LFOTv2GS1KJr0dgosRkZGcHjoSHxBu3pER13e0nfqHjGiu8Vo40cc9esWVs4CybFVV9PD7a2tti/f//s + tPwdZWhoGPZ29ti3dy/MzMxEsB9J9yz4baLB9zZuwob3NoK1mIVVpquwafMm7NmzB3b2dnA94QpvH2/4 + +/sjKCiITN8t3L5zm9Q3ce3aNbKh/MgL4iyOOx3HgYMHYLnDEu+ssxDHIk8raa8XgUQ6MAum0WhKUlJS + XvLytB5NTc2XklKvD3p/g+bNkwOdQQeDyZwisWNZLNbcc0zeJpSMjAxdWlr6A2VlZTcTE5OAnVY7Iw4d + OpTt7Oxc6e7u3nrmzJn+c+fODZF6/PTp05Oenp5TRL+JRPqmyNi4l5fXCKkHSObtHh4eVU5OTmybj23C + 1q9bd3Hp0qWfE6i+kpLS3D+JP4ukpCQlLy9P0el0WbIeimS9GSSIXnBwsHlsbOyWrKys3Vwu9yCPx7MX + CARHhELhMT6ff7SiosJe1M9ms3fHxcVtJVNvTsDLra2tNczNzeWZTKbEvHnzXlNETFB/AFyHwBGvedXw + AAAAAElFTkSuQmCC + + iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAIdJREFUOE/V diff --git a/Aviso/usrcntlAktDetails.vb b/Aviso/usrcntlAktDetails.vb index 4c14f4d..7695d17 100644 --- a/Aviso/usrcntlAktDetails.vb +++ b/Aviso/usrcntlAktDetails.vb @@ -43,6 +43,7 @@ Public Class usrcntlAktDetails Dim AVISO As cAviso = Nothing Dim WithEvents timerSendRows As New Timer + Dim painted = False ' Damit gridVermerke Formattierung nicht dauernd anspringt.. Public Sub New() InitializeComponent() @@ -199,6 +200,9 @@ Public Class usrcntlAktDetails btnErfasst.Visible = True End If + If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("ADMIN", Me.FindForm) Then + Button2.Visible = True + End If 'If VERAG_PROG_ALLGEMEIN.cAllgemein.USRKURZNAME <> "ADMIN" Then ' tbcntlVermerke.TabPages.Remove(tbAnhang) 'End If @@ -354,6 +358,7 @@ Public Class usrcntlAktDetails .Columns("tblSnd_Empfaenger").Visible = False 'tblSnd_Empfaengernicht anzeigen .Columns("Hervorheben").Visible = False 'tblSnd_Empfaengernicht anzeigen .Columns("VorauskasseId").Visible = False 'tblSnd_Empfaengernicht anzeigen + .Columns("SMSId").Visible = False 'tblSnd_Empfaengernicht anzeigen .Columns("Datum").Width = 125 '110 .Columns("Datum").HeaderText = "Datum" @@ -664,9 +669,14 @@ Public Class usrcntlAktDetails If AvisoID <= 0 Then Exit Sub pnlMAInfo.Visible = False Button18.Visible = False + btnQuckScan.Visible = False Select Case tbcntlVermerke.SelectedIndex Case 0, 1, 2 : Vermerke_anzeigen2(rowindex) Case 3 + If VERAG_PROG_ALLGEMEIN.cBerechtignunen.CHECK_BERECHTIGUNG_bool("AVISO_ANHAENGE_QuickScan", Me.FindForm) Then + btnQuckScan.Visible = True + End If + Button18.Visible = True Dim hSQL As String = " SELECT [anh_id],[anh_Name],[anh_docId],[anh_Art],[anh_Typ] FROM [tblAvisoAnhaenge] WHERE [anh_AvisoId]='" & AvisoID & "' AND isnull(anh_SendungsId,0) <=0 @@ -718,6 +728,7 @@ Public Class usrcntlAktDetails End With End Select + painted = False ArrowDown_ShowHide() End Sub @@ -826,7 +837,7 @@ Public Class usrcntlAktDetails Dim hSQL As String = " SELECT TOP 1000 [VermerkID],[AvisoID], [SendungID],[VermerkeCode], [Datum],[MitarbeiterId],tblSendungen.tblSnd_PosUnterNr,Hervorheben," & - " CASE WHEN VermerkeCode IS NULL OR VermerkeCode IN (13,25,28,29,30,35,46,47) THEN Hinweis_Vermerk ELSE VermerkeCodes.Bezeichnung END as [Hinweis_Vermerk_Anzeige],[Hinweis_Vermerk], tblSendungen.tblSnd_Empfaenger ,[Mitarbeiter],VorauskasseId" & + " CASE WHEN VermerkeCode IS NULL OR VermerkeCode IN (13,25,28,29,30,35,46,47) THEN Hinweis_Vermerk ELSE VermerkeCodes.Bezeichnung END as [Hinweis_Vermerk_Anzeige],[Hinweis_Vermerk], tblSendungen.tblSnd_Empfaenger ,[Mitarbeiter],VorauskasseId,SMSId" & " FROM [Vermerke] LEFT JOIN VermerkeCodes ON [VermerkeCode]=VermerkeCodes.VermerkCodeId " & " LEFT JOIN tblSendungen ON [SendungID]=tblSendungen.tblSnd_SendungID " & " WHERE AvisoID = " & AvisoID & " " & sendwhere & " " & @@ -1050,6 +1061,7 @@ Public Class usrcntlAktDetails Dim sql As New VERAG_PROG_ALLGEMEIN.SQL sql.doSQL("UPDATE AVISO SET ZOLLDigitalEingereicht=0, LKW_fertig=1 where avisoid=" & AvisoID, "AVISO") + AvisoStatusFunctions.printFinish(AVISO) ' avisoAktualisierenAktiveIdBehalten(myVermerk.AvisoID) 'Vermerke_aktualisieren() @@ -1078,6 +1090,7 @@ Public Class usrcntlAktDetails Private Sub gridVermerke_Paint(sender As Object, e As PaintEventArgs) Handles gridVermerke.Paint + If painted Then Exit Sub If dgvSendungen.RowCount = 0 Then Exit Sub Try If gridVermerke.Columns("VermerkeOptions") Is Nothing Then Exit Sub @@ -1170,6 +1183,29 @@ Public Class usrcntlAktDetails optionCell.Value = "Kontaktdaten erhalten" optionCell.ToolTipText = "Klicken Sie hier, um den Vermerk 'Kontaktdaten erhalten' einzutragen." End If + Case 46 + If r.Cells("SMSId").Value IsNot DBNull.Value AndAlso IsNumeric(r.Cells("SMSId").Value) Then + Dim SMS As New VERAG_PROG_ALLGEMEIN.cSMS(r.Cells("SMSId").Value) + optionCell.ToolTipText = "SMS Satus" + optionCell.Style.BackColor = Color.White + optionCell.LinkColor = Color.Black + Select Case SMS.sms_Status + Case -1, 0 : optionCell.Value = "" + Case 1, 2 : optionCell.Value = "wartend..." + optionCell.Style.BackColor = Color.PapayaWhip + optionCell.Style.SelectionBackColor = optionCell.Style.BackColor + Case 3 + optionCell.Value = "OK - Empfangen!" + optionCell.Style.BackColor = Color.Green + optionCell.LinkColor = Color.White + optionCell.Style.SelectionBackColor = optionCell.Style.BackColor + Case 4 : optionCell.Value = "Sende-Fehler!" + optionCell.ToolTipText = "Sendefehler: " & SMS.sms_Failure + optionCell.Style.BackColor = Color.Red + optionCell.LinkColor = Color.White + optionCell.Style.SelectionBackColor = optionCell.Style.BackColor + End Select + End If Case 53 If Not existCodeInGridVermerke(54, CStr(r.Cells("Hinweis_Vermerk").Value)) Then optionCell.Value = "Ü-Dok erhalten" @@ -1213,7 +1249,7 @@ Public Class usrcntlAktDetails Next - + painted = True ' ArrowDown_ShowHide() 'Anzeigeproblem, wenn Aviso minimiert wird! --> Jetzt bei Timer! Catch ex As Exception @@ -1345,20 +1381,26 @@ Public Class usrcntlAktDetails 'If gridVermerke.SelectedRows.Count = 0 Then Exit Sub 'Es wurde außerhalb einer gültigen Datenzeile geklickt 'gridMyAviso.ClearSelection() 'WARUM? + DirectCast(sender, DataGridView).Rows(e.RowIndex).Selected = True If e.Button = MouseButtons.Right Then If AVISO.Abgeschlossen Then Exit Sub - If sender Is gridVermerke Then - If gridVermerke.SelectedRows.Count = 0 Then Exit Sub 'Es wurde außerhalb einer gültigen Datenzeile geklickt - ' AvisoID = CInt(gridVermerke.Rows(e.RowIndex).Cells("AvisoId").Value) - gridVermerke.CurrentCell = gridVermerke.Rows(e.RowIndex).Cells(e.ColumnIndex) - conMenuVermerke.Show(Cursor.Position) + Select Case tbcntlVermerke.SelectedIndex + Case 0, 1, 2 + If sender Is gridVermerke Then + If gridVermerke.SelectedRows.Count = 0 Then Exit Sub 'Es wurde außerhalb einer gültigen Datenzeile geklickt + ' AvisoID = CInt(gridVermerke.Rows(e.RowIndex).Cells("AvisoId").Value) + gridVermerke.CurrentCell = gridVermerke.Rows(e.RowIndex).Cells(e.ColumnIndex) + conMenuVermerke.Show(Cursor.Position) - ToolUeberweisungsBeleg.Visible = (gridVermerke.SelectedRows(0).Cells("VermerkeCode").Value = "13") - toolVkReminder.Visible = (gridVermerke.SelectedRows(0).Cells("VermerkeCode").Value = "13") + ToolUeberweisungsBeleg.Visible = (gridVermerke.SelectedRows(0).Cells("VermerkeCode").Value = "13") + toolVkReminder.Visible = (gridVermerke.SelectedRows(0).Cells("VermerkeCode").Value = "13") + + End If + Case 3 + End Select - End If End If End Sub @@ -1773,7 +1815,7 @@ Public Class usrcntlAktDetails End Sub Private Sub Button2_Click(sender As Object, e As EventArgs) Handles btnOptionen.Click - pnlOptionen.Height = 157 '125 + pnlOptionen.Height = 183 '157 '125 pnlOptionen.Visible = Not pnlOptionen.Visible If pnlOptionen.Visible Then pnlOptionen.Location = New Point(pnlOptionen.Location.X, btnOptionen.Height + pnl.Height + FlowLayoutPanel.Height) @@ -1916,7 +1958,6 @@ Public Class usrcntlAktDetails timerSendRows.Enabled = False End If ArrowDown_ShowHide() - End Sub 'Private Sub timerSendRows_Tick(sender As Object, e As EventArgs) Handles timerSendRows.Tick @@ -2571,7 +2612,7 @@ Public Class usrcntlAktDetails If f.SMS IsNot Nothing Then Dim FahrerHandy = If(f.SMS.sms_Vorwahl, "") & If(f.SMS.sms_Handynummer, "") If FahrerHandy <> "" Then - SDL.cSMSOptions.insertVermerk(AvisoID, FahrerHandy, Now) + SDL.cSMSOptions.insertVermerkSMS(AvisoID, FahrerHandy, f.SMS.sms_id, Now) If If(AVISO.FahrerHandy, "") = "" Then AVISO.FahrerHandy = FahrerHandy AVISO.UPDATE_FahrerHandy(FahrerHandy) @@ -2645,19 +2686,27 @@ Public Class usrcntlAktDetails End If End Sub - Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click, Button15.Click - pnlDetailsRechts.Cursor = Cursors.WaitCursor + Private Sub Button10_Click(sender As Object, e As EventArgs) Handles btnLZDruck.Click, btnLZDruckDIGITAL.Click + Dim f As New frmLaufzettel(AVISO, Nothing, (sender Is btnLZDruckDIGITAL), cbxLZT1.Checked, cbxLZRg.Checked, cbxVPSplit.Checked) + f.ShowDialog() + Panel4.Visible = False + Exit Sub + + pnlDetailsRechts.Cursor = Cursors.WaitCursor + ' Fahrer zum Zoll! '------------------------------------------------ - If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("PRINT_zumZOLL") Then - If vbYes = MsgBox("Fahrer-Anweisung ""zum Zollamt gehen"" ausdrucken?", vbYesNo) Then - Try - Dim path = SDL.FormularManagerNEU.zumZOLL_AVISO(AVISO) - If path <> "" Then VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaGS(path, (New System.Drawing.Printing.PrinterSettings).PrinterName) - Catch ex As Exception : MsgBox(ex.Message & ex.StackTrace) : End Try + If sender Is btnLZDruck Then + If VERAG_PROG_ALLGEMEIN.cAllgemein.PARAMS.GET_PARAMETER_VALUE_BOOL("PRINT_zumZOLL") Then + If vbYes = MsgBox("Fahrer-Anweisung ""zum Zollamt gehen"" ausdrucken?", vbYesNo) Then + Try + Dim path = SDL.FormularManagerNEU.zumZOLL_AVISO(AVISO) + If path <> "" Then VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaGS(path, (New System.Drawing.Printing.PrinterSettings).PrinterName) + Catch ex As Exception : MsgBox(ex.Message & ex.StackTrace) : End Try + End If End If End If '------------------------------------------------ @@ -2683,31 +2732,46 @@ Public Class usrcntlAktDetails End If Next - 'DIGITALE ABFERTIGUNG: - If (sender Is Button15) Or cbxVPSplit.Checked Then ' digital oder splittung --> per Vorpapier + 'DIGITALE ABFERTIGUNG: + If (sender Is btnLZDruckDIGITAL) Or cbxVPSplit.Checked Then ' digital oder splittung --> per Vorpapier Try Dim SENDUNG_LIST As New List(Of VERAG_PROG_ALLGEMEIN.cSendungen) VERAG_PROG_ALLGEMEIN.cSendungen.LOAD_LIST(SENDUNG_LIST, -1, AvisoID) 'LÄDT alle SENDUNGSDATEN + + Dim pruef = False For Each s In SENDUNG_LIST Select Case s.tblSnd_Abfertigungsart_ID.ToString Case "38", "26" 'AT - Keine Prüfung Case Else - If If(s.tblSnd_Vorpapier, "") = "" Then - MsgBox("Nicht alle Sendungen haben ein Vorpapier eingetragen!" & vbNewLine & "Laufzettelerstellung wird abgebrochen.") - pnlDetailsRechts.Cursor = Cursors.Default : Exit Sub + If If(s.tblSnd_Vorpapier, "") = "" And If(s.tblSnd_Vorpapier2, "") = "" And If(s.tblSnd_Vorpapier3, "") = "" Then + pruef = True End If End Select Next + + If pruef Then ' VP fehlen + If sender Is btnLZDruck Then 'Wenn LZ Druck + If vbYes <> MsgBox("Nicht alle Sendungen haben ein Vorpapier eingetragen!" & vbNewLine & "Soll der laufzettel trotzdem gedruckt werden?", vbYesNoCancel) Then + pnlDetailsRechts.Cursor = Cursors.Default : Exit Sub + End If + Else ' Digitalabfertigungn + MsgBox("Nicht alle Sendungen haben ein Vorpapier eingetragen!" & vbNewLine & "Laufzettelerstellung wird abgebrochen.") + pnlDetailsRechts.Cursor = Cursors.Default : Exit Sub + End If + End If + AVISO.LOAD_Vorpapiere() Dim VP_Enum = VERAG_PROG_ALLGEMEIN.cSendungen.VP_Enum(SENDUNG_LIST) 'Filtert nach eindeutigen Vorpapieren Dim paths As New List(Of String) + If pruef Then paths.Add(SDL.FormularManagerNEU.LaufzettelZollDE_VP(AvisoID, False,, "XXXX")) For Each VP In VP_Enum paths.Add(SDL.FormularManagerNEU.LaufzettelZollDE_VP(AvisoID, False,, VP)) Next - If (sender Is Button15) Then 'NUR BEI DIGITALANMELDUNG! + + If (sender Is btnLZDruckDIGITAL) Then 'NUR BEI DIGITALANMELDUNG! Dim outl As New Outlook.Application Dim Mail As Microsoft.Office.Interop.Outlook.MailItem @@ -2729,7 +2793,7 @@ Public Class usrcntlAktDetails tX = New VERAG_PROG_ALLGEMEIN.cTextkonserve("LAUFZETTEL_DIGITAL", "LAUFZETTEL_DE_DIGITAL_SUB", "DE", VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA) End Select - Dim MAIL_SUBJ = tx.txt_betreff.Replace("%LKWKennzeichen%", AVISO.LKW_Nr) + Dim MAIL_SUBJ = tX.txt_betreff.Replace("%LKWKennzeichen%", AVISO.LKW_Nr) Dim MAIL_BODY = tX.txt_text.Replace("%LKWKennzeichen%", AVISO.LKW_Nr) addVPList(MAIL_BODY, VP_Enum) @@ -3143,5 +3207,61 @@ Public Class usrcntlAktDetails End Sub + Private Sub Button2_Click_1(sender As Object, e As EventArgs) Handles Button2.Click + Dim f As New frmLaufzettel(AVISO, Nothing, True, True, True, cbxVPSplit.Checked) + f.ShowDialog() + End Sub + + Private Sub btnQuckScan_Click(sender As Object, e As EventArgs) Handles btnQuckScan.Click + Try + Me.Cursor = Cursors.WaitCursor + If frmSendungAnhangImport.quickScan(AvisoID) Then + Vermerke_anzeigen() + End If + Catch ex As Exception + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler QuickScan") + End Try + Me.Cursor = Cursors.Default + + + 'Try + ' Me.Cursor = Cursors.WaitCursor + ' 'If KdNr < 0 Then Exit Sub + ' Dim frmScan As New VERAG_PROG_ALLGEMEIN.frmScan("QuickScan") + ' frmScan.DefaultFileName = "Scan" ' Me._TEXT_PDF + + ' If frmScan.ShowDialog(Me) = DialogResult.OK Then + ' If frmScan.ReturnValue IsNot Nothing Then + ' Dim Filename = frmScan.fileName + ' Dim TMP_Path = VERAG_PROG_ALLGEMEIN.DATENVERVER_OPTIONS.getTMPPath(Filename, ".pdf",, False, "SendungsAnhaenge") + ' File.WriteAllBytes(TMP_Path, frmScan.ReturnValue) + + ' Dim da_id = -1 + ' Dim anhId = -1 + ' Dim destPath = "" + ' If frmSendungAnhangImport.saveToDS(AvisoID, Filename, TMP_Path, "", "PDF", da_id, anhId, destPath) Then + ' ' frmSendungAnhangImport. addUsrcnlToPnl(destPath, da_id, anhId, Filename, "PDF") + ' Vermerke_anzeigen() + ' End If + ' 'addUsrcnlToPnl(TMP_Path) + ' End If + ' End If + + 'Catch ex As Exception + ' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler QuickScan") + 'End Try + 'Me.Cursor = Cursors.Default + End Sub + + Private Sub btnWlanTicket_Click(sender As Object, e As EventArgs) Handles btnWlanTicket.Click + If VERAG_PROG_ALLGEMEIN.cAllgemein.FIRMA = "FRONTOFFICE" Then + sWLANTicket.printTicket(AVISO) + Else + MsgBox("Nur für Front-Office Benutzer!") + End If + + End Sub + + End Class diff --git a/Aviso/usrcntlAktDetailsATILLANeu.Designer.vb b/Aviso/usrcntlAktDetailsATILLANeu.Designer.vb index d53958a..abab301 100644 --- a/Aviso/usrcntlAktDetailsATILLANeu.Designer.vb +++ b/Aviso/usrcntlAktDetailsATILLANeu.Designer.vb @@ -33,6 +33,7 @@ Partial Class usrcntlAktDetailsATILLANeu Dim DataGridViewCellStyle8 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle9 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle10 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() + Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrcntlAktDetailsATILLANeu)) Dim DataGridViewCellStyle11 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle12 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle13 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() @@ -43,25 +44,26 @@ Partial Class usrcntlAktDetailsATILLANeu Dim DataGridViewCellStyle18 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle19 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() Dim DataGridViewCellStyle20 As System.Windows.Forms.DataGridViewCellStyle = New System.Windows.Forms.DataGridViewCellStyle() - Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(usrcntlAktDetailsATILLANeu)) Me.pnlDetailsRechts = New System.Windows.Forms.Panel() Me.Panel3 = New System.Windows.Forms.Panel() Me.SplitContainer = New System.Windows.Forms.SplitContainer() Me.tbcntr = New System.Windows.Forms.TabControl() - Me.TabPage1 = New System.Windows.Forms.TabPage() + Me.tbVermerke = New System.Windows.Forms.TabPage() Me.UsrCntlVermerkeATilla1 = New AVISO.usrCntlVermerkeATilla() - Me.TabPage3 = New System.Windows.Forms.TabPage() + Me.tbZollanmeldungen = New System.Windows.Forms.TabPage() Me.Panel1 = New System.Windows.Forms.Panel() Me.dgvZollAnmeldungen = New System.Windows.Forms.DataGridView() Me.Panel4 = New System.Windows.Forms.Panel() Me.Button7 = New System.Windows.Forms.Button() Me.Label6 = New System.Windows.Forms.Label() - Me.TabPage2 = New System.Windows.Forms.TabPage() + Me.tbSpedBuch = New System.Windows.Forms.TabPage() Me.dgvSpeditionsbuch = New System.Windows.Forms.DataGridView() Me.pnlSendungenTop = New System.Windows.Forms.Panel() Me.btn = New System.Windows.Forms.Button() Me.Label1 = New System.Windows.Forms.Label() Me.tbAnhaenge = New System.Windows.Forms.TabPage() + Me.Button4 = New System.Windows.Forms.Button() + Me.btnQuckScan = New System.Windows.Forms.Button() Me.dgvanhaenge = New System.Windows.Forms.DataGridView() Me.Panel7 = New System.Windows.Forms.Panel() Me.gridVermerke = New System.Windows.Forms.DataGridView() @@ -79,8 +81,6 @@ Partial Class usrcntlAktDetailsATILLANeu Me.cbxHandling = New System.Windows.Forms.Label() Me.Label10 = New System.Windows.Forms.Label() Me.Label9 = New System.Windows.Forms.Label() - Me.txtFrächter = New System.Windows.Forms.TextBox() - Me.txtAuftraggeber = New System.Windows.Forms.TextBox() Me.txtLKWID = New System.Windows.Forms.TextBox() Me.Button2 = New System.Windows.Forms.Button() Me.pnlOptionen = New System.Windows.Forms.Panel() @@ -89,13 +89,15 @@ Partial Class usrcntlAktDetailsATILLANeu Me.Button5 = New System.Windows.Forms.Button() Me.Button1 = New System.Windows.Forms.Button() Me.lblAktUebernommen = New System.Windows.Forms.Label() - Me.Button4 = New System.Windows.Forms.Button() + Me.btnAktUebernehmen = New System.Windows.Forms.Button() Me.btnKassenbuchEintrag = New System.Windows.Forms.Button() Me.Button3 = New System.Windows.Forms.Button() Me.pnlAbgeschlossen = New System.Windows.Forms.Panel() Me.Label2 = New System.Windows.Forms.Label() Me.pic = New System.Windows.Forms.PictureBox() Me.txtAktMA = New System.Windows.Forms.TextBox() + Me.txtFrächter = New System.Windows.Forms.TextBox() + Me.txtAuftraggeber = New System.Windows.Forms.TextBox() Me.FlowLayoutPanel = New System.Windows.Forms.FlowLayoutPanel() Me.Panel9 = New System.Windows.Forms.Panel() Me.btnErfasst = New System.Windows.Forms.Button() @@ -128,6 +130,12 @@ Partial Class usrcntlAktDetailsATILLANeu Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() Me.SGSNCTSToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.cntxtZollantrag = New System.Windows.Forms.ContextMenuStrip(Me.components) + Me.cntxt = New System.Windows.Forms.ContextMenuStrip(Me.components) + Me.MarkiertePDFsDruckenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UmbenennenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.LöschenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.AusZwischenablageEinfügenPasteToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.Button10 = New System.Windows.Forms.Button() Me.pnlDetailsRechts.SuspendLayout() Me.Panel3.SuspendLayout() CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).BeginInit() @@ -135,12 +143,12 @@ Partial Class usrcntlAktDetailsATILLANeu Me.SplitContainer.Panel2.SuspendLayout() Me.SplitContainer.SuspendLayout() Me.tbcntr.SuspendLayout() - Me.TabPage1.SuspendLayout() - Me.TabPage3.SuspendLayout() + Me.tbVermerke.SuspendLayout() + Me.tbZollanmeldungen.SuspendLayout() Me.Panel1.SuspendLayout() CType(Me.dgvZollAnmeldungen, System.ComponentModel.ISupportInitialize).BeginInit() Me.Panel4.SuspendLayout() - Me.TabPage2.SuspendLayout() + Me.tbSpedBuch.SuspendLayout() CType(Me.dgvSpeditionsbuch, System.ComponentModel.ISupportInitialize).BeginInit() Me.pnlSendungenTop.SuspendLayout() Me.tbAnhaenge.SuspendLayout() @@ -162,6 +170,7 @@ Partial Class usrcntlAktDetailsATILLANeu Me.conMenuVermerke.SuspendLayout() Me.cntxtFormulare.SuspendLayout() Me.cntxtZollantrag.SuspendLayout() + Me.cntxt.SuspendLayout() Me.SuspendLayout() ' 'pnlDetailsRechts @@ -177,7 +186,7 @@ Partial Class usrcntlAktDetailsATILLANeu Me.pnlDetailsRechts.Location = New System.Drawing.Point(0, 0) Me.pnlDetailsRechts.MinimumSize = New System.Drawing.Size(200, 0) Me.pnlDetailsRechts.Name = "pnlDetailsRechts" - Me.pnlDetailsRechts.Size = New System.Drawing.Size(575, 583) + Me.pnlDetailsRechts.Size = New System.Drawing.Size(575, 647) Me.pnlDetailsRechts.TabIndex = 81 ' 'Panel3 @@ -188,7 +197,7 @@ Partial Class usrcntlAktDetailsATILLANeu Me.Panel3.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel3.Location = New System.Drawing.Point(0, 197) Me.Panel3.Name = "Panel3" - Me.Panel3.Size = New System.Drawing.Size(575, 386) + Me.Panel3.Size = New System.Drawing.Size(575, 450) Me.Panel3.TabIndex = 91 ' 'SplitContainer @@ -210,33 +219,33 @@ Partial Class usrcntlAktDetailsATILLANeu Me.SplitContainer.Panel2.Controls.Add(Me.gridVermerke) Me.SplitContainer.Panel2.Controls.Add(Me.pnlVermerkeTop) Me.SplitContainer.Panel2.Controls.Add(Me.addVermerk) - Me.SplitContainer.Size = New System.Drawing.Size(575, 220) - Me.SplitContainer.SplitterDistance = 143 + Me.SplitContainer.Size = New System.Drawing.Size(575, 284) + Me.SplitContainer.SplitterDistance = 184 Me.SplitContainer.TabIndex = 91 ' 'tbcntr ' - Me.tbcntr.Controls.Add(Me.TabPage1) - Me.tbcntr.Controls.Add(Me.TabPage3) - Me.tbcntr.Controls.Add(Me.TabPage2) + Me.tbcntr.Controls.Add(Me.tbVermerke) + Me.tbcntr.Controls.Add(Me.tbZollanmeldungen) + Me.tbcntr.Controls.Add(Me.tbSpedBuch) Me.tbcntr.Controls.Add(Me.tbAnhaenge) Me.tbcntr.Dock = System.Windows.Forms.DockStyle.Fill Me.tbcntr.Location = New System.Drawing.Point(0, 0) Me.tbcntr.Name = "tbcntr" Me.tbcntr.SelectedIndex = 0 - Me.tbcntr.Size = New System.Drawing.Size(575, 143) + Me.tbcntr.Size = New System.Drawing.Size(575, 184) Me.tbcntr.TabIndex = 100 ' - 'TabPage1 + 'tbVermerke ' - Me.TabPage1.Controls.Add(Me.UsrCntlVermerkeATilla1) - Me.TabPage1.Location = New System.Drawing.Point(4, 22) - Me.TabPage1.Name = "TabPage1" - Me.TabPage1.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage1.Size = New System.Drawing.Size(567, 117) - Me.TabPage1.TabIndex = 0 - Me.TabPage1.Text = "Vermerk eintragen" - Me.TabPage1.UseVisualStyleBackColor = True + Me.tbVermerke.Controls.Add(Me.UsrCntlVermerkeATilla1) + Me.tbVermerke.Location = New System.Drawing.Point(4, 22) + Me.tbVermerke.Name = "tbVermerke" + Me.tbVermerke.Padding = New System.Windows.Forms.Padding(3) + Me.tbVermerke.Size = New System.Drawing.Size(567, 158) + Me.tbVermerke.TabIndex = 0 + Me.tbVermerke.Text = "Vermerk eintragen" + Me.tbVermerke.UseVisualStyleBackColor = True ' 'UsrCntlVermerkeATilla1 ' @@ -246,18 +255,18 @@ Partial Class usrcntlAktDetailsATILLANeu Me.UsrCntlVermerkeATilla1.Location = New System.Drawing.Point(3, 3) Me.UsrCntlVermerkeATilla1.Margin = New System.Windows.Forms.Padding(4, 5, 4, 5) Me.UsrCntlVermerkeATilla1.Name = "UsrCntlVermerkeATilla1" - Me.UsrCntlVermerkeATilla1.Size = New System.Drawing.Size(561, 111) + Me.UsrCntlVermerkeATilla1.Size = New System.Drawing.Size(561, 152) Me.UsrCntlVermerkeATilla1.TabIndex = 0 ' - 'TabPage3 + 'tbZollanmeldungen ' - Me.TabPage3.Controls.Add(Me.Panel1) - Me.TabPage3.Location = New System.Drawing.Point(4, 22) - Me.TabPage3.Name = "TabPage3" - Me.TabPage3.Size = New System.Drawing.Size(567, 117) - Me.TabPage3.TabIndex = 2 - Me.TabPage3.Text = "Zollanmeldungen" - Me.TabPage3.UseVisualStyleBackColor = True + Me.tbZollanmeldungen.Controls.Add(Me.Panel1) + Me.tbZollanmeldungen.Location = New System.Drawing.Point(4, 22) + Me.tbZollanmeldungen.Name = "tbZollanmeldungen" + Me.tbZollanmeldungen.Size = New System.Drawing.Size(567, 158) + Me.tbZollanmeldungen.TabIndex = 2 + Me.tbZollanmeldungen.Text = "Zollanmeldungen" + Me.tbZollanmeldungen.UseVisualStyleBackColor = True ' 'Panel1 ' @@ -267,7 +276,7 @@ Partial Class usrcntlAktDetailsATILLANeu Me.Panel1.Dock = System.Windows.Forms.DockStyle.Fill Me.Panel1.Location = New System.Drawing.Point(0, 0) Me.Panel1.Name = "Panel1" - Me.Panel1.Size = New System.Drawing.Size(567, 117) + Me.Panel1.Size = New System.Drawing.Size(567, 158) Me.Panel1.TabIndex = 0 ' 'dgvZollAnmeldungen @@ -319,7 +328,7 @@ Partial Class usrcntlAktDetailsATILLANeu Me.dgvZollAnmeldungen.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvZollAnmeldungen.ShowCellErrors = False Me.dgvZollAnmeldungen.ShowRowErrors = False - Me.dgvZollAnmeldungen.Size = New System.Drawing.Size(565, 84) + Me.dgvZollAnmeldungen.Size = New System.Drawing.Size(565, 125) Me.dgvZollAnmeldungen.TabIndex = 102 Me.dgvZollAnmeldungen.TabStop = False ' @@ -357,17 +366,17 @@ Partial Class usrcntlAktDetailsATILLANeu Me.Label6.TabIndex = 98 Me.Label6.Text = "Zollanmeldungen:" ' - 'TabPage2 + 'tbSpedBuch ' - Me.TabPage2.Controls.Add(Me.dgvSpeditionsbuch) - Me.TabPage2.Controls.Add(Me.pnlSendungenTop) - Me.TabPage2.Location = New System.Drawing.Point(4, 22) - Me.TabPage2.Name = "TabPage2" - Me.TabPage2.Padding = New System.Windows.Forms.Padding(3) - Me.TabPage2.Size = New System.Drawing.Size(567, 117) - Me.TabPage2.TabIndex = 1 - Me.TabPage2.Text = "Speditionsbuch" - Me.TabPage2.UseVisualStyleBackColor = True + Me.tbSpedBuch.Controls.Add(Me.dgvSpeditionsbuch) + Me.tbSpedBuch.Controls.Add(Me.pnlSendungenTop) + Me.tbSpedBuch.Location = New System.Drawing.Point(4, 22) + Me.tbSpedBuch.Name = "tbSpedBuch" + Me.tbSpedBuch.Padding = New System.Windows.Forms.Padding(3) + Me.tbSpedBuch.Size = New System.Drawing.Size(567, 158) + Me.tbSpedBuch.TabIndex = 1 + Me.tbSpedBuch.Text = "Speditionsbuch" + Me.tbSpedBuch.UseVisualStyleBackColor = True ' 'dgvSpeditionsbuch ' @@ -418,7 +427,7 @@ Partial Class usrcntlAktDetailsATILLANeu Me.dgvSpeditionsbuch.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvSpeditionsbuch.ShowCellErrors = False Me.dgvSpeditionsbuch.ShowRowErrors = False - Me.dgvSpeditionsbuch.Size = New System.Drawing.Size(561, 80) + Me.dgvSpeditionsbuch.Size = New System.Drawing.Size(561, 121) Me.dgvSpeditionsbuch.TabIndex = 101 Me.dgvSpeditionsbuch.TabStop = False ' @@ -458,15 +467,46 @@ Partial Class usrcntlAktDetailsATILLANeu ' 'tbAnhaenge ' + Me.tbAnhaenge.Controls.Add(Me.Button10) + Me.tbAnhaenge.Controls.Add(Me.Button4) + Me.tbAnhaenge.Controls.Add(Me.btnQuckScan) Me.tbAnhaenge.Controls.Add(Me.dgvanhaenge) Me.tbAnhaenge.Location = New System.Drawing.Point(4, 22) Me.tbAnhaenge.Name = "tbAnhaenge" Me.tbAnhaenge.Padding = New System.Windows.Forms.Padding(3) - Me.tbAnhaenge.Size = New System.Drawing.Size(567, 117) + Me.tbAnhaenge.Size = New System.Drawing.Size(567, 158) Me.tbAnhaenge.TabIndex = 3 Me.tbAnhaenge.Text = "Anhänge" Me.tbAnhaenge.UseVisualStyleBackColor = True ' + 'Button4 + ' + Me.Button4.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button4.Image = Global.AVISO.My.Resources.Resources.pdf11 + Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button4.Location = New System.Drawing.Point(175, 118) + Me.Button4.Name = "Button4" + Me.Button4.Size = New System.Drawing.Size(124, 37) + Me.Button4.TabIndex = 109 + Me.Button4.Text = "PDF hochladen" + Me.Button4.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Button4.UseVisualStyleBackColor = True + ' + 'btnQuckScan + ' + Me.btnQuckScan.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnQuckScan.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnQuckScan.Image = CType(resources.GetObject("btnQuckScan.Image"), System.Drawing.Image) + Me.btnQuckScan.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnQuckScan.Location = New System.Drawing.Point(445, 118) + Me.btnQuckScan.Name = "btnQuckScan" + Me.btnQuckScan.Size = New System.Drawing.Size(119, 37) + Me.btnQuckScan.TabIndex = 108 + Me.btnQuckScan.Text = "Quick-Scan" + Me.btnQuckScan.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnQuckScan.UseVisualStyleBackColor = True + ' 'dgvanhaenge ' Me.dgvanhaenge.AllowUserToAddRows = False @@ -495,7 +535,6 @@ Partial Class usrcntlAktDetailsATILLANeu Me.dgvanhaenge.DefaultCellStyle = DataGridViewCellStyle13 Me.dgvanhaenge.Dock = System.Windows.Forms.DockStyle.Fill Me.dgvanhaenge.Location = New System.Drawing.Point(3, 3) - Me.dgvanhaenge.MultiSelect = False Me.dgvanhaenge.Name = "dgvanhaenge" Me.dgvanhaenge.ReadOnly = True DataGridViewCellStyle14.Alignment = System.Windows.Forms.DataGridViewContentAlignment.MiddleLeft @@ -510,13 +549,13 @@ Partial Class usrcntlAktDetailsATILLANeu Me.dgvanhaenge.RowHeadersWidthSizeMode = System.Windows.Forms.DataGridViewRowHeadersWidthSizeMode.DisableResizing DataGridViewCellStyle15.WrapMode = System.Windows.Forms.DataGridViewTriState.[True] Me.dgvanhaenge.RowsDefaultCellStyle = DataGridViewCellStyle15 - Me.dgvanhaenge.RowTemplate.Height = 20 + Me.dgvanhaenge.RowTemplate.Height = 30 Me.dgvanhaenge.RowTemplate.ReadOnly = True Me.dgvanhaenge.RowTemplate.Resizable = System.Windows.Forms.DataGridViewTriState.[False] Me.dgvanhaenge.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.dgvanhaenge.ShowCellErrors = False Me.dgvanhaenge.ShowRowErrors = False - Me.dgvanhaenge.Size = New System.Drawing.Size(561, 111) + Me.dgvanhaenge.Size = New System.Drawing.Size(561, 152) Me.dgvanhaenge.TabIndex = 102 Me.dgvanhaenge.TabStop = False ' @@ -528,7 +567,7 @@ Partial Class usrcntlAktDetailsATILLANeu Me.Panel7.Location = New System.Drawing.Point(4, 19) Me.Panel7.MaximumSize = New System.Drawing.Size(2, 250) Me.Panel7.Name = "Panel7" - Me.Panel7.Size = New System.Drawing.Size(1, 15) + Me.Panel7.Size = New System.Drawing.Size(1, 56) Me.Panel7.TabIndex = 15 ' 'gridVermerke @@ -580,7 +619,7 @@ Partial Class usrcntlAktDetailsATILLANeu Me.gridVermerke.SelectionMode = System.Windows.Forms.DataGridViewSelectionMode.FullRowSelect Me.gridVermerke.ShowCellErrors = False Me.gridVermerke.ShowRowErrors = False - Me.gridVermerke.Size = New System.Drawing.Size(575, 44) + Me.gridVermerke.Size = New System.Drawing.Size(575, 67) Me.gridVermerke.TabIndex = 70 Me.gridVermerke.TabStop = False ' @@ -650,19 +689,19 @@ Partial Class usrcntlAktDetailsATILLANeu Me.Panel8.Controls.Add(Me.cbxHandling) Me.Panel8.Controls.Add(Me.Label10) Me.Panel8.Controls.Add(Me.Label9) - Me.Panel8.Controls.Add(Me.txtFrächter) - Me.Panel8.Controls.Add(Me.txtAuftraggeber) Me.Panel8.Controls.Add(Me.txtLKWID) Me.Panel8.Controls.Add(Me.Button2) Me.Panel8.Controls.Add(Me.pnlOptionen) Me.Panel8.Controls.Add(Me.Button5) Me.Panel8.Controls.Add(Me.Button1) Me.Panel8.Controls.Add(Me.lblAktUebernommen) - Me.Panel8.Controls.Add(Me.Button4) + Me.Panel8.Controls.Add(Me.btnAktUebernehmen) Me.Panel8.Controls.Add(Me.btnKassenbuchEintrag) Me.Panel8.Controls.Add(Me.Button3) Me.Panel8.Controls.Add(Me.pnlAbgeschlossen) Me.Panel8.Controls.Add(Me.txtAktMA) + Me.Panel8.Controls.Add(Me.txtFrächter) + Me.Panel8.Controls.Add(Me.txtAuftraggeber) Me.Panel8.Dock = System.Windows.Forms.DockStyle.Top Me.Panel8.Location = New System.Drawing.Point(0, 0) Me.Panel8.Name = "Panel8" @@ -787,38 +826,6 @@ Partial Class usrcntlAktDetailsATILLANeu Me.Label9.TabIndex = 110 Me.Label9.Text = "Avisierer:" ' - 'txtFrächter - ' - Me.txtFrächter.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ - Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.txtFrächter.BackColor = System.Drawing.Color.WhiteSmoke - Me.txtFrächter.BorderStyle = System.Windows.Forms.BorderStyle.None - Me.txtFrächter.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtFrächter.ForeColor = System.Drawing.Color.Black - Me.txtFrächter.Location = New System.Drawing.Point(74, 46) - Me.txtFrächter.MaxLength = 0 - Me.txtFrächter.Name = "txtFrächter" - Me.txtFrächter.ReadOnly = True - Me.txtFrächter.Size = New System.Drawing.Size(359, 16) - Me.txtFrächter.TabIndex = 109 - Me.txtFrächter.TabStop = False - ' - 'txtAuftraggeber - ' - Me.txtAuftraggeber.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ - Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.txtAuftraggeber.BackColor = System.Drawing.Color.WhiteSmoke - Me.txtAuftraggeber.BorderStyle = System.Windows.Forms.BorderStyle.None - Me.txtAuftraggeber.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) - Me.txtAuftraggeber.ForeColor = System.Drawing.Color.Black - Me.txtAuftraggeber.Location = New System.Drawing.Point(74, 70) - Me.txtAuftraggeber.MaxLength = 0 - Me.txtAuftraggeber.Name = "txtAuftraggeber" - Me.txtAuftraggeber.ReadOnly = True - Me.txtAuftraggeber.Size = New System.Drawing.Size(359, 16) - Me.txtAuftraggeber.TabIndex = 111 - Me.txtAuftraggeber.TabStop = False - ' 'txtLKWID ' Me.txtLKWID.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ @@ -857,9 +864,9 @@ Partial Class usrcntlAktDetailsATILLANeu Me.pnlOptionen.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle Me.pnlOptionen.Controls.Add(Me.btnLöschen) Me.pnlOptionen.Controls.Add(Me.btnÄndern) - Me.pnlOptionen.Location = New System.Drawing.Point(455, 73) + Me.pnlOptionen.Location = New System.Drawing.Point(408, 73) Me.pnlOptionen.Name = "pnlOptionen" - Me.pnlOptionen.Size = New System.Drawing.Size(116, 19) + Me.pnlOptionen.Size = New System.Drawing.Size(163, 19) Me.pnlOptionen.TabIndex = 105 Me.pnlOptionen.Visible = False ' @@ -901,9 +908,9 @@ Partial Class usrcntlAktDetailsATILLANeu Me.Button5.ForeColor = System.Drawing.Color.Black Me.Button5.Image = Global.AVISO.My.Resources.Resources.gear2 Me.Button5.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button5.Location = New System.Drawing.Point(436, 36) + Me.Button5.Location = New System.Drawing.Point(408, 36) Me.Button5.Name = "Button5" - Me.Button5.Size = New System.Drawing.Size(134, 40) + Me.Button5.Size = New System.Drawing.Size(162, 40) Me.Button5.TabIndex = 106 Me.Button5.Text = "Optionen " Me.Button5.TextAlign = System.Drawing.ContentAlignment.MiddleLeft @@ -930,27 +937,28 @@ Partial Class usrcntlAktDetailsATILLANeu Me.lblAktUebernommen.AutoSize = True Me.lblAktUebernommen.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) Me.lblAktUebernommen.ForeColor = System.Drawing.Color.Green - Me.lblAktUebernommen.Location = New System.Drawing.Point(295, 93) + Me.lblAktUebernommen.Location = New System.Drawing.Point(272, 93) Me.lblAktUebernommen.Name = "lblAktUebernommen" Me.lblAktUebernommen.Size = New System.Drawing.Size(133, 17) Me.lblAktUebernommen.TabIndex = 103 Me.lblAktUebernommen.Text = "Akt übernommen!" Me.lblAktUebernommen.Visible = False ' - 'Button4 + 'btnAktUebernehmen ' - Me.Button4.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) - Me.Button4.FlatStyle = System.Windows.Forms.FlatStyle.Flat - Me.Button4.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) - Me.Button4.ForeColor = System.Drawing.Color.Black - Me.Button4.ImageAlign = System.Drawing.ContentAlignment.MiddleRight - Me.Button4.Location = New System.Drawing.Point(436, 79) - Me.Button4.Name = "Button4" - Me.Button4.Size = New System.Drawing.Size(134, 32) - Me.Button4.TabIndex = 100 - Me.Button4.Text = "Akt übernehmen" - Me.Button4.TextAlign = System.Drawing.ContentAlignment.MiddleLeft - Me.Button4.UseVisualStyleBackColor = True + Me.btnAktUebernehmen.Anchor = CType((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.btnAktUebernehmen.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.btnAktUebernehmen.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!) + Me.btnAktUebernehmen.ForeColor = System.Drawing.Color.Black + Me.btnAktUebernehmen.Image = Global.AVISO.My.Resources.Resources.personCheck_small + Me.btnAktUebernehmen.ImageAlign = System.Drawing.ContentAlignment.MiddleRight + Me.btnAktUebernehmen.Location = New System.Drawing.Point(408, 79) + Me.btnAktUebernehmen.Name = "btnAktUebernehmen" + Me.btnAktUebernehmen.Size = New System.Drawing.Size(162, 32) + Me.btnAktUebernehmen.TabIndex = 100 + Me.btnAktUebernehmen.Text = "Akt übernehmen" + Me.btnAktUebernehmen.TextAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.btnAktUebernehmen.UseVisualStyleBackColor = True ' 'btnKassenbuchEintrag ' @@ -1035,6 +1043,38 @@ Partial Class usrcntlAktDetailsATILLANeu Me.txtAktMA.TabIndex = 116 Me.txtAktMA.TabStop = False ' + 'txtFrächter + ' + Me.txtFrächter.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtFrächter.BackColor = System.Drawing.Color.WhiteSmoke + Me.txtFrächter.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.txtFrächter.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtFrächter.ForeColor = System.Drawing.Color.Black + Me.txtFrächter.Location = New System.Drawing.Point(74, 46) + Me.txtFrächter.MaxLength = 0 + Me.txtFrächter.Name = "txtFrächter" + Me.txtFrächter.ReadOnly = True + Me.txtFrächter.Size = New System.Drawing.Size(335, 16) + Me.txtFrächter.TabIndex = 109 + Me.txtFrächter.TabStop = False + ' + 'txtAuftraggeber + ' + Me.txtAuftraggeber.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _ + Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.txtAuftraggeber.BackColor = System.Drawing.Color.WhiteSmoke + Me.txtAuftraggeber.BorderStyle = System.Windows.Forms.BorderStyle.None + Me.txtAuftraggeber.Font = New System.Drawing.Font("Microsoft Sans Serif", 10.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte)) + Me.txtAuftraggeber.ForeColor = System.Drawing.Color.Black + Me.txtAuftraggeber.Location = New System.Drawing.Point(74, 70) + Me.txtAuftraggeber.MaxLength = 0 + Me.txtAuftraggeber.Name = "txtAuftraggeber" + Me.txtAuftraggeber.ReadOnly = True + Me.txtAuftraggeber.Size = New System.Drawing.Size(335, 16) + Me.txtAuftraggeber.TabIndex = 111 + Me.txtAuftraggeber.TabStop = False + ' 'FlowLayoutPanel ' Me.FlowLayoutPanel.AutoSize = True @@ -1342,29 +1382,29 @@ Partial Class usrcntlAktDetailsATILLANeu 'ToolStripSeparator2 ' Me.ToolStripSeparator2.Name = "ToolStripSeparator2" - Me.ToolStripSeparator2.Size = New System.Drawing.Size(177, 6) + Me.ToolStripSeparator2.Size = New System.Drawing.Size(153, 6) ' 'NCTST2ToolStripMenuItem ' Me.NCTST2ToolStripMenuItem.Name = "NCTST2ToolStripMenuItem" - Me.NCTST2ToolStripMenuItem.Size = New System.Drawing.Size(180, 22) + Me.NCTST2ToolStripMenuItem.Size = New System.Drawing.Size(156, 22) Me.NCTST2ToolStripMenuItem.Text = "NCTS - Versand" ' 'AESToolStripMenuItem ' Me.AESToolStripMenuItem.Name = "AESToolStripMenuItem" - Me.AESToolStripMenuItem.Size = New System.Drawing.Size(180, 22) + Me.AESToolStripMenuItem.Size = New System.Drawing.Size(156, 22) Me.AESToolStripMenuItem.Text = "AES - Ausfuhr" ' 'ToolStripSeparator1 ' Me.ToolStripSeparator1.Name = "ToolStripSeparator1" - Me.ToolStripSeparator1.Size = New System.Drawing.Size(177, 6) + Me.ToolStripSeparator1.Size = New System.Drawing.Size(153, 6) ' 'SGSNCTSToolStripMenuItem ' Me.SGSNCTSToolStripMenuItem.Name = "SGSNCTSToolStripMenuItem" - Me.SGSNCTSToolStripMenuItem.Size = New System.Drawing.Size(180, 22) + Me.SGSNCTSToolStripMenuItem.Size = New System.Drawing.Size(156, 22) Me.SGSNCTSToolStripMenuItem.Text = "SGS - NCTS" Me.SGSNCTSToolStripMenuItem.Visible = False ' @@ -1373,16 +1413,62 @@ Partial Class usrcntlAktDetailsATILLANeu Me.cntxtZollantrag.ImageScalingSize = New System.Drawing.Size(24, 24) Me.cntxtZollantrag.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripSeparator2, Me.NCTST2ToolStripMenuItem, Me.AESToolStripMenuItem, Me.ToolStripSeparator1, Me.SGSNCTSToolStripMenuItem}) Me.cntxtZollantrag.Name = "cntxtZollantrag" - Me.cntxtZollantrag.Size = New System.Drawing.Size(181, 104) + Me.cntxtZollantrag.Size = New System.Drawing.Size(157, 82) Me.cntxtZollantrag.Text = "Zollantrag" ' + 'cntxt + ' + Me.cntxt.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MarkiertePDFsDruckenToolStripMenuItem, Me.UmbenennenToolStripMenuItem, Me.LöschenToolStripMenuItem, Me.AusZwischenablageEinfügenPasteToolStripMenuItem}) + Me.cntxt.Name = "cntxt" + Me.cntxt.Size = New System.Drawing.Size(272, 92) + ' + 'MarkiertePDFsDruckenToolStripMenuItem + ' + Me.MarkiertePDFsDruckenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.pdfprint + Me.MarkiertePDFsDruckenToolStripMenuItem.Name = "MarkiertePDFsDruckenToolStripMenuItem" + Me.MarkiertePDFsDruckenToolStripMenuItem.Size = New System.Drawing.Size(271, 22) + Me.MarkiertePDFsDruckenToolStripMenuItem.Text = "Markierte PDFs drucken" + ' + 'UmbenennenToolStripMenuItem + ' + Me.UmbenennenToolStripMenuItem.Name = "UmbenennenToolStripMenuItem" + Me.UmbenennenToolStripMenuItem.Size = New System.Drawing.Size(271, 22) + Me.UmbenennenToolStripMenuItem.Text = "Umbenennen" + ' + 'LöschenToolStripMenuItem + ' + Me.LöschenToolStripMenuItem.Image = Global.AVISO.My.Resources.Resources.del + Me.LöschenToolStripMenuItem.Name = "LöschenToolStripMenuItem" + Me.LöschenToolStripMenuItem.Size = New System.Drawing.Size(271, 22) + Me.LöschenToolStripMenuItem.Text = "Löschen" + ' + 'AusZwischenablageEinfügenPasteToolStripMenuItem + ' + Me.AusZwischenablageEinfügenPasteToolStripMenuItem.Name = "AusZwischenablageEinfügenPasteToolStripMenuItem" + Me.AusZwischenablageEinfügenPasteToolStripMenuItem.Size = New System.Drawing.Size(271, 22) + Me.AusZwischenablageEinfügenPasteToolStripMenuItem.Text = "Aus Zwischenablage einfügen (Paste)" + ' + 'Button10 + ' + Me.Button10.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles) + Me.Button10.FlatStyle = System.Windows.Forms.FlatStyle.Flat + Me.Button10.Image = Global.AVISO.My.Resources.Resources.spedbuch_small + Me.Button10.ImageAlign = System.Drawing.ContentAlignment.MiddleLeft + Me.Button10.Location = New System.Drawing.Point(298, 118) + Me.Button10.Name = "Button10" + Me.Button10.Size = New System.Drawing.Size(148, 37) + Me.Button10.TabIndex = 110 + Me.Button10.Text = "Aus Zwischenablage" & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "einfügen (Paste)" + Me.Button10.TextAlign = System.Drawing.ContentAlignment.MiddleRight + Me.Button10.UseVisualStyleBackColor = True + ' 'usrcntlAktDetailsATILLANeu ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.Controls.Add(Me.pnlDetailsRechts) Me.Name = "usrcntlAktDetailsATILLANeu" - Me.Size = New System.Drawing.Size(575, 583) + Me.Size = New System.Drawing.Size(575, 647) Me.pnlDetailsRechts.ResumeLayout(False) Me.pnlDetailsRechts.PerformLayout() Me.Panel3.ResumeLayout(False) @@ -1391,13 +1477,13 @@ Partial Class usrcntlAktDetailsATILLANeu CType(Me.SplitContainer, System.ComponentModel.ISupportInitialize).EndInit() Me.SplitContainer.ResumeLayout(False) Me.tbcntr.ResumeLayout(False) - Me.TabPage1.ResumeLayout(False) - Me.TabPage3.ResumeLayout(False) + Me.tbVermerke.ResumeLayout(False) + Me.tbZollanmeldungen.ResumeLayout(False) Me.Panel1.ResumeLayout(False) CType(Me.dgvZollAnmeldungen, System.ComponentModel.ISupportInitialize).EndInit() Me.Panel4.ResumeLayout(False) Me.Panel4.PerformLayout() - Me.TabPage2.ResumeLayout(False) + Me.tbSpedBuch.ResumeLayout(False) CType(Me.dgvSpeditionsbuch, System.ComponentModel.ISupportInitialize).EndInit() Me.pnlSendungenTop.ResumeLayout(False) Me.pnlSendungenTop.PerformLayout() @@ -1430,6 +1516,7 @@ Partial Class usrcntlAktDetailsATILLANeu Me.conMenuVermerke.ResumeLayout(False) Me.cntxtFormulare.ResumeLayout(False) Me.cntxtZollantrag.ResumeLayout(False) + Me.cntxt.ResumeLayout(False) Me.ResumeLayout(False) Me.PerformLayout() @@ -1473,13 +1560,13 @@ Partial Class usrcntlAktDetailsATILLANeu Friend WithEvents btn As System.Windows.Forms.Button Friend WithEvents addVermerk As System.Windows.Forms.Button Friend WithEvents tbcntr As System.Windows.Forms.TabControl - Friend WithEvents TabPage1 As System.Windows.Forms.TabPage - Friend WithEvents TabPage2 As System.Windows.Forms.TabPage + Friend WithEvents tbVermerke As System.Windows.Forms.TabPage + Friend WithEvents tbSpedBuch As System.Windows.Forms.TabPage Friend WithEvents dgvSpeditionsbuch As System.Windows.Forms.DataGridView Friend WithEvents pnlSendungenTop As System.Windows.Forms.Panel Friend WithEvents Label1 As System.Windows.Forms.Label Friend WithEvents UsrCntlVermerkeATilla1 As AVISO.usrCntlVermerkeATilla - Friend WithEvents Button4 As System.Windows.Forms.Button + Friend WithEvents btnAktUebernehmen As System.Windows.Forms.Button Friend WithEvents lblAktUebernommen As System.Windows.Forms.Label Friend WithEvents pnlAbgeschlossen As System.Windows.Forms.Panel Friend WithEvents Label2 As System.Windows.Forms.Label @@ -1500,7 +1587,7 @@ Partial Class usrcntlAktDetailsATILLANeu Friend WithEvents Button6 As System.Windows.Forms.Button Friend WithEvents Label5 As System.Windows.Forms.Label Friend WithEvents txtAktMA As System.Windows.Forms.TextBox - Friend WithEvents TabPage3 As System.Windows.Forms.TabPage + Friend WithEvents tbZollanmeldungen As System.Windows.Forms.TabPage Friend WithEvents Panel1 As System.Windows.Forms.Panel Friend WithEvents dgvZollAnmeldungen As System.Windows.Forms.DataGridView Friend WithEvents TextBox2 As System.Windows.Forms.TextBox @@ -1518,4 +1605,12 @@ Partial Class usrcntlAktDetailsATILLANeu Friend WithEvents ToolStripSeparator1 As ToolStripSeparator Friend WithEvents SGSNCTSToolStripMenuItem As ToolStripMenuItem Friend WithEvents cntxtZollantrag As ContextMenuStrip + Friend WithEvents btnQuckScan As Button + Friend WithEvents cntxt As ContextMenuStrip + Friend WithEvents UmbenennenToolStripMenuItem As ToolStripMenuItem + Friend WithEvents LöschenToolStripMenuItem As ToolStripMenuItem + Friend WithEvents Button4 As Button + Friend WithEvents MarkiertePDFsDruckenToolStripMenuItem As ToolStripMenuItem + Friend WithEvents AusZwischenablageEinfügenPasteToolStripMenuItem As ToolStripMenuItem + Friend WithEvents Button10 As Button End Class diff --git a/Aviso/usrcntlAktDetailsATILLANeu.resx b/Aviso/usrcntlAktDetailsATILLANeu.resx index b8a8446..ae757b4 100644 --- a/Aviso/usrcntlAktDetailsATILLANeu.resx +++ b/Aviso/usrcntlAktDetailsATILLANeu.resx @@ -118,6 +118,57 @@ System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + iVBORw0KGgoAAAANSUhEUgAAAB4AAAAeCAYAAAA7MK6iAAAABGdBTUEAALGPC/xhBQAAABl0RVh0U29m + dHdhcmUAQWRvYmUgSW1hZ2VSZWFkeXHJZTwAAApmSURBVEhLrZd3WFRHF8YvXWUJgtQtCihRqkGC6Ec0 + xk4MJioaoiYSwEIEgoKIUSCJESWQxKBCsKCAofe+9F1pC+wuvTcpokiRFpSob2ZXA/nqP1/med6duTPn + nN89M3PvnaUAUGFht6mSslJxe3Jyclt+Qf6XqWmp59Mz0q+TOjwpOSkjKSkpLzEpMS8hMaEqPiG+iaiZ + tCuIRH25iYmJ2cQuLiU1JZT4hGRkZFzIyMzwzszMPPbw4cNdotgPWoWUo89lMUf8kx4fRhUW5Kv09vXH + NTU3oaWlBW1tbejo6EBnZye6u7tw/3437vfcR29PD3p7e2fV0zt33UPGuoldd3c3Ors6xf7t7e1obW3F + 8MhoUVd18QoP35/nwNu+iqdu/hLS3MCvwOCDXtL1Ang5Q+rfX7X/z/L86RSejg8hJy3xmblrqAzpegVW + dUhYG3Q9FJwSHrKLysDhN4MjaJ1VkUj8FnCFbWKxi8qRmpWHtOw85HDKUVLTgbL6LpTWdoLX0I2Kph5U + NfdC2NaPmrY+COtbMDAwgMK8fBi5JX48C978ddqHafd4sA9mw8T2EpZutMWK9x2x3PK1th+F7tbDpD6G + ZZvtoKy/EfLaZpDXMoOS3gax/XLLY2KbN4mNyEfkv0JUk/5N7jdwNCSXJNCAIyGlJ2fBi5zYEvt/ZufZ + hhTAyDECEjQGGaH+iyRBySiAmr8I1DxlUNLy/8FmTpJKOjA5mYC9gTlwDOW2stwK5s+CVV2LqIVfpCmu + d7s9usbhCjRMPyIjBCBylpAmoAWQmK8ESQV1SC9kQEZ5MWQWaUFWeQlklBZDSpEOiQUqoGRpxEfqld9r + qRlugalDEHZ+HQNtj1wjBedcMVP8wziRQal5llOLHeMPLbOwxiK9d0DTsYCC7lYoG3wAFWMrqL61E2pE + 6iYiWZH2DqgabYOKwSYoL18HRZ3VoLGMIaemCykFDRJZEhLScnhDxwzL138MQ/c0T+VTJRTTNVtyDuyS + S7FOFS5keAtlVd8/fU1SRu6lLMlKfokZaCKRtVTQXv0XkWstUzJmIoYtoOtDRlUXFI1OslaBjIoWmRUW + mQ0mZOQXQsvKLZHlU0OjnypcRHfOnMuY6VJIMd1yacyva2QZR6M+VNYxfaGktRLK2sZEK6GkZYyFS4yh + uNgYCqyVWMB4C3KMVZDUXAUJuhlklqyFov5maL97ALrbDmO+znqoGbwLDcMN0NB9G6zPbzhq+tRKEIaK + pkvaHFjTOVUElqJ7CajFey9E6JjugPbO89Dadw3MXYFQsboK1Y/I2u8OBHNfIJbaXIbR/gCsc7iMD8mO + PXIxEudusBGUWYsMYS+2u4eDWu2DJbv8obV6D1g73DiMs+ULmG55spouf8lY83g6RT9ZQDFPFSiu2HWm + 33CXJ1ifJoD2bhSW7InEP1zisME9ETt9UnDw+wwcv5qDszfz4R9TjJC0SoTn1CC6oA4JRXXgVrej5tEU + 9A6mgDILg/FnAdB/32WGeSJTj+7OoRjOeXNgulMmpe7GoXS+TFq7xsYbq1wjQP8kDjSzEKhv/BmH3P3g + 5ncLJy6FwfNyDHyCU3DxDhs/RhUhOKkUYVl8xBFoRnkr8oSdePRkDLz6PtC2/4qF1tex/tNvoO2csEXd + rZhiOP3TrmZTSidLKOMvo+x3OPnjbe8MaOxNgOr2MMhaxWG17Q18ExSN01dT4HMjE34ReQiMu4eb6TxE + 5lUjpbgJufx2lDT2orpzEM29IyQsUNE1DrUj8TC394PZybseyu48inmiaA6s6V5EKbhwKKvTIcEOl0Kx + yicfi6xioLYnCqr2mZDfF4cvLkQhOKEAAZFF+CWZZJnNR3xRPTJ55HVa043K1gdo6h1Gz9AkRqd/x/OX + YjZSGwax0vEKdntcKVQ7UUJYFXNgaTV98hToUhcu+fd5xXFg7FWENyx/hfpniWA4ZmL+sQIYOCUjPLkI + EWw+okiWqSVNyBN0oLSxDzVdg+h4OIbB8aeY/pP4l5Ih6AT5Kr3QWGaqKKVmMAcWlWXq841L8rMRmC+A + 4Tku5C0joHk4DQxnNliexZA4UoBTIYWorG1BenkLOLX3UdU2l+XY9PP/+R1raOuGkY66tYhFLufA9nZ2 + Xs9GHyG6ohm0z9LI43AdlE0SJOyyIOVYCMqJB+poLhK4jWjvf4yGnmEMPHmKp/+a4MuXeDg8iYrGB4hm + 1+NiBA+JnGo8GR3G2bPnwv8NnJKcXCn69nLqurD1TCbeOZWFbb5cWAaUwfJyFaxu1MPIvxruJNDg8Bju + D46jc2AYnf2DqO/oI349iCnpwPeJ1Th67R62e2fB0IHsE+vbCEwuw8zUCAT8qkE5OTnpWbAaKePj46QJ + PH78GMOPB0hrBs+mJzA9OYaJ0SGMDw/iGWlX1jYj914lKgT1KKuqRTmpSwWNKKvrQDn5Ftd2DqD70ROM + Tk3jOYkyOTWBkeFhcWxRMTAwMCTVKzCLybJ4Qp69Fy9e4B6Xi9xsNspKilFOxCstRTW/CnU1QtQK+Wis + r0G1UIDGhga0t7WihRyVGurrUFctQENdDbERQFBVKfbjlZahmMsBp6gQ4xMTYrCpqan1LPjNN5cfmpiY + xLOZZ/juuwvw8PgK58/7wtfXD35+Abh6NQgxsTG4ezccsXExKCY31NLajGYC5XAKERMTjajoSNwJC8cP + P1wW+/j6XiKxfMWxfHy+FZ+/XpL137Jl67ezYAsLC7+Zmd8xPT2NwCtXcYWAIiOjER0di7j4eMTGxiM5 + ORUpKSkEHIuEhHhkZ2cjJycH5FQJcgIlY6nENhHRMbEIC49AaWkJSoj8A34iN/MTOTR2ERRgY/NJzCyY + 3EWUuJeU0Nt3SLA0lJWVi1VRUQk+XyBWdXUtauvqwSN9XG4xybwUVVUC1NbWQSAQkjZfbF9cXIKmpmbU + EdvUtHTcuhWKR48GxfEdHA5zSfUKrK2tc7eOOHeS6bhzJwx9ff0YH58gG20Iw8MjGBl9AtEeGBsbF0u0 + LFOTv2GS1KJr0dgosRkZGcHjoSHxBu3pER13e0nfqHjGiu8Vo40cc9esWVs4CybFVV9PD7a2tti/f//s + tPwdZWhoGPZ29ti3dy/MzMxEsB9J9yz4baLB9zZuwob3NoK1mIVVpquwafMm7NmzB3b2dnA94QpvH2/4 + +/sjKCiITN8t3L5zm9Q3ce3aNbKh/MgL4iyOOx3HgYMHYLnDEu+ssxDHIk8raa8XgUQ6MAum0WhKUlJS + XvLytB5NTc2XklKvD3p/g+bNkwOdQQeDyZwisWNZLNbcc0zeJpSMjAxdWlr6A2VlZTcTE5OAnVY7Iw4d + OpTt7Oxc6e7u3nrmzJn+c+fODZF6/PTp05Oenp5TRL+JRPqmyNi4l5fXCKkHSObtHh4eVU5OTmybj23C + 1q9bd3Hp0qWfE6i+kpLS3D+JP4ukpCQlLy9P0el0WbIeimS9GSSIXnBwsHlsbOyWrKys3Vwu9yCPx7MX + CARHhELhMT6ff7SiosJe1M9ms3fHxcVtJVNvTsDLra2tNczNzeWZTKbEvHnzXlNETFB/AFyHwBGvedXw + AAAAAElFTkSuQmCC + + iVBORw0KGgoAAAANSUhEUgAAABQAAAAUCAYAAACNiR0NAAAABGdBTUEAALGPC/xhBQAAAZ1JREFUOE+l @@ -177,4 +228,7 @@ 306, 17 + + 440, 17 + \ No newline at end of file diff --git a/Aviso/usrcntlAktDetailsATILLANeu.vb b/Aviso/usrcntlAktDetailsATILLANeu.vb index ca18dc0..d6bde03 100644 --- a/Aviso/usrcntlAktDetailsATILLANeu.vb +++ b/Aviso/usrcntlAktDetailsATILLANeu.vb @@ -91,10 +91,13 @@ Public Class usrcntlAktDetailsATILLANeu pnlDetailsRechts.Cursor = Cursors.Default loaded = True - Vermerke_anzeigen() - initDgvSpeditionsbuch() - initdgvZollAnmeldungen() - initAnhaenge() + initTbCntr() + + 'bei selchanged: + 'Vermerke_anzeigen() + 'initDgvSpeditionsbuch() + 'initdgvZollAnmeldungen() + 'initAnhaenge() If AVISO IsNot Nothing Then @@ -294,6 +297,7 @@ Public Class usrcntlAktDetailsATILLANeu ' lblTimeVorbereitet.Text = formatdate(AVISO.Vorbereitet) lblTimeVorgeschreiben.Text = formatdate(AVISO.Vorgeschrieben) + intiAktUebernehmenBtn() Vermerke_anzeigen() 'Button6.Focus() ' pnlDetailsRechts.Visible = True @@ -465,9 +469,9 @@ Public Class usrcntlAktDetailsATILLANeu With dgvanhaenge - .RowTemplate.MinimumHeight = 20 + .RowTemplate.MinimumHeight = 30 .AutoSizeRowsMode = DataGridViewAutoSizeRowsMode.AllCells - .Columns("anh_id").Visible = False 'VermerkID nicht anzeigen + .Columns("anh_id").Visible = False 'VermerkID nicht anzeigenconMenuVermerke .Columns("anh_docId").Visible = False 'AvisoID nicht anzeigen .Columns("anh_Name").MinimumWidth = 150 @@ -738,7 +742,7 @@ Public Class usrcntlAktDetailsATILLANeu End Sub - Private Sub grid_CellMouseClick(sender As Object, e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles gridVermerke.CellMouseClick + Private Sub grid_CellMouseClickAnh(sender As Object, e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles gridVermerke.CellMouseClick If e.RowIndex < 0 Then Exit Sub 'Es wurde außerhalb einer gültigen Datenzeile geklickt 'If gridVermerke.SelectedRows.Count = 0 Then Exit Sub 'Es wurde außerhalb einer gültigen Datenzeile geklickt 'gridMyAviso.ClearSelection() 'WARUM? @@ -755,6 +759,23 @@ Public Class usrcntlAktDetailsATILLANeu End If End Sub + + Private Sub grid_CellMouseClick(sender As Object, e As System.Windows.Forms.DataGridViewCellMouseEventArgs) Handles dgvanhaenge.CellMouseClick + If e.RowIndex < 0 Then Exit Sub 'Es wurde außerhalb einer gültigen Datenzeile geklickt + + DirectCast(sender, DataGridView).Rows(e.RowIndex).Selected = True + If e.Button = MouseButtons.Right Then + If AVISO.Abgeschlossen Then Exit Sub + If sender Is dgvanhaenge Then + If dgvanhaenge.SelectedRows.Count = 0 Then Exit Sub 'Es wurde außerhalb einer gültigen Datenzeile geklickt + ' AvisoID = CInt(dgvanhaenge.Rows(e.RowIndex).Cells("AvisoId").Value) + dgvanhaenge.CurrentCell = dgvanhaenge.Rows(e.RowIndex).Cells(e.ColumnIndex) + cntxt.Show(Cursor.Position) + End If + + End If + End Sub + Private Sub btnErfasst_MouseHover(sender As Object, e As EventArgs) Dim cF As Color = DirectCast(sender, Button).ForeColor Dim cB As Color = DirectCast(sender, Button).BackColor @@ -1086,13 +1107,37 @@ Public Class usrcntlAktDetailsATILLANeu End Sub - Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click - If FUNC.AktUebernehmen(AvisoID) Then - frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) - frmHauptfenster.Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + Private Sub Button4_Click(sender As Object, e As EventArgs) Handles btnAktUebernehmen.Click + 'If FUNC.AktUebernehmen(AvisoID) Then + ' frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + ' frmHauptfenster.Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + 'End If + + If AVISO.LetzterMitarbeiterId = VERAG_PROG_ALLGEMEIN.cAllgemein.USRID Then + Dim f As New frmAvisoWeiterleiten("A", AvisoID) '--> Weitereliten + If f.ShowDialog(Me) = DialogResult.OK Then + frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + frmHauptfenster.Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + Vermerke_anzeigen() + End If + Else + If FUNC.AktUebernehmen(AvisoID, False) Then + frmHauptfenster.avisoAktualisierenAktiveIdBehalten(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + frmHauptfenster.Details_anzeigen(VERAG_PROG_ALLGEMEIN.cGlobal.Aktive_ID) + End If End If End Sub + Sub intiAktUebernehmenBtn() + If AVISO.LetzterMitarbeiterId = VERAG_PROG_ALLGEMEIN.cAllgemein.USRID Then + btnAktUebernehmen.Image = My.Resources.weiterleiten_small1 + btnAktUebernehmen.Text = "Akt weiterleiten..." + Else + btnAktUebernehmen.Image = My.Resources.personCheck_small + btnAktUebernehmen.Text = "Akt übernehmen" + End If + + End Sub Private Sub UsrCntlVermerkeATilla1_VERMERKEingetragen() Handles UsrCntlVermerkeATilla1.VERMERKEingetragen reload(AvisoID) End Sub @@ -1292,7 +1337,7 @@ Public Class usrcntlAktDetailsATILLANeu If f.SMS IsNot Nothing Then Dim FahrerHandy = If(f.SMS.sms_Vorwahl, "") & If(f.SMS.sms_Handynummer, "") If FahrerHandy <> "" Then - SDL.cSMSOptions.insertVermerk(AvisoID, FahrerHandy, Now) + SDL.cSMSOptions.insertVermerkSMS(AvisoID, FahrerHandy, f.SMS.sms_id, Now) If If(AVISO.FahrerHandy, "") = "" Then AVISO.UPDATE_FahrerHandy(FahrerHandy) End If @@ -1310,4 +1355,118 @@ Public Class usrcntlAktDetailsATILLANeu Private Sub SGSNCTSToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles SGSNCTSToolStripMenuItem.Click genZollantrag("T2", "SGS") End Sub + + Private Sub btnQuckScan_Click(sender As Object, e As EventArgs) Handles btnQuckScan.Click + + Try + Me.Cursor = Cursors.WaitCursor + If frmSendungAnhangImport.quickScan(AvisoID) Then + initAnhaenge() + End If + Catch ex As Exception + VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace, System.Reflection.MethodInfo.GetCurrentMethod.Name,, "Fehler QuickScan") + End Try + Me.Cursor = Cursors.Default + End Sub + + Private Sub tbcntr_SelectedIndexChanged(sender As Object, e As EventArgs) Handles tbcntr.SelectedIndexChanged + initTbCntr() + End Sub + + Sub initTbCntr() + If tbcntr.SelectedTab Is tbAnhaenge Then + initAnhaenge() + ElseIf tbcntr.SelectedTab Is tbSpedBuch Then + initDgvSpeditionsbuch() + ElseIf tbcntr.SelectedTab Is tbZollanmeldungen Then + initdgvZollAnmeldungen() + ElseIf tbcntr.SelectedTab Is tbVermerke Then + Vermerke_anzeigen() + End If + End Sub + + Private Sub LöschenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles LöschenToolStripMenuItem.Click + If dgvanhaenge.SelectedRows.Count = 0 Then Exit Sub + If vbNo = MsgBox("Wollen Sie den ausgewählten Anhang wirklich löschen?", CType(MsgBoxStyle.YesNo + MsgBoxStyle.Exclamation, MsgBoxStyle), "Anhang löschen") Then + Exit Sub + End If + + For Each r As DataGridViewRow In dgvanhaenge.SelectedRows + Dim anh_id = dgvanhaenge.SelectedRows(0).Cells("anh_id").Value + Dim anh_docId = dgvanhaenge.SelectedRows(0).Cells("anh_docId").Value + frmSendungAnhangImport.deleteElement(anh_docId, anh_id, False) + Next + initAnhaenge() + End Sub + + Private Sub UmbenennenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles UmbenennenToolStripMenuItem.Click + Try + If dgvanhaenge.SelectedRows.Count = 0 Then Exit Sub + + Dim anh_id = dgvanhaenge.SelectedRows(0).Cells("anh_id").Value + Dim FILE_NAME = dgvanhaenge.SelectedRows(0).Cells("anh_Name").Value + + Dim ANH As New VERAG_PROG_ALLGEMEIN.cAvisoAnhaenge(anh_id) + Dim f As New frmSendungAnhangUmbenennenUmkateg(FILE_NAME, ANH.anh_Art) + If f.ShowDialog = DialogResult.OK Then + + ANH.anh_Name = f.txtBezeichnung.Text + ANH.anh_Art = f.cboArt._value + ANH.SAVE() + FILE_NAME = f.txtBezeichnung.Text + + initAnhaenge() + End If + Catch ex As Exception + MsgBox(ex.Message) + End Try + End Sub + + Private Sub Button4_Click_1(sender As Object, e As EventArgs) Handles Button4.Click + If frmSendungAnhangImport.addData_SendungAnhangFD(AvisoID) Then + initAnhaenge() + End If + End Sub + + Private Sub MarkiertePDFsDruckenToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles MarkiertePDFsDruckenToolStripMenuItem.Click + For Each r As DataGridViewRow In dgvanhaenge.SelectedRows + Select Case r.Cells("anh_Typ").Value + Case "PDF" : VERAG_PROG_ALLGEMEIN.cFormularManager.PrintViaSpirePDF({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(r.Cells("anh_docId").Value)}) + Case "BILD" : VERAG_PROG_ALLGEMEIN.cFormularManager.Print_PICTURE({VERAG_PROG_ALLGEMEIN.cDATENSERVER.GET_PDFPath_BY_DocID(r.Cells("anh_docId").Value)}) + End Select + + Next + End Sub + + Private Sub Button10_Click(sender As Object, e As EventArgs) Handles Button10.Click + Dim data As IDataObject = Clipboard.GetDataObject + If True Then 'data.GetDataPresent(DataFormats.FileDrop) Then + For Each s As String In My.Computer.Clipboard.GetFileDropList() 'GetData(DataFormats.) 'data.GetData(DataFormats.FileDrop) 'DataFormats.FileDrop) + ' Dim F_listItem As String = Path.Combine("c:\mynewpath", Path.GetFileName(s)) + ' File.Copy(s, newFile) + ' MsgBox(s) + If IO.File.Exists(s) Then + + Dim fi As New FileInfo(s) + Dim filename = fi.Name + If filename = "" Then + MsgBox("Dateiname konnte nicht ermittelt werden." & vbNewLine & s) + Else + + Dim da_id = -1 + Dim anhId = -1 + Dim destPath = "" + + Dim Typ = "" + If frmSendungAnhangImport.getFileTypeValid(fi.Extension.Replace(".", ""), Typ) Then + frmSendungAnhangImport.saveToDS(AvisoID, filename, s, "", Typ, da_id, anhId, destPath) + End If + End If + End If + Next + initAnhaenge() + End If + End Sub + + End Class