manifistovtascitrus

App_Code/ClsCGame.vb

@@ -3518,7 +3518,7 @@ Public Class ClsCGame
             .Add("@CveEmpresa", SqlDbType.Int).Value = cveEmpresa
             .Add("@VFechaInicio", SqlDbType.VarChar).Value = vFechaInicio
             .Add("@VFechaFin", SqlDbType.VarChar).Value = vFechaFin
-            .Add("@ErrorMostrarADS", SqlDbType.VarChar).Direction = ParameterDirection.Output
+            .Add("@ErrorMostrarADS", SqlDbType.VarChar, 500).Direction = ParameterDirection.Output
         End With
         Try
             SqlAdapter.Fill(Data)
@@ -3529,6 +3529,28 @@ Public Class ClsCGame
         Return retorno
     End Function
 
+
+    Public Function ManifiestoForVtaGet(CveEmpresa As Integer, CveUsuario As Integer, CveManifiesto As Integer) As Boolean
+        Dim retorno As Boolean = False
+        DataAdapter("PA_CGame_ManifiestoForVtaGet", CommandType.StoredProcedure)
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+            .Add("@CveManifiesto", SqlDbType.Int).Value = CveManifiesto
+
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            retorno = True
+        Catch Ex1 As SqlException
+
+            Me.OnError("Ocurrió un error al obtener datos manifiesto.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener los datos manifiesto.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+        Return retorno
+    End Function
+
     Public Function RepManifiesto_PSGet(cveManifiesto As Int32, cveEmpresa As Int32) As Boolean
         Dim retorno As Boolean = False
         DataAdapter("PA_CGame_RepManifiesto_PSGet", CommandType.StoredProcedure)

Nomina/Aguinaldo.aspx

@@ -66,7 +66,7 @@
                                 <asp:DropDownList ID="ddltipoCalculo" runat="server" CssClass="select2me" Style="width: 100% !important;">
                                     <asp:ListItem Selected="True" Text="Método del Reglamento de la Ley del Impuesto Sobre la Renta (artículo 174)" Value="1"></asp:ListItem>
                                     <asp:ListItem Text="Método de la Ley del ISR" Value="2"></asp:ListItem>
-                                    <asp:ListItem Text="Mixto(ISR Menor)" Value="3"></asp:ListItem>
+                                    <%--<asp:ListItem Text="Mixto(ISR Menor)" Value="3"></asp:ListItem>--%>
                                 </asp:DropDownList>
                             </div>
                             <div class="col-md-3">

Nomina/Aguinaldo.aspx.cs

@@ -494,6 +494,13 @@ public partial class Nomina_Aguinaldo : ClsPaginas
                         else
                         {
 
+                            totalgravado = 0; 
+                                isrtotalgravado = 0;
+                                isrmensual = 0;
+                            lisr = 0;
+
+
+
                             FraccionIV = 0;
                             Aguinaldoapagar = aguinaldo - FraccionIV;
                         }
@@ -513,6 +520,7 @@ public partial class Nomina_Aguinaldo : ClsPaginas
                     {
                         FraccionIV = lisr;
                     }
+                    Aguinaldoapagar = aguinaldo - FraccionIV;
                     Aguinaldoapagar = Aguinaldoapagar - descuento;
 
                     aguinaldogravadoSubproyeto += aguinaldogravado;