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
2021-05-25 19:33:01 -07:00
parent f2f387fcf4 a1f420370c
commit ac57e2d4d5
30 changed files with 1753 additions and 1511 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
App_Code/ClsContabilidad.vb
View File

@@ -5925,7 +5925,11 @@ Public Class ClsContabilidad
SqlAdapter.Fill(Data)
Retorno = SqlAdapter.SelectCommand.Parameters("@CvePrePoliza").Value.ToString.ToEntero
Catch ex As Exception
Me.OnError("Ocurrió un error al eliminar el catálogo de Conta Ejercicios", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
If ex.Message.Contains("50000") Then
Me.OnError("No se puede registrar una prepóliza en un periodo cerrado.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
Else
Me.OnError("Ocurrió un error al cerrar el Ejercicio", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End If
End Try
Return Retorno

6
App_Code/ClsEdocumentacion.vb
View File

@@ -237,7 +237,11 @@ Public Class ClsEdocumentacion
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al consultar el catalogo de documentación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
If ex.Message.Contains("FK_Edoc_DocumentacionParametros_Edoc_Documentacion") Then
Alert("Este documento tiene parametros registrados", TipoMensaje.MsgAdvertencia)
Else
OnError("Ocurrió un error al eliminar la documentacion", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End If
End Try
Return Retorno

165
Bancos/DepositosCaja.aspx
View File

@@ -4,6 +4,33 @@
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.checkbox label
{
padding-left:15px;
}
.checkbox
{
width: 100%;
height: 100%;
}
.rowcheck{
margin-left: -5px;
padding-top: 10px;
}
.rowcheckCampos{
padding-left: 0px;
}
#DivComisioncheck{
border-top: 1px solid #e5e5e5;
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
@@ -95,22 +122,22 @@
</div>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
<br />
</ContentTemplate>
</asp:UpdatePanel>
<asp:UpdatePanel ID="UpGvFacturas" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="row">
<div class="row" style="margin-bottom:5px">
<div class="col-md-6" runat="server" >
<label style=" ">Cuenta Depósito:</label>
<asp:DropDownList ID="DdlCuentaDeposito" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="NumCuentaMoneda" DataValueField="CveCuenta" style="width: 300px;"></asp:DropDownList>
</div>
<div class="col-md-3" runat="server" style="text-align: left;">
<div class="col-md-1" >
<label style="width:70px; padding-top:5px;">Fecha:</label>
<label style="width:70px;">Fecha:</label>
</div>
<div class="col-md-1" >
<div class="input-group input-sm input-small date date-picker" data-date-format="dd/mm/yyyy" style="padding-top: 0; width: 140px !important;">
@@ -136,23 +163,23 @@
</div>
</div>
<div class="row">
<div class="col-md-1 truncate" runat="server" id="DivFaltante" style ="width: 145px;" >
<asp:CheckBox ID="ChkFaltante" runat="server" Text="Faltante/Sobrante" />
<div class="row rowcheck truncate" id="DivComisioncheck" >
<div class="col-md-1 truncate" runat="server" id="DivFaltante" style ="width: 155px;" >
<asp:CheckBox ID="ChkFaltante" runat="server" Text="Faltante/Sobrante" CssClass="checkbox"/>
</div>
<div class="col-md-10" id="DivComision" style="display: none;">
<div class="col-md-3" >
<div class="col-md-10 rowcheckCampos" id="DivComision" style="display: none;">
<div class="col-md-1" style="padding-right: 130px;">
<label>Importe:</label>
<asp:TextBox runat="server" ID="TxtComision" Class=" input-sm " Width="75px"></asp:TextBox>
<asp:TextBox runat="server" ID="TxtComision" Class=" input-sm " Width="100px" onkeypress = "return numericOnly(this);" ondrop = "return false;" onpaste = "return false;" CssClass="Numeros"></asp:TextBox>
</div>
<div class="col-md-4">
<div class="col-md-1" style="padding-right: 190px;">
<label>SubProyecto:</label>
<asp:DropDownList ID="DdlSubProyectoDeposito" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
</asp:DropDownList>
</div>
<div class="col-md-4">
<div class="col-md-1">
<label>Clasificación:</label>
<asp:DropDownList ID="DdlClasificacion" AutoPostBack="false" Class="table-group-action-input form-control input-inline input-small input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Clasificacion" DataValueField="CveClasificacion">
</asp:DropDownList>
@@ -163,24 +190,25 @@
</div>
<div class="row" >
<div class="col-md-1" runat="server" id="Div1" style ="width: 145px">
<asp:CheckBox ID="ChkDescuento" runat="server" Text="Descuento"/>
<div class="row rowcheck truncate" id="DivDescuentocheck" style="margin-top: -25px;">
<div class="col-md-1" runat="server" id="Div1" style ="width: 155px">
<asp:CheckBox ID="ChkDescuento" runat="server" Text="Descuento" CssClass="checkbox"/>
</div>
<div class="col-md-10" id="DivDescuento" style="display: none">
<div class="col-md-10 rowcheckCampos" id="DivDescuento" style="display: none">
<div class="col-md-2">
<label>Importe:</label>
<asp:TextBox runat="server" ID="TxtDescuento" Class=" input-sm " Width="75px"></asp:TextBox>
<div class="col-md-1" style="padding-right: 130px;">
<label for="TxtDescuento">Importe:</label>
<asp:TextBox runat="server" ID="TxtDescuento" Class=" input-sm " Width="100px" onkeypress = "return numericOnly(this);" ondrop = "return false;" onpaste = "return false;" CssClass="Numeros"></asp:TextBox>
</div>
<div class="col-md-3" >
<div class="col-md-1" style="padding-right: 190px;">
<label>SubProyecto:</label>
<asp:DropDownList ID="DdlSubProyectoDescuento" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
</asp:DropDownList>
</div>
<div class="col-md-5">
<div class="col-md-1">
<label>Clasificación:</label>
<asp:DropDownList ID="DdlClasificacionDescuento" AutoPostBack="false" Class="table-group-action-input form-control input-inline input-small input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Clasificacion" DataValueField="CveClasificacion">
</asp:DropDownList>
@@ -188,30 +216,33 @@
</div>
</div>
<div class="row">
<div class="row rowcheck truncate" id="DivIntercheck" style="margin-top: -25px;">
<div class="col-md-1" runat="server" id="Div2" style ="width: 145px">
<asp:CheckBox ID="ChkIntermediario" runat="server" Text="Intermediario"/>
<div class="col-md-1" runat="server" id="Div2" style ="width: 155px">
<asp:CheckBox ID="ChkIntermediario" runat="server" Text="Intermediario" CssClass="checkbox"/>
</div>
<div class="col-md-10" id="DivInter" style="display: none">
<div class="col-md-2" id="dd">
<div class="col-md-10 rowcheckCampos" id="DivInter" style="display: none">
<div class="col-md-1" id="dd" style="padding-right: 130px;">
<label>Intermediario:</label>
<asp:Dropdownlist ID="DdlProveedorIntermediario" CssClassDdl="select2me" Width="100px" CssStyle="100%" DataTextField="RazonSocial" DataValueField="CveProveedor" runat="server"></asp:Dropdownlist>
</div>
<div class="col-md-2" id="DivinterImporte" >
<label>Importe:</label>
<asp:TextBox runat="server" ID="TxtComisionIntermediario" Class=" input-sm " Width="75px"></asp:TextBox>
<div class="col-md-2" style=" width: 205px;">
<div class="col-md-6" id="DivinterImporte" style="padding-left: 0px; padding-right: 0px;" >
<label>Importe:</label>
<asp:TextBox runat="server" ID="TxtComisionIntermediario" Class=" input-sm " Width="75px" onkeypress = "return numericOnly(this);" ondrop = "return false;" onpaste = "return false;" CssClass="Numeros"></asp:TextBox>
</div>
<div class="col-md-6" id="DivIVA" >
<label>IVA:</label>
<asp:TextBox runat="server" ID="TxtIVA" Class=" input-sm " Width="75px" onkeypress = "return numericOnly(this);" ondrop = "return false;" onpaste = "return false;" CssClass="Numeros"></asp:TextBox>
</div>
</div>
<div class="col-md-2" id="DivIVA" >
<label>IVA:</label>
<asp:TextBox runat="server" ID="TxtIVA" Class=" input-sm " Width="75px"></asp:TextBox>
</div>
<div class="col-md-3" id="dd2">
<div class="col-md-1" id="dd2" style="margin-right: 100px;">
<label id="LblClasificacion3">Gasto:</label>
<asp:DropDownList ID="DdlClasificacionIntermediario" AutoPostBack="false" Class="table-group-action-input form-control input-inline input-small input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Clasificacion" DataValueField="CveClasificacion">
</asp:DropDownList>
</div>
<div class="col-md-3" id="divSubProyectoIntermediario">
<div class="col-md-1" id="divSubProyectoIntermediario">
<label id="LblSubproyectoIntermediario">SubProyecto:</label>
<asp:DropDownList ID="DdlSubProyectoIntermediario" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
@@ -221,7 +252,7 @@
</div>
<br />
<div style="height:550px;overflow-x:scroll">
<div style="height:450px;overflow-x:scroll">
<asp:GridView ID="GvFacturas" runat="server" AutoGenerateColumns="False" DataKeyNames="CveVenta, CvePrePoliza, CveIE, TipoCambio, CveMoneda, CveCliente, IdCtaContableBancos, IdCtaContClientes, Importe, SerieFolio" CssClass="table table-striped table-advance table-hover" Style="text-align: center; float: right; width: 100%; " GridLines="None">
<Columns>
<asp:TemplateField>
@@ -290,6 +321,41 @@
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
<script type="text/javascript" language="javascript">
var specialKeys = new Array();
specialKeys.push(9); //Backspace
function numericOnly(elementRef) {
var keyCodeEntered = (event.which) ? event.which : (window.event.keyCode) ? window.event.keyCode : -1;
debugger;
if ((keyCodeEntered >= 48) && (keyCodeEntered <= 57)) {
return true;
}
else if (keyCodeEntered == 46) {
if ((elementRef.value) && (elementRef.value.indexOf('.') >= 0)) {
return false;
}
else {
return true;
}
}
else if (keyCodeEntered == 45) {
var tamaño = elementRef.value.length;
if (tamaño == 0) {
if ((elementRef.value) && (elementRef.value.indexOf('-') >= 0)) {
debugger;
return false;
}
else {
debugger;
return true;
}
}
}
debugger;
return false;
}
var ValorTotalSeleccionado = 0
var comision = 0;
var descuento = 0;
@@ -297,6 +363,8 @@
var IVA = 0;
var ComisionIntermediario = 0;
function FnSuma(chk, cantidad) {
var saldoInicial = ToDouble($('#C_lblValorTotal').text());
var ValorTotalSeleccionado2 = 0;
@@ -419,6 +487,7 @@
}
function txtSuma(txt) {
var comision2 = ToDouble($('#C_TxtComision').val());
var comisionNegativa = 0;
if (comision2 < 0) {
@@ -456,7 +525,7 @@
function txtSumaIVA(txt) {
var comision2 = ToDouble($('#C_TxtIVA').val());
if (comision2 > ValorTotalSeleccionado) {
$('#C_TxtIVA').val(descuento)
$('#C_TxtIVA').val(IVA)
alert("No es posible poner un IVA superior a lo seleccionado")
} else {
saldo = ValorTotalSeleccionado + descuento + comision - comision2 - ComisionIntermediario;
@@ -469,7 +538,7 @@
function txtSumaTntermediario(txt) {
var comision2 = ToDouble($('#C_TxtComisionIntermediario').val());
if (comision2 > ValorTotalSeleccionado) {
$('#C_TxtComisionIntermediario').val(descuento)
$('#C_TxtComisionIntermediario').val(ComisionIntermediario)
alert("No es posible poner un importe superior a lo seleccionado")
} else {
saldo = ValorTotalSeleccionado + descuento + comision - comision2 - IVA;
@@ -482,16 +551,28 @@
function CheckFaltante(chk) {
if (chk.checked == true) {
$('#DivComision').css("display", "block");
$('#DivComisioncheck').removeClass("truncate")
$("#DivDescuentocheck").css("margin-top", 0);
} else {
$('#DivComision').css("display", "none");
$('#DivComisioncheck').addClass("truncate")
$("#DivDescuentocheck").css("margin-top", -25);
}
}
function CheckDescuento(chk) {
if (chk.checked == true) {
$('#DivDescuento').css("display", "block");
$('#DivDescuentocheck').removeClass("truncate")
$("#DivIntercheck").css("margin-top", 0);
} else {
$('#DivDescuento').css("display", "none");
$('#DivDescuentocheck').addClass("truncate")
$("#DivIntercheck").css("margin-top", -25);
}
}
@@ -499,8 +580,12 @@
function CheckIntermediario(chk) {
if (chk.checked == true) {
$('#DivInter').css("display", "block");
$('#DivIntercheck').removeClass("truncate")
} else {
$('#DivInter').css("display", "none");
$('#DivIntercheck').addClass("truncate")
}
}
</script>

8
Bancos/DepositosCaja.aspx.vb
View File

@@ -21,10 +21,10 @@ Partial Class Bancos_DepositosCaja
TxtFecha.Text = Now.ToShortDateString
txtFechaI.Text = Now.AddDays(-1).ToShortDateString
txtFechaF.Text = Now.ToShortDateString
TxtComision.Attributes.Add("onKeyUp", "txtSuma(event);")
TxtDescuento.Attributes.Add("onKeyUp", "txtSumaDescuento(event);")
TxtIVA.Attributes.Add("onKeyUp", "txtSumaIVA(event);")
TxtComisionIntermediario.Attributes.Add("onKeyUp", "txtSumaTntermediario(event);")
TxtComision.Attributes.Add("onKeyUp", "txtSuma(this);")
TxtDescuento.Attributes.Add("onKeyUp", "txtSumaDescuento(this);")
TxtIVA.Attributes.Add("onKeyUp", "txtSumaIVA(this);")
TxtComisionIntermediario.Attributes.Add("onKeyUp", "txtSumaTntermediario(this);")
CargaCuentas()

BIN
Bin/ClosedXML.dll
View File

Binary file not shown.

BIN
Bin/DocumentFormat.OpenXml.dll
View File

Binary file not shown.

2895
Bin/Microsoft.AspNet.SignalR.Core.xml
View File

File diff suppressed because it is too large Load Diff

BIN
Bin/Microsoft.IdentityModel.JsonWebTokens.dll
View File

Binary file not shown.

BIN
Bin/Microsoft.IdentityModel.Logging.dll
View File

Binary file not shown.

BIN
Bin/Microsoft.IdentityModel.Tokens.dll
View File

Binary file not shown.

BIN
Bin/Microsoft.Owin.Security.OAuth.dll
View File

Binary file not shown.

BIN
Bin/Microsoft.Owin.Security.dll
View File

Binary file not shown.

BIN
Bin/Microsoft.Owin.dll
View File

Binary file not shown.

BIN
Bin/Microsoft.SqlServer.Types.dll
View File

Binary file not shown.

BIN
Bin/System.IdentityModel.Tokens.Jwt.dll
View File

Binary file not shown.

BIN
Bin/System.IdentityModel.Tokens.Jwt.dll.refresh
View File

Binary file not shown.

BIN
Bin/WebGrease.dll
View File

Binary file not shown.

7
Compras/RepComprasAF.aspx
View File

@@ -152,10 +152,11 @@
<asp:DropDownList ID="DdlClasificacion" runat="server" CssClass=" form-control input-sm select2me" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="95%">
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
</asp:DropDownList>
</div>
<div class="col-md-1" style="display:none;">Producto Servicio:</div>
</div>
<div class="col-md-1">Producto Servicio:</div>
<div class="col-md-2">
<ADS:Dropdownlost runat="server" ID="DdlPS" CssStyle="width: 100%;" CssClassDdl="select2me" DataTextField="PSCodigo" DataValueField="CvePS" Width="95%" />
<ADS:Dropdownlost runat="server" ID="DdlPS" CssStyle="width: 100%;" CssClassDdl="select2me" DataTextField="PSCodigo" DataValueField="CvePS" Width="95%" />
</div>
</div>
</div>

21
Compras/RepComprasAF.aspx.vb
View File

@@ -57,7 +57,7 @@ Partial Class Compras_RepComprasAF
Private Sub Compras_RepComprasAFaspx_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not IsPostBack Then
CargaCombos()
DdlPS.ddl.Visible = False
'DdlPS.ddl.Visible = False
If UsuarioActual.Empresa.GralSoloProyecto Then
LblSubProyecto.Text = "Proyecto:"
DdlSubProyecto.Items.Clear()
@@ -429,5 +429,24 @@ Partial Class Compras_RepComprasAF
End Sub
#End Region
Protected Sub DdlClasificacion_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlClasificacion.SelectedIndexChanged
CargaPS(DdlClasificacion.SelectedValue.ToEntero)
End Sub
Private Sub CargaPS(CveClasificacion As Integer)
DdlPS.setEsWebService(If(UsuarioActual.Empresa.Funcionalidad(105).ToString = "1", True, False))
If Not UsuarioActual.Empresa.Funcionalidad(105).ToString = "1" Then
DdlPS.ddl.Items.Clear()
DdlPS.ddl.DataSource = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa, CveClasificacion:=CveClasificacion, Estatus:=1)
DdlPS.ddl.DataBind()
DdlPS.ddl.Items.Insert(0, New ListItem("*** Actualizar listado de Productos o Servicios ***", "-2"))
DdlPS.ddl.Items.Insert(0, New ListItem("Seleccione el Producto", "-1"))
Else
DdlPS.ddlWS.Attributes.Add("data-cveclasificacion", DdlClasificacion.SelectedValue)
DdlPS.SelectedText = "Todos"
DdlPS.SelectedValue = "-1"
End If
End Sub
End Class

20
Compras/RepComprasAFDetalle.aspx.vb
View File

@@ -448,4 +448,24 @@ Partial Class Compras_RepComprasAFDetalle
Return filtro
End Function
Protected Sub DdlClasificacion_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlClasificacion.SelectedIndexChanged
CargaPS(DdlClasificacion.SelectedValue.ToEntero)
End Sub
Private Sub CargaPS(CveClasificacion As Integer)
DdlPS.setEsWebService(If(UsuarioActual.Empresa.Funcionalidad(105).ToString = "1", True, False))
If Not UsuarioActual.Empresa.Funcionalidad(105).ToString = "1" Then
DdlPS.ddl.Items.Clear()
DdlPS.ddl.DataSource = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa, CveClasificacion:=CveClasificacion, Estatus:=1)
DdlPS.ddl.DataBind()
DdlPS.ddl.Items.Insert(0, New ListItem("*** Actualizar listado de Productos o Servicios ***", "-2"))
DdlPS.ddl.Items.Insert(0, New ListItem("Seleccione el Producto", "-1"))
Else
DdlPS.ddlWS.Attributes.Add("data-cveclasificacion", DdlClasificacion.SelectedValue)
DdlPS.SelectedText = "Todos"
DdlPS.SelectedValue = "-1"
End If
End Sub
End Class

33
Contabilidad2/RepSituacionFinanciera.aspx
View File

@@ -19,6 +19,9 @@
<asp:LinkButton ID="Imprimir" runat="server"><i class="fa fa-print"></i> Imprimir</asp:LinkButton>
<%--<asp:ImageButton ID="Imprimir" runat="server" alt="Imprimir" src="/Imagenes/btnImprimir.gif" Style="cursor: pointer; height: 20px" />&nbsp;--%>
</li>
<li>
<asp:LinkButton ID="LnkCerrar" runat="server"><i class="fa fa-print"></i> Cerrar Ejercicio</asp:LinkButton>
</li>
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel runat="server" ID="UpFiltros" UpdateMode="Conditional">
@@ -584,6 +587,36 @@
</div>
<div id="ModalCierre" class="modal ADS fade" role="dialog">
<asp:UpdatePanel class="modal-dialog" runat="server" ID="UpModalEditarFecha" UpdateMode="Conditional" RenderMode="Inline">
<ContentTemplate>
<div class="modal-content">
<div class="modal-header ">
<h4 class="modal-title">
<asp:Literal ID="LtlCierre" Text="Cierre de Ejercicio" runat="server"> </asp:Literal></h4>
</div>
<div class="modal-body">
<div class="row">
<label class="col-md-1 truncate" style="width: 90px;">Ejercicio:</label>
<div class="col-md-2" style="width: 125px;">
<asp:DropDownList ID="DdlEjercicioCierre" runat="server" CssClass="select2me" DataTextField="Ejercicio" DataValueField="Ejercicio" Width="100px">
</asp:DropDownList>
</div>
<label class="col-md-1 truncate" style="width: 90px;">Cuentas:</label>
<div class="col-md-2" style="width: 125px;">
<asp:DropDownList ID="DdlCuentas" runat="server" CssClass="select2me" DataTextField="CtaCodigo" DataValueField="CveCuenta" Width="100px">
</asp:DropDownList>
</div>
</div>
</div>
<div class="modal-footer">
<asp:Button ID="BtnCierre" runat="server" Text="Guardar" CssClass="btn btn-primary" ValidationGroup="VgmEditarFecha" />
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</ContentTemplate>
</asp:UpdatePanel>

36
Contabilidad2/RepSituacionFinanciera.aspx.vb
View File

@@ -158,12 +158,16 @@ Partial Class AC2_SituacionFinanciera
Dim Clsconta As New ClsContabilidad
If Clsconta.GetEjercicios(UsuarioActual.CveEmpresa) Then
DdlEjercicio.DataSource = Clsconta.DtResultados
DdlEjercicioCierre.DataSource = Clsconta.DtResultados
Else
DdlEjercicio.DataSource = Nothing
DdlEjercicioCierre.DataSource = Nothing
End If
Clsconta.Dispose()
DdlEjercicio.DataBind()
DdlEjercicioCierre.DataBind()
DdlEjercicioCierre.SelectedValue = Now.Year.ToString
DdlEjercicio.DataBind()
DdlEjercicio.SelectedValue = Now.Year.ToString
DdlSubproyecto.DataSource = GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, -1)
@@ -598,4 +602,34 @@ Partial Class AC2_SituacionFinanciera
params.Add(New ReportParameter("periodo", String.Format("de {0} {1}", DdlPeriodo.SelectedItem.ToString, DdlEjercicio.SelectedItem.ToString)))
ImprimirPDF(reportpath, DtDatos, params, fileName, Formato)
End Sub
Protected Sub LnkCerrar_Click(sender As Object, e As EventArgs) Handles LnkCerrar.Click
RegistraScript("$('#ModalCierre').modal()")
CargaCtaContableE()
End Sub
Protected Sub BtnCierre_Click(sender As Object, e As EventArgs) Handles BtnCierre.Click
Dim objConta As New ClsContabilidad
Dim FechaIncio As String = String.Format("{0}/01/01", DdlEjercicioCierre.SelectedValue.ToString)
Dim FechaFin As String = String.Format("{0}/12/31", DdlEjercicioCierre.SelectedValue.ToString)
Dim CvePrepoliza As Integer = objConta.CierreEjercicio(UsuarioActual.CveEmpresa, DdlEjercicioCierre.SelectedValue.ToEntero, DdlCuentas.SelectedValue.ToEntero, FechaIncio, FechaFin, UsuarioActual.CveUsuario)
If CvePrepoliza > 0 Then
Alert(String.Format("Se realizo el cierre correctamente: <br/> <b> Poliza: </b> <a href='/Contabilidad/RegPrePolizas.aspx?CvePrepoliza={0}'>{0}</a>", CvePrepoliza), TipoMensaje.MsgInformacion)
objConta.Commit()
Else
Alert("Ocurrio un error al realizar el cierre", TipoMensaje.MsgError)
objConta.RollBack()
End If
objConta.Dispose()
End Sub
Private Sub CargaCtaContableE()
Dim ObjConta As New ClsContabilidad
If ObjConta.GetCuentas(-1, "-1", 1, UsuarioActual.CveEmpresa) Then
DdlCuentas.DataSource = ObjConta.DtResultados.FiltraParametros("Tipo = 'F' or Tipo = 'E' ", "")
End If
ObjConta.Dispose()
DdlCuentas.DataBind()
DdlCuentas.Items.Insert(0, New ListItem("Seleccionar", "-1"))
End Sub
End Class

3
Nomina/Nomina2.aspx.cs
View File

@@ -367,6 +367,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
dtConceptos = null;
DataTable dtPeriodo = new DataTable();
DataTable dtasistencia = new DataTable();
LnkAutorizar.Visible = false;
if (FiltCvePeriodo > 0)
{
@@ -380,7 +381,6 @@ public partial class Nomina_Nomina2 : ClsPaginas
int CvePrePolizaProvision = drow["CvePrePolizaProvision"].ToString().ToEntero();
int CvePrePolizaProvisionAsimilados = drow["CvePrePolizaAsimilables"].ToString().ToEntero();
LnkConceptoEmpleado.Visible = (Estatus == 1);
LnkAutorizar.Visible = (Estatus == 1);
LnkRegistrarProvision.Visible = (Estatus >= 2) && CvePrePolizaProvision <= 0;
LnkConceptoEmpleado.Visible = (Estatus < 2);
LnkCargaAsistenciaMasiva.Visible = (Estatus < 2);
@@ -819,6 +819,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
}
#endregion
UpDatos.Update();
LnkAutorizar.Visible = dtempleados.COUNT("CvePersonal", " CvePersonal > 0 AND NomAutorizado =0")>0 ;
}
private void setGVNominas()
{

9
RH/CalculoSBC.aspx.cs
View File

@@ -21,7 +21,16 @@ public partial class RH_CalculoSBC : ClsPaginas
//}
protected void Page_Load(object sender, EventArgs e)
{
if (!IsPostBack)
{
ADSNetLibrary.SIGAPI.Services.Agropecuaria.IAgropecuariaService servicioAgro = new ADSNetLibrary.SIGAPI.Services.Agropecuaria.AgropecuariaService(System.Configuration.ConfigurationManager.ConnectionStrings["Conexion"].ConnectionString);
ADSNetLibrary.SIGAPI.Models.Agropecuaria.Request.ActividadGET acmo = new ADSNetLibrary.SIGAPI.Models.Agropecuaria.Request.ActividadGET();
acmo.cveEmpresa = UsuarioActual.CveEmpresa; acmo.cveActividad = -1;
var obj = servicioAgro.ActividadesGet(acmo);
GVDetalleParteVariable.DataSource = obj.Result;
GVDetalleParteVariable.DataBind();
}
}
protected void LnkCalcular_Click(object sender, EventArgs e)

22
RH/CatDocumentos.aspx
View File

@@ -66,20 +66,20 @@
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Documentacion Tipo">
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Tipo Documentación">
<ItemTemplate>
<asp:Literal ID="LtlDocumentacionTipo" runat="server" Text='<%# Eval("DocumentacionTipo") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Dias Limite">
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Días Límite">
<ItemTemplate>
<asp:Literal ID="LtlDocumentacionDiasLimite" runat="server" Text='<%# If(Eval("DiasLimite").ToString() = "" Or Eval("DiasLimite").ToString() = "0", "-", Eval("DiasLimite").ToString()) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Aplica Limite">
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Aplica Límite">
<ItemTemplate>
<asp:Literal ID="LtlAplicaDiasLimite" runat="server" Text='<%# If(Eval("AplicaDiasLimite").ToString() = "1", "Si", "No") %>'></asp:Literal>
</ItemTemplate>
@@ -196,11 +196,11 @@
<asp:TextBox ID="TxtDiasLimite" CssClass="form-control" onkeypress="validate(event)" MaxLength="2" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="rfvTxtDiasLimite" runat="server" ControlToValidate="TxtDiasLimite" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
<ajax:FilteredTextBoxExtender ID="FilTxtDiasLimite" runat="server" TargetControlID="TxtDiasLimite" FilterType="Numbers" ValidChars="" />
<label for="<%= TxtOrden.ClientID.ToString()%>">Dias Limite:</label>
<label for="<%= TxtOrden.ClientID.ToString()%>">Días Limite:</label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="ChkAplicaDiasLimite" runat="server" Text="Aplica Dias Limite" />
<asp:CheckBox ID="ChkAplicaDiasLimite" runat="server" Text="Aplica Días Límite" />
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:CheckBox ID="ChkAplicaFechaVencimiento" runat="server" Text="Aplica Fecha de Vencimiento" />
@@ -230,12 +230,12 @@
</ContentTemplate>
</asp:TabPanel>
<asp:TabPanel ID="TabParametros" runat="server" HeaderText="Parametros">
<asp:TabPanel ID="TabParametros" runat="server" HeaderText="Parámetros">
<ContentTemplate>
<div class="row">
<div class="form-group form-md-line-input input-iconright" style="text-align:right!important">
<asp:LinkButton runat="server" ID="LnkAgregarParametro" CssClass="Texto" OnClick="LnkAgregarParametro_Click" Text="Agregar Parametro"></asp:LinkButton>
<asp:LinkButton runat="server" ID="LnkAgregarParametro" CssClass="Texto" OnClick="LnkAgregarParametro_Click" Text="Agregar Parámetros"></asp:LinkButton>
</div>
</div>
@@ -249,7 +249,7 @@
DataKeyNames="CveDocumentacionParametro,CveDocumentacion,Parametro,Descripcion " CssClass="table table-hover table-advance Widthall" GridLines="None">
<Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" ItemStyle-Width="60px" HeaderText="Parametro">
<asp:TemplateField ItemStyle-HorizontalAlign="Left" ItemStyle-Width="60px" HeaderText="Parámetro">
<ItemTemplate>
<asp:Literal ID="LtlParametro" runat="server" Text='<%# Eval("Parametro") %>'></asp:Literal>
</ItemTemplate>
@@ -328,7 +328,7 @@
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">×</button>
<h4 class="modal-title">
<h4> <asp:Literal ID="Literal1" runat="server">Parametros</asp:Literal></h4>
<h4> <asp:Literal ID="Literal1" runat="server">Parámetros</asp:Literal></h4>
</h4>
</div>
@@ -336,8 +336,8 @@
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtParametro" CssClass="form-control" MaxLength="50" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvTxtParametro" runat="server" ControlToValidate="TxtParametro" ValidationGroup="GrpParametro" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Parametro''</b> es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
<label for="<%= TxtParametro.ClientID.ToString()%>">Parametro:</label>
<asp:RequiredFieldValidator ID="RfvTxtParametro" runat="server" ControlToValidate="TxtParametro" ValidationGroup="GrpParametro" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Parámetro''</b> es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
<label for="<%= TxtParametro.ClientID.ToString()%>">Parámetro:</label>
</div>
<div class="form-group form-md-line-input input-iconright">

12
RH/CatDocumentos.aspx.vb
View File

@@ -560,7 +560,7 @@ Partial Class RH_CatDocumentos
Dim ObjDoc As New ClsEdocumentacion
If ObjDoc.RemoveDocumentacionParametros(CveDocumentacionParametroEliminar, UsuarioActual.CveEmpresa) Then
Alert("Parametro eliminado correctamente.")
Alert("Parámetro eliminado correctamente.")
End If
ObjDoc.Dispose()
@@ -569,7 +569,7 @@ Partial Class RH_CatDocumentos
Dim DRow As DataRow = DTTempParametros(IndexEliminar)
DRow.Delete()
DTTempParametros.AcceptChanges()
Alert("Parametro eliminado correctamente.")
Alert("Parámetro eliminado correctamente.")
End If
@@ -612,12 +612,12 @@ Partial Class RH_CatDocumentos
If CveDocumentacionParametro > 0 Then
If ObjDoc.UpdateDocumentacionParametros(CveDocumentacionParametro, CveDocumentacion, TxtParametro.Text.Trim, TxtParametroDescripcion.Text.Trim, UsuarioActual.CveEmpresa) Then
Alert("Parametro actualizado correctamente.")
Alert("Parámetro actualizado correctamente.")
ErrorProceso = False
End If
Else
If ObjDoc.AddDocumentacionParametros(CveDocumentacion, TxtParametro.Text.Trim, TxtParametroDescripcion.Text.Trim, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario) Then
Alert("Parametro agregado correctamente.")
Alert("Parámetro agregado correctamente.")
ErrorProceso = False
End If
End If
@@ -632,7 +632,7 @@ Partial Class RH_CatDocumentos
Drow("Descripcion") = TxtParametroDescripcion.Text
'Editar Row en base a index
ErrorProceso = False
Alert("Parametro actualizado correctamente.")
Alert("Parámetro actualizado correctamente.")
Else
Dim Drow As DataRow = DTTempParametros.NewRow
@@ -641,7 +641,7 @@ Partial Class RH_CatDocumentos
DTTempParametros.Rows.Add(Drow)
Alert("Parametro agregado correctamente.")
Alert("Parámetro agregado correctamente.")
ErrorProceso = False
'Agreagr Row
End If

BIN
WEB.rar
View File

Binary file not shown.

BIN
WEB.zip Normal file
View File

Binary file not shown.

15
packages.config
View File

@@ -3,6 +3,9 @@
<package id="AjaxControlToolkit" version="15.1.4.0" targetFramework="net461" />
<package id="AjaxControlToolkit.StaticResources" version="15.1.4.0" targetFramework="net461" />
<package id="Antlr" version="3.4.1.9004" targetFramework="net461" />
<package id="ClosedXML" version="0.95.4" targetFramework="net461" />
<package id="DocumentFormat.OpenXml" version="2.7.2" targetFramework="net461" />
<package id="ExcelNumberFormat" version="1.0.10" targetFramework="net461" />
<package id="jQuery" version="1.6.4" targetFramework="net461" />
<package id="log4net" version="1.2.10" targetFramework="net461" />
<package id="Microsoft.AspNet.SignalR" version="2.4.1" targetFramework="net461" />
@@ -19,6 +22,7 @@
<package id="Microsoft.Bcl.AsyncInterfaces" version="5.0.0" targetFramework="net461" />
<package id="Microsoft.Bcl.Build" version="1.0.14" targetFramework="net461" />
<package id="Microsoft.Bcl.HashCode" version="1.1.1" targetFramework="net461" />
<package id="Microsoft.CSharp" version="4.7.0" targetFramework="net461" />
<package id="Microsoft.EntityFrameworkCore" version="3.1.14" targetFramework="net461" />
<package id="Microsoft.EntityFrameworkCore.Abstractions" version="3.1.14" targetFramework="net461" />
<package id="Microsoft.EntityFrameworkCore.Analyzers" version="3.1.14" targetFramework="net461" />
@@ -36,10 +40,9 @@
<package id="Microsoft.IdentityModel.JsonWebTokens" version="6.11.0" targetFramework="net461" />
<package id="Microsoft.IdentityModel.Logging" version="6.11.0" targetFramework="net461" />
<package id="Microsoft.IdentityModel.Tokens" version="6.11.0" targetFramework="net461" />
<package id="Microsoft.Owin" version="4.1.1" targetFramework="net461" />
<package id="Microsoft.Owin" version="4.2.0" targetFramework="net461" />
<package id="Microsoft.Owin.Host.SystemWeb" version="3.0.1" targetFramework="net461" />
<package id="Microsoft.Owin.Security" version="4.1.0" targetFramework="net461" />
<package id="Microsoft.Owin.Security.Jwt" version="4.1.0" targetFramework="net461" />
<package id="Microsoft.Owin.Security" version="4.2.0" targetFramework="net461" />
<package id="Microsoft.Owin.Security.OAuth" version="4.1.0" targetFramework="net461" />
<package id="Microsoft.ReportingServices.ReportViewerControl.WebForms" version="150.1358.0" targetFramework="net461" />
<package id="Microsoft.ReportViewer.2015.Runtime" version="12.0.2.2402" targetFramework="net461" />
@@ -48,6 +51,7 @@
<package id="Microsoft.SqlServer.Types" version="14.0.1016.290" targetFramework="net461" />
<package id="Microsoft.Web.Infrastructure" version="1.0.0.0" targetFramework="net461" />
<package id="Microsoft.Web.Xdt" version="1.0.0" targetFramework="net461" />
<package id="morelinq" version="3.3.2" targetFramework="net461" />
<package id="NC-OS-SessionStateProvider" version="4.4.0.0" targetFramework="net461" />
<package id="Newtonsoft.Json" version="12.0.3" targetFramework="net461" />
<package id="NuGet.Core" version="2.8.0" targetFramework="net461" />
@@ -56,8 +60,11 @@
<package id="System.Buffers" version="4.5.1" targetFramework="net461" />
<package id="System.Collections.Immutable" version="1.7.1" targetFramework="net461" />
<package id="System.ComponentModel.Annotations" version="4.7.0" targetFramework="net461" />
<package id="System.Data.SqlClient" version="4.8.2" targetFramework="net461" />
<package id="System.Diagnostics.DiagnosticSource" version="4.7.1" targetFramework="net461" />
<package id="System.IdentityModel.Tokens.Jwt" version="6.10.1" targetFramework="net461" />
<package id="System.IdentityModel.Tokens.Jwt" version="6.11.0" targetFramework="net461" />
<package id="System.IO.FileSystem.Primitives" version="4.0.1" targetFramework="net461" />
<package id="System.IO.Packaging" version="4.0.0" targetFramework="net461" />
<package id="System.Memory" version="4.5.4" targetFramework="net461" />
<package id="System.Numerics.Vectors" version="4.5.0" targetFramework="net461" />
<package id="System.Runtime.CompilerServices.Unsafe" version="5.0.0" targetFramework="net461" />

6
vwd.webinfo
View File

@@ -242,6 +242,12 @@