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

Merge branch 'master' of http://192.168.10.111:8383/SIG

Browse Source
This commit is contained in:
rrene
2024-05-29 15:54:55 -07:00
parent 43194ef7dc f103ecc74a
commit d82b9a160d
8 changed files with 373 additions and 170 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
App_Code/ClsVentas.vb
View File

@@ -6974,7 +6974,12 @@ Public Class ClsVentas
SqlAdapter.Fill(Data) SqlAdapter.Fill(Data)
Retorno = True Retorno = True
Catch ex As Exception Catch ex As Exception
OnError("Ocurrió un error al agegar la comisión especial", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) If ex.Message.Contains("2627") Then
Alert("Ya existe una comisión con el médico y producto especificados.", TipoMensaje.MsgAdvertencia)
Else
OnError("Ocurrió un error al agegar la comisión especial", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End If
End Try End Try
Return Retorno Return Retorno

4
Compras/PopUpVerFactura.aspx.vb
View File

@@ -5766,14 +5766,14 @@ Partial Class PopUpVerFactura
If ObjIE.DtResultados.Rows.Count > 0 Then If ObjIE.DtResultados.Rows.Count > 0 Then
Dim reportDataSetsList As New List(Of ReportDataSource) Dim reportDataSetsList As New List(Of ReportDataSource)
Dim CvePrePoliza As Integer = 0 Dim CvePrePoliza As Integer = ObjIE.DtResultados.Rows(0)("CvePrePoliza").ToString.ToEntero
Dim dtMovs As New DataTable Dim dtMovs As New DataTable
If ObjIE.GetBancosIEFacturasPagadas(CveIE, UsuarioActual.CveEmpresa) Then If ObjIE.GetBancosIEFacturasPagadas(CveIE, UsuarioActual.CveEmpresa) Then
dtMovs = ObjIE.DtResultados.FiltraParametros("CveConceptoContable IN (17,2,308,309,312,292 )") dtMovs = ObjIE.DtResultados.FiltraParametros("CveConceptoContable IN (17,2,308,309,312,292 )")
If dtMovs IsNot Nothing AndAlso dtMovs.Rows.Count > 0 Then If dtMovs IsNot Nothing AndAlso dtMovs.Rows.Count > 0 Then
CvePrePoliza = dtMovs.Rows(0)("CvePrePoliza").ToString.ToEntero 'CvePrePoliza = dtMovs.Rows(0)("CvePrePoliza").ToString.ToEntero
If Not UsuarioActual.CveEmpresa.Contiene(13, 83) Then If Not UsuarioActual.CveEmpresa.Contiene(13, 83) Then
'CONVIERTO A PESOS CUANDO SE PAGA CON PESOS FACTURAS DE DOLARES 'CONVIERTO A PESOS CUANDO SE PAGA CON PESOS FACTURAS DE DOLARES

2
Contabilidad/RegPrePolizaS.aspx
View File

@@ -647,7 +647,7 @@
</div> </div>
</div> </div>
<div class="row"> <div class="row">
<label class="col-md-2">sino se especifica el folio, se genera en automático:</label> <label class="col-md-12">sino se especifica el folio, se genera en automático:</label>
</div> </div>
</div> </div>
</asp:Panel> </asp:Panel>

4
Contabilidad/RegPrePolizaS.aspx.vb
View File

@@ -2026,7 +2026,7 @@ Partial Class ContabilidadC_RegPrePolizaS
'Folio = TxtDocumentoFolio.Text 'Folio = TxtDocumentoFolio.Text
'ImporteDocumento = TxtDocumentoImporte.Text.ToDecimal 'ImporteDocumento = TxtDocumentoImporte.Text.ToDecimal
'Observaciones = TxtDocumentoObservaciones.Text 'Observaciones = TxtDocumentoObservaciones.Text
'Beneficiario = TxtDocumentoBeneficiario.Text 'Beneficiario = TxtDocumentoBeneficiario.TextTxtReferenciaE
RegistraScript(String.Format("$('#{0}').modal('hide');", "DivContadoModal")) RegistraScript(String.Format("$('#{0}').modal('hide');", "DivContadoModal"))
@@ -2668,7 +2668,7 @@ Partial Class ContabilidadC_RegPrePolizaS
divContabilizada.Visible = False divContabilizada.Visible = False
TxtFolio.Text = "" TxtFolio.Text = ""
TxtUsuarioElaboro.Text = UsuarioActual.Usuario LblUsuarioElaboro.Text = UsuarioActual.Usuario
End Sub End Sub

175
Ventas/RepComisionesSMS.aspx
View File

@@ -153,6 +153,8 @@
<asp:BoundField HeaderText="$ Técnico" DataField="ComisionTecnico" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField HeaderText="$ Técnico" DataField="ComisionTecnico" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="$ E. Médica" DataField="ComisionMedico" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField HeaderText="$ E. Médica" DataField="ComisionMedico" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Fecha Pago" DataField="FechaPago" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:dd/MM/yyyy}" ControlStyle-Width="100px" />
</Columns> </Columns>
@@ -168,7 +170,7 @@
</ContentTemplate> </ContentTemplate>
</ajax:TabPanel> </ajax:TabPanel>
<ajax:TabPanel ID="TabEspeciales" runat="server" HeaderText="Especiales" ClientIDMode="Static"> <ajax:TabPanel ID="TabEspeciales" runat="server" HeaderText="Especiales" ClientIDMode="Static" Visible="false">
<ContentTemplate> <ContentTemplate>
<asp:UpdatePanel ID="UpDatosEspeciales" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpDatosEspeciales" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
@@ -190,7 +192,7 @@
<asp:BoundField HeaderText="Com. Gerente" DataField="ComisionGerente" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" ControlStyle-Width="120px" /> <asp:BoundField HeaderText="Com. Gerente" DataField="ComisionGerente" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" ControlStyle-Width="120px" />
<asp:BoundField HeaderText="Com. Vendedor" DataField="ComisionVendedor" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" ControlStyle-Width="120px" /> <asp:BoundField HeaderText="Com. Vendedor" DataField="ComisionVendedor" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" ControlStyle-Width="120px" />
<asp:BoundField HeaderText="Com. Técnico" DataField="ComisionTecnico" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" ControlStyle-Width="120px" /> <asp:BoundField HeaderText="Com. Técnico" DataField="ComisionTecnico" DataFormatString="{0:###,###,###,###.##}" ItemStyle-HorizontalAlign="Right" ControlStyle-Width="120px" />
<asp:BoundField HeaderText="Fecha de Pago" DataField="FechaPago" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:dd/MM/yyyy}" ControlStyle-Width="80px" /> <asp:BoundField HeaderText="Fecha Pago" DataField="FechaPago" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:dd/MM/yyyy}" ControlStyle-Width="80px" />
</Columns> </Columns>
</asp:GridView> </asp:GridView>
@@ -287,75 +289,124 @@
<div id="DvModalComisionesEspeciales" class="modal ADS fade" role="dialog"> <div id="DvModalComisionesEspeciales" class="modal ADS fade" role="dialog">
<div class="modal-dialog" style="width: 900px;"> <div class="modal-dialog" style="width: 900px;">
<asp:UpdatePanel runat="server" class="modal-content" ID="UpdatePanel1" UpdateMode="Conditional"> <asp:UpdatePanel runat="server" class="modal-content" ID="UpModalComisionesEspeciales" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div class="modal-header "> <div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">×</button> <button type="button" class="close" data-dismiss="modal">×</button>
<h4 class="modal-title"> <h4 class="modal-title">
<asp:Literal ID="Literal2" runat="server">Comisiones Especiales</asp:Literal></h4> <asp:Literal ID="Literal2" runat="server">Comisiones Especiales</asp:Literal></h4>
</div> </div>
<div class="modal-body"> <div class="modal-body">
<div class="row">
<div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right; margin-right: 5px;" align="left"> <div class="col-md-3">
<input type="text" id="TxtBusquedaComicionesEspeciales" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaComiciones','{0}')", GvComisionesEspeciales.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" /> <div class="form-group form-md-line-input input-iconright">
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusquedaComicionesEspeciales','{0}')", GvComisionesEspeciales.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a> <asp:DropDownList ID="DdlModalMedico" CssClass="form-control select2me" runat="server" AppendDataBoundItems="true" DataTextField="Medico" DataValueField="CveMedico" Width="100%">
</div> </asp:DropDownList>
<div class="row"> <asp:RequiredFieldValidator ID="RfvDdlModalMedico" InitialValue="-1" runat="server" ControlToValidate="DdlModalMedico" CssClass="help-block errorimput"
<div class="col-md-12"> ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Médico''</b> es necesario, por favor ingréselo." ValidationGroup="GrpModalComisionesEspeciales"></asp:RequiredFieldValidator>
<label for="<%= DdlModalMedico.ClientID.ToString()%>">Médico:</label>
</div>
</div>
<div class="col-md-3">
<div class="form-group form-md-line-input input-iconright">
<ADS:Dropdownlost runat="server" ID="DdlModalPS" CssStyle="width:100%" CssClass="form-control input-sm DdlPS" CssClassDdl="select2me" DataTextField="PSCodigo" DataValueField="CvePS" IncluyeTodos="false" style="margin-top:4px!important" />
<label for="<%= DdlModalPS.ClientID.ToString()%>">
Productos / Servicio:<label>
</div>
</div>
<div class="col-md-2">
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlModalTipoComision" CssClass="form-control select2me" runat="server" Width="100%" OnSelectedIndexChanged="DdlModalTipoComision_SelectedIndexChanged">
<asp:ListItem Value="-1" >Seleccione</asp:ListItem>
<asp:ListItem Value="1" >Fija</asp:ListItem>
<asp:ListItem Value="2">Porcentaje</asp:ListItem>
</asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlModalTipoComision" InitialValue="-1" runat="server" ControlToValidate="DdlModalTipoComision" CssClass="help-block errorimput"
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo Comisión''</b> es necesario, por favor ingréselo." ValidationGroup="GrpModalComisionesEspeciales"></asp:RequiredFieldValidator>
<label for="<%= DdlModalTipoComision.ClientID.ToString()%>">Tipo Comisión:</label>
</div>
</div>
<div class="col-md-2">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtModalComision" CssClass="form-control" runat="server" Width="100%" onkeyup="FormatoMoneda(this);" AutoComplete="off" CausesValidation="true" >
</asp:TextBox>
<asp:RequiredFieldValidator ID="RfvTxtModalComision" runat="server" ControlToValidate="TxtModalComision" CssClass="help-block errorimput"
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Comisión''</b> es necesario, por favor ingréselo." ValidationGroup="GrpModalComisionesEspeciales"></asp:RequiredFieldValidator>
<label for="<%= TxtModalComision.ClientID.ToString()%>">Comisión:</label>
</div>
</div>
<div class="col-md-2">
<asp:Button runat="server" class="btn btn-primary" ID="LnkModalGuardarComisionEspecial" OnClick="LnkModalGuardarComisionEspecial_Click" Text="Guardar" ValidationGroup="GrpModalComisionesEspeciales" />
</div>
</div>
<div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right; margin-right: 5px;" align="left">
<input type="text" id="TxtBusquedaComicionesEspeciales" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaComiciones','{0}')", GvComisionesEspeciales.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusquedaComicionesEspeciales','{0}')", GvComisionesEspeciales.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<div class="row">
<div class="col-md-12">
<asp:GridView ID="GvComisionesEspeciales" runat="server" AutoGenerateColumns="False" <asp:GridView ID="GvComisionesEspeciales" runat="server" AutoGenerateColumns="False"
DataKeyNames="CveMedicoComision,CveMedico,CvePS,TipoComision,Comision,CveUsuario" DataKeyNames="CveMedicoComision,CveMedico,CvePS,TipoComision,Comision,CveUsuario"
data-sort="true" data-sort="true"
EmptyDataText="No se encontraron Comisiones" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None"> EmptyDataText="No se encontraron Comisiones" ToolTip="Listado de Medicos" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
<Columns> <Columns>
<asp:TemplateField HeaderText="Médico" ItemStyle-HorizontalAlign="Left"> <asp:TemplateField HeaderText="Médico" ItemStyle-HorizontalAlign="Left">
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlMedico" runat="server" Text='<%# Eval("Medico") %>'></asp:Literal> <asp:Literal ID="LtlMedico" runat="server" Text='<%# Eval("Medico") %>'></asp:Literal>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Código/Producto" ItemStyle-HorizontalAlign="Left"> <asp:TemplateField HeaderText="Código/Producto" ItemStyle-HorizontalAlign="Left">
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlCodigoPS" runat="server" Text='<%# Eval("CodigoPS") %>'></asp:Literal> <asp:Literal ID="LtlCodigoPS" runat="server" Text='<%# Eval("CodigoPS") %>'></asp:Literal>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="TipoComision" ItemStyle-HorizontalAlign="Left"> <asp:TemplateField HeaderText="TipoComision" ItemStyle-HorizontalAlign="Left">
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlTipoComision" runat="server" Text='<%# Eval("TipoComisionStr") %>'></asp:Literal> <asp:Literal ID="LtlTipoComision" runat="server" Text='<%# Eval("TipoComisionStr") %>'></asp:Literal>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Comision" ItemStyle-HorizontalAlign="Right"> <asp:TemplateField HeaderText="Comision" ItemStyle-HorizontalAlign="Right">
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlTipoComision" runat="server" Text='<%# Eval("Comision") %>'></asp:Literal> <asp:Literal ID="LtlComision" runat="server" Text='<%# Eval("Comision", "{0:N2}") %>' ></asp:Literal>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="center" HeaderText="Opciones" ItemStyle-Width="60px"> <asp:TemplateField ItemStyle-HorizontalAlign="center" HeaderText="Opciones" ItemStyle-Width="60px">
<ItemTemplate> <ItemTemplate>
<asp:LinkButton ID="LnkEliminarComisionEspecial" OnClick="LnkEliminarComisionEspecial_Click" runat="server" Visible="true" AlternateText="Eliminar" CausesValidation="False" <asp:LinkButton ID="LnkEliminarComisionEspecial" OnClick="LnkEliminarComisionEspecial_Click" runat="server" Visible="true" AlternateText="Eliminar" CausesValidation="False"
CssClass="btn btn-circle btn-sm red" Text="<i title='Reasignar' class='icon-trash' title='Eliminar' ></i>" CssClass="btn btn-circle btn-sm red" Text="<i title='Reasignar' class='icon-trash' title='Eliminar' ></i>"
data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" /> data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" />
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
</Columns> </Columns>
</asp:GridView> </asp:GridView>
</div> </div>
</div> </div>
</div> </div>
<div class="modal-footer"> <div class="modal-footer">
<button id="Button2" runat="server" type="button" class="btn default" data-dismiss="modal">Cerrar</button> <button id="Button2" runat="server" type="button" class="btn default" data-dismiss="modal">Cerrar</button>
</div> </div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</div> </div>
</div> </div>
</asp:Content> </asp:Content>

125
Ventas/RepComisionesSMS.aspx.vb
View File

@@ -2,7 +2,9 @@
Option Strict On Option Strict On
Imports System.Data Imports System.Data
Imports System.Data.Entity
Imports Extensiones Imports Extensiones
Imports Microsoft.EntityFrameworkCore
Partial Class Ventas_RepComisionesSMS Partial Class Ventas_RepComisionesSMS
@@ -253,21 +255,144 @@ Partial Class Ventas_RepComisionesSMS
Protected Sub LnkComisionesEspeciales_Click(sender As Object, e As EventArgs) Protected Sub LnkComisionesEspeciales_Click(sender As Object, e As EventArgs)
ReiniciaModalComisionesEspeciales()
CargaComisionesEspeciales() CargaComisionesEspeciales()
RegistraScript("$('#DvModalComisionesEspeciales').modal('show');") RegistraScript("$('#DvModalComisionesEspeciales').modal('show');")
End Sub End Sub
Private Sub ReiniciaModalComisionesEspeciales()
DdlModalTipoComision.SelectedValueExist(-1)
DdlModalMedico.SelectedValue = Nothing
DdlModalMedico.ClearSelection()
DdlModalMedico.Items.Clear()
DdlModalMedico.DataSource = GlobalDTMedicos(UsuarioActual.CveEmpresa).FiltraParametros("Estatus = 'True' ")
DdlModalMedico.DataBind()
DdlModalMedico.Items.Insert(0, New ListItem("Todos", "-1"))
DdlModalPS.SelectedValue = "-1"
DdlModalPS.SelectedValue = ""
DdlModalPS.SelectedText = ""
Dim EsWS As Boolean = If(UsuarioActual.Empresa.Funcionalidad(105) = "1" Or UsuarioActual.Empresa.Funcionalidad(141) = "1", True, False)
If EsWS Then
DdlModalPS.setEsWebService(True)
Else
DdlModalPS.ddl.SelectedValue = Nothing
DdlModalPS.ddl.ClearSelection()
DdlModalPS.ddl.Items.Clear()
'Objeto.ddl.DataSource = GlobalDTProductosServicios(UsuarioActual.CveEmpresa, CveClasificacion:=CveClasificacion, AplicaParaVenta:=1, Estatus:=1)
DdlModalPS.ddl.DataSource = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa, Estatus:=1)
DdlModalPS.ddl.DataBind()
DdlModalPS.ddl.Items.Insert(0, New ListItem("*** Actualizar listado de Productos o Servicios ***", "-2"))
DdlModalPS.ddl.Items.Insert(0, New ListItem("Seleccione el Producto", "-1"))
DdlModalPS.setEsWebService(False)
End If
TxtModalComision.Text = ""
UpModalComisionesEspeciales.Update()
End Sub
Private Sub CargaComisionesEspeciales() Private Sub CargaComisionesEspeciales()
Dim ObjVentas As New ClsVentas
GvComisionesEspeciales.DataSource = Nothing
If ObjVentas.GetComisionesMedicasEsPeciales(-1, -1, UsuarioActual.CveEmpresa) Then
GvComisionesEspeciales.DataSource = ObjVentas.DtResultados
End If
ObjVentas.Dispose()
GvComisionesEspeciales.DataBind()
UpModalComisionesEspeciales.Update()
End Sub End Sub
Protected Sub LnkEliminarComisionEspecial_Click(sender As Object, e As EventArgs) Protected Sub LnkEliminarComisionEspecial_Click(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim CveMedicoComision As Integer = GvRow.DataKey("CveMedicoComision").ToEntero
If CveMedicoComision > 0 Then
Dim errorProceso As Boolean = False
Dim ObjVentas As New ClsVentas
If ObjVentas.RemoveComisionesMedicasEspeciales(CveMedicoComision, UsuarioActual.CveEmpresa) Then
Alert("Comisión eliminada correctamente")
Else
errorProceso = True
End If
ObjVentas.Dispose()
If Not errorProceso Then
CargaComisionesEspeciales()
End If
End If
End Sub End Sub
#End Region #End Region
Protected Sub DdlModalTipoComision_SelectedIndexChanged(sender As Object, e As EventArgs)
TxtModalComision.Text = ""
If DdlModalTipoComision.SelectedValue.ToEntero = 1 Then
TxtModalComision.Attributes.Add("onkeyup", "FormatoMoneda(this)")
Else
TxtModalComision.Attributes.Add("onkeyup", "FormatoMoneda(this);validaPorcentaje(this);")
End If
UpModalComisionesEspeciales.Update()
End Sub
Protected Sub LnkModalGuardarComisionEspecial_Click(sender As Object, e As EventArgs)
If DdlModalPS.SelectedValue.ToEntero <= 0 Then
Alert("Debe de seleccionar un producto.", TipoMensaje.MsgAdvertencia)
Exit Sub
End If
If TxtModalComision.Text.ToDecimal = 0 Then
Alert("La comisión es requerida.", TipoMensaje.MsgAdvertencia)
Exit Sub
End If
Dim errorProceso As Boolean = False
Dim Comision As Decimal = TxtModalComision.Text.ToDecimal
If DdlModalTipoComision.SelectedValue.ToEntero = 2 Then
Comision = TxtModalComision.Text.ToDecimal / 100
End If
Dim ObjVentas As New ClsVentas
If ObjVentas.AddComisionesMedicasEspeciales(DdlModalMedico.SelectedValue.ToEntero, DdlModalPS.SelectedValue.ToEntero, DdlModalTipoComision.SelectedValue.ToEntero, Comision, UsuarioActual.CveUsuario) Then
Alert("Comisión agregada correctamente")
Else
errorProceso = True
End If
ObjVentas.Dispose()
If Not errorProceso Then
CargaComisionesEspeciales()
ReiniciaModalComisionesEspeciales()
End If
End Sub
End Class End Class

212
Ventas/Ventas.aspx
View File

@@ -1,4 +1,4 @@
<%@ Page Title="Ventas - Facturación" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="Ventas.aspx.vb" Inherits="Ventas" EnableEventValidation="false" %> <%@ Page Title="Ventas - Facturación" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="Ventas.aspx.vb" Inherits="Ventas" EnableEventValidation="false" %>
<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="cc1" %> <%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="cc1" %>
<%@ Register Src="~/UserControl/AddMedico.ascx" TagPrefix="UserControl" TagName="AddMedico" %> <%@ Register Src="~/UserControl/AddMedico.ascx" TagPrefix="UserControl" TagName="AddMedico" %>
@@ -391,7 +391,7 @@
<li> <li>
<asp:LinkButton ID="LnkSolicitarCredito" Visible="false" runat="server"><i class="fa fa-plus"></i>Solicitar autorización de crédito</asp:LinkButton> <asp:LinkButton ID="LnkSolicitarCredito" Visible="false" runat="server"><i class="fa fa-plus"></i>Solicitar autorización de crédito</asp:LinkButton>
</li> </li>
<li> <li>
<asp:LinkButton ID="LnkCancelarSoloCFDI" Visible="false" runat="server" data-toggle="confirmation" data-popout="true" data-original-title="¿Seguro que desea cancelar el CFDI?" data-btn-ok-label="si" OnClick="LnkCancelarSoloCFDI_Click"><i class="fa fa-plus"></i>Cancelar solo CFDI</asp:LinkButton> <asp:LinkButton ID="LnkCancelarSoloCFDI" Visible="false" runat="server" data-toggle="confirmation" data-popout="true" data-original-title="¿Seguro que desea cancelar el CFDI?" data-btn-ok-label="si" OnClick="LnkCancelarSoloCFDI_Click"><i class="fa fa-plus"></i>Cancelar solo CFDI</asp:LinkButton>
</li> </li>
@@ -614,29 +614,29 @@
<b>Paciente:</b> <b>Paciente:</b>
</td> </td>
<td runat="server"> <td runat="server">
<asp:TextBox ID="TxtPaciente" runat="server" Style="width: 130px" MaxLength="50"></asp:TextBox> <asp:TextBox ID="TxtPaciente" runat="server" Style="width: 130px" MaxLength="50"></asp:TextBox>
</td> </td>
<td runat="server" id="Td9" visible="true"> <td runat="server" id="Td9" visible="true">
<b>Episodio:</b> <b>Episodio:</b>
</td> </td>
<td runat="server"> <td runat="server">
<asp:TextBox ID="TxtEpisodio" runat="server" Style="width: 130px" MaxLength="20"></asp:TextBox> <asp:TextBox ID="TxtEpisodio" runat="server" Style="width: 130px" MaxLength="20"></asp:TextBox>
</td>
</tr>
<tr runat="server" id="TrVentasMedicas4" visible="false">
<td runat="server" id="Td8">
<b>Folio Remisión:</b>
</td>
<td runat="server">
<asp:TextBox ID="TxtFolioRemision" runat="server" Style="width: 130px" MaxLength="20" Enabled="false"></asp:TextBox>
</td>
<td runat="server" id="Td10">
<b>Tipo de Venta:</b>
</td>
<td runat="server">
<asp:Label runat="server" ID="LblTipoVenta"></asp:Label>
</td> </td>
</tr> </tr>
<tr runat="server" id="TrVentasMedicas4" visible="false">
<td runat="server" id="Td8" >
<b>Folio Remisión:</b>
</td>
<td runat="server">
<asp:TextBox ID="TxtFolioRemision" runat="server" Style="width: 130px" MaxLength="20" Enabled="false"></asp:TextBox>
</td>
<td runat="server" id="Td10" >
<b>Tipo de Venta:</b>
</td>
<td runat="server">
<asp:Label runat="server" ID="LblTipoVenta"></asp:Label>
</td>
</tr>
</table> </table>
</div> </div>
</div> </div>
@@ -892,87 +892,87 @@
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<asp:UpdatePanel ID="UpEstatus" runat="server" visible="false" UpdateMode="Conditional" class="portlet light xspadding bordered whitoutcol" style="margin-left: auto"> <asp:UpdatePanel ID="UpEstatus" runat="server" Visible="false" UpdateMode="Conditional" class="portlet light xspadding bordered whitoutcol" style="margin-left: auto">
<ContentTemplate> <ContentTemplate>
<div class="portlet-title"> <div class="portlet-title">
<div class="caption font-green"> <div class="caption font-green">
<i class="icon-pin font-green"></i> <i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Estatus</span> <span class="caption-subject bold uppercase">Estatus</span>
</div> </div>
<div class="actions"> <div class="actions">
<div class="btn-group"> <div class="btn-group">
</div>
</div>
<div class="tools">
<a href="javascript:;" class="collapse"></a>
</div> </div>
</div> </div>
<div class="portlet-body form-horizontal form-row-sepe formnombottom" style="padding-top: 0px; margin-top: -5px;">
<table border="0" width="240px"> <div class="tools">
<tr align="left" id="TrEstatusCaja" visible="false" runat="server"> <a href="javascript:;" class="collapse"></a>
<td><b>Corte:</b>&nbsp;</td> </div>
<td> </div>
<asp:Label ID="LblEstatusCaja" runat="server"></asp:Label> <div class="portlet-body form-horizontal form-row-sepe formnombottom" style="padding-top: 0px; margin-top: -5px;">
</td>
</tr> <table border="0" width="240px">
<tr align="left" id="Trsaldo" visible="false" runat="server"> <tr align="left" id="TrEstatusCaja" visible="false" runat="server">
<td><b>Saldo:</b>&nbsp;</td> <td><b>Corte:</b>&nbsp;</td>
<td> <td>
<%-- <asp:Label ID="LblSaldoVenta" runat="server"></asp:Label>&nbsp;&nbsp;--%> <asp:Label ID="LblEstatusCaja" runat="server"></asp:Label>
<asp:HyperLink ID="HplSaldoAuxiliar" CssClass="Texto thickbox" runat="server"></asp:HyperLink><asp:HyperLink runat="server" CssClass="Texto thickbox" Visible="false" ID="HplPagado" Text="<b>PAGADO<b>"></asp:HyperLink> </td>
<asp:HiddenField ID="HdnPagado" runat="server" /> </tr>
</td> <tr align="left" id="Trsaldo" visible="false" runat="server">
</tr> <td><b>Saldo:</b>&nbsp;</td>
<tr align="left"> <td>
<td><b>Estatus:</b>&nbsp;</td> <%-- <asp:Label ID="LblSaldoVenta" runat="server"></asp:Label>&nbsp;&nbsp;--%>
<td> <asp:HyperLink ID="HplSaldoAuxiliar" CssClass="Texto thickbox" runat="server"></asp:HyperLink><asp:HyperLink runat="server" CssClass="Texto thickbox" Visible="false" ID="HplPagado" Text="<b>PAGADO<b>"></asp:HyperLink>
<asp:Label ID="LbEstatus" Text="" runat="server" /> <asp:HiddenField ID="HdnPagado" runat="server" />
<%--<asp:DropDownList ID="DdlEstatus" AppendDataBoundItems="true" runat="server" CssClass="form-control input-sm select2me" DataTextField="EstatusFactura" DataValueField="CveEstatusFactura" Width="128px"> </td>
</tr>
<tr align="left">
<td><b>Estatus:</b>&nbsp;</td>
<td>
<asp:Label ID="LbEstatus" Text="" runat="server" />
<%--<asp:DropDownList ID="DdlEstatus" AppendDataBoundItems="true" runat="server" CssClass="form-control input-sm select2me" DataTextField="EstatusFactura" DataValueField="CveEstatusFactura" Width="128px">
</asp:DropDownList> </asp:DropDownList>
<a class="btn default" style="display: none;" data-toggle="modal" href="#Aceptar">Aceptada</a> <a class="btn default" style="display: none;" data-toggle="modal" href="#Aceptar">Aceptada</a>
<asp:ImageButton ID="ImgGuardaEstatus" runat="server" ClientIDMode="Static" ImageUrl="/Imagenes/accept.png" Style="display: none;" />--%> <asp:ImageButton ID="ImgGuardaEstatus" runat="server" ClientIDMode="Static" ImageUrl="/Imagenes/accept.png" Style="display: none;" />--%>
</td> </td>
</tr> </tr>
<tr align="left" id="trContabilizada" runat="server" visible="False"> <tr align="left" id="trContabilizada" runat="server" visible="False">
<td><b>Contabilizada:</b></td> <td><b>Contabilizada:</b></td>
<td> <td>
<asp:HyperLink ID="HLContabilizada" Target="_blank" runat="server" Text="No"></asp:HyperLink> <asp:HyperLink ID="HLContabilizada" Target="_blank" runat="server" Text="No"></asp:HyperLink>
<asp:HyperLink ID="HPLContaCancelacion" Target="_blank" runat="server" Text=""></asp:HyperLink> <asp:HyperLink ID="HPLContaCancelacion" Target="_blank" runat="server" Text=""></asp:HyperLink>
<%-- <asp:Button ID="BtnContabilizar" runat="server" Text="Contabilizar" Visible="false" CssClass="btn btn-success" />--%> <%-- <asp:Button ID="BtnContabilizar" runat="server" Text="Contabilizar" Visible="false" CssClass="btn btn-success" />--%>
<%--<asp:Button ID="BtnDescontabilizar" data-toggle="confirmation" data-popout="true" data-original-title="¿Seguro que desea eliminar la poliza?" data-btn-ok-label="si" Text="Descontabilizar" runat="server" OnClick="BtnDescontabilizar_Click" CssClass="btn btn-default" Style="margin-left: 20px;" Visible="false" />--%> <%--<asp:Button ID="BtnDescontabilizar" data-toggle="confirmation" data-popout="true" data-original-title="¿Seguro que desea eliminar la poliza?" data-btn-ok-label="si" Text="Descontabilizar" runat="server" OnClick="BtnDescontabilizar_Click" CssClass="btn btn-default" Style="margin-left: 20px;" Visible="false" />--%>
</td> </td>
</tr> </tr>
<tr align="left"> <tr align="left">
<td><b>Se timbró:</b>&nbsp;</td> <td><b>Se timbró:</b>&nbsp;</td>
<td> <td>
<asp:Label ID="LblSeTimbro" runat="server" Text="No"></asp:Label></td> <asp:Label ID="LblSeTimbro" runat="server" Text="No"></asp:Label></td>
</tr> </tr>
<tr align="left"> <tr align="left">
<td><b>Envió Mail:</b>&nbsp;</td> <td><b>Envió Mail:</b>&nbsp;</td>
<td> <td>
<asp:Label ID="LblMail" runat="server" Text="No"></asp:Label></td> <asp:Label ID="LblMail" runat="server" Text="No"></asp:Label></td>
</tr> </tr>
<tr align="left"> <tr align="left">
<td><b class="truncate">Usuario creó:</b>&nbsp;</td> <td><b class="truncate">Usuario creó:</b>&nbsp;</td>
<td> <td>
<asp:Label ID="LblUsuario" runat="server"></asp:Label></td> <asp:Label ID="LblUsuario" runat="server"></asp:Label></td>
</tr> </tr>
<tr align="left"> <tr align="left">
<td><b class="truncate">Fecha registró:</b>&nbsp;</td> <td><b class="truncate">Fecha registró:</b>&nbsp;</td>
<td> <td>
<asp:Label ID="LblFechaRegistro" runat="server"></asp:Label></td> <asp:Label ID="LblFechaRegistro" runat="server"></asp:Label></td>
</tr> </tr>
<tr runat="server" id="trPresupuesto" visible="false"> <tr runat="server" id="trPresupuesto" visible="false">
<td colspan="2"> <td colspan="2">
<asp:HyperLink runat="server" ID="HplPresupuesto" Target="_blank" Text="Ir a Presupuesto"></asp:HyperLink> <asp:HyperLink runat="server" ID="HplPresupuesto" Target="_blank" Text="Ir a Presupuesto"></asp:HyperLink>
</td> </td>
</tr> </tr>
</table> </table>
</div> </div>
</ContentTemplate> </ContentTemplate>
@@ -3491,7 +3491,7 @@
<div class="row" style="margin-bottom: 10px;"> <div class="row" style="margin-bottom: 10px;">
<div class="text-right col-md-offset-8 col-md-4"> <div class="text-right col-md-offset-8 col-md-4">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvContratoDetalles.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" /> <input type="text" id="TxtBusquedaCon" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaCon','{0}')", GvContratoDetalles.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvContratoDetalles.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a> <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvContratoDetalles.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div> </div>
</div> </div>
@@ -4485,7 +4485,7 @@
</div> </div>
<div class="modal-body"> <div class="modal-body">
<div class="row"> <div class="row">
<div class="col-md-12" style="display:flex; justify-content:center;"> <div class="col-md-12" style="display: flex; justify-content: center;">
<asp:RadioButtonList ID="RblTipoAutorizacionDesc" runat="server" CssClass="rbl" RepeatDirection="Horizontal" RepeatLayout="Table" OnSelectedIndexChanged="RblTipoAutorizacionDesc_SelectedIndexChanged" AutoPostBack="true"> <asp:RadioButtonList ID="RblTipoAutorizacionDesc" runat="server" CssClass="rbl" RepeatDirection="Horizontal" RepeatLayout="Table" OnSelectedIndexChanged="RblTipoAutorizacionDesc_SelectedIndexChanged" AutoPostBack="true">
<asp:ListItem Text="Usuario y contraseña" Value="1"></asp:ListItem> <asp:ListItem Text="Usuario y contraseña" Value="1"></asp:ListItem>
<asp:ListItem Text="Código de acceso" Value="2"></asp:ListItem> <asp:ListItem Text="Código de acceso" Value="2"></asp:ListItem>
@@ -4540,7 +4540,7 @@
<div id="DivAnticipos" class="modal ADS fade" role="dialog"> <div id="DivAnticipos" class="modal ADS fade" role="dialog">
<asp:UpdatePanel runat="server" ID="UpAnticipos" UpdateMode="Conditional" RenderMode="Inline"> <asp:UpdatePanel runat="server" ID="UpAnticipos" UpdateMode="Conditional" RenderMode="Inline">
<ContentTemplate> <ContentTemplate>
<div class="modal-dialog" > <div class="modal-dialog">
<div class="modal-content"> <div class="modal-content">
<div class="modal-header "> <div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">&times;</button> <button type="button" class="close" data-dismiss="modal">&times;</button>
@@ -4632,7 +4632,7 @@
<asp:TemplateField> <asp:TemplateField>
<ItemTemplate> <ItemTemplate>
<asp:CheckBox ID="Chk" runat="server" /> <asp:CheckBox ID="Chk" runat="server" />
<asp:LinkButton ID="LnkSolicitarActivarAnticipo" Visible="false" NavigateUrl="#" CssClass="btn btn-circle btn-sm blue" Text="<i class='fa fa-check'></i>" tooltip="Solicitar activar anticipo" runat="server" OnClick="LnkSolicitarActivarAnticipo_Click" /> <asp:LinkButton ID="LnkSolicitarActivarAnticipo" Visible="false" NavigateUrl="#" CssClass="btn btn-circle btn-sm blue" Text="<i class='fa fa-check'></i>" ToolTip="Solicitar activar anticipo" runat="server" OnClick="LnkSolicitarActivarAnticipo_Click" />
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
@@ -4698,7 +4698,7 @@
</div> </div>
</div> </div>
</div> </div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</div> </div>
@@ -10593,26 +10593,44 @@
if (indexd == 0) { if (indexd == 0) {
var tr = $('<tr></tr>'); tbody.append(tr); var tr = $('<tr></tr>'); tbody.append(tr);
var td; var td;
let idxHeader = 0;
for (var key in item) { for (var key in item) {
if (!(key == "text" || key == "id")) { td = $('<td style="font-weight:bold;">' + key + '</td>'); tr.append(td); } if (idxHeader == 0 && '<%= UsuarioActual.Empresa.Funcionalidad(382) %>' == '1') {
tr.append('<td style="font-weight:bold;"> </td>');
}
if (!(key == "text" || key == "id")) {
td = $('<td style="font-weight:bold;">' + key + '</td>');
tr.append(td);
}
idxHeader += 1;
} }
} }
var tr = $('<tr></tr>'); tbody.append(tr); var tr = $('<tr></tr>'); tbody.append(tr);
var td; var td;
let idxColumn = 0;
for (var key in item) { for (var key in item) {
if (idxColumn == 0 && '<%= UsuarioActual.Empresa.Funcionalidad(382) %>' == '1') {
let tdExistencia = '<a href="javascript:void(0);" onclick="javascript:AbrirVentana(' + "'/Inventarios/PopUpExistenciasAlmacen.aspx?CvePS=" + item.id + "'" + ", 800, 547," + "'N'" + ",'PopUpBuscar');$('#C_Tab_TabGenerales_DdlPS > select').select2('close');" + '"> <i class="fa fa-eye" aria-hidden="true"></i> </a>';
tr.append('<td>' + tdExistencia + '</td>');
}
if (!(key == "text" || key == "id")) { if (!(key == "text" || key == "id")) {
if ((item[key] > 0)) { if ((item[key] > 0)) {
td = $('<td style = "font-weight:bold;" >' + item[key] + '</td>'); tr.append(td); td = $('<td style = "font-weight:bold;" >' + item[key] + '</td>'); tr.append(td);
} else { } else {
if ('<%= UsuarioActual.Empresa.Funcionalidad(566) %>' == '1') { if ('<%= UsuarioActual.Empresa.Funcionalidad(566) %>' == '1') {
var buscarAlmacenes = "CargaExistenciasSucursales(" + item.id + ",'" + item.text + "');" var buscarAlmacenes = "CargaExistenciasSucursales(" + item.id + ",'" + item.text + "');"
td = $('<td>' + item[key] + ' <button type="button" class="btn btn-xs btn-primary" onclick="' + buscarAlmacenes + '">Ver mas existencias</button></td>'); tr.append(td); td = $('<td>' + item[key] + ' <button type="button" class="btn btn-xs btn-primary" onclick="' + buscarAlmacenes + '">Ver mas existencias</button></td>');
tr.append(td);
} else { } else {
td = $('<td>' + item[key] + '</td>'); tr.append(td); td = $('<td>' + item[key] + '</td>'); tr.append(td);
} }
} }
} }
idxColumn += 1;
} }
indexd += 1; indexd += 1;
}); });

6
Ventas/Ventas.aspx.vb
View File

@@ -25642,7 +25642,7 @@ Partial Class Ventas
Dim AplicaCancelacionConPagos As Boolean = False Dim AplicaCancelacionConPagos As Boolean = False
If UsuarioActual.CveRol = 1 AndAlso UsuarioActual.Empresa.Funcionalidad(109) = "1" AndAlso ObjFactura.TipoDocto.Contiene("Ing", "Rem") AndAlso Not EsRefacturacion AndAlso ObjFactura.Pagado > 0 Then If UsuarioActual.Empresa.Funcionalidad(109) = "1" AndAlso ObjFactura.TipoDocto.Contiene("Ing", "Rem") AndAlso Not EsRefacturacion AndAlso ObjFactura.Pagado > 0 Then
AplicaCancelacionConPagos = True AplicaCancelacionConPagos = True
End If End If
@@ -38431,5 +38431,9 @@ Partial Class Ventas
End Sub End Sub
#End Region #End Region
Public Function GeneraLigaExistencias() As String
Return "<a href='javascript:void(0);' class='Texto' onclick=''javascript:AbrirVentana('/Ventas/PopUpBuscarClientes.aspx?Opt=Fact', 800, 547, 'N', 'PopUpBuscar')''> ver </a>"
End Function
End Class End Class