--cambios en clientes, agregar lista de precios desde boton
This commit is contained in:
@@ -731,23 +731,16 @@
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="row">
|
||||
<div class="col-md-8">
|
||||
<div id="DivTxtCrearPrecioLista" runat="server" visible="false" class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtPrecioLista" CssClass="form-control" runat="server" MaxLength="300"></asp:TextBox>
|
||||
<label for="<%= TxtPrecioLista.ClientID.ToString()%>">Precio Lista: </label>
|
||||
<i></i>
|
||||
</div>
|
||||
|
||||
<div class="col-md-10">
|
||||
<div id="DivPrecioLista" runat="server" class="form-group form-md-line-input input-iconright">
|
||||
<asp:DropDownList ID="DdlPrecioLista" runat="server" CssClass="form-control select2me" Width="100%" DataTextField="PrecioLista" DataValueField="CvePrecioLista"></asp:DropDownList>
|
||||
<label for="<%= DdlPrecioLista.ClientID.ToString()%>">Precio Lista: </label>
|
||||
<label for="<%= DdlPrecioLista.ClientID.ToString()%>">Precio Lista:</label>
|
||||
<i></i>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-4">
|
||||
<div id="DivCrearPrecioLista" runat="server" visible="false" class="form-group">
|
||||
<label>¿Crear lista?</label>
|
||||
<asp:CheckBox ID="ChkCrearPrecioLista" runat="server" CssClass="chksino" Text=" " Checked="false" OnCheckedChanged="ChkCrearPrecioLista_CheckedChanged" AutoPostBack="true" />
|
||||
<div class="col-md-2" id="DivCrearPrecioLista" runat="server" style="padding-top: 8px;" visible="false">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:LinkButton runat="server" ID="LnkAddPrecioLista" CssClass="btn btn-default btn-circle btn-sm" Text="<i class='fa fa-plus' style='color:green'></i>" OnClick="LnkAddPrecioLista_Click"></asp:LinkButton>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
@@ -4972,6 +4965,36 @@
|
||||
</div>
|
||||
<br />
|
||||
|
||||
<div id="DivAgregarPrecioLista" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog">
|
||||
<!-- Modal content-->
|
||||
<asp:UpdatePanel class="modal-content" runat="server">
|
||||
<ContentTemplate>
|
||||
<div class="modal-header ">
|
||||
<button type="button" class="close" data-dismiss="modal">×</button>
|
||||
<h4 class="modal-title">Agregar lista de precio</h4>
|
||||
</div>
|
||||
<div class="modal-body">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtPrecioLista" CssClass="form-control " runat="server" MaxLength="70" CausesValidation="true"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RFVTxtPL" runat="server" ControlToValidate="TxtPrecioLista" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Lista de precio''</b> es necesario, por favor ingréselo." ValidationGroup="GrpListaPrecio"></asp:RequiredFieldValidator>
|
||||
<label for="TxtPrecioLista">Lista de precio: </label>
|
||||
<i></i>
|
||||
</div>
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<div class="row">
|
||||
<div class="col-md-12" style="text-align: right">
|
||||
<asp:Button ID="BtnGuardarPL" runat="server" CssClass="btn btn-success" Text="Guardar" OnClick="BtnGuardarPL_Click" ValidationGroup="GrpListaPrecio"></asp:Button>
|
||||
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<%-- MODAL BITACORA --%>
|
||||
<div id="ModalBitacora" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog">
|
||||
|
||||
@@ -1438,8 +1438,6 @@ Partial Class Clientes
|
||||
TxtPagina.Text = ObjClientes.Pagina
|
||||
'TxtGiro.Text = ObjClientes.Giro
|
||||
DdlPrecioLista.SelectedValue = ObjClientes.CvePrecioLista.ToString()
|
||||
ChkCrearPrecioLista.Checked = False
|
||||
ChkCrearPrecioLista_CheckedChanged(ChkCrearPrecioLista, EventArgs.Empty)
|
||||
|
||||
TxtCC.Text = ObjClientes.NotificarA
|
||||
ChkMail.Checked = ObjClientes.EnviarFactura
|
||||
@@ -2469,14 +2467,14 @@ Partial Class Clientes
|
||||
|
||||
Dim CvePrecioLista As Integer = DdlPrecioLista.SelectedValue.ToEntero()
|
||||
|
||||
If DivCrearPrecioLista.Visible AndAlso ChkCrearPrecioLista.Checked Then
|
||||
CvePrecioListaNuevo = ObjVentas.AddPrecioLista(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, TxtPrecioLista.Text, 0)
|
||||
If CvePrecioListaNuevo > 0 Then
|
||||
CvePrecioLista = CvePrecioListaNuevo
|
||||
Else
|
||||
ErrorProceso = True
|
||||
End If
|
||||
End If
|
||||
'If DivCrearPrecioLista.Visible AndAlso ChkCrearPrecioLista.Checked Then
|
||||
' CvePrecioListaNuevo = ObjVentas.AddPrecioLista(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, TxtPrecioLista.Text, 0)
|
||||
' If CvePrecioListaNuevo > 0 Then
|
||||
' CvePrecioLista = CvePrecioListaNuevo
|
||||
' Else
|
||||
' ErrorProceso = True
|
||||
' End If
|
||||
'End If
|
||||
|
||||
If Not ErrorProceso Then
|
||||
'VERIFICA SI ES CLIENTE NUEVO O ACTUALIZACION
|
||||
@@ -2615,11 +2613,6 @@ Partial Class Clientes
|
||||
If Not ErrorProceso Then
|
||||
RecargaGlobal()
|
||||
|
||||
'RECARGA GLOBAL DE LISTA DE PRECIOS SI SE GENERO UNO NUEVO
|
||||
If CvePrecioListaNuevo > 0 Then
|
||||
GlobalDTPrecioListas(UsuarioActual.CveEmpresa) = Nothing
|
||||
End If
|
||||
|
||||
'NUEVO CLIENTE
|
||||
If CveClienteNuevo > 0 Then
|
||||
'JM 05-02-19: CRM ASIGAN CLIENTE A EMPRESACRM
|
||||
@@ -10278,14 +10271,27 @@ Partial Class Clientes
|
||||
Private Sub DdlRegimenFiscal_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlRegimenFiscal.SelectedIndexChanged
|
||||
CargaComboCFDI()
|
||||
End Sub
|
||||
Protected Sub ChkCrearPrecioLista_CheckedChanged(sender As Object, e As EventArgs)
|
||||
If UsuarioActual.CveEmpresa = 186 Then
|
||||
DivPrecioLista.Visible = Not ChkCrearPrecioLista.Checked
|
||||
DivTxtCrearPrecioLista.Visible = ChkCrearPrecioLista.Checked
|
||||
|
||||
UpDatos.Update()
|
||||
Protected Sub LnkAddPrecioLista_Click(sender As Object, e As EventArgs)
|
||||
RegistraScript("$('#DivAgregarPrecioLista').modal('show');")
|
||||
End Sub
|
||||
Protected Sub BtnGuardarPL_Click(sender As Object, e As EventArgs)
|
||||
Dim ObjVentas As New ClsVentas()
|
||||
Dim CvePrecioListaNuevo = ObjVentas.AddPrecioLista(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, TxtPrecioLista.Text, 0)
|
||||
If CvePrecioListaNuevo > 0 Then
|
||||
Alert("La lista de precio se guardo correctamente")
|
||||
RegistraScript("$('#DivAgregarPrecioLista').modal('hide');")
|
||||
Else
|
||||
Alert("Ocurrió un error al guardar la lista de precio", TipoMensaje.MsgError)
|
||||
End If
|
||||
|
||||
'RECARGA GLOBAL DE LISTA DE PRECIOS SI SE GENERO UNO NUEVO
|
||||
If CvePrecioListaNuevo > 0 Then
|
||||
GlobalDTPrecioListas(UsuarioActual.CveEmpresa) = Nothing
|
||||
|
||||
CargaPrecioLista()
|
||||
End If
|
||||
|
||||
UpDatos.Update()
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
|
||||
Reference in New Issue
Block a user