AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Compras no modificar porcentaje de iva si la Factura no tiene Iva

Browse Source
This commit is contained in:
rakcsle
2022-06-23 11:22:36 -07:00
parent 2b50e557e1
commit 83fe34a94b
3 changed files with 44 additions and 16 deletions
Download Patch File Download Diff File Expand all files Collapse all files

17
Agropecuaria/CierreCultivo.aspx
View File

@@ -47,6 +47,13 @@
DataTextField="Temporada" DataValueField="CveTemporada">
</asp:DropDownList>
</div>
<div class="col-md-1 truncate"><asp:Label runat="server" ID="LblSubProyecto"></asp:Label></div>
<div class="col-md-2">
<asp:DropDownList ID="DdlSubProyectoCierreCultivo" runat="server" Width="100%" CssClass="form-control select2me" DataTextField="SubProyecto" DataValueField="CveSubProyecto"></asp:DropDownList>
</div>
</div>
@@ -95,15 +102,7 @@
</div>
<div class="modal-body">
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlModalSubProyectoCierreCultivo" runat="server" Width="100%" CssClass="form-control select2me" DataTextField="SubProyecto" DataValueField="CveSubProyecto">
</asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlSubProyecto" runat="server" CssClass="help-block errorimput" InitialValue="-1" ControlToValidate="DdlModalSubProyectoCierreCultivo" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Sub Proyecto''</b> es necesario, por favor ingréselo." ValidationGroup="GpoModalCerrarCultivo"></asp:RequiredFieldValidator>
<label for="<%= DdlModalSubProyectoCierreCultivo.ClientID.ToString()%>"><asp:Label ID="LblMoldalSubProyectoCierreCultivo" runat="server"></asp:Label></label>
<i></i>
</div>
<div class="form-group form-md-line-input input-iconright">

7
Agropecuaria/CierreCultivo.aspx.vb
View File

@@ -18,6 +18,9 @@ Partial Class Agrupecuaria_CierreCultivo
End Set
End Property
Private Sub Agrupecuaria_CierreCultivo_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
CargaCombos()
@@ -39,7 +42,7 @@ Partial Class Agrupecuaria_CierreCultivo
UpFiltros.Update()
CargarCentrosDeCosto(Nothing, DdlModalSubProyectoCierreCultivo, Nothing, LblMoldalSubProyectoCierreCultivo, "Seleccione Uno")
CargarCentrosDeCosto(Nothing, DdlSubProyectoCierreCultivo, Nothing, LblSubProyecto, "Seleccione Uno")
End Sub
@@ -107,6 +110,8 @@ Partial Class Agrupecuaria_CierreCultivo
Dim CvePrePoliza As Integer = -1
Dim ErrorProceso As Boolean = False
Dim CveSubProyecto As Integer = DdlSubProyectoCierreCultivo.SelectedValue.ToEntero
Dim ImporteCierre As Decimal = DT_Datos_Cierre.SUMD("Importe")