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

Ventas modal con dos opciones, Clientes carga tab conrtatos, rh columna subproyecto configurda y drops cambiar seleccione uno por todos

Browse Source
This commit is contained in:
rakcsle
2021-10-05 17:44:32 -07:00
parent a1054797c4
commit 6d5f793b45
10 changed files with 763 additions and 134 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
Ventas/Clientes.aspx
View File

@@ -3389,7 +3389,7 @@
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel runat="server" ID="TabContratos" HeaderText="Contratos" Visible="false">
<ajax:TabPanel runat="server" ID="TabContratos" HeaderText="Contratos" Visible="true">
<ContentTemplate>
<div class="portlet light xspadding bordered">
@@ -3415,6 +3415,8 @@
<asp:UpdatePanel ID="UpDatosAvance" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:Button ID="BtnCargaContratos" runat="server" ClientIDMode="Static" Text="CargaCuentas" Style="display: none;" OnClick="BtnCargaContratos_Click" />
<div id="dvCa" style="width: 100%; top: 30px">
<table id="dTable" class="table Widthall ">
<tr>
@@ -6559,6 +6561,8 @@
$("#C_Tab_TabAnticipos_tab").click(function () { CargaAnticipos(); });
//CARGA BANCOS
$("#C_Tab_TabBancos_tab").click(function () { CargaBancos(); });
//CARGA CONTRATOS
$("#C_Tab_TabContratos_tab").click(function () { CargaContratos(); });
}
}
@@ -6750,6 +6754,11 @@
$('#BtnHistorialVentas').click();
}
function CargaContratos() {
$('#BtnCargaContratos').click();
}
function LimpiaModal() {
$('#<%= TxtEnvioDireccion.ClientID %>').val('');
$('#<%= TxtEnvioNoExt.ClientID %>').val('');

19
Ventas/Clientes.aspx.vb
View File

@@ -5587,6 +5587,10 @@ Partial Class Clientes
#End Region
#Region "C O N T R A T O S"
Private Sub CargaDatosContrato()
If CveCliente <= 0 Then
Exit Sub
@@ -5610,9 +5614,9 @@ Partial Class Clientes
UpContratosInactivos.DataBind()
If GvDatosAvance.Rows.Count > 0 Or GvContratosClienteInactivos.Rows.Count > 0 Then
TabContratos.Visible = True
End If
'If GvDatosAvance.Rows.Count > 0 Or GvContratosClienteInactivos.Rows.Count > 0 Then
' TabContratos.Visible = True
'End If
End Sub
Private Sub GvDatosAvance_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDatosAvance.RowDataBound
@@ -10672,5 +10676,14 @@ Partial Class Clientes
UpDatos.Update()
End If
End Sub
Protected Sub BtnCargaContratos_Click(sender As Object, e As EventArgs)
If CveCliente > 0 Then
CargaDatosContrato()
UpDatos.Update()
End If
End Sub
End Class

22
Ventas/Ventas.aspx.vb
View File

@@ -2044,6 +2044,7 @@ Partial Class Ventas
#End Region
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
Modalidad = ""
Opcion = ""
@@ -8765,8 +8766,25 @@ Partial Class Ventas
'MUESTA ALERT OK
' si es elrol 1165-Ventas,EMp:80, o la empresa 119, recarga ventas, para seguir registrando-.
Dim Liga = If(UsuarioActual.CveRol = 1165 Or UsuarioActual.CveEmpresa = 119, "document.location.href=""/Ventas/Ventas.aspx?CveVenta=-1"";", If(CveEmpresaCRM > 0, $"document.location.href=""/CRM/EmpresaCRM.aspx?CveEmpresaCRM={CveEmpresaCRM}"";", $"document.location.href=""/Ventas/Ventas.aspx?CveVenta=-1"";"))
Alert(MensajeAlert.ToString(), TipoMensaje.MsgInformacion, Liga)
'Dim Liga = If(UsuarioActual.CveRol = 1165 Or UsuarioActual.CveEmpresa = 119, "document.location.href=""/Ventas/Ventas.aspx?CveVenta=-1"";", If(CveEmpresaCRM > 0, $"document.location.href=""/CRM/EmpresaCRM.aspx?CveEmpresaCRM={CveEmpresaCRM}"";", $"document.location.href=""/Ventas/Ventas.aspx?CveVenta=-1"";"))
'Alert(MensajeAlert.ToString(), TipoMensaje.MsgInformacion, Liga)
Dim Liga As String = ""
Dim Liga2 As String = ""
If Request("CveCliente") IsNot Nothing AndAlso Request("CveCliente").ToEntero > 0 Then
Liga = $"document.location.href=""/Ventas/Ventas.aspx?CveCliente={Request("CveCliente")}"";"
Else
Liga = "document.location.href=""/Ventas/Ventas.aspx?CveVenta=-1"";"
End If
If CveEmpresaCRM > 0 Then
Liga2 = $"document.location.href=""/CRM/EmpresaCRM.aspx?CveEmpresaCRM={CveEmpresaCRM}"";"
Else
Liga2 = $"document.location.href=""/Ventas/Clientes.aspx?CveCliente={CveCliente}"";"
End If
Alert(MensajeAlert.ToString(), TipoMensaje.MsgVentasDosBotones, Liga, TextoConfirmacion:="Seguir Registrando", TextoSegundoBoton:="Ir al Cliente", JSBtn2:=Liga2)
MensajeAlert.Clear()