Observaciones 2

FRM/frmLetes.vb

@@ -376,7 +376,8 @@ Public Class frmLetes
             txtInteresAcumulado.Visible = True
             txtOtrosCostos.Visible = True
             chbValorPar.Visible = True
-
+            dtpFechaVencimiento.Enabled = True
+            txtPlazoInversion.ReadOnly = True
         Else
             Instrumento = "NADA"
         End If
@@ -1825,17 +1826,27 @@ Public Class frmLetes
         End If
 
         Dim Fechaliquidacion = dtpFechaLiquidacion.Value
-
+        Dim FechaVencimiento = dtpFechaVencimiento.Value
 
 
         If (IndexBase = 0 Or IndexBase = 2) Then
+            If VCN Then
+                txtPlazoInversion.Text = Operaciones.Base360(Fechaliquidacion, FechaVencimiento)
+            Else
+                dtpFechaVencimiento.Value = Operaciones.FechaDias360(Fechaliquidacion, Dias)
+            End If
 
 
 
-            dtpFechaVencimiento.Value = Operaciones.FechaDias360(Fechaliquidacion, Dias)
 
         ElseIf IndexBase = 1 Or IndexBase = 3 Then
-            dtpFechaVencimiento.Value = dtpFechaLiquidacion.Value.AddDays(Dias)
+            If VCN Then
+                txtPlazoInversion.Text = Operaciones.Base365(Fechaliquidacion, FechaVencimiento)
+            Else
+
+                dtpFechaVencimiento.Value = dtpFechaLiquidacion.Value.AddDays(Dias)
+            End If
+
         End If
 
     End Sub

frmPIN.designer.vb

@@ -794,6 +794,7 @@ Partial Class frmPIN
         Me.navImprimir.Name = "navImprimir"
         Me.navImprimir.Size = New System.Drawing.Size(23, 22)
         Me.navImprimir.Text = "Impresion"
+        Me.navImprimir.Visible = False
         '
         'grbInversión
         '

frmPIN.resx

@@ -133,12 +133,6 @@
   <metadata name="PIN0BindingSource4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>202, 95</value>
   </metadata>
-  <metadata name="PIN0BindingSource4.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>202, 95</value>
-  </metadata>
-  <metadata name="InversionesDEVDataSet5.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
-    <value>17, 95</value>
-  </metadata>
   <metadata name="InversionesDEVDataSet5.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
     <value>17, 95</value>
   </metadata>
@@ -220,15 +214,14 @@
   <data name="navEliminar.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
     <value>
         iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
-        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAGySURBVDhPlZM7S0JhGMePHv0ALdHQTWiIoElxE80uWx+g
-        aIkimhoajFpyCioa8nBwcmqpIYdCKgisliBoaWjrIsQRb3k93vXf+xw8ZqlpD/w4h5f3/zvP874crlb9
-        DCPD3IFhhpbRVMZsNpvw+/2VcrmMVuTzeQiCcMj2tpSYKZzJZCDLcp1kMol4PI5QKKRIgsEgRFFskmgY
-        ZtqQy+VQKBSUJ5FOp5FIJBAOhxUB6xL0EbfbrUqUqgsorEICCqRSKUQikR/jEJSpZb8FpVKpvoHeaW51
-        lGg0qnQiSVJ7wW8aJdQJnUcsFuteQKgSGofOhES03rWAKBaLyrmQhKC1fwmoi/dTF+4Xx3A9qcft/BAE
-        s0b8U0AhlYBXwJPDgpzvANXnS8jH6/BbxytXNt1aRwG1f7cwgiwLwzULbPQAOwZE9mzwTfCvbQWNEmq7
-        +uhFY8W3+7Bt11XrAqfTWW0lIW7mBpHxLAEslHdw+GQEVnlcTvMfJKAyseuR2/1Mbyf7eFgZhbRhQHhT
-        j5dlDa6tusrFlHarlucGGCYGXU1LPDO94pmdl6jtcysfOrLwuxzHcV/MWoMYH4nDLAAAAABJRU5ErkJg
-        gg==
+        YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAGxSURBVDhPlZM7S8NQGIbTpv0BLuLgFRxEcFK6ldbr5g9Q
+        XEQRJweHFl2yCSoOGkKnTi466KAUKwhVF0FwcXDzBpKSXuw1vbev5wtNrLa19YOHhMN5n3zfOYSrVjdj
+        lGFrQT/DzKir0UwmEw8EAuVSqYRG5HI5iKK4z/Y2lNgonE6noaqqQSKRQCwWg6IomiQYDEKSpDqJiWGj
+        DdlsFvl8XnsSqVQK8XgcoVBIE7AuQR/xeDy6RCtDQGEdElAgmUwiHA7/GIegTDX7LSgWi8YGeqe59VEi
+        kYjWiSzLzQW/qZVQJ3Qe0Wi0fQGhS2gcOhMS0XrbAqJQKGjnQhKC1v4loC7eTg5wtziMq0krbub7INpM
+        0p8CCum8n4p4dNmR9e2h8uSHerSOgGOkfOm0rLUUUPu3C4PIsDAOZgF3B7A1gPCOE75x/qWpoFZCbVce
+        TlFbMaELwoSlYggEQag0khDXc71Ie5cAFsq5OHwy3ld5+Kf5DxJQjbHrUZv9TK/Hu7hfGYLsHkBow4rn
+        ZROuHJbyxZR5s5rnehhjDLqahnhnOqWzCV6mts8dvHJo57c5juO+AMovgxX7frCdAAAAAElFTkSuQmCC
 </value>
   </data>
   <data name="navEliminarRegistro.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">