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

Merge branch 'master' of http://jperez@adsistemasof.sytes.net:8383/SIG.git

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2020-04-22 18:42:26 -07:00
parent 6a2ae7cd81 0bc003e2c4
commit 45881eb08a
44 changed files with 3140 additions and 1177 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
AC/CatPresupuestoEgresos.aspx.vb
View File

@@ -100,10 +100,17 @@ Partial Class AC_CatPresupuestoEgresos
Else Else
'si es anteproyecto 'si es anteproyecto
If DtPresupuestoEgresos.Rows(0)("Bloqueado").ToString = "0" Then Dim Bloqueado As Boolean = True
'AndAlso Ejercicio >= UsuarioActual.Empresa.EjercicioActual For Each dbRow As DataRow In DtPresupuestoEgresos.Rows
BtnPresupuesto.Visible = True If dbRow("Bloqueado").ToString() = "0" Then Bloqueado = False
End If Next
BtnPresupuesto.Visible = True
'If DtPresupuestoEgresos.Rows(0)("Bloqueado").ToString = "0" Then
' 'AndAlso Ejercicio >= UsuarioActual.Empresa.EjercicioActual
' BtnPresupuesto.Visible = True
'End If
' If Ejercicio = UsuarioActual.Empresa.EjercicioActual Then ' If Ejercicio = UsuarioActual.Empresa.EjercicioActual Then
End If End If

6
AC/PresupuestoEgresos.aspx.vb
View File

@@ -202,7 +202,7 @@ Partial Class AC_PresupuestoEgresos2
'Valida Ejercicio 'Valida Ejercicio
If objAC.GetEjerciciosPresupuestoEgresos(UsuarioActual.CveEmpresa) AndAlso objAC.DtResultados.Rows.Count > -1 Then If objAC.GetEjerciciosPresupuestoEgresos(UsuarioActual.CveEmpresa) AndAlso objAC.DtResultados.Rows.Count > -1 Then
Dim DtEjercicios = objAC.DtResultados.FiltraParametros(String.Format("Ejercicio = {0}", DdlEjercicio.SelectedValue)) Dim DtEjercicios = objAC.DtResultados.FiltraParametros(String.Format("Ejercicio = {0}", DdlEjercicio.SelectedValue))
If DtEjercicios.Rows.Count > 0 AndAlso DtEjercicios.Rows(0)("Bloqueado").ToString = "1" AndAlso txtTotal.Text.ToDecimal > 0 Then If DtEjercicios.Rows.Count > 0 AndAlso DtEjercicios.Rows(0)("Bloqueado").ToString = "1" Then
Alert("El Presupuesto de Egresos del ejercicio seleccionado ya esta bloqueado, solo puede generar Presupuestos en ceros.", TipoMensaje.MsgAdvertencia) Alert("El Presupuesto de Egresos del ejercicio seleccionado ya esta bloqueado, solo puede generar Presupuestos en ceros.", TipoMensaje.MsgAdvertencia)
objAC.Dispose() objAC.Dispose()
Exit Sub Exit Sub
@@ -234,6 +234,10 @@ Partial Class AC_PresupuestoEgresos2
Dim CveUnidadAdministrativa As Integer = CboUnidadAdministrativa.SelectedValue.ToString.ToEntero Dim CveUnidadAdministrativa As Integer = CboUnidadAdministrativa.SelectedValue.ToString.ToEntero
Dim CveClasificacionOG As Integer = CboClasificacionOG.SelectedValue.ToString.ToEntero Dim CveClasificacionOG As Integer = CboClasificacionOG.SelectedValue.ToString.ToEntero
'If txtTotal.Text.ToDecimal > 0 Then
' Alert("El Presupuesto de Egresos del ejercicio seleccionado se generaro proyecto. Después de este proceso se tendrá que autorizar el presupuesto de esta partida.", TipoMensaje.MsgAdvertencia)
'Else
If CvePresupuestoEgresos = 0 Then If CvePresupuestoEgresos = 0 Then
If objAC.AddPresupuestoEgresos(DdlEjercicio.SelectedValue.ToEntero, CveProgramaOperativo, CveFuenteFinanciamiento, CveTipoGasto, CveUnidadAdministrativa, CveClasificacionOG, Total, Enero, Febrero, Marzo, Abril, Mayo, Junio, Julio, Agosto, Septiembre, Octubre, Noviembre, Diciembre, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) > 0 Then If objAC.AddPresupuestoEgresos(DdlEjercicio.SelectedValue.ToEntero, CveProgramaOperativo, CveFuenteFinanciamiento, CveTipoGasto, CveUnidadAdministrativa, CveClasificacionOG, Total, Enero, Febrero, Marzo, Abril, Mayo, Junio, Julio, Agosto, Septiembre, Octubre, Noviembre, Diciembre, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) > 0 Then
Alert("El Presupuesto de Egreso se guardo Correctamente como Anteproyecto", TipoMensaje.MsgInformacion) '"document.location.href=""/AC/CatPresupuestoEgresos.aspx""" Alert("El Presupuesto de Egreso se guardo Correctamente como Anteproyecto", TipoMensaje.MsgInformacion) '"document.location.href=""/AC/CatPresupuestoEgresos.aspx"""

4
AC/RegEgresosModificaciones.aspx
View File

@@ -1,4 +1,4 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RegEgresosModificaciones.aspx.vb" Inherits="AC_RegPEAmpRed" %> <%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" EnableEventValidation="true" CodeFile="RegEgresosModificaciones.aspx.vb" Inherits="AC_RegPEAmpRed" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server"> <asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content> </asp:Content>
@@ -235,7 +235,7 @@
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<asp:UpdatePanel runat="server" ID="UPPersonalizar" UpdateMode="Conditional"> <asp:UpdatePanel runat="server" ID="UPPersonalizar">
<ContentTemplate> <ContentTemplate>
<div id="DivAddPE" class="modal fade" role="dialog"> <div id="DivAddPE" class="modal fade" role="dialog">
<div class="modal-dialog"> <div class="modal-dialog">

133
App_Code/ClsContabilidad.vb
View File

@@ -212,6 +212,8 @@ Public Class ClsContabilidad
If ex.Message.Contains("50015;") Then If ex.Message.Contains("50015;") Then
OnError("No se puede registrar una póliza en un ejercicio Cerrado", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) OnError("No se puede registrar una póliza en un ejercicio Cerrado", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
ElseIf ex.Message.Contains("CK_Conta_PrePolizas_Concepto") Then
OnError("Ocurrio un error al registrar la póliza, el concepto o descripción no puede ir vacio", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
Else Else
OnError("Ocurrió un error al Guardar", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) OnError("Ocurrió un error al Guardar", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End If End If
@@ -2681,7 +2683,10 @@ Public Class ClsContabilidad
Return Retorno Return Retorno
End Function End Function
Public Function AddConta_PlantillasPolizasDetalles(CvePlantillaPoliza As Integer, CveConcepto As Integer, TipoMovto As Integer, IdCtaContable As Integer, Orden As Integer, CveUsuario As Integer, CveEmpresa As Integer, CveSubProyecto As Integer, CveProveedor As Integer, Optional CvePersonal As Integer = -1) As Boolean Public Function AddConta_PlantillasPolizasDetalles(CvePlantillaPoliza As Integer, CveConcepto As Integer, TipoMovto As Integer,
IdCtaContable As Integer, Orden As Integer, CveUsuario As Integer, CveEmpresa As Integer,
CveSubProyecto As Integer, CveProveedor As Integer, Optional CvePersonal As Integer = -1,
Optional PorcentajeImpuesto As Decimal = 0) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Conta_PlantillasPolizasDetalleAdd") DataAdapter("PA_Conta_PlantillasPolizasDetalleAdd")
@@ -2697,6 +2702,7 @@ Public Class ClsContabilidad
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
.Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal .Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal
.Add("@PorcentajeImpuesto", SqlDbType.SmallMoney).Value = PorcentajeImpuesto
End With End With
Try Try
@@ -2713,7 +2719,9 @@ Public Class ClsContabilidad
End Try End Try
Return Retorno Return Retorno
End Function End Function
Public Function UpdateConta_PlantillasPolizasDetalle(CveConcepto As Integer, TipoMovto As Integer, IdCtaContable As Integer, Orden As Integer, CvePlantillaPolizaDetalle As Integer, CveSubProyecto As Integer, CveProveedor As Integer, Optional CvePersonal As Integer = -1) As Boolean Public Function UpdateConta_PlantillasPolizasDetalle(CveConcepto As Integer, TipoMovto As Integer, IdCtaContable As Integer, Orden As Integer,
CvePlantillaPolizaDetalle As Integer, CveSubProyecto As Integer, CveProveedor As Integer,
Optional CvePersonal As Integer = -1, Optional PorcentajeImpuesto As Decimal = 0) As Boolean
Dim retorno As Boolean = False Dim retorno As Boolean = False
DataAdapter("PA_Conta_PlantillasPolizasDetalleUpdate") DataAdapter("PA_Conta_PlantillasPolizasDetalleUpdate")
@@ -2727,6 +2735,7 @@ Public Class ClsContabilidad
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
.Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal .Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal
.Add("@PorcentajeImpuesto", SqlDbType.SmallMoney).Value = PorcentajeImpuesto
End With End With
Try Try
@@ -3732,6 +3741,126 @@ Public Class ClsContabilidad
Return Retorno Return Retorno
End Function End Function
Public Function GetSituacionFinanciera2(FechaI As Date, FechaF As Date, CveSubProyecto As Integer, Divisor As Integer, CveEmpresa As Integer, CveUsuario As Integer, Optional Tipo As Integer = 1) As Boolean
Dim Retorno = False
'SqlAdapter.SelectCommand.t
DataAdapter("PA_Conta2_SituacionFinancieraGet")
With SqlAdapter.SelectCommand.Parameters
.Add("@FechaI", SqlDbType.Date).Value = FechaI
.Add("@FechaF", SqlDbType.Date).Value = FechaF
.Add("@Tipo", SqlDbType.Int).Value = Tipo
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@Divisor", SqlDbType.Int).Value = Divisor
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
End With
SqlAdapter.SelectCommand.CommandTimeout = 0
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
Me.OnError("Ocurrió un error al obtener el Estado de Situaci?n de Financiera", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function GetSituacionFinancieraMensuallHorizontal(FechaI As Date, FechaF As Date, CveSubProyecto As Integer, Divisor As Integer, CveEmpresa As Integer, CveUsuario As Integer, Optional Tipo As Integer = 1) As Boolean
Dim Retorno = False
'SqlAdapter.SelectCommand.t
DataAdapter("PA_Conta2_SituacionFinancieraMensualHorizontalGet")
With SqlAdapter.SelectCommand.Parameters
.Add("@FechaI", SqlDbType.Date).Value = FechaI
.Add("@FechaF", SqlDbType.Date).Value = FechaF
.Add("@Tipo", SqlDbType.Int).Value = Tipo
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@Divisor", SqlDbType.Int).Value = Divisor
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
End With
SqlAdapter.SelectCommand.CommandTimeout = 0
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
Me.OnError("Ocurrió un error al obtener la situacion financiera mensual", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function GetSituacionFinancieraAnualHorizontal(FechaI As Date, FechaF As Date, CveSubProyecto As Integer, Divisor As Integer, CveEmpresa As Integer, CveUsuario As Integer, Optional Tipo As Integer = 1) As Boolean
Dim Retorno = False
'SqlAdapter.SelectCommand.t
DataAdapter("PA_Conta2_SituacionFinancieraAnualHorizontalGet")
With SqlAdapter.SelectCommand.Parameters
.Add("@FechaI", SqlDbType.Date).Value = FechaI
.Add("@FechaF", SqlDbType.Date).Value = FechaF
.Add("@Tipo", SqlDbType.Int).Value = Tipo
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@Divisor", SqlDbType.Int).Value = Divisor
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
End With
SqlAdapter.SelectCommand.CommandTimeout = 0
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
Me.OnError("Ocurrió un error al obtener la situacion financiera anual", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function GetSituacionFinancieraSubProyectolHorizontal(FechaI As Date, FechaF As Date, CveSubProyecto As Integer, Divisor As Integer, CveEmpresa As Integer, CveUsuario As Integer, Optional Tipo As Integer = 1) As Boolean
Dim Retorno = False
'SqlAdapter.SelectCommand.t
DataAdapter("PA_Conta2_SituacionFinancieraSubproyectoHorizontalGet")
With SqlAdapter.SelectCommand.Parameters
.Add("@FechaI", SqlDbType.Date).Value = FechaI
.Add("@FechaF", SqlDbType.Date).Value = FechaF
.Add("@Tipo", SqlDbType.Int).Value = Tipo
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@Divisor", SqlDbType.Int).Value = Divisor
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
End With
SqlAdapter.SelectCommand.CommandTimeout = 0
Try
SqlAdapter.Fill(DSet)
Retorno = True
Catch ex As Exception
Me.OnError("Ocurrió un error al obtener la situacion financiera por Sub Proyecto", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function GetAnexoCatalogo(IdCuenta As Integer, FechaI As Date, FechaF As Date, OpcionCuentas As Integer, CveSubProyecto As String, CveEmpresa As Integer, Optional TipoMovtos As Integer = -1, Optional SAT As Integer = 0) As Boolean Public Function GetAnexoCatalogo(IdCuenta As Integer, FechaI As Date, FechaF As Date, OpcionCuentas As Integer, CveSubProyecto As String, CveEmpresa As Integer, Optional TipoMovtos As Integer = -1, Optional SAT As Integer = 0) As Boolean
Dim Retorno = False Dim Retorno = False

2
App_Code/ClsInventarios.vb
View File

@@ -1272,7 +1272,7 @@ Public Class ClsInventarios
.Add("@CveUM", SqlDbType.Int).Value = CveUM .Add("@CveUM", SqlDbType.Int).Value = CveUM
.Add("@Cantidad", SqlDbType.Money).Value = Cantidad .Add("@Cantidad", SqlDbType.Money).Value = Cantidad
.Add("@PU", SqlDbType.Decimal).Value = PU .Add("@PU", SqlDbType.Decimal).Value = PU
.Add("@PUTC", SqlDbType.Money).Value = PUTC .Add("@PUTC", SqlDbType.Decimal).Value = PUTC
.Add("@CveSeccionAlmacen", SqlDbType.Int).Value = CveSeccionAlmacen .Add("@CveSeccionAlmacen", SqlDbType.Int).Value = CveSeccionAlmacen
.Add("@CvePS", SqlDbType.Int).Value = CvePS .Add("@CvePS", SqlDbType.Int).Value = CvePS
.Add("@CveAF", SqlDbType.Int).Value = CveAF .Add("@CveAF", SqlDbType.Int).Value = CveAF

5
App_Code/ClsOIEventos.vb
View File

@@ -1416,7 +1416,7 @@ Public Class ClsOIEventos
Return Retorno Return Retorno
End Function End Function
Public Function UpdateCircular(CveCircular As Integer, Asunto As String, Circular As String, CorreosInternos As String, CorreosExternos As String, CveUsuario As Integer) As Boolean Public Function UpdateCircular(CveCircular As Integer, Asunto As String, Circular As String, CorreosInternos As String, CorreosExternos As String, Optional Adjunto As String = "-1") As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
@@ -1428,8 +1428,7 @@ Public Class ClsOIEventos
.Add("@Circular", SqlDbType.VarChar).Value = Circular .Add("@Circular", SqlDbType.VarChar).Value = Circular
.Add("@CorreosInternos", SqlDbType.VarChar).Value = CorreosInternos .Add("@CorreosInternos", SqlDbType.VarChar).Value = CorreosInternos
.Add("@CorreosExternos", SqlDbType.VarChar).Value = CorreosExternos .Add("@CorreosExternos", SqlDbType.VarChar).Value = CorreosExternos
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario .Add("@Adjunto", SqlDbType.VarChar).Value = Adjunto
End With End With
Try Try

9
App_Code/ClsPaginas.vb
View File

@@ -4811,6 +4811,9 @@ Public Class ClsPaginas
PaginaDict.Add("/Compras/RepCxPCaudillo.aspx".ToUpper(), -1) PaginaDict.Add("/Compras/RepCxPCaudillo.aspx".ToUpper(), -1)
PaginaDict.Add("/Contabilidad2/RepEstadoResultadosHorizontal.aspx".ToUpper(), -1) PaginaDict.Add("/Contabilidad2/RepEstadoResultadosHorizontal.aspx".ToUpper(), -1)
PaginaDict.Add("/Contabilidad2/RepBalanceGeneralHorizontal.aspx".ToUpper(), -1)
'ECOMMERCE 'ECOMMERCE
PaginaDict.Add("/Ecommerce/Insignias.aspx".ToUpper(), 7002) PaginaDict.Add("/Ecommerce/Insignias.aspx".ToUpper(), 7002)
@@ -5161,7 +5164,11 @@ Public Class ClsPaginas
Dim ds As New DataSet Dim ds As New DataSet
For Each rpds As ReportDataSource In DataSource For Each rpds As ReportDataSource In DataSource
Dim dt As DataTable = DirectCast(rpds.Value, Data.DataTable) Dim dt As DataTable = DirectCast(rpds.Value, Data.DataTable)
dt = dt.Copy() If dt Is Nothing Then
dt = New DataTable
Else
dt = dt.Copy()
End If
dt.TableName = rpds.Name dt.TableName = rpds.Name
ds.Tables.Add(dt) ds.Tables.Add(dt)
Next Next

3
App_Code/ClsVentas.vb
View File

@@ -600,12 +600,13 @@ Public Class ClsVentas
Return Retorno Return Retorno
End Function End Function
Public Function UpdateVentaPrePoliza(IDPoliza As Integer, CvePrePoliza As Integer, CveVenta As Integer, CveEmpresa As Integer) As Boolean Public Function UpdateVentaPrePoliza(IDPoliza As Integer, FolioPoliza As Integer, CvePrePoliza As Integer, CveVenta As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Vta_VentaPrePolizaUpdate") DataAdapter("PA_Vta_VentaPrePolizaUpdate")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@IDPoliza", SqlDbType.Int).Value = IDPoliza .Add("@IDPoliza", SqlDbType.Int).Value = IDPoliza
.Add("@FolioPoliza", SqlDbType.Int).Value = FolioPoliza
.Add("@CvePrePoliza", SqlDbType.Int).Value = CvePrePoliza .Add("@CvePrePoliza", SqlDbType.Int).Value = CvePrePoliza
.Add("@CveVenta", SqlDbType.Int).Value = CveVenta .Add("@CveVenta", SqlDbType.Int).Value = CveVenta
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa

31
App_Code/Modelos.vb
View File

@@ -128,6 +128,10 @@ Namespace Modelos
Public Property Tick As DateTime Public Property Tick As DateTime
End Class End Class
Public Class RetornoPolizaConta
Public Property IdPoliza As Integer = -1
Public Property FolioPoliza As Integer = -1
End Class
Public Class OrdenCompra Public Class OrdenCompra
Public Sub New() Public Sub New()
CveOrdenCompra = -1 CveOrdenCompra = -1
@@ -3748,11 +3752,11 @@ Namespace Modelos
If factura.TipoDocto.Contiene("Ing", "Egs", "OP", "Com") Then If factura.TipoDocto.Contiene("Ing", "Egs", "OP", "Com") Then
'Dim ObjAC As New ClsContPAQi(UsuarioActual.Empresa) : ObjAC.IniciaTransacSQL() 'Dim ObjAC As New ClsContPAQi(UsuarioActual.Empresa) : ObjAC.IniciaTransacSQL()
Dim IDPoliza As Integer = GenerarPolizaAC(factura, ObjAC) Dim IDPoliza As Modelos.RetornoPolizaConta = GenerarPolizaAC(factura, ObjAC)
If IDPoliza > 0 Then If IDPoliza.IdPoliza > 0 Then
If ObjVentas.UpdateVentaPrePoliza(IDPoliza, factura.CvePrePoliza, factura.CveVenta, factura.CveEmpresa) Then If ObjVentas.UpdateVentaPrePoliza(IDPoliza.IdPoliza, IDPoliza.FolioPoliza, factura.CvePrePoliza, factura.CveVenta, factura.CveEmpresa) Then
'Si se facturó la cotización hay que vincular la venta 'Si se facturó la cotización hay que vincular la venta
Msgok.AppendFormat("Abono Registrado Correctamente.<br/><br/> <a href='/Contabilidad/RegPoliza.aspx?IdPoliza={0}' target='_blank' class='Texto'>Ver Poliza</a>", IDPoliza) Msgok.AppendFormat("Abono Registrado Correctamente.<br/><br/> <a href='/Contabilidad/RegPoliza.aspx?IdPoliza={0}' target='_blank' class='Texto'>Ver Poliza</a>", IDPoliza)
@@ -4636,7 +4640,8 @@ Namespace Modelos
'POLIZA DE CANCELACION 'POLIZA DE CANCELACION
If Not ErrorCancelar Then If Not ErrorCancelar Then
If UsuarioActual.Empresa.UsaAC Then If UsuarioActual.Empresa.UsaAC Then
IDPoliza = GenerarPolizaAC(ObjFactura, ObjAC, True) Dim Pol As Modelos.RetornoPolizaConta = GenerarPolizaAC(ObjFactura, ObjAC, True)
IDPoliza = Pol.IdPoliza
If IDPoliza <= 0 Then If IDPoliza <= 0 Then
ErrorCancelar = True ErrorCancelar = True
MensajeError = "Ocurrió un error al generar la poliza de cancelación." MensajeError = "Ocurrió un error al generar la poliza de cancelación."
@@ -5108,7 +5113,9 @@ Namespace Modelos
If ObjCancelacion.CFDICancelar(UsuarioActual.Empresa, FolioFiscal, Total, RFCReceptor, UsuarioActual.Empresa.RFC) Then If ObjCancelacion.CFDICancelar(UsuarioActual.Empresa, FolioFiscal, Total, RFCReceptor, UsuarioActual.Empresa.RFC) Then
'falta verificar traer el acuse y reenviarlo 'falta verificar traer el acuse y reenviarlo
If UsuarioActual.Empresa.UsaAC Then If UsuarioActual.Empresa.UsaAC Then
IDPoliza = GenerarPolizaAC(Me, ObjAC, True) Dim Pol As Modelos.RetornoPolizaConta = GenerarPolizaAC(Me, ObjAC, True)
IDPoliza = Pol.IdPoliza
If IDPoliza <= 0 Then If IDPoliza <= 0 Then
Mensaje = "No se pudo generar la poliza" Mensaje = "No se pudo generar la poliza"
ErrorCancelar = True ErrorCancelar = True
@@ -5144,8 +5151,11 @@ Namespace Modelos
Return ProcesoCorrecto Return ProcesoCorrecto
End Function End Function
Private Function GenerarPolizaAC(ObjFactura As Modelos.Factura, ObjAC As ClsContPAQi, Optional CancelacionIngreso As Boolean = False) As Integer
Dim Retorno As Integer = 0
Private Function GenerarPolizaAC(ObjFactura As Modelos.Factura, ObjAC As ClsContPAQi, Optional CancelacionIngreso As Boolean = False) As RetornoPolizaConta
Dim Retorno As New RetornoPolizaConta
Dim IDPoliza As Integer = 0 Dim IDPoliza As Integer = 0
Dim ErrorAC As Boolean = False Dim ErrorAC As Boolean = False
@@ -5172,7 +5182,8 @@ Namespace Modelos
If IDPoliza > 0 Then If IDPoliza > 0 Then
Retorno.IdPoliza = IDPoliza
Retorno.FolioPoliza = ObjAC.Folio
'Orden de PAGO 'Orden de PAGO
If ObjFactura.TipoDocto = "OP" Then If ObjFactura.TipoDocto = "OP" Then
'ORDEN DE PAGO 'ORDEN DE PAGO
@@ -5239,9 +5250,9 @@ Namespace Modelos
If Not ErrorAC Then If Not ErrorAC Then
ObjAC.AjustaPoliza(IDPoliza) ObjAC.AjustaPoliza(IDPoliza)
Retorno = IDPoliza ' Retorno = IDPoliza
Else Else
Retorno = -1 'Retorno = -1
'Alert("Error al Agregar la Póliza de AC.", TipoMensaje.MsgError) 'Alert("Error al Agregar la Póliza de AC.", TipoMensaje.MsgError)
End If End If

3
Bancos/Devoluciones.aspx.cs
View File

@@ -370,8 +370,7 @@ public partial class Bancos_Devoluciones : ClsPaginas
} }
// DATOS PREPOLIZA // DATOS PREPOLIZA
if ((DdlTipoTransanccion.SelectedValue == "1")) if ( DdlTipoTransanccion.SelectedValue == "1" && UsuarioActual.CveEmpresa != 119) FolioFijo = TxtFolio.Text.ToEntero();
FolioFijo = TxtFolio.Text.ToEntero();
CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE Devoluciones", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMoneda, TxtFechaDocumento.Text.ToDate(), TxtObservaciones.Text.Trim(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransanccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransanccion.SelectedValue, "-1", UsuarioActual.CveEmpresa)); CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE Devoluciones", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMoneda, TxtFechaDocumento.Text.ToDate(), TxtObservaciones.Text.Trim(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransanccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransanccion.SelectedValue, "-1", UsuarioActual.CveEmpresa));
if (CvePrePoliza > 0) if (CvePrePoliza > 0)

4
Bancos/PagoAcreedor.aspx.cs
View File

@@ -299,8 +299,8 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
AsignaCuentaProveedor(DdlProveedores.SelectedValue.ToEntero()); AsignaCuentaProveedor(DdlProveedores.SelectedValue.ToEntero());
// DATOS PREPOLIZA // DATOS PREPOLIZA
if ((DdlTipoTransaccion.SelectedValue == "1")) if ( DdlTipoTransaccion.SelectedValue == "1" && UsuarioActual.CveEmpresa != 119) FolioFijo = TxtFolio.Text.ToEntero();
FolioFijo = TxtFolio.Text.ToEntero();
CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PAGO ACRREDORES", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMoneda, TxtFechaDocumento.Text.ToDate(), DdlProveedores.SelectedText.ToString(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa)); CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PAGO ACRREDORES", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMoneda, TxtFechaDocumento.Text.ToDate(), DdlProveedores.SelectedText.ToString(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa));
if (CvePrePoliza > 0) if (CvePrePoliza > 0)

9
Bancos/PagoDeudor.aspx.cs
View File

@@ -339,9 +339,8 @@ public partial class Bancos_PagoDeudor : ClsPaginas
} }
// DATOS PREPOLIZA // DATOS PREPOLIZA
if ((DdlTipoTransaccionPrestamo.SelectedValue == "1")) if (DdlTipoTransaccionPrestamo.SelectedValue == "1" && UsuarioActual.CveEmpresa != 119) FolioFijo = TxtFolioPrestamo.Text.ToEntero();
FolioFijo = TxtFolioPrestamo.Text.ToEntero(); CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PRESTAMO DEUDORES", CvePlantillaPoliza, TxtImportePrestamo.Text.Trim().ToDouble(), TxtImportePrestamo.Text.Trim().ToDouble(), CveMonedaPrestamo, TxtFechaPrestamo.Text.ToDate(), DdlProveedorPrestamo.SelectedText.ToString(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccionPrestamo.SelectedValue, "-1", UsuarioActual.CveEmpresa));
CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PRESTAMO DEUDORES", CvePlantillaPoliza, TxtImportePrestamo.Text.Trim().ToDouble(), TxtImportePrestamo.Text.Trim().ToDouble(), CveMonedaPrestamo, TxtFechaPrestamo.Text.ToDate(), DdlProveedorPrestamo.SelectedText.ToString(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccionPrestamo.SelectedValue, "-1", UsuarioActual.CveEmpresa));
if (CvePrePoliza > 0) if (CvePrePoliza > 0)
{ {
@@ -674,8 +673,8 @@ public partial class Bancos_PagoDeudor : ClsPaginas
} }
// DATOS PREPOLIZA // DATOS PREPOLIZA
if ((DdlTipoTransaccion.SelectedValue == "1")) if (DdlTipoTransaccion.SelectedValue == "1" && UsuarioActual.CveEmpresa != 119) FolioFijo = TxtFolio.Text.ToEntero();
FolioFijo = TxtFolio.Text.ToEntero();
CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PAGO DEUDORES", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMoneda, TxtFechaDocumento.Text.ToDate(), DdlProveedores.SelectedText.ToString(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa)); CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PAGO DEUDORES", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMoneda, TxtFechaDocumento.Text.ToDate(), DdlProveedores.SelectedText.ToString(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa));
if (CvePrePoliza > 0) if (CvePrePoliza > 0)

10
Bancos/PrestamoPersonal.aspx.cs
View File

@@ -250,8 +250,8 @@ public partial class Bancos_PrestamoPersonal : ClsPaginas
AsignaCuentaPersonal(DdlFuncionarioEmpleadoPago.SelectedValue.ToEntero(), CveMoneda); AsignaCuentaPersonal(DdlFuncionarioEmpleadoPago.SelectedValue.ToEntero(), CveMoneda);
// DATOS PREPOLIZA // DATOS PREPOLIZA
if ((DdlTipoTransaccion.SelectedValue == "1")) if (DdlTipoTransaccion.SelectedValue == "1" && UsuarioActual.CveEmpresa != 119) FolioFijo = TxtFolio.Text.ToEntero();
FolioFijo = TxtFolio.Text.ToEntero();
CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PAGO ACRREDORES", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMoneda, TxtFechaDocumento.Text.ToDate(), DdlFuncionarioEmpleadoPago.SelectedItem.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa)); CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PAGO ACRREDORES", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMoneda, TxtFechaDocumento.Text.ToDate(), DdlFuncionarioEmpleadoPago.SelectedItem.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa));
if (CvePrePoliza > 0) if (CvePrePoliza > 0)
@@ -539,9 +539,9 @@ public partial class Bancos_PrestamoPersonal : ClsPaginas
AsignaCuentaPersonal(DdlFuncionarioEmpleadoPrestamo.SelectedValue.ToEntero(), CveMoneda); AsignaCuentaPersonal(DdlFuncionarioEmpleadoPrestamo.SelectedValue.ToEntero(), CveMoneda);
// DATOS PREPOLIZA // DATOS PREPOLIZA
if ((DdlTipoTransanccionPrestamo.SelectedValue == "1")) if (DdlTipoTransanccionPrestamo.SelectedValue == "1" && UsuarioActual.CveEmpresa != 119 ) FolioFijo = TxtFolioPrestamo.Text.ToEntero();
FolioFijo = TxtFolioPrestamo.Text.ToEntero();
CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PRESTAMO PERSONAL", CvePlantillaPoliza, TxtImportePrestamo.Text.Trim().ToDouble(), TxtImportePrestamo.Text.Trim().ToDouble(), CveMoneda, TxtFechaPrestamo.Text.ToDate(), DdlFuncionarioEmpleadoPrestamo.SelectedItem.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa)); CvePrePoliza = ObjMov.AddPrePolizas("Bancos/PRESTAMO PERSONAL", CvePlantillaPoliza, TxtImportePrestamo.Text.Trim().ToDouble(), TxtImportePrestamo.Text.Trim().ToDouble(), CveMoneda, TxtFechaPrestamo.Text.ToDate(), DdlFuncionarioEmpleadoPrestamo.SelectedItem.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa));
if (CvePrePoliza > 0) if (CvePrePoliza > 0)
{ {

8
Bancos/ProductosFinancieros.aspx.vb
View File

@@ -307,7 +307,7 @@ Partial Class Bancos_ProductosFinancieros
Dim FolioPoliza As Integer = -1 Dim FolioPoliza As Integer = -1
Dim CveIE As Integer = -1 Dim CveIE As Integer = -1
CvePrePoliza = ObjMov.AddPrePolizas("ProductosFinancieros/Registrar", DdlTipoMovimiento.SelectedValue.ToEntero, Importe, Importe, CveMoneda, TxtFecha.Text.ToDate, TxtConcepto.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) CvePrePoliza = ObjMov.AddPrePolizas("ProductosFinancieros/Registrar", DdlTipoMovimiento.SelectedValue.ToEntero, Importe, Importe, CveMoneda, TxtFecha.Text.ToDate, DdlTipoMovimiento.SelectedItem.Text & If(TxtConcepto.Text.Trim.Length > 0, " - " & TxtConcepto.Text.Trim, ""), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
If Not DdlTarjeta.Visible OrElse DdlTarjeta.SelectedValue.ToEntero < 1 Then If Not DdlTarjeta.Visible OrElse DdlTarjeta.SelectedValue.ToEntero < 1 Then
CveIE = ObjBancos.AddBancos_IE(DdlCuentas.SelectedValue.ToEntero, DdlTipoTransaccion.SelectedValue.ToEntero, TxtFecha.Text.ToDate, TxtFolio.Text, "", Importe, CveMoneda, If(CveMoneda = 2, GlobalTipoCambio(TxtFecha.Text.Trim.ToDate).ToString.ToDouble, 0), TxtObservacion.Text.Trim, "", False, False, 0, CvePrePoliza, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) CveIE = ObjBancos.AddBancos_IE(DdlCuentas.SelectedValue.ToEntero, DdlTipoTransaccion.SelectedValue.ToEntero, TxtFecha.Text.ToDate, TxtFolio.Text, "", Importe, CveMoneda, If(CveMoneda = 2, GlobalTipoCambio(TxtFecha.Text.Trim.ToDate).ToString.ToDouble, 0), TxtObservacion.Text.Trim, "", False, False, 0, CvePrePoliza, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
End If End If
@@ -366,7 +366,7 @@ Partial Class Bancos_ProductosFinancieros
idCuentaContabilizacion = 0 idCuentaContabilizacion = 0
End If End If
If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, importeMovimiento, "", If(DdlTarjeta.Visible AndAlso DdlTarjeta.SelectedValue.ToEntero > 0 AndAlso ConceptoContable = 30, 42, ConceptoContable), TxtConcepto.Text, FechaMovimiento, If(DdlTarjeta.Visible AndAlso DdlTarjeta.SelectedValue.ToEntero > 0 AndAlso ConceptoContable = 30, DdlTarjeta.SelectedValue.ToEntero, IdCtaContablePP), -1, CveIE, ImporteMX:=importeMovimiento, CveCuenta:=If(UsuarioActual.Empresa.UsaContabilidad AndAlso UsuarioActual.Empresa.UsaContabilidadSIG, ObtenerCuentaDobleConta(If(DdlTarjeta.Visible AndAlso DdlTarjeta.SelectedValue.ToEntero > 0 AndAlso ConceptoContable = 30, DdlTarjeta.SelectedValue.ToEntero, IdCtaContablePP), UsuarioActual.CveEmpresa), -1)) Then If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, importeMovimiento, "", If(DdlTarjeta.Visible AndAlso DdlTarjeta.SelectedValue.ToEntero > 0 AndAlso ConceptoContable = 30, 42, ConceptoContable), DdlTipoMovimiento.SelectedItem.Text & If(TxtConcepto.Text.Trim.Length > 0, " - " & TxtConcepto.Text.Trim, ""), FechaMovimiento, If(DdlTarjeta.Visible AndAlso DdlTarjeta.SelectedValue.ToEntero > 0 AndAlso ConceptoContable = 30, DdlTarjeta.SelectedValue.ToEntero, IdCtaContablePP), -1, CveIE, ImporteMX:=importeMovimiento, CveCuenta:=If(UsuarioActual.Empresa.UsaContabilidad AndAlso UsuarioActual.Empresa.UsaContabilidadSIG, ObtenerCuentaDobleConta(If(DdlTarjeta.Visible AndAlso DdlTarjeta.SelectedValue.ToEntero > 0 AndAlso ConceptoContable = 30, DdlTarjeta.SelectedValue.ToEntero, IdCtaContablePP), UsuarioActual.CveEmpresa), -1)) Then
ErrorTransaccion = True ErrorTransaccion = True
End If End If
End If End If
@@ -405,7 +405,7 @@ Partial Class Bancos_ProductosFinancieros
If DdlTipoMovimiento.SelectedValue = "15" Or DdlTipoMovimiento.SelectedValue = "17" Or DdlTipoMovimiento.SelectedValue = "50" Then If DdlTipoMovimiento.SelectedValue = "15" Or DdlTipoMovimiento.SelectedValue = "17" Or DdlTipoMovimiento.SelectedValue = "50" Then
'PRESUPUESTO EGRESOS 'PRESUPUESTO EGRESOS
IdPoliza = ObjContaAC.AddPoliza(3, TxtConcepto.Text.Trim, Importe, Importe, UsuarioActual.CveUsuario, TxtFecha.Text.ToDate) IdPoliza = ObjContaAC.AddPoliza(3, TxtConcepto.Text.Trim, Importe, Importe, UsuarioActual.CveUsuario, TxtFecha.Text.ToDate)
FolioPoliza = ObjContaAC.Folio
If IdPoliza > 0 Then If IdPoliza > 0 Then
FolioPoliza = ObjContaAC.Folio FolioPoliza = ObjContaAC.Folio
Dim DtPresupuestosTemp As DataTable Dim DtPresupuestosTemp As DataTable
@@ -493,7 +493,7 @@ Partial Class Bancos_ProductosFinancieros
If DdlTipoMovimiento.SelectedValue = "16" Then If DdlTipoMovimiento.SelectedValue = "16" Then
'PRESUPUESTO INGRESOS 'PRESUPUESTO INGRESOS
IdPoliza = ObjContaAC.AddPoliza(1, TxtConcepto.Text.Trim, Importe, Importe, UsuarioActual.CveUsuario, Fecha) IdPoliza = ObjContaAC.AddPoliza(1, TxtConcepto.Text.Trim, Importe, Importe, UsuarioActual.CveUsuario, Fecha)
FolioPoliza = ObjContaAC.Folio
If IdPoliza > 0 Then If IdPoliza > 0 Then
FolioPoliza = ObjContaAC.Folio FolioPoliza = ObjContaAC.Folio
Dim DtPresupuestosTemp As DataTable Dim DtPresupuestosTemp As DataTable

2
Bancos/ProveedoresAbonar.aspx
View File

@@ -358,7 +358,7 @@
<asp:UpdatePanel ID="UPCompras" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UPCompras" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvCxP" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Cuentas X Pagar Pendientes" <asp:GridView ID="GvCxP" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Cuentas X Pagar Pendientes"
DataKeyNames="CveCompra,ImporteProgramo,Saldo,SubTotal,IVA,IVADeducible,IVANoDeducible,IEPS,RetIVA,RetISR,Original,UUID,RFC,CveFactura,SerieFolio,Descripcion,CvePrePoliza,Fecha,EstatusInventario,CveProveedor,TipoCambio, CveMoneda,CveRetIVAConcepto,IVAPorPagar,IVAPorPagarDeducible,IVAPorPagarNoDeducible,IEPSPorPagar,CveRetISRConcepto,PorcentajeIVA,CveTipoConcepto,CveSubProyecto" DataKeyNames="CveCompra,ImporteProgramo,Saldo,SubTotal,IVA,IVADeducible,IVANoDeducible,IEPS,RetIVA,RetISR,Original,UUID,RFC,CveFactura,SerieFolio,Descripcion,CvePrePoliza,Fecha,EstatusInventario,CveProveedor,TipoCambio, CveMoneda,CveRetIVAConcepto,IVAPorPagar,IVAPorPagarDeducible,IVAPorPagarNoDeducible,IEPSPorPagar,CveRetISRConcepto,PorcentajeIVA,CveTipoConcepto,CveSubProyecto,TotalOriginal"
Width="100%" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" Style="text-align: center;" GridLines="None"> Width="100%" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" Style="text-align: center;" GridLines="None">
<Columns> <Columns>
<asp:TemplateField> <asp:TemplateField>

2
Bancos/ProveedoresAbonar.aspx.vb
View File

@@ -709,7 +709,7 @@ Partial Class Bancos_ProveedoresAbonar
Valida.Verificar(gvr.DataKey("UUID"), gvr.DataKey("RFC"), UsuarioActual.Empresa.RFC, gvr.DataKey("Original").ToDecimal) Valida.Verificar(gvr.DataKey("UUID"), gvr.DataKey("RFC"), UsuarioActual.Empresa.RFC, gvr.DataKey("TotalOriginal").ToDecimal)
If Not UsuarioActual.Empresa.FacturaProduccion OrElse UsuarioActual.CveEmpresa < 2 Then If Not UsuarioActual.Empresa.FacturaProduccion OrElse UsuarioActual.CveEmpresa < 2 Then
Valida.EsValida = 1 Valida.EsValida = 1

2
Bancos/ProveedoresCreditos.aspx.vb
View File

@@ -912,7 +912,7 @@ Partial Class Bancos_ProveedoresCreditos
Dim tImporteMonedaExtranjera As Decimal = 0 Dim tImporteMonedaExtranjera As Decimal = 0
If tCveMoneda <> 1 Then tImporteMonedaExtranjera = TxtImporte.Text.ToDecimal * GlobalTipoCambio(TxtFechaDocumento.Text.Trim.ToDate).ToString.ToDecimal If tCveMoneda <> 1 Then tImporteMonedaExtranjera = TxtImporte.Text.ToDecimal * GlobalTipoCambio(TxtFechaDocumento.Text.Trim.ToDate).ToString.ToDecimal
'cheque 'cheque
If DdlTipoTransaccion.SelectedValue = "1" Then FolioFijo = TxtFolio.Text.ToEntero If DdlTipoTransaccion.SelectedValue = "1" AndAlso UsuarioActual.CveEmpresa <> 119 Then FolioFijo = TxtFolio.Text.ToEntero
CvePrePoliza = ObjMov.AddPrePolizas("Bancos/ProvCred", CvePlantillaPoliza, TxtImporte.Text.Trim.ToDouble, TxtImporte.Text.Trim.ToDouble, tCveMoneda, TxtFechaDocumento.Text.ToDate, TxtPagueseA.Text.Trim, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo:=FolioFijo, ReglaFolioPoliza:=ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, Nothing, UsuarioActual.CveEmpresa), CveTipoPoliza:=ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa)) CvePrePoliza = ObjMov.AddPrePolizas("Bancos/ProvCred", CvePlantillaPoliza, TxtImporte.Text.Trim.ToDouble, TxtImporte.Text.Trim.ToDouble, tCveMoneda, TxtFechaDocumento.Text.ToDate, TxtPagueseA.Text.Trim, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo:=FolioFijo, ReglaFolioPoliza:=ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, Nothing, UsuarioActual.CveEmpresa), CveTipoPoliza:=ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa))

1
CRM/CatEtapasProceso.aspx.cs
View File

@@ -156,6 +156,7 @@ public partial class CRM_CatEtapasProceso : ClsPaginas
DdlTipoProceso.SelectedValueExist(-1); DdlTipoProceso.SelectedValueExist(-1);
DdlTipoProceso.DataBind(); DdlTipoProceso.DataBind();
DdlTipoProceso.Items.Insert(0, new ListItem("Seleccione", "-1"));
DdlFiltroProceso.DataBind(); DdlFiltroProceso.DataBind();
UPFiltros.Update(); UPFiltros.Update();

1
CRM/CatRechazoMotivo.aspx.cs
View File

@@ -95,6 +95,7 @@ public partial class CRM_CatRechazoMotivo : ClsPaginas
} }
ObjCRM.Dispose(); ObjCRM.Dispose();
DdlTipoProceso.DataBind(); DdlTipoProceso.DataBind();
DdlTipoProceso.Items.Insert(0,new ListItem("Seleccione","-1"));
} }
protected void limpiarCamposModal(string NombreRechazo = "") protected void limpiarCamposModal(string NombreRechazo = "")

21
Compras/Compras.aspx.vb
View File

@@ -4335,7 +4335,7 @@ Partial Class Compras_Compras
Try Try
Dim FolioFijo As Integer = 0 Dim FolioFijo As Integer = 0
'cheque 'cheque
If DdlTipoTransaccion.SelectedValue = "1" Then FolioFijo = TxtFolio.Text.ToEntero If DdlTipoTransaccion.SelectedValue = "1" Then FolioFijo = TxtFolio.Text.ToEntero
CvePrePoliza = ObjConta.AddPrePolizas("Compras/Registrar", If(EsContado And CvePlantillaPrePoliza = 1, 2, CvePlantillaPrePoliza), ImporteCompra, TxtTotal.Text.ToDouble, DdlMoneda.SelectedValue.ToEntero, TxtFecha.Text.ToDate, ConceptoPoliza, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo:=FolioFijo, ReglaFolioPoliza:=ObjCompras.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, DdlTipoTransaccionCaja.SelectedValue, UsuarioActual.CveEmpresa), CveTipoPoliza:=ObjConta.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, DdlTipoTransaccionCaja.SelectedValue, UsuarioActual.CveEmpresa)) CvePrePoliza = ObjConta.AddPrePolizas("Compras/Registrar", If(EsContado And CvePlantillaPrePoliza = 1, 2, CvePlantillaPrePoliza), ImporteCompra, TxtTotal.Text.ToDouble, DdlMoneda.SelectedValue.ToEntero, TxtFecha.Text.ToDate, ConceptoPoliza, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo:=FolioFijo, ReglaFolioPoliza:=ObjCompras.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, DdlTipoTransaccionCaja.SelectedValue, UsuarioActual.CveEmpresa), CveTipoPoliza:=ObjConta.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, DdlTipoTransaccionCaja.SelectedValue, UsuarioActual.CveEmpresa))
@@ -6454,6 +6454,7 @@ Partial Class Compras_Compras
Select Case ConceptoContabilizacion Select Case ConceptoContabilizacion
Case 176 Case 176
Dim SumatoriaOCINV = 0.0D, Importe176 = 0.0D, ImporteME176 = 0.0D, ImporteMN176 = 0.0D, Importe228 = 0.0D, ImporteME228 = 0.0D, ImporteMN228 = 0.0D, Importe229 = 0.0D, ImporteME229 = 0.0D, ImporteMN229 = 0.0D, ImporteCI176 = 0.0D Dim SumatoriaOCINV = 0.0D, Importe176 = 0.0D, ImporteME176 = 0.0D, ImporteMN176 = 0.0D, Importe228 = 0.0D, ImporteME228 = 0.0D, ImporteMN228 = 0.0D, Importe229 = 0.0D, ImporteME229 = 0.0D, ImporteMN229 = 0.0D, ImporteCI176 = 0.0D
Dim SumatoriaInventario As Decimal = 0
For Each Dr As DataRow In TmpDT.FiltraParametros("ISNULL(TipoAF,0) <> 2 And ISNULL(CveAlmacen,0) = 0 And ISNULL(AplicaCostoIndirecto,0) <> 1 And ISNULL(CveTipoPS,0) = 2").Rows For Each Dr As DataRow In TmpDT.FiltraParametros("ISNULL(TipoAF,0) <> 2 And ISNULL(CveAlmacen,0) = 0 And ISNULL(AplicaCostoIndirecto,0) <> 1 And ISNULL(CveTipoPS,0) = 2").Rows
If ObjOC.OrdenesCompraDetalleCostoPP(Dr("CveOrdenCompraDetalle").ToString.ToEntero) AndAlso ObjOC.DtResultados.Rows.Count >= 1 Then If ObjOC.OrdenesCompraDetalleCostoPP(Dr("CveOrdenCompraDetalle").ToString.ToEntero) AndAlso ObjOC.DtResultados.Rows.Count >= 1 Then
Concepto = $"{NombreProveedor} {TxtSerie.Text} - {TxtFolio.Text} OC {ObjOC.DtResultados.FiltroPrimeroValor("Folio").ToString} Inv{ObjOC.DtResultados.FiltroPrimeroValor("FolioAlmacen").ToString}" Concepto = $"{NombreProveedor} {TxtSerie.Text} - {TxtFolio.Text} OC {ObjOC.DtResultados.FiltroPrimeroValor("Folio").ToString} Inv{ObjOC.DtResultados.FiltroPrimeroValor("FolioAlmacen").ToString}"
@@ -6467,6 +6468,7 @@ Partial Class Compras_Compras
If DdlMoneda.SelectedValue.ToEntero <> 1 And UsuarioActual.CveEmpresa.Contiene(119) Then If DdlMoneda.SelectedValue.ToEntero <> 1 And UsuarioActual.CveEmpresa.Contiene(119) Then
ImporteCI176 = ObjOC.DtResultados.FiltroPrimeroValor("ImporteCI228").ToDecimal ImporteCI176 = ObjOC.DtResultados.FiltroPrimeroValor("ImporteCI228").ToDecimal
CostoIndirectoAcum176 += ImporteCI176 CostoIndirectoAcum176 += ImporteCI176
SumatoriaInventario += Importe228 + Importe229
'se considera costoindirecto, para que la factura tiene en un concepto tipo servicio 'se considera costoindirecto, para que la factura tiene en un concepto tipo servicio
SumatoriaOCINV += (Dr(If(ListaDocumentos IsNot Nothing AndAlso ListaDocumentos.Count > 0 AndAlso ArrAnticipos IsNot Nothing AndAlso ArrAnticipos.Count > 0 AndAlso TxtTotal.Text.ToDecimal = 0, "ImporteSinImpuestos", "Total")).ToString.ToDecimal * tipoCambioActual) - (ImporteMN228 + ImporteMN229 - ImporteCI176) SumatoriaOCINV += (Dr(If(ListaDocumentos IsNot Nothing AndAlso ListaDocumentos.Count > 0 AndAlso ArrAnticipos IsNot Nothing AndAlso ArrAnticipos.Count > 0 AndAlso TxtTotal.Text.ToDecimal = 0, "ImporteSinImpuestos", "Total")).ToString.ToDecimal * tipoCambioActual) - (ImporteMN228 + ImporteMN229 - ImporteCI176)
If ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, Importe228, Referencia, ConceptoContabilizacionME, Concepto, FechaMovimiento, IdCtaContableME, -1, CveCompra:=CveCompra, CveProveedor:=CveProveedorConcepto, ImporteMX:=ImporteMN228, ImporteME:=ImporteME228, CveCuenta:=CveCuenta, CveOCDetalle:=Dr("CveOrdenCompraDetalle").ToString.ToEntero, TipoCambio:=TCAjuste, CveMovimientoAlmacen:=CveMovimientoAlmacen, Contabilizable:=SeContabiliza) Then If ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, Importe228, Referencia, ConceptoContabilizacionME, Concepto, FechaMovimiento, IdCtaContableME, -1, CveCompra:=CveCompra, CveProveedor:=CveProveedorConcepto, ImporteMX:=ImporteMN228, ImporteME:=ImporteME228, CveCuenta:=CveCuenta, CveOCDetalle:=Dr("CveOrdenCompraDetalle").ToString.ToEntero, TipoCambio:=TCAjuste, CveMovimientoAlmacen:=CveMovimientoAlmacen, Contabilizable:=SeContabiliza) Then
@@ -6480,6 +6482,7 @@ Partial Class Compras_Compras
End If End If
Else Else
CostoIndirectoAcum176 += ImporteCI176 CostoIndirectoAcum176 += ImporteCI176
SumatoriaInventario += Importe176
'se considera costoindirecto, para que la factura tiene en un concepto tipo servicio 'se considera costoindirecto, para que la factura tiene en un concepto tipo servicio
SumatoriaOCINV += (Dr(If(ListaDocumentos IsNot Nothing AndAlso ListaDocumentos.Count > 0 AndAlso ArrAnticipos IsNot Nothing AndAlso ArrAnticipos.Count > 0 AndAlso TxtTotal.Text.ToDecimal = 0, "ImporteSinImpuestos", "Total")).ToString.ToDecimal * tipoCambioActual) - (ImporteMN176 - ImporteCI176) SumatoriaOCINV += (Dr(If(ListaDocumentos IsNot Nothing AndAlso ListaDocumentos.Count > 0 AndAlso ArrAnticipos IsNot Nothing AndAlso ArrAnticipos.Count > 0 AndAlso TxtTotal.Text.ToDecimal = 0, "ImporteSinImpuestos", "Total")).ToString.ToDecimal * tipoCambioActual) - (ImporteMN176 - ImporteCI176)
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, Importe176, Referencia, ConceptoContabilizacion, Concepto, FechaMovimiento, IdCtaContable, -1, CveCompra:=CveCompra, CveProveedor:=CveProveedorConcepto, ImporteMX:=ImporteMN176, ImporteME:=ImporteME176, CveCuenta:=CveCuenta, CveOCDetalle:=Dr("CveOrdenCompraDetalle").ToString.ToEntero, CveMovimientoAlmacen:=CveMovimientoAlmacen, Contabilizable:=SeContabiliza) Then If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, Importe176, Referencia, ConceptoContabilizacion, Concepto, FechaMovimiento, IdCtaContable, -1, CveCompra:=CveCompra, CveProveedor:=CveProveedorConcepto, ImporteMX:=ImporteMN176, ImporteME:=ImporteME176, CveCuenta:=CveCuenta, CveOCDetalle:=Dr("CveOrdenCompraDetalle").ToString.ToEntero, CveMovimientoAlmacen:=CveMovimientoAlmacen, Contabilizable:=SeContabiliza) Then
@@ -6493,9 +6496,13 @@ Partial Class Compras_Compras
Exit For Exit For
End If End If
Next Next
'calcula la diferencia entre lo recibido por la OC, considerando costos indirectos y lo que se ingresaria en la compra
SumatoriaOCINV = SumatoriaInventario - TmpDT.SUMD("Total") 'sumatoria de la factura
If SumatoriaOCINV.RoundSQL <> 0 Then If SumatoriaOCINV.RoundSQL <> 0 Then
' se abona el costo, cambiamos su naturaleza ' se abona el costo, cambiamos su naturaleza
SumatoriaOCINV = -SumatoriaOCINV 'SumatoriaOCINV = -SumatoriaOCINV
Dim CveClasificacionCostoOC = TmpDT.FiltroPrimeroValor("CveClasificacion", "ISNULL(TipoAF, 0) <> 2 And ISNULL(CveAlmacen, 0) = 0 And ISNULL(AplicaCostoIndirecto, 0) <> 1 And ISNULL(CveTipoPS, 0) = 2").ToEntero Dim CveClasificacionCostoOC = TmpDT.FiltroPrimeroValor("CveClasificacion", "ISNULL(TipoAF, 0) <> 2 And ISNULL(CveAlmacen, 0) = 0 And ISNULL(AplicaCostoIndirecto, 0) <> 1 And ISNULL(CveTipoPS, 0) = 2").ToEntero
IdCtaContable = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimeroValor("IdCuentaCostos", $"CveClasificacion = {CveClasificacionCostoOC}").ToString.ToEntero IdCtaContable = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimeroValor("IdCuentaCostos", $"CveClasificacion = {CveClasificacionCostoOC}").ToString.ToEntero
CveCuenta = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimeroValor("IdCuentaGastoSIG", $"CveClasificacion = {CveClasificacionCostoOC}").ToString.ToEntero CveCuenta = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimeroValor("IdCuentaGastoSIG", $"CveClasificacion = {CveClasificacionCostoOC}").ToString.ToEntero
@@ -7361,8 +7368,8 @@ Partial Class Compras_Compras
If ErrorPrepoliza Then If ErrorPrepoliza Then
Exit For Exit For
End If End If
', 305, 306, 311
If importeMovimiento <> 0 Or (ConceptoContable.Contiene(5, 305, 306, 311) AndAlso DdlTipoComprobante.SelectedValue.Contiene("Fac", "Ant")) Or (ConceptoContable.Contiene(18) AndAlso DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") AndAlso Not GuardoConcepto18) Then If importeMovimiento <> 0 Or (ConceptoContable.Contiene(5) AndAlso DdlTipoComprobante.SelectedValue.Contiene("Fac", "Ant")) Or (ConceptoContable.Contiene(18) AndAlso DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") AndAlso Not GuardoConcepto18) Then
'Conta ContPAQ 'Conta ContPAQ
If IdCtaContable = 0 Then If IdCtaContable = 0 Then
CuentasContablesInvalidas.Append("<br>" & GlobalDTContaConceptosContables(-1).FiltroPrimero(String.Format("CveConceptoContable = {0}", ConceptoContable))("ConceptoContable").ToString) CuentasContablesInvalidas.Append("<br>" & GlobalDTContaConceptosContables(-1).FiltroPrimero(String.Format("CveConceptoContable = {0}", ConceptoContable))("ConceptoContable").ToString)
@@ -7384,7 +7391,7 @@ Partial Class Compras_Compras
Next Next
'EMPIEZA REFACTURACION 'EMPIEZA REFACTURACION
If CveCompraRefacturacion > 0 Then If Not ErrorPrepoliza AndAlso CveCompraRefacturacion > 0 Then
ErrorBitacora = GuardaRefacturacion(ObjCompras, ObjEventos, CvePrePoliza) ErrorBitacora = GuardaRefacturacion(ObjCompras, ObjEventos, CvePrePoliza)
If ErrorBitacora Then If ErrorBitacora Then
Alert("Ocurrió un error al hacer la Refacturación", TipoMensaje.MsgError) Alert("Ocurrió un error al hacer la Refacturación", TipoMensaje.MsgError)
@@ -7392,13 +7399,13 @@ Partial Class Compras_Compras
End If End If
'Simplificacion de PrePolizas 'Simplificacion de PrePolizas
If UsuarioActual.Empresa.Funcionalidad(220) <> "" Then If Not ErrorPrepoliza AndAlso UsuarioActual.Empresa.Funcionalidad(220) <> "" Then
If Not ObjConta.PrePolizaSimplificacion(CvePrePoliza, UsuarioActual.CveEmpresa) Then If Not ObjConta.PrePolizaSimplificacion(CvePrePoliza, UsuarioActual.CveEmpresa) Then
ErrorPrepolizaDescuadre = True ErrorPrepolizaDescuadre = True
End If End If
End If End If
If ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, 4) Then If Not ErrorPrepoliza AndAlso ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, 4) Then
If ObjConta.ValorPolizaDescuadre > 0 Then If ObjConta.ValorPolizaDescuadre > 0 Then
GuardaLogAD($"Compras/Compras-Guardar | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas") GuardaLogAD($"Compras/Compras-Guardar | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
ErrorPrepolizaDescuadre = True ErrorPrepolizaDescuadre = True

2
Compras/PopUpVerFactura.aspx.vb
View File

@@ -3572,7 +3572,7 @@ Partial Class PopUpVerFactura
#Region "OP = 'CAN' - CANCELACION" #Region "OP = 'CAN' - CANCELACION"
Public Sub ImprimeCancelacion(CveVenta As Integer) Public Sub ImprimeCancelacion(CveVenta As Integer)
Dim ObjVentas As New ClsVentas Dim ObjVentas As New ClsVentas
If ObjVentas.GetVenta(CveVenta, UsuarioActual.CveEmpresa) Then If ObjVentas.GetVenta(CveVenta, UsuarioActual.CveEmpresa) AndAlso ObjVentas.DtResultados IsNot Nothing AndAlso ObjVentas.DtResultados.Rows.Count > 0 Then
Dim drv As DataRow = ObjVentas.DtResultados.Rows(0) Dim drv As DataRow = ObjVentas.DtResultados.Rows(0)
Dim FolioFiscal = drv("FolioFiscal").ToString Dim FolioFiscal = drv("FolioFiscal").ToString
Dim SelloCancelacion = drv("SelloCancelacion").ToString Dim SelloCancelacion = drv("SelloCancelacion").ToString

10
Contabilidad/PlantillasPolizasDetalle.aspx
View File

@@ -160,7 +160,7 @@
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CvePlantillaPolizaDetalle, TipoMovimiento, CveSubProyecto, CveProveedor, CvePersonal, CveConcepto, IdCtaContable, Orden" EmptyDataText="No se encontraron Plantilla de Pólizas Registradas" ToolTip="Listado de Plantilla de Pólizas" CssClass="table table-striped table-advance table-hover Widthall" GridLines="None"> <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CvePlantillaPolizaDetalle, TipoMovimiento, CveSubProyecto, CveProveedor, CvePersonal, CveConcepto, IdCtaContable, Orden,PorcentajeImpuesto" EmptyDataText="No se encontraron Plantilla de Pólizas Registradas" ToolTip="Listado de Plantilla de Pólizas" CssClass="table table-striped table-advance table-hover Widthall" GridLines="None">
<Columns> <Columns>
<asp:TemplateField HeaderText="Concepto Contable"> <asp:TemplateField HeaderText="Concepto Contable">
<ItemTemplate> <ItemTemplate>
@@ -283,7 +283,13 @@
<label for="<%= TxtOrden.ClientID.ToString()%>">Orden:</label> <label for="<%= TxtOrden.ClientID.ToString()%>">Orden:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlPorcentajeImpuesto" CssClass="form-control input-sm select2me js-referencia-programmatic" runat="server" Visible="false" AppendDataBoundItems="true" Width="240px" ValidationGroup="GrpAgregar">
<asp:ListItem Text="8%" Value="0.08"></asp:ListItem>
<asp:ListItem Text="16%" Value="0.16"></asp:ListItem>
</asp:DropDownList>
<label id="LblPorcentajeImpuesto" runat="server" for="<%= DdlPorcentajeImpuesto.ClientID.ToString()%>">Tasa:</label>
</div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlPersonal" CssClass="form-control input-sm select2me js-referencia-programmatic" runat="server" AppendDataBoundItems="true" DataTextField="NombreCompleto" DataValueField="CvePersonal" Width="240px" ValidationGroup="GrpAgregar"></asp:DropDownList> <asp:DropDownList ID="DdlPersonal" CssClass="form-control input-sm select2me js-referencia-programmatic" runat="server" AppendDataBoundItems="true" DataTextField="NombreCompleto" DataValueField="CvePersonal" Width="240px" ValidationGroup="GrpAgregar"></asp:DropDownList>
<label ID="LblPersonal" runat="server" for="<%= DdlPersonal.ClientID.ToString()%>">Personal:</label> <label ID="LblPersonal" runat="server" for="<%= DdlPersonal.ClientID.ToString()%>">Personal:</label>

23
Contabilidad/PlantillasPolizasDetalle.aspx.vb
View File

@@ -158,6 +158,7 @@ Partial Class Contabilidad_PlantillasPolizasDetalle
DTDetalle.Columns.Add("IdCtaContable", GetType(Integer)) DTDetalle.Columns.Add("IdCtaContable", GetType(Integer))
DTDetalle.Columns.Add("Orden", GetType(String)) DTDetalle.Columns.Add("Orden", GetType(String))
DTDetalle.Columns.Add("Usuario", GetType(String)) DTDetalle.Columns.Add("Usuario", GetType(String))
DTDetalle.Columns.Add("PorcentajeImpuesto", GetType(Decimal))
End Sub End Sub
#End Region #End Region
@@ -172,7 +173,7 @@ Partial Class Contabilidad_PlantillasPolizasDetalle
CvePlantilla = ObjPlantillaPoliza.CvePlantillaPoliza CvePlantilla = ObjPlantillaPoliza.CvePlantillaPoliza
If DTDetalle.Rows.Count > 0 Then If DTDetalle.Rows.Count > 0 Then
For Each Row As DataRow In DTDetalle.Rows For Each Row As DataRow In DTDetalle.Rows
If Not ObjPlantillaPoliza.AddConta_PlantillasPolizasDetalles(CvePlantilla, Row("CveConcepto").ToString.ToEntero, Row("TipoMovto").ToString.ToEntero, Row("IdCtaContable").ToString.ToEntero, Row("Orden").ToString.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, DDLSubProyecto.SelectedValue.ToEntero, DDLProveedor.SelectedValue.ToEntero, DdlPersonal.SelectedValue.ToEntero) Then If Not ObjPlantillaPoliza.AddConta_PlantillasPolizasDetalles(CvePlantilla, Row("CveConcepto").ToString.ToEntero, Row("TipoMovto").ToString.ToEntero, Row("IdCtaContable").ToString.ToEntero, Row("Orden").ToString.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, DDLSubProyecto.SelectedValue.ToEntero, DDLProveedor.SelectedValue.ToEntero, DdlPersonal.SelectedValue.ToEntero, DdlPorcentajeImpuesto.SelectedValue.ToDecimal) Then
ErrorPlantilla = True ErrorPlantilla = True
Exit For Exit For
End If End If
@@ -228,7 +229,7 @@ Partial Class Contabilidad_PlantillasPolizasDetalle
If HdnModalidad.Value = "I" Then If HdnModalidad.Value = "I" Then
If CvePlantillaPoliza > 0 Then If CvePlantillaPoliza > 0 Then
If ObjPlantillaPolizaDetalle.AddConta_PlantillasPolizasDetalles(CvePlantillaPoliza, DdlConcepto.SelectedValue.ToEntero, DdlTipoMovimiento.SelectedValue.ToEntero, DdlCtaContable.SelectedValue.ToEntero, TxtOrden.Text.Trim.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, DDLSubProyecto.SelectedValue.ToEntero, DDLProveedor.SelectedValue.ToEntero, DdlPersonal.SelectedValue.ToEntero) Then If ObjPlantillaPolizaDetalle.AddConta_PlantillasPolizasDetalles(CvePlantillaPoliza, DdlConcepto.SelectedValue.ToEntero, DdlTipoMovimiento.SelectedValue.ToEntero, DdlCtaContable.SelectedValue.ToEntero, TxtOrden.Text.Trim.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, DDLSubProyecto.SelectedValue.ToEntero, DDLProveedor.SelectedValue.ToEntero, DdlPersonal.SelectedValue.ToEntero, DdlPorcentajeImpuesto.SelectedValue.ToDecimal) Then
TxtOrden.Text = "" TxtOrden.Text = ""
updatatos() updatatos()
Alert("El nuevo Registro se guardó correctamente.", TipoMensaje.MsgInformacion) Alert("El nuevo Registro se guardó correctamente.", TipoMensaje.MsgInformacion)
@@ -260,7 +261,7 @@ Partial Class Contabilidad_PlantillasPolizasDetalle
If HdnID.Value.ToEntero <> -1 Then If HdnID.Value.ToEntero <> -1 Then
If CvePlantillaPoliza > 0 Then If CvePlantillaPoliza > 0 Then
If ObjPlantillaPolizaDetalle.UpdateConta_PlantillasPolizasDetalle(DdlConcepto.SelectedValue.ToEntero, DdlTipoMovimiento.SelectedValue.ToEntero, DdlCtaContable.SelectedValue.ToEntero, TxtOrden.Text.Trim.ToEntero, If ObjPlantillaPolizaDetalle.UpdateConta_PlantillasPolizasDetalle(DdlConcepto.SelectedValue.ToEntero, DdlTipoMovimiento.SelectedValue.ToEntero, DdlCtaContable.SelectedValue.ToEntero, TxtOrden.Text.Trim.ToEntero,
HdnID.Value.ToEntero, DDLSubProyecto.SelectedValue.ToEntero, DDLProveedor.SelectedValue.ToEntero, DdlPersonal.SelectedValue.ToEntero) Then HdnID.Value.ToEntero, DDLSubProyecto.SelectedValue.ToEntero, DDLProveedor.SelectedValue.ToEntero, DdlPersonal.SelectedValue.ToEntero, DdlPorcentajeImpuesto.SelectedValue.ToDecimal) Then
Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion) Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
updatatos() updatatos()
Else Else
@@ -352,6 +353,13 @@ Partial Class Contabilidad_PlantillasPolizasDetalle
DdlPersonal.Visible = False DdlPersonal.Visible = False
LblPersonal.Visible = False LblPersonal.Visible = False
End If End If
If DdlConcepto.SelectedValue.Contiene("19", "61") Then ' conceptos de IVA Acreditable e IVA Trasladado
DdlPorcentajeImpuesto.Visible = True
LblPorcentajeImpuesto.Visible = True
Else
DdlPorcentajeImpuesto.Visible = False
LblPorcentajeImpuesto.Visible = False
End If
End Sub End Sub
@@ -392,6 +400,15 @@ Partial Class Contabilidad_PlantillasPolizasDetalle
DdlPersonal.Visible = False DdlPersonal.Visible = False
LblPersonal.Visible = False LblPersonal.Visible = False
End If End If
If DdlConcepto.SelectedValue.Contiene("19", "61") Then ' conceptos de IVA Acreditable e IVA Trasladado
DdlPorcentajeImpuesto.SelectedValueExist(GvRow.DataKey("PorcentajeImpuesto"))
DdlPorcentajeImpuesto.Visible = True
LblPorcentajeImpuesto.Visible = True
Else
DdlPorcentajeImpuesto.Visible = False
LblPorcentajeImpuesto.Visible = False
End If
UpModal.Update() UpModal.Update()
RegistraScript(String.Format("$('#{0}').modal();", "divAgregarSucursal")) RegistraScript(String.Format("$('#{0}').modal();", "divAgregarSucursal"))
CargaDatos() CargaDatos()

2
Contabilidad/RegPrePoliza.aspx
View File

@@ -302,7 +302,7 @@
</table> </table>
<div style="width: 100%; min-height: 200px; overflow-scrolling: auto;"> <div style="width: 100%; min-height: 200px; overflow-scrolling: auto;">
<asp:GridView ID="GvMov" runat="server" AutoGenerateColumns="False" ShowHeader="False" DataKeyNames="IdMov,IDCuenta,Cargo,Abono,TipoMovto,CveConcepto,CveProveedor,CvePersonal, CveCompra,CveClasificacion,CveCliente,CveVenta,TC,CveOC" Width="100%" CssClass=" GvMov GvSize table table-striped table-advance table-hover mysmallbtn" GridLines="None"> <asp:GridView ID="GvMov" runat="server" AutoGenerateColumns="False" ShowHeader="False" DataKeyNames="IdMov,IDCuenta,Cargo,Abono,TipoMovto,CveConcepto,CveProveedor,CvePersonal, CveCompra,CveClasificacion,CveCliente,CveVenta,TC,CveOC,PorcentajeImpuesto" Width="100%" CssClass=" GvMov GvSize table table-striped table-advance table-hover mysmallbtn" GridLines="None">
<Columns> <Columns>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Cuenta</HeaderTemplate> <HeaderTemplate>Cuenta</HeaderTemplate>

19
Contabilidad/RegPrePoliza.aspx.vb
View File

@@ -296,8 +296,8 @@ Partial Class ContabilidadC_RegPrePoliza
.Add("Cuenta", Type.GetType("System.String")) .Add("Cuenta", Type.GetType("System.String"))
.Add("Referencia", Type.GetType("System.String")) .Add("Referencia", Type.GetType("System.String"))
.Add("Concepto", Type.GetType("System.String")) .Add("Concepto", Type.GetType("System.String"))
.Add("Cargo", Type.GetType("System.Double")) .Add("Cargo", Type.GetType("System.Decimal"))
.Add("Abono", Type.GetType("System.Double")) .Add("Abono", Type.GetType("System.Decimal"))
.Add("TipoMovto", Type.GetType("System.Int32")) .Add("TipoMovto", Type.GetType("System.Int32"))
.Add("EsComodin", Type.GetType("System.Int32")) .Add("EsComodin", Type.GetType("System.Int32"))
.Add("CveConcepto", Type.GetType("System.Int32")) .Add("CveConcepto", Type.GetType("System.Int32"))
@@ -316,7 +316,8 @@ Partial Class ContabilidadC_RegPrePoliza
.Add("IdCtaContable", Type.GetType("System.Int32")) .Add("IdCtaContable", Type.GetType("System.Int32"))
.Add("CveOC", Type.GetType("System.Int32")) .Add("CveOC", Type.GetType("System.Int32"))
.Add("ConceptoContable", Type.GetType("System.String")) .Add("ConceptoContable", Type.GetType("System.String"))
.Add("TC", Type.GetType("System.Double")) .Add("TC", Type.GetType("System.Decimal"))
.Add("PorcentajeImpuesto", Type.GetType("System.Decimal"))
End With End With
End Sub End Sub
@@ -714,7 +715,8 @@ Partial Class ContabilidadC_RegPrePoliza
dr("CveProveedor") = drt("CveProveedor") dr("CveProveedor") = drt("CveProveedor")
dr("CvePersonal") = drt("CvePersonal") dr("CvePersonal") = drt("CvePersonal")
dr("CveClasificacion") = -1 dr("CveClasificacion") = -1
dr("MultipleSubProyecto") = drt("MultipleSubProyecto") dr("MultipleSubProyecto") = drt("MultipleSubProyecto")
dr("PorcentajeImpuesto") = drt("PorcentajeImpuesto")
DtMovimientos.Rows.Add(dr) DtMovimientos.Rows.Add(dr)
Next Next
@@ -861,6 +863,7 @@ Partial Class ContabilidadC_RegPrePoliza
Dim Importe As Double = 0 Dim Importe As Double = 0
Dim TipoMovto As Boolean = False Dim TipoMovto As Boolean = False
Dim IdCtaContable As Integer = 0 Dim IdCtaContable As Integer = 0
Dim PorcentajeImpuesto As Decimal = 0
'Registra movimieno bancario 'Registra movimieno bancario
If CveConcepto = 30 Then If CveConcepto = 30 Then
@@ -877,7 +880,8 @@ Partial Class ContabilidadC_RegPrePoliza
Dim CveCompra As Integer = -1 Dim CveCompra As Integer = -1
'inserto las compras que voy a pagarDdlSaldos 'inserto las compras que voy a pagarDdlSaldos
For Each gvr As GridViewRow In GvMov.Rows For Each gvr As GridViewRow In GvMov.Rows
If gvr.DataKey("IDCuenta").ToEntero > 0 Then If gvr.DataKey("IDCuenta").ToEntero > 0 Then
IdCtaContable = gvr.DataKey("IDCuenta") IdCtaContable = gvr.DataKey("IDCuenta")
End If End If
@@ -919,8 +923,9 @@ Partial Class ContabilidadC_RegPrePoliza
CveProveedor:=CveProveedor, CveCompra:=CveCompra, CveProveedor:=CveProveedor, CveCompra:=CveCompra,
CvePersonal:=gvr.DataKey("CvePersonal").ToEntero, CveClasificacion:=gvr.DataKey("CveClasificacion").ToEntero, CvePersonal:=gvr.DataKey("CvePersonal").ToEntero, CveClasificacion:=gvr.DataKey("CveClasificacion").ToEntero,
ImporteMX:=Importe, CveTipoGasto:=gvr.FCDropDownList("DdlTipoGasto").SelectedValue.ToEntero, ImporteMX:=Importe, CveTipoGasto:=gvr.FCDropDownList("DdlTipoGasto").SelectedValue.ToEntero,
CveCliente:=gvr.DataKey("CveCliente").ToEntero, CveVenta:=gvr.DataKey("CveVenta").ToEntero, TipoCambio:=If(gvr.DataKey("TC").ToString.ToDouble > 0, gvr.DataKey("TC").ToString.ToDouble, 1), CveCliente:=gvr.DataKey("CveCliente").ToEntero, CveVenta:=gvr.DataKey("CveVenta").ToEntero, TipoCambio:=If(gvr.DataKey("TC").ToString.ToDecimal > 0, gvr.DataKey("TC").ToString.ToDecimal, 1),
ImporteME:=If(gvr.DataKey("TC").ToString.ToDouble > 0, (Importe / (gvr.DataKey("TC").ToString.ToDouble - 1)).RoundSQL, 0)) Then ImporteME:=If(gvr.DataKey("TC").ToString.ToDecimal > 0, (Importe / (gvr.DataKey("TC").ToString.ToDecimal - 1)).RoundSQL, 0),
PorcentajeImpuesto:=gvr.DataKey("PorcentajeImpuesto").ToDecimal) Then
Else Else
MsgError = "No se pudo insertar el detalle de la póliza2" MsgError = "No se pudo insertar el detalle de la póliza2"
Exit For Exit For

757
Contabilidad2/RepBalanceGeneralHorizontal.aspx
View File

@@ -1,30 +1,37 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepBalanceGeneralHorizontal.aspx.vb" Inherits="Contabilidad_RepBalanceGeneralHorizontal" %> <%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepBalanceGeneralHorizontal.aspx.vb" Inherits="Contabilidad_RepBalanceGeneralHorizontal" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server"> <asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server"> <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server"> <asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server"> <asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
<asp:Literal ID="LtTitulo" Text="Estado de Resultados" runat="server" /> <asp:Literal ID="LtTitulo" Text="Estado de Situación Financiera" runat="server" />
</asp:Content> </asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server"> <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<%-- <li>
<asp:LinkButton ID="ImgExcel" runat="server"><i class="fa fa-ad-excel"></i> Exporta Excel</asp:LinkButton>
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server"> </li>
<li>
<asp:UpdatePanel runat="server" ID="UpFiltros" UpdateMode="Conditional"> <asp:LinkButton ID="Imprimir" runat="server"><i class="fa fa-print"></i> Imprimir</asp:LinkButton>
<ContentTemplate> </li>--%>
<div class="portlet solid grey-cascade portlet-filter">
<div class="portlet-title portlet-filterT smalltitle"> </asp:Content>
<div class="tools"> <asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
<asp:Button ID="BtnConsultar" Text="Consultar" CssClass="btn btn-primary" runat="server" OnClick="BtnConsultar_Click" /> <asp:UpdatePanel runat="server" ID="UpFiltros" UpdateMode="Conditional">
</div> <ContentTemplate>
<div class="titlefiltros caption "> <div class="portlet solid grey-cascade portlet-filter">
<div class="row"> <div class="portlet-title portlet-filterT smalltitle">
<div class="tools">
<asp:Button ID="BtnConsultar" CssClass="btn btn-default" Text="Consultar" runat="server" OnClick="BtnConsultar_Click" />
<a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a><%--class="expand"--%>
<asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" />
</div>
<div class="titlefiltros caption ">
<div class="row">
<ul class="list-inline text-size-12"> <ul class="list-inline text-size-12">
<label class="col-md-1" style="width: 80px;" runat="server" id="LiEjercicioLbl" >Ejercicio: </label> <label class="col-md-1" style="width: 80px;" runat="server" id="LiEjercicioLbl" >Ejercicio: </label>
@@ -33,12 +40,12 @@
</asp:DropDownList> </asp:DropDownList>
</div> </div>
<label class="col-md-1" style="width: 80px;" runat="server" id="LiEjercicioLbl2" visible="false" >Ejercicio Final: </label> <%-- <label class="col-md-1" style="width: 80px;" runat="server" id="LiEjercicioLbl2" visible="false" >Ejercicio Final: </label>
<div class="col-md-1 " runat="server" id="LiEjercicioDdl2" visible="false" > <div class="col-md-1 " runat="server" id="LiEjercicioDdl2" visible="false" >
<asp:DropDownList ID="DdlEjercicio2" runat="server" CssClass="select2me" DataTextField="Ejercicio" DataValueField="Ejercicio" Width="100px"> <asp:DropDownList ID="DdlEjercicio2" runat="server" CssClass="select2me" DataTextField="Ejercicio" DataValueField="Ejercicio" Width="100px">
</asp:DropDownList> </asp:DropDownList>
</div> </div> --%>
<label class="col-md-2" style="width: 80px;" runat="server" id="LiPeriodoLbl" >Periodo: </label> <label class="col-md-2" style="width: 80px;" runat="server" id="LiPeriodoLbl" >Periodo: </label>
<div class="col-md-2 " runat="server" id="LiPeriodoDdl"> <div class="col-md-2 " runat="server" id="LiPeriodoDdl">
<asp:DropDownList ID="DdlPeriodo" runat="server" Width="150px" CssClass="select2me"> <asp:DropDownList ID="DdlPeriodo" runat="server" Width="150px" CssClass="select2me">
@@ -75,112 +82,541 @@
</div> </div>
</ul> </ul>
</div> </div>
</div>
</div>
</div>
</ContentTemplate> </div>
</asp:UpdatePanel> </div>
<div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
<ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%" OnActiveTabChanged="Tab_ActiveTabChanged" AutoPostBack="true">
<div class="row">
<div class="col-md-3" runat="server" id="tdTipoReporte" visible="true">
<label class="col-md-1 truncate">Tipo:</label>
<div class="col-md-2">
<asp:DropDownList ID="DdlTipoReporte" runat="server" Width="130px" CssClass="form-control input-sm">
<asp:ListItem Text="Contable" Value="1"></asp:ListItem>
<asp:ListItem Text="Contable y Complementario" Value="2"></asp:ListItem>
<asp:ListItem Text="Complementario" Value="3"></asp:ListItem>
</asp:DropDownList>
</div>
</div>
<label class="col-md-1 truncate">Con Firma:</label>
<div class="col-md-1">
<asp:CheckBox ID="ChkFirma" CssClass="make-switchsd" data-size="small" runat="server" />
</div>
<label class="col-md-1 truncate">Nivel 2:</label>
<div class="col-md-1">
<asp:CheckBox ID="ChkNivel" CssClass="make-switchsd" data-size="small" runat="server" />
</div>
</div>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
<br />
<ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%" OnActiveTabChanged="Tab_ActiveTabChanged" AutoPostBack="true">
<ajax:TabPanel ID="TabMes" runat="server" HeaderText="Mensual"> <ajax:TabPanel ID="TabMes" runat="server" HeaderText="Mensual">
<ContentTemplate> <ContentTemplate>
<rvweb:ReportViewer ID="rvReporteador" Visible="false" runat="server" Width="100%" Height="600"></rvweb:ReportViewer>
<asp:UpdatePanel runat="server">
<ContentTemplate>
<div class="row">
<div class="col-md-6">
<table style="width: 100%; float: left; margin-right: 20px;">
<tr>
<td width="100%" padding="0">
<center>
<h3>ACTIVO</h3>
<asp:UpdatePanel ID="UpActivo" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<asp:GridView ID="GvActivo" Style="max-width: 550px;" Width="90%" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="" OnRowDataBound="GvActivo_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle Width="50%" HorizontalAlign="Left" />
<HeaderTemplate>
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Text="ACTIVO CIRCULANTE"></asp:Label>
</HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" />
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:TemplateField visible="false">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
</Columns>
<%--<HeaderStyle CssClass="TitulosChico"></HeaderStyle>--%>
<RowStyle CssClass="Texto" />
<%--<AlternatingRowStyle CssClass="TextoAlterno" />--%>
</asp:GridView>
<br />
<br />
<asp:GridView ID="GvActivoNoCirculante" Style="max-width: 550px;" Width="90%" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="" OnRowDataBound="GvActivo_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle Width="50%" HorizontalAlign="Left" />
<HeaderTemplate>
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Text="ACTIVO NO CIRCULANTE"></asp:Label>
</HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" />
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:TemplateField visible="false">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
</Columns>
<%--<HeaderStyle CssClass="TitulosChico"></HeaderStyle>--%>
<RowStyle CssClass="Texto" />
<%--<AlternatingRowStyle CssClass="TextoAlterno" />--%>
</asp:GridView>
<br />
<br />
<asp:GridView ID="GvActivoDiferido" Style="max-width: 550px;" Width="90%" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="" OnRowDataBound="GvActivo_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle Width="50%" HorizontalAlign="Left" />
<HeaderTemplate>
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Text="ACTIVO DIFERIDO"></asp:Label>
</HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" />
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:TemplateField visible="false">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
</Columns>
<%--<HeaderStyle CssClass="TitulosChico"></HeaderStyle>--%>
<RowStyle CssClass="Texto" />
<%--<AlternatingRowStyle CssClass="TextoAlterno" />--%>
</asp:GridView>
</ContentTemplate>
</asp:UpdatePanel>
</center>
</td>
</tr>
</table>
</div>
<div class="col-md-6">
<table style="width: 100%; float: left;">
<tr>
<td width="100%">
<center>
<h3>PASIVO</h3>
<asp:UpdatePanel ID="UpPasivo" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<asp:GridView ID="GvPasivo" Style="max-width: 550px;" Width="90%" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="" OnRowDataBound="GvPasivo_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle Width="50%" HorizontalAlign="Left" />
<HeaderTemplate>
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Text="PASIVO CIRCULANTE"></asp:Label>
</HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" />
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:TemplateField visible="false">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
</Columns>
<%--<HeaderStyle CssClass="TitulosChico"></HeaderStyle>--%>
<RowStyle CssClass="Texto" />
<%--<AlternatingRowStyle CssClass="TextoAlterno" />--%>
</asp:GridView>
<br />
<br />
<asp:GridView ID="GvPasivoNoCirculante" Style="max-width: 550px;" Width="90%" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="" OnRowDataBound="GvPasivo_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle Width="50%" HorizontalAlign="Left" />
<HeaderTemplate>
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Text="PASIVO NO CIRCULANTE"></asp:Label>
</HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" />
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:TemplateField visible="false">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
</Columns>
<%--<HeaderStyle CssClass="TitulosChico"></HeaderStyle>--%>
<RowStyle CssClass="Texto" />
<%--<AlternatingRowStyle CssClass="TextoAlterno" />--%>
</asp:GridView>
<br />
<br />
<asp:GridView ID="GvPasivoDiferido" Style="max-width: 550px;" Width="90%" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="" OnRowDataBound="GvPasivo_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle Width="50%" HorizontalAlign="Left" />
<HeaderTemplate>
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Text="PASIVO DIFERIDO"></asp:Label>
</HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" />
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:TemplateField visible="false">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
</Columns>
<%--<HeaderStyle CssClass="TitulosChico"></HeaderStyle>--%>
<RowStyle CssClass="Texto" />
<%--<AlternatingRowStyle CssClass="TextoAlterno" />--%>
</asp:GridView>
</ContentTemplate>
</asp:UpdatePanel>
</center>
</td>
</tr>
<tr>
<td>
<asp:UpdatePanel runat="server">
<ContentTemplate>
<table style="max-width: 550px; width: 90%;">
<tr>
<td width="275px" align="center">
<h4>Total del Pasivo:</h4>
</td>
<td width="100px" align="right">
<asp:Label Font-Bold="true" runat="server" ID="LbTotalPasivoActual"></asp:Label>
</td>
<td runat="server" id="TdTotalPasivo" width="100px" align="right" visible="false">
<asp:Label Font-Bold="true" runat="server" ID="LbTotalPasivoAnterior"></asp:Label>
</td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</td>
</tr>
<tr>
<td>
<center>
<h3>
<asp:Literal Text="CAPITAL" ID="LtlTituloHacienda" runat="server" />
</h3>
<asp:UpdatePanel ID="UpPatrimonio" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<asp:GridView ID="GvPatrimonio" Style="max-width: 550px;" Width="90%" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="" OnRowDataBound="GvPatrimonio_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle Width="50%" HorizontalAlign="Left" />
<HeaderTemplate>
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Text="PATRIMONIO CONTRIBUIDO"></asp:Label>
</HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" />
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:TemplateField visible="false">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
</Columns>
<%--<HeaderStyle CssClass="TitulosChico"></HeaderStyle>--%>
<RowStyle CssClass="Texto" />
<%--<AlternatingRowStyle CssClass="TextoAlterno" />--%>
</asp:GridView>
<asp:GridView ID="GvUtilidad" ShowHeader="false" Style="max-width: 550px;" Width="90%" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="" OnRowDataBound="GvPatrimonio_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle Width="50%" HorizontalAlign="Left" />
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:TemplateField visible="false">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
</Columns>
<%--<HeaderStyle CssClass="TitulosChico"></HeaderStyle>--%>
<RowStyle CssClass="Texto" />
<%--<AlternatingRowStyle CssClass="TextoAlterno" />--%>
</asp:GridView>
<br />
<br />
<asp:GridView ID="GvPatrimonioGenerado" Style="max-width: 550px;" Width="90%" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="" OnRowDataBound="GvPatrimonio_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle Width="50%" HorizontalAlign="Left" />
<HeaderTemplate>
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Text="PATRIMONIO GENERADO"></asp:Label>
</HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" />
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:TemplateField visible="false">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="25%" HorizontalAlign="Right" />
</asp:TemplateField>
</Columns>
<%--<HeaderStyle CssClass="TitulosChico"></HeaderStyle>--%>
<RowStyle CssClass="Texto" />
<%--<AlternatingRowStyle CssClass="TextoAlterno" />--%>
</asp:GridView>
<br />
<br />
<asp:GridView ID="GvPatrimonioActualizacion" Style="max-width: 550px;" Width="90%" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="" OnRowDataBound="GvPatrimonio_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle Width="50%" HorizontalAlign="Left" />
<HeaderTemplate>
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Text="EXCESO O INSUFICIENCIA DE ACTUALIZACION"></asp:Label>
</HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" />
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="100" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:TemplateField visible="false">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="100" HorizontalAlign="Right" />
</asp:TemplateField>
</Columns>
<%--<HeaderStyle CssClass="TitulosChico"></HeaderStyle>--%>
<RowStyle CssClass="Texto" />
<%--<AlternatingRowStyle CssClass="TextoAlterno" />--%>
</asp:GridView>
</ContentTemplate>
</asp:UpdatePanel>
</center>
</td>
</tr>
<tr>
<td>
<asp:UpdatePanel runat="server">
<ContentTemplate>
<table style="max-width: 550px; width: 90%;">
<tr>
<td width="50%" style="text-align: center;">
<h4>
<asp:Literal ID="LtlTotalHacienda" Text="Total Capital:" runat="server" />
</h4>
</td>
<td width="25%" align="right">
<asp:Label Font-Bold="true" runat="server" ID="LbTotalPatrimonioActual"></asp:Label>
</td>
<td runat="server" id="TdTotalPatrimonio" width="25%" align="right" visible="false">
<asp:Label Font-Bold="true" runat="server" ID="LbTotalPatrimonioAnterior"></asp:Label>
</td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</td>
</tr>
</table>
</div>
</div>
<div class="row">
<div class="col-md-12">
<br />
</div>
</div>
<div class="row">
<div class="col-md-6">
<asp:UpdatePanel runat="server">
<ContentTemplate>
<center>
<table style="max-width: 550px; width: 90%;">
<tr>
<td width="50%" style="text-align: center;">
<h4>Total del Activo:</h4>
</td>
<td width="25%" align="right">
<asp:Label Font-Bold="true" runat="server" ID="LbTotalActivoActual"></asp:Label>
</td>
<td runat="server" id="TdTotalActivoAnterior" width="25%" align="right" visible="false">
<asp:Label Font-Bold="true" runat="server" ID="LbTotalActivoAnterior"></asp:Label>
</td>
</tr>
</table>
</center>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div class="col-md-6">
<asp:UpdatePanel runat="server">
<ContentTemplate>
<center>
<table style="max-width: 550px; width: 90%;">
<tr>
<td style="text-align: center; width: 50%;">
<h4>
<asp:Literal ID="LtlTotalPasivoPatrimonio" Text="Total del Pasivo y Capital:" runat="server" />
</h4>
</td>
<td width="25%" align="right">
<asp:Label Font-Bold="true" runat="server" ID="LbTotalPasivoPatrimonioActual"></asp:Label>
</td>
<td runat="server" id="TdTotalPasivoAnterior" width="25%" align="right" visible="false">
<asp:Label Font-Bold="true" runat="server" ID="LbTotalPasivoPatrimonioAnterior"></asp:Label>
</td>
</tr>
</table>
</center>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
<div class="row">
<div class="col-md-12">
<asp:Label runat="server" ID="LbDescuadre" ForeColor="Red" Font-Bold="false" Font-Size="Small"></asp:Label>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
<table style="width: 100%;" class="table table-striped table-advance table-hover">
<tr>
<td width="100%" padding="0">
<asp:UpdatePanel ID="UpDatos" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<asp:GridView ID="GvIngresosMes" runat="server" AutoGenerateColumns="False" DataKeyNames="" OnRowDataBound="GvIngresos_RowDataBound" ShowHeaderWhenEmpty="true" CssClass="table table-striped table-hover Widthall" Style="margin-top: -10px; text-align: center;" GridLines="None">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle HorizontalAlign="Left" />
<HeaderTemplate>
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Font-Size="14px" Text="INGRESOS Y OTROS BENEFICIOS"></asp:Label>
</HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" Width="400px" />
</asp:TemplateField>
<asp:TemplateField HeaderText="Período Actual">
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="150px" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:BoundField HeaderText="%" DataField="PorcentajeActual" DataFormatString="{0:N2}" ItemStyle-Width="100px" />
<asp:TemplateField HeaderText="Período Acumulado">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
<%--<asp:Label ID="LbAnterior" runat="server" Text='<%# Eval("ImporteAnterior", "{0:N2}")%>'></asp:Label>--%>
</ItemTemplate>
<ItemStyle Width="150px" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" />
</Columns>
</asp:GridView>
<br />
<br />
<asp:GridView ID="GvGastosMes" runat="server" AutoGenerateColumns="False" DataKeyNames="" OnRowDataBound="GvGastos_RowDataBound" ShowHeaderWhenEmpty="true" CssClass="table table-striped table-hover Widthall" Style="margin-top: -10px; text-align: center;" GridLines="None">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate>
<ItemStyle HorizontalAlign="Left" />
<HeaderTemplate>
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Font-Size="14px" Text="GASTOS Y OTRAS PÉRDIDAS"></asp:Label>
</HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" Width="400px" />
</asp:TemplateField>
<asp:TemplateField HeaderText="Período Actual">
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
</ItemTemplate>
<ItemStyle Width="150px" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:BoundField HeaderText="%" DataField="PorcentajeActual" DataFormatString="{0:N2}" ItemStyle-Width="100px" />
<asp:TemplateField HeaderText="Período Acumulado">
<ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
</ItemTemplate>
<ItemStyle Width="150px" HorizontalAlign="Right" />
</asp:TemplateField>
<asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" />
</Columns>
</asp:GridView>
</ContentTemplate>
</asp:UpdatePanel>
</td>
</tr>
</table>
<asp:UpdatePanel ID="UPPTotal" runat="server">
<ContentTemplate>
<table class="table table-striped table-hover Widthall">
<tr>
<td align="center">
<h4>Resultados del Ejercicio:</h4>
</td>
<td width="30%" align="right">
<asp:Label runat="server" Font-Bold="true" ID="LbTotalActual"></asp:Label>
</td>
<td width="30%" align="right">
<asp:Label runat="server" Font-Bold="true" ID="LbTotalAnterior"></asp:Label>
</td>
<td width="12%" align="right"></td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</ContentTemplate> </ContentTemplate>
</ajax:TabPanel> </ajax:TabPanel>
@@ -283,21 +719,14 @@
</asp:TemplateField> </asp:TemplateField>
<%--<asp:TemplateField HeaderText="Período Actual">
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
</ItemTemplate>
<ItemStyle Width="150px" HorizontalAlign="Right" />
</asp:TemplateField>--%>
<%--<asp:BoundField HeaderText="%" DataField="PorcentajeActual" DataFormatString="{0:N2}" ItemStyle-Width="100px" />--%>
<asp:TemplateField HeaderText="Acumulado"> <asp:TemplateField HeaderText="Acumulado">
<ItemTemplate> <ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink> <asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
</ItemTemplate> </ItemTemplate>
<ItemStyle Width="150px" HorizontalAlign="Right" /> <ItemStyle Width="150px" HorizontalAlign="Right" />
</asp:TemplateField> </asp:TemplateField>
<asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" /> <asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" Visible="false" />
</Columns> </Columns>
</asp:GridView> </asp:GridView>
<br /> <br />
@@ -409,7 +838,7 @@
</asp:GridView> </asp:GridView>
<br /> <br />
<br /> <br />
<asp:GridView ID="GvTotalesMesH" runat="server" AutoGenerateColumns="False" DataKeyNames="" OnRowDataBound="GvTotalesMesH_RowDataBound" ShowHeaderWhenEmpty="true" CssClass="table table-striped table-hover Widthall" Style="margin-top: -10px; text-align: center;" GridLines="None" > <%-- <asp:GridView ID="GvTotalesMesH" runat="server" AutoGenerateColumns="False" DataKeyNames="" OnRowDataBound="GvTotalesMesH_RowDataBound" ShowHeaderWhenEmpty="true" CssClass="table table-striped table-hover Widthall" Style="margin-top: -10px; text-align: center;" GridLines="None" >
<Columns> <Columns>
<asp:TemplateField> <asp:TemplateField>
@@ -496,14 +925,6 @@
<ItemStyle Width="150px" HorizontalAlign="Right" /> <ItemStyle Width="150px" HorizontalAlign="Right" />
</asp:TemplateField> </asp:TemplateField>
<%-- <asp:TemplateField HeaderText="Período Actual">
<ItemTemplate>
<asp:HyperLink ID="HLActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
</ItemTemplate>
<ItemStyle Width="150px" HorizontalAlign="Right" />
</asp:TemplateField>--%>
<%-- <asp:BoundField HeaderText="%" DataField="PorcentajeActual" DataFormatString="{0:N2}" ItemStyle-Width="100px" />--%>
<asp:TemplateField HeaderText="Acumulado"> <asp:TemplateField HeaderText="Acumulado">
<ItemTemplate> <ItemTemplate>
<asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink> <asp:HyperLink ID="HLAnterior" runat="server" Text='<%# Eval("ImporteAcumulado", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
@@ -513,7 +934,7 @@
<asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" /> <asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" />
</Columns> </Columns>
</asp:GridView> </asp:GridView>--%>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</td> </td>
@@ -760,7 +1181,7 @@
</ItemTemplate> </ItemTemplate>
<ItemStyle Width="150px" HorizontalAlign="Right" /> <ItemStyle Width="150px" HorizontalAlign="Right" />
</asp:TemplateField> </asp:TemplateField>
<asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" /> <asp:BoundField HeaderText="%" DataField="PorcentajeAcumulado" DataFormatString="{0:N2}" ItemStyle-Width="100px" visible="false" />
</Columns> </Columns>
</asp:GridView> </asp:GridView>
@@ -778,10 +1199,10 @@
<h4>Resultados del Ejercicio:</h4> <h4>Resultados del Ejercicio:</h4>
</td> </td>
<td width="30%" align="right"> <td width="30%" align="right">
<asp:Label runat="server" Font-Bold="true" ID="Label1"></asp:Label> <asp:Label runat="server" Font-Bold="true" ID="Label18"></asp:Label>
</td> </td>
<td width="30%" align="right"> <td width="30%" align="right">
<asp:Label runat="server" Font-Bold="true" ID="Label2"></asp:Label> <asp:Label runat="server" Font-Bold="true" ID="Label19"></asp:Label>
</td> </td>
<td width="12%" align="right"></td> <td width="12%" align="right"></td>
</tr> </tr>
@@ -799,19 +1220,20 @@
<asp:UpdatePanel ID="UpDatosSubProyectoH" UpdateMode="Conditional" runat="server"> <asp:UpdatePanel ID="UpDatosSubProyectoH" UpdateMode="Conditional" runat="server">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvIngresosSubProyectoH" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCuenta,FechaInicial,FechaFActual,CveSubProyecto,CountDinamico" OnRowDataBound="GvIngresosSubProyectoH_RowDataBound" ShowHeaderWhenEmpty="true" <asp:GridView ID="GvIngresosSubProyectoH" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCuenta,FechaInicial,FechaFActual,CveSubProyecto,CountDinamico" OnRowDataBound="GvIngresosSubProyectoH_RowDataBound" ShowHeaderWhenEmpty="true" Width="100%"
CssClass="ADSCROLLER2 table table-striped table-advance table-hover" data-cols="1" data-heightmenos="300" CssClass="ADSCROLLER2 table table-striped table-advance table-hover" data-cols="1" data-heightmenos="300"
Style="margin-top: -10px; text-align: center;" GridLines="None"> Style="margin-top: -10px; text-align: center;" GridLines="None">
<Columns> <Columns>
<asp:TemplateField> <asp:TemplateField >
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label> <asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
</ItemTemplate> </ItemTemplate>
<ItemStyle HorizontalAlign="Left" /> <ItemStyle HorizontalAlign="Left" Width="246px" />
<HeaderTemplate> <HeaderTemplate >
<asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Font-Size="14px" Text="INGRESOS Y OTROS BENEFICIOS"></asp:Label> <asp:Label ID="LbTitulo" runat="server" Style="padding-left: 20px;" Font-Size="14px" Text="INGRESOS Y OTROS BENEFICIOS"></asp:Label>
</HeaderTemplate> </HeaderTemplate>
<HeaderStyle HorizontalAlign="Left" Width="291px" /> <HeaderStyle HorizontalAlign="Left" Width="246" />
</asp:TemplateField> </asp:TemplateField>
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="100px" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="100px" />
@@ -870,6 +1292,7 @@
</asp:GridView> </asp:GridView>
<br /> <br />
<br /> <br />
<asp:GridView ID="GvGastosSubProyectoH" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCuenta,FechaInicial,FechaFActual,CveSubProyecto,CountDinamico" OnRowDataBound="GvGastosSubProyectoH_RowDataBound" ShowHeaderWhenEmpty="true" CssClass="table table-striped table-hover Widthall" Style="margin-top: -10px; text-align: center;" GridLines="None"> <asp:GridView ID="GvGastosSubProyectoH" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCuenta,FechaInicial,FechaFActual,CveSubProyecto,CountDinamico" OnRowDataBound="GvGastosSubProyectoH_RowDataBound" ShowHeaderWhenEmpty="true" CssClass="table table-striped table-hover Widthall" Style="margin-top: -10px; text-align: center;" GridLines="None">
<Columns> <Columns>
@@ -1014,11 +1437,9 @@
</ContentTemplate> </ContentTemplate>
</ajax:TabPanel> </ajax:TabPanel>
</ajax:TabContainer> </ajax:TabContainer>
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
</asp:Content>

2116
Contabilidad2/RepBalanceGeneralHorizontal.aspx.vb
View File

File diff suppressed because it is too large Load Diff

6
Contabilidad2/RepEstadoResultadosHorizontal.aspx
View File

@@ -85,11 +85,7 @@
<ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%" OnActiveTabChanged="Tab_ActiveTabChanged" AutoPostBack="true"> <ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%" OnActiveTabChanged="Tab_ActiveTabChanged" AutoPostBack="true">
<ajax:TabPanel ID="TabMes" runat="server" HeaderText="Mensual"> <ajax:TabPanel ID="TabMes" runat="server" HeaderText="Mensual">
<ContentTemplate> <ContentTemplate>
<table style="width: 100%;" class="table table-striped table-advance table-hover"> <table style="width: 100%;" class="table table-striped table-advance table-hover">
<tr> <tr>

45
Empresas/140/Formatos/Traslado.rdlc
View File

@@ -540,7 +540,7 @@
</Style> </Style>
</TextRun> </TextRun>
<TextRun> <TextRun>
<Value>=Sum(Fields!Cantidad.Value, "DsInventarios")</Value> <Value>=Sum(iif(Not Fields!Clasificacion.Value = "USADOS",CInt(Fields!Cantidad.Value),0),"DsInventarios")</Value>
<Style> <Style>
<FontSize>8pt</FontSize> <FontSize>8pt</FontSize>
<FontWeight>Normal</FontWeight> <FontWeight>Normal</FontWeight>
@@ -580,7 +580,7 @@
</Style> </Style>
</TextRun> </TextRun>
<TextRun> <TextRun>
<Value>=Sum(iif(Fields!Clasificacion.Value = "USADOS",Fields!Cantidad.Value,0),"DsInventarios")</Value> <Value>=Sum(iif(Fields!Clasificacion.Value = "USADOS",CInt(Fields!Cantidad.Value),0),"DsInventarios")</Value>
<Style> <Style>
<FontSize>8pt</FontSize> <FontSize>8pt</FontSize>
<FontWeight>Normal</FontWeight> <FontWeight>Normal</FontWeight>
@@ -809,39 +809,6 @@
<PaddingBottom>2pt</PaddingBottom> <PaddingBottom>2pt</PaddingBottom>
</Style> </Style>
</Textbox> </Textbox>
<Textbox Name="Textbox10">
<CanGrow>true</CanGrow>
<KeepTogether>true</KeepTogether>
<Paragraphs>
<Paragraph>
<TextRuns>
<TextRun>
<Value>=Parameters!SubProyecto.Value</Value>
<Style>
<FontSize>12pt</FontSize>
<FontWeight>Bold</FontWeight>
</Style>
</TextRun>
</TextRuns>
<Style />
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox2</rd:DefaultName>
<Top>3.24566cm</Top>
<Left>0.00711cm</Left>
<Height>0.6cm</Height>
<Width>14.27979cm</Width>
<ZIndex>6</ZIndex>
<Style>
<Border>
<Style>None</Style>
</Border>
<PaddingLeft>2pt</PaddingLeft>
<PaddingRight>2pt</PaddingRight>
<PaddingTop>2pt</PaddingTop>
<PaddingBottom>2pt</PaddingBottom>
</Style>
</Textbox>
<Textbox Name="Textbox11"> <Textbox Name="Textbox11">
<CanGrow>true</CanGrow> <CanGrow>true</CanGrow>
<KeepTogether>true</KeepTogether> <KeepTogether>true</KeepTogether>
@@ -849,7 +816,7 @@
<Paragraph> <Paragraph>
<TextRuns> <TextRuns>
<TextRun> <TextRun>
<Value>Origen 2: </Value> <Value>Origen: </Value>
<Style> <Style>
<FontSize>12pt</FontSize> <FontSize>12pt</FontSize>
<FontWeight>Bold</FontWeight> <FontWeight>Bold</FontWeight>
@@ -871,7 +838,7 @@
<Left>0.00711cm</Left> <Left>0.00711cm</Left>
<Height>0.6cm</Height> <Height>0.6cm</Height>
<Width>14.27979cm</Width> <Width>14.27979cm</Width>
<ZIndex>7</ZIndex> <ZIndex>6</ZIndex>
<Style> <Style>
<Border> <Border>
<Style>None</Style> <Style>None</Style>
@@ -911,7 +878,7 @@
<Left>0.00711cm</Left> <Left>0.00711cm</Left>
<Height>0.6cm</Height> <Height>0.6cm</Height>
<Width>14.27979cm</Width> <Width>14.27979cm</Width>
<ZIndex>8</ZIndex> <ZIndex>7</ZIndex>
<Style> <Style>
<Border> <Border>
<Style>None</Style> <Style>None</Style>
@@ -930,7 +897,7 @@
<Left>0.1121cm</Left> <Left>0.1121cm</Left>
<Height>2.53711cm</Height> <Height>2.53711cm</Height>
<Width>4.08574cm</Width> <Width>4.08574cm</Width>
<ZIndex>9</ZIndex> <ZIndex>8</ZIndex>
<Style> <Style>
<Border> <Border>
<Style>None</Style> <Style>None</Style>

8
Empresas/141/Formatos/Factura.rdlc
View File

@@ -1546,7 +1546,7 @@
<Paragraph> <Paragraph>
<TextRuns> <TextRuns>
<TextRun> <TextRun>
<Value>FACTURA</Value> <Value>=UCase(Parameters!TipoDocumento.Value)</Value>
<Style> <Style>
<FontWeight>Bold</FontWeight> <FontWeight>Bold</FontWeight>
<Color>White</Color> <Color>White</Color>
@@ -1560,7 +1560,7 @@
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox8</rd:DefaultName> <rd:DefaultName>Textbox8</rd:DefaultName>
<Left>18.23008cm</Left> <Left>18.23008cm</Left>
<Height>0.6cm</Height> <Height>0.96018cm</Height>
<Width>2.79101cm</Width> <Width>2.79101cm</Width>
<ZIndex>7</ZIndex> <ZIndex>7</ZIndex>
<Style> <Style>
@@ -1594,7 +1594,7 @@
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox8</rd:DefaultName> <rd:DefaultName>Textbox8</rd:DefaultName>
<Top>0.59682cm</Top> <Top>0.97782cm</Top>
<Left>18.23008cm</Left> <Left>18.23008cm</Left>
<Height>0.6cm</Height> <Height>0.6cm</Height>
<Width>2.79101cm</Width> <Width>2.79101cm</Width>
@@ -1645,7 +1645,7 @@
</Paragraph> </Paragraph>
</Paragraphs> </Paragraphs>
<rd:DefaultName>Textbox8</rd:DefaultName> <rd:DefaultName>Textbox8</rd:DefaultName>
<Top>1.19682cm</Top> <Top>1.57782cm</Top>
<Left>18.23008cm</Left> <Left>18.23008cm</Left>
<Height>0.86903cm</Height> <Height>0.86903cm</Height>
<Width>2.79101cm</Width> <Width>2.79101cm</Width>

2
Inventarios/PrestamosdeProveedor.aspx.vb
View File

@@ -134,7 +134,7 @@ Partial Class Inventarios_PrestamosdeProveedor
'AGREGAMOS LA SALIDA 'AGREGAMOS LA SALIDA
CveMovimientoSalida = ObjInventario.AddMovimiento(DdlAlmacenOrigen.SelectedValue.ToEntero, 29, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1, CveMovimientoSalida = ObjInventario.AddMovimiento(DdlAlmacenOrigen.SelectedValue.ToEntero, 29, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1,
Observaciones:=TxtObservacionesEntrega.Text.Trim, CveProveedor:=tCveProveedor) Observaciones:=TxtObservacionesEntrega.Text.Trim, CveProveedor:=tCveProveedor, Modulo:="PresP")
Folio = ObjInventario.Folio Folio = ObjInventario.Folio
If CveMovimientoSalida <= 0 Then If CveMovimientoSalida <= 0 Then

76
Inventarios/RecepcionEntrega.aspx.vb
View File

@@ -2161,49 +2161,57 @@ Partial Class Inventarios_RecepcionEntrega
Dim CvePrePoliza As Integer = ObjConta.AddPrePolizas("Inventario/RecepcionEntrega", 4, TotalCosto, TotalCosto, 1, Fecha, ClienteNombre, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Dim CvePrePoliza As Integer = ObjConta.AddPrePolizas("Inventario/RecepcionEntrega", 4, TotalCosto, TotalCosto, 1, Fecha, ClienteNombre, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
'Se agrega movimiento separado por la cuenta de ventas (ER) 'Se agrega movimiento separado por la cuenta de ventas (ER)
For Each RowInv As DataRow In tmpCostos.Rows
ValorInventario = DtCostos.SUMD("Total", $"CveClasificacion = {RowInv("CveClasificacion")}").RoundSQL()
TotalCostoAcumulado += ValorInventario
'cuando es el último movimiento y hay diferencias en los importes If CvePrePoliza > 0 Then
If cont = DtCostos.FiltraParametros("", "", {"CveClasificacion"}).Rows.Count AndAlso TotalCosto <> TotalCostoAcumulado Then
ValorInventario = ValorInventario + (TotalCosto - TotalCostoAcumulado)
End If
'Concepto = String.Format("{0} - {1}", Row2("Clasificacion").ToString, Row2("SubProyecto").ToString) For Each RowInv As DataRow In tmpCostos.Rows
IdCtaContable = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimeroValor("IdCuentaCostos", $"CveClasificacion = {RowInv("CveClasificacion")}").ToEntero ValorInventario = DtCostos.SUMD("Total", $"CveClasificacion = {RowInv("CveClasificacion")}").RoundSQL()
CveCuenta = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimeroValor("IdCuentaCostosSIG", $"CveClasificacion = {RowInv("CveClasificacion")}").ToEntero TotalCostoAcumulado += ValorInventario
If Not ErrorMovInv Then 'cuando es el último movimiento y hay diferencias en los importes
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ValorMultiplicador * ValorInventario, SerieFolio, 69, SerieFolio, Fecha, IdCtaContable, -1, CveVenta:=CveVentaSurtir, CveCliente:=CveCliente, CveMovimientoAlmacen:=CveMovimiento, CveSubProyecto:=CveSubProyecto, ImporteMX:=ValorMultiplicador * ValorInventario, CveCuenta:=CveCuenta, CveClasificacion:=RowInv("CveClasificacion").ToString.ToEntero) Then If cont = DtCostos.FiltraParametros("", "", {"CveClasificacion"}).Rows.Count AndAlso TotalCosto <> TotalCostoAcumulado Then
ErrorMovInv = True ValorInventario = ValorInventario + (TotalCosto - TotalCostoAcumulado)
End If End If
'Concepto = String.Format("{0} - {1}", Row2("Clasificacion").ToString, Row2("SubProyecto").ToString)
IdCtaContable = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimeroValor("IdCuentaCostos", $"CveClasificacion = {RowInv("CveClasificacion")}").ToEntero
CveCuenta = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltroPrimeroValor("IdCuentaCostosSIG", $"CveClasificacion = {RowInv("CveClasificacion")}").ToEntero
If Not ErrorMovInv Then
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ValorMultiplicador * ValorInventario, SerieFolio, 69, SerieFolio, Fecha, IdCtaContable, -1, CveVenta:=CveVentaSurtir, CveCliente:=CveCliente, CveMovimientoAlmacen:=CveMovimiento, CveSubProyecto:=CveSubProyecto, ImporteMX:=ValorMultiplicador * ValorInventario, CveCuenta:=CveCuenta, CveClasificacion:=RowInv("CveClasificacion").ToString.ToEntero) Then
ErrorMovInv = True
End If
End If
cont += 1
Next
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ValorMultiplicador * TotalCosto, SerieFolio, 68, SerieFolio, Fecha, IdCtaContableAlmacen, -1, CveVenta:=CveVentaSurtir, CveCliente:=CveCliente, CveMovimientoAlmacen:=CveMovimiento, CveSubProyecto:=CveSubProyecto, ImporteMX:=ValorMultiplicador * TotalCosto, CveCuenta:=CveCuentaAlmacen) Then
ErrorMovInv = True
End If End If
cont += 1 'AutoConta - El movimiento 1 es el de Venta
Next Dim AutoConta As Boolean = UsuarioActual.Empresa.Funcionalidad(200) = "1"
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ValorMultiplicador * TotalCosto, SerieFolio, 68, SerieFolio, Fecha, IdCtaContableAlmacen, -1, CveVenta:=CveVentaSurtir, CveCliente:=CveCliente, CveMovimientoAlmacen:=CveMovimiento, CveSubProyecto:=CveSubProyecto, ImporteMX:=ValorMultiplicador * TotalCosto, CveCuenta:=CveCuentaAlmacen) Then If AutoConta And Not ErrorMovInv Then
Dim ObjContPaq = New ClsContPAQi(UsuarioActual.Empresa)
If IdCtaContable > 0 Then
If Not ObjConta.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa, ObjConta:=ObjContPaq) Then
Alert("Ocurrio un Error al contabilizar, pongase en contacto con Soporte Técnico")
ErrorMovInv = True
TextoError = "Ocurrio un Error al contabilizar, pongase en contacto con Soporte Técnico"
End If
Else
Alert(String.Format("No se puede contabilizar ya que falta asignación de las cuentas contables"), TipoMensaje.MsgAdvertencia)
End If
ObjContPaq.Dispose()
End If
Else
ErrorMovInv = True ErrorMovInv = True
TextoError = "Ocurrió un Error al ingresar la prepoliza"
End If End If
'AutoConta - El movimiento 1 es el de Venta
Dim AutoConta As Boolean = UsuarioActual.Empresa.Funcionalidad(200) = "1"
If AutoConta And Not ErrorMovInv Then
Dim ObjContPaq = New ClsContPAQi(UsuarioActual.Empresa)
If IdCtaContable > 0 Then
If Not ObjConta.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa, ObjConta:=ObjContPaq) Then
Alert("Ocurrio un Error al contabilizar, pongase en contacto con Soporte Técnico")
End If
Else
Alert(String.Format("No se puede contabilizar ya que falta asignación de las cuentas contables"), TipoMensaje.MsgAdvertencia)
End If
ObjContPaq.Dispose()
End If
Else Else
ErrorMovInv = True ErrorMovInv = True
TextoError = "Ocurrió un Error al ingresar las prepolizas" TextoError = "Ocurrió un Error al ingresar las prepolizas"

2
Metronic/assets/admin/layout/css/custom.css
View File

@@ -1838,7 +1838,7 @@ div.md-checkbox {
position: relative; position: relative;
} }
.form-group.form-md-line-input .form-control ~ label { .form-group.form-md-line-input .form-control:not(textarea) ~ label {
bottom: auto; bottom: auto;
padding-bottom: 28px; padding-bottom: 28px;
} }

2
OI/Circular.aspx
View File

@@ -68,7 +68,7 @@
</asp:UpdatePanel> </asp:UpdatePanel>
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCircular,Asunto,Usuario" EmptyDataText="No se encontraron Motivo de Baja Registrados" <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCircular,Asunto,Usuario" EmptyDataText="No se encontraron Circulares"
ToolTip="Listado de Metas Vendedor" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center; width: 100%" GridLines="None"> ToolTip="Listado de Metas Vendedor" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center; width: 100%" GridLines="None">
<Columns> <Columns>
<asp:HyperLinkField HeaderText="Asunto" DataTextField="Asunto" DataNavigateUrlFields="CveCircular" DataNavigateUrlFormatString="/OI/CircularDetalle.aspx?CveCircular={0}" /> <asp:HyperLinkField HeaderText="Asunto" DataTextField="Asunto" DataNavigateUrlFields="CveCircular" DataNavigateUrlFormatString="/OI/CircularDetalle.aspx?CveCircular={0}" />

61
OI/CircularDetalle.aspx
View File

@@ -14,7 +14,7 @@
<asp:UpdatePanel runat="server" ID="UpAgregar"> <asp:UpdatePanel runat="server" ID="UpAgregar">
<ContentTemplate> <ContentTemplate>
<li> <li>
<asp:LinkButton ID="LnkMandarCorreo" runat="server" Text="<i class='fa fa-plus'></i> Agregar Documento"></asp:LinkButton> <asp:LinkButton ID="LnkMandarCorreo" runat="server" Text="<i class='fa fa-envelope'></i> Enviar Correo"></asp:LinkButton>
</li> </li>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
@@ -58,7 +58,7 @@
<textarea runat="server" id="TxtCorreo" class="form-control"></textarea> <textarea runat="server" id="TxtCorreo" class="form-control"></textarea>
</div> </div>
<div class="col-md-1" style="width: 15%"> <div class="col-md-1" style="width: 15%">
<asp:LinkButton runat="server" ID="LbBuscar" >Buscar</asp:LinkButton> <asp:LinkButton runat="server" ID="LbBuscar" Style="color: #23527c;">Buscar</asp:LinkButton>
</div> </div>
</div> </div>
<br /> <br />
@@ -76,19 +76,70 @@
<asp:Label runat="server" ID="LblCircular">Circular:</asp:Label> <asp:Label runat="server" ID="LblCircular">Circular:</asp:Label>
</div> </div>
<div class="col-md-1" style="width: 70%"> <div class="col-md-1" style="width: 70%">
<textarea runat="server" id="TxtCircular" class="form-control" style="height:150px"></textarea> <%--<textarea runat="server" id="TxtCircular" class="form-control" style="height: 150px"></textarea>--%>
<asp:TextBox ID="TxtCircular" ClientIDMode="Static" runat="server" MaxLength="5000" TextMode="MultiLine" Height="200px" Width="100%"></asp:TextBox>
<ajax:HtmlEditorExtender
ID="htmlEdDescripcion"
TargetControlID="TxtCircular"
DisplaySourceTab="True"
EnableSanitization="false"
runat="server">
<Toolbar>
<ajax:Undo />
<ajax:Redo />
<ajax:Bold />
<ajax:Italic />
<ajax:Underline />
<ajax:StrikeThrough />
<ajax:Subscript />
<ajax:Superscript />
<ajax:JustifyLeft />
<ajax:JustifyCenter />
<ajax:JustifyRight />
<ajax:JustifyFull />
<ajax:InsertOrderedList />
<ajax:InsertUnorderedList />
<ajax:CreateLink />
<ajax:UnLink />
<ajax:RemoveFormat />
<ajax:SelectAll />
<ajax:UnSelect />
<ajax:Delete />
<ajax:Cut />
<ajax:Copy />
<ajax:Paste />
<ajax:BackgroundColorSelector />
<ajax:ForeColorSelector />
<ajax:FontNameSelector />
<ajax:FontSizeSelector />
<ajax:Indent />
<ajax:Outdent />
<ajax:InsertHorizontalRule />
<ajax:HorizontalSeparator />
<%--<ajax:InsertImage />--%>
</Toolbar>
</ajax:HtmlEditorExtender>
</div> </div>
</div> </div>
<br /> <br />
<div class="row"> <div class="row">
<div class="col-md-1" style="width:30%"> <div class="col-md-1" style="width: 30%">
<asp:Label runat="server" ID="LblAdjunto">Adjuntar archivo:</asp:Label> <asp:Label runat="server" ID="LblAdjunto">Adjuntar archivo:</asp:Label>
</div> </div>
<div class="col-md-1" style="width:70%"> <div class="col-md-1" style="width: 70%">
<asp:TextBox ID="TxtFileDocumentacion" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox> <asp:TextBox ID="TxtFileDocumentacion" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox>
</div> </div>
</div> </div>
<br /> <br />
<div id="archivosDiv" runat="server" class="row" visible="false">
<div class="col-md-1" style="width: 30%">
<asp:Label runat="server" ID="Label1">Archivo cargado:</asp:Label>
</div>
<div class="col-md-1" style="width: 70%">
<asp:HyperLink runat="server" ID="HkArchivo" Style="color: #23527c;"></asp:HyperLink>
</div>
</div>
<br />
<div class="row" style="text-align: center"> <div class="row" style="text-align: center">
<asp:Button ID="BtnGuardar" runat="server" CssClass="btn btn-primary" Text="Guardar" Visible="true" ValidationGroup="GrpGuardar" /> <asp:Button ID="BtnGuardar" runat="server" CssClass="btn btn-primary" Text="Guardar" Visible="true" ValidationGroup="GrpGuardar" />
<asp:Button ID="BtnEliminar" runat="server" CssClass="btn btn-danger" Text="Eliminar" Visible="false" data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" /> <asp:Button ID="BtnEliminar" runat="server" CssClass="btn btn-danger" Text="Eliminar" Visible="false" data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" />

94
OI/CircularDetalle.aspx.vb
View File

@@ -2,6 +2,7 @@
Imports System.Linq Imports System.Linq
Imports Extensiones Imports Extensiones
Imports System.IO Imports System.IO
Imports System.Text.RegularExpressions
Partial Class OI_CircularDetalle Partial Class OI_CircularDetalle
Inherits ClsPaginas Inherits ClsPaginas
@@ -57,7 +58,13 @@ Partial Class OI_CircularDetalle
TxtAsunto.Text = Circular.Item("Asunto") TxtAsunto.Text = Circular.Item("Asunto")
TxtCorreo.Value = Circular.Item("CorreosInternos") TxtCorreo.Value = Circular.Item("CorreosInternos")
TxtCorreoAdicional.Value = Circular.Item("CorreosExternos") TxtCorreoAdicional.Value = Circular.Item("CorreosExternos")
TxtCircular.Value = Circular.Item("Circular") TxtCircular.Text = Circular.Item("Circular")
If Circular.Item("ArchivoAdjunto") <> "" Then
archivosDiv.Visible = True
HkArchivo.NavigateUrl = $"~/Empresas/{UsuarioActual.CveEmpresa}/Formatos/{Circular.Item("ArchivoAdjunto")}"
HkArchivo.Text = Circular.Item("ArchivoAdjunto")
End If
UpCliente.Update() UpCliente.Update()
End If End If
@@ -76,17 +83,25 @@ Partial Class OI_CircularDetalle
Private Sub BtnGuardar_Click() Handles BtnGuardar.Click Private Sub BtnGuardar_Click() Handles BtnGuardar.Click
Dim ObjOI As New ClsOIEventos Dim ObjOI As New ClsOIEventos
If CveCircular > 0 Then If CveCircular > 0 Then
If ObjOI.UpdateCircular(CveCircular, TxtAsunto.Text, TxtCircular.Value, TxtCorreo.Value, TxtCorreoAdicional.Value, UsuarioActual.CveUsuario) Then
Dim AdjuntoValidate As String = NombreArchivo().Split("-")(1)
If ObjOI.UpdateCircular(CveCircular, TxtAsunto.Text, TxtCircular.Text, TxtCorreo.Value, TxtCorreoAdicional.Value, AdjuntoValidate) Then
GuardarArchivo(CveCircular)
Alert("Actualizado correctamente") Alert("Actualizado correctamente")
End If End If
Else Else
Dim CorreoExtra As String = If(TxtCorreoAdicional.Value = "", "-1", TxtCorreoAdicional.Value) Dim CorreoExtra As String = If(TxtCorreoAdicional.Value = "", "-1", TxtCorreoAdicional.Value)
Dim CircularInsertado As Integer = ObjOI.AddCircular(TxtAsunto.Text, TxtCircular.Value, TxtCorreo.Value, Today.ToString, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CorreoExtra)
Dim AdjuntoValidate As String = NombreArchivo().Split("-")(1)
Dim CircularInsertado As Integer = ObjOI.AddCircular(TxtAsunto.Text, TxtCircular.Text, TxtCorreo.Value, Today.ToString, UsuarioActual.CveUsuario,
UsuarioActual.CveEmpresa, CorreoExtra, AdjuntoValidate)
If CircularInsertado > 0 Then If CircularInsertado > 0 Then
GuardarArchivo(CircularInsertado) GuardarArchivo(CircularInsertado)
Alert("Ingresado correctamente") Alert("Ingresado correctamente")
End If End If
End If End If
CargaDatos()
End Sub End Sub
Private Sub BtnEliminar_Click() Handles BtnEliminar.Click Private Sub BtnEliminar_Click() Handles BtnEliminar.Click
@@ -133,10 +148,35 @@ Partial Class OI_CircularDetalle
UpCliente.Update() UpCliente.Update()
End Sub End Sub
Private Function NombreArchivo() As String
Dim Filesgral As List(Of Archivo) = TxtFileDocumentacion.getfiles().Archivos
Dim Filename As String = "-1"
For Each fileItem As Archivo In Filesgral
Try
Filename = fileItem.filename
Catch ex As Exception
Filename = "-1"
End Try
Next
Return Filename
End Function
Private Function TituloAnterior() As String
Dim Directorio As New IO.DirectoryInfo(String.Format("{0}Empresas/{1}/Formatos/", AppDomain.CurrentDomain.BaseDirectory, UsuarioActual.CveEmpresa))
Dim ArchivosArreglo As IO.FileInfo() = Directorio.GetFiles()
Dim patronRegEx As String = String.Format("^{0}_.*", CveCircular)
Dim archivoEncontrado As String = ""
For Each file As IO.FileInfo In ArchivosArreglo
If Regex.IsMatch(file.Name, patronRegEx) Then
archivoEncontrado = file.Name
End If
Next
Return archivoEncontrado
End Function
Private Function GuardarArchivo(CircularInsertado As Integer) As String Private Function GuardarArchivo(CircularInsertado As Integer) As String
Dim respuesta As String = "" Dim respuesta As String = ""
Dim FileExtension As String = "-1" Dim FileExtension As String = "-1"
Dim Filesgral As List(Of Archivo) = TxtFileDocumentacion.getfiles().Archivos Dim Filesgral As List(Of Archivo) = TxtFileDocumentacion.getfiles().Archivos
Dim Filename As String = "" Dim Filename As String = ""
@@ -149,13 +189,15 @@ Partial Class OI_CircularDetalle
tempArray = fileItem.filename.ToString().Split("-".ToCharArray()) tempArray = fileItem.filename.ToString().Split("-".ToCharArray())
Dim rutaDestino As String = UsuarioActual.Empresa.Ruta & "Formatos\" & CircularInsertado & "_" & fileItem.filenameO Dim rutaDestino As String = UsuarioActual.Empresa.Ruta & "Formatos\" & CircularInsertado & "_" & fileItem.filenameO
'Dim docAnterior As String = UsuarioActual.Empresa.Ruta & "Formatos\" & _CveDocumentacion & "_" & DocumentacionFormato
'If DocumentacionFormato.Trim.Length > 0 Then Dim ArchivoAnterior As String = TituloAnterior()
' If File.Exists(docAnterior) Then
' File.Delete(docAnterior) If ArchivoAnterior.Length > 0 Then
' End If Dim docAnterior As String = String.Format("{0}Formatos\{1}", UsuarioActual.Empresa.Ruta, ArchivoAnterior)
'End If If File.Exists(docAnterior) Then
File.Delete(docAnterior)
End If
End If
If Not Directory.Exists(UsuarioActual.Empresa.Ruta & "\Formatos") Then If Not Directory.Exists(UsuarioActual.Empresa.Ruta & "\Formatos") Then
Directory.CreateDirectory(UsuarioActual.Empresa.Ruta & "\Formatos") Directory.CreateDirectory(UsuarioActual.Empresa.Ruta & "\Formatos")
@@ -181,10 +223,21 @@ Partial Class OI_CircularDetalle
Protected Sub LnkMandarCorreo_Click() Handles LnkMandarCorreo.Click Protected Sub LnkMandarCorreo_Click() Handles LnkMandarCorreo.Click
Dim correos() As String Dim correos() As String
correos = TxtCorreo.Value.Split(Environment.NewLine) correos = TxtCorreo.Value.Split(Environment.NewLine)
'MandaCorreo() Dim ArchivoBytes As Byte() = ArchivoBytesArrya(HkArchivo.Text)
Dim Contador As Integer = 0
Try
For Each Correo As String In correos
MandaCorreo(TxtAsunto.Text, Correo, If(Contador > 0, "", TxtCorreoAdicional.Value), TxtCircular.Text, ArchivoBytes, HkArchivo.Text)
Contador += 1
Next
Alert("El correo se envió correctamente")
Catch ex As Exception
Alert("Error al enviar correo", TipoMensaje.MsgError)
End Try
End Sub End Sub
Private Sub MandaCorreo(Asunto As String, Para As String, ArrayCC As String, body As String, ArchivoBinario As Byte()) Private Sub MandaCorreo(Asunto As String, Para As String, ArrayCC As String, body As String, ArchivoBinario As Byte(), NombreArchivo As String)
Dim a As String = String.Format("{0} -- {1} --- {2}", Asunto, Para, ArrayCC) Dim a As String = String.Format("{0} -- {1} --- {2}", Asunto, Para, ArrayCC)
a.GuardaLog() a.GuardaLog()
@@ -195,7 +248,7 @@ Partial Class OI_CircularDetalle
With itemMail With itemMail
itemMail.ArchivoBinario = ArchivoBinario itemMail.ArchivoBinario = ArchivoBinario
itemMail.NombreArchivo = "Invitación.pdf" itemMail.NombreArchivo = NombreArchivo
End With End With
@@ -205,4 +258,19 @@ Partial Class OI_CircularDetalle
Mail.SendMail(ClsPaginas.EmpresaNotificaciones, Para, Asunto, body, ArrayCC, LSRutasMail) Mail.SendMail(ClsPaginas.EmpresaNotificaciones, Para, Asunto, body, ArrayCC, LSRutasMail)
Mail = Nothing Mail = Nothing
End Sub End Sub
Private Function ArchivoBytesArrya(ArchivoNombre As String) As Byte()
Dim ArchivoEnviar As String = String.Format("{0}Formatos\{1}", UsuarioActual.Empresa.Ruta, ArchivoNombre)
If File.Exists(ArchivoEnviar) Then
Dim fs As System.IO.FileStream = System.IO.File.Open(ArchivoEnviar, IO.FileMode.Open, IO.FileAccess.Read)
Dim buff(fs.Length) As Byte
If fs.Length > 0 Then
fs.Read(buff, 0, fs.Length - 1)
fs.Close()
End If
Return buff
End If
Return New Byte() {}
End Function
End Class End Class

384
OI/RepTareas2.aspx Normal file
View File

@@ -0,0 +1,384 @@
<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="RepTareas2.aspx.cs" Inherits="OI_RepTareas2" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.btn.btnCalendar {
padding: 5px 10px;
}
.btn.btn-circle.btn-icon-only.btnsmalli {
padding: 5px 7px 5px;
height: 27px;
width: 27px;
line-height: 1;
}
.btn.btnsmalli > i {
font-size: 10px;
}
.titletable {
background-color: #e1e5ec;
}
#Gvmiembros tr > td:nth-child(2) {
width: 30px;
text-align: right;
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<li>
<asp:LinkButton ID="LnkAddEvento" OnClick="LnkAddEvento_Click" runat="server"><i class="fa fa-plus"></i> Agregar Tarea</asp:LinkButton>
</li>
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<div id='<%= iddivAgregar %>' class="modal ADS fade" role="dialog">
<div class="modal-dialog modal-lg">
<asp:UpdatePanel ID="UpAgregarConductor" class="modal-content " tabindex="-1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-header">
<button type="button" class="close" data-dismiss="modal" aria-label="Close"><span aria-hidden="true">&times;</span> </button>
<h4 class="modal-title" style="text-align: left">
<asp:Literal ID="LtleventoTitle" runat="server">Agregar Tarea</asp:Literal></h4>
</div>
<div class="modal-body">
<div class="row">
<div class="col-md-7">
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Tarea</span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body rowpadding">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtAsunto" runat="server" CssClass="form-control" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVAsunto" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtAsunto" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Asunto''</b> es necesario, por favor ingréselo." ValidationGroup="GrpConductor"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Asunto:" AssociatedControlID="TxtAsunto"></asp:Label>
</div>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtDescripcion" runat="server" CssClass="form-control" CausesValidation="true" TextMode="MultiLine" Rows="3"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvDescripcion" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtDescripcion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingréselo." ValidationGroup="GrpConductor"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Descripción" AssociatedControlID="TxtDescripcion"></asp:Label>
</div>
<div class="row">
<div class="col-sm-6">
<div class="input-group form-group form-md-line-input date date-picker " data-date-format="dd/mm/yyyy hh:mm" style="display: inline-block;">
<asp:TextBox ID="txtFechaI" runat="server" autocomplete="false" CssClass="form-control input-sm ADDateTimePicker" CausesValidation="true" MaxLength="18" Width="132px "></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVtxtFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Inicio''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpFechas"></asp:RequiredFieldValidator>
<asp:Label AssociatedControlID="txtFechaI" runat="server" Text="Fecha Inicio"></asp:Label>
<%--<ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999 99:99" MaskType="DateTime" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>--%>
<ajax:ValidatorCalloutExtender ID="VcoFechaI" runat="server" HighlightCssClass="vco" TargetControlID="RFVtxtFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
</div>
<div class="col-sm-6">
<div class="input-group form-group form-md-line-input date date-picker " data-date-format="dd/mm/yyyy hh:mm" style="display: inline-block;">
<asp:TextBox ID="txtFechaF" runat="server" autocomplete="false" CssClass="form-control input-sm ADDateTimePicker" CausesValidation="true" MaxLength="18" Width="132px " placeholder=""></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVtxtFechaF" runat="server" ControlToValidate="txtFechaF" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Fin''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpFechas"></asp:RequiredFieldValidator>
<asp:Label AssociatedControlID="txtFechaF" runat="server" Text="Fecha Fin"></asp:Label>
<%--<ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999 99:99" MaskType="DateTime" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>--%>
<ajax:ValidatorCalloutExtender ID="VcoFechaF" runat="server" HighlightCssClass="vco" TargetControlID="RFVtxtFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
</div>
</div>
<div class="row">
<div class="col-sm-6">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlPrioridad" runat="server" CssClass="form-control select2me input-sm" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
<asp:ListItem Text="Baja" Value="1" style="color: #00CC00;"></asp:ListItem>
<asp:ListItem Text="Media" Value="2" style="color: #000000;"></asp:ListItem>
<asp:ListItem Text="Alta" Value="3" style="color: #FF0000;"></asp:ListItem>
</asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVPrioridad" runat="server" ControlToValidate="DdlPrioridad" Display="None" ErrorMessage="El campo <b>''Prioridad''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="Guarda"></asp:RequiredFieldValidator>
<asp:Label runat="server" AssociatedControlID="DdlPrioridad">Prioridad:</asp:Label>
<ajax:ValidatorCalloutExtender ID="VCOPrio" runat="server" TargetControlID="RFVPrioridad" HighlightCssClass="vco" Width="300px"></ajax:ValidatorCalloutExtender>
</div>
</div>
<div class="col-sm-6">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlRevision" runat="server" CssClass="form-control select2me input-sm" DataValueField="CveRevision" DataTextField="Revision" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<asp:Label runat="server" AssociatedControlID="DdlRevision">Revisión:</asp:Label>
</div>
</div>
</div>
</div>
</div>
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="fa fa-check-square-o font-green"></i>
<span class="caption-subject bold uppercase">CheckList (2/5)</span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body rowpadding">
<div class="row">
<div class="col-md-8">
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtActividad" runat="server" CssClass="form-control" CausesValidation="true" TextMode="MultiLine" Rows="1"></asp:TextBox>
<asp:Label runat="server" Text="Agregar Actividad" AssociatedControlID="TxtActividad"></asp:Label>
</div>
</div>
<div class="col-md-4">
<a class="btn btn-default">Agregar</a>
</div>
</div>
</div>
</div>
</div>
<div class="col-md-5">
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Estatus</span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body rowpadding">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlEventoEstatus" Visible="true" runat="server" DataValueField="CveEventoEstatus" CssClass="form-control select2me input-sm" Width="100%" DataTextField="EventoEstatus">
</asp:DropDownList>
<asp:Label runat="server" AssociatedControlID="DdlEventoEstatus">Estatus:</asp:Label>
</div>
</div>
</div>
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="fa fa-user-plus font-green"></i>
<span class="caption-subject bold uppercase">Miembros</span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body rowpadding">
<div class="row">
<div class="col-md-10">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlUsuario" Visible="true" runat="server" CssClass="form-control select2me input-sm" Width="100%" DataValueField="CveUsuario" DataTextField="Usuario">
</asp:DropDownList>
<asp:Label runat="server" AssociatedControlID="DdlUsuario">Usuario:</asp:Label>
</div>
</div>
<div class="col-md-2" style="direction: rtl; padding-top: 15px;">
<a class="btn btn-default"><i class="fa fa-plus"></i></a>
</div>
</div>
<table id="Gvmiembros" class="Widthall">
<tr class="titletable">
<td colspan="2">Para</td>
</tr>
<tr>
<td>jorge caudillo</td>
<td><a class="btn btn-circle btn-icon-only red btnsmalli"><i class='icon-trash'></i></a></td>
</tr>
<tr class="titletable">
<td colspan="2">Con copia para</td>
</tr>
<tr>
<td>Julian Moreno</td>
<td><a class="btn btn-circle btn-icon-only red btnsmalli"><i class='icon-trash'></i></a></td>
</tr>
</table>
</div>
</div>
</div>
</div>
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="fa fa-bars font-green"></i>
<span class="caption-subject bold uppercase">Registro de actividades</span>
</div>
<div class="tools">
<a href="javascript:;" class="expand" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body rowpadding" style="display: none;">
<div class="row">
<div class="col-md-8">
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtComentario" runat="server" CssClass="form-control" CausesValidation="true" TextMode="MultiLine" Rows="1"></asp:TextBox>
<asp:Label runat="server" Text="Agregar Comentario" AssociatedControlID="TxtComentario"></asp:Label>
</div>
</div>
<div class="col-md-4">
<a class="btn btn-default">Agregar</a>
</div>
</div>
<table class="Widthall table ">
<tbody>
<tr>
<td>19/04/2020 </td>
<td>comentario con archivo</td>
<td><a><i class="fa fa-download"></i></a></td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>comentario</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se termino la activada y del checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se termino la activada x del checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se agrego la activada p al checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se agrego la activada w al checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se agrego la activada z al checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se agrego la activada y al checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se agrego la activada x al checklist</td>
</tr>
<tr>
<td>19/04/2020 </td>
<td>Se registro la tarea oi</td>
</tr>
</tbody>
</table>
</div>
</div>
<%--<div class="row" style="margin-top: 10px; margin-bottom: 10px;">
<div class="col-md-2">Vencimiento de Licencia:</div>
<div class="col-md-4">
<div class="input-group input-sm date date-picker " data-date-format="dd/mm/yyyy" style="display: inline-block;">
<asp:TextBox ID="TxtFechaVenc" runat="server" CssClass="form-control input-sm" CausesValidation="true" MaxLength="10" Width="82px "></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton ID="imgCalendarioF" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
</span>
</div>
<ajax:MaskedEditExtender ID="MEEFechaF" runat="server" TargetControlID="TxtFechaVenc" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="Calendario2" TargetControlID="TxtFechaVenc" PopupButtonID="imgCalendarioF" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="rfvFechaF" runat="server" ControlToValidate="TxtFechaVenc" Display="None" ErrorMessage="El campo <b>''Fecha Vencimiento''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="cvFechaF" runat="server" ControlToValidate="TxtFechaVenc" Display="None" ErrorMessage="El campo <b>''Fecha Vencimiento''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
</div>
<div class="col-md-2">Fecha de Nacimiento:</div>
<div class="col-md-4">
<div class="input-group input-sm date date-picker " data-date-format="dd/mm/yyyy" style="display: inline-block;">
<asp:TextBox ID="TxtFechaNacimiento" runat="server" CssClass="form-control input-sm" CausesValidation="true" MaxLength="10" Width="82px "></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton ID="imgCalendarioN" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
</span>
</div>
<ajax:MaskedEditExtender ID="MaskedEditExtender1" runat="server" TargetControlID="TxtFechaNacimiento" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="TxtFechaNacimiento" PopupButtonID="imgCalendarioN" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RequiredFieldValidator4" runat="server" ControlToValidate="TxtFechaNacimiento" Display="None" ErrorMessage="El campo <b>''Fecha Vencimiento''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CompareValidator1" runat="server" ControlToValidate="TxtFechaNacimiento" Display="None" ErrorMessage="El campo <b>''Fecha Vencimiento''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
</div>
</div>
<div id="dvEstatus" runat="server" class="form-group form-md-line-input input-iconright">
<label>Activo: </label>
<br />
<asp:CheckBox ID="CheckBox1" Text=" " runat="server" CssClass="chksino" Width="250px"></asp:CheckBox>
</div>--%>
</div>
<div class="modal-footer">
<%--<asp:LinkButton ID="LnkAddConductor" OnClick="LnkAddConductor_Click" runat="server" Text="Agregar" CssClass="btn btn-primary" ValidationGroup="GrpConductor"></asp:LinkButton>--%>
<button data-dismiss="modal" class="btn btn-default">Cancelar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
<script>
function CargaPickers() {
$.datetimepicker.setLocale('es');
$('input.ADDateTimePicker').each(function () {
var TThis = $(this);
TThis.datetimepicker({
dayOfWeekStart: 1,
lang: 'es',
format: 'd/m/Y H:i',
formatDate: 'd/m/Y H:i',
step: 30
});
var Div = TThis.parent()
var boton = document.createElement('span');
boton.className = "input-group-btn"
var subboton = document.createElement('a')
subboton.className = "btn default btnCalendar"
subboton.innerHTML = "<i class='fa fa-calendar'></i>"
subboton.addEventListener('click', function () {
TThis.datetimepicker('show')
});
boton.appendChild(subboton)
var agregar = true;
for (var i = 0; i < Div[0].children.length; i++) {
if (Div[0].children[i].isEqualNode(boton)) {
agregar = false;
}
}
if (agregar) {
Div[0].appendChild(boton);
}
//Div[0].appendChild(boton)
});
}
Sys.Application.add_load(function (s, e) {
CargaPickers();
});
$(document).ready(function () {
CargaPickers();
});
</script>
</asp:Content>

22
OI/RepTareas2.aspx.cs Normal file
View File

@@ -0,0 +1,22 @@
using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
using Extensiones;
public partial class OI_RepTareas2 : System.Web.UI.Page
{
public const string iddivAgregar = "divModalAgregarEvento";
protected void Page_Load(object sender, EventArgs e)
{
}
protected void LnkAddEvento_Click(object sender, EventArgs e)
{
this.RegistraScript(string.Format("$('#{0}').modal()", iddivAgregar));
}
}

4
PortalCliente/PortalCliente.aspx.vb
View File

@@ -543,7 +543,7 @@ Partial Class Ventas_PortalCliente
#Region " PAGO PROSEPAGO " #Region " PAGO PROSEPAGO "
Private Sub InicializaProsepago() Private Sub InicializaProsepago()
If Not UsuarioActual.CveEmpresa.Contiene(1, 4, 7, 11, 12) Then If Not UsuarioActual.CveEmpresa.Contiene(1, 4, 7, 11, 12, 145) Then
GvCxC.Columns(10).Visible = False GvCxC.Columns(10).Visible = False
LBPagar.Visible = False LBPagar.Visible = False
End If End If
@@ -632,7 +632,7 @@ Partial Class Ventas_PortalCliente
Dim uriString = "" Dim uriString = ""
Select Case UsuarioActual.CveEmpresa Select Case UsuarioActual.CveEmpresa
Case 1, 4, 7, 11, 12 Case 1, 4, 7, 11, 12, 145
uriString = "https://www.prosepago.com/tvirtual/tvds.aspx?ppost=1&t=123" ' VSH SEGURIDAD uriString = "https://www.prosepago.com/tvirtual/tvds.aspx?ppost=1&t=123" ' VSH SEGURIDAD
Case Else Case Else
Alert("Sin terminal de pago configurada. Por favor comuniquese con su proveedor para verificar.", TipoMensaje.MsgAdvertencia) Alert("Sin terminal de pago configurada. Por favor comuniquese con su proveedor para verificar.", TipoMensaje.MsgAdvertencia)

378
RH/Personal.aspx
View File

@@ -28,8 +28,8 @@
</style> </style>
</asp:Content> </asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server"> <asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
<%-- <li> <%-- <li>
<asp:LinkButton ID="ImgImprimir" Visible="false" runat="server"> <i class="fa fa-file-pdf-o" style="font-weight:bold;"></i> PDF</asp:LinkButton> <asp:LinkButton ID="ImgImprimir" Visible="false" runat="server"> <i class="fa fa-file-pdf-o" style="font-weight:bold;"></i> PDF</asp:LinkButton>
</li>--%> </li>--%>
<li> <li>
<asp:LinkButton ID="ImgImprimirExpediente" Visible="false" runat="server"> <i class="fa fa-file-pdf-o" style="font-weight:bold;"></i> PDF</asp:LinkButton> <asp:LinkButton ID="ImgImprimirExpediente" Visible="false" runat="server"> <i class="fa fa-file-pdf-o" style="font-weight:bold;"></i> PDF</asp:LinkButton>
@@ -376,11 +376,11 @@
<i></i> <i></i>
</div> </div>
<%-- <div class="form-group form-md-line-input input-iconright"> <%-- <div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtContactoAlterno" runat="server" MaxLength="10"></asp:TextBox> <asp:TextBox CssClass="form-control" ID="TxtContactoAlterno" runat="server" MaxLength="10"></asp:TextBox>
<ajax:MaskedEditExtender ID="MEECA" runat="server" TargetControlID="TxtContactoAlterno" Mask="(999)999-9999" ></ajax:MaskedEditExtender> <ajax:MaskedEditExtender ID="MEECA" runat="server" TargetControlID="TxtContactoAlterno" Mask="(999)999-9999" ></ajax:MaskedEditExtender>
<label for="<%= TxtContactoAlterno.ClientID.ToString()%>">Contacto Alterno: </label> <label for="<%= TxtContactoAlterno.ClientID.ToString()%>">Contacto Alterno: </label>
<i></i> <i></i>
</div>--%> </div>--%>
</div> </div>
</div> </div>
@@ -548,11 +548,11 @@
<label for="<%= DdlSubProyectoAsignado.ClientID.ToString()%>">SubProyecto: </label> <label for="<%= DdlSubProyectoAsignado.ClientID.ToString()%>">SubProyecto: </label>
<i></i> <i></i>
</div> </div>
<%-- <div class="form-group form-md-line-input input-iconright"> <%-- <div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlSucursal" runat="server" DataTextField="Sucursal" DataValueField="CveSucursal" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardar"></asp:DropDownList> <asp:DropDownList ID="DdlSucursal" runat="server" DataTextField="Sucursal" DataValueField="CveSucursal" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardar"></asp:DropDownList>
<label for="<%= DdlSucursal.ClientID.ToString()%>">Sucursal: </label> <label for="<%= DdlSucursal.ClientID.ToString()%>">Sucursal: </label>
<asp:RequiredFieldValidator ID="RFVSucursal" runat="server" ControlToValidate="DdlSucursal" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Sucursal''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RFVSucursal" runat="server" ControlToValidate="DdlSucursal" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Sucursal''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<i></i> <i></i>
</div>--%> </div>--%>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
@@ -797,10 +797,10 @@
CssClass="table table-hover table-advance Widthall" GridLines="None"> CssClass="table table-hover table-advance Widthall" GridLines="None">
<Columns> <Columns>
<asp:HyperLinkField DataNavigateUrlFields="CveMovimiento" Target="_blank" HeaderText="Folio" DataNavigateUrlFormatString="../Inventarios/EntradasSalidas.aspx?CveMovimiento={0}" DataTextField="Folio" /> <asp:HyperLinkField DataNavigateUrlFields="CveMovimiento" Target="_blank" HeaderText="Folio" DataNavigateUrlFormatString="../Inventarios/EntradasSalidas.aspx?CveMovimiento={0}" DataTextField="Folio" />
<%-- <asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Folio"> <%-- <asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Folio">
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlFolio" runat="server" Text='<%# If(Eval("Folio").ToString = "", "ND", Eval("Folio").ToString) %>'>></asp:Literal> <asp:Literal ID="LtlFolio" runat="server" Text='<%# If(Eval("Folio").ToString = "", "ND", Eval("Folio").ToString) %>'>></asp:Literal>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField>--%> </asp:TemplateField>--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Fecha"> <asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Fecha">
<ItemTemplate> <ItemTemplate>
@@ -813,10 +813,10 @@
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%-- <asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText="Observacion"> <%-- <asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText="Observacion">
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlObserbacion" runat="server" Text='<%# If(Eval("Observaciones").ToString = "", "ND", Eval("Observaciones")) %>'>></asp:Literal> <asp:Literal ID="LtlObserbacion" runat="server" Text='<%# If(Eval("Observaciones").ToString = "", "ND", Eval("Observaciones")) %>'>></asp:Literal>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField>--%> </asp:TemplateField>--%>
<asp:BoundField runat="server" DataField="Cantidad" HeaderText="Cantidad" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:###,###}" /> <asp:BoundField runat="server" DataField="Cantidad" HeaderText="Cantidad" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:###,###}" />
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Opciones"> <asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Opciones">
@@ -840,7 +840,7 @@
<div class="portlet box blue-hoki" style="width: 100%;"> <div class="portlet box blue-hoki" style="width: 100%;">
<div class="portlet-title"> <div class="portlet-title">
<div class="caption"> <div class="caption">
<i class="icon-grid"></i>Cuentas Bancarias <i class="icon-grid"></i>Cuentas Bancarias
</div> </div>
</div> </div>
@@ -852,61 +852,61 @@
<tr class="Titulos"> <tr class="Titulos">
<th width="7%"> <th width="7%">
<asp:LinkButton ID="LbBancoNombre" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="BancoNombre0;0"> <asp:LinkButton ID="LbBancoNombre" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="BancoNombre0;0">
Banco Banco
<asp:Literal ID="ImgBancoNombre0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgBancoNombre0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="7%"> <th width="7%">
<asp:LinkButton ID="LbSucursal2" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="Sucursal0;0"> <asp:LinkButton ID="LbSucursal2" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="Sucursal0;0">
# Suc # Suc
<asp:Literal ID="ImgSucursal0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgSucursal0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="7%"> <th width="7%">
<asp:LinkButton ID="LbCuenta" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="Cuenta0;0"> <asp:LinkButton ID="LbCuenta" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="Cuenta0;0">
Num Cuenta Num Cuenta
<asp:Literal ID="ImgCuenta0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgCuenta0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="7%"> <th width="7%">
<asp:LinkButton ID="LbCLABE" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="CLABE0;0"> <asp:LinkButton ID="LbCLABE" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="CLABE0;0">
CLABE CLABE
<asp:Literal ID="ImgCLABE0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgCLABE0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="7%"> <th width="7%">
<asp:LinkButton ID="LbSWIFT" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="SWIFT0;0"> <asp:LinkButton ID="LbSWIFT" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="SWIFT0;0">
SWIFT SWIFT
<asp:Literal ID="ImgSWIFT0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgSWIFT0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="7%"> <th width="7%">
<asp:LinkButton ID="LbPlaza" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="Plaza0;0"> <asp:LinkButton ID="LbPlaza" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="Plaza0;0">
Plaza Plaza
<asp:Literal ID="ImgPlaza0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgPlaza0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="7%"> <th width="7%">
<asp:LinkButton ID="LbCIE" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="CIE0;0"> <asp:LinkButton ID="LbCIE" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="CIE0;0">
CIE CIE
<asp:Literal ID="ImgCIE0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgCIE0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="7%"> <th width="7%">
<asp:LinkButton ID="LbReferencia" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="Referencia0;0"> <asp:LinkButton ID="LbReferencia" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="Referencia0;0">
Referencia Referencia
<asp:Literal ID="ImgReferencia0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgReferencia0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="7%"> <th width="7%">
<asp:LinkButton ID="LbRefCrediProveedor" runat="server" CausesValidation="false" Text=" " OnClick="LbOrden_Click" CommandArgument="RefCrediProveedor0;0"> <asp:LinkButton ID="LbRefCrediProveedor" runat="server" CausesValidation="false" Text=" " OnClick="LbOrden_Click" CommandArgument="RefCrediProveedor0;0">
Credi Prov Credi Prov
<asp:Literal ID="ImgRefCrediProveedor0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgRefCrediProveedor0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="7%"> <th width="7%">
<asp:LinkButton ID="LbMoneda" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="Moneda0;0"> <asp:LinkButton ID="LbMoneda" runat="server" CausesValidation="false" Text="" OnClick="LbOrden_Click" CommandArgument="Moneda0;0">
Moneda Moneda
<asp:Literal ID="ImgMoneda0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgMoneda0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton></th> </asp:LinkButton></th>
@@ -924,8 +924,8 @@
</thead> </thead>
</tr> </tr>
<td align="center" width="7%"> <td align="center" width="7%">
@@ -952,7 +952,7 @@
</td> </td>
<td align="center" width="7%"> <td align="center" width="7%">
<asp:TextBox CssClass="form-control" ID="TxtConvenioCIE" runat="server" CausesValidation="true" MaxLength="8" ValidationGroup="GrpAgregarBanco" Width="90%"></asp:TextBox> <asp:TextBox CssClass="form-control" ID="TxtConvenioCIE" runat="server" CausesValidation="true" MaxLength="8" ValidationGroup="GrpAgregarBanco" Width="90%"></asp:TextBox>
<%--<ajax:FilteredTextBoxExtender ID="SoloNumeros3" runat="server" TargetControlID="TxtConvenioCIE" FilterType="Numbers" />--%> <%--<ajax:FilteredTextBoxExtender ID="SoloNumeros3" runat="server" TargetControlID="TxtConvenioCIE" FilterType="Numbers" />--%>
</td> </td>
<td align="center" width="7%"> <td align="center" width="7%">
<asp:TextBox CssClass="form-control" ID="TxtReferenciaCB" runat="server" CausesValidation="true" MaxLength="100" ValidationGroup="GrpAgregarBanco" Width="90%"></asp:TextBox> <asp:TextBox CssClass="form-control" ID="TxtReferenciaCB" runat="server" CausesValidation="true" MaxLength="100" ValidationGroup="GrpAgregarBanco" Width="90%"></asp:TextBox>
@@ -974,12 +974,12 @@
</td> </td>
<td id="TDEstatusTexto" runat="server" visible="false" width="7%"> <td id="TDEstatusTexto" runat="server" visible="false" width="7%">
<%--<asp:CheckBox ID ="ChkEstatus" runat="server" Checked="true"></asp:CheckBox>--%> <%--<asp:CheckBox ID ="ChkEstatus" runat="server" Checked="true"></asp:CheckBox>--%>
</td> </td>
<td id="TD1" runat="server" visible="true" width="7%"> <td id="TD1" runat="server" visible="true" width="7%">
<%--<asp:CheckBox ID ="ChkEstatus" runat="server" Checked="true"></asp:CheckBox>--%> <%--<asp:CheckBox ID ="ChkEstatus" runat="server" Checked="true"></asp:CheckBox>--%>
</td> </td>
<td align="center" width="7%">&nbsp;&nbsp;&nbsp;&nbsp; <td align="center" width="7%">&nbsp;&nbsp;&nbsp;&nbsp;
<asp:LinkButton ID="LbAgregarCuentaBanco" runat="server" CausesValidation="true" CssClass="Texto" Text="Agregar" ValidationGroup="GrpAgregarBanco" OnClick="LbAgregarCuentaBanco_Click"></asp:LinkButton> <asp:LinkButton ID="LbAgregarCuentaBanco" runat="server" CausesValidation="true" CssClass="Texto" Text="Agregar" ValidationGroup="GrpAgregarBanco" OnClick="LbAgregarCuentaBanco_Click"></asp:LinkButton>
</td> </td>
@@ -1138,7 +1138,7 @@
<div class="portlet box blue-hoki" style="width: 100%;"> <div class="portlet box blue-hoki" style="width: 100%;">
<div class="portlet-title"> <div class="portlet-title">
<div class="caption"> <div class="caption">
<i class="icon-grid"></i>Pagos Realizados <i class="icon-grid"></i>Pagos Realizados
</div> </div>
</div> </div>
@@ -1166,28 +1166,28 @@
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Cheque</HeaderTemplate> <HeaderTemplate>Cheque</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:HyperLink ID="HplCheque" Visible="False" runat="server" CssClass="Texto" Text='<%# Eval("FolioPago") %>' NavigateUrl='<%# Eval("CveIE", "/Bancos/IE.aspx?CveIE={0}") %>'></asp:HyperLink>&nbsp; <asp:HyperLink ID="HplCheque" Visible="False" runat="server" CssClass="Texto" Text='<%# Eval("FolioPago") %>' NavigateUrl='<%# Eval("CveIE", "/Bancos/IE.aspx?CveIE={0}") %>'></asp:HyperLink>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField Visible="False"> <asp:TemplateField Visible="False">
<HeaderTemplate>Monto Compra (Saldo Orig)</HeaderTemplate> <HeaderTemplate>Monto Compra (Saldo Orig)</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlSaldoOriginal" runat="server" Text='<%# Eval("Original", "{0:N2}") %>'></asp:Literal>&nbsp; <asp:Literal ID="LtlSaldoOriginal" runat="server" Text='<%# Eval("Original", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Abonado</HeaderTemplate> <HeaderTemplate>Abonado</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlAbonado" runat="server" Text='<%# Eval("Abonado", "{0:N2}") %>'></asp:Literal>&nbsp; <asp:Literal ID="LtlAbonado" runat="server" Text='<%# Eval("Abonado", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField Visible="False"> <asp:TemplateField Visible="False">
<HeaderTemplate>% Pagado</HeaderTemplate> <HeaderTemplate>% Pagado</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlPorRecuperado" runat="server" Text='<%# Eval("PorPagado", "{0:N2}%") %>'></asp:Literal>&nbsp; <asp:Literal ID="LtlPorRecuperado" runat="server" Text='<%# Eval("PorPagado", "{0:N2}%") %>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
@@ -1538,7 +1538,7 @@
<div class="portlet box blue-hoki" style="width: 100%;"> <div class="portlet box blue-hoki" style="width: 100%;">
<div class="portlet-title"> <div class="portlet-title">
<div class="caption"> <div class="caption">
<i class="icon-grid"></i>Registro de Nómina <i class="icon-grid"></i>Registro de Nómina
</div> </div>
</div> </div>
@@ -1661,8 +1661,8 @@
<%--<thead>--%> <%--<thead>--%>
<tr class="Titulos"> <tr class="Titulos">
<th width="120px"> <th width="120px">
<asp:LinkButton ID="LbFechaAsistencia" runat="server" CausesValidation="false" Text="Fecha" CommandArgument="" OnClick="LbOrden_Click"> <asp:LinkButton ID="LbFechaAsistencia" runat="server" CausesValidation="false" Text="Fecha" CommandArgument="" OnClick="LbOrden_Click">
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="180px"> <th width="180px">
<asp:LinkButton ID="LbClienteAsistencia" runat="server" CausesValidation="false" Text="Cliente" CommandArgument="Cliente1;1" OnClick="LbOrden_Click"> <asp:LinkButton ID="LbClienteAsistencia" runat="server" CausesValidation="false" Text="Cliente" CommandArgument="Cliente1;1" OnClick="LbOrden_Click">
@@ -1677,28 +1677,28 @@
<asp:Literal ID="ImgSubProyecto1" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgSubProyecto1" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="70px"> <th width="70px">
<asp:LinkButton ID="LbTipoAsistencia" runat="server" CausesValidation="false" Text="Asistencia" CommandArgument="" OnClick="LbOrden_Click"> <asp:LinkButton ID="LbTipoAsistencia" runat="server" CausesValidation="false" Text="Asistencia" CommandArgument="" OnClick="LbOrden_Click">
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="50px"> <th width="50px">
<asp:LinkButton ID="LbPorPagoAsistencia" runat="server" CausesValidation="false" Text="% Pago" CommandArgument="" OnClick="LbOrden_Click"> <asp:LinkButton ID="LbPorPagoAsistencia" runat="server" CausesValidation="false" Text="% Pago" CommandArgument="" OnClick="LbOrden_Click">
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="56px"> <th width="56px">
<asp:LinkButton ID="LbHorasDoblesAsistencia" runat="server" CausesValidation="false" Text="Hrs Dob." CommandArgument="" OnClick="LbOrden_Click"> <asp:LinkButton ID="LbHorasDoblesAsistencia" runat="server" CausesValidation="false" Text="Hrs Dob." CommandArgument="" OnClick="LbOrden_Click">
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="56px"> <th width="56px">
<asp:LinkButton ID="LbHorasTriplesAsistencia" runat="server" CausesValidation="false" Text="Hrs Trip." CommandArgument="" OnClick="LbOrden_Click"> <asp:LinkButton ID="LbHorasTriplesAsistencia" runat="server" CausesValidation="false" Text="Hrs Trip." CommandArgument="" OnClick="LbOrden_Click">
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="110px"> <th width="110px">
<asp:LinkButton ID="LbMotivosHorasExtrasAsistencia" runat="server" CausesValidation="false" Text="Motivos H. Extras" CommandArgument="" OnClick="LbOrden_Click"> <asp:LinkButton ID="LbMotivosHorasExtrasAsistencia" runat="server" CausesValidation="false" Text="Motivos H. Extras" CommandArgument="" OnClick="LbOrden_Click">
</asp:LinkButton></th> </asp:LinkButton></th>
<th width="30px"> <th width="30px">
<asp:LinkButton ID="LbObservacionesAsistencia" runat="server" CausesValidation="false" Text="Obs." CommandArgument="" OnClick="LbOrden_Click"> <asp:LinkButton ID="LbObservacionesAsistencia" runat="server" CausesValidation="false" Text="Obs." CommandArgument="" OnClick="LbOrden_Click">
</asp:LinkButton></th> </asp:LinkButton></th>
<th style="text-align: center;" width="8px">Comandos</th> <th style="text-align: center;" width="8px">Comandos</th>
</tr> </tr>
@@ -2070,8 +2070,8 @@
<div class="tools"><a href="javascript;" class="collapse" data-original-title="" title=""></a></div> <div class="tools"><a href="javascript;" class="collapse" data-original-title="" title=""></a></div>
<div class="actions"> <div class="actions">
<div class="btn-group"> <div class="btn-group">
<asp:HyperLink data-toggle="modal" data-target="#ModalAddVacaciones" runat="server" class="btn green btn-outline btn-sm"> <asp:HyperLink data-toggle="modal" data-target="#ModalAddVacaciones" runat="server" class="btn green btn-outline btn-sm">
<i class="fa fa-plus"></i> Solicitar Vacaciones <i class="fa fa-plus"></i> Solicitar Vacaciones
</asp:HyperLink> </asp:HyperLink>
</div> </div>
</div> </div>
@@ -2221,7 +2221,7 @@
</div> </div>
<div class="col-md-3"></div> <div class="col-md-3"></div>
</div> </div>
<%--Motivo <%--Motivo
<asp:TextBox ID="TxtMotivoVacaciones" runat="server" TextMode="MultiLine" Rows="4" CssClass="form-control Widthallimp"></asp:TextBox>--%> <asp:TextBox ID="TxtMotivoVacaciones" runat="server" TextMode="MultiLine" Rows="4" CssClass="form-control Widthallimp"></asp:TextBox>--%>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
@@ -2415,9 +2415,9 @@
</ContentTemplate> </ContentTemplate>
<%--<Triggers> <%--<Triggers>
<asp:PostBackTrigger ControlID="BtnSolicitarVacaciones" /> <asp:PostBackTrigger ControlID="BtnSolicitarVacaciones" />
</Triggers>--%> </Triggers>--%>
</asp:UpdatePanel> </asp:UpdatePanel>
@@ -2557,7 +2557,7 @@
<asp:Panel ID="PnlGastoGeneral" runat="server"> <asp:Panel ID="PnlGastoGeneral" runat="server">
<table border="0" class="Widthall"> <table border="0" class="Widthall">
<tr> <tr>
<td>Saldo: $ <td>Saldo: $
<asp:Label ID="LblSaldoGxC" runat="server" Text="" Font-Bold="True"></asp:Label> <asp:Label ID="LblSaldoGxC" runat="server" Text="" Font-Bold="True"></asp:Label>
<br /> <br />
@@ -2585,7 +2585,7 @@
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Cargo</HeaderTemplate> <HeaderTemplate>Cargo</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlImporte" runat="server" Text='<%# Eval("Cargo", "{0:###,###,###.##}")%>'></asp:Literal>&nbsp; <asp:Literal ID="LtlImporte" runat="server" Text='<%# Eval("Cargo", "{0:###,###,###.##}")%>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
<ItemStyle HorizontalAlign="Right" /> <ItemStyle HorizontalAlign="Right" />
@@ -2593,7 +2593,7 @@
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Abono</HeaderTemplate> <HeaderTemplate>Abono</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlComprobado" runat="server" Text='<%# Eval("Abono", "{0:###,###,###.##}")%>'></asp:Literal>&nbsp; <asp:Literal ID="LtlComprobado" runat="server" Text='<%# Eval("Abono", "{0:###,###,###.##}")%>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
<ItemStyle HorizontalAlign="Right" /> <ItemStyle HorizontalAlign="Right" />
@@ -2632,28 +2632,28 @@
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Cheque</HeaderTemplate> <HeaderTemplate>Cheque</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:HyperLink ID="HplCheque" Visible="False" runat="server" CssClass="Texto" Text='<%# Eval("FolioPago") %>' NavigateUrl='<%# Eval("CveIE", "/Bancos/IE.aspx?CveIE={0}") %>'></asp:HyperLink>&nbsp; <asp:HyperLink ID="HplCheque" Visible="False" runat="server" CssClass="Texto" Text='<%# Eval("FolioPago") %>' NavigateUrl='<%# Eval("CveIE", "/Bancos/IE.aspx?CveIE={0}") %>'></asp:HyperLink>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField Visible="False"> <asp:TemplateField Visible="False">
<HeaderTemplate>Monto Compra (Saldo Orig)</HeaderTemplate> <HeaderTemplate>Monto Compra (Saldo Orig)</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlSaldoOriginal" runat="server" Text='<%# Eval("Original", "{0:N2}") %>'></asp:Literal>&nbsp; <asp:Literal ID="LtlSaldoOriginal" runat="server" Text='<%# Eval("Original", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Abonado</HeaderTemplate> <HeaderTemplate>Abonado</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlAbonado" runat="server" Text='<%# Eval("Abonado", "{0:N2}") %>'></asp:Literal>&nbsp; <asp:Literal ID="LtlAbonado" runat="server" Text='<%# Eval("Abonado", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField Visible="False"> <asp:TemplateField Visible="False">
<HeaderTemplate>% Pagado</HeaderTemplate> <HeaderTemplate>% Pagado</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlPorRecuperado" runat="server" Text='<%# Eval("PorPagado", "{0:N2}%") %>'></asp:Literal>&nbsp; <asp:Literal ID="LtlPorRecuperado" runat="server" Text='<%# Eval("PorPagado", "{0:N2}%") %>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
@@ -2694,14 +2694,14 @@
<asp:TemplateField ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-HorizontalAlign="Right">
<HeaderTemplate>Cargo</HeaderTemplate> <HeaderTemplate>Cargo</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlSaldoOriginal" runat="server" Text='<%# Eval("Cargo", "{0:#,###.00}") %>'></asp:Literal>&nbsp; <asp:Literal ID="LtlSaldoOriginal" runat="server" Text='<%# Eval("Cargo", "{0:#,###.00}") %>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-HorizontalAlign="Right">
<HeaderTemplate>Abono</HeaderTemplate> <HeaderTemplate>Abono</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlAbonado" runat="server" Text='<%# Eval("Abono", "{0:#,###.00}") %>'></asp:Literal>&nbsp; <asp:Literal ID="LtlAbonado" runat="server" Text='<%# Eval("Abono", "{0:#,###.00}") %>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
@@ -2806,35 +2806,35 @@
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Importe(Saldo Orig)</HeaderTemplate> <HeaderTemplate>Importe(Saldo Orig)</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlImporte" runat="server" Text='<%# Eval("Importe", "{0:N2}")%>'></asp:Literal>&nbsp; <asp:Literal ID="LtlImporte" runat="server" Text='<%# Eval("Importe", "{0:N2}")%>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Comprobado</HeaderTemplate> <HeaderTemplate>Comprobado</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlComprobado" runat="server" Text='<%# Eval("Pagado", "{0:N2}")%>'></asp:Literal>&nbsp; <asp:Literal ID="LtlComprobado" runat="server" Text='<%# Eval("Pagado", "{0:N2}")%>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>% Comprobado</HeaderTemplate> <HeaderTemplate>% Comprobado</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlPorComprobado" runat="server" Text='<%# Eval("PorPagado", "{0:N2}%")%>'></asp:Literal>&nbsp; <asp:Literal ID="LtlPorComprobado" runat="server" Text='<%# Eval("PorPagado", "{0:N2}%")%>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Saldo</HeaderTemplate> <HeaderTemplate>Saldo</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlSaldo" runat="server" Text='<%# Eval("Saldo", "{0:N2}") %>'></asp:Literal>&nbsp; <asp:Literal ID="LtlSaldo" runat="server" Text='<%# Eval("Saldo", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>% A Pagar</HeaderTemplate> <HeaderTemplate>% A Pagar</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlPorXComprobar" runat="server" Text='<%# Eval("PorSaldo", "{0:N2}%")%>'></asp:Literal>&nbsp; <asp:Literal ID="LtlPorXComprobar" runat="server" Text='<%# Eval("PorSaldo", "{0:N2}%")%>'></asp:Literal>&nbsp;
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
@@ -2890,7 +2890,7 @@
<Columns> <Columns>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate> <HeaderTemplate>
Factura Factura
</HeaderTemplate> </HeaderTemplate>
<ItemTemplate> <ItemTemplate>
@@ -2900,7 +2900,7 @@
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate> <HeaderTemplate>
Producto Producto
</HeaderTemplate> </HeaderTemplate>
<ItemTemplate> <ItemTemplate>
@@ -2910,7 +2910,7 @@
<asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Left"> <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Left">
<HeaderTemplate> <HeaderTemplate>
Unidad de medida Unidad de medida
</HeaderTemplate> </HeaderTemplate>
<ItemTemplate> <ItemTemplate>
@@ -2920,7 +2920,7 @@
<asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Right">
<HeaderTemplate> <HeaderTemplate>
Cantidad Cantidad
</HeaderTemplate> </HeaderTemplate>
<ItemTemplate> <ItemTemplate>
@@ -2930,7 +2930,7 @@
<asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Right">
<HeaderTemplate> <HeaderTemplate>
PU PU
</HeaderTemplate> </HeaderTemplate>
<ItemTemplate> <ItemTemplate>
@@ -2940,7 +2940,7 @@
<asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Right">
<HeaderTemplate> <HeaderTemplate>
Total Total
</HeaderTemplate> </HeaderTemplate>
<ItemTemplate> <ItemTemplate>
@@ -3057,11 +3057,11 @@
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%-- <asp:TemplateField ItemStyle-HorizontalAlign="Right" ItemStyle-Width="50px"> <%-- <asp:TemplateField ItemStyle-HorizontalAlign="Right" ItemStyle-Width="50px">
<ItemTemplate> <ItemTemplate>
<asp:LinkButton ID="ImgE" OnClick="Update_ClickDocumentacionAntidoping" runat="server" ToolTip="Aplicar Cambios" AlternateText="Editar" CausesValidation="False" <asp:LinkButton ID="ImgE" OnClick="Update_ClickDocumentacionAntidoping" runat="server" ToolTip="Aplicar Cambios" AlternateText="Editar" CausesValidation="False"
CssClass="btn btn-circle btn-sm blue" Text="<i class='fa fa-check' title='Aplicar Cambios'></i>" /> CssClass="btn btn-circle btn-sm blue" Text="<i class='fa fa-check' title='Aplicar Cambios'></i>" />
</ItemTemplate> </ItemTemplate>
</asp:TemplateField>--%> </asp:TemplateField>--%>
</Columns> </Columns>
</asp:GridView> </asp:GridView>
@@ -3378,7 +3378,7 @@
<asp:UpdatePanel ID="UpViaticos" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpViaticos" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GVViaticos" Width="100%" runat="server" GridLines="None" BorderWidth="0" data-heighterror="330" data-freezecols="0" data-freezerows="1" <asp:GridView ID="GVViaticos" Width="100%" runat="server" GridLines="None" BorderWidth="0" data-heighterror="330" data-freezecols="0" data-freezerows="1"
DataKeyNames="CveSolicitudViatico, Folio, CveEstatus, Estatus, CvePersonal, NombrePersonal, CveDepartamento, DepartamentoSolicitante, CveSupervisor, DataKeyNames="CveSolicitudViatico, Folio, CveEstatus, Estatus, CvePersonal, NombrePersonal, CveDepartamento, DepartamentoSolicitante, CveSupervisor,
NombreSupervisor, Destino, Asunto, FechaSalida, FechaRegreso, FechaIng, CveUsuarioIng, UsuarioIng, CiudadPersonal, TelefonoPersonal, Importe" NombreSupervisor, Destino, Asunto, FechaSalida, FechaRegreso, FechaIng, CveUsuarioIng, UsuarioIng, CiudadPersonal, TelefonoPersonal, Importe"
CssClass=" table table-striped table-advance table-hover Widthall" ShowHeader="True" EmptyDataText="No se encontraron resultados." ShowHeaderWhenEmpty="true" CssClass=" table table-striped table-advance table-hover Widthall" ShowHeader="True" EmptyDataText="No se encontraron resultados." ShowHeaderWhenEmpty="true"
AutoGenerateColumns="False" AllowPaging="False" ShowFooter="False"> AutoGenerateColumns="False" AllowPaging="False" ShowFooter="False">
@@ -3464,8 +3464,8 @@
</ajax:TabContainer> </ajax:TabContainer>
</ContentTemplate> </ContentTemplate>
<%--<Triggers> <%--<Triggers>
<asp:PostBackTrigger ControlID="LbContrato" /> <asp:PostBackTrigger ControlID="LbContrato" />
</Triggers>--%> </Triggers>--%>
</asp:UpdatePanel> </asp:UpdatePanel>
</td> </td>
@@ -3501,7 +3501,7 @@
</tr> </tr>
<tr align="left"> <tr align="left">
<td>Con copia para:<br /> <td>Con copia para:<br />
(Separar con: ;) (Separar con: ;)
</td> </td>
<td> <td>
<asp:TextBox CssClass="form-control" ID="TxtCC" runat="server" TextMode="MultiLine" Columns="3" Rows="3" Width="194px"></asp:TextBox></td> <asp:TextBox CssClass="form-control" ID="TxtCC" runat="server" TextMode="MultiLine" Columns="3" Rows="3" Width="194px"></asp:TextBox></td>
@@ -3565,9 +3565,9 @@
</div> </div>
<div class="actions"> <div class="actions">
<div class="btn-group"> <div class="btn-group">
<%--<div class=" font-green" style="cursor: pointer;" runat="server" id="ImgAddObs"> <%--<div class=" font-green" style="cursor: pointer;" runat="server" id="ImgAddObs">
<i class="fa fa-commenting font-green"></i> <i class="fa fa-commenting font-green"></i>
<span class="caption-subject bold">Agregar</span> <span class="caption-subject bold">Agregar</span>
</div>--%> </div>--%>
<asp:HyperLink ID="ImgAddObs" CssClass="caption-subject bold" data-toggle="modal" data-target="#ModalBitacora" runat="server" Text=" <i class='fa fa-commenting font-green' style='font-weight: 700 !important;' ><span class='caption-subject bold'>Agregar</span></i>" Style="cursor: pointer;" ToolTip="Observaciones"></asp:HyperLink><br /> <asp:HyperLink ID="ImgAddObs" CssClass="caption-subject bold" data-toggle="modal" data-target="#ModalBitacora" runat="server" Text=" <i class='fa fa-commenting font-green' style='font-weight: 700 !important;' ><span class='caption-subject bold'>Agregar</span></i>" Style="cursor: pointer;" ToolTip="Observaciones"></asp:HyperLink><br />
<asp:HyperLink ID="HlEvento" CssClass="thickbox caption-subject bold" runat="server" Text=" <i class='fa fa-calendar-plus-o font-green' style='font-weight: 700 !important;' >Agendar</i>" Visible="false" Style="cursor: pointer;" ToolTip="Agendar"></asp:HyperLink> <asp:HyperLink ID="HlEvento" CssClass="thickbox caption-subject bold" runat="server" Text=" <i class='fa fa-calendar-plus-o font-green' style='font-weight: 700 !important;' >Agendar</i>" Visible="false" Style="cursor: pointer;" ToolTip="Agendar"></asp:HyperLink>
@@ -3688,8 +3688,8 @@
</div> </div>
</div> </div>
</div> </div>
<%--<div> <%--<div>
<asp:TextBox ID="Anexo" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox> <asp:TextBox ID="Anexo" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox>
</div> --%> </div> --%>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
@@ -3788,12 +3788,12 @@
<div class="modal-body"> <div class="modal-body">
<div class="row"> <div class="row">
<div class="col-md-4"> <div class="col-md-4">
Periodo Periodo
</div> </div>
<div class="col-md-8"> <div class="col-md-8">
<asp:Label ID="TxtFechaDiaVacacion" runat="server" Text=""></asp:Label> <asp:Label ID="TxtFechaDiaVacacion" runat="server" Text=""></asp:Label>
- -
<asp:Label ID="TxtFechaDiaVacacionFin" runat="server" Text=""></asp:Label> <asp:Label ID="TxtFechaDiaVacacionFin" runat="server" Text=""></asp:Label>
</div> </div>
@@ -3833,8 +3833,8 @@
</div> </div>
</div> </div>
</div> </div>
<%--<div> <%--<div>
<asp:TextBox ID="Anexo" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox> <asp:TextBox ID="Anexo" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox>
</div> --%> </div> --%>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
@@ -3852,46 +3852,46 @@
</div> </div>
<%-- FIN MODAL SUBIR FACTURAS --%> <%-- FIN MODAL SUBIR FACTURAS --%>
<%--<asp:UpdatePanel runat="server" ID="UPAddEventoBitacora" UpdateMode="Conditional"> <%--<asp:UpdatePanel runat="server" ID="UPAddEventoBitacora" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div id="DivEventoBitacora" style="width: 335px; background-color: White; border: solid 1px black; color: Black; display: none; position: absolute;"> <div id="DivEventoBitacora" style="width: 335px; background-color: White; border: solid 1px black; color: Black; display: none; position: absolute;">
<table style="width: 335px;" class="table table-striped table-advance"> <table style="width: 335px;" class="table table-striped table-advance">
<thead> <thead>
<tr class="Titulos"> <tr class="Titulos">
<th style="width: 330px">Bitácora&nbsp;</th> <th style="width: 330px">Bitácora&nbsp;</th>
<th style="padding-right: 4px; padding-top: 4px" valign="top"> <th style="padding-right: 4px; padding-top: 4px" valign="top">
<img alt="" src="/Imagenes/close.gif" style="cursor: pointer;" onclick="$('#DivEventoBitacora').hide(1000);" /></th> <img alt="" src="/Imagenes/close.gif" style="cursor: pointer;" onclick="$('#DivEventoBitacora').hide(1000);" /></th>
</tr> </tr>
</thead> </thead>
<tr align="left"> <tr align="left">
<td> <td>
<table> <table>
<tr> <tr>
<td>Bitácora/Observaciones</td> <td>Bitácora/Observaciones</td>
</tr> </tr>
<tr> <tr>
<td> <td>
<asp:TextBox CssClass="form-control" ID="TxtEventoDescripcion" runat="server" TextMode="MultiLine" Columns="60" Rows="4"></asp:TextBox> <asp:TextBox CssClass="form-control" ID="TxtEventoDescripcion" runat="server" TextMode="MultiLine" Columns="60" Rows="4"></asp:TextBox>
</td> </td>
</tr> </tr>
</table> </table>
</td> </td>
</tr> </tr>
<tr style="height: 25px"> <tr style="height: 25px">
<td align="center" colspan="2"> <td align="center" colspan="2">
<asp:UpdatePanel runat="server"> <asp:UpdatePanel runat="server">
<ContentTemplate> <ContentTemplate>
<asp:Button ID="BtnGuardarEventoBitacora" runat="server" ClientIDMode="Static" OnClientClick="$('#DivEventoBitacora').hide(1000);" Text="Guardar" CssClass="btn btn-primary" /> <asp:Button ID="BtnGuardarEventoBitacora" runat="server" ClientIDMode="Static" OnClientClick="$('#DivEventoBitacora').hide(1000);" Text="Guardar" CssClass="btn btn-primary" />
<input id="BtnCancelarObs" type="button" value="Cancelar" onclick="$('#DivEventoBitacora').hide(1000);" class="btn btn-default" /> <input id="BtnCancelarObs" type="button" value="Cancelar" onclick="$('#DivEventoBitacora').hide(1000);" class="btn btn-default" />
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</td> </td>
</tr> </tr>
</table> </table>
</div> </div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel>--%> </asp:UpdatePanel>--%>
@@ -4447,54 +4447,54 @@
<script src="/Metronic/assets/global/plugins/dropzone/dropzone.js"></script> <script src="/Metronic/assets/global/plugins/dropzone/dropzone.js"></script>
<script> <script>
function pageLoad() { function pageLoad() {
$(document).ready(function () { $(document).ready(function () {
$('#<%=GvPersonalAltas.ClientID%>').ADScroll({ $('#<%=GvPersonalAltas.ClientID%>').ADScroll({
height: 50 height: 50
}); });
$('[data-toggle="tooltip"]').tooltip(); $('[data-toggle="tooltip"]').tooltip();
}); });
} }
function SetText(ObjFrom, ObjTo) { function SetText(ObjFrom, ObjTo) {
ObjTo.innerText = ObjFrom.value; ObjTo.innerText = ObjFrom.value;
} }
function SetText2(ObjTo, Value) { function SetText2(ObjTo, Value) {
ObjTo.innerText = Value; ObjTo.innerText = Value;
} }
function getSelectedText(Obj, IfIsNull) { function getSelectedText(Obj, IfIsNull) {
if (Obj.selectedIndex == -1) if (Obj.selectedIndex == -1)
return IfIsNull; return IfIsNull;
else else
return Obj.options[Obj.selectedIndex].text; return Obj.options[Obj.selectedIndex].text;
} }
function CargaClientes() { function CargaClientes() {
$("#BtnCargarClientes").click(); $("#BtnCargarClientes").click();
} }
function CargaCuentas(op) { function CargaCuentas(op) {
$get("HdnCuenta").value = op; $get("HdnCuenta").value = op;
$("#BtnCargarCuentas").click(); $("#BtnCargarCuentas").click();
} }
function Download(urlD) { function Download(urlD) {
document.getElementById('my_iframe').src = urlD; document.getElementById('my_iframe').src = urlD;
}; };
</script> </script>
<script type="text/javascript"> <script type="text/javascript">
function CargarArchivo(Tipo) { function CargarArchivo(Tipo) {
if (Tipo == "Imagen") { if (Tipo == "Imagen") {
$("#BtnCargarArchivo").click(); $("#BtnCargarArchivo").click();
} }
} }
</script> </script>
</asp:Content> </asp:Content>

5
RH/Personal.aspx.vb
View File

@@ -4961,6 +4961,11 @@ Partial Class RH_Personal
FileExtension = IO.Path.GetExtension(String.Format("{0}Temp\{1}", AppDomain.CurrentDomain.BaseDirectory, fileItem.filename)).Replace(".", "") FileExtension = IO.Path.GetExtension(String.Format("{0}Temp\{1}", AppDomain.CurrentDomain.BaseDirectory, fileItem.filename)).Replace(".", "")
filemove = fileItem.filename filemove = fileItem.filename
Dim yaExistente As String = String.Format("{0}Empresas\{1}\RH\Personal\{2}.jpg", AppDomain.CurrentDomain.BaseDirectory, UsuarioActual.CveEmpresa, CvePersonal)
If File.Exists(yaExistente) Then
File.Delete(yaExistente)
End If
If filemove <> "" Then If filemove <> "" Then
filemove.FilesMove(CvePersonal.ToString, String.Format("Empresas\{0}\RH\Personal\", UsuarioActual.CveEmpresa)) filemove.FilesMove(CvePersonal.ToString, String.Format("Empresas\{0}\RH\Personal\", UsuarioActual.CveEmpresa))
End If End If

5
Ventas/ClientesAbonar.aspx.vb
View File

@@ -863,7 +863,7 @@ Partial Class Ventas_ClientesAbonar
importeMX = gvr.FCTextBox("TxtAbonar").Text.ToDecimal * tipoCambioVentaValuacion importeMX = gvr.FCTextBox("TxtAbonar").Text.ToDecimal * tipoCambioVentaValuacion
ElseIf CveMoneda = 2 AndAlso gvr.DataKey("CveMoneda").ToEntero = 1 Then ElseIf CveMoneda = 2 AndAlso gvr.DataKey("CveMoneda").ToEntero = 1 Then
ImporteMovimiento = gvr.FCTextBox("TxtAbonar").Text.ToDecimal ImporteMovimiento = gvr.FCTextBox("TxtAbonar").Text.ToDecimal
importeMX = gvr.FCTextBox("TxtAbonar").Text.ToDecimal * tipoCambioVentaValuacion importeMX = gvr.FCTextBox("TxtAbonar").Text.ToDecimal
ElseIf CveMoneda = 2 AndAlso gvr.DataKey("CveMoneda").ToEntero = 2 Then ElseIf CveMoneda = 2 AndAlso gvr.DataKey("CveMoneda").ToEntero = 2 Then
ImporteMovimiento = gvr.FCTextBox("TxtAbonar").Text.ToDecimal ImporteMovimiento = gvr.FCTextBox("TxtAbonar").Text.ToDecimal
importeMX = ImporteMovimiento * tipoCambioVentaValuacion importeMX = ImporteMovimiento * tipoCambioVentaValuacion
@@ -1467,6 +1467,7 @@ Partial Class Ventas_ClientesAbonar
If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, ImporteMovimiento, Referencia, ConceptoContable, ConceptoMovimiento, FechaMovimiento, IdCtaContable, -1, CveIE, gvr.FCHyperLink("HplF2").Text.ToEntero, -1, CveSubProyectoContabilizar, ViewState("CveCliente").ToString.ToEntero, ImporteMX:=importeMX, CveCuenta:=CveCuenta, TipoCambio:=TipoCambioGeneral, TipoCambioPago:=tipoCambioPago, PorcentajeImpuesto:=PorcentajeImpuesto) Then If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovimiento, ImporteMovimiento, Referencia, ConceptoContable, ConceptoMovimiento, FechaMovimiento, IdCtaContable, -1, CveIE, gvr.FCHyperLink("HplF2").Text.ToEntero, -1, CveSubProyectoContabilizar, ViewState("CveCliente").ToString.ToEntero, ImporteMX:=importeMX, CveCuenta:=CveCuenta, TipoCambio:=TipoCambioGeneral, TipoCambioPago:=tipoCambioPago, PorcentajeImpuesto:=PorcentajeImpuesto) Then
MsgError = "No se pudo insertar la póliza" MsgError = "No se pudo insertar la póliza"
Exit For
End If End If
End If End If
@@ -1568,7 +1569,7 @@ Partial Class Ventas_ClientesAbonar
End If End If
End If End If
If ObjMov.ValidacionPrePolizaCuadre(CvePrePoliza, 3) Then If MsgError = "" AndAlso ObjMov.ValidacionPrePolizaCuadre(CvePrePoliza, 3) Then
If ObjMov.ValorPolizaDescuadre > 0 Then If ObjMov.ValorPolizaDescuadre > 0 Then
MsgError = ObjMov.MensajePolizaDescuadre + " La diferencia es de: " + ObjMov.ValorDiferencia MsgError = ObjMov.MensajePolizaDescuadre + " La diferencia es de: " + ObjMov.ValorDiferencia
End If End If

21
Ventas/Ventas.aspx.vb
View File

@@ -11209,8 +11209,8 @@ Partial Class Ventas
End If End If
End If End If
Else
OcurrioError = True
End If End If
factura.Inv_CveMovimiento = CveMovimientoInventario factura.Inv_CveMovimiento = CveMovimientoInventario
factura.Inv_ValorInventario = ValorInventario factura.Inv_ValorInventario = ValorInventario
@@ -11249,11 +11249,11 @@ Partial Class Ventas
If factura.TipoDocto.Contiene("Ing", "Egs", "OP", "Com") Then If factura.TipoDocto.Contiene("Ing", "Egs", "OP", "Com") Then
'Dim ObjAC As New ClsContPAQi(UsuarioActual.Empresa) : ObjAC.IniciaTransacSQL() 'Dim ObjAC As New ClsContPAQi(UsuarioActual.Empresa) : ObjAC.IniciaTransacSQL()
Dim IDPoliza As Integer = GenerarPolizaAC(ObjAC, factura) Dim IDPoliza As Modelos.RetornoPolizaConta = GenerarPolizaAC(ObjAC, factura)
If IDPoliza > 0 Then If IDPoliza.IdPoliza > 0 Then
If ObjVentas.UpdateVentaPrePoliza(IDPoliza, factura.CvePrePoliza, factura.CveVenta, factura.CveEmpresa) Then If ObjVentas.UpdateVentaPrePoliza(IDPoliza.IdPoliza, IDPoliza.FolioPoliza, factura.CvePrePoliza, factura.CveVenta, factura.CveEmpresa) Then
'Si se facturó la cotización hay que vincular la venta 'Si se facturó la cotización hay que vincular la venta
Msgok.AppendFormat("Abono Registrado Correctamente.<br/><br/> <a href='/Contabilidad/RegPoliza.aspx?IdPoliza={0}' target='_blank' class='Texto'>Ver Poliza</a>", IDPoliza) Msgok.AppendFormat("Abono Registrado Correctamente.<br/><br/> <a href='/Contabilidad/RegPoliza.aspx?IdPoliza={0}' target='_blank' class='Texto'>Ver Poliza</a>", IDPoliza)
@@ -15078,8 +15078,8 @@ Partial Class Ventas
End If End If
ObjVentas.Dispose() ObjVentas.Dispose()
End Sub End Sub
Private Function GenerarPolizaAC(ObjAC As ClsContPAQi, factura As Modelos.Factura, Optional CancelacionIngreso As Boolean = False) As Integer Private Function GenerarPolizaAC(ObjAC As ClsContPAQi, factura As Modelos.Factura, Optional CancelacionIngreso As Boolean = False) As RetornoPolizaConta
Dim Retorno As Integer = 0 Dim Retorno As New Modelos.RetornoPolizaConta
Dim IDPoliza As Integer = 0 Dim IDPoliza As Integer = 0
Dim ErrorAC As Boolean = False Dim ErrorAC As Boolean = False
@@ -15106,7 +15106,8 @@ Partial Class Ventas
' Dim NombreCliente As String = ViewState("NombreCliente").ToString ' Dim NombreCliente As String = ViewState("NombreCliente").ToString
If IDPoliza > 0 Then If IDPoliza > 0 Then
Retorno.IdPoliza = IDPoliza
Retorno.FolioPoliza = ObjAC.Folio
'Orden de PAGO 'Orden de PAGO
If factura.TipoDocto = "OP" Then If factura.TipoDocto = "OP" Then
@@ -15186,7 +15187,7 @@ Partial Class Ventas
If Not ErrorAC Then If Not ErrorAC Then
ObjAC.AjustaPoliza(IDPoliza) ObjAC.AjustaPoliza(IDPoliza)
Retorno = IDPoliza ' Retorno = IDPoliza
Else Else
Alert("Error al agregar la Póliza de AC.", TipoMensaje.MsgError) Alert("Error al agregar la Póliza de AC.", TipoMensaje.MsgError)
@@ -15197,6 +15198,8 @@ Partial Class Ventas
Return Retorno Return Retorno
End Function End Function
Private Function GenerarPolizaAC(ObjAC As ClsContPAQi, Optional CancelacionIngreso As Boolean = False) As Integer Private Function GenerarPolizaAC(ObjAC As ClsContPAQi, Optional CancelacionIngreso As Boolean = False) As Integer
Dim Retorno As Integer = 0 Dim Retorno As Integer = 0
Dim IDPoliza As Integer = 0 Dim IDPoliza As Integer = 0

2
vwd.webinfo
View File

@@ -50,8 +50,6 @@