Asfinag
This commit is contained in:
@@ -824,7 +824,4 @@ Public Class usrCntlMitarbeiter
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
|
||||
@@ -146,6 +146,7 @@
|
||||
<ItemGroup>
|
||||
<Compile Include="ApplicationEvents.vb" />
|
||||
<Compile Include="AtlasAufschubDatenEinlesen.vb" />
|
||||
<Compile Include="cAsfinag.vb" />
|
||||
<Compile Include="cBuergschaften.vb" />
|
||||
<Compile Include="cEDI.vb" />
|
||||
<Compile Include="cGetMsgType.vb" />
|
||||
@@ -164,6 +165,12 @@
|
||||
<Compile Include="frmTRNCTS_NachrichtenVerarbeitung_ATEZ.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmAsfinag_NachrichtenVerarbeitung.Designer.vb">
|
||||
<DependentUpon>frmAsfinag_NachrichtenVerarbeitung.vb</DependentUpon>
|
||||
</Compile>
|
||||
<Compile Include="frmAsfinag_NachrichtenVerarbeitung.vb">
|
||||
<SubType>Form</SubType>
|
||||
</Compile>
|
||||
<Compile Include="frmTRNCTS_NachrichtenVerarbeitung_OREGON.Designer.vb">
|
||||
<DependentUpon>frmTRNCTS_NachrichtenVerarbeitung_OREGON.vb</DependentUpon>
|
||||
</Compile>
|
||||
@@ -235,6 +242,9 @@
|
||||
<EmbeddedResource Include="frmTRNCTS_NachrichtenVerarbeitung_ATEZ.resx">
|
||||
<DependentUpon>frmTRNCTS_NachrichtenVerarbeitung_ATEZ.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmAsfinag_NachrichtenVerarbeitung.resx">
|
||||
<DependentUpon>frmAsfinag_NachrichtenVerarbeitung.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
<EmbeddedResource Include="frmTRNCTS_NachrichtenVerarbeitung_OREGON.resx">
|
||||
<DependentUpon>frmTRNCTS_NachrichtenVerarbeitung_OREGON.vb</DependentUpon>
|
||||
</EmbeddedResource>
|
||||
|
||||
762
initATLASAufschubkonten/cAsfinag.vb
Normal file
762
initATLASAufschubkonten/cAsfinag.vb
Normal file
@@ -0,0 +1,762 @@
|
||||
Imports System.Data.SqlClient
|
||||
Imports System.Reflection
|
||||
Imports DocumentFormat.OpenXml.VariantTypes
|
||||
|
||||
Public Class cAsfinag
|
||||
|
||||
Public Class CLFHeader
|
||||
|
||||
Property PKFileName As Object = Nothing
|
||||
Property recordType As Integer
|
||||
Property fileVersion As Integer
|
||||
Property fileNumber As Integer
|
||||
Property inidcator As Object = Nothing
|
||||
Property senderID As Object = Nothing
|
||||
Property receiverID As Object = Nothing
|
||||
Property fileCreationDate As Object = Nothing
|
||||
Property fileCreationTime As Object = Nothing
|
||||
Property ISOCountryCode As Object = Nothing
|
||||
Property creationName As Object = Nothing
|
||||
|
||||
Public hasEntry = False
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Sub New(PKFileName)
|
||||
Me.PKFileName = PKFileName
|
||||
LOAD()
|
||||
End Sub
|
||||
Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordType", recordType))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileVersion", fileversion))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileNumber", filenumber))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("inidcator", inidcator))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("senderID", senderID))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("receiverID", receiverID))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileCreationDate", fileCreationDate))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileCreationTime", fileCreationTime))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ISOCountryCode", ISOCountryCode))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("creationName", creationName))
|
||||
|
||||
Return list
|
||||
End Function
|
||||
|
||||
Public Function SAVE() As Boolean
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM CLFHeader WHERE PKFileName=@PKFileName AND filenumber = @filenumber) " &
|
||||
" BEGIN " & getUpdateCmd() & " End " &
|
||||
" Else " &
|
||||
" BEGIN " & getInsertCmd() & " End " &
|
||||
" commit tran "
|
||||
|
||||
Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
|
||||
End Function
|
||||
|
||||
Public Sub LOAD()
|
||||
Try
|
||||
hasEntry = False
|
||||
Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
|
||||
Using cmd As New SqlCommand("Select * FROM CLFHeader WHERE PKFileName=@PKFileName AND filenumber = @filenumber ", conn)
|
||||
cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
|
||||
Dim dr = cmd.ExecuteReader()
|
||||
If dr.Read Then
|
||||
For Each li In getParameterList()
|
||||
Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
|
||||
|
||||
If dr.Item(li.Text) Is DBNull.Value Then
|
||||
propInfo.SetValue(Me, Nothing)
|
||||
Else
|
||||
propInfo.SetValue(Me, dr.Item(li.Text))
|
||||
End If
|
||||
|
||||
Next
|
||||
hasEntry = True
|
||||
End If
|
||||
dr.Close()
|
||||
End Using
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Public Function getUpdateCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim str As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
Return (" UPDATE [CLFHeader] SET " & str & " WHERE PKFileName=@PKFileName AND filenumber = @filenumber")
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
Public Function getInsertCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
Dim str As String = ""
|
||||
Dim values As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "],"
|
||||
values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
values = values.Substring(0, values.Length - 1) 'wg. ','
|
||||
Return (" INSERT INTO CLFHeader (" & str & ") VALUES(" & values & ") ")
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
End Class
|
||||
|
||||
Public Class CLFBody
|
||||
|
||||
Property PKFileName As Object = Nothing
|
||||
Property recordType As Integer
|
||||
Property fileVersion As Integer
|
||||
Property fileNumber As Integer
|
||||
Property cardNumber As Integer
|
||||
Property validTo As Integer
|
||||
Property OBUID As Object = Nothing
|
||||
Property vehicleLicensePlate As Object = Nothing
|
||||
Property nationality As Object = Nothing
|
||||
Property vehicleCategory As Object = Nothing
|
||||
Property emissionCategory As Object = Nothing
|
||||
Property status As Object = Nothing
|
||||
Property contractDate As Object = Nothing
|
||||
|
||||
|
||||
Public hasEntry = False
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Sub New(PKFileName)
|
||||
Me.PKFileName = PKFileName
|
||||
LOAD()
|
||||
End Sub
|
||||
Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordType", recordType))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileVersion", fileVersion))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileNumber", filenumber))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("cardNumber", cardNumber))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("validTo", validTo))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("OBUID", OBUID))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("vehicleLicensePlate", vehicleLicensePlate))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("nationality", nationality))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("vehicleCategory", vehicleCategory))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("emissionCategory", emissionCategory))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("status", status))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("contractDate", contractDate))
|
||||
|
||||
Return list
|
||||
End Function
|
||||
|
||||
Public Function SAVE() As Boolean
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM CLFBody WHERE PKFileName=@PKFileName AND filenumber = @filenumber) " &
|
||||
" BEGIN " & getUpdateCmd() & " End " &
|
||||
" Else " &
|
||||
" BEGIN " & getInsertCmd() & " End " &
|
||||
" commit tran "
|
||||
|
||||
Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
|
||||
End Function
|
||||
|
||||
Public Sub LOAD()
|
||||
Try
|
||||
hasEntry = False
|
||||
Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
|
||||
Using cmd As New SqlCommand("Select * FROM CLFBody WHERE PKFileName=@PKFileName AND filenumber = @filenumber ", conn)
|
||||
cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
|
||||
Dim dr = cmd.ExecuteReader()
|
||||
If dr.Read Then
|
||||
For Each li In getParameterList()
|
||||
Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
|
||||
|
||||
If dr.Item(li.Text) Is DBNull.Value Then
|
||||
propInfo.SetValue(Me, Nothing)
|
||||
Else
|
||||
propInfo.SetValue(Me, dr.Item(li.Text))
|
||||
End If
|
||||
|
||||
Next
|
||||
hasEntry = True
|
||||
End If
|
||||
dr.Close()
|
||||
End Using
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Public Function getUpdateCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim str As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
Return (" UPDATE [CLFBody] SET " & str & " WHERE PKFileName=@PKFileName AND filenumber = @filenumbere ")
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
Public Function getInsertCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
Dim str As String = ""
|
||||
Dim values As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "],"
|
||||
values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
values = values.Substring(0, values.Length - 1) 'wg. ','
|
||||
Return (" INSERT INTO CLFBody (" & str & ") VALUES(" & values & ") ")
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
|
||||
Public Class CLTrailer
|
||||
|
||||
Property PKFileName As Object = Nothing
|
||||
Property recordType As Integer
|
||||
Property fileVersion As Integer
|
||||
Property fileNumber As Integer
|
||||
Property recordCount As Integer
|
||||
|
||||
|
||||
|
||||
Public hasEntry = False
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Sub New(PKFileName)
|
||||
Me.PKFileName = PKFileName
|
||||
LOAD()
|
||||
End Sub
|
||||
Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordType", recordType))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileVersion", fileVersion))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileNumber", fileNumber))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordCount", recordCount))
|
||||
|
||||
Return list
|
||||
End Function
|
||||
|
||||
Public Function SAVE() As Boolean
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM CLFTrailer WHERE _BASE_id=@_BASE_id) " &
|
||||
" BEGIN " & getUpdateCmd() & " End " &
|
||||
" Else " &
|
||||
" BEGIN " & getInsertCmd() & " End " &
|
||||
" commit tran "
|
||||
|
||||
Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
|
||||
End Function
|
||||
|
||||
Public Sub LOAD()
|
||||
Try
|
||||
hasEntry = False
|
||||
Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
|
||||
Using cmd As New SqlCommand("Select * FROM CLFTrailer WHERE PKFileName=@PKFileName AND filenumber = @filenumber ", conn)
|
||||
cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
|
||||
Dim dr = cmd.ExecuteReader()
|
||||
If dr.Read Then
|
||||
For Each li In getParameterList()
|
||||
Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
|
||||
|
||||
If dr.Item(li.Text) Is DBNull.Value Then
|
||||
propInfo.SetValue(Me, Nothing)
|
||||
Else
|
||||
propInfo.SetValue(Me, dr.Item(li.Text))
|
||||
End If
|
||||
|
||||
Next
|
||||
hasEntry = True
|
||||
End If
|
||||
dr.Close()
|
||||
End Using
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Public Function getUpdateCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim str As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
Return (" UPDATE [CLFTrailer] SET " & str & " WHERE PKFileName=@PKFileName AND filenumber = @filenumbere ")
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
Public Function getInsertCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
Dim str As String = ""
|
||||
Dim values As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "],"
|
||||
values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
values = values.Substring(0, values.Length - 1) 'wg. ','
|
||||
Return (" INSERT INTO CLFTrailer (" & str & ") VALUES(" & values & ") ")
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
|
||||
|
||||
Public Class TTRHeader
|
||||
|
||||
Property PKFileName As Object = Nothing
|
||||
Property recordType As Integer
|
||||
Property fileVersion As Integer
|
||||
Property fileNumber As Integer
|
||||
Property inidcator As Object = Nothing
|
||||
Property senderID As Object = Nothing
|
||||
Property receiverID As Object = Nothing
|
||||
Property fileCreationDate As Object = Nothing
|
||||
Property fileCreationTime As Object = Nothing
|
||||
Property ISOCountryCode As Object = Nothing
|
||||
|
||||
Public hasEntry = False
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Sub New(PKFileName)
|
||||
Me.PKFileName = PKFileName
|
||||
LOAD()
|
||||
End Sub
|
||||
Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordType", recordType))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileversion", fileversion))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("filenumber", filenumber))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("inidcator", inidcator))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("senderID", senderID))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("receiverID", receiverID))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileCreationDate", fileCreationDate))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileCreationTime", fileCreationTime))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("ISOCountryCode", ISOCountryCode))
|
||||
|
||||
Return list
|
||||
End Function
|
||||
|
||||
Public Function SAVE() As Boolean
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM TTRHeader WHERE PKFileName=@PKFileName AND filenumber = @filenumber) " &
|
||||
" BEGIN " & getUpdateCmd() & " End " &
|
||||
" Else " &
|
||||
" BEGIN " & getInsertCmd() & " End " &
|
||||
" commit tran "
|
||||
|
||||
Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
|
||||
End Function
|
||||
|
||||
Public Sub LOAD()
|
||||
Try
|
||||
hasEntry = False
|
||||
Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
|
||||
Using cmd As New SqlCommand("Select * FROM TTRHeader WHERE PKFileName=@PKFileName AND filenumber = @filenumber ", conn)
|
||||
cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
|
||||
Dim dr = cmd.ExecuteReader()
|
||||
If dr.Read Then
|
||||
For Each li In getParameterList()
|
||||
Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
|
||||
|
||||
If dr.Item(li.Text) Is DBNull.Value Then
|
||||
propInfo.SetValue(Me, Nothing)
|
||||
Else
|
||||
propInfo.SetValue(Me, dr.Item(li.Text))
|
||||
End If
|
||||
|
||||
Next
|
||||
hasEntry = True
|
||||
End If
|
||||
dr.Close()
|
||||
End Using
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Public Function getUpdateCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim str As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
Return (" UPDATE [TTRHeader] SET " & str & " WHERE PKFileName=@PKFileName AND filenumber = @filenumber")
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
Public Function getInsertCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
Dim str As String = ""
|
||||
Dim values As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "],"
|
||||
values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
values = values.Substring(0, values.Length - 1) 'wg. ','
|
||||
Return (" INSERT INTO TTRHeader (" & str & ") VALUES(" & values & ") ")
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
End Class
|
||||
|
||||
Public Class TTRBody
|
||||
|
||||
Property PKFileName As Object = Nothing
|
||||
Property recordType As Integer
|
||||
Property fileVersion As Integer
|
||||
Property siteId As Integer
|
||||
Property fileNumber As Integer
|
||||
Property cardNumber As Integer
|
||||
Property fileCreationDate As Date
|
||||
Property deliveryNoteNumber As Integer
|
||||
Property deliveryDate As Date
|
||||
Property deliveryTime As Date
|
||||
Property transactionType As Integer
|
||||
Property productCode As Integer
|
||||
Property productQuantity As Double
|
||||
Property amountInclVAT As Double
|
||||
Property VATrate As Double
|
||||
Property VATamount As Double
|
||||
|
||||
Public hasEntry = False
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Sub New(PKFileName)
|
||||
Me.PKFileName = PKFileName
|
||||
LOAD()
|
||||
End Sub
|
||||
Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordType", recordType))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileversion", fileversion))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("siteId", siteId))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileNumber", fileNumber))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("cardNumber", cardNumber))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileCreationDate", fileCreationDate))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("deliveryNoteNumber", deliveryNoteNumber))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("deliveryDate", deliveryDate))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("deliveryTime", deliveryTime))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("transactionType", transactionType))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("productCode", productCode))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("productQuantity", productQuantity))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("amountInclVAT", amountInclVAT))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("VATrate", VATrate))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("VATamount", VATamount))
|
||||
|
||||
Return list
|
||||
End Function
|
||||
|
||||
Public Function SAVE() As Boolean
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM TTRBody WHERE PKFileName=@PKFileName AND filenumber = @filenumber) " &
|
||||
" BEGIN " & getUpdateCmd() & " End " &
|
||||
" Else " &
|
||||
" BEGIN " & getInsertCmd() & " End " &
|
||||
" commit tran "
|
||||
|
||||
Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
|
||||
End Function
|
||||
|
||||
Public Sub LOAD()
|
||||
Try
|
||||
hasEntry = False
|
||||
Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
|
||||
Using cmd As New SqlCommand("Select * FROM TTRBody WHERE PKFileName=@PKFileName AND filenumber = @filenumber ", conn)
|
||||
cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
|
||||
Dim dr = cmd.ExecuteReader()
|
||||
If dr.Read Then
|
||||
For Each li In getParameterList()
|
||||
Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
|
||||
|
||||
If dr.Item(li.Text) Is DBNull.Value Then
|
||||
propInfo.SetValue(Me, Nothing)
|
||||
Else
|
||||
propInfo.SetValue(Me, dr.Item(li.Text))
|
||||
End If
|
||||
|
||||
Next
|
||||
hasEntry = True
|
||||
End If
|
||||
dr.Close()
|
||||
End Using
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Public Function getUpdateCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim str As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
Return (" UPDATE [TTRBody] SET " & str & " WHERE PKFileName=@PKFileName AND filenumber = @filenumbere ")
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
Public Function getInsertCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
Dim str As String = ""
|
||||
Dim values As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "],"
|
||||
values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
values = values.Substring(0, values.Length - 1) 'wg. ','
|
||||
Return (" INSERT INTO TTRBody (" & str & ") VALUES(" & values & ") ")
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
|
||||
Public Class TTRTrailer
|
||||
|
||||
Property PKFileName As Object = Nothing
|
||||
Property recordType As Integer
|
||||
Property fileVersion As Integer
|
||||
Property recordCount As Integer
|
||||
Property checksumProductQuantity As Double
|
||||
Property checksumAmounntInclVAT As Double
|
||||
|
||||
|
||||
|
||||
Public hasEntry = False
|
||||
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Sub New(PKFileName)
|
||||
Me.PKFileName = PKFileName
|
||||
LOAD()
|
||||
End Sub
|
||||
Function getParameterList() As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
Dim list As New List(Of VERAG_PROG_ALLGEMEIN.SQLVariable)
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("PKFileName", PKFileName))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordType", recordType))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("fileversion", fileversion))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("filenumber", filenumber))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("recordCount", recordCount))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("checksumProductQuantity", checksumProductQuantity))
|
||||
list.Add(New VERAG_PROG_ALLGEMEIN.SQLVariable("checksumAmounntInclVAT", checksumAmounntInclVAT))
|
||||
|
||||
Return list
|
||||
End Function
|
||||
|
||||
Public Function SAVE() As Boolean
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim sqlstr = " BEGIN TRAN If EXISTS(Select * FROM TTRTrailer WHERE _BASE_id=@_BASE_id) " &
|
||||
" BEGIN " & getUpdateCmd() & " End " &
|
||||
" Else " &
|
||||
" BEGIN " & getInsertCmd() & " End " &
|
||||
" commit tran "
|
||||
|
||||
Return SQL.doSQLVarList(sqlstr, "ASFINAG", , list)
|
||||
End Function
|
||||
|
||||
Public Sub LOAD()
|
||||
Try
|
||||
hasEntry = False
|
||||
Using conn As SqlConnection = SQL.GetNewOpenConnectionAsfinag()
|
||||
Using cmd As New SqlCommand("Select * FROM TTRTrailer WHERE PKFileName=@PKFileName AND filenumber = @filenumber ", conn)
|
||||
cmd.Parameters.AddWithValue("@PKFileName", PKFileName)
|
||||
Dim dr = cmd.ExecuteReader()
|
||||
If dr.Read Then
|
||||
For Each li In getParameterList()
|
||||
Dim propInfo As PropertyInfo = Me.GetType.GetProperty(li.Scalarvariable)
|
||||
|
||||
If dr.Item(li.Text) Is DBNull.Value Then
|
||||
propInfo.SetValue(Me, Nothing)
|
||||
Else
|
||||
propInfo.SetValue(Me, dr.Item(li.Text))
|
||||
End If
|
||||
|
||||
Next
|
||||
hasEntry = True
|
||||
End If
|
||||
dr.Close()
|
||||
End Using
|
||||
End Using
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler In der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Public Function getUpdateCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
|
||||
Dim str As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "] = @" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
Return (" UPDATE [TTRTrailer] SET " & str & " WHERE PKFileName=@PKFileName AND filenumber = @filenumbere ")
|
||||
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
Public Function getInsertCmd() As String
|
||||
Try
|
||||
Dim list As List(Of VERAG_PROG_ALLGEMEIN.SQLVariable) = getParameterList()
|
||||
Dim str As String = ""
|
||||
Dim values As String = ""
|
||||
For Each i In list
|
||||
If Not i.isPrimaryParam Then
|
||||
str &= "[" & i.Text & "],"
|
||||
values &= "@" & i.Scalarvariable & "," '.Replace("-", "").Replace(" ", "") & ","
|
||||
End If
|
||||
Next
|
||||
str = str.Substring(0, str.Length - 1) 'wg. ','
|
||||
values = values.Substring(0, values.Length - 1) 'wg. ','
|
||||
Return (" INSERT INTO TTRTrailer (" & str & ") VALUES(" & values & ") ")
|
||||
Catch ex As Exception
|
||||
MsgBox("Fehler in der Funktion '" & System.Reflection.MethodInfo.GetCurrentMethod.Name & "'" & vbNewLine & vbNewLine & ex.Message & vbNewLine & vbNewLine & ex.StackTrace)
|
||||
End Try
|
||||
Return ""
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
|
||||
Public Class Paramter
|
||||
Shared SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
|
||||
Shared Function GET_PARAM_ByName(tcParam_name, TESTSYSTEM) As String
|
||||
Return SQL.getValueTxtBySql("SELECT TOP 1 [Param_value] FROM [tblPartnersystem_Paramter] WHERE Param_system='ASFINAG' AND [Param_name]='" & tcParam_name & "'", , , SQL.GetNewOpenConnectionFMZOLL_SYSTEM(TESTSYSTEM))
|
||||
End Function
|
||||
End Class
|
||||
|
||||
End Class
|
||||
260
initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.Designer.vb
generated
Normal file
260
initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.Designer.vb
generated
Normal file
@@ -0,0 +1,260 @@
|
||||
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>
|
||||
Partial Class frmAsfinag_NachrichtenVerabeitung
|
||||
Inherits System.Windows.Forms.Form
|
||||
|
||||
'Das Formular überschreibt den Löschvorgang, um die Komponentenliste zu bereinigen.
|
||||
<System.Diagnostics.DebuggerNonUserCode()>
|
||||
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.
|
||||
<System.Diagnostics.DebuggerStepThrough()>
|
||||
Private Sub InitializeComponent()
|
||||
Me.components = New System.ComponentModel.Container()
|
||||
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmTRNCTS_NachrichtenVerarbeitung))
|
||||
Me.btn = New System.Windows.Forms.Button()
|
||||
Me.pnl = New System.Windows.Forms.Panel()
|
||||
Me.lblDatenCnt = New System.Windows.Forms.Label()
|
||||
Me.dgvEinarbeitung = New VERAG_PROG_ALLGEMEIN.MyDatagridview(Me.components)
|
||||
Me.clmnArt = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.Column1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
|
||||
Me.Label9 = New System.Windows.Forms.Label()
|
||||
Me.Button2 = New System.Windows.Forms.Button()
|
||||
Me.Label7 = New System.Windows.Forms.Label()
|
||||
Me.ListBox3 = New System.Windows.Forms.ListBox()
|
||||
Me.Label6 = New System.Windows.Forms.Label()
|
||||
Me.Label5 = New System.Windows.Forms.Label()
|
||||
Me.Button1 = New System.Windows.Forms.Button()
|
||||
Me.btnOK = New System.Windows.Forms.Button()
|
||||
Me.Label2 = New System.Windows.Forms.Label()
|
||||
Me.Label1 = New System.Windows.Forms.Label()
|
||||
Me.pnl.SuspendLayout()
|
||||
CType(Me.dgvEinarbeitung, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'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.FlatAppearance.BorderColor = System.Drawing.Color.Gray
|
||||
Me.btn.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btn.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.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(379, -1)
|
||||
Me.btn.Margin = New System.Windows.Forms.Padding(0)
|
||||
Me.btn.Name = "btn"
|
||||
Me.btn.Size = New System.Drawing.Size(75, 22)
|
||||
Me.btn.TabIndex = 6
|
||||
Me.btn.Text = "X"
|
||||
Me.btn.UseVisualStyleBackColor = False
|
||||
'
|
||||
'pnl
|
||||
'
|
||||
Me.pnl.BackColor = System.Drawing.Color.White
|
||||
Me.pnl.BorderStyle = System.Windows.Forms.BorderStyle.FixedSingle
|
||||
Me.pnl.Controls.Add(Me.lblDatenCnt)
|
||||
Me.pnl.Controls.Add(Me.dgvEinarbeitung)
|
||||
Me.pnl.Controls.Add(Me.Label9)
|
||||
Me.pnl.Controls.Add(Me.Button2)
|
||||
Me.pnl.Controls.Add(Me.Label7)
|
||||
Me.pnl.Controls.Add(Me.ListBox3)
|
||||
Me.pnl.Controls.Add(Me.Label6)
|
||||
Me.pnl.Controls.Add(Me.Label5)
|
||||
Me.pnl.Controls.Add(Me.Button1)
|
||||
Me.pnl.Controls.Add(Me.btnOK)
|
||||
Me.pnl.Controls.Add(Me.Label2)
|
||||
Me.pnl.Controls.Add(Me.Label1)
|
||||
Me.pnl.Controls.Add(Me.btn)
|
||||
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(456, 319)
|
||||
Me.pnl.TabIndex = 1
|
||||
'
|
||||
'lblDatenCnt
|
||||
'
|
||||
Me.lblDatenCnt.AutoSize = True
|
||||
Me.lblDatenCnt.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.lblDatenCnt.Location = New System.Drawing.Point(309, 132)
|
||||
Me.lblDatenCnt.Name = "lblDatenCnt"
|
||||
Me.lblDatenCnt.Size = New System.Drawing.Size(13, 13)
|
||||
Me.lblDatenCnt.TabIndex = 19
|
||||
Me.lblDatenCnt.Text = "0"
|
||||
Me.lblDatenCnt.Visible = False
|
||||
'
|
||||
'dgvEinarbeitung
|
||||
'
|
||||
Me.dgvEinarbeitung.AKTUALISIERUNGS_INTERVALL = -1
|
||||
Me.dgvEinarbeitung.AllowUserToAddRows = False
|
||||
Me.dgvEinarbeitung.AllowUserToDeleteRows = False
|
||||
Me.dgvEinarbeitung.AllowUserToOrderColumns = True
|
||||
Me.dgvEinarbeitung.AllowUserToResizeColumns = False
|
||||
Me.dgvEinarbeitung.AllowUserToResizeRows = False
|
||||
Me.dgvEinarbeitung.BackgroundColor = System.Drawing.Color.White
|
||||
Me.dgvEinarbeitung.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
|
||||
Me.dgvEinarbeitung.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.clmnArt, Me.Column1})
|
||||
Me.dgvEinarbeitung.Location = New System.Drawing.Point(12, 164)
|
||||
Me.dgvEinarbeitung.Name = "dgvEinarbeitung"
|
||||
Me.dgvEinarbeitung.RowHeadersVisible = False
|
||||
Me.dgvEinarbeitung.Size = New System.Drawing.Size(291, 145)
|
||||
Me.dgvEinarbeitung.TabIndex = 18
|
||||
'
|
||||
'clmnArt
|
||||
'
|
||||
Me.clmnArt.HeaderText = "Art"
|
||||
Me.clmnArt.Name = "clmnArt"
|
||||
Me.clmnArt.Width = 150
|
||||
'
|
||||
'Column1
|
||||
'
|
||||
Me.Column1.AutoSizeMode = System.Windows.Forms.DataGridViewAutoSizeColumnMode.Fill
|
||||
Me.Column1.HeaderText = "BezugsNr"
|
||||
Me.Column1.Name = "Column1"
|
||||
'
|
||||
'Label9
|
||||
'
|
||||
Me.Label9.AutoSize = True
|
||||
Me.Label9.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label9.Location = New System.Drawing.Point(306, 103)
|
||||
Me.Label9.Name = "Label9"
|
||||
Me.Label9.Size = New System.Drawing.Size(44, 13)
|
||||
Me.Label9.TabIndex = 17
|
||||
Me.Label9.Text = "läuft..."
|
||||
Me.Label9.Visible = False
|
||||
'
|
||||
'Button2
|
||||
'
|
||||
Me.Button2.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button2.Location = New System.Drawing.Point(309, 50)
|
||||
Me.Button2.Name = "Button2"
|
||||
Me.Button2.Size = New System.Drawing.Size(141, 50)
|
||||
Me.Button2.TabIndex = 16
|
||||
Me.Button2.Text = "Einlesen"
|
||||
Me.Button2.UseVisualStyleBackColor = True
|
||||
'
|
||||
'Label7
|
||||
'
|
||||
Me.Label7.AutoSize = True
|
||||
Me.Label7.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label7.Location = New System.Drawing.Point(8, 34)
|
||||
Me.Label7.Name = "Label7"
|
||||
Me.Label7.Size = New System.Drawing.Size(90, 13)
|
||||
Me.Label7.TabIndex = 13
|
||||
Me.Label7.Text = "Daten sichern:"
|
||||
'
|
||||
'ListBox3
|
||||
'
|
||||
Me.ListBox3.FormattingEnabled = True
|
||||
Me.ListBox3.Location = New System.Drawing.Point(11, 50)
|
||||
Me.ListBox3.Name = "ListBox3"
|
||||
Me.ListBox3.Size = New System.Drawing.Size(292, 95)
|
||||
Me.ListBox3.TabIndex = 12
|
||||
'
|
||||
'Label6
|
||||
'
|
||||
Me.Label6.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label6.Location = New System.Drawing.Point(306, 240)
|
||||
Me.Label6.Name = "Label6"
|
||||
Me.Label6.Size = New System.Drawing.Size(144, 37)
|
||||
Me.Label6.TabIndex = 11
|
||||
Me.Label6.Text = "0 Datensätze nicht " & Global.Microsoft.VisualBasic.ChrW(13) & Global.Microsoft.VisualBasic.ChrW(10) & "erkannt."
|
||||
Me.Label6.Visible = False
|
||||
'
|
||||
'Label5
|
||||
'
|
||||
Me.Label5.AutoSize = True
|
||||
Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label5.Location = New System.Drawing.Point(306, 217)
|
||||
Me.Label5.Name = "Label5"
|
||||
Me.Label5.Size = New System.Drawing.Size(44, 13)
|
||||
Me.Label5.TabIndex = 10
|
||||
Me.Label5.Text = "läuft..."
|
||||
Me.Label5.Visible = False
|
||||
'
|
||||
'Button1
|
||||
'
|
||||
Me.Button1.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.Button1.Location = New System.Drawing.Point(309, 164)
|
||||
Me.Button1.Name = "Button1"
|
||||
Me.Button1.Size = New System.Drawing.Size(141, 50)
|
||||
Me.Button1.TabIndex = 9
|
||||
Me.Button1.Text = "Einarbeiten"
|
||||
Me.Button1.UseVisualStyleBackColor = True
|
||||
'
|
||||
'btnOK
|
||||
'
|
||||
Me.btnOK.FlatStyle = System.Windows.Forms.FlatStyle.Flat
|
||||
Me.btnOK.Location = New System.Drawing.Point(309, 280)
|
||||
Me.btnOK.Name = "btnOK"
|
||||
Me.btnOK.Size = New System.Drawing.Size(141, 29)
|
||||
Me.btnOK.TabIndex = 9
|
||||
Me.btnOK.Text = "Schließen"
|
||||
Me.btnOK.UseVisualStyleBackColor = True
|
||||
Me.btnOK.Visible = False
|
||||
'
|
||||
'Label2
|
||||
'
|
||||
Me.Label2.AutoSize = True
|
||||
Me.Label2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label2.Location = New System.Drawing.Point(8, 8)
|
||||
Me.Label2.Name = "Label2"
|
||||
Me.Label2.Size = New System.Drawing.Size(222, 13)
|
||||
Me.Label2.TabIndex = 8
|
||||
Me.Label2.Text = "Einarbeitung der Nachrichtendaten von MAVI"
|
||||
'
|
||||
'Label1
|
||||
'
|
||||
Me.Label1.AutoSize = True
|
||||
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.Location = New System.Drawing.Point(8, 148)
|
||||
Me.Label1.Name = "Label1"
|
||||
Me.Label1.Size = New System.Drawing.Size(82, 13)
|
||||
Me.Label1.TabIndex = 8
|
||||
Me.Label1.Text = "Einarbeitung:"
|
||||
'
|
||||
'frmTRNCTS_NachrichtenVerarbeitung
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
|
||||
Me.ClientSize = New System.Drawing.Size(456, 319)
|
||||
Me.Controls.Add(Me.pnl)
|
||||
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
|
||||
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
|
||||
Me.Name = "frmTRNCTS_NachrichtenVerarbeitung"
|
||||
Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
|
||||
Me.Text = "DY NachrichtenVerarbeitung"
|
||||
Me.pnl.ResumeLayout(False)
|
||||
Me.pnl.PerformLayout()
|
||||
CType(Me.dgvEinarbeitung, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
Friend WithEvents btn As System.Windows.Forms.Button
|
||||
Friend WithEvents pnl As System.Windows.Forms.Panel
|
||||
Friend WithEvents Label2 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label1 As System.Windows.Forms.Label
|
||||
Friend WithEvents Button1 As System.Windows.Forms.Button
|
||||
Friend WithEvents btnOK As System.Windows.Forms.Button
|
||||
Friend WithEvents Label5 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label6 As System.Windows.Forms.Label
|
||||
Friend WithEvents Label7 As System.Windows.Forms.Label
|
||||
Friend WithEvents ListBox3 As System.Windows.Forms.ListBox
|
||||
Friend WithEvents Label9 As System.Windows.Forms.Label
|
||||
Friend WithEvents Button2 As System.Windows.Forms.Button
|
||||
Friend WithEvents dgvEinarbeitung As VERAG_PROG_ALLGEMEIN.MyDatagridview
|
||||
Friend WithEvents clmnArt As System.Windows.Forms.DataGridViewTextBoxColumn
|
||||
Friend WithEvents Column1 As System.Windows.Forms.DataGridViewTextBoxColumn
|
||||
Friend WithEvents lblDatenCnt As Label
|
||||
End Class
|
||||
986
initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.resx
Normal file
986
initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.resx
Normal file
@@ -0,0 +1,986 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<root>
|
||||
<!--
|
||||
Microsoft ResX Schema
|
||||
|
||||
Version 2.0
|
||||
|
||||
The primary goals of this format is to allow a simple XML format
|
||||
that is mostly human readable. The generation and parsing of the
|
||||
various data types are done through the TypeConverter classes
|
||||
associated with the data types.
|
||||
|
||||
Example:
|
||||
|
||||
... ado.net/XML headers & schema ...
|
||||
<resheader name="resmimetype">text/microsoft-resx</resheader>
|
||||
<resheader name="version">2.0</resheader>
|
||||
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
|
||||
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
|
||||
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
|
||||
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
|
||||
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
|
||||
<value>[base64 mime encoded serialized .NET Framework object]</value>
|
||||
</data>
|
||||
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
|
||||
<comment>This is a comment</comment>
|
||||
</data>
|
||||
|
||||
There are any number of "resheader" rows that contain simple
|
||||
name/value pairs.
|
||||
|
||||
Each data row contains a name, and value. The row also contains a
|
||||
type or mimetype. Type corresponds to a .NET class that support
|
||||
text/value conversion through the TypeConverter architecture.
|
||||
Classes that don't support this are serialized and stored with the
|
||||
mimetype set.
|
||||
|
||||
The mimetype is used for serialized objects, and tells the
|
||||
ResXResourceReader how to depersist the object. This is currently not
|
||||
extensible. For a given mimetype the value must be set accordingly:
|
||||
|
||||
Note - application/x-microsoft.net.object.binary.base64 is the format
|
||||
that the ResXResourceWriter will generate, however the reader can
|
||||
read any of the formats listed below.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.binary.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.soap.base64
|
||||
value : The object must be serialized with
|
||||
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
|
||||
: and then encoded with base64 encoding.
|
||||
|
||||
mimetype: application/x-microsoft.net.object.bytearray.base64
|
||||
value : The object must be serialized into a byte array
|
||||
: using a System.ComponentModel.TypeConverter
|
||||
: and then encoded with base64 encoding.
|
||||
-->
|
||||
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
|
||||
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
|
||||
<xsd:element name="root" msdata:IsDataSet="true">
|
||||
<xsd:complexType>
|
||||
<xsd:choice maxOccurs="unbounded">
|
||||
<xsd:element name="metadata">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" use="required" type="xsd:string" />
|
||||
<xsd:attribute name="type" type="xsd:string" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="assembly">
|
||||
<xsd:complexType>
|
||||
<xsd:attribute name="alias" type="xsd:string" />
|
||||
<xsd:attribute name="name" type="xsd:string" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="data">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
|
||||
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
|
||||
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
|
||||
<xsd:attribute ref="xml:space" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
<xsd:element name="resheader">
|
||||
<xsd:complexType>
|
||||
<xsd:sequence>
|
||||
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
|
||||
</xsd:sequence>
|
||||
<xsd:attribute name="name" type="xsd:string" use="required" />
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:choice>
|
||||
</xsd:complexType>
|
||||
</xsd:element>
|
||||
</xsd:schema>
|
||||
<resheader name="resmimetype">
|
||||
<value>text/microsoft-resx</value>
|
||||
</resheader>
|
||||
<resheader name="version">
|
||||
<value>2.0</value>
|
||||
</resheader>
|
||||
<resheader name="reader">
|
||||
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<resheader name="writer">
|
||||
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
|
||||
</resheader>
|
||||
<metadata name="clmnArt.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<metadata name="Column1.UserAddedColumn" type="System.Boolean, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
|
||||
<value>True</value>
|
||||
</metadata>
|
||||
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
|
||||
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
|
||||
<value>
|
||||
AAABAAEAgIAAAAEAGAAoyAAAFgAAACgAAACAAAAAAAEAAAEAGAAAAAAAAMgAAMQOAADEDgAAAAAAAAAA
|
||||
AACRbEd5TB+CWC59USZ8USV9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ8USV9USaCWC55TB+RbEd4Sx5mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB4Sx5/VClmMwBuPg5r
|
||||
OglrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOgluPg5mMwB/VCl0RhhmMwBmMwBnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFmMwBmMwB0RhhzRBVmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBz
|
||||
RBV3Sh1mMwBnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBnNQJmMwB3Sh18UCRmMwBqOQdnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFqOQdmMwB8UCR9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwDm4N3/////////
|
||||
///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL/////////////////
|
||||
//////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBmMwB0SSb39fT/
|
||||
//////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+YfWtmMwBmMwBm
|
||||
MwBmMwB0SSbu6+n////////////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
|
||||
///////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5zUy8X////////////////L
|
||||
v7itmo1mMwBmMwCYfWv///////90SSZmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwB0SSb////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDu6+n///////////////////////////////////////////////////////////+j
|
||||
jH1mMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwC3p5z/
|
||||
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwCYfWv////////////////Bs6pmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwB0SSb///////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCt
|
||||
mo3////////////////////////////////////m4N2Mbli3p5z///////+jjH1mMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwCMblj///////////////////////////+M
|
||||
blhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////
|
||||
///////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwDBs6r///////////////+3
|
||||
p5xmMwBmMwBmMwBmMwBmMwBmMwDm4N3///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDU
|
||||
y8X///////////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////90SSZm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////////////////////////////////39fTm
|
||||
4N3///////+3p5xmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwC3
|
||||
p5z////////////////////////////d1tFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
|
||||
p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwCjjH3////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXUL///////////////////90
|
||||
SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL39fT////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwC3p5z////////////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z////////////////////U
|
||||
y8WAXUJmMwBmMwC3p5z39fT////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwDBs6r////////////////u6+n///////////+tmo1mMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj////////////////m4N1mMwBmMwBmMwBm
|
||||
MwBmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||
///////////////////////////////////////////////////////Uy8VmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwD39fT////////////////Lv7hmMwBmMwBmMwBmMwBmMwCAXULu6+n////////////////39fRm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwDm4N3/////////////
|
||||
//+jjH3////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////
|
||||
//////+jjH1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD3
|
||||
9fT///////////////90SSZmMwBmMwBmMwBmMwDm4N3///////////////+jjH1mMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDu6+n/////////////////////////////////////////////////////
|
||||
//////+3p5xmMwBmMwBmMwBmMwBmMwBmMwCjjH3///////////////////+MblhmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCMblj///////////////////90SSZmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwD39fT///////////////9mMwDLv7j///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwDm4N3////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwCAXUL/////////
|
||||
///////39fR0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////////////////////
|
||||
//////////////////////////////////////+jjH1mMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||
//////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+jjH1mMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwCMblj////////////////m4N1mMwCAXUL39fT/
|
||||
///////39fSAXUJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////Uy8VmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////////
|
||||
///////////////////////////////////////u6+lmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwDUy8X////////////u6+lmMwBmMwBmMwBmMwCMblj///////////////////90SSZmMwBm
|
||||
MwBmMwBmMwBmMwBmMwC3p5z///////////////////9mMwBmMwBmMwB0SSb/////////////////////
|
||||
//////////////+3p5xmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwCjjH3/
|
||||
///////////////Uy8VmMwBmMwC3p5z////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwC3p5z////////////////////////////////////////////////////m4N1mMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwCjjH3////////////////////////////////////////////////////////////d
|
||||
1tGMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo1mMwBmMwBmMwCt
|
||||
mo3////////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z///////////////////90SSZm
|
||||
MwBmMwBmMwDm4N3////////////////////////////////Uy8VmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwC3p5z///////////////+3p5xmMwBmMwB0SSb39fT///////////+Y
|
||||
fWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCMblj/////////////////////////////////////////
|
||||
//////////////9mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb/////////////////////////////
|
||||
//////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3
|
||||
p5z////////////39fR0SSZmMwBmMwDBs6r////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwCjjH3///////////////////+jjH1mMwBmMwBmMwDBs6r////////////////////////////////3
|
||||
9fRmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwDUy8X///////////////+t
|
||||
mo1mMwBmMwBmMwCtmo3////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/////
|
||||
//////////////////////////////////////////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwDu6+n///////////////90SSZmMwBmMwBmMwBmMwBmMwCjjH3m4N3////////////////39fR0SSZm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////+3p5xmMwBmMwDUy8X/////////////
|
||||
//+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////////Bs6pmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwDu6+n///////////////+MblhmMwBmMwBmMwBmMwDu6+n///////////+tmo1mMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDd1tH////////////////Bs6pmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X///////////////+YfWtmMwBmMwBmMwBmMwBmMwBm
|
||||
MwB0SSbu6+n///////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH3/////////
|
||||
///39fSAXUJmMwD39fT///////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////
|
||||
///////////39fRmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////Uy8W3p5y3p5yYfWtmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwB0SSb///////////////////90SSZmMwBmMwBmMwBm
|
||||
MwCtmo3////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r////////////////m4N1m
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////////
|
||||
//////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDLv7j////////////////Bs6pmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwDUy8X////////////Lv7h0SSb///////////////////90SSZmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwCYfWv///////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwDu
|
||||
6+n///////////////+jjH1mMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwCYfWv/////
|
||||
///////////u6+lmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////+3p5xmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCjjH3///////////////////90SSZmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwCYfWv////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwDm4N3/////
|
||||
//////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+tmo3/
|
||||
///////////////m4N1mMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDBs6r/////////////////
|
||||
//+YfWtmMwBmMwBmMwBmMwBmMwCtmo3////////////////u6+lmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwC3p5z////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwCYfWv/////
|
||||
//////////+AXUJmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////////+MblhmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwB0SSb////////////////u6+lmMwBm
|
||||
MwBmMwBmMwBmMwCAXULLv7j///////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwC3p5z////////////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDd1tH///////////////////+3p5x0SSZmMwBmMwC3p5z///////////////////+t
|
||||
mo1mMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwDLv7j////////////////Bs6pm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwD39fT/
|
||||
//////////////////////////////////////////////////////////90SSZmMwBmMwBmMwBmMwBm
|
||||
MwBmMwDm4N3////////////////////////////////////////////////////////////Bs6pmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDu6+n///////////////////////////+3
|
||||
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////
|
||||
///////////////////////////Lv7hmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwDm4N3///////////////+tmo1mMwBmMwBmMwBmMwBmMwBmMwBmMwCAXUL///////////////+Y
|
||||
fWtmMwBmMwBmMwBmMwBmMwBmMwDUy8X/////////////////////////////////////////////////
|
||||
//////////+YfWtmMwBmMwBmMwBmMwBmMwBmMwDLv7j/////////////////////////////////////
|
||||
///////////////////Uy8VmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCj
|
||||
jH3///////////////////////////+MblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwCtmo339fT///////////////////////////////////////+tmo1mMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAF0SSb///////////////////+MblhmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwDLv7j////////////u6+l0SSZmMwBmMwBmMwBmMwBmMwC3p5z/////////////////
|
||||
//////////////////////////////////////////+3p5xmMwBmMwBmMwBmMwBmMwBmMwC3p5z/////
|
||||
///////////////////////////////////////m4N23p5yMblhmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwDd1tH///////////////////////9mMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwCjjH23p5z39fT////////////////Uy8W3
|
||||
p5xmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhn
|
||||
NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9
|
||||
USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ9USZmMwBrOQhnNAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNAFrOQhmMwB9USZ8UCRmMwBqOQdn
|
||||
NAFmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBnNAFqOQdmMwB8UCR3Sh1mMwBnNQJmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBnNQJmMwB3Sh1zRBVmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBz
|
||||
RBV0RhhmMwBmMwBnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFnNAFn
|
||||
NAFnNAFnNAFnNAFnNAFnNAFmMwBmMwB0Rhh/VClmMwBuPg5rOglrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhr
|
||||
OQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOQhrOgluPg5mMwB/VCl4Sx5mMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBmMwBm
|
||||
MwBmMwBmMwBmMwB4Sx6RbEd5TB+CWC59USZ8USV9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ9
|
||||
USZ9USZ9USZ9USZ9USZ9USZ9USZ9USZ8USV9USaCWC55TB+RbEf/////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////////p6ferq+Kr
|
||||
q+Krq+Krq+Krq+Krq+LFxer/////////////////////////////////////////////////////////
|
||||
//////////+4uOarq+Krq+Krq+Krq+Krq+Ld3fP/////////////////////////////////////////
|
||||
//////////////////////////////+4uOarq+Krq+Krq+Krq+Krq+Ld3fP/////////////////////
|
||||
//////////////////////+rq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Krq+Kr
|
||||
q+Krq+K4uOb////////////////////////////////Fxeqrq+Krq+Krq+Krq+Krq+Krq+Lp6ff/////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////////d3fMDA70DA70DA70DA70DA70DA71ZWcv/////////////////////////
|
||||
///////////////////////////////R0e9sbNADA70DA70DA70DA70DA70DA70DA70DA70DA72dnd30
|
||||
9Pv////////////////////////////////////////////////R0e9sbNADA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA72dnd309Pv///////////////////////////////8pKcIDA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70pKcL///////////////////+4uOZsbNADA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA72dnd3p6ff/////////////////////////////////////////
|
||||
//////////////////////////////////////////////////////////8pKcIDA70DA70DA70DA70D
|
||||
A70DA73///////////////////////////////////////////////////+dnd0DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA724uOb///////////////////////////////////////+d
|
||||
nd0DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA724uOb/////////////////////
|
||||
//////9ZWcsDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA7309Pv/
|
||||
///////p6fdZWcsDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72rq+L/////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////9sbNADA70DA70DA70DA70DA70DA73d3fP/////////////////////////////////////
|
||||
//////9+ftQDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72rq+L/////
|
||||
//////////////////////////9+ftQDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA72rq+L///////////////////////+OjtkDA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA73d3fP////p6fcpKcIDA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA72dnd3/////////////////////////////////////////////////
|
||||
//////////////////////////////////////////+dnd0DA70DA70DA70DA70DA70DA73Fxer/////
|
||||
//////////////////////////////////+rq+IDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA72rq+L///////////////////////+rq+IDA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72rq+L///////////////////+rq+IDA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA724uOb///9ZWcsDA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA73Fxer/////////////
|
||||
//////////////////////////////////////////////////////////////////////////+rq+ID
|
||||
A70DA70DA70DA70DA70DA72dnd3////////////////////////////////////p6fcDA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA73d3fP/////////////
|
||||
///p6fcDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A73d3fP////////////////R0e8DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA72rq+K4uOYDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA71ZWcv/////////////////////////////////////////////////////////////
|
||||
///////////////////////////d3fMDA70DA70DA70DA70DA70DA71+ftT/////////////////////
|
||||
//////////////+rq+IDA70DA70DA70DA70DA70DA70DA72dnd309Pv////R0e9+ftQDA70DA70DA70D
|
||||
A70DA70DA70DA71sbND///////////////+rq+IDA70DA70DA70DA70DA70DA70DA72dnd309Pv////R
|
||||
0e9+ftQDA70DA70DA70DA70DA70DA70DA71sbND////////////////09PsDA70DA70DA70DA70DA70D
|
||||
A71ZWcv///////////////////////////////////////9sbNADA70DA70DA70DA70DA70DA70DA72d
|
||||
nd3d3fP////////d3fN+ftQDA70DA70DA70DA70DA70DA70DA73d3fP/////////////////////////
|
||||
///////////////////////////////////////////////////////////09PsDA70DA70DA70DA70D
|
||||
A70DA71ERMf///////////////////////////////////9ZWcsDA70DA70DA70DA70DA70DA72rq+L/
|
||||
//////////////////+dnd0DA70DA70DA70DA70DA70DA70DA73Fxer///////////9ZWcsDA70DA70D
|
||||
A70DA70DA70DA72rq+L///////////////////+dnd0DA70DA70DA70DA70DA70DA70DA73Fxer/////
|
||||
//////////8pKcIDA70DA70DA70DA70DA70DA73////////////////////////////////////09PsD
|
||||
A70DA70DA70DA70DA70DA70DA73d3fP///////////////////////9sbNADA70DA70DA70DA70DA70D
|
||||
A73Fxer/////////////////////////////////////////////////////////////////////////
|
||||
//////////////9ZWcsDA70DA70DA70DA70DA70DA7309Pv////////////////////////////09PsD
|
||||
A70DA70DA70DA70DA70DA71ERMf///////////////////////////9ZWcsDA70DA70DA70DA70DA70D
|
||||
A71sbND////////09PsDA70DA70DA70DA70DA70DA71ERMf///////////////////////////9ZWcsD
|
||||
A70DA70DA70DA70DA70DA71sbND///////////////9+ftQDA70DA70DA70DA70DA70DA73d3fP/////
|
||||
///////////////////////////09Purq+Krq+Krq+JsbNADA70DA72Ojtn/////////////////////
|
||||
//////9ZWcsDA70DA70DA70DA70DA70DA724uOb/////////////////////////////////////////
|
||||
//////////////////////////////////////////////9+ftQDA70DA70DA70DA70DA70DA73R0e//
|
||||
///////////////////////////d3fMDA70DA70DA70DA70DA70DA71+ftT/////////////////////
|
||||
//////+4uOYDA70DA70DA70DA70DA70DA70DA7309Pv////d3fMDA70DA70DA70DA70DA70DA71+ftT/
|
||||
//////////////////////////+4uOYDA70DA70DA70DA70DA70DA70DA7309Pv///////////+dnd0D
|
||||
A70DA70DA70DA70DA70DA73Fxer/////////////////////////////////////////////////////
|
||||
///////////////////////////d3fOrq+IpKcIDA70DA70DA70DA70DA70DA70DA73Fxer/////////
|
||||
//////////////////////////////////////////////////////////////////////////////+r
|
||||
q+IDA70DA70DA70DA70DA70DA72rq+L////////////////////////////R0e8DA70DA70DA70DA70D
|
||||
A70DA72Ojtn///////////////////////////////8pKcIDA70DA70DA70DA70DA70DA73Fxer////R
|
||||
0e8DA70DA70DA70DA70DA70DA72Ojtn///////////////////////////////8pKcIDA70DA70DA70D
|
||||
A70DA70DA73Fxer///////////+4uOYDA70DA70DA70DA70DA70DA72rq+L/////////////////////
|
||||
//////////////////////////////////////////////+4uOarq+IDA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA7309Pv/////////////////////////////////////////////////////////
|
||||
///////////////////////////////FxeoDA70DA70DA70DA70DA70DA72dnd3/////////////////
|
||||
///////////R0e8DA70DA70DA70DA70DA70DA72Ojtn///////////////////////////////9+ftQD
|
||||
A70DA70DA70DA70DA70DA72rq+L////R0e8DA70DA70DA70DA70DA70DA72Ojtn/////////////////
|
||||
//////////////9+ftQDA70DA70DA70DA70DA70DA72rq+L////////////d3fMDA70DA70DA70DA70D
|
||||
A70DA71+ftT////////////////////////////////////////////////////////p6fednd0DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71sbND/////////////////////////////
|
||||
///////////////////////////////////////////////////////////////p6fcDA70DA70DA70D
|
||||
A70DA70DA71ZWcv////////////////////////////p6fcDA70DA70DA70DA70DA70DA71ZWcv/////
|
||||
//////////////////////////+rq+IDA70DA70DA70DA70DA70DA72Ojtn////p6fcDA70DA70DA70D
|
||||
A70DA70DA71ZWcv///////////////////////////////+rq+IDA70DA70DA70DA70DA70DA72Ojtn/
|
||||
///////////09PsDA70DA70DA70DA70DA70DA71ERMf/////////////////////////////////////
|
||||
///////////////FxeoDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70pKcLp
|
||||
6ff/////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////8pKcIDA70DA70DA70DA70DA70pKcL////////////////////////////09PsD
|
||||
A70DA70DA70DA70DA70DA70pKcL////////////////////////////////d3fMDA70DA70DA70DA70D
|
||||
A70DA71sbND////09PsDA70DA70DA70DA70DA70DA70pKcL////////////////////////////////d
|
||||
3fMDA70DA70DA70DA70DA70DA71sbND///////////////9ZWcsDA70DA70DA70DA70DA70DA7309Pv/
|
||||
///////////////////////////////////////////FxeoDA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA71ERMfd3fP/////////////////////////////////////////////////
|
||||
//////////////////////////////////////////////////9ZWcsDA70DA70DA70DA70DA70DA73d
|
||||
3fP///////////////////////////8pKcIDA70DA70DA70DA70DA70DA73R0e//////////////////
|
||||
///////////p6fcDA70DA70DA70DA70DA70DA71sbND///////8pKcIDA70DA70DA70DA70DA70DA73R
|
||||
0e/////////////////////////////p6fcDA70DA70DA70DA70DA70DA71sbND///////////////9+
|
||||
ftQDA70DA70DA70DA70DA70DA73d3fP////////////////////////////////////////09PspKcID
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71ZWcurq+L/////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//+dnd0DA70DA70DA70DA70DA70DA73Fxer///////////////////////////9+ftQDA70DA70DA70D
|
||||
A70DA70DA72Ojtn////////////////////////////p6fcDA70DA70DA70DA70DA70DA71+ftT/////
|
||||
//9+ftQDA70DA70DA70DA70DA70DA72Ojtn////////////////////////////p6fcDA70DA70DA70D
|
||||
A70DA70DA71+ftT///////////////+rq+IDA70DA70DA70DA70DA70DA724uOb/////////////////
|
||||
///////////////////////FxeoDA70DA70DA70DA70DA70DA70DA70DA70DA70DA71sbNCrq+Lp6ff/
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////////////////////+rq+IDA70DA70DA70DA70DA70DA72rq+L/////////////
|
||||
///////////////FxeoDA70DA70DA70DA70DA70DA70DA73p6ff////////////////////////FxeoD
|
||||
A70DA70DA70DA70DA70DA72Ojtn////////FxeoDA70DA70DA70DA70DA70DA70DA73p6ff/////////
|
||||
///////////////FxeoDA70DA70DA70DA70DA70DA72Ojtn////////////////FxeoDA70DA70DA70D
|
||||
A70DA70DA72dnd3///////////////////////////////////////+rq+IDA70DA70DA70DA70DA70D
|
||||
A70DA72Ojtm4uOb/////////////////////////////////////////////////////////////////
|
||||
///////////////////////////////////////////////////////////////////d3fMDA70DA70D
|
||||
A70DA70DA70DA71+ftT///////////////////////////////8pKcIDA70DA70DA70DA70DA70DA71+
|
||||
ftT///////////////////////+OjtkDA70DA70DA70DA70DA70DA72rq+L///////////8pKcIDA70D
|
||||
A70DA70DA70DA70DA71+ftT///////////////////////+OjtkDA70DA70DA70DA70DA70DA72rq+L/
|
||||
///////////////d3fMDA70DA70DA70DA70DA70DA71sbND/////////////////////////////////
|
||||
//////+rq+IDA70DA70DA70DA70DA70DA73d3fP////////////////////p6ferq+Krq+L09Pv/////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
///////////////////09PsDA70DA70DA70DA70DA70DA71ERMf/////////////////////////////
|
||||
//+rq+IDA70DA70DA70DA70DA70DA70DA71+ftT///////////////+4uOYDA70DA70DA70DA70DA70D
|
||||
A70DA73d3fP///////////+rq+IDA70DA70DA70DA70DA70DA70DA71+ftT///////////////+4uOYD
|
||||
A70DA70DA70DA70DA70DA70DA73d3fP///////////////////8pKcIDA70DA70DA70DA70DA70pKcL/
|
||||
//////////////////////////////////////+rq+IDA70DA70DA70DA70DA70DA724uOb/////////
|
||||
///////09PtZWcsDA70DA70DA70DA71sbNCrq+L09Pv/////////////////////////////////////
|
||||
///////////////////////////09Purq+Krq+Krq+Krq+Krq+Krq+IpKcIDA70DA70DA70DA70DA70D
|
||||
A72rq+Krq+Krq+Krq+Krq+Krq+LR0e////////9ERMcDA70DA70DA70DA70DA70DA70DA70DA72rq+Kr
|
||||
q+JZWcsDA70DA70DA70DA70DA70DA70DA71ZWcv///////////////////9ERMcDA70DA70DA70DA70D
|
||||
A70DA70DA70DA72rq+Krq+JZWcsDA70DA70DA70DA70DA70DA70DA71ZWcv/////////////////////
|
||||
//9ZWcsDA70DA70DA70DA70DA70DA7309Pv////////////////////////////////////R0e8DA70D
|
||||
A70DA70DA70DA70DA70DA71ZWcurq+Krq+J+ftQDA70DA70DA70DA70DA70DA70DA70pKcL09Pv/////
|
||||
///////////////////////////////////////////////////////////09PsDA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA72Ojtn////////d3fMDA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA73R0e//////////
|
||||
///////////d3fMDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA73R0e////////////////////////+OjtkDA70DA70DA70DA70DA70DA73R0e//////////////
|
||||
//////////////////////////9ERMcDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA72rq+L/////////////////////////////////////////////////////////
|
||||
//////////////8pKcIDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA71ZWcv///////////+4uOYDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA72dnd3///////////////////////////+4uOYDA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA72dnd3///////////////////////////+rq+IDA70DA70D
|
||||
A70DA70DA70DA72rq+L////////////////////////////////////////d3fMDA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71ZWcv/////////////////////////////
|
||||
//////////////////////////////////////////////9sbNADA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70pKcL///////////////+4uOYDA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71+ftT/////////////////////////////////
|
||||
//+4uOYDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71+ftT/////////////
|
||||
///////////////////R0e8DA70DA70DA70DA70DA70DA72Ojtn/////////////////////////////
|
||||
//////////////+4uOYDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA71ZWcvp
|
||||
6ff///////////////////////////////////////////////////////////////////////////+d
|
||||
nd0DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA73p
|
||||
6ff////////////////d3fNZWcsDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA724uOb/////
|
||||
///////////////////////////////////////d3fNZWcsDA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA724uOb////////////////////////////////////09PsDA70DA70DA70DA70DA70DA71Z
|
||||
Wcv////////////////////////////////////////////////R0e9ERMcDA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA72Ojtn/////////////////////////////////////////////////////
|
||||
//////////////////////////////+rq+IDA70DA70DA70DA70DA70DA70DA70DA70DA70DA70DA70D
|
||||
A70DA70DA70DA70DA70DA70DA70DA73R0e/////////////////////////R0e+rq+IpKcIDA70DA70D
|
||||
A70DA70DA72Ojtmrq+L////////////////////////////////////////////////////////////R
|
||||
0e+rq+IpKcIDA70DA70DA70DA70DA72Ojtmrq+L/////////////////////////////////////////
|
||||
//////8pKcIDA70DA70DA70DA70DA70DA73/////////////////////////////////////////////
|
||||
//////////+4uOarq+IDA70DA70DA70DA70DA70DA71+ftSrq+L09Pv/////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
//////////////////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
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
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA
|
||||
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==
|
||||
</value>
|
||||
</data>
|
||||
</root>
|
||||
565
initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.vb
Normal file
565
initATLASAufschubkonten/frmAsfinag_NachrichtenVerarbeitung.vb
Normal file
@@ -0,0 +1,565 @@
|
||||
Imports System.IO
|
||||
Imports System.Globalization
|
||||
Imports System.Xml
|
||||
Imports Renci.SshNet
|
||||
Imports System.Net
|
||||
Imports System.Text
|
||||
|
||||
Public Class frmAsfinag_NachrichtenVerabeitung
|
||||
Dim cntDatenEingelesen As Integer = 0
|
||||
Dim dsNichtErkannt As Integer = 0
|
||||
Dim SQL As New VERAG_PROG_ALLGEMEIN.SQL
|
||||
Dim allowClose = False
|
||||
' Dim DY_PFAD = "C:\Users\DEVELOPER1\Desktop\test\TEST\"
|
||||
|
||||
Dim ASFINAG_PFAD = "" '"C:\Users\DEVELOPER1\Desktop\test\TEST\Nachrichtendaten_Einarbeitung\"
|
||||
Dim VERARBEITUNGS_PFAD = "" '"C:\Users\DEVELOPER1\Desktop\test\TEST\Nachrichtendaten_Einarbeitung\"
|
||||
Dim ZIEL_PFAD = "" '"C:\Users\DEVELOPER1\Desktop\test\TEST\Nachrichtendaten_Ablage\"
|
||||
Dim ERROR_PFAD = "" '"C:\Users\DEVELOPER1\Desktop\test\TEST\Nachrichtendaten_ERROR\"
|
||||
Dim PARTNERSYSTEM = "ASFINAG"
|
||||
Dim SERVER_Path = ""
|
||||
Dim SERVER_Path_TEST = ""
|
||||
' Dim BOX_VERSION = "8.8"
|
||||
|
||||
Dim Dateiname = ""
|
||||
|
||||
Sub New()
|
||||
|
||||
' Dieser Aufruf ist für den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
|
||||
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
|
||||
End Sub
|
||||
Sub New(allowClose) 'autostart
|
||||
|
||||
' Dieser Aufruf ist für den Designer erforderlich.
|
||||
InitializeComponent()
|
||||
Me.allowClose = allowClose
|
||||
' Fügen Sie Initialisierungen nach dem InitializeComponent()-Aufruf hinzu.
|
||||
|
||||
End Sub
|
||||
|
||||
Sub initPfade()
|
||||
Me.SERVER_Path = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||
Me.SERVER_Path_TEST = cAsfinag.Paramter.GET_PARAM_ByName("SERVER_Path_TEST", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||
Me.ASFINAG_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("BEREITSTELLUNGS_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||
Me.VERARBEITUNGS_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("VERARBEITUNGS_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||
Me.ZIEL_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("ZIEL_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||
Me.ERROR_PFAD = cAsfinag.Paramter.GET_PARAM_ByName("ERROR_PFAD", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||
|
||||
If Not IO.Directory.Exists(VERARBEITUNGS_PFAD) Then IO.Directory.CreateDirectory(VERARBEITUNGS_PFAD)
|
||||
If Not IO.Directory.Exists(ZIEL_PFAD) Then IO.Directory.CreateDirectory(ZIEL_PFAD)
|
||||
If Not IO.Directory.Exists(ERROR_PFAD) Then IO.Directory.CreateDirectory(ERROR_PFAD)
|
||||
|
||||
'Me.BOX_VERSION = NCTSTR_Worker.cDY_Paramter.GET_PARAM_ByName("BOX_VERSION", VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM)
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub frmDYNachrichtenVerarbeitung_Load(sender As Object, e As EventArgs) Handles Me.Load
|
||||
initPfade()
|
||||
For Each d In System.IO.Directory.GetFiles(VERARBEITUNGS_PFAD)
|
||||
ListBox3.Items.Add(frmStartOptions.cut_file(d))
|
||||
Me.Refresh()
|
||||
Next
|
||||
End Sub
|
||||
|
||||
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
|
||||
Me.Enabled = False
|
||||
Try
|
||||
Label9.Visible = True
|
||||
Dim cnt = getNachrichtenDatenFromAsfinagServices()
|
||||
Label9.Text = cnt & " Datensätze empfangen."
|
||||
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
Me.Enabled = True
|
||||
|
||||
End Sub
|
||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
||||
Me.Enabled = False
|
||||
Try
|
||||
Label5.Visible = True
|
||||
|
||||
DatenEinlesen() '<<<<------------
|
||||
|
||||
If dsNichtErkannt > 0 Then
|
||||
|
||||
Label6.Text = dsNichtErkannt & " Datensätze nicht " & vbNewLine & "erkannt."
|
||||
Label6.Visible = True
|
||||
End If
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
Me.Enabled = True
|
||||
Label5.Text = cntDatenEingelesen & " Datensätze verarbeitet."
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Function getNachrichtenDatenFromAsfinagServices() As Integer
|
||||
Dim cnt = 0
|
||||
Try
|
||||
Dim SERVER_Path = ""
|
||||
|
||||
If VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
|
||||
|
||||
SERVER_Path = Me.SERVER_Path '"\\ftps.verag.ag\FTP\MAVI\IN\"
|
||||
Else
|
||||
|
||||
SERVER_Path = Me.SERVER_Path_TEST '"\\ftps.verag.ag\FTP\MAVI\IN\"
|
||||
End If
|
||||
|
||||
|
||||
For Each f In IO.Directory.GetFiles(SERVER_Path)
|
||||
Dim fi As New IO.FileInfo(f)
|
||||
If Not fi.Name.StartsWith(".") Then
|
||||
Dim zielPfad = VERARBEITUNGS_PFAD & "\" & fi.Name
|
||||
While IO.File.Exists(zielPfad)
|
||||
zielPfad = VERARBEITUNGS_PFAD & "\" & Now.ToString("yyyyMMdd_HHmmss_") & fi.Name
|
||||
End While
|
||||
IO.File.Copy(f, zielPfad)
|
||||
If Not VERAG_PROG_ALLGEMEIN.cAllgemein.TESTSYSTEM Then
|
||||
If IO.File.Exists(zielPfad) Then IO.File.Delete(f)
|
||||
End If
|
||||
|
||||
ListBox3.Items.Add(frmStartOptions.cut_file((New FileInfo(zielPfad)).Name)) 'zur Liste hinzufügen
|
||||
|
||||
cnt += 1
|
||||
End If
|
||||
Next
|
||||
|
||||
|
||||
Return cnt
|
||||
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
|
||||
Return cnt
|
||||
End Function
|
||||
|
||||
|
||||
Function getNachrichtenDatenFromMAVIServices_ALTERNATIV() As Integer
|
||||
Dim cnt = 0
|
||||
Try
|
||||
For Each f In IO.Directory.GetFiles(ASFINAG_PFAD)
|
||||
Dim FI As New FileInfo(f)
|
||||
If Not FI.Name.StartsWith(".") Then
|
||||
'Temp. DownloadPfad
|
||||
Dim destFilenameTMP = VERARBEITUNGS_PFAD + "." & If(IO.File.Exists(VERARBEITUNGS_PFAD & "." & FI.Name), Now.ToString("yyMMdd_HHmmss.fff_"), "") & FI.Name
|
||||
|
||||
'Datei herunterladen
|
||||
IO.File.Copy(f, destFilenameTMP)
|
||||
If IO.File.Exists(destFilenameTMP) Then IO.File.Delete(f) 'Datei nach erfolgreichem Herunterladen vom Server löschen
|
||||
|
||||
'Gültiger Filename
|
||||
Dim destFilename = VERARBEITUNGS_PFAD & If(IO.File.Exists(VERARBEITUNGS_PFAD & FI.Name), Now.ToString("yyMMdd_HHmmss.fff_"), "") & FI.Name
|
||||
IO.File.Move(destFilenameTMP, destFilename) 'Datei umbenennen
|
||||
|
||||
Dim fi_dest As FileInfo = New FileInfo(destFilename)
|
||||
ListBox3.Items.Add(frmStartOptions.cut_file(fi_dest.Name)) 'zur Liste hinzufügen
|
||||
cnt += 1
|
||||
lblDatenCnt.Text = cnt
|
||||
Me.Refresh()
|
||||
End If
|
||||
Next
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
|
||||
Return cnt
|
||||
|
||||
'Dim cnt = 0
|
||||
'Try
|
||||
' Dim DY_server = ""
|
||||
' Dim DY_name = ""
|
||||
' Dim DY_pwd = ""
|
||||
' Dim DY_port = ""
|
||||
' Dim DY_PFAD_out = ""
|
||||
|
||||
' DAKOSY_Worker.cDakosyFunftions.getSFTPLoginData(DY_server, DY_name, DY_pwd, DY_port, "", DY_PFAD_out)
|
||||
|
||||
|
||||
' Dim ConnectionInfo As New ConnectionInfo(DY_server, DY_port, DY_name, New PasswordAuthenticationMethod(DY_name, DY_pwd))
|
||||
' Using client = New SftpClient(ConnectionInfo)
|
||||
' client.Connect()
|
||||
|
||||
' For Each f In client.ListDirectory(DY_PFAD_out)
|
||||
' ' MsgBox(f.Name)
|
||||
' If Not f.Name.StartsWith(".") Then
|
||||
' 'Temp. DownloadPfad
|
||||
' Dim destFilenameTMP = VERARBEITUNGS_PFAD + "." & If(IO.File.Exists(VERARBEITUNGS_PFAD & "." & f.Name), Now.ToString("yyMMdd_HHmmss.fff_"), "") & f.Name
|
||||
|
||||
' 'Datei herunterladen
|
||||
' Dim downloadFileStream As Stream = File.OpenWrite(destFilenameTMP)
|
||||
' client.DownloadFile(f.FullName, downloadFileStream)
|
||||
' If IO.File.Exists(destFilenameTMP) Then client.DeleteFile(f.FullName) 'Datei nach erfolgreichem Herunterladen vom Server löschen
|
||||
' downloadFileStream.Dispose()
|
||||
|
||||
' 'Gültiger Filename
|
||||
' Dim destFilename = VERARBEITUNGS_PFAD & If(IO.File.Exists(VERARBEITUNGS_PFAD & f.Name), Now.ToString("yyMMdd_HHmmss.fff_"), "") & f.Name
|
||||
' IO.File.Move(destFilenameTMP, destFilename) 'Datei umbenennen
|
||||
|
||||
' Dim fi As FileInfo = New FileInfo(destFilename)
|
||||
' ListBox3.Items.Add(frmStartOptions.cut_file(fi.Name)) 'zur Liste hinzufügen
|
||||
' cnt += 1
|
||||
' End If
|
||||
' Next
|
||||
' client.Disconnect()
|
||||
' End Using
|
||||
'Catch ex As Exception
|
||||
' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
'End Try
|
||||
|
||||
'Return cnt
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
' Dim toEncodeAsBytes() As Byte = System.Text.ASCIIEncoding.ASCII.GetBytes(toEncode)
|
||||
' string returnValue = System.Convert.ToBase64String(toEncodeAsBytes)
|
||||
Public Function stripNonValidXMLCharacters(ByVal textIn As String) As String
|
||||
Dim textOut As System.Text.StringBuilder = New System.Text.StringBuilder()
|
||||
Dim current As Char
|
||||
If textIn Is Nothing OrElse textIn = String.Empty Then Return String.Empty
|
||||
For i As Integer = 0 To textIn.Length - 1
|
||||
current = textIn(i)
|
||||
If (current = "9" OrElse current = "10" OrElse current = "13") OrElse ((current >= "32") AndAlso (current <= "55295")) OrElse ((current >= "57344") AndAlso (current <= "65533")) OrElse ((current >= "65536") AndAlso (current <= "1114111")) Then
|
||||
textOut.Append(current)
|
||||
End If
|
||||
Next
|
||||
|
||||
Return textOut.ToString()
|
||||
End Function
|
||||
|
||||
Public Function SanitizeXmlString(ByVal xml As String) As String
|
||||
If xml Is Nothing Then
|
||||
Throw New ArgumentNullException("xml")
|
||||
End If
|
||||
|
||||
Dim buffer As System.Text.StringBuilder = New System.Text.StringBuilder(xml.Length)
|
||||
For Each c As Char In xml
|
||||
If IsLegalXmlChar(Asc(c)) Then
|
||||
buffer.Append(c)
|
||||
End If
|
||||
Next
|
||||
|
||||
Return buffer.ToString()
|
||||
End Function
|
||||
|
||||
Public Function IsLegalXmlChar(ByVal character As Integer) As Boolean
|
||||
Return (character = 9 OrElse character = 10 OrElse character = 13 OrElse (character >= 32 AndAlso character <= 55295) OrElse (character >= 57344 AndAlso character <= 65533) OrElse (character >= 65536 AndAlso character <= 1114111))
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
Sub DatenEinlesen()
|
||||
|
||||
VERAG_PROG_ALLGEMEIN.cAllgemein.ERR_OP_GLOBAL = VERAG_PROG_ALLGEMEIN.ERROR_OP.MAIL
|
||||
|
||||
If ListBox3.Items.Count = 0 Then
|
||||
Label6.Text = "Keine Daten zum Einlesen vorhanden."
|
||||
Label6.Visible = True
|
||||
Exit Sub
|
||||
End If
|
||||
|
||||
|
||||
For NACHRICHTENTYP = 1 To 10 'Nach Nachrichtentyp abarbeteiten
|
||||
|
||||
For Each d In System.IO.Directory.GetFiles(VERARBEITUNGS_PFAD)
|
||||
Try
|
||||
Dateiname = d
|
||||
cWorker_NCTS.Dateiname = d
|
||||
If IO.File.Exists(d) Then
|
||||
Dim found = False
|
||||
Dim nr_id As Integer = -1
|
||||
Dim fi As FileInfo = New FileInfo(d)
|
||||
If Not fi.Name.StartsWith(".") Then
|
||||
|
||||
Dim alreadyMoved = False
|
||||
|
||||
Dim NACHRICHTENTYP_notfound = False
|
||||
|
||||
If fi.Extension.ToLower = ".xml" Then
|
||||
Dim xmlWriterSettings As XmlWriterSettings = New XmlWriterSettings With {.Encoding = System.Text.Encoding.UTF8, .CheckCharacters = True}
|
||||
|
||||
Dim doc As New XmlDocument()
|
||||
Dim XML_Code = System.IO.File.ReadAllText(d, System.Text.UTF8Encoding.Default)
|
||||
|
||||
doc.LoadXml(SanitizeXmlString(XML_Code))
|
||||
Dim VERSION As String = ""
|
||||
|
||||
'------------------------------------------------------------------------------------------------------------------------------
|
||||
' eZOLL
|
||||
'------------------------------------------------------------------------------------------------------------------------------
|
||||
|
||||
|
||||
'------------------------------------------
|
||||
'------------------ Anmeldung ------------------
|
||||
'------------------------------------------
|
||||
'MAVI: CC015B - Versandanmeldung Final
|
||||
|
||||
Select Case NACHRICHTENTYP
|
||||
Case 1
|
||||
'NCTS: Versandanmeldung
|
||||
If Not found And cNCTSPartnerWorker.cMAVIGetMsgType.isTRNCTS_VersandanmeldungXML_CC015B(doc) Then
|
||||
If cMAVIWorker.readNCTS_VersandanmeldungXML_CC015B(PARTNERSYSTEM, Me, doc, nr_id, d) <> "" Then found = True
|
||||
End If
|
||||
|
||||
Case 2
|
||||
'NCTS: Versandanmeldung - Ergänzung GUID
|
||||
If Not found And cNCTSPartnerWorker.cMAVIGetMsgType.isTRNCTS_VersandanmeldungXML_CC015B_RES(doc) Then
|
||||
If cMAVIWorker.readNCTS_VersandanmeldungXML_CC015B_RES(PARTNERSYSTEM, Me, doc, nr_id) <> "" Then found = True
|
||||
End If
|
||||
Case 3
|
||||
'NCTS: BestätigungZoll
|
||||
If Not found And cNCTSPartnerWorker.cMAVIGetMsgType.isTRNCTS_BestaetigungZollXML_CC029B(doc) Then
|
||||
If cMAVIWorker.readNCTS_BestaetigungZollXML_CC029B(PARTNERSYSTEM, Me, doc, nr_id) <> "" Then found = True
|
||||
End If
|
||||
Case 4
|
||||
'NCTS: Guarantee
|
||||
If Not found And cNCTSPartnerWorker.cMAVIGetMsgType.isTRNCTS_BestaetigungZollXML_GUA_INF(doc) Then
|
||||
If cMAVIWorker.readNCTS_BestaetigungZollXML_GUA_INF(PARTNERSYSTEM, Me, doc, nr_id) <> "" Then found = True
|
||||
End If
|
||||
Case 5
|
||||
'NCTS: Ankunftsanzeige
|
||||
If Not found And cNCTSPartnerWorker.cMAVIGetMsgType.isTRNCTS_BestaetigungZollXML_ARR_INF(doc) Then
|
||||
If cMAVIWorker.readNCTS_BestaetigungZollXML_ARR_INF(PARTNERSYSTEM, Me, doc, nr_id) <> "" Then found = True
|
||||
End If
|
||||
|
||||
Case 6
|
||||
'NCTS: Erledigungsmitteilung
|
||||
If Not found And cNCTSPartnerWorker.cMAVIGetMsgType.isTRNCTS_ErledigungsmitteilungXML_CC045A(doc) Then
|
||||
If cMAVIWorker.readNCTS_ErledigungsmitteilungXML_CC045A(PARTNERSYSTEM, Me, doc, nr_id) <> "" Then found = True
|
||||
End If
|
||||
|
||||
Case 7
|
||||
'NCTS: Cancellation decision CC009A
|
||||
If Not found And cNCTSPartnerWorker.cMAVIGetMsgType.isTRNCTS_AbbruchXML_CC009A(doc) Then
|
||||
If cMAVIWorker.readNCTS_AbbruchXML_CC009A(PARTNERSYSTEM, Me, doc, nr_id) <> "" Then found = True
|
||||
End If
|
||||
Case 8
|
||||
'NCTS: Declaration rejected CC016A
|
||||
If Not found And cNCTSPartnerWorker.cMAVIGetMsgType.isTRNCTS_RueckweisungXML_CC016A(doc) Then
|
||||
If cMAVIWorker.readNCTS_RueckweisungXML_CC016A(PARTNERSYSTEM, Me, doc, nr_id) <> "" Then found = True
|
||||
End If
|
||||
Case 9
|
||||
'NCTS: No release for transit – type B CC051B
|
||||
If Not found And cNCTSPartnerWorker.cMAVIGetMsgType.isTRNCTS_KeineFreigabeXML_CC051B(doc) Then
|
||||
If cMAVIWorker.readNCTS_KeineFreigabeXML_CC051B(PARTNERSYSTEM, Me, doc, nr_id) <> "" Then found = True
|
||||
End If
|
||||
|
||||
|
||||
Case 10
|
||||
NACHRICHTENTYP_notfound = True ' alle nciht zu verarbeitenden
|
||||
End Select
|
||||
End If
|
||||
|
||||
|
||||
Dim destPath = ""
|
||||
If found Then
|
||||
If Not IO.Directory.Exists(ZIEL_PFAD & Now.Year & "\" & Now.ToString("yyyyMMdd") & "\") Then IO.Directory.CreateDirectory(ZIEL_PFAD & Now.Year & "\" & Now.ToString("yyyyMMdd") & "\")
|
||||
frmStartOptions.moveFile(d, ZIEL_PFAD & Now.Year & "\" & Now.ToString("yyyyMMdd") & "\", destPath)
|
||||
cntDatenEingelesen += 1
|
||||
Else
|
||||
If NACHRICHTENTYP_notfound Then
|
||||
frmStartOptions.moveFile(d, ERROR_PFAD, destPath) ' nciht gefunden, oder durch ERROR nicht eingearbt,.
|
||||
dsNichtErkannt += 1
|
||||
End If
|
||||
End If
|
||||
|
||||
If destPath <> "" And nr_id > 0 Then
|
||||
VERAG_PROG_ALLGEMEIN.cNCTS_TR_Nachrichten.updatePath(nr_id, destPath)
|
||||
End If
|
||||
|
||||
Me.Refresh()
|
||||
End If
|
||||
End If
|
||||
Catch ex As Exception
|
||||
VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
End Try
|
||||
Next
|
||||
|
||||
|
||||
Next
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Function getString(doc As XmlDocument) As Boolean
|
||||
If doc.HasChildNodes Then
|
||||
' If doc.GetElementsByTagName("DakosyMessageInternal").Count > 0 Then
|
||||
Dim sw = New StringWriter()
|
||||
Dim xw = New XmlTextWriter(sw)
|
||||
doc.WriteTo(xw)
|
||||
Dim XmlString = sw.ToString()
|
||||
End If
|
||||
Return False
|
||||
End Function
|
||||
|
||||
|
||||
|
||||
Private Sub btnOK_Click(sender As Object, e As EventArgs) Handles btnOK.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
Private Sub btn_Click(sender As Object, e As EventArgs) Handles btn.Click
|
||||
Me.Close()
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Sub addDGVEinarbeitung(art, BezugsNr)
|
||||
dgvEinarbeitung.Rows.Add(art, BezugsNr)
|
||||
Try
|
||||
dgvEinarbeitung.FirstDisplayedScrollingRowIndex = dgvEinarbeitung.RowCount - 1
|
||||
Catch ex As Exception
|
||||
End Try
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Function readPLOSE_Detail(d As String) As String
|
||||
' Try
|
||||
' readPLOSE_Detail = ""
|
||||
' Dim KdnR = ""
|
||||
|
||||
' Using MyReader As New Microsoft.VisualBasic.FileIO.TextFieldParser(d, Encoding.UTF8)
|
||||
' MyReader.TextFieldType = FileIO.FieldType.Delimited
|
||||
' MyReader.SetDelimiters(";")
|
||||
' Dim currentRow As String()
|
||||
|
||||
' Dim cnt = 0
|
||||
' If True Then
|
||||
|
||||
' While Not MyReader.EndOfData
|
||||
' Try
|
||||
' currentRow = MyReader.ReadFields()
|
||||
|
||||
|
||||
' If currentRow.Length > 24 Then
|
||||
' Dim PLOSE As New cNCTSPartnerWorker.cPLOSE
|
||||
|
||||
|
||||
' PLOSE.plose_Datensatztyp = SQL.isleernothing(currentRow(0))
|
||||
' PLOSE.plose_KodexMautTankstelle = SQL.isleernothing(currentRow(1))
|
||||
' PLOSE.plose_BeschreibungMautTankstelle = SQL.isleernothing(currentRow(2))
|
||||
' PLOSE.plose_KodexEinfahrt = SQL.isleernothing(currentRow(3))
|
||||
' PLOSE.plose_BeschreibungEinfahrt = SQL.isleernothing(currentRow(4))
|
||||
' PLOSE.plose_KodexAusfahrt = SQL.isleernothing(currentRow(5))
|
||||
' PLOSE.plose_BeschreibungAusfahrt = SQL.isleernothing(currentRow(6))
|
||||
' PLOSE.plose_Kartenkodex = SQL.isleernothing(currentRow(7))
|
||||
' PLOSE.plose_Kontonummer = SQL.isleernothing(currentRow(8))
|
||||
' PLOSE.plose_NummerKarteGeraet = SQL.isleernothing(currentRow(9))
|
||||
' PLOSE.plose_Kennzeichen = SQL.isleernothing(currentRow(10))
|
||||
' PLOSE.plose_InterneNrFahrzeug = SQL.isleernothing(currentRow(11))
|
||||
' PLOSE.plose_POLSEKundennummer = SQL.isleernothing(currentRow(12))
|
||||
' PLOSE.plose_Firmenname = SQL.isleernothing(currentRow(13))
|
||||
' PLOSE.plose_DatumTransaktion = SQL.isleernothingDateFormatstring(currentRow(14))
|
||||
' PLOSE.plose_Produktbeschreibung = SQL.isleernothing(currentRow(15))
|
||||
' PLOSE.plose_Menge = SQL.isNullNothingDbl(currentRow(16))
|
||||
' PLOSE.plose_Preis = SQL.isNullNothingDbl(currentRow(17))
|
||||
' PLOSE.Einheitsrabatt = SQL.isleernothing(currentRow(18))
|
||||
' PLOSE.plose_NettobetragTransaktion = SQL.isNullNothingDbl(currentRow(19))
|
||||
' PLOSE.plose_MWSTBetrag = SQL.isNullNothingDbl(currentRow(20))
|
||||
' PLOSE.plose_BruttobetragTransaktion = SQL.isNullNothingDbl(currentRow(21))
|
||||
' PLOSE.plose_NettobetragWaehrungAbbuchung = SQL.isNullNothingDbl(currentRow(22))
|
||||
' PLOSE.plose_MWSTBetragWaehrungAbbuchung = SQL.isNullNothingDbl(currentRow(23))
|
||||
' PLOSE.plose_BruttobetragWaehrungAbbuchung = SQL.isNullNothingDbl(currentRow(24))
|
||||
' PLOSE.plose_WaehrungLandDiesntleistung = SQL.isleernothing(currentRow(25))
|
||||
' PLOSE.plose_WaehrungAbbuchung = SQL.isleernothing(currentRow(26))
|
||||
' PLOSE.plose_DokumentNrQuittungUhrzeit = SQL.isleernothing(currentRow(27))
|
||||
' PLOSE.plose_ArtTransaktion = SQL.isleernothing(currentRow(28))
|
||||
' PLOSE.plose_Fahrzeugklasse = SQL.isleernothing(currentRow(29))
|
||||
' PLOSE.plose_KlassenidentifikationEURO = SQL.isleernothing(currentRow(30))
|
||||
' PLOSE.plose_ProduktbeschreibungShort = SQL.isleernothing(currentRow(31))
|
||||
' PLOSE.plose_DokumentNrQuittungUhrzeit = SQL.isleernothing(currentRow(32))
|
||||
' PLOSE.plose_Geraetetyp = SQL.isleernothing(currentRow(33))
|
||||
' PLOSE.plose_ProduktCode = SQL.isleernothing(currentRow(34))
|
||||
' PLOSE.plose_ReferenzenBuchungMaut = SQL.isleernothing(currentRow(35))
|
||||
|
||||
' ''''''''''''
|
||||
' If PLOSE.SAVE() Then
|
||||
|
||||
' End If
|
||||
|
||||
' End If
|
||||
|
||||
' cnt += 1
|
||||
|
||||
' 'For Each currentField In currentRow
|
||||
' 'Next
|
||||
' Catch ex As Exception
|
||||
' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
' End Try
|
||||
' End While
|
||||
|
||||
|
||||
' 'Label30.Text = (cnt + 1) & " / " & LineCount
|
||||
' 'Label31.Visible = True
|
||||
' readPLOSE_Detail = "Zeilen: " & cnt
|
||||
' Else
|
||||
' MsgBox("FEHLER beim Löschen der vorhandenen OP-Liste.")
|
||||
' End If
|
||||
' End Using
|
||||
|
||||
|
||||
|
||||
|
||||
' Try
|
||||
' ' System.IO.File.Delete(p)
|
||||
' Catch ex As Exception
|
||||
' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
' End Try
|
||||
|
||||
' addDGVEinarbeitung("PLOSE: Detail" & KdnR, readPLOSE_Detail)
|
||||
|
||||
' ' End Using
|
||||
|
||||
' 'End If
|
||||
|
||||
' Catch ex As Exception
|
||||
' VERAG_PROG_ALLGEMEIN.cErrorHandler.ERR(ex.Message, ex.StackTrace & vbNewLine & "Datei: " & Dateiname, System.Reflection.MethodInfo.GetCurrentMethod.Name)
|
||||
' MsgBox(ex.StackTrace & ex.Message)
|
||||
' readPLOSE_Detail = ""
|
||||
' End Try
|
||||
End Function
|
||||
|
||||
|
||||
Private Sub dgvEinarbeitung_SelectionChanged(sender As Object, e As EventArgs) Handles dgvEinarbeitung.SelectionChanged
|
||||
dgvEinarbeitung.ClearSelection()
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Private Sub frmTCNachrichtenVerarbeitung_Shown(sender As Object, e As EventArgs) Handles Me.Shown
|
||||
If allowClose Then
|
||||
Me.Refresh()
|
||||
|
||||
Button2.PerformClick()
|
||||
Button1.PerformClick()
|
||||
|
||||
System.Threading.Thread.Sleep(2000)
|
||||
|
||||
Me.Close()
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub pnl_Paint(sender As Object, e As PaintEventArgs) Handles pnl.Paint
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
96
initATLASAufschubkonten/frmStartOptions.Designer.vb
generated
96
initATLASAufschubkonten/frmStartOptions.Designer.vb
generated
@@ -172,6 +172,13 @@ Partial Class frmStartOptions
|
||||
Me.lklAufschubkontenATLASEZOLL = New System.Windows.Forms.LinkLabel()
|
||||
Me.lblRoutineManager = New System.Windows.Forms.Label()
|
||||
Me.txtGJ_UNISPED = New VERAG_PROG_ALLGEMEIN.MyTextBox()
|
||||
Me.TabPage4 = New System.Windows.Forms.TabPage()
|
||||
Me.LinkLabel41 = New System.Windows.Forms.LinkLabel()
|
||||
Me.LinkLabel42 = New System.Windows.Forms.LinkLabel()
|
||||
Me.Label23 = New System.Windows.Forms.Label()
|
||||
Me.LinkLabel43 = New System.Windows.Forms.LinkLabel()
|
||||
Me.LinkLabel44 = New System.Windows.Forms.LinkLabel()
|
||||
Me.Label24 = New System.Windows.Forms.Label()
|
||||
Me.pnl.SuspendLayout()
|
||||
CType(Me.piceZollAnh, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.tbcntr.SuspendLayout()
|
||||
@@ -197,6 +204,7 @@ Partial Class frmStartOptions
|
||||
CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.PictureBox10, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).BeginInit()
|
||||
Me.TabPage4.SuspendLayout()
|
||||
Me.SuspendLayout()
|
||||
'
|
||||
'pnl
|
||||
@@ -756,6 +764,7 @@ Partial Class frmStartOptions
|
||||
Me.tbcntr.Controls.Add(Me.TabPage1)
|
||||
Me.tbcntr.Controls.Add(Me.TabPage2)
|
||||
Me.tbcntr.Controls.Add(Me.TabPage3)
|
||||
Me.tbcntr.Controls.Add(Me.TabPage4)
|
||||
Me.tbcntr.Dock = System.Windows.Forms.DockStyle.Bottom
|
||||
Me.tbcntr.Location = New System.Drawing.Point(0, 404)
|
||||
Me.tbcntr.Name = "tbcntr"
|
||||
@@ -2101,6 +2110,84 @@ Partial Class frmStartOptions
|
||||
Me.txtGJ_UNISPED.Size = New System.Drawing.Size(53, 20)
|
||||
Me.txtGJ_UNISPED.TabIndex = 68
|
||||
'
|
||||
'TabPage4
|
||||
'
|
||||
Me.TabPage4.Controls.Add(Me.LinkLabel41)
|
||||
Me.TabPage4.Controls.Add(Me.LinkLabel42)
|
||||
Me.TabPage4.Controls.Add(Me.Label23)
|
||||
Me.TabPage4.Controls.Add(Me.LinkLabel43)
|
||||
Me.TabPage4.Controls.Add(Me.LinkLabel44)
|
||||
Me.TabPage4.Controls.Add(Me.Label24)
|
||||
Me.TabPage4.Location = New System.Drawing.Point(4, 22)
|
||||
Me.TabPage4.Name = "TabPage4"
|
||||
Me.TabPage4.Size = New System.Drawing.Size(851, 395)
|
||||
Me.TabPage4.TabIndex = 3
|
||||
Me.TabPage4.Text = "Asfinag"
|
||||
Me.TabPage4.UseVisualStyleBackColor = True
|
||||
'
|
||||
'LinkLabel41
|
||||
'
|
||||
Me.LinkLabel41.AutoSize = True
|
||||
Me.LinkLabel41.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.LinkLabel41.Location = New System.Drawing.Point(17, 165)
|
||||
Me.LinkLabel41.Name = "LinkLabel41"
|
||||
Me.LinkLabel41.Size = New System.Drawing.Size(82, 13)
|
||||
Me.LinkLabel41.TabIndex = 35
|
||||
Me.LinkLabel41.TabStop = True
|
||||
Me.LinkLabel41.Text = "Black-List (TBL)"
|
||||
'
|
||||
'LinkLabel42
|
||||
'
|
||||
Me.LinkLabel42.AutoSize = True
|
||||
Me.LinkLabel42.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.LinkLabel42.Location = New System.Drawing.Point(17, 140)
|
||||
Me.LinkLabel42.Name = "LinkLabel42"
|
||||
Me.LinkLabel42.Size = New System.Drawing.Size(87, 13)
|
||||
Me.LinkLabel42.TabIndex = 34
|
||||
Me.LinkLabel42.TabStop = True
|
||||
Me.LinkLabel42.Text = "White-List (TWL)"
|
||||
'
|
||||
'Label23
|
||||
'
|
||||
Me.Label23.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label23.Location = New System.Drawing.Point(17, 113)
|
||||
Me.Label23.Name = "Label23"
|
||||
Me.Label23.Size = New System.Drawing.Size(296, 16)
|
||||
Me.Label23.TabIndex = 33
|
||||
Me.Label23.Text = "Export"
|
||||
'
|
||||
'LinkLabel43
|
||||
'
|
||||
Me.LinkLabel43.AutoSize = True
|
||||
Me.LinkLabel43.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.LinkLabel43.Location = New System.Drawing.Point(17, 68)
|
||||
Me.LinkLabel43.Name = "LinkLabel43"
|
||||
Me.LinkLabel43.Size = New System.Drawing.Size(102, 13)
|
||||
Me.LinkLabel43.TabIndex = 32
|
||||
Me.LinkLabel43.TabStop = True
|
||||
Me.LinkLabel43.Text = "Contractdaten (CLF)"
|
||||
'
|
||||
'LinkLabel44
|
||||
'
|
||||
Me.LinkLabel44.AutoSize = True
|
||||
Me.LinkLabel44.LinkColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(54, Byte), Integer), CType(CType(128, Byte), Integer))
|
||||
Me.LinkLabel44.Location = New System.Drawing.Point(17, 43)
|
||||
Me.LinkLabel44.Name = "LinkLabel44"
|
||||
Me.LinkLabel44.Size = New System.Drawing.Size(126, 13)
|
||||
Me.LinkLabel44.TabIndex = 31
|
||||
Me.LinkLabel44.TabStop = True
|
||||
Me.LinkLabel44.Text = "Transaktionsdaten (TTR)"
|
||||
'
|
||||
'Label24
|
||||
'
|
||||
Me.Label24.AutoSize = True
|
||||
Me.Label24.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
|
||||
Me.Label24.Location = New System.Drawing.Point(17, 16)
|
||||
Me.Label24.Name = "Label24"
|
||||
Me.Label24.Size = New System.Drawing.Size(42, 13)
|
||||
Me.Label24.TabIndex = 30
|
||||
Me.Label24.Text = "Import"
|
||||
'
|
||||
'frmStartOptions
|
||||
'
|
||||
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
|
||||
@@ -2143,6 +2230,8 @@ Partial Class frmStartOptions
|
||||
CType(Me.PictureBox11, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.PictureBox10, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
CType(Me.PictureBox9, System.ComponentModel.ISupportInitialize).EndInit()
|
||||
Me.TabPage4.ResumeLayout(False)
|
||||
Me.TabPage4.PerformLayout()
|
||||
Me.ResumeLayout(False)
|
||||
|
||||
End Sub
|
||||
@@ -2294,4 +2383,11 @@ Partial Class frmStartOptions
|
||||
Friend WithEvents LinkLabel40 As LinkLabel
|
||||
Friend WithEvents Label22 As Label
|
||||
Friend WithEvents cbxVermerk As CheckBox
|
||||
Friend WithEvents TabPage4 As TabPage
|
||||
Friend WithEvents LinkLabel41 As LinkLabel
|
||||
Friend WithEvents LinkLabel42 As LinkLabel
|
||||
Friend WithEvents Label23 As Label
|
||||
Friend WithEvents LinkLabel43 As LinkLabel
|
||||
Friend WithEvents LinkLabel44 As LinkLabel
|
||||
Friend WithEvents Label24 As Label
|
||||
End Class
|
||||
|
||||
Reference in New Issue
Block a user