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

--Campo sucursal cobranza solo para la func 382

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2025-01-24 20:55:05 -07:00
parent 3ff2ba65e5
commit e59acdd5a5
10 changed files with 37 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
CxC/RepCxC.aspx
View File

@@ -405,10 +405,10 @@
<asp:ListItem Text="No Aseguradora" Value="0"></asp:ListItem>
</asp:DropDownList>
</div>
<div class="col-md-1 truncate" title="Sucursal de cobranza:" data-toggle="tooltip" data-placement="top">
<div class="col-md-1 truncate" title="Sucursal de cobranza:" data-toggle="tooltip" data-placement="top" id="LblSPCobranza" runat="server" visible="false">
Sucursal de cobranza:
</div>
<div class="col-md-2 ">
<div class="col-md-2 " id="DivSPCobranza" runat="server" visible="false">
<asp:DropDownList ID="DdlSubProyectoCobranza" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control input-small input-sm select2me" Width="100%">
</asp:DropDownList>
</div>

5
CxC/RepCxC.aspx.vb
View File

@@ -160,6 +160,11 @@ Partial Class RepCxC
CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, LblSubProyecto)
CargarCentrosDeCosto(Nothing, DdlSubProyectoCobranza, Nothing, Nothing)
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
DivSPCobranza.Visible = True
LblSPCobranza.Visible = True
End If
'Carga Vendedor
DdlVendedor.DataSource = GlobalDTVendedores(UsuarioActual.CveEmpresa)
DdlVendedor.DataBind()

8
CxC/RepCxCDetalle.aspx
View File

@@ -360,13 +360,15 @@
<asp:ListItem Text="No Aseguradora" Value="0"></asp:ListItem>
</asp:DropDownList>
</div>
<div class="col-md-1 truncate" title="Sucursal de cobranza:" data-toggle="tooltip" data-placement="top">
<div class="col-md-1 truncate" title="Sucursal de cobranza:" data-toggle="tooltip" data-placement="top" id="LblSPCobranza" runat="server" visible="false">
Sucursal de cobranza:
</div>
<div class="col-md-2 ">
<div class="col-md-2 " id="DivSPCobranza" runat="server" visible="false">
<asp:DropDownList ID="DdlSubProyectoCobranza" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control input-small input-sm select2me" Width="100%">
</asp:DropDownList>
</div>
</div>
@@ -727,7 +729,7 @@
<td style="text-align: left;">
<asp:CheckBox ID="ChkDireccionCliente" runat="server" Text="&nbsp;Dirección Cli." Checked="false" /></td>
<td style="text-align: left;">
<asp:CheckBox ID="ChkSucursalCobranzaCliente" runat="server" Text="&nbsp;Sucursal Cobranza <br/> (Clientes)." Checked="false" /></td>
<asp:CheckBox ID="ChkSucursalCobranzaCliente" runat="server" Text="&nbsp;Sucursal Cobranza <br/> (Clientes)." Checked="false" /></td>
</td>
<td style="text-align: left;"></td>
<td style="text-align: left;"></td>

5
CxC/RepCxCDetalle.aspx.vb
View File

@@ -257,6 +257,11 @@ Partial Class RepCxCDetalle
CargaClientes()
End If
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
DivSPCobranza.Visible = True
LblSPCobranza.Visible = True
End If
'CargaSubProyectos
DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
DdlSubProyecto.DataBind()

2
Ventas/Clientes.aspx
View File

@@ -1888,7 +1888,7 @@
<label for="<%= TxtCobranzaContacto.ClientID.ToString()%>">Nombre Contacto de Pagos: </label>
</div>
</div>
<div class="col-md-6">
<div class="col-md-6" id="DivSPCobranza" runat="server" visible="false">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlSubProyectoCobranza" DataValueField="CveSubProyecto" DataTextField="SubProyecto" Width="100%" runat="server" CssClass="form-control select2me">
</asp:DropDownList>

4
Ventas/Clientes.aspx.vb
View File

@@ -761,6 +761,10 @@ Partial Class Clientes
DivRepresentanteLegal.Visible = True
End If
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
DivSPCobranza.Visible = True
End If
If Request("CveCliente") IsNot Nothing AndAlso IsNumeric(Request("CveCliente")) AndAlso Request("CveCliente").ToEntero() > 0 Then
'If UsuarioActual.CveEmpresa = 2 AndAlso UsuarioActual.CveUsuario = 77 AndAlso Not Request("CveCliente").Contiene("10450", "10460", "10458") Then
' BtnGuardar.Enabled = False : BtnEliminar.Enabled = False : LbAgregarSucursal.Enabled = False : LbEnviarActivacionPortal.Enabled = False

4
Ventas/RepRecuperacion.aspx
View File

@@ -269,10 +269,10 @@
</div>
</div>
<div class="row">
<div class="col-md-1 truncate" title="Sucursal de cobranza:" data-toggle="tooltip" data-placement="top">
<div class="col-md-1 truncate" title="Sucursal de cobranza:" data-toggle="tooltip" data-placement="top" id="LblSPCobranza" runat="server" visible="false">
Sucursal de cobranza:
</div>
<div class="col-md-2 ">
<div class="col-md-2 " id="DivSPCobranza" runat="server" visible="false">
<asp:DropDownList ID="DdlSubProyectoCobranza" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control input-small input-sm select2me" Width="100%">
</asp:DropDownList>
</div>

7
Ventas/RepRecuperacion.aspx.vb
View File

@@ -107,7 +107,12 @@ Partial Class Ventas_RepRecuperacion
DdlClientes.ddl.Items.Insert(0, New ListItem("Todos", "-1"))
End If
If UsuarioActual.CveEmpresa = 119 Then DdlCondicionesPago.SelectedValue = "-1"
If UsuarioActual.CveEmpresa = 119 Then DdlCondicionesPago.SelectedValue = "-1"
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
DivSPCobranza.Visible = True
LblSPCobranza.Visible = True
End If
'Carga SubProyectos
'DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)

4
Ventas/RepRecuperacionDetalle.aspx
View File

@@ -281,10 +281,10 @@
</asp:DropDownList>
</div>
<div class="col-md-1 truncate" title="Sucursal de cobranza:" data-toggle="tooltip" data-placement="top">
<div class="col-md-1 truncate" title="Sucursal de cobranza:" data-toggle="tooltip" data-placement="top" id="LblSPCobranza" runat="server" visible="false">
Sucursal de cobranza:
</div>
<div class="col-md-2 ">
<div class="col-md-2 " id="DivSPCobranza" runat="server" visible="false">
<asp:DropDownList ID="DdlSubProyectoCobranza" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control input-small input-sm select2me" Width="100%">
</asp:DropDownList>
</div>

5
Ventas/RepRecuperacionDetalle.aspx.vb
View File

@@ -109,6 +109,11 @@ Partial Class Ventas_RepRecuperacionDetalle
DdlClientes.ddl.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa)
DdlClientes.ddl.DataBind()
DdlClientes.ddl.Items.Insert(0, New ListItem("Todos", "-1"))
End If
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
DivSPCobranza.Visible = True
LblSPCobranza.Visible = True
End If
If UsuarioActual.Empresa.Funcionalidad(307) <> "" Then DdlGrupo.Items.Add(New ListItem(UsuarioActual.Empresa.Funcionalidad(307), "18"))