j13 y j14

2020-05-06 18:18:29 -05:00 · 2020-05-06 18:18:29 -05:00 · 77329904b3
commit 77329904b3
parent 7313774880
18 changed files with 183 additions and 30 deletions
--- a/Cliente/v15/.suo
+++ b/Cliente/v15/.suo
--- a/Cliente/v15/Server/sqlite3/storage.ide
+++ b/Cliente/v15/Server/sqlite3/storage.ide
--- a/Actualizadores/frmParam.Designer.vb
+++ b/Actualizadores/frmParam.Designer.vb
@ -44,6 +44,10 @@ Partial Class frmParam
        Me.panel3 = New System.Windows.Forms.Panel()
        Me.Label5 = New System.Windows.Forms.Label()
        Me.lblFooter = New System.Windows.Forms.Label()
+        Me.btnGuardarCarteras = New System.Windows.Forms.Button()
+        Me.txtRutaCarteras = New System.Windows.Forms.TextBox()
+        Me.btnRutaCarteras = New System.Windows.Forms.Button()
+        Me.Label6 = New System.Windows.Forms.Label()
        Me.GroupBox1.SuspendLayout()
        Me.panel2.SuspendLayout()
        CType(Me.Img_logoCabecera, System.ComponentModel.ISupportInitialize).BeginInit()
@ -108,7 +112,7 @@ Partial Class frmParam
        Me.BTCerrar.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
        Me.BTCerrar.ForeColor = System.Drawing.Color.White
        Me.BTCerrar.ImageAlign = System.Drawing.ContentAlignment.BottomCenter
-        Me.BTCerrar.Location = New System.Drawing.Point(562, 171)
+        Me.BTCerrar.Location = New System.Drawing.Point(562, 205)
        Me.BTCerrar.Name = "BTCerrar"
        Me.BTCerrar.Size = New System.Drawing.Size(106, 29)
        Me.BTCerrar.TabIndex = 6
@ -128,6 +132,10 @@ Partial Class frmParam
        'GroupBox1
        '
        Me.GroupBox1.BackColor = System.Drawing.Color.White
+        Me.GroupBox1.Controls.Add(Me.btnGuardarCarteras)
+        Me.GroupBox1.Controls.Add(Me.txtRutaCarteras)
+        Me.GroupBox1.Controls.Add(Me.btnRutaCarteras)
+        Me.GroupBox1.Controls.Add(Me.Label6)
        Me.GroupBox1.Controls.Add(Me.btnGuardarPreocupantes)
        Me.GroupBox1.Controls.Add(Me.btnGuardarInusuales)
        Me.GroupBox1.Controls.Add(Me.btnGuardarRelevantes)
@ -146,7 +154,7 @@ Partial Class frmParam
        Me.GroupBox1.Controls.Add(Me.Label1)
        Me.GroupBox1.Location = New System.Drawing.Point(12, 66)
        Me.GroupBox1.Name = "GroupBox1"
-        Me.GroupBox1.Size = New System.Drawing.Size(691, 205)
+        Me.GroupBox1.Size = New System.Drawing.Size(691, 241)
        Me.GroupBox1.TabIndex = 8
        Me.GroupBox1.TabStop = False
        '
@ -277,36 +285,37 @@ Partial Class frmParam
        '
        Me.desHeader.AutoSize = True
        Me.desHeader.BackColor = System.Drawing.Color.Transparent
-        Me.desHeader.Font = New System.Drawing.Font("Century Gothic", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.desHeader.Font = New System.Drawing.Font("Microsoft Sans Serif", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.desHeader.ForeColor = System.Drawing.SystemColors.Window
        Me.desHeader.Location = New System.Drawing.Point(21, 8)
        Me.desHeader.Name = "desHeader"
-        Me.desHeader.Size = New System.Drawing.Size(151, 22)
+        Me.desHeader.Size = New System.Drawing.Size(143, 24)
        Me.desHeader.TabIndex = 2
        Me.desHeader.Text = "Reportes CNBV"
        '
        'panel3
        '
-        Me.panel3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left) _
+        Me.panel3.Anchor = CType(((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Left) _
            Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.panel3.BackColor = System.Drawing.Color.Black
        Me.panel3.Controls.Add(Me.Label5)
        Me.panel3.Controls.Add(Me.lblFooter)
        Me.panel3.ForeColor = System.Drawing.Color.Navy
-        Me.panel3.Location = New System.Drawing.Point(3, 294)
+        Me.panel3.Location = New System.Drawing.Point(3, 313)
        Me.panel3.Name = "panel3"
        Me.panel3.Size = New System.Drawing.Size(715, 33)
        Me.panel3.TabIndex = 361
        '
        'Label5
        '
+        Me.Label5.Anchor = CType((System.Windows.Forms.AnchorStyles.Bottom Or System.Windows.Forms.AnchorStyles.Right), System.Windows.Forms.AnchorStyles)
        Me.Label5.AutoSize = True
        Me.Label5.BackColor = System.Drawing.Color.Transparent
-        Me.Label5.Font = New System.Drawing.Font("Century Gothic", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.Label5.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label5.ForeColor = System.Drawing.SystemColors.Window
-        Me.Label5.Location = New System.Drawing.Point(649, 5)
+        Me.Label5.Location = New System.Drawing.Point(649, 8)
        Me.Label5.Name = "Label5"
-        Me.Label5.Size = New System.Drawing.Size(42, 17)
+        Me.Label5.Size = New System.Drawing.Size(41, 15)
        Me.Label5.TabIndex = 3
        Me.Label5.Text = "Minds"
        '
@ -314,20 +323,63 @@ Partial Class frmParam
        '
        Me.lblFooter.AutoSize = True
        Me.lblFooter.BackColor = System.Drawing.Color.Transparent
-        Me.lblFooter.Font = New System.Drawing.Font("Century Gothic", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.lblFooter.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.lblFooter.ForeColor = System.Drawing.SystemColors.Window
        Me.lblFooter.Location = New System.Drawing.Point(1019, 7)
        Me.lblFooter.Name = "lblFooter"
-        Me.lblFooter.Size = New System.Drawing.Size(42, 17)
+        Me.lblFooter.Size = New System.Drawing.Size(41, 15)
        Me.lblFooter.TabIndex = 2
        Me.lblFooter.Text = "Minds"
        '
+        'btnGuardarCarteras
+        '
+        Me.btnGuardarCarteras.BackColor = System.Drawing.Color.Black
+        Me.btnGuardarCarteras.Enabled = False
+        Me.btnGuardarCarteras.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!)
+        Me.btnGuardarCarteras.ForeColor = System.Drawing.Color.White
+        Me.btnGuardarCarteras.ImageAlign = System.Drawing.ContentAlignment.BottomCenter
+        Me.btnGuardarCarteras.Location = New System.Drawing.Point(562, 169)
+        Me.btnGuardarCarteras.Name = "btnGuardarCarteras"
+        Me.btnGuardarCarteras.Size = New System.Drawing.Size(106, 32)
+        Me.btnGuardarCarteras.TabIndex = 19
+        Me.btnGuardarCarteras.Text = "Aceptar"
+        Me.btnGuardarCarteras.UseVisualStyleBackColor = False
+        '
+        'txtRutaCarteras
+        '
+        Me.txtRutaCarteras.Enabled = False
+        Me.txtRutaCarteras.Location = New System.Drawing.Point(189, 176)
+        Me.txtRutaCarteras.Name = "txtRutaCarteras"
+        Me.txtRutaCarteras.Size = New System.Drawing.Size(367, 20)
+        Me.txtRutaCarteras.TabIndex = 18
+        '
+        'btnRutaCarteras
+        '
+        Me.btnRutaCarteras.BackColor = System.Drawing.Color.Black
+        Me.btnRutaCarteras.Font = New System.Drawing.Font("Microsoft Sans Serif", 9.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
+        Me.btnRutaCarteras.ForeColor = System.Drawing.Color.White
+        Me.btnRutaCarteras.Location = New System.Drawing.Point(143, 173)
+        Me.btnRutaCarteras.Name = "btnRutaCarteras"
+        Me.btnRutaCarteras.Size = New System.Drawing.Size(40, 23)
+        Me.btnRutaCarteras.TabIndex = 17
+        Me.btnRutaCarteras.Text = ". . ."
+        Me.btnRutaCarteras.UseVisualStyleBackColor = False
+        '
+        'Label6
+        '
+        Me.Label6.AutoSize = True
+        Me.Label6.Location = New System.Drawing.Point(9, 179)
+        Me.Label6.Name = "Label6"
+        Me.Label6.Size = New System.Drawing.Size(123, 13)
+        Me.Label6.TabIndex = 16
+        Me.Label6.Text = "Path Reportes J13 y J14"
+        '
        'frmParam
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.BackColor = System.Drawing.Color.White
-        Me.ClientSize = New System.Drawing.Size(712, 317)
+        Me.ClientSize = New System.Drawing.Size(712, 347)
        Me.Controls.Add(Me.panel3)
        Me.Controls.Add(Me.panel2)
        Me.Controls.Add(Me.GroupBox1)
@ -372,4 +424,8 @@ Partial Class frmParam
    Private WithEvents panel3 As Panel
    Friend WithEvents Label5 As Label
    Friend WithEvents lblFooter As Label
+    Friend WithEvents btnGuardarCarteras As Button
+    Friend WithEvents txtRutaCarteras As TextBox
+    Friend WithEvents btnRutaCarteras As Button
+    Friend WithEvents Label6 As Label
 End Class
--- a/Actualizadores/frmParam.vb
+++ b/Actualizadores/frmParam.vb
@ -2,11 +2,14 @@ Public Class frmParam
    Dim rutaAntR As String
    Dim rutaAntI As String
    Dim rutaAntP As String
+    Dim rutaAntC As String

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRutaRelevantes.Click
        FolderBrowserDialog.ShowDialog()
        txtRutaRelevantes.Text = FolderBrowserDialog.SelectedPath
        btnGuardarRelevantes.Enabled = True
+        Colores()
+
    End Sub

    Private Sub BTCerrar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BTCerrar.Click
@ -122,9 +125,11 @@ Public Class frmParam
                txtRutaRelevantes.Text = Classcom.ds.Tables(0).Rows(0).Item("rutaRelevantes")
                txtRutaInusuales.Text = Classcom.ds.Tables(0).Rows(0).Item("rutaInusuales")
                txtRutaPreocupantes.Text = Classcom.ds.Tables(0).Rows(0).Item("rutaPreocupantes")
+                txtRutaCarteras.Text = Classcom.ds.Tables(0).Rows(0).Item("rutacarteras")
                rutaAntR = txtRutaRelevantes.Text
                rutaAntI = txtRutaInusuales.Text
                rutaAntP = txtRutaPreocupantes.Text
+                rutaAntC = txtRutaCarteras.Text
            End If


@ -205,6 +210,11 @@ Public Class frmParam
        Else
            btnGuardarPreocupantes.BackColor = Color.Black
        End If
+        If btnGuardarCarteras.Enabled = False Then
+            btnGuardarCarteras.BackColor = Color.DarkGray
+        Else
+            btnGuardarCarteras.BackColor = Color.Black
+        End If
    End Sub

    Private Sub Label3_Click(sender As System.Object, e As System.EventArgs) Handles lblCveNombreSofome.Click
@ -283,4 +293,41 @@ Public Class frmParam
            MessageBox.Show("Erroral grabar Paramrep " & ex.Message, "MINDS", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try
    End Sub
+
+    Private Sub btnGuardarCarteras_Click(sender As Object, e As EventArgs) Handles btnGuardarCarteras.Click
+        Dim strSqlParam As String
+        Dim ClassCom As New clsComplejo
+
+        Try
+            ClassCom.fdtDataSet("SELECT IdOrganismoInternacional,idinstitucionFinanciera FROM ParamRep ")
+
+            If ClassCom.ds.Tables(0).Rows.Count <> 0 Then
+                'strSqlParam = " UPDATE ParamRep SET IdOrganismoInternacional = '001002',idinstitucionFinanciera = '" & Me.CbOInFinanciera.SelectedValue & "',rutainusuales = '" & TXTRutaInusuales.Text & "'"
+                strSqlParam = " UPDATE ParamRep SET rutacarteras = '" & txtRutaCarteras.Text & "'"
+                ClassCom.sbGuardaModifica(strSqlParam)
+            Else
+                strSqlParam = " INSERT INTO ParamRep (IdOrganismoInternacional,idinstitucionFinanciera,rutacarteras) VALUES ('1002','" & CbOInFinanciera.SelectedValue & "','" & txtRutaCarteras.Text & "')"
+                ClassCom.sbInserta(strSqlParam)
+            End If
+
+            btnGuardarCarteras.Enabled = False
+
+
+            Dim coneccion As New ClassMyUtils
+            coneccion.RT_Auditoria(clsVaribles.varUsuario, 129, 1, "MODIFICACIÓN DE LA RUTA REPORTES CARTERAS DE VALORES (ANTERIOR:" & rutaAntC & ", NUEVO:" & txtRutaCarteras.Text & ")")
+            rutaAntC = txtRutaCarteras.Text
+
+            Colores()
+        Catch ex As Exception
+            MessageBox.Show("Erroral grabar Paramrep " & ex.Message, "MINDS", MessageBoxButtons.OK, MessageBoxIcon.Error)
+        End Try
+    End Sub
+
+    Private Sub btnRutaCarteras_Click(sender As Object, e As EventArgs) Handles btnRutaCarteras.Click
+        FolderBrowserDialog.ShowDialog()
+        txtRutaCarteras.Text = FolderBrowserDialog.SelectedPath
+        btnGuardarCarteras.Enabled = True
+        Colores()
+
+    End Sub
 End Class
--- a/Project/AssemblyInfo.vb
+++ b/Project/AssemblyInfo.vb
@ -30,5 +30,5 @@ Imports System.Runtime.InteropServices
 ' You can specify all the values or you can default the Build and Revision Numbers 
 ' by using the '*' as shown below:

-<Assembly: AssemblyVersion("2.5.5.5")>
-<Assembly: AssemblyFileVersion("2.5.5.5")>
+<Assembly: AssemblyVersion("2.5.5.7")>
+<Assembly: AssemblyFileVersion("2.5.5.7")>
--- a/Reportes/frmReporteJ13.vb
+++ b/Reportes/frmReporteJ13.vb
@ -37,18 +37,31 @@ Public Class frmReporteJ13
        Dim SQL As String = String.Empty
        Dim idInherent As Integer
        Dim idConrolEffect As Integer
+        Dim incluyeInvalidos As Integer
        comboKey = DirectCast(cmbSemester.SelectedItem, KeyValuePair(Of String, String)).Key
        year = comboKey.Substring(0, 4)
        semester = comboKey.Substring(comboKey.Length - 1)
        canExport = False
+        btnExport.Enabled = canExport
+        btnExport.Visible = canExport
+        dgvResult.DataSource = Nothing
+        incluyeInvalidos = 0
+        Dim result As DialogResult = MessageBox.Show("¿Incluir registros sin NIC válido?",
+                              "Reporte J13",
+                              MessageBoxButtons.YesNo)
+        If result = DialogResult.Yes Then
+            incluyeInvalidos = 1
+        End If
        Try

-            SQL = "sp_Consulta_ReporteJ13 " + year + ", " + semester
+            SQL = "sp_Consulta_ReporteJ13 " + year + ", " + semester + ", " + incluyeInvalidos.ToString
            Dim dsGral As DataSet = Classcom.fdtDataSet(SQL)
            If dsGral.Tables.Count = 0 Then
                MessageBox.Show("No existen registros para el semestre seleccionado")
+                Exit Sub
            ElseIf dsGral.Tables(0).Rows.Count = 0 Then
                MessageBox.Show("No existen registros para el semestre seleccionado")
+                Exit Sub
            Else
                canExport = True
            End If
@ -62,12 +75,24 @@ Public Class frmReporteJ13

    Private Sub btnExport_Click(sender As Object, e As EventArgs) Handles btnExport.Click
        Dim fileName As String = year.ToString + "_" + semester.ToString + "_ R03 J-0313.txt"
+        Dim repDirectory As String = ""
+        Dim fullPath As String = fileName
        Dim sr As StreamWriter
        Dim strDelimiter As String = ";"
        Dim intColumnCount As Integer = dgvResult.Columns.Count - 1
        Dim strRowData As String = ""
+        Dim Classcom As New clsComplejo
+
        Try
-            sr = File.CreateText(fileName)
+            Classcom.fdtDataSet("SELECT * FROM ParamRep")
+            If Classcom.ds.Tables(0).Rows.Count <> 0 Then
+                repDirectory = Classcom.ds.Tables(0).Rows(0).Item("rutacarteras").ToString()
+                If Directory.Exists(repDirectory) = False Then ' si no existe la carpeta se crea
+                    Directory.CreateDirectory(repDirectory)
+                End If
+                fullPath = repDirectory & "\" & fileName
+            End If
+            sr = File.CreateText(fullPath)
            For intX As Integer = 0 To dgvResult.Rows.Count - 1
                strRowData = ""
                For intRowData As Integer = 0 To intColumnCount
--- a/Reportes/frmReporteJ14.vb
+++ b/Reportes/frmReporteJ14.vb
@ -11,18 +11,32 @@ Public Class frmReporteJ14
        Dim SQL As String = String.Empty
        Dim idInherent As Integer
        Dim idConrolEffect As Integer
+        Dim incluyeInvalidos As Integer
        comboKey = DirectCast(cmbQuarter.SelectedItem, KeyValuePair(Of String, String)).Key
        year = comboKey.Substring(0, 4)
        quarter = comboKey.Substring(comboKey.Length - 1)
        canExport = False
+        btnExport.Enabled = canExport
+        btnExport.Visible = canExport
+        dgvResult.DataSource = Nothing
+        incluyeInvalidos = 0
+        Dim result As DialogResult = MessageBox.Show("¿Incluir registros sin NIC válido?",
+                              "Reporte J14",
+                              MessageBoxButtons.YesNo)
+        If result = DialogResult.Yes Then
+            incluyeInvalidos = 1
+        End If
+
        Try

-            SQL = "sp_Consulta_ReporteJ14 " + year + ", " + quarter
+            SQL = "sp_Consulta_ReporteJ14 " + year + ", " + quarter + ", " + incluyeInvalidos.ToString
            Dim dsGral As DataSet = Classcom.fdtDataSet(SQL)
            If dsGral.Tables.Count = 0 Then
-                MessageBox.Show("No existen registros para el semestre seleccionado")
+                MessageBox.Show("No existen registros para el trimestre seleccionado")
+                Exit Sub
            ElseIf dsGral.Tables(0).Rows.Count = 0 Then
-                MessageBox.Show("No existen registros para el semestre seleccionado")
+                MessageBox.Show("No existen registros para el trimestre seleccionado")
+                Exit Sub
            Else
                canExport = True
            End If
@ -36,12 +50,23 @@ Public Class frmReporteJ14

    Private Sub btnExport_Click(sender As Object, e As EventArgs) Handles btnExport.Click
        Dim fileName As String = year.ToString + "_" + quarter.ToString + "_ R03 J-0314.txt"
+        Dim repDirectory As String = ""
+        Dim fullPath As String = fileName
        Dim sr As StreamWriter
        Dim strDelimiter As String = ";"
        Dim intColumnCount As Integer = dgvResult.Columns.Count - 1
        Dim strRowData As String = ""
+        Dim Classcom As New clsComplejo
        Try
-            sr = File.CreateText(fileName)
+            Classcom.fdtDataSet("SELECT * FROM ParamRep")
+            If Classcom.ds.Tables(0).Rows.Count <> 0 Then
+                repDirectory = Classcom.ds.Tables(0).Rows(0).Item("rutacarteras").ToString()
+                If Directory.Exists(repDirectory) = False Then ' si no existe la carpeta se crea
+                    Directory.CreateDirectory(repDirectory)
+                End If
+                fullPath = repDirectory & "\" & fileName
+            End If
+            sr = File.CreateText(fullPath)
            For intX As Integer = 0 To dgvResult.Rows.Count - 1
                strRowData = ""
                For intRowData As Integer = 0 To intColumnCount
--- a/CLIENTEOF.application
+++ b/CLIENTEOF.application
@ -14,7 +14,7 @@
          <dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
        </dsig:Transforms>
        <dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
-        <dsig:DigestValue>XDA0ED8wf/l3fI+NIvEsm2C8Ywc=</dsig:DigestValue>
+        <dsig:DigestValue>wp/BUmitH4XO8zkbRdDk8Ag8UQ8=</dsig:DigestValue>
      </hash>
    </dependentAssembly>
  </dependency>
--- a/CLIENTEOF.exe
+++ b/CLIENTEOF.exe
--- a/CLIENTEOF.exe.manifest
+++ b/CLIENTEOF.exe.manifest
@ -4,7 +4,7 @@
  <description asmv2:iconFile="MINDS.ico" xmlns="urn:schemas-microsoft-com:asm.v1" />
  <application />
  <entryPoint>
-    <assemblyIdentity name="MINDS CLIENTEOF" version="2.5.5.5" language="neutral" processorArchitecture="msil" />
+    <assemblyIdentity name="MINDS CLIENTEOF" version="2.5.5.7" language="neutral" processorArchitecture="msil" />
    <commandLine file="MINDS CLIENTEOF.exe" parameters="" />
  </entryPoint>
  <trustInfo>
@ -247,14 +247,14 @@
    </dependentAssembly>
  </dependency>
  <dependency>
-    <dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="MINDS CLIENTEOF.exe" size="5824512">
-      <assemblyIdentity name="MINDS CLIENTEOF" version="2.5.5.5" language="neutral" processorArchitecture="msil" />
+    <dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="MINDS CLIENTEOF.exe" size="5828608">
+      <assemblyIdentity name="MINDS CLIENTEOF" version="2.5.5.7" language="neutral" processorArchitecture="msil" />
      <hash>
        <dsig:Transforms>
          <dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
        </dsig:Transforms>
        <dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
-        <dsig:DigestValue>Js4Wcp+Y5s7qlw5GITfhusML5IM=</dsig:DigestValue>
+        <dsig:DigestValue>wzgx4YgvMegsMJ59DfVeIRlabrw=</dsig:DigestValue>
      </hash>
    </dependentAssembly>
  </dependency>
--- a/CLIENTEOF.pdb
+++ b/CLIENTEOF.pdb
--- a/CLIENTEOF_20200428.zip
+++ b/CLIENTEOF_20200428.zip
--- a/bin/app.publish/MINDS
+++ b/bin/app.publish/MINDS
--- a/CLIENTEOF.application
+++ b/CLIENTEOF.application
@ -14,7 +14,7 @@
          <dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
        </dsig:Transforms>
        <dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
-        <dsig:DigestValue>XDA0ED8wf/l3fI+NIvEsm2C8Ywc=</dsig:DigestValue>
+        <dsig:DigestValue>wp/BUmitH4XO8zkbRdDk8Ag8UQ8=</dsig:DigestValue>
      </hash>
    </dependentAssembly>
  </dependency>
--- a/obj/Debug/MINDS
+++ b/obj/Debug/MINDS
--- a/CLIENTEOF.exe.manifest
+++ b/CLIENTEOF.exe.manifest
@ -4,7 +4,7 @@
  <description asmv2:iconFile="MINDS.ico" xmlns="urn:schemas-microsoft-com:asm.v1" />
  <application />
  <entryPoint>
-    <assemblyIdentity name="MINDS CLIENTEOF" version="2.5.5.5" language="neutral" processorArchitecture="msil" />
+    <assemblyIdentity name="MINDS CLIENTEOF" version="2.5.5.7" language="neutral" processorArchitecture="msil" />
    <commandLine file="MINDS CLIENTEOF.exe" parameters="" />
  </entryPoint>
  <trustInfo>
@ -247,14 +247,14 @@
    </dependentAssembly>
  </dependency>
  <dependency>
-    <dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="MINDS CLIENTEOF.exe" size="5824512">
-      <assemblyIdentity name="MINDS CLIENTEOF" version="2.5.5.5" language="neutral" processorArchitecture="msil" />
+    <dependentAssembly dependencyType="install" allowDelayedBinding="true" codebase="MINDS CLIENTEOF.exe" size="5828608">
+      <assemblyIdentity name="MINDS CLIENTEOF" version="2.5.5.7" language="neutral" processorArchitecture="msil" />
      <hash>
        <dsig:Transforms>
          <dsig:Transform Algorithm="urn:schemas-microsoft-com:HashTransforms.Identity" />
        </dsig:Transforms>
        <dsig:DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />
-        <dsig:DigestValue>Js4Wcp+Y5s7qlw5GITfhusML5IM=</dsig:DigestValue>
+        <dsig:DigestValue>wzgx4YgvMegsMJ59DfVeIRlabrw=</dsig:DigestValue>
      </hash>
    </dependentAssembly>
  </dependency>
--- a/obj/Debug/MINDS
+++ b/obj/Debug/MINDS
--- a/Cliente.vbproj.GenerateResource.Cache
+++ b/Cliente.vbproj.GenerateResource.Cache