This commit is contained in:
rrene
2020-05-27 14:11:13 -07:00
65 changed files with 4459 additions and 2429 deletions

View File

@@ -4375,4 +4375,24 @@ Public Class ClsBancos
End Try
Return Retorno
End Function
Public Function GetBancosSAT() As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Nom_Sat_BancosGet")
'With SqlAdapter.SelectCommand.Parameters
' .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
'End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al obtener los bancos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try
Return Retorno
End Function
End Class

View File

@@ -174,6 +174,26 @@ Public Class ClsClasificaciones
OnError("Ocurrió un error al modificar la clasificación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try
Return Retorno
End Function
Public Function RemoveClasificacionesComprobaciones(CveClasificacion As Integer, CveEmpresa As Integer, TipoComprobacion As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_ClasificacionesComprobacionesRemove")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveClasificacion", SqlDbType.Int).Value = CveClasificacion
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@TipoComprobacion", SqlDbType.Int).Value = TipoComprobacion
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As SqlException
OnError("Ocurrió un error al eliminar la clasificación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try
Return Retorno
End Function

View File

@@ -569,7 +569,8 @@ Public Class ClsClientes
Optional ObservacionRevsion As String = "-1", Optional ReferenciaFiscal As String = "-1", Optional Celular As String = "-1", Optional ExtOtros As String = "-1", Optional CveUsoCFDI As Integer = -1, Optional CveFormaPago33 As Integer = -1, Optional CveMetodoPago33 As Integer = -1, Optional DesglosaIEPS As Boolean = True,
Optional AplicaComercioExterior As Boolean = False, Optional CveTipoOperacion As Integer = -1, Optional CvePedimento As Integer = -1, Optional CveIncoterm As Integer = -1, Optional CvePais As Integer = -1, Optional CveEstado As Integer = -1, Optional CveMunicipio As Integer = -1, Optional CveColonia As Integer = -1,
Optional CveMotivoTraslado As Integer = 0, Optional NumRegIdTrib As String = "", Optional ComExtEstado As String = "-1", Optional ComExtMunicipio As String = "-1", Optional ComExtColonia As String = "-1", Optional RequiereOC As Boolean = False,
Optional LT As String = "0", Optional LG As String = "0", Optional EsDistribuidor As Boolean = False, Optional TipoCliente As Integer = 1, Optional CargoUsado As Boolean = False, Optional BonificacionUsado As Boolean = False, Optional CveTipoRetencion As Integer = 0) As Boolean
Optional LT As String = "0", Optional LG As String = "0", Optional EsDistribuidor As Boolean = False, Optional TipoCliente As Integer = 1, Optional CargoUsado As Boolean = False, Optional BonificacionUsado As Boolean = False, Optional CveTipoRetencion As Integer = 0,
Optional CorreoEntregaCompras As String = "-1", Optional CorreoEntregaAlmacen As String = "-1") As Boolean
Dim Retorno As Boolean = False
@@ -706,6 +707,9 @@ Public Class ClsClientes
.Add("@CveTipoRetencion", SqlDbType.TinyInt).Value = CveTipoRetencion
.Add("@RETURN_VALUE", SqlDbType.Int).Direction = ParameterDirection.ReturnValue
.Add("@CorreoEntregaCompras", SqlDbType.VarChar).Value = CorreoEntregaCompras
.Add("@CorreoEntregaAlmacen", SqlDbType.VarChar).Value = CorreoEntregaAlmacen
End With
Try
SqlAdapter.Fill(Data)
@@ -749,7 +753,7 @@ Public Class ClsClientes
Optional AplicaComercioExterior As Boolean = False, Optional CveTipoOperacion As Integer = -1, Optional CvePedimento As Integer = -1, Optional CveIncoterm As Integer = -1, Optional CvePais As Integer = -1, Optional CveEstado As Integer = -1, Optional CveMunicipio As Integer = -1, Optional CveColonia As Integer = -1,
Optional CveMotivoTraslado As Integer = 0, Optional NumRegIdTrib As String = "-1", Optional ComExtEstado As String = "-1", Optional ComExtMunicipio As String = "-1", Optional ComExtColonia As String = "-1",
Optional ApellidoPaternoPF As String = "-1", Optional ApellidoMaternoPF As String = "-1", Optional NombresPF As String = "-1", Optional RequiereOC As Boolean = False,
Optional LT As String = "0", Optional LG As String = "0", Optional EsDistribuidor As Boolean = False, Optional TipoCliente As Integer = 1, Optional CargoUsado As Boolean = False, Optional BonificacionUsado As Boolean = False, Optional CveTipoRetencion As Integer = 0) As Boolean
Optional LT As String = "0", Optional LG As String = "0", Optional EsDistribuidor As Boolean = False, Optional TipoCliente As Integer = 1, Optional CargoUsado As Boolean = False, Optional BonificacionUsado As Boolean = False, Optional CveTipoRetencion As Integer = 0, Optional CorreoEntregaCompras As String = "-1", Optional CorreoEntregaAlmacen As String = "-1") As Boolean
Dim Retorno As Boolean = False
@@ -900,6 +904,9 @@ Public Class ClsClientes
.Add("@CargoUsado", SqlDbType.Bit).Value = CargoUsado
.Add("@BonificacionUsado", SqlDbType.Bit).Value = BonificacionUsado
.Add("@CveTipoRetencion", SqlDbType.TinyInt).Value = CveTipoRetencion
.Add("@CorreoEntregaCompras", SqlDbType.VarChar).Value = CorreoEntregaCompras
.Add("@CorreoEntregaAlmacen", SqlDbType.VarChar).Value = CorreoEntregaAlmacen
End With
Try
SqlAdapter.Fill(Data)

View File

@@ -1390,7 +1390,7 @@ Public Class ClsGenerales
End Function
Public Function AddCuentasDepositos(BancoNombre As String, Plaza As String, Sucursal As String, Cuenta As String, CLABE As String, CIE As String, SWIFT As String, Referencia As String, RefCrediProveedor As String, CveUsuario As Integer, CveMoneda As Integer,
Optional CveProveedor As Integer = -1, Optional CveCliente As Integer = -1, Optional CvePersonal As Integer = -1, Optional CveColectiva As Integer = -1, Optional CveUsuarioModifico As Integer = -1,
Optional Correo As String = "", Optional BBVAAlias As String = "-1") As Boolean
Optional Correo As String = "", Optional BBVAAlias As String = "-1", Optional EstatusPagoElectronico As Boolean = False, Optional EstatusPagoElectronicoGrupos As Boolean = False, Optional CveSATBanco As Integer = -1) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Gral_CuentasDepositosAdd")
@@ -1414,6 +1414,9 @@ Public Class ClsGenerales
.Add("@CveUsuarioModifico", SqlDbType.Int).Value = CveUsuarioModifico
.Add("@Correo", SqlDbType.VarChar).Value = Correo
.Add("@BBVAAlias", SqlDbType.VarChar).Value = BBVAAlias
.Add("@EstatusPagoElectronico", SqlDbType.Bit).Value = EstatusPagoElectronico
.Add("@EstatusPagoElectronicoGrupos", SqlDbType.Bit).Value = EstatusPagoElectronicoGrupos
.Add("@CveSATBanco", SqlDbType.Int).Value = CveSATBanco
End With
@@ -1456,7 +1459,9 @@ Public Class ClsGenerales
Return Retorno
End Function
Public Function UpdateCuentasDepositos(CveCuentaDeposito As Integer, BancoNombre As String, Plaza As String, Sucursal As String, Cuenta As String, CLABE As String, CIE As String, SWIFT As String, Referencia As String, RefCrediProveedor As String, Predeterminada As Boolean, Estatus As Boolean, CveMoneda As Integer, Optional CveUsuarioModifico As Integer = -1, Optional Correo As String = "", Optional BBVAAlias As String = "-1") As Boolean
Public Function UpdateCuentasDepositos(CveCuentaDeposito As Integer, BancoNombre As String, Plaza As String, Sucursal As String, Cuenta As String, CLABE As String, CIE As String, SWIFT As String, Referencia As String,
RefCrediProveedor As String, Predeterminada As Boolean, Estatus As Boolean, CveMoneda As Integer, Optional CveUsuarioModifico As Integer = -1, Optional Correo As String = "",
Optional BBVAAlias As String = "-1", Optional EstatusPagoElectronico As Boolean = False, Optional EstatusPagoElectronicoGrupos As Boolean = False, Optional CveSATBanco As Integer = -1) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Gral_CuentasDepositosUpdate")
@@ -1479,6 +1484,9 @@ Public Class ClsGenerales
.Add("@CveUsuarioModifico", SqlDbType.Int).Value = CveUsuarioModifico
.Add("@Correo", SqlDbType.VarChar).Value = Correo
.Add("@BBVAAlias", SqlDbType.VarChar).Value = BBVAAlias
.Add("@EstatusPagoElectronico", SqlDbType.Bit).Value = EstatusPagoElectronico
.Add("@EstatusPagoElectronicoGrupos", SqlDbType.Bit).Value = EstatusPagoElectronicoGrupos
.Add("@CveSATBanco", SqlDbType.Int).Value = CveSATBanco
End With
@@ -2661,11 +2669,12 @@ Public Class ClsGenerales
End Try
Return Retorno
End Function
End Function
#Region "P A Q U E T E R I A S G U I A S"
Public Function AddPaqueteriasGuias(CvePaqueteria As Integer, CvePaqueteriaGuiaTipo As Integer, CveEstatus As Integer, CveSubProyecto As Integer, Fecha As String, Rastreo As String, Guia As String, NumCajas As Integer,
Peso As Double, Dimensiones As String, FechaEstimada As String, Observaciones As String, CveUsuario As Integer, CveEmpresa As Integer, Optional ImplicaCosto As Boolean = True) As Integer
Peso As Double, Dimensiones As String, FechaEstimada As String, Observaciones As String, CveUsuario As Integer, CveEmpresa As Integer, Optional ImplicaCosto As Boolean = True,
Optional EsEntregaInterna As Boolean = False) As Integer
Dim Retorno As Integer = -1
@@ -2691,6 +2700,8 @@ Public Class ClsGenerales
.Add("@ImplicaCosto", SqlDbType.Bit).Value = IIf(ImplicaCosto = True, 1, 0)
.Add("@CvePaqueteriaGuiaTipo", SqlDbType.SmallInt).Value = CvePaqueteriaGuiaTipo
.Add("@EsEntregaInterna", SqlDbType.Bit).Value = EsEntregaInterna
.Add("@CvePaqueteriaGuia", SqlDbType.Int).Direction = ParameterDirection.Output
End With
@@ -2711,7 +2722,9 @@ Public Class ClsGenerales
Return Retorno
End Function
Public Function GetPaqueteriasGuias(CvePaqueteriaGuia As Integer, CvePaqueteriaGuiaTipo As Integer, CvePaqueteria As Integer, CveEstatus As Integer, CveSubProyecto As Integer, CveEmpresa As Integer, Guia As String, FechaInicio As String, FechaFin As String, Optional FechaIngInicio As String = "-1", Optional FechaIngFin As String = "-1", Optional Filtro As Integer = -1) As Boolean
Public Function GetPaqueteriasGuias(CvePaqueteriaGuia As Integer, CvePaqueteriaGuiaTipo As Integer, CvePaqueteria As Integer, CveEstatus As Integer, CveSubProyecto As Integer,
CveEmpresa As Integer, Guia As String, FechaInicio As String, FechaFin As String, Optional FechaIngInicio As String = "-1",
Optional FechaIngFin As String = "-1", Optional Filtro As Integer = -1, Optional CveUsuarioEntrega As Integer = -1) As Boolean
Dim Retorno As Boolean = False
@@ -2730,6 +2743,7 @@ Public Class ClsGenerales
.Add("@FechaIngInicio", SqlDbType.VarChar).Value = FechaIngInicio
.Add("@FechaIngFin", SqlDbType.VarChar).Value = FechaIngFin
.Add("@Filtro", SqlDbType.Int).Value = Filtro
.Add("@CveUsuarioEntrega", SqlDbType.Int).Value = CveUsuarioEntrega
End With
Try
SqlAdapter.Fill(Data)
@@ -2796,9 +2810,43 @@ Public Class ClsGenerales
End Try
Return Retorno
End Function
#End Region
End Function
Public Function GetEntregasPorRealizar(CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Gral_EntregasPorRealizarGet")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al obtener entregas por realizar.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function AsignarEntregasPorRealizar(CvePaqueteriaGuia As Integer, CvePersonal As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Gral_AsignarEntregasPorRealizar")
With SqlAdapter.SelectCommand.Parameters
.Add("@CvePaqueteriaGuia", SqlDbType.Int).Value = CvePaqueteriaGuia
.Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al obtener entregas por realizar.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
#End Region
#Region "P A Q U E T E R I A S G U I A S D E T A L L E S"
Public Function AddPaqueteriasGuiasDetalles(CvePaqueteriaGuia As Integer, CveVenta As Integer, CveOC As Integer, CveMovimiento As Integer, Optional CveCompra As Integer = -1) As Boolean

View File

@@ -1726,7 +1726,7 @@ Public Class ClsOC
Public Function GetOrdenesCompraRep(Tipo As String, CveProyecto As Integer, CveSubProyecto As Integer, CveClasificacion As Integer, CveEstatus As Integer,
FechaInicio As Date, FechaFin As Date, CveOrdenCompra As Integer, CveProveedor As Integer, Folio As Integer, CveUsuarioRegistro As Integer, CveUsuario As Integer, CveEmpresa As Integer, CvePS As Integer, Optional PendientePorSurtir As Boolean = False, Optional CveCliente As Integer = -1, Optional Guia As String = "-1", Optional CveActivoFijo As Integer = -1,
Optional SoloSubProyectosConPermiso As Boolean = False) As Boolean
Optional SoloSubProyectosConPermiso As Boolean = False, Optional CveUsuarioAutorizo As Integer = -1) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_OC_OrdenesCompraRep")
@@ -1751,6 +1751,7 @@ Public Class ClsOC
.Add("@Guia", SqlDbType.VarChar).Value = Guia
.Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo
.Add("@SoloSubProyectosConPermiso", SqlDbType.Bit).Value = SoloSubProyectosConPermiso
.Add("@CveUsuarioAutorizo", SqlDbType.Int).Value = CveUsuarioAutorizo
End With

View File

@@ -17,7 +17,21 @@ Public Enum OITipoEventos
Gastos_Mes = 10
Convocatorias = 11
End Enum
Public Enum OITipoEventosRelacion
Activo_Fijo = 1
Cliente = 2
Personal = 3
Proveedor = 4
Ventas = 5
Compras = 6
Bancos = 7
Prospectos = 8
OrdendeServicio = 9
OrdendeCompra = 10
Proyecto = 11
Almacen = 12
Contrato = 12
End Enum
Public Class ObjEventosCorreo
Public Sub New(AsuntoCorreo As String, mailPara As String, ListPara As List(Of String), Folio As Integer, Link As String, Asunto As String, Descripcion As String, Fechai As String, Fechaf As String, Prioridad As String, Tema As String, Actividad As String, Estatus As String)
Me.AsuntoCorreo = AsuntoCorreo
@@ -162,6 +176,7 @@ Public Class ClsOIEventos
.CommandText = StrSQL
.CommandType = TipoComando
End With
objCorreo = Nothing
Data = New DataTable
If SqlTransacc IsNot Nothing Then SqlAdapter.SelectCommand.Transaction = SqlTransacc
End Sub
@@ -291,13 +306,14 @@ Public Class ClsOIEventos
End Function
Public Function GetUnoaUnoCuestionario(cveUnoaUnoCuestionario As Int32, cveUsuario As Int32) As Boolean
Public Function GetUnoaUnoCuestionario(cveUnoaUnoCuestionario As Integer, cveUsuario As Integer, CveEmpresa As Integer) As Boolean
Dim retorno As Boolean = False
DataAdapter("PA_OI_UnoaUnoCuestionarioGet", CommandType.StoredProcedure)
With SqlAdapter.SelectCommand.Parameters
.Add("@CveUnoaUnoCuestionario", SqlDbType.Int).Value = (cveUnoaUnoCuestionario)
.Add("@CveUsuario", SqlDbType.Int).Value = (cveUsuario)
.Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa)
End With
Try
SqlAdapter.Fill(Data)
@@ -322,7 +338,7 @@ Public Class ClsOIEventos
End Try
Return retorno
End Function
Public Function AddUnoaUnoCuestionario(Cuestionario As String, Comentario As String, CveUsuario As Integer, ListPreguntas As List(Of Integer)) As Boolean
Public Function AddUnoaUnoCuestionario(Cuestionario As String, Comentario As String, CveUsuario As Integer, ListPreguntas As List(Of Integer), CveEmpresa As Integer) As Boolean
Dim retorno As Boolean = False
Dim xmlPreguntas As System.Xml.Linq.XDocument = Nothing
@@ -334,6 +350,7 @@ Public Class ClsOIEventos
.Add("@Cuestionario", SqlDbType.VarChar).Value = (Cuestionario)
.Add("@Comentario", SqlDbType.VarChar).Value = (Comentario)
.Add("@CveUsuario", SqlDbType.Int).Value = (CveUsuario)
.Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa)
.Add("@xmlPreguntas", SqlDbType.Xml).Value = If(xmlPreguntas Is Nothing, DBNull.Value, DirectCast(xmlPreguntas.ToString(), Object))
End With
Try
@@ -671,6 +688,102 @@ Public Class ClsOIEventos
#End Region
#Region "oieventos2.0"
Public Function GetOiInicio(CveEmpresa As Integer, CveUsuario As Integer) As Boolean
Dim retorno As Boolean = False
DataAdapter("PA_OI_InicioReport", CommandType.StoredProcedure)
With SqlAdapter.SelectCommand.Parameters
.Add("@CveUsuario", SqlDbType.Int).Value = (CveUsuario)
.Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa)
End With
Try
SqlAdapter.Fill(Data)
retorno = True
Catch ex As Exception
OnError("Ocurrió un error al actualizar la relación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return retorno
End Function
Public Function OrdenaTareas(ListAsistentes As List(Of String), CveEmpresa As Integer, CveUsuarioIng As Integer) As Boolean
Dim retorno As Boolean = False
Dim xmlAsistentes As System.Xml.Linq.XDocument = Nothing
If ListAsistentes IsNot Nothing AndAlso ListAsistentes.Count > 0 Then
xmlAsistentes = New System.Xml.Linq.XDocument(New System.Xml.Linq.XElement("OrdenList", ListAsistentes.[Select](Function(x) New System.Xml.Linq.XElement("Cve_Orden", x))))
End If
DataAdapter("PA_OI_OrdenaTareasUP", CommandType.StoredProcedure)
With SqlAdapter.SelectCommand.Parameters
.Add("@xmlOrdenado", SqlDbType.Xml).Value = If(xmlAsistentes Is Nothing, DBNull.Value, DirectCast(xmlAsistentes.ToString(), Object))
.Add("@CveUsuarioIng", SqlDbType.Int).Value = (CveUsuarioIng)
.Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa)
End With
Try
SqlAdapter.Fill(Data)
retorno = True
Catch ex As Exception
OnError("Ocurrió un error al actualizar la relación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return retorno
End Function
Public Function OrdenaListas(ListAsistentes As List(Of String), CveEmpresa As Integer, CveUsuarioIng As Integer) As Boolean
Dim retorno As Boolean = False
Dim xmlAsistentes As System.Xml.Linq.XDocument = Nothing
If ListAsistentes IsNot Nothing AndAlso ListAsistentes.Count > 0 Then
xmlAsistentes = New System.Xml.Linq.XDocument(New System.Xml.Linq.XElement("OrdenList", ListAsistentes.[Select](Function(x) New System.Xml.Linq.XElement("Cve_Orden", x))))
End If
DataAdapter("PA_OI_OrdenaListasUP", CommandType.StoredProcedure)
With SqlAdapter.SelectCommand.Parameters
.Add("@xmlOrdenado", SqlDbType.Xml).Value = If(xmlAsistentes Is Nothing, DBNull.Value, DirectCast(xmlAsistentes.ToString(), Object))
.Add("@CveUsuarioIng", SqlDbType.Int).Value = (CveUsuarioIng)
.Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa)
End With
Try
SqlAdapter.Fill(Data)
retorno = True
Catch ex As Exception
OnError("Ocurrió un error al actualizar la relación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return retorno
End Function
Public Function UPEventosVinculo(CveEvento As Integer, CveTipoRelacion As Integer, CveRelacion As Integer, CveEmpresa As Integer, CveUsuarioIng As Integer) As Boolean
Dim retorno As Boolean = False
DataAdapter("PA_OI_EventosVinculoUP", CommandType.StoredProcedure)
With SqlAdapter.SelectCommand.Parameters
.Add("@CveEvento", SqlDbType.Int).Value = (CveEvento)
.Add("@CveTipoRelacion", SqlDbType.Int).Value = (CveTipoRelacion)
.Add("@CveRelacion", SqlDbType.Int).Value = (CveRelacion)
.Add("@CveUsuarioIng", SqlDbType.Int).Value = (CveUsuarioIng)
.Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa)
End With
Try
SqlAdapter.Fill(Data)
retorno = True
Catch ex As Exception
OnError("Ocurrió un error al actualizar la relación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return retorno
End Function
Public Function UPMinutasAsistentes(CveEvento As Integer, CveEmpresa As Integer, Asistencia As String, CveUsuarioIng As Integer, ListAsistentes As List(Of Integer)) As Boolean
Dim retorno As Boolean = False
Dim xmlAsistentes As System.Xml.Linq.XDocument = Nothing
If ListAsistentes IsNot Nothing AndAlso ListAsistentes.Count > 0 Then
xmlAsistentes = New System.Xml.Linq.XDocument(New System.Xml.Linq.XElement("Asistentes", ListAsistentes.[Select](Function(x) New System.Xml.Linq.XElement("CveUsuario", x))))
End If
DataAdapter("PA_OI_MinutasUpAsistentes", CommandType.StoredProcedure)
With SqlAdapter.SelectCommand.Parameters
.Add("@CveEvento", SqlDbType.Int).Value = (CveEvento)
.Add("@xmlAsistentes", SqlDbType.Xml).Value = If(xmlAsistentes Is Nothing, DBNull.Value, DirectCast(xmlAsistentes.ToString(), Object))
.Add("@Asistencia", SqlDbType.VarChar).Value = (Asistencia)
.Add("@CveUsuarioIng", SqlDbType.Int).Value = (CveUsuarioIng)
.Add("@CveEmpresa", SqlDbType.Int).Value = (CveEmpresa)
End With
Try
SqlAdapter.Fill(Data)
retorno = True
Catch ex As Exception
OnError("Ocurrió un error al actualizar la asistencia de usuarios.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return retorno
End Function
Public Function UpEventosVinculos(cveEvento As Int32, cveActivoFijo As Int32, cveIE As Int32, cveProspecto As Int32, cveCliente As Int32, cveOS As Int32, cveOC As Int32, cvePersonal As Int32,
cveProveedor As Int32, cveCompra As Int32, cveVenta As Int32, cveContrato As Int32, cveSubProyecto As Int32, cveMovimientoAlmacen As Int32,
cveEmpresaCRM As Int32) As Boolean
@@ -819,7 +932,7 @@ Public Class ClsOIEventos
Optional CveActivoFijo As Integer = -1, Optional CveIE As Integer = -1, Optional CveProspecto As Integer = -1, Optional CveCliente As Integer = -1,
Optional CveOS As Integer = -1, Optional CveOC As Integer = -1, Optional CvePersonal As Integer = -1, Optional CveProveedor As Integer = -1,
Optional CveCompra As Integer = -1, Optional CveVenta As Integer = -1, Optional CveContrato As Integer = -1, Optional CveSubProyecto As Integer = -1,
Optional CveMovimientoAlmacen As Integer = -1, Optional CorreoExterno As String = "", Optional CveTableroLista As Integer = -1, Optional Lugar As String = "") As Boolean
Optional CveMovimientoAlmacen As Integer = -1, Optional CorreoExterno As String = "", Optional CveTableroLista As Integer = -1, Optional Lugar As String = "", Optional Asistencia As String = "", Optional Duracion As String = "") As Boolean
Dim retorno As Boolean = False
Dim xmlMiembros As System.Xml.Linq.XDocument = Nothing
@@ -877,6 +990,8 @@ Public Class ClsOIEventos
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@CveMovimientoAlmacen", SqlDbType.Int).Value = CveMovimientoAlmacen
.Add("@CorreoExterno", SqlDbType.VarChar).Value = CorreoExterno
.Add("@Duracion", SqlDbType.VarChar).Value = Duracion
.Add("@Asistencia", SqlDbType.VarChar).Value = Asistencia
.Add("@Lugar", SqlDbType.VarChar).Value = Lugar
.Add("@CveTableroLista", SqlDbType.VarChar).Value = CveTableroLista
@@ -918,9 +1033,9 @@ Public Class ClsOIEventos
End Try
Try
If retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), Folio, CveEvento), lPara, "NUEVA TAREA ASIGNADA")
objCorreo = New ObjEventosCorreo("Nueva Tarea asignada", mailPara, lPara, Folio, String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "")
'mailbody = MailgetBodyNuevatarea(Folio, String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString())
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}/OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), Folio, CveEvento), lPara, "NUEVA TAREA ASIGNADA")
objCorreo = New ObjEventosCorreo("Nueva Tarea asignada", mailPara, lPara, Folio, String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "")
'mailbody = MailgetBodyNuevatarea(Folio, String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString())
'Dim mailAsunto As String = "Nueva Tarea asignada" ',cveUsuarioPara
'Dim mailArrayCC As String = ""
'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC)
@@ -977,9 +1092,9 @@ Public Class ClsOIEventos
End Try
If retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then
objCorreo = New ObjEventosCorreo("Tarea Actualizada", mailPara, lPara, Folio, String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "")
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), Folio, CveEvento), lPara, "TAREA ACTUALIZADA")
'mailbody = MailgetBodyActualizartarea(Folio, String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString())
objCorreo = New ObjEventosCorreo("Tarea Actualizada", mailPara, lPara, Folio, String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "")
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}/OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), Folio, CveEvento), lPara, "TAREA ACTUALIZADA")
'mailbody = MailgetBodyActualizartarea(Folio, String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), asunto, descripcion, String.Format("{0:dd/MM/yyyy HH:mm}", fechaInicio.ToDateTime()), String.Format("{0:dd/MM/yyyy HH:mm}", fechaFin.ToDateTime()), drow("Prioridad").ToString(), drow("Tema").ToString())
'Dim mailAsunto As String = "Tarea Actualizada" ',cveUsuarioPara
'Dim mailArrayCC As String = ""
'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC)
@@ -988,7 +1103,7 @@ Public Class ClsOIEventos
End Function
Public Function UpdateEstatusEvento2(CveEventoEstatus As Integer, CveComentario As Integer, CveEvento As Integer, CveUsuario As Integer, cveEmpresa As Int32) As Boolean
Public Function UpdateEstatusEvento2(CveEventoEstatus As Integer, CveComentario As Integer, CveEvento As Integer, CveUsuario As Integer, cveEmpresa As Int32, Optional ExtraComentario As String = "") As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_OI_EventosEstatusUpdate2")
@@ -1006,6 +1121,7 @@ Public Class ClsOIEventos
.Add("@pCveEvento", SqlDbType.Int).Value = CveEvento
.Add("@pCveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@CveEmpresa", SqlDbType.Int).Value = cveEmpresa
.Add("@ExtraComentario", SqlDbType.VarChar).Value = ExtraComentario
End With
Try
SqlAdapter.Fill(ds)
@@ -1029,9 +1145,9 @@ Public Class ClsOIEventos
End Try
If Retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then
objCorreo = New ObjEventosCorreo("Tarea Cambio de estatus", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", drow("Estatus").ToString())
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, String.Format("CAMBIÓ ESTADO EN TAREA A '{0}'", drow("Estatus")))
'mailbody = MailgetBodyActualizarEstado(drow("Estatus").ToString(), drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString())
objCorreo = New ObjEventosCorreo("Tarea Cambio de estatus", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", drow("Estatus").ToString())
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}/OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, String.Format("CAMBIÓ ESTADO EN TAREA A '{0}'", drow("Estatus")))
'mailbody = MailgetBodyActualizarEstado(drow("Estatus").ToString(), drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString())
'Dim mailAsunto As String = "Tarea Cambio de estatus" ',cveUsuarioPara
'Dim mailArrayCC As String = ""
'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC)
@@ -1115,9 +1231,9 @@ Public Class ClsOIEventos
If retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then
objCorreo = New ObjEventosCorreo(String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), cveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), "")
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), drow("Folio").ToString().ToEntero(), cveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)")
'mailbody = MailgetBodyTareaCheckList(String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), cveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString())
objCorreo = New ObjEventosCorreo(String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), cveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), "")
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}/OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), drow("Folio").ToString().ToEntero(), cveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)")
'mailbody = MailgetBodyTareaCheckList(String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente")), drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), cveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString())
'Dim mailAsunto As String = String.Format("Actividad {0}", If(estatus, "Terminada", "Pendiente"))
'Dim mailArrayCC As String = ""
'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC)
@@ -1185,9 +1301,9 @@ Public Class ClsOIEventos
End Try
If Retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then
objCorreo = New ObjEventosCorreo("Tarea Archivo actualizado", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "")
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)")
'mailbody = MailgetBodyActualizararchivo(drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString())
objCorreo = New ObjEventosCorreo("Tarea Archivo actualizado", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "")
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}/OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)")
'mailbody = MailgetBodyActualizararchivo(drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString())
'Dim mailAsunto As String = "Tarea Archivo actualizado" ',cveUsuarioPara
'Dim mailArrayCC As String = ""
'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC)
@@ -1239,9 +1355,9 @@ Public Class ClsOIEventos
End Try
If Retorno AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then
objCorreo = New ObjEventosCorreo("Tarea cambio Avance", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "")
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)")
'mailbody = MailgetBodyActualizarAvance(drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString())
objCorreo = New ObjEventosCorreo("Tarea cambio Avance", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "")
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}/OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)")
'mailbody = MailgetBodyActualizarAvance(drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString())
'Dim mailAsunto As String = "Tarea cambio Avance" ',cveUsuarioPara
'Dim mailArrayCC As String = ""
'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC)
@@ -1296,9 +1412,9 @@ Public Class ClsOIEventos
End Try
If Retorno > 0 AndAlso lPara.Count > 0 AndAlso drow IsNot Nothing Then
objCorreo = New ObjEventosCorreo("Nuevo comentario en tarea", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "")
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)")
'mailbody = MailgetBodyTareaComentario(drow("Folio").ToString().ToEntero(), String.Format("{0}OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString())
objCorreo = New ObjEventosCorreo("Nuevo comentario en tarea", mailPara, lPara, drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString(), "", "")
'Notificaciones.AlertaVentana(String.Format("<a href=""{0}/OI/TareaDetalle.aspx?CveEvento={2}"">Folio :{1}</a>", GetDominio(), drow("Folio").ToString().ToEntero(), CveEvento), lPara, "TAREA ACTUALIZADA(Nuevo Archivo)")
'mailbody = MailgetBodyTareaComentario(drow("Folio").ToString().ToEntero(), String.Format("{0}/OI/TareaDetalle.aspx?CveEvento={1}", GetDominio(), CveEvento), drow("Asunto").ToString(), drow("Descripcion").ToString(), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaInicio")), String.Format("{0:dd/MM/yyyy HH:mm}", drow("FechaFin")), drow("Prioridad").ToString(), drow("Tema").ToString())
'Dim mailAsunto As String = "Nuevo comentario en tarea" ',cveUsuarioPara
'Dim mailArrayCC As String = ""
'EnviarCorreo(oempresa, mailAsunto, mailbody, mailPara, mailArrayCC)

View File

@@ -73,8 +73,9 @@ Public Class ClsPaginas
'UsuarioActual = DirectCast(Session("UsuarioSIG"), Usuario)
If Context.Session("UsuarioSIG") Is Nothing Then
Usuario.CerrarSession()
Return Nothing
Else
UsuarioActual = CType(Context.Session("UsuarioSIG"), Usuario)
Return CType(Context.Session("UsuarioSIG"), Usuario)
End If
Catch ex As Exception
Usuario.CerrarSession()
@@ -3626,14 +3627,13 @@ Public Class ClsPaginas
PaginaDict.Add("/Default2.aspx".ToUpper(), -1)
PaginaDict.Add("/CargaCuentas.aspx".ToUpper(), -1)
PaginaDict.Add("/OI/Tareas.aspx".ToUpper(), -1)
PaginaDict.Add("/OI/RepProyectos.aspx".ToUpper(), -1)
PaginaDict.Add("/OI/Proyecto.aspx".ToUpper(), -1)
PaginaDict.Add("/OI/Tablero.aspx".ToUpper(), -1)
PaginaDict.Add("/OI/TableroDetalle.aspx".ToUpper(), -1)
PaginaDict.Add("/OI/UnoaUno.aspx".ToUpper(), -1)
PaginaDict.Add("/OI/UnoaUnoConfiguracion.aspx".ToUpper(), -1)
PaginaDict.Add("/OI/ConvocatoriaDetalle.aspx".ToUpper(), -1)
PaginaDict.Add("/OI/RepReuniones.aspx".ToUpper(), -1)
PaginaDict.Add("/OI/RepProyectos.aspx".ToUpper(), 907)
PaginaDict.Add("/OI/Proyecto.aspx".ToUpper(), 907)
PaginaDict.Add("/OI/Tablero.aspx".ToUpper(), 910)
PaginaDict.Add("/OI/TableroDetalle.aspx".ToUpper(), 910)
PaginaDict.Add("/OI/UnoaUno.aspx".ToUpper(), 909)
PaginaDict.Add("/OI/ConvocatoriaDetalle.aspx".ToUpper(), 908)
PaginaDict.Add("/OI/RepReuniones.aspx".ToUpper(), 908)
PaginaDict.Add("/AdSistemasTeam/ProcedimientosAlmacenados.aspx".ToUpper(), -1)
PaginaDict.Add("/OS/CatOrdenesServiciosCaracteristicas.aspx".ToUpper(), -1)
PaginaDict.Add("/OS/CatOSCaracteristicasOpciones.aspx".ToUpper(), -1)
@@ -4275,6 +4275,7 @@ Public Class ClsPaginas
PaginaDict.Add("/General/CatRinTamanios.aspx".ToUpper(), 711)
PaginaDict.Add("/General/CatMedidas.aspx".ToUpper(), 712)
PaginaDict.Add("/General/CatSatListado69B.aspx".ToUpper, 1038)
PaginaDict.Add("/General/PopUpPaqueteriasGuiasInternas.aspx".ToUpper(), 727)
#End Region
#Region "GPS"
@@ -4404,6 +4405,7 @@ Public Class ClsPaginas
PaginaDict.Add("/Inventarios/RepTraspasoEmitido.aspx".ToUpper(), 891)
PaginaDict.Add("/Inventarios/AjustesSeccionAlmacen.aspx".ToUpper(), 892)
PaginaDict.Add("/Inventarios/RepTraspasoAlmacen.aspx".ToUpper(), 688)
PaginaDict.Add("/Inventarios/EntregasPorRealizar.aspx".ToUpper(), 728)
#End Region
#Region "MF"

View File

@@ -4217,16 +4217,14 @@ Namespace Modelos
'GENERAMOS EL ACUSE Y MANDAMOS MAIL DE CON EL ACUSE DE CANCELACIÓN
If RequiereAceptacion Then
CancelacionFecha = Now.Date
CancelacionAcuse = ""
CveEstatus = 20
Else
CancelacionFecha = ObjCancelacion.CancelacionFecha
CancelacionAcuse = ObjCancelacion.CancelacionAcuse
CveEstatus = 5
End If
CancelacionAcuse = ObjCancelacion.CancelacionAcuse
Else
Retorno.Mensaje = "La factura no se pudo cancelar ante el SAT."
Retorno.Mensaje = "Los servicios de cancelación del SAT no se encuentran disponibles o presentan time out. Intente de nuevo en unos minutos.<br/>Origen del error: WebService www.sat.gob.mx"
Retorno.TipoMensaje = TipoMensaje.MsgError
Return Retorno
@@ -4262,8 +4260,14 @@ Namespace Modelos
'BITACORA, SOLICITUD DE CANCELACION
If CveEstatus > 0 AndAlso CveEstatusFacturaAsignado <= 0 Then
Dim msgBitacora As String = "Solicitud de cancelación de factura"
If EsRefacturacion Then
msgBitacora = "Solicitud de cancelación por refacturación"
End If
Dim ObjE As New ClsOIEventos()
ObjE.AddEventoBitacora("Solicitud de cancelación de factura", "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveVenta:=CveVenta)
ObjE.AddEventoBitacora(msgBitacora, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveVenta:=CveVenta)
ObjE.Dispose()
End If
@@ -4555,36 +4559,39 @@ Namespace Modelos
Next
'VERIFICA LOS MOVIMIENTOS DE DEVOLUCION YA GENERADOS QUE TENGAN EXISTENCIA EN (ENTREGA POR ADELANTADO)
If Not ErrorCancelar Then
If ObjInventario.GetMovimientosDevoluciones(CveVenta, UsuarioActual.CveEmpresa) Then
DtDevoluciones = ObjInventario.DtResultados.FiltraParametros("CveTipoAlmacen = 10")
Else
ErrorCancelar = True
MensajeError = "Ocurrió un error al cargar los datos de devolución. Por favor vuelva a intentar."
End If
End If
'SI EXISTEN HAY EXISTENCIA EN (ENTREGA POR ADELANTADO) SE TIENE QUE REGRESAR AL ALMACEN GENERAL
If Not ErrorCancelar AndAlso ListaRemisionesCancelar IsNot Nothing AndAlso ListaRemisionesCancelar.Count > 0 Then
For Each CveRemision As Integer In ListaRemisionesCancelar
For Each RowDevolucion As DataRow In DtDevoluciones.FiltraParametros($"CveRemision={CveRemision}", DistinctColumns:={"CveRemision", "CveAlmacen", "CveAlmacenDestino"}).Rows
'VERIFICA LOS MOVIMIENTOS DE DEVOLUCION YA GENERADOS QUE TENGAN EXISTENCIA EN (ENTREGA POR ADELANTADO)
If Not ErrorCancelar Then
If ObjInventario.GetMovimientosDevoluciones(CveVenta, UsuarioActual.CveEmpresa) Then
DtDevoluciones = ObjInventario.DtResultados.FiltraParametros("CveTipoAlmacen = 10")
Else
ErrorCancelar = True
MensajeError = "Ocurrió un error al cargar los datos de devolución. Por favor vuelva a intentar."
End If
End If
'DEBE REGRESAR LA EXISTENCIA DE (ENTREGA POR ADELANTADO) AL ALMACEN GENERAL
If Not ErrorCancelar AndAlso DtDevoluciones IsNot Nothing Then
For Each CveRemision As Integer In ListaRemisionesCancelar
Dim DtDevRemision As DataTable = DtDevoluciones.FiltraParametros($"CveRemision={CveRemision}")
Dim RowDevolucion As DataRow = DtDevRemision.FiltraParametros("", DistinctColumns:={"CveRemision", "CveAlmacen", "CveAlmacenDestino"}).Rows(0)
CveAlmacen = RowDevolucion("CveAlmacen").ToString().ToEntero()
CveAlmacenDevolucion = RowDevolucion("CveAlmacenDestino").ToString().ToEntero()
'DEBE REGRESAR LA EXISTENCIA DE (ENTREGA POR ADELANTADO) AL ALMACEN GENERAL
If Not CancelarMovimientosRemision(CveRemision, CveAlmacen, CveAlmacenDevolucion, DtDevRemision, ObjVentas, ObjInventario) Then
ErrorCancelar = True
MensajeError = "Ocurrió un error al cancelar los movimientos de la remisión."
Exit For
End If
DtDevRemision.Dispose()
Next
Next
Else
ErrorCancelar = True
End If
End If
'VERIFICAR MOVIMIENTOS DE APARTADOS
@@ -5030,22 +5037,34 @@ Namespace Modelos
End If
'ENTRADA A (ALMACEN GENERAL)
Dim DtEntradaDetalle As DataTable = Nothing
If Not ErrorCancelar Then
If ObjInventario.GetMovimientosDetalle(CveMovimientoSalidaDevRem, UsuarioActual.CveEmpresa) Then
For Each Dr As DataRow In ObjInventario.DtResultados.Rows
DtEntradaDetalle = ObjInventario.DtResultados.Copy()
End If
End If
If Not ErrorCancelar Then
If DtEntradaDetalle IsNot Nothing Then
For Each Dr As DataRow In DtEntradaDetalle.Rows
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoEntradaDevRem, Dr("Cantidad").ToString.ToDecimal, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, Dr("PU").ToString.ToDecimal, CveAF:=Dr("CveAF").ToString.ToEntero, Serie:=Dr("Serie").ToString, CveMovimientoDetalleEntrada:=Dr("CveMovimientoDetalle").ToString().ToEntero(), CveVentaDetalle:=Dr("CveVentaDetalle").ToString.ToEntero, Lote:=Dr("Lote").ToString) Then
ErrorCancelar = True
Exit For
End If
Next
Else
ErrorCancelar = True
End If
End If
If Not ObjVentas.UpdateVentasDevolucionAlmacen(2, CveRemision) Then
ErrorCancelar = True
If Not ErrorCancelar Then
If Not ObjVentas.UpdateVentasDevolucionAlmacen(2, CveRemision) Then
ErrorCancelar = True
End If
End If
Return Not ErrorCancelar
End Function

View File

@@ -1657,44 +1657,38 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
HttpContext.Current.Application("GlobalDTProyectos") = value
End Set
End Property
'Property GlobalDTSubProyectos(CveProyecto As Integer, Optional CveSubProyecto As Integer = -1, Optional CveEmpresa As Integer = -1, Optional Estatus As Integer = 1) As DataTable
' Get
' If DirectCast(HttpContext.Current.Application("GlobalDTSubProyectos"), DataTable) Is Nothing Or (DirectCast(HttpContext.Current.Application("GlobalDTSubProyectos"), DataTable) IsNot Nothing AndAlso DirectCast(HttpContext.Current.Application("GlobalDTSubProyectos"), DataTable).Rows.Count = 0) Then
' Dim P As New ClsSubProyectos
' If P.GetSubProyectos Then
' HttpContext.Current.Application("GlobalDTSubProyectos") = P.DtResultados
' End If
' P.Dispose()
' Dim msg As String = "aqui no se carga subproyectos"
' End If
' If CveProyecto <> -1 OrElse CveSubProyecto <> -1 OrElse CveEmpresa <> -1 OrElse Estatus <> -1 Then
' Dim StrSQL As New StringBuilder
' If CveProyecto <> -1 Then StrSQL.AppendFormat(" AND CveProyecto = {0}", CveProyecto)
' If CveSubProyecto <> -1 Then StrSQL.AppendFormat(" AND CveSubProyecto = {0}", CveSubProyecto)
' If Estatus <> -1 Then StrSQL.AppendFormat(" AND CveEstatus = {0}", Estatus)
' If CveEmpresa <> -1 Then StrSQL.AppendFormat(" AND CveEmpresa = {0}", CveEmpresa)
' Dim Dv As New DataView(DirectCast(HttpContext.Current.Application("GlobalDTSubProyectos"), DataTable), StrSQL.ToString.Trim.TrimStart("A"c, "N"c, "D"c), "", DataViewRowState.CurrentRows)
' GlobalDTSubProyectos = Dv.ToTable
' Dv.Dispose()
' Else
' GlobalDTSubProyectos = DirectCast(HttpContext.Current.Application("GlobalDTSubProyectos"), DataTable)
' End If
' End Get
' Set(ByVal value As DataTable)
' If value Is Nothing OrElse value.Rows.Count = 0 Then
' Dim msg As String = "aqui no se carga subproyectos"
' End If
' HttpContext.Current.Application("GlobalDTSubProyectos") = value
' End Set
'End Property
Public Property GlobalDTSubProyectos(CveProyecto As Integer, Optional CveSubProyecto As Integer = -1, Optional CveEmpresa As Integer = -1, Optional Estatus As Integer = 1) As DataTable
Get
Dim AppNombre As String = String.Format("GlobalDTSubProyectos-{0}", CveEmpresa)
'sino existe, recarga los datos
If DirectCast(HttpContext.Current.Application(AppNombre), DataTable) Is Nothing Or (DirectCast(HttpContext.Current.Application(AppNombre), DataTable) IsNot Nothing AndAlso DirectCast(HttpContext.Current.Application(AppNombre), DataTable).Rows.Count = 0) Then
Dim P As New ClsSubProyectos
If P.GetSubProyectos(CveEmpresa:=CveEmpresa) Then HttpContext.Current.Application(AppNombre) = P.DtResultados
P.Dispose()
End If
If CveProyecto <> -1 OrElse CveSubProyecto <> -1 OrElse CveEmpresa <> -1 OrElse Estatus <> -1 Then
Dim StrSQL As New StringBuilder
If CveProyecto <> -1 Then StrSQL.AppendFormat(" AND CveProyecto = {0}", CveProyecto)
If CveSubProyecto <> -1 Then StrSQL.AppendFormat(" AND CveSubProyecto = {0}", CveSubProyecto)
If Estatus <> -1 Then StrSQL.AppendFormat(" AND CveEstatus = {0}", Estatus)
If CveEmpresa <> -1 Then StrSQL.AppendFormat(" AND CveEmpresa = {0}", CveEmpresa)
Dim Dv As New DataView(DirectCast(HttpContext.Current.Application(AppNombre), DataTable), StrSQL.ToString.Trim.TrimStart("A"c, "N"c, "D"c), "", DataViewRowState.CurrentRows)
GlobalDTSubProyectos = Dv.ToTable
Dv.Dispose()
Else
GlobalDTSubProyectos = DirectCast(HttpContext.Current.Application(AppNombre), DataTable)
End If
End Get
Set(ByVal value As DataTable)
Dim AppNombre As String = String.Format("GlobalDTSubProyectos-{0}", CveEmpresa)
HttpContext.Current.Application(AppNombre) = value
End Set
End Property
Property GlobalDTSubProyectosUsuarios(CveUsuario As Integer, CveProyecto As Integer, CveEmpresa As Integer, Optional CveSubProyecto As Integer = -1, Optional CveEstatus As Integer = -1) As DataTable
Get

View File

@@ -4641,7 +4641,7 @@ Partial Class Bancos_IE
trCuentaDeposito.Visible = True
DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
Else
Alert("El proveedor no tiene ninguna cuenta deposito registrada ante el sistema BBVA BANCOMER", TipoMensaje.MsgAdvertencia)
Alert("El Beneficiario no tiene una cuenta activa en BBVA, dela de alta o seleccione otro método de pago", TipoMensaje.MsgAdvertencia)
End If
Else
@@ -4649,25 +4649,12 @@ Partial Class Bancos_IE
If Dep.DtResultados.Rows.Count > 0 Then
trCuentaDeposito.Visible = True
DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
End If
End If
''ANTIGUO
'GVCuentasPago.DataSource = Dep.DtResultados
'If Dep.DtResultados.Rows.Count > 1 Then
' trCuentaDeposito.Visible = True
' DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
' 'Si tiene seleccionado Tipo Mov: Layout y no tiene cuenta deposito
'ElseIf DdlTipoTransaccion.SelectedValue = "9" AndAlso Not Dep.DtResultados.Rows.Count > 0 Then
' trCuentaDeposito.Visible = True
' DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
' BtnIEGuardar.Enabled = False
' UpGuardar.Update()
' Alert("El proveedor no tiene ninguna cuenta deposito registrada ante el sistema BBVA BANCOMER", TipoMensaje.MsgAdvertencia)
'End If
End If
Dep.Dispose()

View File

@@ -801,7 +801,7 @@ Partial Class Bancos_PagoElectronico
HeaderTexto = String.Format("H{0}{1}GRUPO01 ", convenio.PadLeft(9, PadCeros), DateTime.Now().ToString("yyyy-MM-dd"))
'Campo #5 del Header
Dim IdentificadoUsuario As String = UsuarioActual.Usuario.Replace(" ", "").Replace(".", "").Replace("@", "").Replace("/", "").ToUpper.Trim
Dim IdentificadoUsuario As String = UsuarioActual.Usuario.Replace(" ", "").Replace(".", "").Replace("@", "").Replace("/", "").Replace("\", "").Replace("-", "").Replace("&", "").Replace(",", "").Replace("+", "").Replace("_", "").ToUpper.Trim
IdentificadoUsuario = If(IdentificadoUsuario.Length > 12, IdentificadoUsuario.Substring(0, 12), IdentificadoUsuario)
' Dim Identificado As String = String.Format("{0}{1}", UsuarioActual.Usuario, DateTime.Now().ToString("yyyyMMdd")))

View File

@@ -966,16 +966,18 @@ Partial Class Bancos_PagoElectronicoGrupos
RegistrosPago.Append("PSC")
End If
If drow("CLABEOrigen").ToString.Trim.Length = 18 Then
RegistrosPago.Append(drow("CLABEOrigen").ToString)
If drow("CLABEOrigen").ToString.Trim.Length.Contiene(10, 18) Then
RegistrosPago.Append(drow("CLABEOrigen").ToString.PadLeft(18, CeroRelleno))
Else
ErrorLayout = True
MENSAJEError.AppendLine("ERROR EN CLABE cuenta origen")
Exit For
End If
If drow("CLABEDestino").ToString.Trim.Length = 18 Then
RegistrosPago.Append(drow("CLABEDestino").ToString)
If drow("CLABEDestino").ToString.Trim.Length.Contiene(10, 18) Then
RegistrosPago.Append(drow("CLABEDestino").ToString.PadLeft(18, CeroRelleno))
Else
ErrorLayout = True
MENSAJEError.AppendLine("ERROR EN CLABE cuenta destino")
@@ -988,10 +990,22 @@ Partial Class Bancos_PagoElectronicoGrupos
If drow("BancoNombre").ToString.ToUpper.Contains("BANCOMER") Or drow("BancoNombre").ToString.ToUpper.Contains("BBVA") Then
If drow("Observaciones").ToString.Trim.Length > 30 Then
RegistrosPago.Append(drow("Observaciones").ToString.Substring(0, 30))
If drow("Observaciones").ToString.Trim.Length = 0 Then
If drow("RazonSocial").ToString.Trim.Length > 30 Then
RegistrosPago.Append(drow("RazonSocial").ToString.Substring(0, 30))
Else
RegistrosPago.Append(drow("RazonSocial").ToString.PadRight(30, EspacioRelleno))
End If
Else
RegistrosPago.Append(drow("Observaciones").ToString.PadRight(30, EspacioRelleno))
If drow("Observaciones").ToString.Trim.Length > 30 Then
RegistrosPago.Append(drow("Observaciones").ToString.Substring(0, 30))
Else
RegistrosPago.Append(drow("Observaciones").ToString.PadRight(30, EspacioRelleno))
End If
End If
Else

View File

@@ -942,7 +942,7 @@ Partial Class Bancos_PopIECompras
DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
Else
BtnGuardar.Enabled = False
Alert("El proveedor no tiene ninguna cuenta deposito registrada ante el sistema BBVA BANCOMER", TipoMensaje.MsgAdvertencia)
Alert("El Beneficiario no tiene una cuenta activa en BBVA, dela de alta o seleccione otro método de pago", TipoMensaje.MsgAdvertencia)
End If
Else

View File

@@ -2515,34 +2515,25 @@ Partial Class Bancos_ProveedoresAbonar
DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
Else
BtnIEGuardar.Enabled = False
Alert("El proveedor no tiene ninguna cuenta deposito registrada ante el sistema BBVA BANCOMER", TipoMensaje.MsgAdvertencia)
Alert("El Beneficiario no tiene una cuenta activa en BBVA, dela de alta o seleccione otro método de pago", TipoMensaje.MsgAdvertencia)
End If
ElseIf DdlTipoTransaccion.SelectedValue = "17" Then
'ElseIf DdlTipoTransaccion.SelectedValue = "17" Then
If Dep.DtResultados.Rows.Count > 0 Then
DdlCuentaDeposito.DataSource = Dep.DtResultados '.FiltraParametros("EstatusPagoElectronicoGrupos = 'True' AND Estatus ='True'")
trCuentaDeposito.Visible = True
BtnIEGuardar.ToolTip = ""
Else
'Alert("El proveedor no tiene cuentas deposito registradas.")
' If Dep.DtResultados.Rows.Count > 0 Then
' DdlCuentaDeposito.DataSource = Dep.DtResultados
' trCuentaDeposito.Visible = True
' BtnIEGuardar.ToolTip = ""
' Else
BtnIEGuardar.Enabled = False
BtnIEGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
' BtnIEGuardar.Enabled = False
' BtnIEGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
' End If
End If
'If Dep.DtResultados.FiltraParametros("EstatusPagoElectronicoGrupos = 'True' AND Estatus ='True'").Rows.Count > 0 Then
' trCuentaDeposito.Visible = True
' DdlCuentaDeposito.Items.Insert(0, New ListItem("Seleccione una cuenta", "-1"))
'Else
' BtnIEGuardar.Enabled = False
' Alert("El proveedor no tiene ninguna cuenta deposito registrada ", TipoMensaje.MsgAdvertencia)
'End If
UpGuardar.Update()
' UpGuardar.Update()
Else
DdlCuentaDeposito.DataSource = Dep.DtResultados.FiltraParametros("Estatus ='True'")
If Dep.DtResultados.Rows.Count > 0 Then
@@ -2559,19 +2550,19 @@ Partial Class Bancos_ProveedoresAbonar
End If
Else
'Else
If DdlTipoTransaccion.SelectedValue = "17" Then
' If DdlTipoTransaccion.SelectedValue = "17" Then
BtnIEGuardar.Enabled = False
BtnIEGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
Else
BtnIEGuardar.Enabled = True
BtnIEGuardar.ToolTip = ""
End If
' BtnIEGuardar.Enabled = False
' BtnIEGuardar.ToolTip = "El proveedor no tiene cuentas deposito"
' Else
' BtnIEGuardar.Enabled = True
' BtnIEGuardar.ToolTip = ""
' End If
UpGuardar.Update()
' UpGuardar.Update()
End If

Binary file not shown.

Binary file not shown.

View File

@@ -440,7 +440,8 @@
</div>
<div class="form-group col-md-6 form-md-line-input input-iconright">
<asp:DropDownList ID="DdlMedioCaptacion" runat="server" Width="100%" AppendDataBoundItems="true" DataTextField="MedioCaptacion" DataValueField="CveMedioCaptacion" Class="form-control input-sm select2me"></asp:DropDownList>
<label for="<%= DdlMedioCaptacion.ClientID.ToString()%>">Medio de Captación:</label>
<asp:RequiredFieldValidator ID="RequiredFieldValidator3" InitialValue="-1" runat="server" ControlToValidate="DdlMedioCaptacion" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b> El campo <b>''Medio de Captación''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<label for="<%= DdlMedioCaptacion.ClientID.ToString()%>" style="width: 90%">Medio de Captación:</label>
</div>
</div>
@@ -529,7 +530,7 @@
<ContentTemplate>
<div class="row">
<%-- max-height: 410px;--%>
<div class="col-md-6">
<div class="col-md-6" style="width: 100%">
<div class="portlet light xspadding bordered">
<div class="portlet-title">
<div class="caption font-green">
@@ -551,7 +552,7 @@
</div>
<div id="DivEncuesta" style="display: inline; width: 100%; padding-top: 0px;" runat="server">
<asp:GridView ID="GvDatosTecnicos" DataKeyNames="CvePregunta,CveTipoPregunta, CveEncuestaAplicadaDetalle, RespuestaDefault, CveRespuesta, Valor" EmptyDataText="No se encontraron Respuestas Registrados" Width="100%"
Visible="false" runat="server" GridLines="None" AutoGenerateColumns="False" ShowHeader="False" CssClass="xspadding" OnRowDataBound="GvDatosTecnicos_RowDataBound">
Visible="true" runat="server" GridLines="None" AutoGenerateColumns="False" ShowHeader="False" CssClass="xspadding" OnRowDataBound="GvDatosTecnicos_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemStyle BorderStyle="None" />
@@ -625,7 +626,64 @@
<ajax:TabPanel ID="TabImagenes" runat="server" HeaderText="Imágenes" OnClientClick="clickgaleria">
<ContentTemplate>
<asp:LinkButton ID="HyperLink1" CssClass="btn btn-success" data-toggle="modal" data-target="#Modalupfotos" runat="server" Style="cursor: pointer; float: right;" ToolTip="Observaciones"><i class="fa fa-upload"></i> Cargar Archivo</asp:LinkButton><br />
<div class="row">
<div class="col-md-6" style="width: 100%">
<div class="portlet light xspadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="fa fa-info-circle font-green"></i>
<span class="caption-subject bold uppercase">IMÁGENES</span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
</div>
<div id="DivBodyImg" class="portlet-body form">
<div class="row" style="margin: unset">
<div class="col">
<asp:LinkButton ID="HyperLink1" CssClass="btn btn-success" data-toggle="modal" data-target="#Modalupfotos" runat="server" Style="cursor: pointer; float: right;" ToolTip="Observaciones"><i class="fa fa-upload"></i> Cargar Archivo</asp:LinkButton><br />
</div>
</div>
<div class="row" style="margin: unset">
<div class="col">
<asp:UpdatePanel ID="UpGaleria" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<div class="portfolio-content portfolio-1">
<div id="js-filters-juicy-projects" class="cbp-l-filters-button">
</div>
<div id="js-grid-juicy-projects" class="cbp">
<asp:Repeater ID="RptFotos" runat="server">
<ItemTemplate>
<div class="cbp-item graphic">
<div class="cbp-caption">
<div class="cbp-caption-defaultWrap">
<img src='<%# String.Format("/ashx/SIGCRM.ashx?Metodo=getimgacercamiento&r={0}",UrlIMGEncriptada(Eval("URLParametros").ToString())) %>'>
</div>
<div class="cbp-caption-activeWrap">
<div class="cbp-l-caption-alignCenter">
<div class="cbp-l-caption-body">
<asp:Button ID="BtnEliminarFoto" OnClick="BtnEliminarFoto_Click" data-toggle="confirmation" data-original-title="¿Estás Seguro?" data-btn-ok-label="Si" runat="server" CommandArgument='<%# Eval("CveArchivo").ToString() %>' Text="Borrar" CssClass=" btn red uppercase" />
<a href='<%# String.Format("/ashx/SIGCRM.ashx?Metodo=getimgacercamiento&r={0}",UrlIMGEncriptada(Eval("URLParametros").ToString())) %>' class=" btn blue uppercase">Ver</a>
</div>
</div>
</div>
</div>
<div class="cbp-l-grid-projects-title uppercase text-center"><%#Eval("Titulo").ToString() %></div>
<div class="cbp-l-grid-projects-desc uppercase text-center"><%# Eval("Descripcion").ToString() %></div>
</div>
</ItemTemplate>
</asp:Repeater>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</div>
</div>
</div>
</div>
<div id="Modalupfotos" class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<!-- Modal content-->
@@ -670,37 +728,6 @@
</div>
</div>
</div>
<asp:UpdatePanel ID="UpGaleria" UpdateMode="Conditional" runat="server">
<ContentTemplate>
<div class="portfolio-content portfolio-1">
<div id="js-filters-juicy-projects" class="cbp-l-filters-button">
</div>
<div id="js-grid-juicy-projects" class="cbp">
<asp:Repeater ID="RptFotos" runat="server">
<ItemTemplate>
<div class="cbp-item graphic">
<div class="cbp-caption">
<div class="cbp-caption-defaultWrap">
<img src='<%# String.Format("/ashx/SIGCRM.ashx?Metodo=getimgacercamiento&r={0}",UrlIMGEncriptada(Eval("URLParametros").ToString())) %>'>
</div>
<div class="cbp-caption-activeWrap">
<div class="cbp-l-caption-alignCenter">
<div class="cbp-l-caption-body">
<asp:Button ID="BtnEliminarFoto" OnClick="BtnEliminarFoto_Click" data-toggle="confirmation" data-original-title="¿Estás Seguro?" data-btn-ok-label="Si" runat="server" CommandArgument='<%# Eval("CveArchivo").ToString() %>' Text="Borrar" CssClass=" btn red uppercase" />
<a href='<%# String.Format("/ashx/SIGCRM.ashx?Metodo=getimgacercamiento&r={0}",UrlIMGEncriptada(Eval("URLParametros").ToString())) %>' class="cbp-lightbox cbp-l-caption-buttonRight btn success uppercase">Ver</a>
</div>
</div>
</div>
</div>
<div class="cbp-l-grid-projects-title uppercase text-center"><%#Eval("Titulo").ToString() %></div>
<div class="cbp-l-grid-projects-desc uppercase text-center"><%# Eval("Descripcion").ToString() %></div>
</div>
</ItemTemplate>
</asp:Repeater>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</ContentTemplate>
</ajax:TabPanel>
@@ -732,7 +759,7 @@
<div runat="server" id="Div2" style="padding: 0 10px 10px 10px;">
<asp:UpdatePanel runat="server" ID="UpCotizacion" UpdateMode="Conditional">
<ContentTemplate>
<asp:GridView ID="GvCotizacion" runat="server" DataKeyNames="CveVenta,CveEmpresaCRM,CveAcercamientoCRM,CveEstatusFactura, EstatusFactura" EmptyDataText="Aún no se han registrado Cotizaciones"
<asp:GridView ID="GvCotizacion" runat="server" DataKeyNames="CveVenta,CveEmpresaCRM,CveAcercamientoCRM,CveEstatusFactura, EstatusFactura" EmptyDataText="Aún no se han registrado cotizaciones."
EmptyDataRowStyle-HorizontalAlign="Center" ToolTip="Listado de Cotizaciones" CssClass="table table-striped table-advance table-hover ScrollAD Widthall mysmallbtn" AlternatingRowStyle-BorderStyle="None"
GridLines="None" BorderColor="#D3D3D3" BorderWidth="1" AutoGenerateColumns="false" OnRowDataBound="GvCotizacion_RowDataBound">
<Columns>
@@ -785,7 +812,7 @@
<div runat="server" id="Div4" style="padding: 0 10px 10px 10px;">
<asp:UpdatePanel runat="server" ID="UpGastos" UpdateMode="Conditional">
<ContentTemplate>
<asp:GridView ID="GvGastos" runat="server" EmptyDataText="Aún no se han registrado Gastos" DataKeyNames="CveAcercamientoGasto,Descripcion,Importe"
<asp:GridView ID="GvGastos" runat="server" EmptyDataText="Aún no se han registrado gastos." DataKeyNames="CveAcercamientoGasto,Descripcion,Importe"
EmptyDataRowStyle-HorizontalAlign="Center" ToolTip="Listado de Cotizaciones" CssClass="table table-striped table-advance table-hover ScrollAD Widthall mysmallbtn" AlternatingRowStyle-BorderStyle="None"
GridLines="None" BorderColor="#D3D3D3" BorderWidth="1" AutoGenerateColumns="false" OnRowDataBound="GvGastos_RowDataBound">
<Columns>

View File

@@ -278,11 +278,11 @@ public partial class CRM_Acercamiento : ClsPaginas
if (CveAcercamiento > 0)
{
ClsCRM ObjCRM = new ClsCRM();
if (ObjCRM.GetAcercamiento(UsuarioActual.CveEmpresa, CveAcercamiento: CveAcercamiento) && ObjCRM.DtResultados.Rows.Count > 0)
{
LblEncabezadoAcercamiento.Text = String.Format("<span class='bold' style='color: #32c5d2;'>{0}:</span> {1}", ObjCRM.DtResultados.FiltroPrimeroValor("TipoProceso").ToUpper(), ObjCRM.DtResultados.FiltroPrimeroValor("NombreAcercamiento").ToUpper());
CveTipoProceso = ObjCRM.DtResultados.FiltroPrimeroValor("CveTipoProceso").ToEntero();
//SECCION DATOS DEL ACERCAMIENTO
TxtNombreAcercamiento.Text = ObjCRM.DtResultados.FiltroPrimeroValor("NombreAcercamiento");
TxtDescripcion.Text = ObjCRM.DtResultados.FiltroPrimeroValor("Descripcion");
@@ -294,10 +294,10 @@ public partial class CRM_Acercamiento : ClsPaginas
DdlProbabilidadAcercamiento.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveProbabilidadAcercamiento"));
DdlPrioridad.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("Prioridad"));
CargaDdl();
//SECCION DATOS DE LA EMPRESA
DdlEmpresaCRM.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveEmpresaCRM"));
//DdlContactoPrincipal.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveContactoPrincipal"));
//SECCION DATOS DEL PROCESO
//DdlTipoProceso.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveTipoProceso"));
DdlEtapaProceso.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveEtapaProcesoActual"));
@@ -316,7 +316,7 @@ public partial class CRM_Acercamiento : ClsPaginas
CveContactoPrincipal = (ObjCRM.DtResultados.FiltroPrimeroValor("CveTipoProceso").ToEntero() > 0) ? ObjCRM.DtResultados.FiltroPrimeroValor("CveContactoPrincipal").ToEntero() : -1;
CveEtapaActual = ObjCRM.DtResultados.FiltroPrimeroValor("CveEtapaProcesoActual").ToEntero();
CveTipoProceso = ObjCRM.DtResultados.FiltroPrimeroValor("CveTipoProceso").ToEntero();
CveEncuestaProcesoCRM = (ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaProcesoCRM").ToEntero() > 0) ? ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaProcesoCRM").ToEntero() : -1;
CveEncuestaAplicadaProceso = (ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaAplicadaProceso").ToEntero() > 0) ? ObjCRM.DtResultados.FiltroPrimeroValor("CveEncuestaAplicadaProceso").ToEntero() : -1;
@@ -366,7 +366,6 @@ public partial class CRM_Acercamiento : ClsPaginas
}
CargaImagenes();
CargaDdl();
UpEncabezado.Update();
UPAcercamiento.Update();

View File

@@ -226,7 +226,7 @@ public partial class CRM_EmpresaCRM : ClsPaginas
CreoCliente = false;
RecuperaCve();
CargaTipoProceso();
CargaMetodosCaptacion();
//CargaMetodosCaptacion();
CargaVendedores();
CargaSucursales();
CargarTiposEventos();
@@ -248,7 +248,7 @@ public partial class CRM_EmpresaCRM : ClsPaginas
ClsOIEventos ObjBitacora = new ClsOIEventos(ObjCRM.IniciaTransacSQL());
ClsEncuestas ObjDatosTecnicos = new ClsEncuestas(ObjCRM.IniciaTransacSQL());
Boolean HuboError = true;
Boolean HuboError = false;
String NombreEmpresa = TxtNombreEmpresa.Text;
String RFC = TxtRFC.Text;
@@ -619,6 +619,8 @@ public partial class CRM_EmpresaCRM : ClsPaginas
TxtNombreEmpresa.Text = ObjCRM.DtResultados.FiltroPrimeroValor("Empresa");
TxtRFC.Text = ObjCRM.DtResultados.FiltroPrimeroValor("RFC");
DdlTipoPrceso2.SelectedValue = ObjCRM.DtResultados.FiltroPrimeroValor("CveTipoProceso");
CargaMetodosCaptacion();
TxtCorreoEmpresaCRM.Text = ObjCRM.DtResultados.FiltroPrimeroValor("Correo");
DdlMedioCaptacion.SelectedValueExist(ObjCRM.DtResultados.FiltroPrimeroValor("CveMedioCaptacion"));
@@ -1328,8 +1330,8 @@ public partial class CRM_EmpresaCRM : ClsPaginas
if (ObjCRM.GetProbabilidadAcercamiento(UsuarioActual.CveEmpresa, 1))
{
DdlProbabilidadAcercamiento.DataSource = ObjCRM.DtResultados;
DdlProbabilidadAcercamiento.DataBind();
//DdlProbabilidadAcercamiento.DataSource = ObjCRM.DtResultados;
//DdlProbabilidadAcercamiento.DataBind();
DdlProbabilidadAcercamiento.Items.Insert(0, new ListItem("Seleccione ", "-1"));
DtProbabilidadAcercamiento = ObjCRM.DtResultados;

View File

@@ -1944,141 +1944,86 @@
<div runat="server">
<asp:GridView ID="GvBancosCuentas" GridLines="None" BorderColor="#D3D3D3" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" data-sort="true" runat="server"
DataKeyNames="CveCuentaDeposito,BancoNombre,Sucursal,Cuenta,CLABE,SWIFT,Plaza,CIE,Referencia,RefCrediProveedor,CveMoneda,Estatus,Correo,BBVAAlias" AutoGenerateColumns="False"
DataKeyNames="CveCuentaDeposito,BancoNombre,Sucursal,Cuenta,CLABE,SWIFT,Plaza,CIE,Referencia,RefCrediProveedor,CveMoneda,Estatus,Correo,BBVAAlias,EstatusPagoElectronico,EstatusPagoElectronicoGrupos,CveSATBanco" AutoGenerateColumns="False"
EmptyDataText="No se encontraron registros" ToolTip="Listado de Cuentas Bancarias">
<Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Banco" ItemStyle-CssClass="Excede">
<ItemTemplate>
<asp:Label ID="LtNombreBanco" runat="server" data-toggle="tooltip" title='<%# Eval("BancoNombre")%>' Text='<%# Eval("BancoNombre")%>'></asp:Label>
</ItemTemplate>
<%--<EditItemTemplate>
<asp:TextBox ID="TxtNombreBanco" CssClass="truncate" runat="server" CausesValidation="true" MaxLength="90" Text='<%# Eval("BancoNombre")%>' ValidationGroup="GrpEditarCuentaBanco" Width="90%" Enabled='<%#Not CBool(Eval("EstatusPagoElectronico"))%>'></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVNombreBanco" runat="server" ControlToValidate="TxtNombreBanco" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''NombreBanco''</b> es necesario, por favor ingréselo." ValidationGroup="GrpEditarCuentaBanco"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCENombreBanco" runat="server" HighlightCssClass="vco" TargetControlID="RFVNombreBanco" Width="300px"></ajax:ValidatorCalloutExtender>
</EditItemTemplate>--%>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText="# Suc." ItemStyle-CssClass="Excede">
<ItemTemplate>
<asp:Label ID="LtNumeroSucursal" runat="server" data-toggle="tooltip" title='<%# Eval("Sucursal")%>' Text='<%# Eval("Sucursal")%>'></asp:Label>
</ItemTemplate>
<%--<EditItemTemplate>
<asp:TextBox ID="TxtNumeroSucursal" runat="server" CausesValidation="true" MaxLength="50" Text='<%# Eval("Sucursal")%>' ValidationGroup="GrpEditarCuentaBanco" Width="90%" Enabled='<%#Not CBool(Eval("EstatusPagoElectronico"))%>'></asp:TextBox>
</EditItemTemplate>--%>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText="Num. Cuenta" ItemStyle-CssClass="Excede">
<ItemTemplate>
<asp:Label ID="LtNumeroCuenta" runat="server" data-toggle="tooltip" title='<%# Eval("Cuenta")%>' Text='<%# Eval("Cuenta")%>'></asp:Label>
</ItemTemplate>
<%-- <EditItemTemplate>
<asp:TextBox ID="TxtNumeroCuenta" runat="server" CausesValidation="true" Text='<%# Eval("Cuenta")%>' ValidationGroup="GrpEditarCuentaBanco" Width="90%" Enabled='<%#Not CBool(Eval("EstatusPagoElectronico"))%>'></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="SoloNumeros" runat="server" TargetControlID="TxtNumeroCuenta" FilterType="Numbers" />
</EditItemTemplate>--%>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText="CLABE" ItemStyle-CssClass="Excede">
<ItemTemplate>
<asp:Label ID="LtCLABE" runat="server" data-toggle="tooltip" title='<%# Eval("CLABE")%>' Text='<%# Eval("CLABE")%>'></asp:Label>
</ItemTemplate>
<%-- <EditItemTemplate>
<asp:TextBox ID="TxtCLABE" runat="server" CausesValidation="true" MaxLength="18" Text='<%# Eval("CLABE")%>' ValidationGroup="GrpEditarCuentaBanco" Width="90%" Enabled='<%#Not CBool(Eval("EstatusPagoElectronico"))%>'></asp:TextBox>
AndAlso Eval("Referencia") IsNot ""
<ajax:FilteredTextBoxExtender ID="SoloNumeros2" runat="server" TargetControlID="TxtCLABE" FilterType="Numbers" />
</EditItemTemplate>--%>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="SWIFT" ItemStyle-CssClass="Excede">
<ItemTemplate>
<asp:Label ID="LtSWIFT" runat="server" data-toggle="tooltip" title='<%# Eval("SWIFT")%>' Text='<%# Eval("SWIFT")%>'></asp:Label>
</ItemTemplate>
<%-- <EditItemTemplate>
<asp:TextBox ID="TxtSWIFT" runat="server" CausesValidation="true" MaxLength="100" Text='<%# Eval("SWIFT")%>' ValidationGroup="GrpEditarCuentaBanco" Width="90%" Enabled='<%#Not CBool(Eval("EstatusPagoElectronico"))%>'></asp:TextBox>
</EditItemTemplate>--%>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Plaza" ItemStyle-CssClass="Excede">
<ItemTemplate>
<asp:Label ID="LtPlaza" runat="server" data-toggle="tooltip" title='<%# Eval("Plaza")%>' Text='<%# Eval("Plaza")%>'></asp:Label>
</ItemTemplate>
<%--<EditItemTemplate>
<asp:TextBox ID="TxtPlaza" runat="server" CausesValidation="true" MaxLength="100" Text='<%# Eval("Plaza")%>' ValidationGroup="GrpEditarCuentaBanco" Width="90%" Enabled='<%#Not CBool(Eval("EstatusPagoElectronico"))%>'></asp:TextBox>
</EditItemTemplate>--%>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="CIE" ItemStyle-CssClass="Excede">
<ItemTemplate>
<asp:Label ID="LtConvenioCIE" runat="server" data-toggle="tooltip" title='<%# Eval("CIE")%>' Text='<%# Eval("CIE")%>'></asp:Label>
</ItemTemplate>
<%-- <EditItemTemplate>
<asp:TextBox ID="TxtConvenioCIE" runat="server" CausesValidation="true" MaxLength="8" Text='<%# Eval("CIE")%>' ValidationGroup="GrpEditarCuentaBanco" Width="90%" Enabled='<%#Not CBool(Eval("EstatusPagoElectronico"))%>'></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="SoloNumeros3" runat="server" TargetControlID="TxtConvenioCIE" FilterType="Numbers" />
</EditItemTemplate>--%>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText="Referencia" ItemStyle-CssClass="Excede">
<ItemTemplate>
<asp:Label ID="LtReferencia" runat="server" data-toggle="tooltip" title='<%# Eval("Referencia")%>' Text='<%# Eval("Referencia")%>'></asp:Label>
</ItemTemplate>
<%-- <EditItemTemplate>
<asp:TextBox ID="TxtReferencia" runat="server" CausesValidation="true" MaxLength="20" Text='<%# Eval("Referencia")%>' ValidationGroup="GrpEditarCuentaBanco" Width="90%"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="SoloNumeros3" runat="server" TargetControlID="TxtReferencia" FilterType="Numbers" />
</EditItemTemplate>--%>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Right" HeaderText="Cred. Prov." ItemStyle-CssClass="Excede">
<ItemTemplate>
<asp:Label ID="LtRefCrediProveedor" runat="server" data-toggle="tooltip" title='<%# Eval("RefCrediProveedor")%>' Text='<%# Eval("RefCrediProveedor")%>'></asp:Label>
</ItemTemplate>
<%-- <EditItemTemplate>
<asp:TextBox ID="TxtRefCrediProveedor" runat="server" CausesValidation="true" MaxLength="5" Text='<%# Eval("RefCrediProveedor")%>' ValidationGroup="GrpEditarCuentaBanco" Width="90%" Enabled='<%#Not CBool(Eval("EstatusPagoElectronico"))%>'></asp:TextBox>
</EditItemTemplate>--%>
</asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" HeaderText="Moneda" ItemStyle-CssClass="Excede">
<ItemTemplate>
<asp:Literal ID="LtMoneda" runat="server" Text='<%# Eval("Moneda")%>'></asp:Literal>
</ItemTemplate>
<%-- <EditItemTemplate>
<asp:DropDownList ID="DdlMoneda" CssClass="form-control input-sm" runat="server" DataTextField="Moneda" DataValueField="CveMoneda" Width="90%"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVMoneda" runat="server" InitialValue="-1" ControlToValidate="DdlMoneda" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Moneda''</b> es necesario, por favor ingréselo." ValidationGroup="GrpEditarCuentaBanco"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEMoneda" runat="server" HighlightCssClass="vco" TargetControlID="RFVMoneda" Width="300px"></ajax:ValidatorCalloutExtender>
</EditItemTemplate>--%>
</asp:TemplateField>
<%-- <asp:TemplateField ItemStyle-Width="7%" HeaderText="Estatus Layout" ItemStyle-CssClass="Excede" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
<!--IIf(CBool(Eval("EstatusPagoElectronico")), "Sí", "No") = If(EstatusPagoElectronico) Then "Sí" Else "No"-->
<asp:Label ID="LblEstatusPE" runat="server" Text='<%# IIf(CBool(Eval("EstatusPagoElectronico")), "Sí", "No")%>'>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>--%>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Estatus" ItemStyle-CssClass="Excede" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
<!--IIf(CBool(Eval("EstatusPagoElectronico")), "Sí", "No") = If(EstatusPagoElectronico) Then "Sí" Else "No"-->
<ItemTemplate>
<asp:Label ID="LlbEstatusTexto" Text='<%# Eval("EstatusTexto")%>' runat="server" />
</ItemTemplate>
<%-- <EditItemTemplate>
<asp:CheckBox ID="ChkEstatus" runat="server" Checked='<%# IIf(Eval("EstatusTexto").ToString = "Activo", True, False)%>' Visible="false"></asp:CheckBox>
</EditItemTemplate>--%>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="P.E." ItemStyle-CssClass="Excede" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
<asp:Label ID="LblPagoelectronico" Text='<%# Eval("Pagoelectronico")%>' runat="server" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="P.E.G" ItemStyle-CssClass="Excede" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
<asp:Label ID="LblPagoElectronicoGrupo" Text='<%# Eval("PagoElectronicoGrupos")%>' runat="server" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Comandos" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
<asp:LinkButton ID="imgE" runat="server" AlternateText="Editar" CausesValidation="False" CssClass="btn btn-circle btn-sm green" OnClick="Edit_Click" Text="<i class='fa fa-pencil'></i>" />
<asp:LinkButton ID="imgD" runat="server" AlternateText="Eliminar" OnClick="Delete_Click" CausesValidation="False" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>
<%-- <asp:TemplateField HeaderText="Editar" ItemStyle-Width="7%" ItemStyle-CssClass="Excede">
<ItemTemplate>
</ItemTemplate>
<EditItemTemplate>
<%-- <asp:LinkButton ID="imgU" runat="server" AlternateText="Actualizar" CausesValidation="True" CommandName="Update"
CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" ValidationGroup="GrpEditarCuentaBanco" />
<asp:LinkButton ID="imgC" runat="server" AlternateText="Cancelar" CausesValidation="False" CommandName="Cancel"
CssClass="btn btn-circle btn-sm red" Text="<i class='fa fa-times'></i>" />
</EditItemTemplate>
<ItemTemplate>
<asp:LinkButton ID="imgE" runat="server" AlternateText="Editar" CausesValidation="False" CommandName="Edit"
CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Elim." ItemStyle-Width="7%" ItemStyle-CssClass="Excede">
<ItemTemplate>
<asp:LinkButton ID="imgD" runat="server" AlternateText="Eliminar" CausesValidation="False" CommandName="Delete"
CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>"
data-toggle="confirmation" data-popout="true" data-original-title="confirmar" data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>--%>
</Columns>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
@@ -3643,17 +3588,57 @@
<label for="<%= TxtCorreoCuenta.ClientID.ToString()%>">BBVA Alias:</label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList CssClass="form-control select2me" Width="50%" ID="DdlMoneda" runat="server" DataTextField="Moneda" DataValueField="CveMoneda"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVMoneda" runat="server" InitialValue="-1" ControlToValidate="DdlMoneda" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Moneda''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAgregarBanco"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEMoneda" runat="server" HighlightCssClass="vco" TargetControlID="RFVMoneda" Width="300px"></ajax:ValidatorCalloutExtender>
<label for="<%= DdlMoneda.ClientID.ToString()%>">Moneda:</label>
</div>
<div class="form-group form-md-line-input input-iconright" id="divestatus" runat="server">
<asp:CheckBox ID="ChkEstatus" runat="server"></asp:CheckBox>
<label for="<%= ChkEstatus.ClientID.ToString()%>">Estatus:</label>
<div class="row">
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList CssClass="form-control select2me" Width="50%" ID="DdlMoneda" runat="server" DataTextField="Moneda" DataValueField="CveMoneda"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVMoneda" runat="server" InitialValue="-1" ControlToValidate="DdlMoneda" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Moneda''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAgregarBanco"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEMoneda" runat="server" HighlightCssClass="vco" TargetControlID="RFVMoneda" Width="300px"></ajax:ValidatorCalloutExtender>
<label for="<%= DdlMoneda.ClientID.ToString()%>">Moneda:</label>
</div>
</div>
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright" id="divestatus" runat="server">
<asp:CheckBox ID="ChkEstatus" runat="server"></asp:CheckBox>
<label for="<%= ChkEstatus.ClientID.ToString()%>">Estatus:</label>
</div>
</div>
</div>
<div class="row">
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright" id="div2" runat="server">
<asp:CheckBox ID="ChkPagoElectronico" runat="server" AutoPostBack="true" OnCheckedChanged="ChkPagoElectronico_CheckedChanged"></asp:CheckBox>
<label for="<%= ChkPagoElectronico.ClientID.ToString()%>">Pago Electronico</label>
</div>
</div>
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright" id="div3" runat="server">
<asp:CheckBox ID="ChkPagoElectronicoGrupos" runat="server" OnCheckedChanged="ChkPagoElectronicoGrupos_CheckedChanged" AutoPostBack="true"></asp:CheckBox>
<label for="<%= ChkPagoElectronicoGrupos.ClientID.ToString()%>">Pago Electronico Grupos</label>
</div>
</div>
</div>
<div class="form-group form-md-line-input input-iconright" runat="server" id="DVDdlSatBanco" visible="false">
<asp:DropDownList CssClass="form-control select2me" Width="50%" ID="DdlSatBanco" runat="server" DataTextField="Banco" DataValueField="CveSATBanco">
<asp:ListItem Value="-1">Seleccione uno</asp:ListItem>
</asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVDdlSatBanco" runat="server" InitialValue="-1" ControlToValidate="DdlSatBanco" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Banco''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAgregarBanco"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCRFVDdlSatBanco" runat="server" HighlightCssClass="vco" TargetControlID="RFVDdlSatBanco" Width="300px"></ajax:ValidatorCalloutExtender>
<label for="<%= DdlSatBanco.ClientID.ToString()%>">Banco:</label>
</div>
</div>
<div class="modal-footer">
<asp:LinkButton ID="LbAgregarCuentaBanco" runat="server" CausesValidation="true" CssClass="btn btn-success" Text="Agregar" ValidationGroup="GrpAgregarBanco" OnClick="LbAgregarCuentaBanco_Click"></asp:LinkButton>

View File

@@ -776,9 +776,30 @@ Partial Class Compras_Proveedores
End Function
Private Sub CargaCombos()
CargaResponsable()
CargaClasificacionProveedor()
CargaUsuarioEvaluacionProveedor()
CargaBancosSAT()
End Sub
Private Sub CargaBancosSAT()
Dim ObjBancos As New ClsBancos
If ObjBancos.GetBancosSAT Then
DdlSatBanco.DataSource = ObjBancos.DtResultados
End If
ObjBancos.Dispose()
DdlSatBanco.DataBind()
DdlSatBanco.Items.Insert(0, New ListItem("Seleccione uno", "-1"))
End Sub
Private Function CargaDatos() As Boolean
@@ -1640,7 +1661,9 @@ Partial Class Compras_Proveedores
''Agregar Cuentas Bancarias
If TempDTCuentasBancos.Rows.Count > 0 Then
For Each row As DataRow In TempDTCuentasBancos.Rows
If Not ObjCuentasDeposito.AddCuentasDepositos(row("BancoNombre").ToString, row("Plaza").ToString, row("Sucursal").ToString, row("Cuenta").ToString, row("CLABE").ToString, row("CIE").ToString, row("SWIFT").ToString, row("Referencia").ToString, row("RefCrediProveedor").ToString, UsuarioActual.CveUsuario, row("CveMoneda").ToString.ToEntero, CveProveedor:=NuevoCveProveedor, Correo:=row("Correo").ToString, BBVAAlias:=row("BBVAAlias").ToString) Then
If Not ObjCuentasDeposito.AddCuentasDepositos(row("BancoNombre").ToString, row("Plaza").ToString, row("Sucursal").ToString, row("Cuenta").ToString, row("CLABE").ToString, row("CIE").ToString, row("SWIFT").ToString, row("Referencia").ToString, row("RefCrediProveedor").ToString, UsuarioActual.CveUsuario, row("CveMoneda").ToString.ToEntero,
CveProveedor:=NuevoCveProveedor, Correo:=row("Correo").ToString, BBVAAlias:=row("BBVAAlias").ToString,
EstatusPagoElectronico:=Boolean.Parse(row("EstatusPagoElectronico").ToString), EstatusPagoElectronicoGrupos:=Boolean.Parse(row("EstatusPagoElectronicoGrupos").ToString), CveSATBanco:=row("CveSATBanco").ToString.ToEntero) Then
ErrorBancos = True
End If
Next
@@ -3036,6 +3059,7 @@ Partial Class Compras_Proveedores
CargaPSGridCuentasBancos(ViewState("OrdenCuentasBancos").ToString)
RecargaGlobalCuentasBancarias()
End Sub
Protected Sub LbAgregarCuentaBanco_Click(sender As Object, e As EventArgs)
@@ -3045,19 +3069,6 @@ Partial Class Compras_Proveedores
EsBancomer = True
End If
''COMENTADO PARA PERMITIR ENTRADA DE UNA CUENTA A PROVEEDOR, 22 DE SEPTIEMBRE, ISRAEL PIÑA
'If EsBancomer AndAlso (TxtCLABE.Text.Length = 18 AndAlso Not TxtCLABE.Text.Substring(0, 3) = "012") Then
' Alert("La CLABE ingresada no pertenece a BANCOMER.", TipoMensaje.MsgAdvertencia)
' Exit Sub
'End If
''CLABE SIEMPRE OBLIGATORIA CUANDO NO ES BANCOMER CON CIE
'If (TxtCLABE.Text.Trim.Length <> 18 And Not EsBancomer) Or (EsBancomer And TxtConvenioCIE.Text.Trim.Length <> 6 And TxtCLABE.Text.Trim.Length <> 18) Then
' Alert("La CLABE es obligatoria y debe tener una longitud de 18 dígitos. Por favor rectifique y vuelva a intentar.", TipoMensaje.MsgAdvertencia)
' Exit Sub
'End If
'RESTRICCIONES GENERALES
'QUE TENGA ALGUN DATO DE TIPO DE CUENTA
@@ -3111,15 +3122,19 @@ Partial Class Compras_Proveedores
Dim Estatus As Boolean
If ChkEstatus.Checked = True Then Estatus = True Else Estatus = False
AgregarCuentaBanco(TxtNombreBanco.Text.Trim, TxtNumeroSucursal.Text.Trim, TxtCLABE.Text.Trim, TxtSWIFT.Text.Trim, TxtPlaza.Text.Trim, TxtNumeroCuenta.Text.Trim, TxtConvenioCIE.Text.Trim, TxtReferencia.Text.Trim, TxtRefCrediProveedor.Text.Trim, DdlMoneda.SelectedValue.ToEntero, DdlMoneda.SelectedItem.Text, Estatus, TxtCorreoCuenta.Text.Trim, TxtBBVAAlias.Text)
AgregarCuentaBanco(TxtNombreBanco.Text.Trim, TxtNumeroSucursal.Text.Trim, TxtCLABE.Text.Trim, TxtSWIFT.Text.Trim, TxtPlaza.Text.Trim, TxtNumeroCuenta.Text.Trim, TxtConvenioCIE.Text.Trim, TxtReferencia.Text.Trim, TxtRefCrediProveedor.Text.Trim,
DdlMoneda.SelectedValue.ToEntero, DdlMoneda.SelectedItem.Text, Estatus, TxtCorreoCuenta.Text.Trim, TxtBBVAAlias.Text, ChkPagoElectronico.Checked, ChkPagoElectronicoGrupos.Checked, DdlSatBanco.SelectedValue.ToEntero)
End Sub
Private Sub AgregarCuentaBanco(NombreBanco As String, NumeroSucursal As String, CLABE As String, SWIFT As String, Plaza As String, NumeroCuenta As String, ConvenioCIE As String, Referencia As String, RefCrediProveedor As String, CveMoneda As Integer, Moneda As String, Estatus As Boolean, Correo As String, BBVAAlias As String)
Private Sub AgregarCuentaBanco(NombreBanco As String, NumeroSucursal As String, CLABE As String, SWIFT As String, Plaza As String, NumeroCuenta As String, ConvenioCIE As String, Referencia As String, RefCrediProveedor As String,
CveMoneda As Integer, Moneda As String, Estatus As Boolean, Correo As String, BBVAAlias As String, EstatusPagoElectronico As Boolean, EstatusPagoElectronicoGrupos As Boolean, CveSATBanco As Integer)
Dim ObjCuentasBancos As New ClsGenerales
If Modalidad = "A" Then
If CveProveedor > 0 Then
If ObjCuentasBancos.AddCuentasDepositos(NombreBanco, Plaza, NumeroSucursal, NumeroCuenta, CLABE, ConvenioCIE, SWIFT, Referencia, RefCrediProveedor, UsuarioActual.CveUsuario, CveMoneda, CveProveedor:=CveProveedor, Correo:=Correo, BBVAAlias:=BBVAAlias) Then
If ObjCuentasBancos.AddCuentasDepositos(NombreBanco, Plaza, NumeroSucursal, NumeroCuenta, CLABE, ConvenioCIE, SWIFT, Referencia, RefCrediProveedor, UsuarioActual.CveUsuario, CveMoneda, CveProveedor:=CveProveedor,
Correo:=Correo, BBVAAlias:=BBVAAlias, EstatusPagoElectronico:=EstatusPagoElectronico, EstatusPagoElectronicoGrupos:=EstatusPagoElectronicoGrupos, CveSATBanco:=CveSATBanco) Then
DTCuentasBancos.Clear()
DTCuentasBancos.Merge(ObjCuentasBancos.DtResultados.FiltraParametros(String.Format("CveProveedor = {0}", CveProveedor)))
Alert("Cuenta Bancaria agregada con éxito.", TipoMensaje.MsgInformacion)
@@ -3143,10 +3158,14 @@ Partial Class Compras_Proveedores
Row("RefCrediProveedor") = RefCrediProveedor
Row("CveMoneda") = CveMoneda
Row("Moneda") = Moneda
Row("EstatusPagoElectronico") = 0
Row("EstatusPagoElectronico") = EstatusPagoElectronico
Row("EstatusPagoElectronicoGrupos") = EstatusPagoElectronicoGrupos
Row("Estatus") = "True"
Row("Correo") = Correo
Row("CveSATBanco") = CveSATBanco
TempDTCuentasBancos.Rows.Add(Row)
Alert("Cuenta Bancaria agregada con éxito.", TipoMensaje.MsgInformacion)
RegistraScript(String.Format("$('#{0}').modal('hide');", "DivAddCuentasBancarias"))
@@ -3157,7 +3176,8 @@ Partial Class Compras_Proveedores
If CveProveedor > 0 Then
If ObjCuentasBancos.UpdateCuentasDepositos(GvBancosCuentas.DataKeys(CveCuentaBancaria)("CveCuentaDeposito").ToString.ToEntero, NombreBanco, Plaza, NumeroSucursal, NumeroCuenta, CLABE, ConvenioCIE, SWIFT, Referencia, RefCrediProveedor, False, Estatus, CveMoneda, Correo:=Correo, BBVAAlias:=BBVAAlias) Then
If ObjCuentasBancos.UpdateCuentasDepositos(GvBancosCuentas.DataKeys(CveCuentaBancaria)("CveCuentaDeposito").ToString.ToEntero, NombreBanco, Plaza, NumeroSucursal, NumeroCuenta, CLABE, ConvenioCIE, SWIFT, Referencia, RefCrediProveedor,
False, Estatus, CveMoneda, Correo:=Correo, BBVAAlias:=BBVAAlias, EstatusPagoElectronico:=EstatusPagoElectronico, EstatusPagoElectronicoGrupos:=EstatusPagoElectronicoGrupos, CveSATBanco:=CveSATBanco) Then
DTCuentasBancos.Clear()
DTCuentasBancos.Merge(ObjCuentasBancos.DtResultados.FiltraParametros(String.Format("CveProveedor = {0}", CveProveedor)))
Alert("Cuenta actualizada con éxito.", TipoMensaje.MsgInformacion)
@@ -3181,8 +3201,12 @@ Partial Class Compras_Proveedores
Row("RefCrediProveedor") = RefCrediProveedor
Row("CveMoneda") = CveMoneda
Row("Moneda") = Moneda
Row("EstatusPagoElectronico") = EstatusPagoElectronico
Row("EstatusPagoElectronicoGrupos") = EstatusPagoElectronicoGrupos
Row("Estatus") = Estatus
Row("Correo") = Correo
Row("CveSATBanco") = CveSATBanco
TempDTCuentasBancos.AcceptChanges()
Alert("Cuenta actualizada con éxito.", TipoMensaje.MsgInformacion)
RegistraScript(String.Format("$('#{0}').modal('hide');", "DivAddCuentasBancarias"))
@@ -4673,6 +4697,13 @@ Partial Class Compras_Proveedores
TxtBBVAAlias.Text = ""
ChkEstatus.Checked = True
divestatus.Visible = False
ChkPagoElectronico.Checked = False
ChkPagoElectronicoGrupos.Checked = False
DdlSatBanco.SelectedValueExist("-1")
DVDdlSatBanco.Visible = False
UpAddBancos.Update()
RegistraScript(String.Format("$('#{0}').modal('show');", "DivAddCuentasBancarias"))
End Sub
@@ -4697,6 +4728,15 @@ Partial Class Compras_Proveedores
ChkEstatus.Checked = CBool(GvRow.DataKey("Estatus"))
divestatus.Visible = True
UpAddBancos.Update()
ChkPagoElectronico.Checked = Boolean.Parse(GvRow.DataKey("EstatusPagoElectronico").ToString)
ChkPagoElectronicoGrupos.Checked = Boolean.Parse(GvRow.DataKey("EstatusPagoElectronicoGrupos").ToString)
DdlSatBanco.SelectedValueExist(GvRow.DataKey("CveSATBanco"))
If ChkPagoElectronicoGrupos.Checked Then
DVDdlSatBanco.Visible = True
End If
RegistraScript(String.Format("$('#{0}').modal('show');", "DivAddCuentasBancarias"))
End Sub
@@ -6153,6 +6193,24 @@ Partial Class Compras_Proveedores
#End Region
Protected Sub ChkPagoElectronicoGrupos_CheckedChanged(sender As Object, e As EventArgs)
If ChkPagoElectronicoGrupos.Checked Then
DVDdlSatBanco.Visible = True
Else
DVDdlSatBanco.Visible = False
End If
UpAddBancos.Update()
End Sub
Protected Sub ChkPagoElectronico_CheckedChanged(sender As Object, e As EventArgs)
If ChkPagoElectronico.Checked Then
Alert("Se está activando manualmente el pago por Layout BBVA. Recuerde que la alta se realiza directo en la platoforma", TipoMensaje.MsgAdvertencia)
End If
End Sub
End Class

View File

@@ -1939,8 +1939,8 @@ Partial Class Contratos_Default
LimitarCantidad = Gv.Rows(e.RowIndex).FCCheckBox("ChkLimitarCantidad").Checked
Observaciones = Gv.Rows(e.RowIndex).FCTextBox("TxtObservacion").Text.ToString
Dim row = TmpDT.Select(String.Format(" CveContratoDetalle={0}", CveContratoDetalle))(0)
If row("CantidadContratada").ToString.ToEntero <> Cantidad OrElse row("PU").ToString.ToEntero <> PU OrElse CveUM <> row("CveUM").ToString.ToEntero OrElse row("NoIdentificacion").ToString <> NoIdentificacion OrElse row("OCInterna").ToString <> OCInterna Then
Dim LimitarCantidadValidator As Boolean = row("LimitarCantidad").ToString = "True"
If row("CantidadContratada").ToString.ToEntero <> Cantidad OrElse row("PU").ToString.ToEntero <> PU OrElse CveUM <> row("CveUM").ToString.ToEntero OrElse row("NoIdentificacion").ToString <> NoIdentificacion OrElse row("OCInterna").ToString <> OCInterna OrElse LimitarCantidadValidator <> LimitarCantidad Then
Dim ObjContratos As New ClsContratos
If ObjContratos.UpdateContratosDetalle(CveContratoDetalle, CveContrato, CvePS, Cantidad, PU, UsuarioActual.CveUsuario, NoIdentificacion, LimitarCantidad, OCInterna, Observaciones) Then
@@ -2922,9 +2922,9 @@ Partial Class Contratos_Default
End If
If e.Row.DBCampo("SerieLote").ToString = "-1" Then
e.Row.Cells(7).Text = ""
End If
'If e.Row.DBCampo("SerieLote").ToString = "-1" Then
' e.Row.Cells(7).Text = ""
'End If
End If
End Sub
@@ -3417,7 +3417,7 @@ Partial Class Contratos_Default
Private Sub BtnCargaExcel_Click(sender As Object, e As EventArgs) Handles BtnCargaExcel.Click
If TxtExcel.getfiles().Archivos.Count > 0 Then
Dim file As Archivo = TxtExcel.getfiles().Archivos(0)
Dim Directorio As String = ModExtensiones.DirectorioBaseEmpresas & file.patch
Dim Directorio As String = AppDomain.CurrentDomain.BaseDirectory & file.patch
Dim Tipo As String = If(file.Extencion.Contiene("xlsx", "xlsx", "xlsm", "xlsb"), "EXCEL", "CSV")
CargarArchivo(Directorio, file.filename, Tipo)
Else
@@ -3741,7 +3741,7 @@ Partial Class Contratos_Default
#Region " IMPRIMIR DOCUMENTO - SABE "
Public Sub DescarFormato(documento As String)
Dim PathRoot As String = ModExtensiones.DirectorioBaseEmpresas
Dim PathRoot As String = Server.MapPath("/")
Dim PathSource As String
Dim pathDesti As String

View File

@@ -6,25 +6,25 @@
<TablixBody>
<TablixColumns>
<TablixColumn>
<Width>3.2cm</Width>
<Width>3.11227cm</Width>
</TablixColumn>
<TablixColumn>
<Width>2cm</Width>
<Width>2.2618cm</Width>
</TablixColumn>
<TablixColumn>
<Width>2cm</Width>
<Width>2.38704cm</Width>
</TablixColumn>
<TablixColumn>
<Width>4.8cm</Width>
<Width>2.96454cm</Width>
</TablixColumn>
<TablixColumn>
<Width>4.3cm</Width>
<Width>4.68704cm</Width>
</TablixColumn>
<TablixColumn>
<Width>2.5cm</Width>
<Width>2.88704cm</Width>
</TablixColumn>
<TablixColumn>
<Width>2cm</Width>
<Width>2.38704cm</Width>
</TablixColumn>
</TablixColumns>
<TablixRows>
@@ -347,7 +347,6 @@
<PaddingBottom>2pt</PaddingBottom>
</Style>
</Textbox>
<rd:Selected>true</rd:Selected>
</CellContents>
</TablixCell>
<TablixCell>
@@ -551,7 +550,7 @@
<Top>0.14111cm</Top>
<Left>0.01325cm</Left>
<Height>0.84438cm</Height>
<Width>20.8cm</Width>
<Width>20.68675cm</Width>
<Style>
<Border>
<Style>None</Style>
@@ -565,7 +564,7 @@
<Width>8.23098in</Width>
<Page>
<PageHeader>
<Height>3.67911cm</Height>
<Height>3.71891cm</Height>
<PrintOnFirstPage>true</PrintOnFirstPage>
<PrintOnLastPage>true</PrintOnLastPage>
<ReportItems>
@@ -917,6 +916,47 @@
<PaddingBottom>2pt</PaddingBottom>
</Style>
</Textbox>
<Textbox Name="Textbox5">
<CanGrow>true</CanGrow>
<KeepTogether>true</KeepTogether>
<Paragraphs>
<Paragraph>
<TextRuns>
<TextRun>
<Value>Usuario Entrego: </Value>
<Style>
<FontWeight>Bold</FontWeight>
</Style>
</TextRun>
<TextRun>
<Value>=Parameters!FiltroUsuario.Value</Value>
<Style>
<FontWeight>Normal</FontWeight>
</Style>
</TextRun>
</TextRuns>
<Style />
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox5</rd:DefaultName>
<Top>2.9cm</Top>
<Left>13.3cm</Left>
<Height>0.5cm</Height>
<Width>7.4cm</Width>
<ZIndex>9</ZIndex>
<Visibility>
<Hidden>=Parameters!FiltroUsuario.Value Like ""</Hidden>
</Visibility>
<Style>
<Border>
<Style>None</Style>
</Border>
<PaddingLeft>2pt</PaddingLeft>
<PaddingRight>2pt</PaddingRight>
<PaddingTop>2pt</PaddingTop>
<PaddingBottom>2pt</PaddingBottom>
</Style>
</Textbox>
</ReportItems>
<Style>
<Border>
@@ -1181,6 +1221,10 @@
<DataField>PaqueteriaGuiaTipo</DataField>
<rd:TypeName>System.String</rd:TypeName>
</Field>
<Field Name="UsuarioEntrega">
<DataField>UsuarioEntrega</DataField>
<rd:TypeName>System.String</rd:TypeName>
</Field>
</Fields>
<rd:DataSetInfo>
<rd:DataSetName>DataSet</rd:DataSetName>
@@ -1288,6 +1332,12 @@
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
<ReportParameter Name="FiltroUsuario">
<DataType>String</DataType>
<Nullable>true</Nullable>
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
</ReportParameters>
<rd:ReportUnitType>Cm</rd:ReportUnitType>
<rd:ReportID>1d5d9525-4bdd-4783-9df6-cce93069c30f</rd:ReportID>

View File

@@ -11,6 +11,14 @@
Catálogo de Clasificaciones Viáticos y Comprobaciones
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<asp:UpdatePanel runat="server" ID="UpAcciones">
<ContentTemplate>
<asp:LinkButton runat="server" ID="LnkAgregarClasificacion" data-toggle="tooltip" data-placement="left" title="Agregar Clasificación"
Text="<i class='fa fa-plus'></i> Agregar Clasificación" OnClick="LnkAgregarClasificacion_Click" ></asp:LinkButton>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
@@ -32,7 +40,7 @@
<asp:ListItem Selected="True" Value="-1">Todos</asp:ListItem>
<asp:ListItem Value="0">Sin Asignar</asp:ListItem>
<asp:ListItem Value="1">Viáticos</asp:ListItem>
<asp:ListItem Value="2">Comprobacines</asp:ListItem>
<asp:ListItem Value="2">Comprobaciones</asp:ListItem>
</asp:DropDownList>
</div>
@@ -65,14 +73,15 @@
<asp:TemplateField ItemStyle-Width="40px" ItemStyle-HorizontalAlign="Right">
<ItemTemplate>
<asp:LinkButton ID="imgE" runat="server" AlternateText="Editar" OnClick="ActualizaModalClasif" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
</ItemTemplate>
</ItemTemplate>
</asp:TemplateField>
<%-- <asp:TemplateField ItemStyle-HorizontalAlign="center">
<asp:TemplateField ItemStyle-HorizontalAlign="center" ItemStyle-Width="40px" >
<ItemTemplate>
<asp:LinkButton ID="imgD" runat="server" AlternateText="Eliminar" CausesValidation="False" CommandName="Delete" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Desea Elminar?" data-btn-ok-label="si" />
<asp:LinkButton ID="LnkEliminar" runat="server" AlternateText="Eliminar" CausesValidation="False" OnClick="LnkEliminar_Click"
CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Desea Elminar?" data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>--%>
</asp:TemplateField>
</Columns>
</asp:GridView>
@@ -103,18 +112,20 @@
<div class="modal-body">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtClasificaciones" CssClass="form-control " runat="server" MaxLength="50" CausesValidation="true" ValidationGroup="Clasif" Enabled="false"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVCampaña" runat="server" ControlToValidate="TxtClasificaciones" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Clasificación''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarRegistro"></asp:RequiredFieldValidator>
<label for="<%= TxtClasificaciones.ClientID.ToString()%>">Clasificación:</label>
<asp:DropDownList ID="DdlClasificacion" runat="server" DataValueField="CveClasificacion" DataTextField="Clasificacion" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-sm select2me" Width="100%"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVCampaña" InitialValue="-1" runat="server" ControlToValidate="DdlClasificacion" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Clasificación''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarRegistro"></asp:RequiredFieldValidator>
<label for="<%= DdlClasificacion.ClientID.ToString()%>">Clasificación:</label>
</div>
<div class="form-group form-md-line-input input-iconright">
<label for="<%= DdlTipoComprobacion.ClientID.ToString()%>">Tipo Comprobacion:</label>
<label for="<%= DdlClasificacion.ClientID.ToString()%>">Tipo Comprobacion:</label>
<br />
<asp:DropDownList runat="server" ID="DdlTipoComprobacion" CssClass="select2me">
<asp:ListItem Value="-1">Sin Asignar</asp:ListItem>
<asp:ListItem Value="1">Viáticos</asp:ListItem>
<asp:ListItem Value="2">Comprobacines</asp:ListItem>
<asp:ListItem Value="2">Comprobaciones</asp:ListItem>
</asp:DropDownList>
</div>

View File

@@ -23,13 +23,41 @@ Partial Class Gral_CatClasificacionesComprobaciones
End Property
Property Actualizar As Boolean
Get
If ViewState("Actualizar") Is Nothing Then
Return False
Else
Return Boolean.Parse(ViewState("Actualizar").ToString)
End If
End Get
Set(value As Boolean)
ViewState("Actualizar") = value
End Set
End Property
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
CargaDropDownList()
CargaGridClasificaciones()
End If
End Sub
#Region " C L A S I F I C A C I O N E S"
Protected Sub CargaDropDownList()
DdlClasificacion.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa, UsoClasificacion:=-1).FiltraParametros("", Orderby:="Clasificacion") 'GlobalDTProveedorClasificacion(UsuarioActual.CveEmpresa)
DdlClasificacion.DataBind()
DdlClasificacion.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub
Protected Sub CargaGridClasificaciones()
Dim ObjClasificaciones As New ClsClasificaciones()
@@ -47,23 +75,27 @@ Partial Class Gral_CatClasificacionesComprobaciones
Dim ObjClasificaciones As New ClsClasificaciones()
If ObjClasificaciones.AddClasificacionesComprobaciones(CveClasificacion, UsuarioActual.CveEmpresa, DdlTipoComprobacion.SelectedValue.ToEntero) Then
If ObjClasificaciones.AddClasificacionesComprobaciones(DdlClasificacion.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, DdlTipoComprobacion.SelectedValue.ToEntero) Then
Alert("La clasificación se actualizo correctamente.")
CargaGridClasificaciones()
UpDatos.Update()
RegistraScript(String.Format("$('#{0}').modal('hide');", "ModalClasificaciones"))
End If
ObjClasificaciones.Dispose()
ObjClasificaciones.Dispose()
CargaGridClasificaciones()
End Sub
Public Sub ActualizaModalClasif(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Actualizar = True
TxtClasificaciones.Text = GvRow.DataKey("Clasificacion")
DdlClasificacion.SelectedValueExist(GvRow.DataKey("CveClasificacion"))
CveClasificacion = GvRow.DataKey("CveClasificacion").ToString.ToEntero
RegistraScript(String.Format("$('#{0}').modal();", "ModalClasificaciones"))
@@ -79,4 +111,39 @@ Partial Class Gral_CatClasificacionesComprobaciones
Protected Sub BtnConsultar_Click(sender As Object, e As EventArgs)
CargaGridClasificaciones()
End Sub
Protected Sub LnkAgregarClasificacion_Click(sender As Object, e As EventArgs)
Actualizar = False
DdlClasificacion.SelectedValueExist("-1")
CveClasificacion = -1
RegistraScript(String.Format("$('#{0}').modal('show');", "ModalClasificaciones"))
DdlTipoComprobacion.SelectedValueExist("-1")
UpModalClasificaciones.Update()
End Sub
Protected Sub LnkEliminar_Click(sender As Object, e As EventArgs)
Dim ObjClasificaciones As New ClsClasificaciones()
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim CveClasificacionEliminar As Integer = GvRow.DataKey("CveClasificacion").ToString.ToEntero
Dim TipoComprobacionEliminar As Integer = GvRow.DataKey("TipoComprobacion").ToString.ToEntero
If ObjClasificaciones.RemoveClasificacionesComprobaciones(CveClasificacionEliminar, UsuarioActual.CveEmpresa, TipoComprobacionEliminar) Then
Alert("La clasificación se elimino correctamente.")
End If
ObjClasificaciones.Dispose()
CargaGridClasificaciones()
UpDatos.Update()
End Sub
End Class

View File

@@ -15,7 +15,7 @@
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
Paqueterías Guías
<%--Paqueterías Guías--%>Entrega Local
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
@@ -30,7 +30,7 @@
<ContentTemplate>
<table class="Widthall">
<tr>
<td class="Titulos">Guías Vinculadas</td>
<td class="Titulos"><%--Guías Vinculadas--%> Entrega Local</td>
</tr>
<tr>
<td>

View File

@@ -0,0 +1,127 @@
<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="PopUpPaqueteriasGuiasInternas.aspx.cs" Inherits="General_PopUpPaqueteriasGuiasInternas" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
<style>
.MultiLineTextBox {
resize: none;
}
</style>
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.posicionvalidation {
left: 530px !important;
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
<%--Paqueterías Guías--%>Entrega Interna
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UPGuiasVinculadas" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<table class="Widthall">
<tr>
<td class="Titulos"><%--Guías Vinculadas--%> Entrega Local</td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
<asp:UpdatePanel ID="UPGuiasPorVincular" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<table class="Widthall">
<tr runat="server" id="RowPaqueteria" align="left" visible="true">
<td class="text-right"><b>Estatus:</b></td>
<td>
<asp:DropDownList ID="DdlEstatus" runat="server" Class="table-group-action-input form-control input-inline input-sm select2me" Width="200px">
<%-- <asp:ListItem Selected="False" Text="Seleccione" Value="-1"></asp:ListItem>--%>
<asp:ListItem Selected="True" Text="En Proceso" Value="1"></asp:ListItem>
<asp:ListItem Selected="False" Text="Confirmado por Proveedor" Value="2"></asp:ListItem>
<asp:ListItem Selected="False" Text="Entregado" Value="3"></asp:ListItem>
<asp:ListItem Selected="False" Text="Confirmado por Cliente" Value="4"></asp:ListItem>
</asp:DropDownList>
<%-- <asp:RequiredFieldValidator ID="RFVDdlEstatus" runat="server" ControlToValidate="DdlEstatus" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Estatus''</b> es necesario." InitialValue="-1" ValidationGroup="GrpCrearGuia"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEDdlEstatus" runat="server" HighlightCssClass="vco" TargetControlID="RFVDdlEstatus" Width="250px"></ajax:ValidatorCalloutExtender>--%>
</td>
</tr>
<tr runat="server" id="RowRastreo" align="left" visible="true">
<td class="text-right" style="width: 140px"><b>Fecha:</b></td>
<td style="width: 200px">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 117px !important; padding: 0px;">
<asp:TextBox ID="TxtFecha" runat="server" CssClass="form-control" Width="170px" Height="30px" Style="padding: 0px" CausesValidation="true" MaxLength="10"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton ID="LnkFecha" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server" Width="30px"></asp:LinkButton>
</span>
<ajax:MaskedEditExtender ID="MEEFecha" runat="server" TargetControlID="TxtFecha" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CEFecha" TargetControlID="TxtFecha" PopupButtonID="LnkFecha" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVFecha" runat="server" ControlToValidate="TxtFecha" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> es necesario." ValidationGroup="GrpCrearGuia"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEFecha" runat="server" HighlightCssClass="vco" TargetControlID="RFVFecha" Width="250px"></ajax:ValidatorCalloutExtender>
</div>
</td>
</tr>
<tr runat="server" id="RowFechas" align="left" visible="true">
<td class="text-right" style="width: 140px;"><b>Fecha Estimada:</b></td>
<td style="width: 200px">
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 117px !important; padding: 0px;">
<asp:TextBox ID="TxtFechaEstimada" runat="server" CssClass="form-control" Width="170px" Height="30px" Style="padding: 0px"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton ID="LnkFechaEstimada" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server" Width="30px"></asp:LinkButton>
</span>
<ajax:MaskedEditExtender ID="MEEFechaEstimada" runat="server" TargetControlID="TxtFechaEstimada" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CEFechaEstimada" TargetControlID="TxtFechaEstimada" PopupButtonID="LnkFechaEstimada" PopupPosition="BottomLeft" Enabled="True"></ajax:CalendarExtender>
</div>
</td>
</tr>
<tr runat="server" id="RowDimensiones" align="left" visible="true">
<td class="text-right" style="width: 140px"><b># Cajas:</b></td>
<td style="width: 200px">
<asp:TextBox ID="TxtNoCajas" runat="server" CssClass="form-control" Width="200px" Height="30px" Style="padding: 0px"></asp:TextBox>
<ajax:MaskedEditExtender ID="MEENoCajas" runat="server" TargetControlID="TxtNoCajas" Mask="9999" MaskType="Number" AcceptNegative="None"></ajax:MaskedEditExtender>
</td>
</tr>
<tr runat="server" id="RowCajas" align="left" visible="true">
<td class="text-right" align="left" valign="top" style="width: 140px; padding-top: 4px;"><b>Observaciones:</b></td>
<td style="width: 200px;">
<asp:TextBox ID="TxtObservaciones" runat="server" CssClass="form-control MultiLineTextBox" Width="200px" Height="60px" Style="padding: 0px" TextMode="MultiLine"></asp:TextBox>
</td>
</tr>
<tr></tr>
<tr align="center">
<td style="text-align: right; width: 135px;" colspan="2">
<asp:Button ID="BtnCrearGuia" runat="server" Text="Crear Guía" class="btn btn-primary" Width="135px" Visible="true" OnClick="BtnCrearGuia_Click" ValidationGroup="GrpCrearGuia" />
</td>
<td style="text-align: left; width: 135px;" colspan="2">
<asp:Button ID="BtnLimpiar" runat="server" Text="Limpiar Campos" class="btn btn-warning" Width="135px" Visible="true" OnClick="BtnLimpiar_Click" />
</td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
<script>
</script>
</asp:Content>

View File

@@ -0,0 +1,136 @@
using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
using Extensiones;
using System.Data;
using System.Text;
public partial class General_PopUpPaqueteriasGuiasInternas : ClsPaginas
{
private int CveVenta
{
get
{
return ViewState["CveVenta"].ToString().ToEntero();
}
set
{
ViewState["CveVenta"] = value;
}
}
private int CveSubProyecto
{
get
{
return ViewState["CveSubProyecto"].ToString().ToEntero();
}
set
{
ViewState["CveSubProyecto"] = value;
}
}
protected void Page_Load(object sender, EventArgs e)
{
if (!IsPostBack)
{
((BaseMasterPage)this.Master).EsPopup = true;
RecuperaCve();
}
}
protected void RecuperaCve()
{
if (Request["CveVenta"] != null && !Request["CveVenta"].ToString().Equals("") && Request["CveVenta"].ToEntero() > 0)
{
ViewState["CveVenta"] = Request["CveVenta"];
}
else
{
ViewState["CveVenta"] = -1;
}
if (Request["CveSubProyecto"] != null && !Request["CveSubProyecto"].ToString().Equals("") && Request["CveSubProyecto"].ToEntero() > 0)
{
ViewState["CveSubProyecto"] = Request["CveSubProyecto"];
}
else
{
ViewState["CveSubProyecto"] = -1;
}
}
protected void LimpiaCampos()
{
DdlEstatus.SelectedValue = "1";
TxtFecha.Text = "";
TxtFechaEstimada.Text = "";
TxtNoCajas.Text = "";
TxtObservaciones.Text = "";
}
protected void AgregarNuevaGuia()
{
ClsGenerales ObjGeneral = new ClsGenerales();
Boolean TieneError = false;
ObjGeneral.IniciaTransacSQL();
int CveEstatus = DdlEstatus.SelectedValue.ToEntero();
String Fecha = TxtFecha.Text;
String FechaEstimada = TxtFechaEstimada.Text == "" ? "-1" : TxtFechaEstimada.Text;
int NoCajas = TxtNoCajas.Text.ToEntero();
String Observaciones = TxtObservaciones.Text;
int CvePaqueteriaGuia = ObjGeneral.AddPaqueteriasGuias(-1, -1, CveEstatus, CveSubProyecto, Fecha, "-1", "-1", NoCajas, 0.00, "-1", FechaEstimada, Observaciones,
UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, EsEntregaInterna:true);
if (CvePaqueteriaGuia > 0)
{
if (CveVenta > 0 || CveSubProyecto > 0 )
{
TieneError = !ObjGeneral.AddPaqueteriasGuiasDetalles(CvePaqueteriaGuia, CveVenta, -1, CveSubProyecto, -1);
}
}
else
{
TieneError = true;
}
if (TieneError)
{
ObjGeneral.RollBack();
}else
{
ObjGeneral.Commit();
LimpiaCampos();
Alert("Se agrego la paquetería guía correctamente");
}
ObjGeneral.Dispose();
}
public void BtnAgregarGuia_Click(Object sender, EventArgs e)
{
}
public void BtnCrearGuia_Click(Object sender, EventArgs e)
{
AgregarNuevaGuia();
}
public void BtnLimpiar_Click(Object sender,EventArgs e)
{
LimpiaCampos();
}
}

View File

@@ -167,6 +167,11 @@
<asp:ListItem Value="10" Text="Fecha Ing."></asp:ListItem>
</asp:DropDownList>
</div>
<label class="col-md-1" style="width: 90px; margin-top: 5px;">Usuario:</label>
<div class="col-md-2">
<asp:DropDownList ID="DdlUsuarios" DataTextField="Nombre" DataValueField="CveUsuario" runat="server" Width="100%" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm select2me"/>
</div>
</div>
</div>
</div>

View File

@@ -162,7 +162,7 @@ public partial class General_RepPaqueteriasGuias : ClsPaginas
CargaPaqueterias();
CargaPaqueteriasGuiasTipo();
InicializaFechas();
CargaUsuarios();
UPFiltros.Update();
if (!UsuarioActual.TienePermisoProceso(219))
@@ -231,6 +231,13 @@ public partial class General_RepPaqueteriasGuias : ClsPaginas
DdlEstatusEditar.SelectedValue = "-1";
}
private void CargaUsuarios()
{
DdlUsuarios.DataSource = get_GlobalDTUsuarios(CveEmpresa:UsuarioActual.CveEmpresa);
DdlUsuarios.DataBind();
DdlUsuarios.Items.Insert(0, new ListItem("Seleccione ", "-1"));
}
protected void InicializaFechas()
{
DateTime FI = new DateTime(DateTime.Now.Year, 1, 1);
@@ -254,6 +261,7 @@ public partial class General_RepPaqueteriasGuias : ClsPaginas
int CveSubProyecto = DdlSucursales.SelectedValue.ToEntero();
int CveEmpresa = UsuarioActual.CveEmpresa;
int Filtro = DdlFiltro.SelectedValue.ToEntero();
int CveUsuarioEntrega = DdlUsuarios.SelectedValue.ToEntero();
String Guia = "-1";
String FechaInicio = TxtFechaI.Text == "" ? "-1" : TxtFechaI.Text;
@@ -262,7 +270,7 @@ public partial class General_RepPaqueteriasGuias : ClsPaginas
String FechaIngInicio = TxtFechaInicialIngreso.Text == "" ? "-1" : TxtFechaInicialIngreso.Text;
String FechaIngFin = TxtFechaFinalIngreso.Text == "" ? "-1" : TxtFechaFinalIngreso.Text;
if (ObjGeneral.GetPaqueteriasGuias(CvePaqueteriaGuia, CvePaqueteriaGuiaTipo, CvePaqueteria, CveEstatus, CveSubProyecto, CveEmpresa, Guia, FechaInicio, FechaFin, FechaIngInicio, FechaIngFin, Filtro: Filtro))
if (ObjGeneral.GetPaqueteriasGuias(CvePaqueteriaGuia, CvePaqueteriaGuiaTipo, CvePaqueteria, CveEstatus, CveSubProyecto, CveEmpresa, Guia, FechaInicio, FechaFin, FechaIngInicio, FechaIngFin, Filtro: Filtro, CveUsuarioEntrega: CveUsuarioEntrega))
{
DTDatos = ObjGeneral.DtResultados;
GVDatos.DataSource = DTDatos;
@@ -803,6 +811,9 @@ public partial class General_RepPaqueteriasGuias : ClsPaginas
@params.Add(new ReportParameter("FechaImpresion", DateTime.Now.ToShortDateString()));
@params.Add(new ReportParameter("Filtros", String.Format(" <b>Sucursal: </b>{0}&emsp;&emsp;<b>Estatus: </b>{1}&emsp;&emsp;<b>Paquetería: </b>{2}<br/><b>Fecha Inicio: </b>{3}&emsp;&emsp;<b>Fecha Fin: </b>{4}", Sucursal, Estatus, Paqueteria, FechaInicio, FechaFinal)));
string Usuario = DdlUsuarios.SelectedValue == "-1" ? "" : DdlUsuarios.SelectedItem.Text;
@params.Add(new ReportParameter("FiltroUsuario", Usuario));
if (Imagen.Exists)
{
@params.Add(new ReportParameter("LogoPath", logouri));

BIN
Imagenes/Bell.png Normal file

Binary file not shown.

After

Width:  |  Height:  |  Size: 6.3 KiB

View File

@@ -3,6 +3,11 @@
<asp:Content ID="Content1" ContentPlaceHolderID="Css" runat="Server">
<style type="text/css">
.unoaunoold {
color: #999b9b;
font-size: 11px;
}
.Dia {
background-image: url(/Imagenes/FondoCal.jpg);
background-repeat: repeat-x;
@@ -478,9 +483,11 @@
</div>
</div>
</div>
<asp:UpdatePanel ID="UPPTareas" runat="server" RenderMode="Inline" UpdateMode="Conditional">
<ContentTemplate>
<div class="col-md-6 col-sm-6">
<div class="col-md-4 col-sm-4">
<asp:UpdatePanel ID="UPPTareas" runat="server" RenderMode="Inline" UpdateMode="Conditional">
<ContentTemplate>
<div class="portlet light ">
<div class="portlet-title">
<div class="caption">
@@ -525,9 +532,78 @@
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div class="col-md-2 col-sm-2">
<div class="portlet light ">
<div class="portlet-title">
<div class="caption">
<i aria-hidden="true" class="icon-list font-blue-steel"></i>
<span class="caption-subject font-blue-steel bold uppercase">Eventos </span><span style="color: #999; font-size: 10px;"></span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
<div class="portlet-body">
<div>
<%--<asp:GridView ID="GVOI" runat="server" GridLines="None" CssClass=" Widthall ScrollAD" AutoGenerateColumns="False" ShowHeader="False">
<Columns>
<asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
<asp:Label runat="server" ID="LblTipo"></asp:Label>&nbsp;
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>--%>
<div class="inbox-sidebar">
<a href="javascript:;" data-title="Compose" class="btn red compose-btn btn-block">
<i class="fa fa-edit"></i>Eventos </a>
<ul class="list-group">
<li class="list-group-item ">
<div class="row">
<div class="col-xs-9">Tareas</div>
<div class="col-xs-3"><span class="badge badge-success">
<asp:Literal ID="ltlTotalTareas" runat="server">0</asp:Literal></span> </div>
</div>
</li>
<li class="list-group-item ">
<div class="row">
<div class="col-xs-9">Convocatorias</div>
<div class="col-xs-3"><span class="badge badge-info">
<asp:Literal ID="LtlTotalConvocatorias" runat="server">0</asp:Literal></span></div>
</div>
</li>
<li class="list-group-item ">
<div class="row">
<div class="col-xs-9">Minutas</div>
<div class="col-xs-3"><span class="badge badge-warning">
<asp:Literal ID="LtlTotalMinutas" runat="server">0</asp:Literal></span> </div>
</div>
</li>
<li class="list-group-item ">
<div class="row">
<div class="col-xs-9">Proyectos</div>
<div class="col-xs-3"><span class="badge badge-danger">
<asp:Literal ID="LtlTotalProyetos" runat="server">0</asp:Literal></span></div>
</div>
</li>
</ul>
</div>
</div>
<div class="scroller-footer">
</div>
</div>
</div>
</div>
</div>
<%-- DIRECTORIO TELEFONICO --%>
@@ -675,8 +751,6 @@
</div>
<div id="ModalMitoteresat" class="modal ADS fade " role="dialog">
<div class="modal-dialog">
@@ -684,7 +758,7 @@
<div class="modal-content modal-lg">
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">&times;</button>
<asp:HyperLink runat="server" NavigateUrl="/Ventas/RepConciliacionEmitidosSat.aspx?RegistroEn=4&FechaInicio=2000/01/01" CssClass="btn btn-xs btn-default" style="float:right;">Ir a Reporte</asp:HyperLink>
<asp:HyperLink runat="server" NavigateUrl="/Ventas/RepConciliacionEmitidosSat.aspx?RegistroEn=4&FechaInicio=2000/01/01" CssClass="btn btn-xs btn-default" Style="float: right;">Ir a Reporte</asp:HyperLink>
<h4 class="modal-title">Ventas sin registrar en SIG</h4>
</div>
@@ -700,8 +774,10 @@
<Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="15%" HeaderText="Folio Fiscal">
<ItemTemplate>
<div style="white-space:nowrap "><asp:Label runat="server" Text='<%# Eval("FolioFiscal")%>'> </asp:Label></div>
</ItemTemplate>
<div style="white-space: nowrap">
<asp:Label runat="server" Text='<%# Eval("FolioFiscal")%>'> </asp:Label>
</div>
</ItemTemplate>
</asp:TemplateField>
<asp:BoundField HeaderText="Serie Folio" DataField="SerieFolio" ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Center" />
<asp:BoundField HeaderText="Proveedor" DataField="NombreProveedor" ItemStyle-Width="20%" ItemStyle-HorizontalAlign="Center" />
@@ -725,10 +801,6 @@
</div>
</div>
<div id="ModalMitotereCancelaPendiente" class="modal ADS fade " role="dialog">
<div class="modal-dialog">
@@ -736,12 +808,12 @@
<div class="modal-content modal-lg">
<div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">&times;</button>
<asp:HyperLink runat="server" NavigateUrl="/Ventas/RepCancelacionesPorAtender.aspx" CssClass="btn btn-xs btn-default" style="float:right;">Ir a Reporte</asp:HyperLink>
<asp:HyperLink runat="server" NavigateUrl="/Ventas/RepCancelacionesPorAtender.aspx" CssClass="btn btn-xs btn-default" Style="float: right;">Ir a Reporte</asp:HyperLink>
<h4 class="modal-title">Cancelaciones por Atender</h4>
</div>
<div class="modal-body">
<div style="text-align: right">
<input type="text" id="TxtBusquedaCancelaPendiente" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaCancelaPendiente','{0}')", gvCancelaPendiente.ClientID) %>" style="display: inline-block; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusquedaCancelaPendiente','{0}')", gvCancelaPendiente.ClientID) %>" style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
@@ -753,12 +825,14 @@
<Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="15%" HeaderText="Folio Fiscal">
<ItemTemplate>
<div style="white-space:nowrap "><asp:Label runat="server" Text='<%# Eval("FolioFiscal")%>'> </asp:Label></div>
</ItemTemplate>
<div style="white-space: nowrap">
<asp:Label runat="server" Text='<%# Eval("FolioFiscal")%>'> </asp:Label>
</div>
</ItemTemplate>
</asp:TemplateField>
<asp:BoundField HeaderText="Serie Folio" DataField="SerieFolio" ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Center" />
<asp:BoundField HeaderText="Proveedor" DataField="NombreProveedor" ItemStyle-Width="20%" ItemStyle-HorizontalAlign="Center" />
<asp:BoundField HeaderText="Importe" DataField="Total" DataFormatString="{0:N2}" ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Importe" DataField="Total" DataFormatString="{0:N2}" ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Fecha" DataField="Fecha" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Center" />
<%--<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="15%" HeaderText=" ">
<ItemTemplate>
@@ -778,9 +852,6 @@
</div>
</div>
<div id="ModalComprasPUE" class="modal ADS fade" role="dialog">
<div class="modal-dialog">
@@ -792,7 +863,7 @@
</div>
<div class="modal-body">
<div style="text-align:right">
<div style="text-align: right">
<asp:Label ID="LblComprasPUE" runat="server" Text="" Font-Italic="True"></asp:Label>
<input type="text" id="TxtBus" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBus','{0}')", GvCompPUE.ClientID) %>" style="display: inline-block; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBus','{0}')", GvCompPUE.ClientID) %>" style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
@@ -876,14 +947,14 @@
<div class="modal-body">
<div class="row">
<div class="col-md-6">
# Inconsistencias:
<div class="col-md-6">
# Inconsistencias:
<asp:Label ID="LblInconsistenciasNum" runat="server" Text="0" Font-Bold="true"></asp:Label>
</div>
<div class="col-md-6" style="text-align :right">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvIncons.ClientID) %>" style="display: inline-block; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvIncons.ClientID) %>" style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
</div>
<div class="col-md-6" style="text-align: right">
<input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvIncons.ClientID) %>" style="display: inline-block; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvIncons.ClientID) %>" style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
</div>
<asp:GridView ID="GvIncons" runat="server" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
</asp:GridView>
@@ -899,6 +970,7 @@
</div>
</div>
<div id="ModalNoTimbradasCentroCosto" class="modal ADS fade" role="dialog">
<div class="modal-dialog">
@@ -912,10 +984,10 @@
<div class="modal-body">
<div class="row">
<div class="col-md-6"># No Timbradas:</div>
<div class="col-md-6" style="text-align :right">
<input type="text" id="TxtBusquedaCentroCosto" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaCentroCosto','{0}')", GvNoTimbradasCentroCosto.ClientID) %>" style="display: inline-block; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusquedaCentroCosto','{0}')", GvNoTimbradasCentroCosto.ClientID) %>" style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<div class="col-md-6" style="text-align: right">
<input type="text" id="TxtBusquedaCentroCosto" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaCentroCosto','{0}')", GvNoTimbradasCentroCosto.ClientID) %>" style="display: inline-block; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusquedaCentroCosto','{0}')", GvNoTimbradasCentroCosto.ClientID) %>" style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
</div>
@@ -1010,7 +1082,7 @@
<h4 class="modal-title" id="myModalLabel2" runat="server">Evaluaciones Pendientes</h4>
</div>
<div class="modal-body">
<div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right" >
<div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right">
<div style="margin-right: 15px">
<input type="text" id="TxtBusquedaEva" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusquedaEva','{0}')", GvEvaluaciones.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvEvaluaciones.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
@@ -1033,6 +1105,66 @@
</asp:UpdatePanel>
</div>
</div>
<div id="DvUnoaUno" class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<asp:UpdatePanel ID="UpModalUnoaUno" class="modal-content rowpadding" 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" id="H1" runat="server">Uno a Uno</h4>
</div>
<div class="modal-body">
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
<i class="fa fa-question-circle font-green"></i>
<span class="caption-subject bold uppercase">
<asp:Literal ID="Literal1" runat="server">Preguntas</asp:Literal></span>
</div>
<div class="tools"><a href="javascript:;" class="collapse" data-original-title="" title=""></a></div>
<div class="actions">
<div class="btn-group">
</div>
</div>
</div>
<asp:Panel ID="pnluserPreguntas" runat="server" class="portlet-body rowpadding">
<asp:GridView ID="GVPA_OI_UnoAUnoTableroGet" runat="server" GridLines="None" CssClass="table table-hover Widthall" AutoGenerateColumns="False" ShowHeader="false"
DataKeyNames="CveUnoaUnoPregunta,Pregunta,Respuesta,CveUnoaUno">
<Columns>
<asp:TemplateField HeaderText="Comentarios">
<ItemTemplate>
<h4>
<asp:Label ID="lblPregunta" CssClass="bold" runat="server" Text='<%# Eval("Pregunta")%>'> </asp:Label></h4>
<asp:Label CssClass="unoaunoold" runat="server" Text='<%# Eval("RespuestaOld")%>'> </asp:Label>
<br />
<asp:TextBox ID="TxtComentarios" CssClass="form-control" Text='<%# Eval("Respuesta")%>' TextMode="MultiLine" Rows="3" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvTxtComentarios" runat="server" ControlToValidate="TxtComentarios" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />Responda el cuestionario para poder guardar" ValidationGroup="GrpGuardarUnoAUno"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VcoTxtCFecha" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtComentarios" Width="350px"></ajax:ValidatorCalloutExtender>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
<br />
<br />
<div class="text-center">
</div>
</asp:Panel>
</div>
</div>
<div class="modal-footer">
<asp:LinkButton runat="server" ID="LnkGuardarUnoaUno" OnClick="LnkGuardarUnoaUno_Click" ValidationGroup="GrpGuardarUnoAUno" CssClass="btn btn-primary"> Guardar</asp:LinkButton>
<button data-dismiss="modal" class="btn btn-default">Cancelar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="JS" runat="Server">

View File

@@ -53,6 +53,21 @@ Partial Class Inicio
Return retorno
End Function
Private Sub cargaUnuaUno()
GVPA_OI_UnoAUnoTableroGet.DataSource = New System.Data.DataTable()
Using ObjPA_O As ClsOIEventos = New ClsOIEventos()
If ObjPA_O.UnoAUnoTableroGet(UsuarioActual.CveEmpresa, DateTime.Now.ToString("yyyy/MM/dd"), UsuarioActual.CveUsuario) Then
If ObjPA_O.DtResultados.COUNT("CveUnoaUno", "CveUnoaUno = -1") > 0 Then
RegistraScript("$('#DvUnoaUno').modal();")
End If
End If
GVPA_OI_UnoAUnoTableroGet.DataSource = ObjPA_O.DtResultados
End Using
GVPA_OI_UnoAUnoTableroGet.DataBind()
End Sub
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
@@ -60,6 +75,7 @@ Partial Class Inicio
Usuario.CerrarSession()
Exit Sub
End If
cargaUnuaUno()
'Reporte de ventas sin registrar sig
If UsuarioActual.TienePermisoProceso(287) Then
@@ -209,7 +225,7 @@ Partial Class Inicio
Private Sub MuestraVentasPUE()
Dim objVentas As New ClsVentas
Dim FechaInicio As Date = Now.AddYears(-2)
LblVentasPUE.Text = "Facturas apartir de " & FechaInicio.ToShortDateString
LblVentasPUE.Text = "Facturas a partir de: " & FechaInicio.ToShortDateString
If objVentas.GetPUESinPago(FechaInicio, Now, -1, -1, -1, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario) Then
If objVentas.DtResultados.Rows.Count > 0 Then
GvVtaPUE.DataSource = objVentas.DtResultados
@@ -1162,4 +1178,28 @@ Partial Class Inicio
Protected Sub BtnEvaluarProveedores_Click(sender As Object, e As EventArgs)
End Sub
Protected Sub LnkGuardarUnoaUno_Click(sender As Object, e As EventArgs)
Dim fecha As String = DateTime.Now.ToString("yyyy/MM/dd")
Dim continuar As Boolean = True
Using ObjPA_O As ClsOIEventos = New ClsOIEventos()
For Each gvrow As GridViewRow In GVPA_OI_UnoAUnoTableroGet.Rows
If continuar Then
Dim CveUnoaUnoPregunta As Integer = gvrow.DataKey("CveUnoaUnoPregunta").ToEntero()
If CveUnoaUnoPregunta > 0 Then
Dim Comentarios As String = gvrow.FCTextBox("TxtComentarios").Text
continuar = ObjPA_O.UnoAUnoTableroAdd(UsuarioActual.CveEmpresa, fecha, UsuarioActual.CveUsuario, CveUnoaUnoPregunta, Comentarios)
End If
End If
Next
End Using
If continuar Then
Alert("Tus respuestas se han actualizado", ModExtensiones.TipoMensaje.ToastInformacion)
End If
RegistraScript("$('#DvUnoaUno').modal('hide')")
End Sub
End Class

View File

@@ -5,19 +5,19 @@
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style type="text/css">
.gvInventario tr td:nth-child(4) {
width: 6% !important
width: 6% !important;
}
.gvInventario tr td:nth-child(2) {
width: 1% !important
width: 1% !important;
}
.gvInventario tr th:nth-child(4) {
width: 6% !important
width: 6% !important;
}
.gvInventario tr th:nth-child(2) {
width: 1% !important
width: 1% !important;
}
.gvInventario tr td:nth-child(4) {
@@ -26,7 +26,7 @@
}
.gvInventario tr th:nth-child(4) {
width: 18% !important
width: 18% !important;
}
.gvEscondeColumna tr td:nth-child(3) {
@@ -38,7 +38,7 @@
}
.btn.default:hover {
background-color: lightgray
background-color: lightgray;
}
</style>
</asp:Content>
@@ -48,7 +48,7 @@
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<li>
<li>
<a target="_blank" class="ayuda" href="../Documentacion/DocumentacionInventarios.aspx#EntregaAlmacen">&nbsp;</a>
</li>
</asp:Content>
@@ -64,10 +64,12 @@
<div class="titlefiltros caption ">
<ul class="list-inline">
<li>Cliente:
<ADS:Dropdownlost ID="DdlClientes" CssClassDdl="select2me" runat="server" CssStyle="width: 350px;" DataTextField="NombreComercial" Onselectedindexchange="DdlCliente_SelectedIndexChanged" DataValueField="CveCliente"></ADS:Dropdownlost>
<%--<asp:DropDownList ID="DdlClientes" runat="server" DataValueField="CveCliente" DataTextField="Nombre" OnSelectedIndexChanged="DdlCliente_SelectedIndexChanged" AutoPostBack="true" CssClass="form-control input-sm select2me" Width="350px"></asp:DropDownList>--%>
</li>
<li>Serie-Folio:
<asp:DropDownList ID="DdlFolio" runat="server" DataValueField="CveVenta" DataTextField="SerieFolio" CssClass="form-control input-sm select2me" Width="250px"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVFolio" runat="server" ControlToValidate="DdlFolio" InitialValue="-1" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Folio''</b> es necesario, por favor ingréselo." ValidationGroup="GrpBuscar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEFolio" runat="server" HighlightCssClass="vco" TargetControlID="RFVFolio" Width="300px"></ajax:ValidatorCalloutExtender>
@@ -117,7 +119,7 @@
</div>
</div>
<div class="portlet-body">
<table style="width:100%">
<table style="width: 100%">
<tr>
<td style="width: 150px;">Cliente:</td>
<td>
@@ -127,7 +129,7 @@
<tr>
<td>Folio:</td>
<td>
<asp:HyperLink ID="HLFolio" Target="_blank" runat="server" />
<asp:HyperLink ID="HLFolio" Target="_blank" runat="server" />
<%--<asp:Label Text="" ID="LbFolio" runat="server" />--%>
</td>
</tr>
@@ -172,7 +174,7 @@
</div>
</div>
<div class="portlet-body">
<table style="width:100%">
<table style="width: 100%">
<tr>
<td>Almacén:</td>
<td>
@@ -191,7 +193,7 @@
<asp:LinkButton ID="ImgFecha" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
</span>
<ajax:MaskedEditExtender ID="MEEFecha" runat="server" TargetControlID="TxtFecha" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CEFecha" TargetControlID="TxtFecha" PopupButtonID="ImgFecha" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<ajax:CalendarExtender runat="server" ID="CEFecha" TargetControlID="TxtFecha" PopupButtonID="ImgFecha" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RangeValidator ID="RVFecha" runat="server" ControlToValidate="TxtFecha" Display="None" ErrorMessage="No puede registrar una fecha anterior a este dia." Type="Date" ValidationGroup="GrpGuardar" />
<asp:RequiredFieldValidator ID="RFVFecha" runat="server" ControlToValidate="TxtFecha" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVFecha" runat="server" ControlToValidate="TxtFecha" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
@@ -214,13 +216,13 @@
<asp:TextBox ID="TxtObservaciones" TextMode="MultiLine" Rows="2" CssClass="form-control input-sm" runat="server" MaxLength="200"></asp:TextBox>
</td>
</tr>
<tr id="DivTransitorio1" runat="server" visible="false">
<td>Transitorio:</td>
<td>
<tr id="DivTransitorio1" runat="server" visible="false">
<td>Transitorio:</td>
<td>
<asp:CheckBox ID="ChkTransitorio" AutoPostBack="true" OnCheckedChanged="ChkTransitorio_CheckedChanged" CssClass="md-checksd" runat="server" />
</td>
</td>
</tr>
<tr id="DivTransitorio2" runat="server" visible="false">
<tr id="DivTransitorio2" runat="server" visible="false">
<td colspan="2" class="row">
<label class="col-md-3">Responsable:</label>
<div class="col-md-3">
@@ -229,12 +231,21 @@
<label class="col-md-3">Almacen Transitorio:</label>
<div class="col-md-3">
<asp:DropDownList ID="DdlAlmacenTransitorio" runat="server" DataTextField="Almacen" DataValueField="CveAlmacen" CssClass="form-control input-sm select2me" Style="width: 150px !important;"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVAlmacenTransitorio" runat="server" ControlToValidate="DdlAlmacenTransitorio" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Almacén Transitorio''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<asp:RequiredFieldValidator ID="RFVAlmacenTransitorio" runat="server" ControlToValidate="DdlAlmacenTransitorio" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Almacén Transitorio''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCEAlmacenTransitorio" runat="server" HighlightCssClass="vco" TargetControlID="RFVAlmacenTransitorio" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
</td>
</tr>
<tr>
<td colspan="2">
<div style="display:flex">
<asp:RadioButton id="RbSinEntrega" runat="server" OnCheckedChanged="EntregaRadioGroup_Click" Width="33%" GroupName="EntregaRadioGroup" Text="Sin Entrega" AutoPostBack="true"></asp:RadioButton>
<asp:RadioButton id="RbEntregaInterna" runat="server" OnCheckedChanged="EntregaRadioGroup_Click" Width="33%" GroupName="EntregaRadioGroup" Text="Entrega Interna" AutoPostBack="true"></asp:RadioButton>
<asp:RadioButton id="RbEntregaExterna" runat="server" OnCheckedChanged="EntregaRadioGroup_Click" Width="33%" GroupName="EntregaRadioGroup" Text="Entrega Externa" AutoPostBack="true"></asp:RadioButton>
</div>
</td>
</tr>
</table>
</div>
</div>
@@ -269,6 +280,7 @@
<asp:Literal Text="" runat="server" ID="LtActualizado" />
</code>
&nbsp;
<b>Sucursal:</b>
<asp:DropDownList ID="DdlSubProyectos" runat="server" CssClass="form-control input-sm select2me" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="90px"></asp:DropDownList>
@@ -298,7 +310,7 @@
<asp:TemplateField HeaderText="Serie-Folio" ItemStyle-Width="20%">
<ItemTemplate>
<asp:Label runat="server" ID="LblFolio" Text='<%# Eval("SerieFolio")%>' />
<asp:Label runat="server" ID="LblFolio" Text='<%# Eval("SerieFolio")%>' />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
@@ -329,7 +341,7 @@
<asp:Literal Text="" runat="server" ID="LtTipoCambioAdvertencia"></asp:Literal>
</div>
</div>
</div>
</div>
<%--ADVERTENCIA--%>
<div class="col-md-12" style="vertical-align: middle;" align="center">
<div style="z-index: 5; position: relative;">
@@ -341,20 +353,20 @@
</div>
</div>
<div class="col-md-6">
<asp:GridView ID="GvDocs" DataKeyNames="CveDocumentacion,Documentacion,Orden,CveDocumentacionElectronica,Adjunto,Estatus" runat="server" AutoGenerateColumns="False" ShowHeader="true" HeaderStyle-CssClass="Titulos" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" data-height="100" data-freezerows="1" GridLines="None">
<Columns>
<asp:BoundField HeaderText="Documento" DataField="Documentacion" />
<asp:BoundField HeaderText="Original" DataField="Observacion" />
<asp:BoundField HeaderText="Copia" DataField="Observacion2" />
<asp:TemplateField HeaderText="" ItemStyle-Width="20%">
<ItemTemplate>
<asp:Literal ID="HplDown" runat="server" Visible="false" > </asp:Literal>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
<asp:GridView ID="GvDocs" DataKeyNames="CveDocumentacion,Documentacion,Orden,CveDocumentacionElectronica,Adjunto,Estatus" runat="server" AutoGenerateColumns="False" ShowHeader="true" HeaderStyle-CssClass="Titulos" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" data-height="100" data-freezerows="1" GridLines="None">
<Columns>
<asp:BoundField HeaderText="Documento" DataField="Documentacion" />
<asp:BoundField HeaderText="Original" DataField="Observacion" />
<asp:BoundField HeaderText="Copia" DataField="Observacion2" />
<asp:TemplateField HeaderText="" ItemStyle-Width="20%">
<ItemTemplate>
<asp:Literal ID="HplDown" runat="server" Visible="false"> </asp:Literal>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</div>
</div>
@@ -410,14 +422,14 @@
<div class="row">
<div class="col-md-12">
<div class="btn-group pull-right">
<asp:Button ID="BtnVerSugerencias" CssClass="btn green-haze btn-outline btn-circle btn-sm" OnClick="BtnVerSugerencias_Click" runat="server" Text="Ver Secciones" />
</div>
<div class="btn-group pull-right">
<asp:Button ID="BtnVerSugerencias" CssClass="btn green-haze btn-outline btn-circle btn-sm" OnClick="BtnVerSugerencias_Click" runat="server" Text="Ver Secciones" />
</div>
</div>
</div>
<%--GV DATOS--%>
<asp:GridView ID="GvDatos" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False" ShowFooter="True" ShowHeader="true" ShowHeaderWhenEmpty="True"
<asp:GridView ID="GvDatos" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False" ShowFooter="True" ShowHeader="true" ShowHeaderWhenEmpty="True"
DataKeyNames="Consec,CvePS,Codigo,CodigoBarras,AplicaSerieLote,CveUM,CantidadC,CantidadF,UM,PS,CveClasificacion,CveVentaDetalle,CveTamaño,AplicaSeccion, AplicaSerie,AplicaLote,AplicaCaducidad" HeaderStyle-CssClass="Titulos" RowStyle-Height="25px" CssClass="table table-striped table-hover Widthall ScrollAD gvInventario mysmallbtn" data-heighterror="450" data-freezerows="1" GridLines="None">
<HeaderStyle Height="58px" />
<Columns>
@@ -428,11 +440,11 @@
<ItemStyle HorizontalAlign="Center" Width="5%" />
</asp:TemplateField>
<asp:BoundField HeaderText="Cant. Venta" DataField="CantidadC" DataFormatString="{0:#,##0.######}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="7.5%" />
<asp:BoundField HeaderText="Cant. Surtida" DataField="CantidadS" DataFormatString="{0:#,##0.######}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="7.5%" />
<asp:TemplateField HeaderText="Cant. a Surtir" ItemStyle-Width="10%">
<ItemTemplate>
<asp:TextBox ID="TbCantidadF" runat="server" Width="60px" Mask="9,999.99" Text='<%# Eval("CantidadF") %>'></asp:TextBox>
<asp:TextBox ID="TbCantidadF" runat="server" Width="60px" Mask="9,999.99" Text='<%# Eval("CantidadF") %>'></asp:TextBox>
<asp:Button Text="Serie" ID="BtnSerie" OnClick="BtnSerie_Click" CssClass="btn btn-primary btn-xs" runat="server" />
</ItemTemplate>
<HeaderStyle CssClass="Titulos" />
@@ -440,8 +452,8 @@
<asp:BoundField HeaderText="Unidad" DataField="UM" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="10%" />
<asp:HyperLinkField HeaderText="Producto o Servicio" Target="_blank" DataTextField="CodigoPS" DataNavigateUrlFields="CvePS" DataNavigateUrlFormatString="/Ventas/ProductosServicios.aspx?CvePS={0}" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="35%" />
<asp:BoundField HeaderText="Observación" DataField="ObservacionesDetalle" ItemStyle-Width="7.5%" />
<asp:TemplateField HeaderText="Sección Almacén" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="10%" Visible="false">
<asp:TemplateField HeaderText="Sección Almacén" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="10%" Visible="false">
<ItemTemplate>
<asp:DropDownList ID="DdlSeccionAlmacen" DataTextField="Seccion" DataValueField="CveSeccion" CssClass="select2me" Style="width: 85% !important" runat="server" CausesValidation="true" Visible="false">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
@@ -450,7 +462,7 @@
</asp:TemplateField>
<asp:TemplateField HeaderText="Lote" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="7.5%" Visible="false">
<ItemTemplate>
<asp:TextBox ID="TxtLote" CssClass="form-control" runat="server" Visible="false"></asp:TextBox>
<asp:TextBox ID="TxtLote" CssClass="form-control" runat="server" Visible="false"></asp:TextBox>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="F.Caducidad" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="5%" Visible="false">
@@ -459,12 +471,12 @@
<asp:TextBox ID="TxtCaducidad" Text='<%# Eval("FechaCaducidad") %>' CssClass="form-control input-sm ADSMaskDate" Style="width: 78px" runat="server" Visible="false"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton runat="server" ID="LnkCaducidad" class="btn default" Visible="false"> <i class="fa fa-calendar"></i> </asp:LinkButton>
<ajax:MaskedEditExtender ID="MEECaducidad" runat="server" TargetControlID="TxtCaducidad" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CECaducidad" TargetControlID="TxtCaducidad" PopupButtonID="LnkCaducidad" Enabled="True" Format="dd/MM/yyyy"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVCaducidad" runat="server" ControlToValidate="TxtCaducidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Caducidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCECaducidad" runat="server" HighlightCssClass="vco" TargetControlID="RFVCaducidad"></ajax:ValidatorCalloutExtender>
</span>
<ajax:MaskedEditExtender ID="MEECaducidad" runat="server" TargetControlID="TxtCaducidad" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CECaducidad" TargetControlID="TxtCaducidad" PopupButtonID="LnkCaducidad" Enabled="True" Format="dd/MM/yyyy"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVCaducidad" runat="server" ControlToValidate="TxtCaducidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Caducidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VCECaducidad" runat="server" HighlightCssClass="vco" TargetControlID="RFVCaducidad"></ajax:ValidatorCalloutExtender>
</span>
</div>
</ItemTemplate>
</asp:TemplateField>
@@ -655,7 +667,7 @@
<asp:GridView ID="GvLote" DataKeyNames="Lote" runat="server" EmptyDataText="Aun no hay registros." AutoGenerateColumns="False" ShowHeader="true" ShowHeaderWhenEmpty="True" HeaderStyle-CssClass="Titulos" RowStyle-Height="25px" CssClass="table table-striped table-hover Widthall ScrollAD" data-height="100" data-freezerows="1" GridLines="None">
<Columns>
<asp:BoundField HeaderText="Cantidad" DataField="Cantidad" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="20%" />
<asp:BoundField HeaderText="Folio" DataField="Lote" ItemStyle-Width="20%" />
<asp:BoundField HeaderText="Folio" DataField="Lote" ItemStyle-Width="20%" />
<asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" ItemStyle-Width="20%" />
<asp:TemplateField HeaderText="Eliminar" ItemStyle-HorizontalAlign="Center">
<ItemTemplate>
@@ -699,6 +711,7 @@
<div class="row">
<div class="col-md-5" style="text-align: right;">
Cantidad
</div>
<div class="col-md-7">
<asp:TextBox ClientIDMode="Static" ID="TxtCantidadEspecial" Text="" runat="server"></asp:TextBox>
@@ -740,6 +753,7 @@
<td colspan="2" style="text-align: center;">
<asp:Panel runat="server" DefaultButton="BtnGuardarCantidadEspecialDiv">
Cant.:
<asp:TextBox ClientIDMode="Static" ID="TxtCantidadEspecialDiv" Text="1" onfocus="this.select();" Width="50px" runat="server"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="SoloNumeros" runat="server" TargetControlID="TxtCantidadEspecialDiv" FilterType="Custom, Numbers" ValidChars="." />
<br />
@@ -760,7 +774,7 @@
<asp:Button runat="server" ID="BtnNumeroGuia" ClientIDMode="static" />
</ContentTemplate>
</asp:UpdatePanel>
<div id="ModalVerSugerencias" class="modal ADS fade" role="dialog">
<asp:UpdatePanel ID="UpVerSugerencias" class="modal-dialog rowpadding" tabindex="-1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
@@ -770,10 +784,13 @@
<h4 class="modal-title">Sugerencias</h4>
</div>
<div class="modal-body">
<div class="row" style="text-align: right; height: 50px; width: 98%">
<asp:Button ID="BtnImprimirSugerencias" CssClass="btn green-haze btn-outline btn-circle btn-sm" OnClick="BtnImprimirSugerencias_Click" runat="server" Text="Imprimir" AutoPostBack="true" />
</div>
<asp:GridView ID="GvSugerencias" runat="server" EmptyDataText="No se encontraron registros." AutoGenerateColumns="False" ShowHeader="true" ShowHeaderWhenEmpty="True" CssClass="table table-striped table-hover Widthall ScrollAD" GridLines="None">
<Columns>
<asp:BoundField HeaderText="Cantidad" DataField="Cantidad" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Producto/Servicio" DataField="CodigoPS" ItemStyle-HorizontalAlign="Left"/>
<asp:BoundField HeaderText="Cantidad" DataField="Cantidad" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Producto/Servicio" DataField="CodigoPS" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="Sección Almacen" DataField="Seccion" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-HorizontalAlign="Left" />
<asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" />
@@ -782,11 +799,14 @@
</asp:GridView>
</div>
<div class="modal-footer">
<asp:Button ID="BtnAplicarSugerencias" OnClick="BtnAplicarSugerencias_Click" runat="server" ClientIDMode="Static" Text="Aplicar" CssClass="btn btn-primary" />
<asp:Button ID="BtnAplicarSugerencias" OnClick="BtnAplicarSugerencias_Click" runat="server" ClientIDMode="Static" Text="Aplicar" CssClass="btn btn-primary" />
<button id="CancelarVerSugerencias" type="button" class="btn btn-default" data-dismiss="modal">Cerrar</button>
</div>
</div>
</ContentTemplate>
<Triggers>
<asp:PostBackTrigger ControlID="BtnImprimirSugerencias" />
</Triggers>
</asp:UpdatePanel>
</div>
@@ -818,7 +838,7 @@
$('#TxtCodigoPS').focus()
}
function playsonidito(NomArchivo) {
var URL = /Sonidos/ + NomArchivo
@@ -827,7 +847,7 @@
snd.currentTime = 0;
}
function CantidadEspecial() {
MuestraCantidadEspecial();
//$('#ModalCantidad').modal('show');

View File

@@ -7,6 +7,8 @@ Imports System.Linq
Imports CrystalDecisions.[Shared].Json
Imports Extensiones
Imports Microsoft.Reporting.WebForms
Partial Class Inventarios_EntregaAlmacen
Inherits ClsPaginas
@@ -3064,8 +3066,37 @@ Partial Class Inventarios_EntregaAlmacen
End If
End Sub
Protected Sub BtnImprimirSugerencias_Click(sender As Object, e As EventArgs)
Dim LogoRutaFisica As String = String.Format("Empresas\{0}\Logo.png", UsuarioActual.CveEmpresa)
Dim logouri = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(LogoRutaFisica))
Dim Imagen As New System.IO.FileInfo(String.Format("{0}Logo.png", UsuarioActual.Empresa.Ruta))
Dim params As New List(Of ReportParameter)
If Imagen.Exists Then
params.Add(New ReportParameter("LogoPath", logouri))
Else
params.Add(New ReportParameter("LogoPath", ""))
End If
params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Usuario))
ImprimirPDF("Empresas/Grales/Formatos/RepEntregaAlmacenSugerencia.rdlc", DtDatosSugerencias, params, "Equipo GPS")
End Sub
#End Region
#Region "TipoEntrega"
Protected Sub EntregaRadioGroup_Click(sender As Object, e As EventArgs)
If RbEntregaExterna.Checked Then
RegistraScript("AbrirVentana('/General/PopUpPaqueteriasGuias.aspx',800,547,'N')")
ElseIf RbEntregaInterna.Checked Then
RegistraScript($"AbrirVentana('/General/PopUpPaqueteriasGuiasInternas.aspx?CveVenta={CveVentaSurtir}&CveSubProyecto={CveSubProyecto}',800,547,'N')")
'CveVentaSurtir
End If
End Sub
#End Region
End Class

View File

@@ -0,0 +1,102 @@
<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="EntregasPorRealizar.aspx.cs" Inherits="Inventarios_EntregasPorRealizar" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
<style>
.MultiLineTextBox {
resize: none;
}
</style>
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.posicionvalidation {
left: 530px !important;
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
<%--Paqueterías Guías--%>Entrega Interna
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UpFiltro" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="portlet solid grey-cascade portlet-filter" id="idnecesaria">
<div class="portlet-title portlet-filterT smalltitle">
<div class="tools">
<asp:Button ID="BtnAsignar" OnClick="BtnAsignar_Click" runat="server" Text="Asignar" class="btn btn-primary" ValidationGroup="Valida" />
<a href="javascript:;" class="expand"></a>
</div>
<div class="titlefiltros caption">
<div class="row">
<div class="col-sm-2">PERSONAL QUE ENTREGA: </div>
<div class="col-sm-4">
<asp:DropDownList ID="DdlUsuario" DataTextField="Nombre" DataValueField="CveUsuario" runat="server" CssClass="form-control input-sm select2me" />
</div>
</div>
</div>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:Panel runat="server" ID="portletTarea" 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">ASIGNACIÓN DE ENTREGAS</span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body rowpadding">
<asp:GridView ID="GvPaqueteriasGuias" runat="server" AutoGenerateColumns="False"
DataKeyNames="CvePaqueteriaGuia,Folio,FechaIng,Nombre,Contacto"
EmptyDataText="No se encontraron registros" ToolTip="Listado de Temas"
CssClass="table table-striped table-advance table-hover Widthall ScrollAD"
data-sort="true"
data-freezerows="1"
GridLines="None">
<Columns>
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="3%" HeaderStyle-Width="3%">
<ItemTemplate>
&nbsp;<asp:CheckBox ID="ChkAsigna" runat="server" Checked="false" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Folio" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="10%" HeaderStyle-Width="10%">
<ItemTemplate>
&nbsp;<asp:Literal ID="LblFolio" runat="server" Text='<%# Eval("Folio") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Fecha" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="10%" HeaderStyle-Width="10%">
<ItemTemplate>
&nbsp;<asp:Literal ID="LblFechaIng" runat="server" Text='<%# Eval("FechaIng", "{0:dd/MM/yyyy}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Cliente" HeaderStyle-HorizontalAlign="Left">
<ItemTemplate>
&nbsp;<asp:Literal ID="LblNombre" runat="server" Text='<%# Eval("Nombre") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Contacto" HeaderStyle-HorizontalAlign="Left">
<ItemTemplate>
&nbsp;<asp:Literal ID="LblContacto" runat="server" Text='<%# Eval("Contacto") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</asp:Panel>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
</asp:Content>

View File

@@ -0,0 +1,79 @@
using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Data;
using Extensiones;
public partial class Inventarios_EntregasPorRealizar : ClsPaginas
{
protected void Page_Load(object sender, EventArgs e)
{
if (!IsPostBack)
{
CargarEntregas();
CargarPersonal();
}
}
protected void BtnAsignar_Click(object sender,EventArgs e)
{
if (DdlUsuario.SelectedValue.ToEntero() > 0)
{
bool TieneError = false;
ClsGenerales ObjGeneral = new ClsGenerales();
ObjGeneral.IniciaTransacSQL();
GridViewRowCollection Grid = GvPaqueteriasGuias.Rows;
foreach (GridViewRow row in Grid)
{
if (row.FCCheckBox("ChkAsigna").Checked)
{
int CvePaqueteriasGuias = row.DataKey("CvePaqueteriaGuia").ToEntero();
int CvePersonal = DdlUsuario.SelectedValue.ToEntero();
if(!ObjGeneral.AsignarEntregasPorRealizar(CvePaqueteriasGuias, CvePersonal)){
TieneError = true;
}
}
}
if (!TieneError)
{
ObjGeneral.Commit();
Alert("Entregas asignadas correctamente");
CargarEntregas();
UpDatos.Update();
}
else
{
ObjGeneral.RollBack();
}
ObjGeneral.Dispose();
}
else
{
Alert("Seleccione a alguien del personal",ModExtensiones.TipoMensaje.MsgAdvertencia);
}
}
private void CargarEntregas()
{
ClsGenerales ObjGeneral = new ClsGenerales();
if (ObjGeneral.GetEntregasPorRealizar(UsuarioActual.CveEmpresa))
{
GvPaqueteriasGuias.DataSource = ObjGeneral.DtResultados;
GvPaqueteriasGuias.DataBind();
}
ObjGeneral.Dispose();
}
private void CargarPersonal()
{
DdlUsuario.DataSource = get_GlobalDTUsuarios(CveEmpresa: UsuarioActual.CveEmpresa);
DdlUsuario.DataBind();
DdlUsuario.Items.Insert(0, new ListItem("Seleccione", "-1"));
}
}

View File

@@ -1419,13 +1419,22 @@ Partial Class Inventarios_TraspasoAlmacen
CargaRecepcion()
End Sub
Private Sub CargaRecepcion()
Dim ObjInventarios As New ClsInventarios
Dim Dtt As DataTable = Nothing
FolioBusqueda = If(TxtFolioRecepcion.Text = "", -1, TxtFolioRecepcion.Text.ToEntero)
Dim ObjInventarios As New ClsInventarios
If ObjInventarios.GetMovimientosTransitorios(DdlAlmacenRecepcion.SelectedValue.ToEntero, -1, DdlAlmacenTransitorioRecepcion.SelectedValue.ToEntero, -1, FolioBusqueda, UsuarioActual.CveEmpresa) Then
Dtt = ObjInventarios.DtResultados.FiltraParametros(String.Format("CveTipoAlmacenDestino <> 4"))
Else
Alert("Ocurrió un error al consultar los movimientos transitorios. Por favor vuelva a intentar.", TipoMensaje.MsgAdvertencia)
Dtt = Nothing
End If
ObjInventarios.Dispose()
If Dtt IsNot Nothing Then
If TxtFolioRecepcion.Text.Trim <> "" Then
CveMovimientoSalida = ObjInventarios.DtResultados.FiltroPrimeroValor("CveMovimiento", "").ToEntero
@@ -1433,14 +1442,7 @@ Partial Class Inventarios_TraspasoAlmacen
CveAlmacenDestino = DdlAlmacenRecepcion.SelectedValue.ToEntero
CveAlmacenTransitorio = DdlAlmacenTransitorioRecepcion.SelectedValue.ToEntero
'CveUsuarioResponsable = DdlResponsableRecepcion.SelectedValue.ToEntero
Else
Alert("Ocurrió un error al consultar los movimientos transitorios. Por favor vuelva a intentar.", TipoMensaje.MsgAdvertencia)
Dtt = Nothing
End If
ObjInventarios.Dispose()
If Dtt IsNot Nothing Then
GvDatosRecepcion.DataSource = Dtt
GvDatosRecepcion.DataBind()

File diff suppressed because it is too large Load Diff

View File

@@ -95,7 +95,12 @@ Partial Class RepOC
Protected Sub CargaUsuarios()
ddlUsuario.DataSource = GlobalDTUsuarios(-1, UsuarioActual.CveEmpresa)
ddlUsuario.DataBind()
ddlUsuario.Items.Insert(0, New ListItem("Todos", "-1"))
ddlUsuario.Items.Insert(0, New ListItem("Todos", "-1"))
DdlUsuarioAutorizo.DataSource = GlobalDTUsuarios(-1, UsuarioActual.CveEmpresa)
DdlUsuarioAutorizo.DataBind()
DdlUsuarioAutorizo.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub
Protected Sub CargaProveedores()
ddlProveedor.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
@@ -313,7 +318,7 @@ Partial Class RepOC
If OC.GetOrdenesCompraRep(DdlTipo.SelectedValue.ToString, DdlProyectos.SelectedValue.ToEntero, DdlSubProyectos.SelectedValue.ToEntero, DDlClasificacion.SelectedValue.ToEntero,
DdlEstatus.SelectedValue.ToEntero, FI, FF, -1, ddlProveedor.SelectedValue.ToEntero, If(txtFolio.Text.ToEntero = 0, -1, txtFolio.Text.ToEntero), ddlUsuario.SelectedValue.ToEntero,
If(CheckNoCompleta.Checked, -1, UsuarioActual.CveUsuario), UsuarioActual.Empresa.CveEmpresa, If(DDlPS.SelectedValue = "", -1, DDlPS.SelectedValue.ToEntero), If(CheckNoCompleta.Checked, True, False), ddlcliente.SelectedValue.ToEntero, CveActivoFijo:=DdlActivoFijo.SelectedValue.ToEntero,
SoloSubProyectosConPermiso:=If(UsuarioActual.Empresa.Funcionalidad(530) = "1", True, False)) Then
SoloSubProyectosConPermiso:=If(UsuarioActual.Empresa.Funcionalidad(530) = "1", True, False), CveUsuarioAutorizo:=DdlUsuarioAutorizo.SelectedValue.ToEntero()) Then
GvConsultar.DataSource = OC.DtResultados
DtOC = OC.DtResultados

View File

@@ -127,13 +127,22 @@
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
Convocatoria
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<li><asp:LinkButton ID="LnkUpUsuarios" OnClick="LnkUpUsuarios_Click" Visible="true" runat="server"><i class="fa fa-pencil"></i> Actualizar Participantes</asp:LinkButton></li>
<ContentTemplate>
<li>
<asp:LinkButton ID="LnkUpUsuarios" OnClick="LnkUpUsuarios_Click" Visible="true" runat="server"><i class="fa fa-pencil"></i> Actualizar Participantes</asp:LinkButton>
</li>
<li>
<asp:LinkButton ID="LnkOpenModalAsistencia" OnClick="LnkOpenModalAsistencia_Click" Visible="false" runat="server"><i class="fa fa-users"></i>Asistencia</asp:LinkButton>
</li>
<li>
<asp:LinkButton ID="LnkEnviarCorreo" OnClick="LnkEnviarCorreo_Click" Visible="false" runat="server"><i class="fa fa-paper-plane-o"></i>Enviar correo</asp:LinkButton>
</li>
</ContentTemplate>
</asp:UpdatePanel>
@@ -141,10 +150,10 @@
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UpContenido" runat="server">
<asp:UpdatePanel ID="UpContenido" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="row">
<div class="col-md-5">
<div class="col-md-7">
<asp:Panel runat="server" ID="portletMinuta" class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption font-green">
@@ -159,7 +168,7 @@
<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="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Asunto:" AssociatedControlID="TxtAsunto"></asp:Label>
<asp:Label runat="server" Text="Asunto / Tema:" AssociatedControlID="TxtAsunto"></asp:Label>
</div>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtDescripcion" runat="server" CssClass="form-control TxtDescripcion" CausesValidation="true" TextMode="MultiLine" Rows="2"></asp:TextBox>
@@ -189,6 +198,12 @@
</div>
</div>
</asp:Panel>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtDuracion" runat="server" CssClass="form-control " CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVTxtDuracion" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtDuracion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Asunto''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Duración:" AssociatedControlID="TxtDuracion"></asp:Label>
</div>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtCorreoExterno" runat="server" CssClass="form-control TxtCorreoExterno" CausesValidation="true" TextMode="MultiLine" Rows="2"></asp:TextBox>
<%--<asp:RequiredFieldValidator ID="RfvCorreoExterno" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtCorreoExterno" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Correo Externo''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>--%>
@@ -214,13 +229,13 @@
</div>
</div>
</div>
<div class="row">
<div class="row" style="display: none;">
<div class="col-sm-6" style="display: none;">
<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="Baja" Value="1" class="itembaja"></asp:ListItem>
<asp:ListItem Text="Media" Value="2" class="itemmedia"></asp:ListItem>
<asp:ListItem Text="Alta" Value="3" class="itemalta"></asp:ListItem>
<asp:ListItem Selected="True" Text="Baja" Value="1"></asp:ListItem>
<asp:ListItem Text="Media" Value="2"></asp:ListItem>
<asp:ListItem Text="Alta" Value="3"></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="GrpTarea"></asp:RequiredFieldValidator>
<asp:Label runat="server" AssociatedControlID="DdlPrioridad">Prioridad:</asp:Label>
@@ -243,28 +258,7 @@
</div>
</asp:Panel>
</div>
<div class="col-md-4">
<asp:Panel runat="server" ID="portletChekList" Visible="true" 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">Orden deldía <span id="Contador"></span></span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
</div>
<div class="portlet-body rowpadding" style="padding-top: 0px;">
<asp:TextBox ID="TxtOrdendeldia" runat="server" CssClass="form-control ADSckeditor " CausesValidation="true" TextMode="MultiLine" Rows="2"></asp:TextBox>
</div>
</asp:Panel>
</div>
<asp:Panel runat="server" ID="portletMiembros" class="col-md-3">
<asp:Panel runat="server" ID="portletMiembros" class="col-md-5">
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
@@ -327,6 +321,24 @@
</asp:Panel>
</div>
<asp:Panel runat="server" ID="portletChekList" Visible="true" 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">ORDEN DEL DÍA <span id="Contador"></span></span>
</div>
<div class="tools">
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
</div>
<div class="portlet-body rowpadding" style="padding-top: 0px;">
<asp:TextBox ID="TxtOrdendeldia" runat="server" CssClass="form-control ADSckeditor " CausesValidation="true" TextMode="MultiLine" Rows="2"></asp:TextBox>
</div>
</asp:Panel>
<div class="text-center">
<asp:LinkButton ID="LnkIniciar" OnClick="LnkIniciar_Click" Visible="false" CssClass="btn btn-primary" ValidationGroup="GrpTarea" runat="server">Iniciar</asp:LinkButton>
<asp:HyperLink ID="HypIrMinuta" Visible="false" CssClass="btn btn-primary" runat="server">Ir Minuta</asp:HyperLink>
@@ -425,7 +437,7 @@
</asp:GridView>
</div>
<div class="modal-footer">
<asp:LinkButton ID="BtnReasignarTarea" OnClick="BtnReasignarTarea_Click" CssClass="btn btn-primary" runat="server">Guardar</asp:LinkButton>
<%--<asp:LinkButton ID="BtnReasignarTarea" OnClick="BtnReasignarTarea_Click" CssClass="btn btn-primary" runat="server">Guardar</asp:LinkButton>--%>
<asp:LinkButton ID="BtnUpMiembros" OnClick="BtnUpMiembros_Click" CssClass="btn btn-primary" runat="server">Guardar</asp:LinkButton>
<button data-dismiss="modal" class="btn btn-danger">Cancelar</button>
</div>
@@ -433,7 +445,62 @@
</asp:UpdatePanel>
</div>
</div>
<div id='<%= iddivTomarAsistencia %>' class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<asp:UpdatePanel ID="UpTomarASistencia" 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="Literal1" runat="server">Actualizar miembros</asp:Literal></h4>
</div>
<div class="modal-body">
<div class="text-right" style="">
<asp:TextBox ID="TxtTomarAsistencia" runat="server" CssClass="form-control input-sm" Style="display: inline-block; margin-right: -20px; width: 150px;" CausesValidation="true"></asp:TextBox>
<a href="javascript:;" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<asp:GridView ID="GvTomarAsistencia" runat="server" AutoGenerateColumns="false" DataKeyNames="CveUsuario,Nombre,CveRol" data-txtBuscador='<%# string.Format("#{0}",TxtTomarAsistencia.ClientID) %>'
CssClass="table table-striped table-advance table-hover Widthall ScrollAD ConBuscador" GridLines="None" data-height="200"
OnRowDataBound="GvTomarAsistencia_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemStyle HorizontalAlign="Center" Width="50px" />
<HeaderTemplate>
Asistió
</HeaderTemplate>
<ItemTemplate>
<asp:CheckBox ID="ChkAsistio" CssClass="ChkOk" Checked='<%# Eval("Asistencia").ToString()=="1" %>' runat="server" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Usuario</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlNombre" runat="server" Text='<%# Eval("Nombre") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Rol</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlRol" runat="server" Text='<%# Eval("Rol") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtAsistentesExternos" runat="server" CssClass="form-control" CausesValidation="true" TextMode="MultiLine" Rows="2"></asp:TextBox>
<asp:Label runat="server" Text="Externos" AssociatedControlID="TxtAsistentesExternos"></asp:Label>
</div>
</div>
<div class="modal-footer">
<asp:LinkButton ID="LnkUpAsistencia" OnClick="LnkUpAsistencia_Click" CssClass="btn btn-primary" runat="server">Guardar</asp:LinkButton>
<button data-dismiss="modal" class="btn btn-danger">Cancelar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
<script src="/Metronic/assets/global/plugins/ckeditor/ckeditor.js" type="text/javascript"></script>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
@@ -465,10 +532,10 @@
}
function showhideUser2() {
let strusuario = usuariotext.length > 0 ? ' td:nth-child(3):contains("' + usuariotext + '")' : '';// td:nth-child(2)
let strusuario = usuariotext.length > 0 ? ':contains("' + usuariotext + '")' : '';// td:nth-child(2)
$('.GVUsuarios tr.items').attr('hide', '1')//oculto todos
$('.GVUsuarios tr.items' + strusuario).closest('tr').attr('hide', '');//muestro los que tienen filtro con usuario
$('.GVUsuarios tr.items' + strusuario).attr('hide', '');//muestro los que tienen filtro con usuario
}
function TxtUsuario_Onchange() {
@@ -489,11 +556,11 @@
function showhideUser() {
let strCveRol = CveRol > 0 ? '[data-rol="' + CveRol + '"]' : '';
let strCveSucursal = CveSucursal > 0 ? '[data-sucursal="' + CveSucursal + '"]' : '';
let strusuario = usuariotext.length > 0 ? ' td:nth-child(3):contains("' + usuariotext + '")' : '';// td:nth-child(2)
let strusuario = usuariotext.length > 0 ? ':contains("' + usuariotext + '")' : '';// td:nth-child(2)
$('.GVUsuarios tr.items').attr('hide', '1')//oculto todos
if (strusuario.length > 0) {
$('.GVUsuarios tr.items' + strCveRol + strCveSucursal + strusuario).closest('tr').attr('hide', '');//muestro los que tienen filtro con usuario,sucursal y rol
$('.GVUsuarios tr.items' + strCveRol + strCveSucursal + strusuario).attr('hide', '');//muestro los que tienen filtro con usuario,sucursal y rol
} else {
$('.GVUsuarios tr.items' + strCveRol + strCveSucursal).attr('hide', '');//muestro los que tienen filtro con sucursal y rol

View File

@@ -11,8 +11,10 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
{
#region Propiedades
public const string iddivAgregarTema = "divModalAgregartema";
public const string iddivAgregarTema = "divModalAgregartema";
public const string iddivTomarAsistencia = "iddivTomarAsistencia";
public const string iddivAgregarMiembros = "iddivAgregarMiembros";
public int CveEventoMinuta { get { return ViewState["CveEventoMinuta"] != null ? ViewState["CveEventoMinuta"].ToString().ToEntero() : 0; } set { ViewState["CveEventoMinuta"] = value; } }
public int RCveEvento { get { return ViewState["RCveEvento"] != null ? ViewState["RCveEvento"].ToString().ToEntero() : 0; } set { ViewState["RCveEvento"] = value; } }
public int RCveEventoPadre { get { return ViewState["RCveEventoPadre"] != null ? ViewState["RCveEventoPadre"].ToString().ToEntero() : 0; } set { ViewState["RCveEventoPadre"] = value; } }
public bool EsNuevo { get { return Convert.ToBoolean(ViewState["EsNuevo"]); } set { ViewState["EsNuevo"] = value; } }
@@ -30,18 +32,19 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
cargaUsuarios();
if (Request["CveEvento"] != null)
{
RCveEvento = Request["CveEvento"].ToString().ToEntero();
{
RCveEvento = Request["CveEvento"].ToString().ToEntero();
}
if (Request["CveEventoPadre"] != null)
{
RCveEventoPadre = Request["CveEventoPadre"].ToString().ToEntero();
RCveEventoPadre = Request["CveEventoPadre"].ToString().ToEntero();
}
if (RCveEvento > 0)
{
LnkEnviarCorreo.Visible = true;
EsNuevo = false;
LnkGuardar.Visible = false;
//LnkGuardar.Visible = false;
loadConvocatoria();
}
}
@@ -79,6 +82,8 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
{
System.Data.DataRow drow = ObjOI_E.DtResultados.Rows[0];
CveEventoHijo = drow["CveEvento"].ToString().ToEntero();
CveEventoMinuta = drow["CveEvento"].ToString().ToEntero();
LnkOpenModalAsistencia.Visible = true;
}
if (ObjOI_E.GetEventos2(RCveEvento, UsuarioActual.CveEmpresa) && ObjOI_E.DtResultados.Rows.Count > 0)
{
@@ -87,6 +92,8 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
pnlmiembrosvista.Visible = true;
TxtAsunto.Text = drow["Asunto"].ToString();
TxtDescripcion.Text = drow["Descripcion"].ToString();
TxtAsistentesExternos.Text = drow["Asistencia"].ToString();
TxtDuracion.Text = drow["Duracion"].ToString();
DdlPrioridad.SelectedValueExist(drow["Prioridad"].ToString());
txtFechaI.Text = string.Format("{0:dd/MM/yyyy HH:mm}", drow["FechaInicio"]);
txtFechaF.Text = string.Format("{0:dd/MM/yyyy HH:mm}", drow["FechaFin"]);
@@ -98,7 +105,7 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
CveUsuarioDe = drow["CveUsuarioDe"].ToString().ToEntero();
int CveEventoEstatus = drow["CveEventoEstatus"].ToString().ToEntero();
bool permisoeditar = UsuarioActual.CveUsuario == CveUsuarioDe || UsuarioActual.CveUsuario == CveUsuarioIng;
LnkIniciar.Visible = permisoeditar && (CveEventoHijo <0);
LnkIniciar.Visible = permisoeditar && (CveEventoHijo <= 0);
HypIrMinuta.Visible = (CveEventoHijo > 0);
HypIrMinuta.NavigateUrl = string.Format("/OI/MinutaDetalle.aspx?CveEvento={0}", CveEventoHijo);
TxtAsunto.Enabled = permisoeditar;
@@ -196,7 +203,6 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
this.RegistraScript(string.Format("$('#{0}').modal()", iddivAgregarMiembros));
LtlTituloUsuarios.Text = "Actualizar miembros";
BtnUpMiembros.Visible = true;
BtnReasignarTarea.Visible = false;
DdlModera.SelectedValueExist(CveUsuarioDe.ToString());
foreach (GridViewRow gvRow in GVUsuarios.Rows)
{
@@ -208,8 +214,8 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
chkCCpara.Enabled = true;
if ( (CveUsuario == CveUsuarioDe))
{
if ((CveUsuario == CveUsuarioDe))
{
if (CveUsuario == CveUsuarioDe)
{
chkCCpara.Checked = true;
@@ -233,8 +239,8 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
{
if (gvRow.RowType == DataControlRowType.DataRow)
{
int CveUsuario = gvRow.DataKey("CveUsuario").ToString().ToEntero();
CheckBox chkCCpara = gvRow.FCCheckBox("ChkCCP");
int CveUsuario = gvRow.DataKey("CveUsuario").ToString().ToEntero();
CheckBox chkCCpara = gvRow.FCCheckBox("ChkCCP");
if (chkCCpara.Checked)
{
listaCCP.Add(CveUsuario);
@@ -270,84 +276,85 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
protected void LnkGuardar_Click(object sender, EventArgs e)
{
string errorMessage = "";
if (EsNuevo)
int cveUsuarioDe = DdlModerador.SelectedValue.ToEntero();
List<int> listaCCP = new List<int>();
int cveUsuarioPara = -1;
//string Nombrepara = "";
string Nombrede = "";
foreach (GridViewRow gvRow in GVUsuariosB.Rows)
{
int cveUsuarioDe = DdlModerador.SelectedValue.ToEntero();
List<int> listaCCP = new List<int>();
int cveUsuarioPara = -1;
//string Nombrepara = "";
string Nombrede = "";
foreach (GridViewRow gvRow in GVUsuariosB.Rows)
if (gvRow.RowType == DataControlRowType.DataRow)
{
if (gvRow.RowType == DataControlRowType.DataRow)
int CveUsuario = gvRow.DataKey("CveUsuario").ToString().ToEntero();
CheckBox chkCCpara = gvRow.FCCheckBox("ChkCCP");
if (CveUsuario == cveUsuarioDe)
{
int CveUsuario = gvRow.DataKey("CveUsuario").ToString().ToEntero();
CheckBox chkCCpara = gvRow.FCCheckBox("ChkCCP");
if (CveUsuario == cveUsuarioDe)
{
Nombrede = gvRow.DataKey("Nombre").ToString();
}
if (chkCCpara.Checked)
{
listaCCP.Add(CveUsuario);
//cveUsuarioDe = CveUsuario;
}
Nombrede = gvRow.DataKey("Nombre").ToString();
}
if (chkCCpara.Checked)
{
listaCCP.Add(CveUsuario);
//cveUsuarioDe = CveUsuario;
}
}
OITipoEventos cveTipoEvento = OITipoEventos.Convocatorias;
string asunto = TxtAsunto.Text;
string descripcion = TxtDescripcion.Text;
int prioridad = DdlPrioridad.SelectedValue.ToEntero();
string fechaInicio = "";
if (txtFechaI.Text.ToDateTimeExcat().Year <= 1999)
}
OITipoEventos cveTipoEvento = OITipoEventos.Convocatorias;
string asunto = TxtAsunto.Text;
string descripcion = TxtDescripcion.Text;
int prioridad = DdlPrioridad.SelectedValue.ToEntero();
string fechaInicio = "";
if (txtFechaI.Text.ToDateTimeExcat().Year <= 1999)
{
if (txtFechaI.Text.ToDateTimeExcat("dd/MM/yyyy").Year <= 1999)
{
if (txtFechaI.Text.ToDateTimeExcat("dd/MM/yyyy").Year <= 1999)
{
errorMessage = "No se ingresó una fecha de inicio valida";
errorMessage = "No se ingresó una fecha de inicio valida";
}
else
{
fechaInicio = txtFechaI.Text.ToDateTimeExcat("dd/MM/yyyy").ToString("yyyy/MM/dd HH:mm");
}
}
else
{
fechaInicio = txtFechaI.Text.ToDateTimeExcat().ToString("yyyy/MM/dd HH:mm");
fechaInicio = txtFechaI.Text.ToDateTimeExcat("dd/MM/yyyy").ToString("yyyy/MM/dd HH:mm");
}
string fechaFin = "";
if (txtFechaF.Text.ToDateTimeExcat().Year <= 1999)
}
else
{
fechaInicio = txtFechaI.Text.ToDateTimeExcat().ToString("yyyy/MM/dd HH:mm");
}
string fechaFin = "";
DateTime dfechaF;
if ((dfechaF=txtFechaF.Text.ToDateTimeExcat()).Year <= 1999)
{
if ((dfechaF = txtFechaF.Text.ToDateTimeExcat("dd/MM/yyyy")).Year <= 1999)
{
if (txtFechaF.Text.ToDateTimeExcat("dd/MM/yyyy").Year <= 1999)
{
errorMessage = "No se ingresó una fecha fin valida";
errorMessage = "No se ingresó una fecha fin valida";
}
else
{
fechaFin = string.Format("{0:yyyy/MM/dd} 23:59", txtFechaF.Text.ToDateTimeExcat("dd/MM/yyyy"));
}
}
else
{
fechaFin = txtFechaF.Text.ToDateTimeExcat().ToString("yyyy/MM/dd HH:mm");
fechaFin = string.Format("{0:yyyy/MM/dd} 23:59", dfechaF);
}
int cveRevision = DdlTema.SelectedValue.ToEntero();
string archivoname = "";
string rutaarchivoOri = "";
}
else
{
fechaFin = dfechaF.ToString("yyyy/MM/dd HH:mm");
}
int cveRevision = DdlTema.SelectedValue.ToEntero();
string archivoname = "";
string rutaarchivoOri = "";
int cveUsuarioIng = UsuarioActual.CveUsuario;
int cveEmpresa = UsuarioActual.CveEmpresa;
bool Continuar = false;
int Folio = -1;
int CveEvento = -1;
if (cveUsuarioDe <= 0)
{
errorMessage = "Asegúrese de seleccionar al menos un miembro \"C C Para\"";
}
int cveUsuarioIng = UsuarioActual.CveUsuario;
int cveEmpresa = UsuarioActual.CveEmpresa;
int Folio = -1;
int CveEvento = -1;
if (cveUsuarioDe <= 0)
{
errorMessage = "Asegúrese de seleccionar al menos un miembro \"C C Para\"";
}
if (EsNuevo)
{
bool Continuar = false;
if (errorMessage.Length == 0)
{
@@ -355,7 +362,7 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
using (ClsOIEventos objOI = new ClsOIEventos())
{
objOI.IniciaTransacSQL();
Continuar = objOI.AddOI_Eventos2(cveTipoEvento, asunto, descripcion, prioridad, cveUsuarioDe, cveUsuarioPara, fechaInicio, fechaFin, cveRevision, archivoname, listaCCP, chkList, cveUsuarioIng, cveEmpresa, CorreoExterno: TxtCorreoExterno.Text, Acuerdos: TxtOrdendeldia.Text.Replace("< ", "<"), Lugar: TxtLugar.Text,CveEventoPadre: (RCveEventoPadre>0? RCveEventoPadre:-1));
Continuar = objOI.AddOI_Eventos2(cveTipoEvento, asunto, descripcion, prioridad, cveUsuarioDe, cveUsuarioPara, fechaInicio, fechaFin, cveRevision, archivoname, listaCCP, chkList, cveUsuarioIng, cveEmpresa, CorreoExterno: TxtCorreoExterno.Text, Acuerdos: TxtOrdendeldia.Text.Replace("< ", "<"), Lugar: TxtLugar.Text, CveEventoPadre: (RCveEventoPadre > 0 ? RCveEventoPadre : -1), Duracion: TxtDuracion.Text);
CveEvento = objOI.CveEvento;
Folio = objOI.Folio;
@@ -366,7 +373,8 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
if (Continuar)
{
objOI.Commit();
ObjEventosCorreo o = objOI.objCorreo;
enviarConvocatoria(CveEvento);
//ObjEventosCorreo o = objOI.objCorreo;
//string mailbody = MailgetBodyNuevatarea(o.Folio, o.Link, o.Asunto, o.Descripcion, string.Format("{0:dd/MM/yyyy}", fechaInicio.ToDateTime()), string.Format("{0:HH:mm horas}", fechaInicio.ToDateTime()), string.Format("{0:dd/MM/yyyy}", fechaFin.ToDateTime()), string.Format("{0:HH:mm horas}", fechaFin.ToDateTime()), o.Prioridad, o.Tema, Nombrede, Nombrepara);
//EnviarCorreo(UsuarioActual.Empresa, o.AsuntoCorreo, mailbody, o.mailPara, "");
}
@@ -399,77 +407,29 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
}
else
{
bool Continuar = true;
using (ClsOIEventos objOI = new ClsOIEventos())
{
objOI.IniciaTransacSQL();
Continuar = objOI.UP_Eventos2(RCveEvento, asunto, descripcion, prioridad, fechaInicio, fechaFin, cveRevision, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa);
if (Continuar)
{
//string asunto = TxtAsunto.Text;
//string descripcion = TxtDescripcion.Text;
//int prioridad = DdlPrioridad.SelectedValue.ToEntero();
//string fechaInicio = "";
//if (txtFechaI.Text.ToDateTimeExcat().Year <= 1999)
//{
// if (txtFechaI.Text.ToDateTimeExcat("dd/MM/yyyy").Year <= 1999)
// {
// errorMessage = "No se ingresó una fecha de inicio valida";
// }
// else
// {
// fechaInicio = txtFechaI.Text.ToDateTimeExcat("dd/MM/yyyy").ToString("yyyy/MM/dd HH:mm");
// }
//}
//else
//{
// fechaInicio = txtFechaI.Text.ToDateTimeExcat().ToString("yyyy/MM/dd HH:mm");
//}
//string fechaFin = "";
//if (txtFechaF.Text.ToDateTimeExcat().Year <= 1999)
//{
// if (txtFechaF.Text.ToDateTimeExcat("dd/MM/yyyy").Year <= 1999)
// {
// errorMessage = "No se ingresó una fecha fin valida";
// }
// else
// {
// fechaFin = string.Format("{0:yyyy/MM/dd} 23:59", txtFechaF.Text.ToDateTimeExcat("dd/MM/yyyy"));
// }
//}
//else
//{
// fechaFin = txtFechaF.Text.ToDateTimeExcat().ToString("yyyy/MM/dd HH:mm");
//}
//int cveRevision = DdlTema.SelectedValue.ToEntero();
//bool Continuar = true;
//using (ClsOIEventos objOI = new ClsOIEventos())
//{
// objOI.IniciaTransacSQL();
// Continuar = objOI.UP_Eventos2(RCveEvento, asunto, descripcion, prioridad, fechaInicio, fechaFin, cveRevision, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa);
// if (Continuar)
// {
// objOI.Commit();
// string Nombrede = "";
// string Nombrepara = "";
// System.Data.DataTable dt = get_GlobalDTUsuarios(CveUsuario: CveUsuarioDe, CveEmpresa: UsuarioActual.CveEmpresa);
// if (dt.Rows.Count > 0)
// {
// Nombrede = dt.Rows[0]["Nombre"].ToString();
// }
// dt = get_GlobalDTUsuarios(CveUsuario: CveUsuarioDe, CveEmpresa: UsuarioActual.CveEmpresa);
// if (dt.Rows.Count > 0)
// {
// Nombrepara = dt.Rows[0]["Nombre"].ToString();
// }
// ObjEventosCorreo o = objOI.objCorreo;
// string mailbody = MailgetBodyNuevatarea(o.Folio, o.Link, o.Asunto, o.Descripcion, string.Format("{0:dd/MM/yyyy}", fechaInicio.ToDateTime()), string.Format("{0:HH:mm} horas", fechaInicio.ToDateTime()), string.Format("{0:dd/MM/yyyy}", fechaFin.ToDateTime()), string.Format("{0:HH:mm} horas", fechaFin.ToDateTime()), o.Prioridad, o.Tema, Nombrede, Nombrepara, "Tarea Actualizada");
// //string mailbody = MailgetBodyActualizartarea(o.Folio, o.Link, o.Asunto, o.Descripcion, o.Fechai, o.Fechaf, o.Prioridad, o.Tema);
// EnviarCorreo(UsuarioActual.Empresa, o.AsuntoCorreo, mailbody, o.mailPara, "");
// }
// else
// {
// objOI.RollBack();
// Continuar = false;
// }
//}
Continuar= objOI.UpdateEventoMinuta(asunto, descripcion, TxtOrdendeldia.Text.Replace("< ", "<"), dfechaF, "-1", RCveEvento);
}
if (Continuar)
{
objOI.Commit();
enviarConvocatoria(RCveEvento);
Alert("Convocatoria actualizada");
}
else
{
objOI.RollBack();
Continuar = false;
}
}
}
if (errorMessage.Length > 0)
@@ -533,8 +493,8 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
System.Data.DataRow drow = ObjOI_E.DtResultados.Rows[0];
ObjOI_E.IniciaTransacSQL();
Continuar = ObjOI_E.AddOI_Eventos2(OITipoEventos.Minuta, drow["Asunto"].ToString(), drow["descripcion"].ToString(), drow["Prioridad"].ToString().ToEntero(), drow["cveUsuarioDe"].ToString().ToEntero(),
drow["cveUsuarioPara"].ToString().ToEntero(), string.Format("{0:yyyy/MM/dd HH:mm}", drow["fechaInicio"]),string.Format("{0:yyyy/MM/dd HH:mm}", drow["fechaFin"]), drow["cveRevision"].ToString().ToEntero(), "",
LCveUsuarioCCP, new List<string>(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CorreoExterno: drow["CorreoExterno"].ToString(), Lugar: drow["Lugar"].ToString(),CveEventoPadre:RCveEvento);
drow["cveUsuarioPara"].ToString().ToEntero(), string.Format("{0:yyyy/MM/dd HH:mm}", drow["fechaInicio"]), string.Format("{0:yyyy/MM/dd HH:mm}", drow["fechaFin"]), drow["cveRevision"].ToString().ToEntero(), "",
LCveUsuarioCCP, new List<string>(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CorreoExterno: drow["CorreoExterno"].ToString(), Lugar: drow["Lugar"].ToString(), CveEventoPadre: RCveEvento);
CveEvento = ObjOI_E.CveEvento;
Folio = ObjOI_E.Folio;
if (CveEvento == 0)
@@ -556,13 +516,226 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
}
if (Continuar)
{
this.Alert("Se ha agregadó la nueva convocatoria", ModExtensiones.TipoMensaje.MsgInformacion, string.Format("location.replace(\"/OI/MinutaDetalle.aspx?CveEvento={0}\");", CveEvento));
CveEventoMinuta = CveEvento;
LnkOpenModalAsistencia.Visible = true;
UpAcciones.Update();
this.Alert(string.Format("Se ha iniciado la minuta<br /> para ir a la minuta <a href=\"/OI/MinutaDetalle.aspx?CveEvento={0}\">click aquí</a>", CveEvento), ModExtensiones.TipoMensaje.ToastInformacion, "", 0);
LnkOpenModalAsistencia_Click(null,null);
}
}
protected void BtnReasignarTarea_Click(object sender, EventArgs e)
protected void LnkOpenModalAsistencia_Click(object sender, EventArgs e)
{
using (ClsOIEventos ObjOI_E = new ClsOIEventos())
{
GvTomarAsistencia.DataSource = null;
if (ObjOI_E.GetEventosUsuario2(CveEventoMinuta, UsuarioActual.CveEmpresa)) { GvTomarAsistencia.DataSource = ObjOI_E.DtResultados; }
}
GvTomarAsistencia.DataBind();
UpTomarASistencia.Update();
RegistraScript(string.Format("$('#{0}').modal();", iddivTomarAsistencia));
}
protected void LnkUpAsistencia_Click(object sender, EventArgs e)
{
List<int> listaasistencia = new List<int>();
foreach (GridViewRow gvRow in GvTomarAsistencia.Rows)
{
if (gvRow.RowType == DataControlRowType.DataRow)
{
int CveUsuario = gvRow.DataKey("CveUsuario").ToString().ToEntero();
CheckBox ChkAsistio = gvRow.FCCheckBox("ChkAsistio");
if (ChkAsistio.Checked)
{
listaasistencia.Add(CveUsuario);
}
}
}
bool continuar = false;
using (ClsOIEventos ObjOI_E = new ClsOIEventos())
{
continuar = (ObjOI_E.UPMinutasAsistentes(CveEventoMinuta, UsuarioActual.CveEmpresa, TxtAsistentesExternos.Text, UsuarioActual.CveUsuario, listaasistencia));
}
if (continuar)
{
if (CveEventoMinuta > 0)
{
Alert(string.Format("se ingresó la asistencia correctamente.<br /> para ir a la minuta <a href=\"/OI/MinutaDetalle.aspx?CveEvento={0}\">click aquí</a>", CveEventoMinuta));
}
else
{
Alert("se ingresó la asistencia correctamente.");
}
RegistraScript(string.Format("$('#{0}').modal('hide');", iddivTomarAsistencia));
}
}
protected void GvTomarAsistencia_RowDataBound(object sender, GridViewRowEventArgs e)
{
if (e.Row.RowType == DataControlRowType.DataRow)
{
e.Row.CssClass = "items";
}
}
private string GetDominio(string addstr = "")
{
return string.Format("{0}/{1}", HttpContext.Current.Request.Url.ToString().Replace(HttpContext.Current.Request.Url.PathAndQuery, ""), addstr);
}
private string MailgetBodyConvocatoria(int RCveEvento)
{
int Folio = 0; string Link = ""; string Asunto = ""; string Acuerdos = ""; string Descripcion = ""; DateTime DFechai = DateTime.MinValue; DateTime DFechaf = DateTime.MinValue;
string UsuarioDe = "";
string UsuarioPara = "";
string UsuarioDeAbr = "";
System.Data.DataTable dttareas;
using (ClsOIEventos ObjOI_E = new ClsOIEventos())
{
if (ObjOI_E.GetEventos2(RCveEvento, UsuarioActual.CveEmpresa) && ObjOI_E.DtResultados.Rows.Count > 0)
{
System.Data.DataRow drow = ObjOI_E.DtResultados.Rows[0];
UsuarioDe = drow["NombreRegistro"].ToString();
Folio = drow["Folio"].ToString().ToEntero();
Link = GetDominio(string.Format("OI/ConvocatoriaDetalle.aspx?CveEvento={0}", RCveEvento));
Asunto = drow["Asunto"].ToString();
Descripcion = drow["Descripcion"].ToString();
Acuerdos = drow["Acuerdos"].ToString();
DateTime.TryParse(drow["FechaInicio"].ToString(), out DFechai);
DateTime.TryParse(drow["FechaFin"].ToString(), out DFechaf);
//OIE.[CveEvento], OIE.[CveTipoEvento], OIE.[Folio], OIE.[Asunto], OIE.[Descripcion], OIE.[Prioridad], OIE.[CveUsuarioDe], OIE.[CveUsuarioPara],
//OIE.[CveEventoEstatus], OIE.[FechaInicio], OIE.[FechaFin], OIE.[FechaRealTermino], OIE.[CveRevision], OIE.[Archivo], OIE.[FechaIng],
//OIE.[CveUsuarioIng], OIE.[CveEmpresa], OIE.[CveUsuarioModifico], OIE.[Avance] NombreRegistro
}
ObjOI_E.GetEventos2(-1, UsuarioActual.CveEmpresa, RCveEvento);
dttareas = ObjOI_E.DtResultados;
}
if (UsuarioDe != null)
{
string[] str = UsuarioDe.Split(' ');
if (str.Length > 0 && str[0].Length > 0)
{
UsuarioDeAbr = str[0].Substring(0, 1).ToUpper();
}
if (str.Length > 1 && str[1].Length > 0)
{
UsuarioDeAbr = string.Format("{0}{1}", UsuarioDeAbr, str[1].Substring(0, 1).ToUpper());
}
}
string UsuariParaAbr = "";
if (UsuarioPara != null)
{
string[] str = UsuarioPara.Split(' ');
if (str.Length > 0 && str[0].Length > 0)
{
UsuariParaAbr = str[0].Substring(0, 1).ToUpper();
}
if (str.Length > 1 && str[1].Length > 0)
{
UsuariParaAbr = string.Format("{0}{1}", UsuariParaAbr, str[1].Substring(0, 1).ToUpper());
}
}
StringBuilder StrMail = new StringBuilder();
StrMail.Append("<html><head><meta charset=\"UTF-8\"></head><body>");
StrMail.Append(" <div style=\"text-align: center;\">");
StrMail.Append(" <div style=\"display: inline-block; width: 800px; text-align: left;\">");
StrMail.Append(" <div style=\"padding: 25px 10px 5px 10px; color: #6C6C6C; font-size: 40px; font-weight: bold;\">SIG Notificaciones</div>");
StrMail.Append(" <div style=\"border: 1px solid #ED7D31;\"></div>");
StrMail.Append(" <div style=\"padding: 10px 10px; text-align: center;\">");
StrMail.Append(" <table style=\"width: 100%\">");
StrMail.Append(" <tr>");
StrMail.Append(" <td style=\"width: 60%; text-align:left;\" >");
StrMail.Append(" <span style=\"color: #6C6C6C; font-size: 17px;\">Moderador:</span>");
StrMail.Append($" <span style=\"color: #ED7D31; font-size: 22px;font-weight: bold;\">{UsuarioDeAbr}</span>");
StrMail.Append($" <span style=\"color: #6C6C6C; font-size: 17px;\">{UsuarioDe}</span><br />");
StrMail.Append(" <span style=\"color: #6C6C6C; font-size: 17px;\">Fecha:</span>");
StrMail.Append($" <span style=\"color: #6C6C6C; font-size: 17px;\">{DFechai: dd} de {DFechai: MMMM yyyy HH:mm}</span><br />");
StrMail.Append(" </td>");
StrMail.Append(" <td style=\"width: 20%;\">");
StrMail.Append(" <span style=\"color: #8877A9; font-size: 25px; font-weight: bold;\">Convocatoria </span>");
StrMail.Append(" </td>");
StrMail.Append(" <td style=\"width: 100px;\">");
StrMail.Append(" <img src=\"Bell.png\" style=\"width: 100px;height: 100px;\">");
StrMail.Append(" </td>");
StrMail.Append(" </tr>");
StrMail.Append(" </table>");
StrMail.Append(" <div style=\"text-align: left;color:#262626\">");
StrMail.Append("");
StrMail.Append(" <div style=\"background-color: #D9D9D9; padding: 5px;\">");
StrMail.Append($" <span style=\"font-size: 32px; \">{Asunto}</span>");
StrMail.Append(" </div>");
StrMail.Append(" <div style=\"background-color: #D9D9D9; padding: 5px; padding: 5px; padding-bottom: 25px;\">");
StrMail.Append(" <span style=\"font-size: 18px; font-weight: bold;\">Folio:</span>");
StrMail.Append($" <span style=\"font-size: 18px;\">{Folio}</span>");
StrMail.Append(" </div>");
StrMail.Append(" <div style=\"background-color: #D9D9D9; padding: 5px; padding-bottom: 40px;\">");
StrMail.Append($" <span style=\"font-size: 18px;\">{Descripcion}</span>");
StrMail.Append(" </div>");
StrMail.Append(" </div>");
StrMail.Append(" <br />");
StrMail.Append(" <div style=\"background-color: #D0CECE; padding: 5px;\">");
StrMail.Append(" <span style=\"font-size: 20px; color: #70AD47; font-weight: bold;\">ORDEN DEL DÍA</span>");
StrMail.Append(" </div>");
StrMail.Append(" <div style=\"text-align: left;color:#262626\">");
StrMail.Append(Acuerdos);
StrMail.Append(" </div>");
StrMail.Append(" <br />");
StrMail.Append(" <br />");
StrMail.Append(" <br />");
StrMail.Append($" <a href=\"{Link}\" style=\"padding: 10px 20px; text-align: center;\">Minuta</a>");
StrMail.Append(" <br />");
StrMail.Append(" <br />");
StrMail.Append(" <div>");
StrMail.Append(" </div>");
StrMail.Append(" </div>");
StrMail.Append(" </div>");
StrMail.Append(" </div>");
StrMail.Append("</html></body>");
return StrMail.ToString();
}
private void enviarConvocatoria(int RCveEvento)
{
string Body;
Body = MailgetBodyConvocatoria(RCveEvento);
string ArrayCC = "";
//ViewState("Para") = GlobalDTUsuarios(CveUsuarioIng)(0)("correo").ToString;
//ViewState("Asunto") = string.Format("SIG - Minuta {0}", TxtAsunto.Text);
//ViewState("Body") = Body;
//System.Threading.Thread Hilo = new System.Threading.Thread(MandaCorreo);
//Hilo.Start();
string abre = "";
using (ClsOIEventos ObjOI_E = new ClsOIEventos())
{
if (ObjOI_E.GetEventosUsuario2(RCveEvento, UsuarioActual.CveEmpresa) && ObjOI_E.DtResultados != null && ObjOI_E.DtResultados.Rows.Count > 0)
{
foreach (System.Data.DataRow item in ObjOI_E.DtResultados.Rows)
{
if (item["Correo"].ToString().Trim().Length > 0)
ArrayCC = string.Format("{0}{1}{2}", ArrayCC, abre, item["Correo"].ToString().Trim());
abre = ";";
}
}
}
List<ClsSisMail.ArchivoMail> LSRutasMail = new List<ClsSisMail.ArchivoMail>();
ClsSisMail.ArchivoMail mailfile = new ClsSisMail.ArchivoMail { Ruta = string.Format("{0}Imagenes\\Bell.png", ModExtensiones.DirectorioBaseEmpresas), NombreArchivo = "Bell.png" };
LSRutasMail.Add(mailfile);
ClsSisMail.ArchivoMail itemMail = new ClsSisMail.ArchivoMail();
ClsSisMail Mail = new ClsSisMail();
Mail.SendMail(EmpresaNotificaciones, get_GlobalDTUsuarios(UsuarioActual.CveUsuario).Rows[0]["correo"].ToString() + TxtCorreoExterno.Text, TxtAsunto.Text, Body, CCP: ArrayCC, Archivos: LSRutasMail);
}
protected void LnkEnviarCorreo_Click(object sender, EventArgs e)
{
enviarConvocatoria(RCveEvento);
Alert("Se Envió por correo la convocatoria", ModExtensiones.TipoMensaje.MsgInformacion);
}
}

View File

@@ -87,6 +87,9 @@
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<asp:UpdatePanel ID="UpAcciones" runat="server">
<ContentTemplate>
<li>
<asp:LinkButton ID="LnkOpenModalAsistencia" OnClick="LnkOpenModalAsistencia_Click" runat="server"><i class="fa fa-users"></i>Asistencia</asp:LinkButton></li>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
@@ -142,8 +145,8 @@
<%--<asp:RequiredFieldValidator ID="RfvCorreoExterno" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtCorreoExterno" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Correo Externo''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>--%>
<asp:Label runat="server" Text="Correos Externos" AssociatedControlID="TxtCorreoExterno"></asp:Label>
</div>
</div>
</asp:Panel>
</div>
</asp:Panel>
<div class="text-center">
<asp:LinkButton ID="LnkGuardar" runat="server" OnClick="LnkGuardar_Click" CssClass="btn btn-primary">Guardar</asp:LinkButton>
<asp:LinkButton ID="LnkEnviarMinuta" Visible="false" runat="server" OnClick="LnkEnviarMinuta_Click" CssClass="btn btn-primary">Enviar Minuta</asp:LinkButton>
@@ -516,7 +519,7 @@
</div>
<div class="actions">
<div class="btn-group">
<asp:LinkButton ID="LnkAgregarAgenda" OnClick="LnkAgregarAgenda_Click" CssClass="btn btn-default" runat="server">Agregar</asp:LinkButton>
<asp:LinkButton ID="LnkAgregarAgenda" OnClick="LnkAgregarAgenda_Click" ValidationGroup="GrpAgenda" CssClass="btn btn-default" runat="server">Agregar</asp:LinkButton>
</div>
</div>
</div>
@@ -525,12 +528,12 @@
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtAgendaAsunto" runat="server" CssClass="form-control" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="rfvAgendaAsunto" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtAgendaAsunto" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Asunto''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:RequiredFieldValidator ID="rfvAgendaAsunto" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtAgendaAsunto" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Asunto''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAgenda"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Asunto:" AssociatedControlID="TxtAgendaAsunto"></asp:Label>
</div>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtAgendaDescripcion" runat="server" CssClass="form-control" CausesValidation="true" TextMode="MultiLine" Rows="2"></asp:TextBox>
<asp:RequiredFieldValidator ID="rfvAgendaDescripcion" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtAgendaDescripcion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingréselo." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:RequiredFieldValidator ID="rfvAgendaDescripcion" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtAgendaDescripcion" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingréselo." ValidationGroup="GrpAgenda"></asp:RequiredFieldValidator>
<asp:Label runat="server" Text="Descripción" AssociatedControlID="TxtAgendaDescripcion"></asp:Label>
</div>
@@ -544,7 +547,7 @@
<div class="col-sm-3">
<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="txtAgendaFechaI" runat="server" autocomplete="false" CssClass="form-control ADDateTimePicker" CausesValidation="true" MaxLength="18" Width="132px "></asp:TextBox>
<asp:RequiredFieldValidator ID="rfvAgendaFechaI" runat="server" ControlToValidate="txtAgendaFechaI" 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="GrpTarea"></asp:RequiredFieldValidator>
<asp:RequiredFieldValidator ID="rfvAgendaFechaI" runat="server" ControlToValidate="txtAgendaFechaI" 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="GrpAgenda"></asp:RequiredFieldValidator>
<asp:Label AssociatedControlID="txtAgendaFechaI" 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="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco" TargetControlID="rfvAgendaFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
@@ -566,7 +569,7 @@
<div class="col-sm-3" style="display: none;">
<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="txtAgendaFechaF" runat="server" autocomplete="false" CssClass="form-control ADDateTimePicker" CausesValidation="true" MaxLength="18" Width="132px " placeholder=""></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvAgendaFechaF" runat="server" ControlToValidate="txtAgendaFechaF" 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="GrpTarea"></asp:RequiredFieldValidator>
<asp:RequiredFieldValidator ID="RfvAgendaFechaF" runat="server" ControlToValidate="txtAgendaFechaF" 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="GrpAgenda"></asp:RequiredFieldValidator>
<asp:Label AssociatedControlID="txtAgendaFechaF" 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="ValidatorCalloutExtender2" runat="server" HighlightCssClass="vco" TargetControlID="RfvAgendaFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
@@ -580,7 +583,7 @@
<asp:ListItem Text="Media" Value="2" class="itemmedia"></asp:ListItem>
<asp:ListItem Text="Alta" Value="3" class="itemalta"></asp:ListItem>
</asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvAgendaPrioridad" runat="server" ControlToValidate="DdlAgendaPrioridad" Display="None" ErrorMessage="El campo <b>''Prioridad''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
<asp:RequiredFieldValidator ID="RfvAgendaPrioridad" runat="server" ControlToValidate="DdlAgendaPrioridad" Display="None" ErrorMessage="El campo <b>''Prioridad''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpAgenda"></asp:RequiredFieldValidator>
<asp:Label runat="server" AssociatedControlID="DdlAgendaPrioridad">Prioridad:</asp:Label>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender3" runat="server" TargetControlID="RfvAgendaPrioridad" HighlightCssClass="vco" Width="300px"></ajax:ValidatorCalloutExtender>
</div>
@@ -730,15 +733,73 @@
</asp:UpdatePanel>
</div>
</div>
<div id='<%= iddivTomarAsistencia %>' class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<asp:UpdatePanel ID="UpTomarASistencia" 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="LtlTituloUsuarios" runat="server">Actualizar miembros</asp:Literal></h4>
</div>
<div class="modal-body">
<div class="text-right" style="">
<asp:TextBox ID="TxtTomarAsistencia" runat="server" CssClass="form-control input-sm" Style="display: inline-block; margin-right: -20px; width: 150px;" CausesValidation="true"></asp:TextBox>
<a href="javascript:;" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
<asp:GridView ID="GvTomarAsistencia" runat="server" AutoGenerateColumns="false" DataKeyNames="CveUsuario,Nombre,CveRol" data-txtBuscador='<%# string.Format("#{0}",TxtTomarAsistencia.ClientID) %>'
CssClass="table table-striped table-advance table-hover Widthall ScrollAD ConBuscador" GridLines="None" data-height="200"
OnRowDataBound="GvTomarAsistencia_RowDataBound">
<Columns>
<asp:TemplateField>
<ItemStyle HorizontalAlign="Center" Width="50px" />
<HeaderTemplate>
Asistió
</HeaderTemplate>
<ItemTemplate>
<asp:CheckBox ID="ChkAsistio" CssClass="ChkOk" Checked='<%# Eval("Asistencia").ToString()=="1" %>' runat="server" />
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Usuario</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlNombre" runat="server" Text='<%# Eval("Nombre") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Rol</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlRol" runat="server" Text='<%# Eval("Rol") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtAsistentesExternos" runat="server" CssClass="form-control" CausesValidation="true" TextMode="MultiLine" Rows="2"></asp:TextBox>
<asp:Label runat="server" Text="Externos" AssociatedControlID="TxtAsistentesExternos"></asp:Label>
</div>
</div>
<div class="modal-footer">
<asp:LinkButton ID="LnkUpAsistencia" OnClick="LnkUpAsistencia_Click" CssClass="btn btn-primary" runat="server">Guardar</asp:LinkButton>
<button data-dismiss="modal" class="btn btn-danger">Cancelar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
<script src="/Metronic/assets/global/plugins/ckeditor/ckeditor.js" type="text/javascript"></script>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
<script>
</script>
<script>
$(document).ready(function () {
setTimeout("autoGuardado()", 60000);
});
loaderinited = loaderinit;
//$('#btnAutoGuardado').click(function () {
function autoGuardado() {

File diff suppressed because one or more lines are too long

View File

@@ -1,10 +1,20 @@
<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="RepReuniones.aspx.cs" Inherits="OI_RepReuniones" %>
<%@ Import Namespace="Extensiones" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
<style>
.nowhitespace{
white-space : nowrap;
}
th{
text-align:left;
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
Reuniones
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
@@ -26,7 +36,7 @@
<ajax:TabPanel ID="TabReuniones" runat="server">
<HeaderTemplate>
Reuniones
Convocatorias
</HeaderTemplate>
<ContentTemplate>
@@ -35,7 +45,7 @@
<div class="portlet solid grey-cascade portlet-filter">
<div class="portlet-title portlet-filterT smalltitle magindate">
<div class="tools">
<asp:Button ID="Button1" runat="server" Text="Consultar" OnClick="Button1_Click" class="btn btn-primary" />
<asp:Button ID="BtnCargarReunion" runat="server" Text="Consultar" OnClick="BtnCargarReunion_Click" class="btn btn-primary" />
</div>
<div class="titlefiltros caption ">
<ul class="list-inline text-size-12">
@@ -75,21 +85,33 @@
</div>
</ContentTemplate>
</asp:UpdatePanel>
<asp:GridView ID="GVConvocatoria" Width="100%" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Registros" ShowHeaderWhenEmpty="true"
<asp:GridView ID="GVConvocatoria" Width="100%" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Registros" ShowHeaderWhenEmpty="true" DataKeyNames="CveEvento"
CssClass="table table-striped table-advance table-hover Widthall" GridLines="None">
<Columns>
<asp:BoundField HeaderText="Fecha" DataField="FechaInicio" DataFormatString="{0:yyyy/MM/dd HH:mm}" ItemStyle-Width="100" />
<asp:TemplateField HeaderText="Asunto">
<asp:BoundField HeaderText="Fecha" DataField="FechaInicio" DataFormatString="{0:dd/MM/yyyy HH:mm}" ItemStyle-CssClass="nowhitespace" ItemStyle-Width="100" />
<asp:TemplateField HeaderText="Asunto / Tema">
<ItemTemplate>
<a href='<%# Eval("CveEvento","/OI/ConvocatoriaDetalle.aspx?CveEvento={0}")%>'> <%#Eval("Asunto")%></a>
</ItemTemplate>
</asp:TemplateField>
<asp:BoundField HeaderText="Estatus" DataField="EventoEstatus" />
<asp:BoundField HeaderText="Moderador" DataField="UsuarioDe" />
<asp:BoundField HeaderText="Tema" DataField="Revision" />
<asp:BoundField HeaderText="Lugar" />
<asp:TemplateField>
<%--<asp:BoundField HeaderText="Tema" DataField="Revision" />--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Lugar">
<ItemTemplate>
<%--<asp:Literal ID="LtlParticipantes" runat="server" Text='<%# Eval("Lugar")%>'></asp:Literal>--%>
<asp:Literal ID="LtlLugar" runat="server" Text='<%# Eval("Lugar")%>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-Width="30" >
<ItemTemplate>
<asp:HyperLink ID="hypIrMinuta" Visible='<%# Eval("CveEventoHijo").ToString().ToEntero() >0 %>' NavigateUrl='<%# Eval("CveEventoHijo","/OI/MinutaDetalle.aspx?CveEvento={0}")%>' runat="server" CssClass="btn btn-circle btn-sm blue" data-toggle="tooltip" title="ir a minuta">Ir</asp:HyperLink>
<asp:LinkButton ID="LnkAddMinuta" runat="server" OnClick="LnkAddMinuta_Click" Visible='<%# !(Eval("CveEventoHijo").ToString().ToEntero() >0) %>' CssClass="btn btn-circle btn-sm green" data-toggle="tooltip" title="Iniciar minuta"><i class="fa fa-plus"></i></asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-Width="30">
<ItemTemplate>
<asp:LinkButton ID="LnkEnviarRecordatorio" runat="server" OnClick="LnkEnviarRecordatorio_Click" CssClass="btn btn-circle btn-sm green" data-toggle="tooltip" title="Enviar recordatorio"><i class="fa fa-paper-plane"></i></asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
</Columns>

View File

@@ -2,6 +2,7 @@
using System.Collections.Generic;
using System.Data;
using System.Linq;
using System.Text;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
@@ -44,7 +45,7 @@ public partial class OI_RepReuniones : ClsPaginas
FechaF = TxtCFechaFin.Text.ToDate();
if (ObjProspectos.GetRepEventos(-1, 11, -1, "-1", "-1", -1, -1, -1, -1, -1, -1, "-1", -1, -1, -1, -1, -1, -1, -1, -1, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FechaI, FechaF))
{ GVConvocatoria.DataSource = ObjProspectos.DtResultados.FiltraParametros("","FechaInicio DESC"); }
{ GVConvocatoria.DataSource = ObjProspectos.DtResultados.FiltraParametros("", "FechaInicio DESC"); }
}
GVConvocatoria.DataBind();
@@ -135,10 +136,232 @@ public partial class OI_RepReuniones : ClsPaginas
UpContenido.Update();
}
protected void Button1_Click(object sender, EventArgs e)
protected void BtnCargarReunion_Click(object sender, EventArgs e)
{
CargaDatosReunion();
UpContenido.Update();
}
protected void LnkAddMinuta_Click(object sender, EventArgs e)
{
GridViewRow gvrow = (GridViewRow)((LinkButton)sender).NamingContainer;
int RCveEvento = gvrow.DataKey("CveEvento").ToEntero();
bool Continuar = false;
int CveEvento = -1;
List<int> LCveUsuarioCCP = new List<int>();
using (ClsOIEventos ObjOI_E = new ClsOIEventos())
{
if (ObjOI_E.GetEventosUsuario2(RCveEvento, UsuarioActual.CveEmpresa))
{
LCveUsuarioCCP.Clear();
foreach (System.Data.DataRow item in ObjOI_E.DtResultados.Select("CveEvento >0"))
{
int CveUsuario = item["CveUsuario"].ToString().ToEntero();
LCveUsuarioCCP.Add(CveUsuario);
}
}
}
int Folio = -1;
using (ClsOIEventos ObjOI_E = new ClsOIEventos())
{
if (ObjOI_E.GetEventos2(RCveEvento, UsuarioActual.CveEmpresa) && ObjOI_E.DtResultados.Rows.Count > 0)
{
System.Data.DataRow drow = ObjOI_E.DtResultados.Rows[0];
ObjOI_E.IniciaTransacSQL();
Continuar = ObjOI_E.AddOI_Eventos2(OITipoEventos.Minuta, drow["Asunto"].ToString(), drow["descripcion"].ToString(), drow["Prioridad"].ToString().ToEntero(), drow["cveUsuarioDe"].ToString().ToEntero(),
drow["cveUsuarioPara"].ToString().ToEntero(), string.Format("{0:yyyy/MM/dd HH:mm}", drow["fechaInicio"]), string.Format("{0:yyyy/MM/dd HH:mm}", drow["fechaFin"]), drow["cveRevision"].ToString().ToEntero(), "",
LCveUsuarioCCP, new List<string>(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CorreoExterno: drow["CorreoExterno"].ToString(), Lugar: drow["Lugar"].ToString(), CveEventoPadre: RCveEvento);
CveEvento = ObjOI_E.CveEvento;
Folio = ObjOI_E.Folio;
if (CveEvento == 0)
{
Continuar = false;
}
if (Continuar) { Continuar = ObjOI_E.UpdateEstatusEvento2(2, -1, RCveEvento, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa); }
if (Continuar)
{
ObjOI_E.Commit();
ObjEventosCorreo o = ObjOI_E.objCorreo;
}
else
{
ObjOI_E.RollBack();
Continuar = false;
}
}
}
if (Continuar)
{
BtnCargarReunion_Click(null, null);
this.Alert(string.Format("Se ha iniciado la minuta<br /> para ir a la minuta <a href=\"/OI/MinutaDetalle.aspx?CveEvento={0}\">click aquí</a>", CveEvento), ModExtensiones.TipoMensaje.ToastInformacion, "", 0);
}
}
protected void LnkEnviarRecordatorio_Click(object sender, EventArgs e)
{
GridViewRow gvrow = (GridViewRow)((LinkButton)sender).NamingContainer;
int RCveEvento = gvrow.DataKey("CveEvento").ToEntero();
enviarConvocatoria(RCveEvento);
Alert("se ha enviado la convocatoria",ModExtensiones.TipoMensaje.ToastInformacion);
}
private string GetDominio(string addstr = "")
{
return string.Format("{0}/{1}", HttpContext.Current.Request.Url.ToString().Replace(HttpContext.Current.Request.Url.PathAndQuery, ""), addstr);
}
private void enviarConvocatoria(int RCveEvento)
{
string Body;
Asuntoconvocatoria = "Convocatoria: ";
Body = MailgetBodyConvocatoria(RCveEvento);
string ArrayCC = "";
//ViewState("Para") = GlobalDTUsuarios(CveUsuarioIng)(0)("correo").ToString;
//ViewState("Asunto") = string.Format("SIG - Minuta {0}", TxtAsunto.Text);
//ViewState("Body") = Body;
//System.Threading.Thread Hilo = new System.Threading.Thread(MandaCorreo);
//Hilo.Start();
string abre = "";
using (ClsOIEventos ObjOI_E = new ClsOIEventos())
{
if (ObjOI_E.GetEventosUsuario2(RCveEvento, UsuarioActual.CveEmpresa) && ObjOI_E.DtResultados != null && ObjOI_E.DtResultados.Rows.Count > 0)
{
foreach (System.Data.DataRow item in ObjOI_E.DtResultados.Rows)
{
if (item["Correo"].ToString().Trim().Length > 0)
ArrayCC = string.Format("{0}{1}{2}", ArrayCC, abre, item["Correo"].ToString().Trim());
abre = ";";
}
}
}
List<ClsSisMail.ArchivoMail> LSRutasMail = new List<ClsSisMail.ArchivoMail>();
ClsSisMail.ArchivoMail mailfile = new ClsSisMail.ArchivoMail { Ruta = string.Format("{0}Imagenes\\Bell.png", ModExtensiones.DirectorioBaseEmpresas), NombreArchivo = "Bell.png" };
LSRutasMail.Add(mailfile);
ClsSisMail.ArchivoMail itemMail = new ClsSisMail.ArchivoMail();
ClsSisMail Mail = new ClsSisMail();
Mail.SendMail(EmpresaNotificaciones, get_GlobalDTUsuarios(UsuarioActual.CveUsuario).Rows[0]["correo"].ToString() , Asuntoconvocatoria, Body, CCP: ArrayCC, Archivos: LSRutasMail);
}
private string Asuntoconvocatoria;
private string MailgetBodyConvocatoria(int RCveEvento)
{
int Folio = 0; string Link = ""; string Asunto = ""; string Acuerdos = ""; string Descripcion = ""; DateTime DFechai = DateTime.MinValue; DateTime DFechaf = DateTime.MinValue;
string UsuarioDe = "";
string UsuarioPara = "";
string UsuarioDeAbr = "";
System.Data.DataTable dttareas;
using (ClsOIEventos ObjOI_E = new ClsOIEventos())
{
if (ObjOI_E.GetEventos2(RCveEvento, UsuarioActual.CveEmpresa) && ObjOI_E.DtResultados.Rows.Count > 0)
{
System.Data.DataRow drow = ObjOI_E.DtResultados.Rows[0];
UsuarioDe = drow["NombreRegistro"].ToString();
Folio = drow["Folio"].ToString().ToEntero();
Link = GetDominio(string.Format("OI/ConvocatoriaDetalle.aspx?CveEvento={0}", RCveEvento));
Asuntoconvocatoria = string.Format("Convocatoria: {0}", drow["Asunto"].ToString());
Asunto = drow["Asunto"].ToString();
Descripcion = drow["Descripcion"].ToString();
Acuerdos = drow["Acuerdos"].ToString();
DateTime.TryParse(drow["FechaInicio"].ToString(), out DFechai);
DateTime.TryParse(drow["FechaFin"].ToString(), out DFechaf);
//OIE.[CveEvento], OIE.[CveTipoEvento], OIE.[Folio], OIE.[Asunto], OIE.[Descripcion], OIE.[Prioridad], OIE.[CveUsuarioDe], OIE.[CveUsuarioPara],
//OIE.[CveEventoEstatus], OIE.[FechaInicio], OIE.[FechaFin], OIE.[FechaRealTermino], OIE.[CveRevision], OIE.[Archivo], OIE.[FechaIng],
//OIE.[CveUsuarioIng], OIE.[CveEmpresa], OIE.[CveUsuarioModifico], OIE.[Avance] NombreRegistro
}
ObjOI_E.GetEventos2(-1, UsuarioActual.CveEmpresa, RCveEvento);
dttareas = ObjOI_E.DtResultados;
}
if (UsuarioDe != null)
{
string[] str = UsuarioDe.Split(' ');
if (str.Length > 0 && str[0].Length > 0)
{
UsuarioDeAbr = str[0].Substring(0, 1).ToUpper();
}
if (str.Length > 1 && str[1].Length > 0)
{
UsuarioDeAbr = string.Format("{0}{1}", UsuarioDeAbr, str[1].Substring(0, 1).ToUpper());
}
}
string UsuariParaAbr = "";
if (UsuarioPara != null)
{
string[] str = UsuarioPara.Split(' ');
if (str.Length > 0 && str[0].Length > 0)
{
UsuariParaAbr = str[0].Substring(0, 1).ToUpper();
}
if (str.Length > 1 && str[1].Length > 0)
{
UsuariParaAbr = string.Format("{0}{1}", UsuariParaAbr, str[1].Substring(0, 1).ToUpper());
}
}
StringBuilder StrMail = new StringBuilder();
StrMail.Append("<html><head><meta charset=\"UTF-8\"></head><body>");
StrMail.Append(" <div style=\"text-align: center;\">");
StrMail.Append(" <div style=\"display: inline-block; width: 800px; text-align: left;\">");
StrMail.Append(" <div style=\"padding: 25px 10px 5px 10px; color: #6C6C6C; font-size: 40px; font-weight: bold;\">SIG Notificaciones</div>");
StrMail.Append(" <div style=\"border: 1px solid #ED7D31;\"></div>");
StrMail.Append(" <div style=\"padding: 10px 10px; text-align: center;\">");
StrMail.Append(" <table style=\"width: 100%\">");
StrMail.Append(" <tr>");
StrMail.Append(" <td style=\"width: 60%; text-align:left;\" >");
StrMail.Append(" <span style=\"color: #6C6C6C; font-size: 17px;\">Moderador:</span>");
StrMail.Append($" <span style=\"color: #ED7D31; font-size: 22px;font-weight: bold;\">{UsuarioDeAbr}</span>");
StrMail.Append($" <span style=\"color: #6C6C6C; font-size: 17px;\">{UsuarioDe}</span><br />");
StrMail.Append(" <span style=\"color: #6C6C6C; font-size: 17px;\">Fecha:</span>");
StrMail.Append($" <span style=\"color: #6C6C6C; font-size: 17px;\">{DFechai: dd} de {DFechai: MMMM yyyy HH:mm}</span><br />");
StrMail.Append(" </td>");
StrMail.Append(" <td style=\"width: 20%;\">");
StrMail.Append(" <span style=\"color: #8877A9; font-size: 25px; font-weight: bold;\">Convocatoria </span>");
StrMail.Append(" </td>");
StrMail.Append(" <td style=\"width: 100px;\">");
StrMail.Append(" <img src=\"Bell.png\" style=\"width: 100px;height: 100px;\">");
StrMail.Append(" </td>");
StrMail.Append(" </tr>");
StrMail.Append(" </table>");
StrMail.Append(" <div style=\"text-align: left;color:#262626\">");
StrMail.Append("");
StrMail.Append(" <div style=\"background-color: #D9D9D9; padding: 5px;\">");
StrMail.Append($" <span style=\"font-size: 32px; \">{Asunto}</span>");
StrMail.Append(" </div>");
StrMail.Append(" <div style=\"background-color: #D9D9D9; padding: 5px; padding: 5px; padding-bottom: 25px;\">");
StrMail.Append(" <span style=\"font-size: 18px; font-weight: bold;\">Folio:</span>");
StrMail.Append($" <span style=\"font-size: 18px;\">{Folio}</span>");
StrMail.Append(" </div>");
StrMail.Append(" <div style=\"background-color: #D9D9D9; padding: 5px; padding-bottom: 40px;\">");
StrMail.Append($" <span style=\"font-size: 18px;\">{Descripcion}</span>");
StrMail.Append(" </div>");
StrMail.Append(" </div>");
StrMail.Append(" <br />");
StrMail.Append(" <div style=\"background-color: #D0CECE; padding: 5px;\">");
StrMail.Append(" <span style=\"font-size: 20px; color: #70AD47; font-weight: bold;\">ORDEN DEL DÍA</span>");
StrMail.Append(" </div>");
StrMail.Append(" <div style=\"text-align: left;color:#262626\">");
StrMail.Append(Acuerdos);
StrMail.Append(" </div>");
StrMail.Append(" <br />");
StrMail.Append(" <br />");
StrMail.Append(" <br />");
StrMail.Append($" <a href=\"{Link}\" style=\"padding: 10px 20px; text-align: center;\">Minuta</a>");
StrMail.Append(" <br />");
StrMail.Append(" <br />");
StrMail.Append(" <div>");
StrMail.Append(" </div>");
StrMail.Append(" </div>");
StrMail.Append(" </div>");
StrMail.Append(" </div>");
StrMail.Append("</html></body>");
return StrMail.ToString();
}
}

View File

@@ -16,35 +16,46 @@
.sortableList {
border: 1px solid #eee;
width: 250px;
float: left;
margin-right: 10px;
}
.sortableList ul {
list-style-type: none;
min-height: 20px;
width: 250px;
padding: 5px 0 0 0;
margin: 0;
ul.ListSorter {
list-style-type: none;
min-height: 25px;
padding: 0px;
margin: 0;
}
.sortableList ul {
list-style-type: none;
min-height: 20px;
width: 250px;
padding: 5px 0 0 0;
margin: 0;
}
.sortableList ul li {
margin: 0 5px 5px 5px;
padding: 5px;
font-size: 1.2em;
/*width: 120px;*/
background-color: #fff;
border: 1px solid #cccccc;
position: relative;
padding: 7px 35px 7px 5px;
}
.sortableList ul li {
margin: 0 5px 5px 5px;
padding: 5px;
font-size: 1.2em;
/*width: 120px;*/
background-color: #fff;
border: 1px solid #cccccc;
position: relative;
padding: 7px 35px 7px 5px;
}
ul.ListSorter > li {
background-color: #fff;
float: left;
}
.sortableList ul li .btn.edit {
padding: 2px 4px;
position: absolute;
right: 5px;
top: 4px;
}
.sortableList ul li .btn.edit {
padding: 2px 4px;
position: absolute;
right: 5px;
top: 4px;
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
@@ -71,28 +82,32 @@
<asp:UpdatePanel ID="UpContenido" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:Button ID="BtnCargarDatos" OnClick="BtnCargarDatos_Click" CssClass="hidden BtnCargarDatos " runat="server"></asp:Button>
<asp:Repeater ID="RptrListas" OnItemDataBound="RptrListas_ItemDataBound" runat="server">
<ItemTemplate>
<div class="sortableList">
<h4><%#Eval("Lista") %></h4>
<ul class="connectedSortable " data-cvetablerolista='<%#Eval("CveTableroLista") %>'>
<asp:Repeater ID="RptTareas" runat="server">
<ItemTemplate>
<li id='<%#Eval("CveEvento","Evento_{0}") %>' data-cveevento='<%#Eval("CveEvento") %>' class="ui-state-default">
<%#Eval("Asunto") %> <a href='<%#Eval("CveEvento","/OI/TareaDetalle.aspx?CveEvento={0}") %>' target="_blank" class="btn btn-default edit"><i class="fa fa-pencil"></i></a>
</li>
</ItemTemplate>
</asp:Repeater>
</ul>
<div class="text-center">
<ul class="ListSorter">
<asp:Repeater ID="RptrListas" OnItemDataBound="RptrListas_ItemDataBound" runat="server">
<ItemTemplate>
<li data-cvetablerolista='<%#Eval("CveTableroLista") %>'>
<div class="sortableList">
<h4><%#Eval("Lista") %></h4>
<ul class="connectedSortable " data-cvetablerolista='<%#Eval("CveTableroLista") %>'>
<%# String.Format("<a class=\"btn btn-default\" onclick=\"OpenModalNewTareaUserControl(1,-1,{{CveTableroLista:{0}}});\"> <i class=\"fa fa-plus\"'></i> </a>",Eval("CveTableroLista")) %>
</div>
</div>
</ItemTemplate>
</asp:Repeater>
<asp:Repeater ID="RptTareas" runat="server">
<ItemTemplate>
<li id='<%#Eval("CveEvento","Evento_{0}") %>' data-cveevento='<%#Eval("CveEvento") %>' class="ui-state-default">
<%#Eval("Asunto") %> <a href='<%#Eval("CveEvento","/OI/TareaDetalle.aspx?CveEvento={0}") %>' target="_blank" class="btn btn-default edit"><i class="fa fa-pencil"></i></a>
</li>
</ItemTemplate>
</asp:Repeater>
</ul>
<div class="text-center">
<%# String.Format("<a class=\"btn btn-default\" onclick=\"OpenModalNewTareaUserControl(1,-1,{{CveTableroLista:{0}}});\"> <i class=\"fa fa-plus\"'></i> </a>",Eval("CveTableroLista")) %>
</div>
</div>
</li>
</ItemTemplate>
</asp:Repeater>
</ul>
</ContentTemplate>
</asp:UpdatePanel>
<%--<div class="sortableList">
@@ -125,7 +140,6 @@
<div class="text-center"><a onclick="console.log(x)" class="btn btn-default"><i class="fa fa-plus"></i></a></div>
</div>--%>
<UserControl:TareaNueva runat="server" id="TareaNueva" />
<div id="DModalTableroLista" class="modal ADS fade" role="dialog">
<asp:UpdatePanel class="modal-dialog" runat="server" ID="UPModalTabl" UpdateMode="Conditional">
<ContentTemplate>
@@ -159,14 +173,29 @@
<asp:TextBox ID="Txtcvetablerolista" CssClass=" hidden Txtcvetablerolista" runat="server"></asp:TextBox><asp:TextBox ID="txtCveEvento" CssClass="txtCveEvento hidden" runat="server"></asp:TextBox>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
<script>
function ADSReady() {
var cvetablerolistaold = 0;
var cvetablerolistanew = 0;
$("ul.ListSorter:not(.withsorter)").sortable({
connectWith: ".ListSorter",
change: function (event, ui) { },
start: function (event, ui) { /*cvetablerolistaold = $(event.srcElement).closest('ul').data('cvetablerolista');*/ },
stop: function (event, ui) {
setTimeout(function () {
cvetablerolistanew = $(event.srcElement).data('cvetablerolista');
//let cveevento = $(event.srcElement).data('cveevento');
//$('.Txtcvetablerolista').val(cvetablerolistanew);
//$('.txtCveEvento').val(cveevento);
//$('.BtnUpPosition').click();
}, 20);
}
}).disableSelection();
$(".sortableList ul:not(.withsorter)").sortable({
connectWith: ".connectedSortable",
change: function (event, ui) { },
@@ -182,6 +211,7 @@
}
}).disableSelection();
$(".sortableList ul").addClass('withsorter');
$("ul.ListSorter").addClass('withsorter');
}
</script>

View File

@@ -149,7 +149,7 @@
<li>
<asp:LinkButton ID="LnkcambiarEstatus" OnClick="LnkcambiarEstatus_Click" runat="server"><i class="fa fa-exchange"></i>Cambiar Estatus</asp:LinkButton></li>
<li>
<asp:LinkButton ID="LnkAgregarActividad" OnClick="LnkAgregarActividad_Click" runat="server"><i class="fa fa-plus"></i> Agregar Comentario</asp:LinkButton></li>
<asp:LinkButton ID="LnkAgregarActividad" OnClick="LnkAgregarActividad_Click" runat="server"><i class="fa fa-plus"></i> Agregar bitácora</asp:LinkButton></li>
<li>
<asp:LinkButton ID="LnkAgregarTema" OnClick="LnkAgregarTema_Click" runat="server"><i class="fa fa-plus"></i> Agregar Tema</asp:LinkButton></li>
<li>
@@ -245,19 +245,20 @@
</div>
</div>
<div class="row">
<div class="col-sm-6">
<div class="col-sm-4">
<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" class="itembaja"></asp:ListItem>
<asp:ListItem Text="Media" Value="2" class="itemmedia"></asp:ListItem>
<asp:ListItem Text="Alta" Value="3" class="itemalta"></asp:ListItem>
<asp:ListItem Text="Baja" Value="1" ></asp:ListItem>
<asp:ListItem Text="Media" Value="2" ></asp:ListItem>
<asp:ListItem Text="Alta" Value="3" ></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="GrpTarea"></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-2"></div>
<div class="col-sm-4">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlTema" runat="server" CssClass="form-control select2me input-sm" DataValueField="CveRevision" DataTextField="Revision" Width="100%">
@@ -282,10 +283,10 @@
<span class="caption-subject bold uppercase">CheckList <span id="Contador"></span></span>
</div>
<div class="tools">
<a href="javascript:;" class="expand" data-original-title="" title=""></a>
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body rowpadding" style="display: none">
<div class="portlet-body rowpadding" >
<div class="row">
<div class="col-md-8">
<div class="form-group form-md-line-input">
@@ -296,7 +297,7 @@
</div>
<div class="col-md-4">
<asp:Button ID="LnkSinfuncion" OnClick="LnkSinfuncion_Click" UseSubmitBehavior="false" CssClass="btn btn-default LnkSinfuncion hidden" runat="server"></asp:Button>
<asp:LinkButton ID="LnkAgregarchklistitem" OnClick="LnkAgregarchklistitem_Click" ValidationGroup="GrpTareachklist" CssClass="btn btn-default" runat="server">Agregar</asp:LinkButton>
<asp:LinkButton ID="LnkAgregarchklistitem" OnClick="LnkAgregarchklistitem_Click" ValidationGroup="GrpTareachklist" CssClass="btn btn-primary" runat="server">Agregar</asp:LinkButton>
<%--<a class="btn btn-default">Agregar</a>--%>
</div>
</div>
@@ -433,7 +434,7 @@
</div>
</div>
<div class="portlet-body rowpadding filediv">
<asp:TextBox ID="TxtArchivo" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtArchivo" CssClass="ADSdropzone hidden" data-maxFile="1" runat="server"></asp:TextBox>
<div class="divArchivo">
<asp:HyperLink ID="HypArchivo" runat="server" Target="_blank">
<asp:Literal ID="LtlArchivo" runat="server"></asp:Literal><br />
@@ -516,7 +517,7 @@
<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>
<span class="caption-subject bold uppercase">Bitácora</span>
</div>
<div class="tools">
<a href="javascript:;" class="expand" data-original-title="" title=""></a>
@@ -680,7 +681,7 @@
<asp:Label runat="server" Text="Agregar Comentario" AssociatedControlID="TxtComentario"></asp:Label>
</div>
<asp:TextBox ID="Txtfilecomentario" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
<asp:TextBox ID="Txtfilecomentario" CssClass="ADSdropzone hidden" data-maxFile="1" runat="server"></asp:TextBox>
</div>
<div class="modal-footer">
<asp:LinkButton ID="BtnAgregarComentario" OnClick="BtnAgregarComentario_Click" CssClass="btn btn-primary" runat="server">Agregar</asp:LinkButton>
@@ -714,11 +715,11 @@
</div>
</div>
</asp:Panel>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtComentarioTerminarpadre" runat="server" CssClass="form-control" CausesValidation="true" TextMode="MultiLine" Rows="1"></asp:TextBox>
<asp:Label runat="server" Text="Agregar Comentario" AssociatedControlID="TxtComentarioTerminarpadre"></asp:Label>
</div>
</asp:Panel>
</div>
@@ -746,7 +747,7 @@
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlViculos" Visible="true" AutoPostBack="true" OnSelectedIndexChanged="DdlViculos_SelectedIndexChanged" runat="server" CssClass="form-control select2me input-sm" Width="100%">
<asp:ListItem Value="0" Text="Seleccione" Selected="True"></asp:ListItem>
<asp:ListItem Value="1" Text="Activo Fijo"></asp:ListItem>
<%--<asp:ListItem Value="1" Text="Activo Fijo"></asp:ListItem>--%>
<asp:ListItem Value="2" Text="Cliente"></asp:ListItem>
<asp:ListItem Value="3" Text="Personal"></asp:ListItem>
<asp:ListItem Value="4" Text="Proveedor"></asp:ListItem>
@@ -829,12 +830,9 @@
</asp:GridView>--%>
</asp:Panel>
<asp:Panel ID="PnlCliente" Visible="false" runat="server">
<div class="form-group form-md-line-input">
<ADS:Dropdownlost ID="DdlCliente" UsaWebService="true" runat="server" CssStyle="width: 100%;" DataTextField="NombreComercial" DataValueField="CveCliente" CssClass="form-control"></ADS:Dropdownlost>
<asp:Label runat="server" AssociatedControlID="DdlCliente">Cliente:</asp:Label>
</div>
<asp:Panel ID="PnlCliente" CssClass="form-group form-md-line-input" Visible="false" runat="server">
<ADS:Dropdownlost ID="DdlCliente" UsaWebService="true" runat="server" CssStyle="width: 100%;" DataTextField="NombreComercial" DataValueField="CveCliente" CssClass="form-control"></ADS:Dropdownlost>
<asp:Label runat="server" AssociatedControlID="DdlCliente">Cliente:</asp:Label>
<%-- <asp:GridView ID="GvClientes" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Clientes registrados"
ShowHeader="true" CssClass="table table-striped table-advance table-hover Widthall ScrollAD " data-sort="true" BorderWidth="1" BorderColor="#D3D3D3" GridLines="None">
<Columns>
@@ -889,24 +887,19 @@
<HeaderStyle CssClass="Titulos" />
</asp:GridView>--%>
</asp:Panel>
<asp:Panel ID="PnlPersonal" Visible="false" runat="server">
<div class="form-group form-md-line-input">
<asp:Panel ID="PnlPersonal" CssClass="form-group form-md-line-input" Visible="false" runat="server">
<asp:DropDownList ID="DdlPersonal" runat="server" AppendDataBoundItems="true" DataTextField="NombreCompleto" DataValueField="CvePersonal" CssClass="form-control input-sm input-medium select2me" Width="100%"></asp:DropDownList>
<asp:Label runat="server" AssociatedControlID="DdlPersonal">Personal:</asp:Label>
</div>
</asp:Panel>
<asp:Panel ID="PnlProveedor" Visible="false" runat="server">
<div class="form-group form-md-line-input">
<asp:Panel ID="PnlProveedor" CssClass="form-group form-md-line-input" Visible="false" runat="server">
<ADS:Dropdownlost ID="DdlProveedores" UsaWebService="true" runat="server" CssStyle="width: 100%;" DataTextField="RazonSocial" DataValueField="CveProveedor" CssClass="form-control"></ADS:Dropdownlost>
<asp:Label runat="server" AssociatedControlID="DdlProveedores">Proveedores:</asp:Label>
</div>
</asp:Panel>
</div>
<div class="modal-footer">
<asp:LinkButton ID="LnkUpRelacion" OnClick="LnkUpRelacion_Click" runat="server">Actualizar</asp:LinkButton>
<asp:LinkButton ID="LnkUpRelacion" OnClick="LnkUpRelacion_Click" CssClass="btn btn-primary " runat="server">Actualizar</asp:LinkButton>
<%--<asp:LinkButton ID="LinkButton1" OnClick="BtnCambiarEstatus_Click" CssClass="btn btn-primary" ValidationGroup="GrpTarea" runat="server">Guardar</asp:LinkButton>--%>
<button data-dismiss="modal" class="btn btn-danger">Cancelar</button>
</div>
@@ -926,7 +919,7 @@
</div>
<div class="modal-body">
<asp:TextBox ID="txtActualizarArchivo" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
<asp:TextBox ID="txtActualizarArchivo" CssClass="ADSdropzone hidden" data-maxFile="1" runat="server"></asp:TextBox>
</div>
<div class="modal-footer">
<asp:LinkButton ID="BtnActualizarArchivo" OnClick="BtnActualizarArchivo_Click" CssClass="btn btn-primary" runat="server">Agregar</asp:LinkButton>
@@ -1154,6 +1147,20 @@
}
}
function nofocus() {
let strid = '#<%= txtFechaI.ClientID %>:not(.notfocus)';
let input = $(strid);
input.focus(function () {
$(this).trigger('blur');
});
input.addClass('notfocus');
strid = '#<%= txtFechaF.ClientID %>:not(.notfocus)';
input = $(strid);
input.focus(function () {
$(this).trigger('blur');
});
input.addClass('notfocus');
}
var prm = Sys.WebForms.PageRequestManager.getInstance();
prm.add_endRequest(function (s, e) { loaderinit = loaderinited; });
@@ -1162,6 +1169,7 @@
setchecklistitulo();
barraavance();
loadTxtAsunto();
nofocus();
//$('.GVcheklist input[type="checkbox"]:checked').addClass('icheck setclass');
});
$(document).ready(function () {
@@ -1172,6 +1180,7 @@
setchecklistitulo();
barraavance();
loadTxtAsunto();
nofocus();
//$('.GVUsuarios input[type="checkbox"]:not(.setclass)').addClass('icheck setclass');
});
</script>

File diff suppressed because one or more lines are too long

View File

@@ -20,9 +20,24 @@
}
.lnkUsergray {
color:#999b9b;
color: #999b9b;
font-size: 11px;
}
.unoaunoold {
color: #999b9b;
font-size: 11px;
}
.tituloFecha {
font-weight: 600;
font-size: 16px;
}
.msgAyuda {
color: cadetblue;
font-size: 10px;
}
</style>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
@@ -40,7 +55,8 @@
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<li>
<asp:LinkButton ID="LnkSeguir" OnClick="LnkSeguir_Click" CssClass="" runat="server"><i class ="fa fa-eye"></i>Seguir</asp:LinkButton></li>
<asp:LinkButton ID="LnkSeguir" OnClick="LnkSeguir_Click" CssClass="" runat="server"><i class ="fa fa-eye"></i>Seguir</asp:LinkButton>
</li>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
@@ -66,14 +82,19 @@
</div>
</div>
</div>
<div class="portlet-body rowpadding" style="padding-left:25px;">
<div class="portlet-body rowpadding" style="padding-left: 25px;">
<div class="scroller" style="max-height: 200px;" data-always-visible="1" data-rail-visible="0">
<asp:GridView ID="GVSiguiendoA" runat="server" GridLines="None" CssClass="Widthall" AutoGenerateColumns="False" ShowHeader="false" DataKeyNames="CveUsuario,Nombre">
<asp:GridView ID="GVSiguiendoA" runat="server" GridLines="None" CssClass="Widthall" AutoGenerateColumns="False" ShowHeader="false" DataKeyNames="CveUsuario,Nombre,Fecha">
<Columns>
<asp:TemplateField HeaderText="Nombre" ItemStyle-Width="18">
<ItemTemplate>
<i class="fa fa-user" style="color: #659be0;" aria-hidden="true"></i>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Nombre">
<ItemTemplate>
<asp:LinkButton OnClick="SiguiendoAUser_Click" CssClass="lnkUserBlack" runat="server" Text='<%# Eval("Nombre")%>'> </asp:LinkButton><br />
<asp:Label CssClass="lnkUsergray" runat="server" Text='<%# Eval("Fecha","ultima Actualización: {0:dd/MM/yyyy}")%>'> </asp:Label>
<asp:Label CssClass="lnkUsergray" runat="server" Text='<%# Eval("Fecha","Última actualización: {0:dd/MM/yyyy}")%>'> </asp:Label>
</ItemTemplate>
</asp:TemplateField>
@@ -96,12 +117,17 @@
</div>
</div>
</div>
<div class="portlet-body rowpadding" style="padding-left:25px;">
<asp:GridView ID="GVSeguidoPor" runat="server" GridLines="None" CssClass="" AutoGenerateColumns="False" ShowHeader="false">
<div class="portlet-body rowpadding" style="padding-left: 25px;">
<asp:GridView ID="GVSeguidoPor" runat="server" GridLines="None" CssClass="" AutoGenerateColumns="False" ShowHeader="false" DataKeyNames="CveUsuarioSeguidor,NombreSeguidor">
<Columns>
<asp:TemplateField HeaderText="Nombre" ItemStyle-Width="18">
<ItemTemplate>
<i class="fa fa-user" style="color: #659be0;" aria-hidden="true"></i>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Nombre">
<ItemTemplate>
<asp:Label runat="server" CssClass="lnkUserBlack" Text='<%# Eval("NombreSeguidor")%>'> </asp:Label>
<asp:LinkButton OnClick="SeguidoX_Click" runat="server" CssClass="lnkUserBlack" Text='<%# Eval("NombreSeguidor")%>'> </asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
</Columns>
@@ -156,9 +182,13 @@
<asp:TemplateField HeaderText="Comentarios">
<ItemTemplate>
<h4>
<asp:Label ID="lblPregunta" CssClass="bold" runat="server" Text='<%# Eval("Pregunta")%>'> </asp:Label></h4>
<asp:Label CssClass="bold" runat="server" Text='<%# Eval("Pregunta")%>'> </asp:Label></h4>
<asp:Label CssClass="unoaunoold" runat="server" Text='<%# Eval("RespuestaOld")%>'> </asp:Label>
<br />
<asp:TextBox ID="TxtComentarios" CssClass="form-control" Text='<%# Eval("Respuesta")%>' TextMode="MultiLine" Rows="3" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvTxtComentarios" runat="server" ControlToValidate="TxtComentarios" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />Responda el cuestionario para poder guardar." ValidationGroup="GrpGuardarUnoAUno"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VcoTxtCFecha" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtComentarios" Width="350px"></ajax:ValidatorCalloutExtender>
</ItemTemplate>
</asp:TemplateField>
</Columns>
@@ -166,7 +196,7 @@
<br />
<br />
<div class="text-center">
<asp:LinkButton runat="server" ID="LnkGuardar" OnClick="LnkGuardar_Click" CssClass="btn btn-primary"> Guardar</asp:LinkButton>
<asp:LinkButton runat="server" ID="LnkGuardar" OnClick="LnkGuardar_Click" ValidationGroup="GrpGuardarUnoAUno" CssClass="btn btn-primary"> Guardar</asp:LinkButton>
</div>
</asp:Panel>
</div>
@@ -188,7 +218,7 @@
</div>
<div class="modal-body">
<ajax:TabContainer ID="TabContainerSeguir" ClientIDMode="static" CssClass="tab-wizard" runat="server" Width="100%" AutoPostBack="true" OnActiveTabChanged="TabContainerSeguir_ActiveTabChanged">
<ajax:TabContainer ID="TabContainerSeguir" CssClass="tab-wizard" runat="server" Width="100%" OnActiveTabChanged="TabContainerSeguir_ActiveTabChanged" AutoPostBack="true">
<ajax:TabPanel ID="TabPreguntas" runat="server" HeaderText="Preguntas">
<ContentTemplate>
@@ -209,23 +239,20 @@
</div>
</div>
<div class="portlet-body rowpadding">
<div class="row">
<div class="col-sm-6 ">
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtPregunta" CssClass="form-control TxtPregunta" runat="server"></asp:TextBox>
<asp:Label runat="server" AssociatedControlID="TxtPregunta">Pregunta:</asp:Label>
<asp:RequiredFieldValidator ID="RfvPregunta" runat="server" ControlToValidate="TxtPregunta" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Pregunta''</b> es necesario, por favor ingréselo." ValidationGroup="VGMPreguntas"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VcoPregunta" runat="server" HighlightCssClass="vco" TargetControlID="RfvPregunta"></ajax:ValidatorCalloutExtender>
</div>
</div>
<div class="col-sm-6 ">
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlPregunta" CssClass="form-control input-sm select2me " runat="server" DataTextField="Pregunta" DataValueField="CveUnoaUnoPregunta" Style="width: 100%"></asp:DropDownList>
<asp:Label runat="server" AssociatedControlID="DdlPregunta">Vinculo:</asp:Label>
</div>
</div>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtPregunta" CssClass="form-control TxtPregunta" runat="server"></asp:TextBox>
<asp:Label runat="server" AssociatedControlID="TxtPregunta">Pregunta:</asp:Label>
<asp:RequiredFieldValidator ID="RfvPregunta" runat="server" ControlToValidate="TxtPregunta" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Pregunta''</b> es necesario, por favor ingréselo." ValidationGroup="VGMPreguntas"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VcoPregunta" runat="server" HighlightCssClass="vco" TargetControlID="RfvPregunta"></ajax:ValidatorCalloutExtender>
</div>
<div class="text-right">
<div class="msgAyuda">Si las preguntas que vas a hacer no se encuentran en el listado, agrégalas.</div>
<div class="form-group form-md-line-input">
<asp:DropDownList ID="DdlPregunta" CssClass="form-control input-sm select2me " runat="server" DataTextField="Pregunta" DataValueField="CveUnoaUnoPregunta" Style="width: 100%"></asp:DropDownList>
<asp:Label runat="server" AssociatedControlID="DdlPregunta">Vinculo:</asp:Label>
</div>
<div class="msgAyuda">Le recordará al usuario la respuesta del día anterior a la pegunta seleccionada (Ej. Si nuestro día actual es Viernes, recordará lo que se respondió en su pregunta el día jueves)</div>
<br />
<div class="text-center">
<asp:LinkButton ID="LnkGuardarPregunta" OnClick="LnkGuardarPregunta_Click" ValidationGroup="VGMPreguntas" CssClass="btn btn-primary" runat="server">Guardar</asp:LinkButton>
<asp:LinkButton ID="LnkCancelarPregunta" OnClick="LnkCancelarPregunta_Click" Visible="false" CssClass="btn btn-danger" runat="server">Cancelar</asp:LinkButton>
</div>
@@ -239,12 +266,12 @@
<asp:BoundField HeaderText="Vinculada a" DataField="PreguntaVinculo" />
<asp:TemplateField ItemStyle-Width="30">
<ItemTemplate>
<asp:LinkButton data-toggle="tooltip" title="Editar" OnClick="LnkEditarPregunta_Click" CssClass="btn btn-circle btn-sm green btn-xs" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
<asp:LinkButton data-toggle="tooltip" title="Editar" OnClick="LnkEditarPregunta_Click" CssClass="btn btn-circle green btn-xs" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-Width="30">
<ItemTemplate>
<asp:LinkButton runat="server" OnClick="LnkEliminarPregunta_Click" CssClass="btn btn-circle btn-sm red btn-xs" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar la Pregunta?" data-btn-ok-label="si" />
<asp:LinkButton runat="server" OnClick="LnkEliminarPregunta_Click" CssClass="btn btn-circle red btn-xs" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar la Pregunta?" data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
@@ -265,6 +292,7 @@
<div class="caption font-green">
<i class="fa fa-list font-green"></i>
<span class="caption-subject bold uppercase">Cuestionario</span>
<div class="msgAyuda" style="white-space: nowrap;">Selecciona un cuestionario existente, o bien, genera uno nuevo</div>
</div>
<div class="tools"><a href="javascript:;" class="collapse" data-original-title="" title=""></a></div>
<div class="actions">
@@ -274,6 +302,8 @@
<div class="portlet-body rowpadding">
<asp:DropDownList ID="DdlCuestionario" CssClass="form-control input-sm select2me " runat="server" DataTextField="Cuestionario" DataValueField="CveUnoaUnoCuestionario" Style="width: 100%" OnSelectedIndexChanged="DdlCuestionario_SelectedIndexChanged" AutoPostBack="true"></asp:DropDownList>
<%--<asp:DropDownList ID="DdlCuestionario" CssClass="form-control select2me" runat="server"></asp:DropDownList>--%>
<br />
<br />
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtCuestionario" CssClass="form-control TxtCuestionario" runat="server"></asp:TextBox>
<asp:Label runat="server" AssociatedControlID="TxtCuestionario">Cuestionario:</asp:Label>
@@ -412,32 +442,61 @@
</div>
</div>
<div id='<%= idDivModalSiguiendoA %>' class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<asp:UpdatePanel ID="UpModalSiguiendoA" 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">Siguiendo A:
<h4 class="modal-title" style="text-align: left">
<asp:Literal ID="LtlTitulosiguiendoA" runat="server"></asp:Literal></h4>
</div>
<div class="modal-body">
<div class="" style="max-height: 200px;" data-always-visible="1" data-rail-visible="0">
<asp:GridView ID="gvPregResSiguiendoA" runat="server" GridLines="None" CssClass="Widthall" AutoGenerateColumns="False" ShowHeader="false">
<Columns>
<asp:TemplateField HeaderText="Nombre">
<ItemTemplate>
<asp:LinkButton OnClick="SiguiendoAUser_Click" CssClass="lnkUserBlack" runat="server" Text='<%# Eval("Pregunta")%>'> </asp:LinkButton><br />
<div class="row">
<div class="col-md-4 text-left">
<asp:LinkButton ID="lnkAtras" OnClick="lnkAtras_Click" CssClass="btn btn-default" runat="server">< Anterior</asp:LinkButton>
</div>
<div class="col-md-4 text-center" style="padding-top: 5px;">
<%--<asp:Label ID="LblFechaSeguir" CssClass=" tituloFecha" runat="server" Text="Fecha"></asp:Label>--%>
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 109px !important; padding: 0px;">
<asp:TextBox ID="TxtFechaSeguir" runat="server" CssClass="form-control" Width="80" CausesValidation="true" MaxLength="10" Height="24px"></asp:TextBox>
<asp:LinkButton ID="LnkFechaSeguir" OnClick="LnkFechaSeguir_Click" class="btn default " Text="<i class='fa fa-refresh'></i>" Height="24px" runat="server" ValidationGroup="grpseguira"></asp:LinkButton>
<span class="input-group-btn ">
<%--<asp:LinkButton ID="LnkFechaSeguirCalendar" class="btn default " Text="<i class='fa fa-calendar'></i>" Height="24px" runat="server"></asp:LinkButton>--%>
</span>
<ajax:MaskedEditExtender ID="MEETxtFechaSeguir" runat="server" TargetControlID="TxtFechaSeguir" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="TxtFechaSeguir" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RfvTxtFechaSeguir" runat="server" ControlToValidate="TxtFechaSeguir" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''FechaI''</b> es necesario, por favor ingréselo." ValidationGroup="grpseguira"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CvTxtFechaSeguir" runat="server" ControlToValidate="TxtFechaSeguir" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''FechaI''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="grpseguira"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="VcoTxtFechaSegui1" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtFechaSeguir" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="VcoTxtFechaSegui2" runat="server" HighlightCssClass="vco" TargetControlID="CvTxtFechaSeguir" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
</div>
<div class="col-md-4 text-right">
<asp:LinkButton ID="LnkAdelante" OnClick="LnkAdelante_Click" CssClass="btn btn-default" runat="server">Siguiente ></asp:LinkButton>
</div>
</div>
<div class="" data-always-visible="1" data-rail-visible="0">
<asp:GridView ID="gvPregResSiguiendoA" runat="server" GridLines="None" CssClass="Widthall" AutoGenerateColumns="False" ShowHeader="false">
<Columns>
<asp:TemplateField HeaderText="Nombre">
<ItemTemplate>
<div style="padding-bottom: 15px;">
<asp:Label CssClass="lnkUserBlack" runat="server" Text='<%# Eval("Pregunta")%>'> </asp:Label><br />
<asp:Label CssClass="lnkUsergray" runat="server" Text='<%# Eval("Respuesta")%>'> </asp:Label>
<%--<asp:Label CssClass="lnkUsergray" runat="server" Text='<%# Eval("Fecha","ultima Actualización: {0:dd/MM/yyyy}")%>'> </asp:Label>--%>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</div>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</div>
<div class="modal-footer">
<button data-dismiss="modal" class="btn btn-danger">Cerrar</button>
@@ -446,6 +505,39 @@
</asp:UpdatePanel>
</div>
</div>
<%-- <div id='<%= idDivModalSiguiendoX %>' class="modal ADS fade" role="dialog">
<div class="modal-dialog">
<asp:UpdatePanel ID="UpModalSiguiendox" 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">Seguido por:
<asp:Literal ID="LtlTituloSeguidox" runat="server"></asp:Literal></h4>
</div>
<div class="modal-body">
<div class="" data-always-visible="1" data-rail-visible="0">
<asp:GridView ID="gvSeguidoPorpreguntas" runat="server" GridLines="None" CssClass="Widthall" AutoGenerateColumns="False" ShowHeader="false">
<Columns>
<asp:TemplateField HeaderText="Nombre">
<ItemTemplate>
<div style="padding-bottom: 15px;">
<asp:Label CssClass="lnkUserBlack" runat="server" Text='<%# Eval("Pregunta")%>'> </asp:Label><br />
</div>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</div>
<div class="modal-footer">
<button data-dismiss="modal" class="btn btn-danger">Cerrar</button>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>--%>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
</asp:Content>

View File

@@ -12,6 +12,7 @@ public partial class OI_UnoaUno : ClsPaginas
#region Propiedades
public const string idDivModalSeguir = "idDivModalSeguir";
public const string idDivModalSiguiendoA = "idDivModalSiguiendoA";
//public const string idDivModalSiguiendoX = "idDivModalSiguiendoX";
private int CcveUnoaUnoPregunta
{
get { return (ViewState["CcveUnoaUnoPregunta"] == null) ? 0 : Convert.ToInt32(ViewState["CcveUnoaUnoPregunta"]); }
@@ -73,7 +74,7 @@ public partial class OI_UnoaUno : ClsPaginas
ObjPA_O.Dispose();
}
GVPA_OI_UnoAUnoTableroGet.DataBind();
if (GVPA_OI_UnoAUnoTableroGet.Rows.Count > 0)
if (GVPA_OI_UnoAUnoTableroGet.Rows.Count > 0 && TxtCFecha.Text.ToDate().ToString("yyyy/MM/dd") == DateTime.Now.ToString("yyyy/MM/dd"))
{
LnkGuardar.Visible = true;
}
@@ -212,7 +213,7 @@ public partial class OI_UnoaUno : ClsPaginas
LnkGuardarPregunta.Text = "Actualizar";
LnkCancelarPregunta.Visible = true;
upPreguntas.Update();
openmodalseguir();
//openmodalseguir();
}
protected void LnkCancelarPregunta_Click(object sender, EventArgs e)
{
@@ -220,7 +221,7 @@ public partial class OI_UnoaUno : ClsPaginas
LnkGuardarPregunta.Text = "Guardar";
LnkCancelarPregunta.Visible = false;
upPreguntas.Update();
openmodalseguir();
//openmodalseguir();
}
protected void LnkEliminarPregunta_Click(object sender, EventArgs e)
{
@@ -243,7 +244,7 @@ public partial class OI_UnoaUno : ClsPaginas
Alert("La pregunta se ha eliminado correctamente", ModExtensiones.TipoMensaje.ToastInformacion);
CargarPreguntas();
}
openmodalseguir();
//openmodalseguir();
}
protected void LnkGuardarPregunta_Click(object sender, EventArgs e)
@@ -275,7 +276,7 @@ public partial class OI_UnoaUno : ClsPaginas
LnkCancelarPregunta.Visible = false;
Alert("La pregunta se ha agregado correctamente", ModExtensiones.TipoMensaje.ToastInformacion);
}
openmodalseguir();
//openmodalseguir();
}
#endregion
@@ -284,14 +285,14 @@ public partial class OI_UnoaUno : ClsPaginas
{
using (ClsOIEventos ObjUnoa = new ClsOIEventos())
{
ObjUnoa.GetUnoaUnoCuestionario(-1, UsuarioActual.CveUsuario);
ObjUnoa.GetUnoaUnoCuestionario(-1, UsuarioActual.CveUsuario,UsuarioActual.CveEmpresa );
DtPreguntas = ObjUnoa.DtResultados;
DdlCuestionario.DataSource = ObjUnoa.DtResultados;
}
//GVCuestionario.DataBind();
DdlCuestionario.DataBind();
DdlCuestionario.Items.Insert(0, new ListItem("Seleccione", "-1"));
openmodalseguir();
//openmodalseguir();
}
protected void LnkGuardarCuestionario_Click(object sender, EventArgs e)
{
@@ -322,7 +323,7 @@ public partial class OI_UnoaUno : ClsPaginas
}
else
{
continuar = ObjUnoa.AddUnoaUnoCuestionario(Cuestionario, Comentario, UsuarioActual.CveUsuario, lPreguntas);
continuar = ObjUnoa.AddUnoaUnoCuestionario(Cuestionario, Comentario, UsuarioActual.CveUsuario, lPreguntas, UsuarioActual.CveEmpresa );
msg = "El cuestionario se ha agregado correctamente";
}
}
@@ -333,7 +334,7 @@ public partial class OI_UnoaUno : ClsPaginas
DdlCuestionario_SelectedIndexChanged(null, null);
Alert(msg, ModExtensiones.TipoMensaje.ToastInformacion);
}
openmodalseguir();
//openmodalseguir();
}
@@ -383,7 +384,7 @@ public partial class OI_UnoaUno : ClsPaginas
UpCuestionario.Update();
CargarSeguirA();
UpSeguirA.Update();
openmodalseguir();
//openmodalseguir();
}
//protected void LnkCancelarCuestionario_Click(object sender, EventArgs e)
//{
@@ -515,26 +516,7 @@ public partial class OI_UnoaUno : ClsPaginas
}
openmodalseguir();
}
//protected void LnkEliminarCuestionarioUser_Click(object sender, EventArgs e)
//{
// bool continuar = true;
// int cveUnoaUnoCuestionario = DdlCuestionario.SelectedValue.ToEntero();
// int CveSeguir = DdlUsuario.SelectedValue.ToEntero();
// using (ClsOIEventos ObjUnoa = new ClsOIEventos())
// {
// continuar = ObjUnoa.AddUnoaUnoCuestionario_Usuarios(cveUnoaUnoCuestionario, UsuarioActual.CveUsuario, CveSeguir);
// }
// if (continuar)
// {
// //CcveUnoaUnoCuestionario = -1;
// Alert("El cuestionario se ha eliminado correctamente", ModExtensiones.TipoMensaje.ToastInformacion);
// CargarSeguirA();
// }
// openmodalseguir();
//}
protected void TabContainerSeguir_ActiveTabChanged(object sender, EventArgs e)
@@ -552,25 +534,115 @@ public partial class OI_UnoaUno : ClsPaginas
LnkGuardarSeguirA.Visible = true;
}
}
openmodalseguir();
//openmodalseguir();
UpSeguirA.Update();
}
private int SeguirCveUsuario
{
get { return (ViewState["SeguirCveUsuario"] == null) ? 0 : Convert.ToInt32(ViewState["SeguirCveUsuario"]); }
set { ViewState["SeguirCveUsuario"] = value; }
}
private int SeguidoPorCve
{
get { return (ViewState["SeguidoPorCve"] == null) ? 0 : Convert.ToInt32(ViewState["SeguidoPorCve"]); }
set { ViewState["SeguidoPorCve"] = value; }
}
private string SeguirFechaback
{
get { return (ViewState["SeguirFechaback"] == null) ? "" : ViewState["SeguirFechaback"].ToString(); }
set { ViewState["SeguirFechaback"] = value; }
}
private string SeguirFechanext
{
get { return (ViewState["SeguirFechanext"] == null) ? "" : ViewState["SeguirFechanext"].ToString(); }
set { ViewState["SeguirFechanext"] = value; }
}
protected void SiguiendoAUser_Click(object sender, EventArgs e)
{
GridViewRow gvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
int CveUsuario = gvRow.DataKey("CveUsuario").ToEntero();
SeguirCveUsuario = gvRow.DataKey("CveUsuario").ToEntero();
SeguidoPorCve = UsuarioActual.CveUsuario;
string Nombre = gvRow.DataKey("Nombre");
LtlTitulosiguiendoA.Text = Nombre;
string strFecha = gvRow.DataKey("Fecha");
LtlTitulosiguiendoA.Text = string.Format("Siguiendo A: {0}", Nombre);
DateTime Fecha;
if (strFecha.Length > 0)
{
Fecha = strFecha.ToDateTime();
strFecha = Fecha.ToString("yyyy/MM/dd");
}
cargarseguira(strFecha);
}
private void cargarseguira(string strFecha)
{
SeguirFechaback = "";
SeguirFechanext = "";
string fecha = "Sin respuestas capturadas";
gvPregResSiguiendoA.DataSource = null;
using (ClsOIEventos ObjUnoa = new ClsOIEventos())
{
ObjUnoa.GetUnoAUnoSiguiendoA(UsuarioActual.CveUsuario, CveUsuario, UsuarioActual.CveEmpresa);
if( ObjUnoa.GetUnoAUnoSiguiendoA(SeguidoPorCve, SeguirCveUsuario, UsuarioActual.CveEmpresa, strFecha) && ObjUnoa.DtResultados.Rows.Count >0)
{
SeguirFechaback = ObjUnoa.DtResultados.MAX("FechaBack").Length > 0 ? ObjUnoa.DtResultados.MAX("FechaBack").ToDateTime().ToString("yyyy/MM/dd") : "";
SeguirFechanext = ObjUnoa.DtResultados.MAX("FechaNext").Length > 0 ? ObjUnoa.DtResultados.MAX("FechaNext").ToDateTime().ToString("yyyy/MM/dd") : "";
fecha = (ObjUnoa.DtResultados.MAX("Fecha").Length >0 ? ObjUnoa.DtResultados.MAX("Fecha").ToDateTime().ToString("dd/MM/yyyy") : fecha);
}
gvPregResSiguiendoA.DataSource = ObjUnoa.DtResultados;
}
gvPregResSiguiendoA.DataBind();
RegistraScript(string.Format("$('#{0}').modal();", idDivModalSiguiendoA));
lnkAtras.Visible = (SeguirFechaback.Length > 0);
LnkAdelante.Visible = (SeguirFechanext.Length > 0);
TxtFechaSeguir.Text = fecha;
UpModalSiguiendoA.Update();
}
protected void lnkAtras_Click(object sender, EventArgs e)
{
cargarseguira(SeguirFechaback);
}
protected void LnkAdelante_Click(object sender, EventArgs e)
{
cargarseguira(SeguirFechanext);
}
protected void SeguidoX_Click(object sender, EventArgs e)
{
GridViewRow gvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
SeguirCveUsuario = UsuarioActual.CveUsuario;
SeguidoPorCve = gvRow.DataKey("CveUsuarioSeguidor").ToEntero();
string Nombre = gvRow.DataKey("NombreSeguidor");
LtlTitulosiguiendoA.Text = string.Format("Seguido por: {0}", Nombre);
cargarseguira("");
//string strFecha = "";
//LtlTituloSeguidox.Text = Nombre;
//gvSeguidoPorpreguntas.DataSource = null;
//using (ClsOIEventos ObjUnoa = new ClsOIEventos())
//{
// if (ObjUnoa.GetUnoAUnoSiguiendoA(SeguirCveUsuario, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, strFecha) && ObjUnoa.DtResultados.Rows.Count > 0)
// {
// }
// gvSeguidoPorpreguntas.DataSource = ObjUnoa.DtResultados;
//}
//gvSeguidoPorpreguntas.DataBind();
//RegistraScript(string.Format("$('#{0}').modal();", idDivModalSiguiendoX));
//UpModalSiguiendox.Update();
}
protected void LnkFechaSeguir_Click(object sender, EventArgs e)
{
string fechaold = TxtFechaSeguir.Text;
string strFecha =TxtFechaSeguir.Text.ToDateTime().ToString("yyyy/MM/dd");
cargarseguira(strFecha);
TxtFechaSeguir.Text = fechaold;
}
}

View File

@@ -1,81 +0,0 @@
<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="UnoaUnoConfiguracion.aspx.cs" Inherits="OI_UnoaUnoConfiguracion" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" Runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" Runat="Server">
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" Runat="Server">
Configuración Uno a Uno
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" Runat="Server">
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" Runat="Server">
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<li ><asp:LinkButton ID = "LinkButton1" OnClick ="LnkAgregarUnoa_Click" runat = "server" ><i class="fa fa-plus"></i>Etiqueta</asp:LinkButton></li>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" Runat="Server">
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="C" Runat="Server">
<asp:UpdatePanel ID="upDatosUnoa" runat ="server" UpdateMode="Conditional" >
<ContentTemplate>
<asp:GridView ID="GVUnoaUnoEtiqueta" runat="server" GridLines="None" CssClass ="table table-hover table-striped ScrollAD Widthall" AutoGenerateColumns="False"
datakeynames="CveUnoaUnoEtiqueta,Etiqueta,CveUnoaUnoEtiquetaVinculo,CveGrupo,CveEmpresa,Empresa">
<Columns>
<asp:BoundField HeaderText="Etiqueta" DataField="Etiqueta" />
<asp:TemplateField ItemStyle-Width="50">
<ItemTemplate>
<asp:LinkButton data-toggle="tooltip" title="Editar" ID="LnkEditar" OnClick="LnkEditarUnoa_Click" CssClass="btn btn-circle btn-sm green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField ItemStyle-Width="50">
<ItemTemplate>
<asp:LinkButton ID="imgD" runat="server" OnClick="LnkEliminarUnoa_Click" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el UnoaUnoEtiqueta?" data-btn-ok-label="si" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</ContentTemplate>
</asp:UpdatePanel>
<div id="DModalUnoaUnoEtiqueta" class="modal ADS fade" role="dialog">
<asp:UpdatePanel class="modal-dialog" runat="server" ID="UPModalUnoa" UpdateMode="Conditional">
<ContentTemplate>
<div class="modal-content" >
<div class="modal-header ">
<div class="modal-btn">
</div>
<h4 class="modal-title"><asp:Literal ID="ltlUnoatitulo" runat="server"> </asp:Literal></h4>
</div>
<div class="modal-body">
<div class="row">
<div class="col-md-4 truncate ">Etiqueta</div>
<div class="col-md-8">
<asp:TextBox ID="TxtUnoaetiqueta" CssClass="form-control input-sm " runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvUnoaetiqueta" runat="server" ControlToValidate="TxtUnoaetiqueta" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Etiqueta''</b> es necesario, por favor ingréselo." ValidationGroup="VGMUnoa"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VcoUnoaetiqueta" runat="server" HighlightCssClass="vco" TargetControlID="RfvUnoaetiqueta"></ajax:ValidatorCalloutExtender>
</div>
</div>
<div class="row">
<div class="col-md-4 truncate ">Vinculo </div>
<div class="col-md-8">
<asp:DropDownList ID="DdlUnoaetiqueta1" CssClass="form-control input-sm select2me " runat="server" DataTextField="Etiqueta" DataValueField="CveUnoaUnoEtiqueta" style="width: 100%" ></asp:DropDownList>
</div>
</div>
</div>
<div class="modal-footer">
<asp:Button ID="BtnUnoaADD" OnClick="BtnUnoaADD_Click" runat="server" Text="Agregar" CssClass="btn btn-primary" ValidationGroup="VGMUnoa" />
<asp:Button ID="BtnUnoaEdit" OnClick="BtnUnoaEdit_Click" runat="server" Text="Actualizar" CssClass="btn btn-primary" ValidationGroup="VGMUnoa" ></asp:Button>
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</asp:Content>
<asp:Content ID="Content9" ContentPlaceHolderID="JS" Runat="Server">
</asp:Content>

View File

@@ -1,132 +0,0 @@
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_UnoaUnoConfiguracion : ClsPaginas
{
#region Propiedades
private int CcveUnoaUnoEtiqueta
{
get { return (ViewState["CcveUnoaUnoEtiqueta"] == null) ? 0 : Convert.ToInt32(ViewState["CcveUnoaUnoEtiqueta"]); }
set { ViewState["CcveUnoaUnoEtiqueta"] = value; }
}
#endregion
protected void Page_Load(object sender, EventArgs e)
{
if (!IsPostBack)
{
CargaUnoaUnoEtiqueta();
}
}
protected void CargaUnoaUnoEtiqueta()
{
using (ClsOIEventos ObjUnoa = new ClsOIEventos())
{
ObjUnoa.GetUnoaUnoEtiqueta(-1, UsuarioActual.CveEmpresa);
GVUnoaUnoEtiqueta.DataSource = ObjUnoa.DtResultados;
DdlUnoaetiqueta1.DataSource = ObjUnoa.DtResultados;
}
GVUnoaUnoEtiqueta.DataBind();
DdlUnoaetiqueta1.DataBind();
DdlUnoaetiqueta1.Items.Insert(0,new ListItem("Seleccione","-1"));
upDatosUnoa.Update();
}
protected void LimpiaUnoaUnoEtiqueta()
{
TxtUnoaetiqueta.Text = "";
DdlUnoaetiqueta1.SelectedIndex = 0;
UPModalUnoa.Update();
}
protected void LnkEditarUnoa_Click(object sender, EventArgs e)
{
LimpiaUnoaUnoEtiqueta();
ltlUnoatitulo.Text = "Actualizar Etiqueta";
GridViewRow gvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
CcveUnoaUnoEtiqueta = gvRow.DataKey("CveUnoaUnoEtiqueta").ToEntero();
string etiqueta = gvRow.DataKey("Etiqueta");
int cveUnoaUnoEtiquetaVinculo = gvRow.DataKey("CveUnoaUnoEtiquetaVinculo").ToEntero();
int cveGrupo = gvRow.DataKey("CveGrupo").ToEntero();
int cveEmpresa = gvRow.DataKey("CveEmpresa").ToEntero();
TxtUnoaetiqueta.Text = etiqueta.ToString();
DdlUnoaetiqueta1.SelectedValue = "-1";
DdlUnoaetiqueta1.SelectedValueExist(cveUnoaUnoEtiquetaVinculo.ToString());
this.RegistraScript("$('#DModalUnoaUnoEtiqueta').modal();");
BtnUnoaADD.Visible = false;
BtnUnoaEdit.Visible = true;
UPModalUnoa.Update();
}
protected void LnkAgregarUnoa_Click(object sender, EventArgs e)
{
ltlUnoatitulo.Text = "Agregar Etiqueta";
this.RegistraScript("$('#DModalUnoaUnoEtiqueta').modal();");
LimpiaUnoaUnoEtiqueta();
BtnUnoaADD.Visible = true;
BtnUnoaEdit.Visible = false;
UPModalUnoa.Update();
}
protected void BtnUnoaADD_Click(object sender, EventArgs e)
{
string etiqueta = TxtUnoaetiqueta.Text;
int cveUnoaUnoEtiquetaVinculo = DdlUnoaetiqueta1.SelectedValue.ToEntero();
int cveGrupo = 1;
int cveEmpresa = UsuarioActual.CveEmpresa;
bool Continuar = false;
using (ClsOIEventos ObjUnoa = new ClsOIEventos())
{
Continuar=ObjUnoa.AddUnoaUnoEtiqueta(etiqueta, cveUnoaUnoEtiquetaVinculo, cveGrupo, cveEmpresa);
}
if (Continuar)
{
this.RegistraScript("$('#DModalUnoaUnoEtiqueta').modal('hide');");
LimpiaUnoaUnoEtiqueta();
CargaUnoaUnoEtiqueta();
UPModalUnoa.Update();
this.Alert("La Etiqueta se ha agregado");
}
}
protected void BtnUnoaEdit_Click(object sender, EventArgs e)
{
string etiqueta = TxtUnoaetiqueta.Text;
int cveUnoaUnoEtiquetaVinculo = DdlUnoaetiqueta1.SelectedValue.ToEntero();
int cveGrupo = 1;
int cveEmpresa = UsuarioActual.CveEmpresa;
bool Continuar = false;
using (ClsOIEventos ObjUnoa = new ClsOIEventos())
{
Continuar = ObjUnoa.UpUnoaUnoEtiqueta(CcveUnoaUnoEtiqueta, etiqueta, cveUnoaUnoEtiquetaVinculo, cveGrupo, cveEmpresa);
}
if (Continuar)
{
this.RegistraScript("$('#DModalUnoaUnoEtiqueta').modal('hide');");
LimpiaUnoaUnoEtiqueta();
UPModalUnoa.Update();
CargaUnoaUnoEtiqueta();
this.Alert("La Etiqueta se ha actualizado");
}
}
protected void LnkEliminarUnoa_Click(object sender, EventArgs e)
{
GridViewRow gvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
CcveUnoaUnoEtiqueta = gvRow.DataKey("CveUnoaUnoEtiqueta").ToEntero();
bool Continuar = false;
using (ClsOIEventos ObjUnoa = new ClsOIEventos())
{
Continuar = ObjUnoa.RemoveUnoaUnoEtiqueta(CcveUnoaUnoEtiqueta);
}
if (Continuar)
{
CargaUnoaUnoEtiqueta();
this.Alert("La Etiqueta se ha Eliminado");
}
}
}

View File

@@ -1237,6 +1237,16 @@ Partial Class RH_Personal
Dim LogoRutaFisica As String = String.Format("Empresas\{0}\RH\Personal\{1}.jpg", UsuarioActual.CveEmpresa, CvePersonal)
Dim logouri = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(LogoRutaFisica))
ImgPersonal.ImageUrl = logouri
ElseIf File.Exists(ModExtensiones.DirectorioBaseEmpresas & "Empresas\" & UsuarioActual.CveEmpresa & "\RH\Personal\" & CvePersonal & ".png") Then
Dim LogoRutaFisica As String = String.Format("Empresas\{0}\RH\Personal\{1}.png", UsuarioActual.CveEmpresa, CvePersonal)
Dim logouri = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(LogoRutaFisica))
ImgPersonal.ImageUrl = logouri
ElseIf File.Exists(ModExtensiones.DirectorioBaseEmpresas & "Empresas\" & UsuarioActual.CveEmpresa & "\RH\Personal\" & CvePersonal & ".bmp") Then
Dim LogoRutaFisica As String = String.Format("Empresas\{0}\RH\Personal\{1}.bmp", UsuarioActual.CveEmpresa, CvePersonal)
Dim logouri = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(LogoRutaFisica))
ImgPersonal.ImageUrl = logouri
End If
'BtnCargarArchivo_Click(Me, New EventArgs)
@@ -4967,8 +4977,15 @@ Partial Class RH_Personal
filemove = fileItem.filename
Dim yaExistente As String = String.Format("{0}Empresas\{1}\RH\Personal\{2}.jpg", ModExtensiones.DirectorioBaseEmpresas, UsuarioActual.CveEmpresa, CvePersonal)
Dim yaExistentePNG As String = String.Format("{0}Empresas\{1}\RH\Personal\{2}.png", ModExtensiones.DirectorioBaseEmpresas, UsuarioActual.CveEmpresa, CvePersonal)
Dim yaExistenteBMP As String = String.Format("{0}Empresas\{1}\RH\Personal\{2}.bmp", ModExtensiones.DirectorioBaseEmpresas, UsuarioActual.CveEmpresa, CvePersonal)
If File.Exists(yaExistente) Then
File.Delete(yaExistente)
ElseIf File.Exists(yaExistentePNG) Then
File.Delete(yaExistentePNG)
ElseIf File.Exists(yaExistenteBMP) Then
File.Delete(yaExistenteBMP)
End If
If filemove <> "" Then
@@ -4976,8 +4993,8 @@ Partial Class RH_Personal
End If
ViewState("Archivo") = String.Format("{0}.{1}", CvePersonal.ToString, FileExtension)
Next
If File.Exists(ModExtensiones.DirectorioBaseEmpresas & "Empresas\" & UsuarioActual.CveEmpresa & "\RH\Personal\" & CvePersonal & ".jpg") Then
Dim LogoRutaFisica As String = String.Format("Empresas\{0}\RH\Personal\{1}.jpg", UsuarioActual.CveEmpresa, CvePersonal)
If File.Exists(ModExtensiones.DirectorioBaseEmpresas & "Empresas\" & UsuarioActual.CveEmpresa & "\RH\Personal\" & CvePersonal & "." & FileExtension) Then
Dim LogoRutaFisica As String = String.Format("Empresas\{0}\RH\Personal\{1}.{2}", UsuarioActual.CveEmpresa, CvePersonal, FileExtension)
Dim logouri = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}&version={4}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(LogoRutaFisica), Now)
ImgPersonal.ImageUrl = logouri
End If

View File

@@ -12,11 +12,11 @@ console.error = function (texto) {
setTimeout(function () { if (Metronic && Metronic.unblockUI) { Metronic.unblockUI(); } }, 10);
conf.error(texto);
};
function alertatoast(tipo,Mensaje,Funcion,timeout){
function alertatoast(tipo, Mensaje, Funcion, timeout) {
if (timeout) {
timeout = timeout * 1000;//convierto a milisegundos
} else { timeout = 0;}
let opciones ={
} else { timeout = 0; }
let opciones = {
"closeButton": true,
"debug": false,
"positionClass": "toast-top-right",
@@ -31,7 +31,7 @@ function alertatoast(tipo,Mensaje,Funcion,timeout){
"hideMethod": "fadeOut"
}
switch (tipo) {
case 5:
toastr.success(Mensaje, "", opciones);
@@ -48,7 +48,7 @@ function alertatoast(tipo,Mensaje,Funcion,timeout){
default:
toastr.info(Mensaje, "", opciones);
}
}
function log(mensaje) {
console.log(mensaje);
@@ -469,7 +469,7 @@ function CargaPickers() {
let button = $(datetimeButton);
if (button && button.length) {
button.unbind("click");
button.bind("click", function () {
button.bind("click", function () {
TThis.datetimepicker('show')
});
} else {
@@ -761,7 +761,7 @@ ADSScroll = function (tablescroll) {
/* Se Combinan las tablas titulo y cuerpo */
if (idTheader && idTheader.length) {
if ($(idTheader).length) {
$($(idTheader + "> tbody > tr," + idTheader + "> thead > tr," + idTheader +"> tr").get().reverse()).each(function () {
$($(idTheader + "> tbody > tr," + idTheader + "> thead > tr," + idTheader + "> tr").get().reverse()).each(function () {
var trthis = $(this);
tablescroll.prepend(trthis);
rowVisibles += 1;
@@ -1745,7 +1745,7 @@ jQuery(document).ready(function () {
$("body").on("click", ".ajax__tab_outer .ajax__tab_inner .ajax__tab_tab", function () {
setTimeout(loadadscroll, 10);
});
//KeppMenuOpen
//KeppMenuOpen
{
let varpath = window.location.pathname;
if (window.location.pathname != '') {
@@ -1754,7 +1754,7 @@ jQuery(document).ready(function () {
objmenu.parents().filter("li").addClass('active open')
objmenu.parents().filter(".sub-menu").css("display", "")
}
}
}
@@ -1785,8 +1785,8 @@ jQuery(document).ready(function () {
let ckedit = CKEDITOR.replace(id, { /*height: 260,*/autoUpdateElement: false });
ckedit.on('change', function () { $Tthis.val(ckedit.getData().replace(/</gi, '< ')); });
ckedit.on("instanceReady", function () { $Tthis.val($Tthis.val().replace(/</gi, '< '));});
ckedit.on("instanceReady", function () { $Tthis.val($Tthis.val().replace(/</gi, '< ')); });
//CKEDITOR.instances[id].on('change', function () { CKEDITOR.instances[i].updateElement(); });
});
buscadorMenuCaudi();
@@ -1826,7 +1826,49 @@ jQuery(document).ready(function () {
});
//INICIA FUNCION TOOLTIP
$('[data-toggle="tooltip"]').tooltip();
$('table.ConBuscador').each(function () {
let $this = $(this);
let tickBarBmaster = 0;
let strtxtBuscador = $this.data('txtBuscador');
let input = $(strtxtBuscador);
if (strtxtBuscador && strtxtBuscador.length > 0) {
let showhideRows = function () {
usuariotext = input.val();
let strusuario = usuariotext.length > 0 ? ':contains("' + usuariotext + '")' : '';// td:nth-child(2)
$this.find('tr.items').attr('hide', '1');//oculto todos
$this.find('tr.items' + strusuario).attr('hide', '');//muestro los que tienen filtro
};
let txtOnchange = function () {
let obj = input;
let text = '';
tickBarBmaster = tickBarBmaster + 1;
tickBarnew = tickBarBmaster;
setTimeout(function () {
if (tickBarnew == tickBarBmaster) {
if ((text = obj.val().trim()) != usuariotext) {
usuariotext = text;
showhideRows();
}
}
}, 500);
};
if (!input.hasClass('ConEvento')) {
input.bind({
copy: TxtUsuario_Onchange
, paste: TxtUsuario_Onchange
, cut: TxtUsuario_Onchange
, keydown: TxtUsuario_Onchange
, keyup: TxtUsuario_Onchange
});
input.addClass('ConEvento');
}
showhideRows();
}
});
ADSReady();
}
@@ -1834,8 +1876,7 @@ jQuery(document).ready(function () {
if (Notification.permission !== 'denied') {
Notification.requestPermission(function (permission) {
// If the user accepts, let's create a notification
if (permission === "granted") {
}
//if (permission === "granted") { }
});
}

View File

@@ -142,7 +142,7 @@
</div>
<div class="col-md-6">
<div class="fileTarea">
<asp:TextBox ID="TxtArchivo" CssClass="ADSdropzone hidden" runat="server"></asp:TextBox>
<asp:TextBox ID="TxtArchivo" CssClass="ADSdropzone hidden" data-maxFile="1" runat="server"></asp:TextBox>
</div>
<div class="text-right" style="">
<asp:TextBox ID="TxtUsuarioB" runat="server" CssClass="form-control input-sm TxtUsuarioB" Style="display: inline-block; margin-right: -20px; width: 150px;" CausesValidation="true"></asp:TextBox>

View File

@@ -249,7 +249,7 @@ public partial class UserControl_TareaNueva : System.Web.UI.UserControl
ruta = string.Format("{0}{1}", ruta, archivoname);//, ArchivoExtencion);
System.IO.File.Move(rutaarchivoOri, ruta);
}
this.Alert("Se ha agregadó la nueva tarea", ModExtensiones.TipoMensaje.ToastInformacion);
this.Alert("Se ha agregado la nueva tarea", ModExtensiones.TipoMensaje.ToastInformacion);
TxtAsunto.Text = "";
TxtDescripcion.Text = "";
@@ -307,7 +307,7 @@ public partial class UserControl_TareaNueva : System.Web.UI.UserControl
{
if (objoi.AddRevisionesEventos(TxtTema.Text.Trim(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa))
{
this.Alert(string.Format("El Tema \"{0}\" fue agregada con éxito.", TxtTema.Text.Trim()), ModExtensiones.TipoMensaje.MsgInformacion);
this.Alert(string.Format("El Tema \"{0}\" fue agregado con éxito.", TxtTema.Text.Trim()), ModExtensiones.TipoMensaje.MsgInformacion);
this.RegistraScript(string.Format("$('#{0}').modal('hide')", iddivAgregarTema));
if (Ismodal)

View File

@@ -395,13 +395,13 @@
<div class="row">
<div class="col-md-6">
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtNoExt" runat="server" CssClass="form-control" MaxLength="15"></asp:TextBox>
<asp:TextBox ID="TxtNoExt" runat="server" CssClass="form-control" MaxLength="40"></asp:TextBox>
<label for="<%= TxtNoExt.ClientID.ToString()%>">No. Ext. </label>
</div>
</div>
<div class="col-md-6">
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtNoInt" runat="server" CssClass="form-control" MaxLength="15"></asp:TextBox>
<asp:TextBox ID="TxtNoInt" runat="server" CssClass="form-control" MaxLength="50"></asp:TextBox>
<label for="<%= TxtNoInt.ClientID.ToString()%>">No. Int.</label>
</div>
</div>
@@ -604,6 +604,17 @@
</asp:DropDownList>
<label for="<%= DdlTipoCliente.ClientID.ToString()%>">Tipo de Cliente:</label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox runat="server" ID="TxtCorreoEntregaCompras" CssClass="form-control"/>
<label for="<%= TxtCorreoEntregaCompras.ClientID.ToString()%>">Correo de Entrega de Compras:</label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox runat="server" ID="TxtCorreoEntregaAlmacen" CssClass="form-control"/>
<label for="<%= TxtCorreoEntregaAlmacen.ClientID.ToString()%>">Correo de Entrega de Almacén:</label>
</div>
<div class="form-group form-md-line-input input-iconright" runat="server" id="DivCargoUsado" visible="false">
<label>Cargo Usado:</label>
<asp:CheckBox ID="ChkCargoUsado" runat="server" CssClass="make-switchsd" data-size="small" Text="" ClientIDMode="Static" Enabled="true" />
@@ -1488,7 +1499,7 @@
<div class="row">
<div class="col-md-6">
<div class="form-group form-md-line-input">
<asp:Label ID="LblDiasPago" runat="server" Text="Días de pago:"></asp:Label>
<asp:Label ID="LblDiasPago" runat="server" ForeColor="#888888" Text="Días de pago:"></asp:Label>
<br />
<label><b>L</b></label>&nbsp;&nbsp;
@@ -1546,7 +1557,7 @@
<div class="row" id="DivDiasRevision" runat="server" visible="false">
<div class="col-md-6">
<div class="form-group form-md-line-input">
<asp:Label ID="LblDiasRevision" runat="server" Text="Dias de Revisión:"></asp:Label>
<asp:Label ID="LblDiasRevision" runat="server" Text="Días de Revisión:"></asp:Label>
<br />
<label><b>L</b></label>&nbsp;&nbsp;
@@ -5498,7 +5509,7 @@
<asp:Label runat="server" ID="Label4" Text=""></asp:Label>
</h4>
<small>Dias</small>
<small>Días</small>
</div>
</div>
</div>
@@ -5514,7 +5525,7 @@
<asp:Label runat="server" ID="Label5" Text=""></asp:Label>
</h4>
<small>Dias Credito</small>
<small>Días Credito</small>
</div>
</div>
</div>
@@ -5579,7 +5590,7 @@
<asp:BoundField DataField="Fecha" ItemStyle-Width="15%" HeaderText="Fecha" ItemStyle-HorizontalAlign="Center" DataFormatString="{0:d}" />
<asp:BoundField DataField="Total" ItemStyle-HorizontalAlign="Right" HeaderText="Total" DataFormatString="{0:N2}" />
<asp:BoundField DataField="Abreviatura" ItemStyle-HorizontalAlign="Center" HeaderText="Mon" />
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="5%" HeaderText="Dias Credito">
<asp:TemplateField ItemStyle-HorizontalAlign="Center" ItemStyle-Width="5%" HeaderText="Días Credito">
<ItemTemplate>
<asp:TextBox ID="TxtDiasCredito" runat="server" Width="50%" Text='<%# Eval("DiasCredito", "{0:#,###.####}")%>'></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="FTBEDiasCredito" TargetControlID="TxtDiasCredito" FilterType="Numbers" runat="server" />

View File

@@ -1666,6 +1666,8 @@ Partial Class Clientes
DivProtletRegistrar.Visible = True
End If
TxtCorreoEntregaCompras.Text = ObjClientes.DtResultados(0)("CorreoEntregaCompras").ToString
TxtCorreoEntregaAlmacen.Text = ObjClientes.DtResultados(0)("CorreoEntregaCompras").ToString
Else
Existe = False
Alert("El Cliente Solicitado no existe, por favor revise su búsqueda.", TipoMensaje.MsgAdvertencia)
@@ -2441,7 +2443,7 @@ Partial Class Clientes
CveFormaPago33:=DdlFormaPago33.SelectedValue.ToEntero, CveMetodoPago33:=DdlMetodoPago33.SelectedValue.ToEntero, DesglosaIEPS:=ChkDesglosarIEPS.Checked, AplicaComercioExterior:=ChkAplicaComercioExterior.Checked, CveTipoOperacion:=DdlTipoOperacion.SelectedValue.ToEntero, CvePedimento:=DdlClavePedimento.SelectedValue.ToEntero, CveIncoterm:=DdlIncoterm.SelectedValue.ToEntero,
CvePais:=DdlPais.SelectedValue.ToEntero, CveEstado:=DdlEstado.SelectedValue.ToEntero, CveMunicipio:=DdlMunicipio.SelectedValue.ToEntero, CveColonia:=DdlColonia.SelectedValue.ToEntero, CveMotivoTraslado:=IIf(DdlMotivoTraslado.SelectedValue = "-1", "0", DdlMotivoTraslado.SelectedValue).ToString().ToEntero, NumRegIdTrib:=IIf(TxtNumRegIdTrib.Text = "", "-1", TxtNumRegIdTrib.Text).ToString(),
ComExtEstado:=IIf(TxtComExtEstado.Text = "", "-1", TxtComExtEstado.Text).ToString(), ComExtMunicipio:=IIf(TxtComExtMunicipio.Text = "", "-1", TxtComExtMunicipio.Text).ToString(), ComExtColonia:=IIf(TxtComExtColonia.Text = "", "-1", TxtComExtColonia.Text).ToString(), RequiereOC:=ChkRequiereOC.Checked, LT:=LT, LG:=LG, EsDistribuidor:=ChkEsDistribuidor.Checked,
TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero, CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked, CveTipoRetencion:=DdlTipoRetencion.SelectedValue.ToEntero()) Then
TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero, CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked, CveTipoRetencion:=DdlTipoRetencion.SelectedValue.ToEntero(), CorreoEntregaCompras:=TxtCorreoEntregaCompras.Text, CorreoEntregaAlmacen:=TxtCorreoEntregaAlmacen.Text) Then
ViewState("CveCliente") = ObjClientes.CveCliente
@@ -2536,7 +2538,7 @@ Partial Class Clientes
CveMotivoTraslado:=IIf(DdlMotivoTraslado.SelectedValue = "-1", "0", DdlMotivoTraslado.SelectedValue).ToString().ToEntero, NumRegIdTrib:=IIf(TxtNumRegIdTrib.Text = "", "-1", TxtNumRegIdTrib.Text).ToString(),
ComExtEstado:=IIf(TxtComExtEstado.Text = "", "-1", TxtComExtEstado.Text).ToString(), ComExtMunicipio:=IIf(TxtComExtMunicipio.Text = "", "-1", TxtComExtMunicipio.Text).ToString(), ComExtColonia:=IIf(TxtComExtColonia.Text = "", "-1", TxtComExtColonia.Text).ToString(),
ApellidoPaternoPF:=IIf(TxtApellidoPaterno.Text = "", "-1", TxtApellidoPaterno.Text).ToString(), ApellidoMaternoPF:=IIf(TxtApellidoMaterno.Text = "", "-1", TxtApellidoMaterno.Text).ToString(), NombresPF:=IIf(TxtNombres.Text = "", "-1", TxtNombres.Text).ToString(),
RequiereOC:=ChkRequiereOC.Checked, LT:=LT, LG:=LG, EsDistribuidor:=ChkEsDistribuidor.Checked, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero, CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked, CveTipoRetencion:=DdlTipoRetencion.SelectedValue.ToEntero()) Then
RequiereOC:=ChkRequiereOC.Checked, LT:=LT, LG:=LG, EsDistribuidor:=ChkEsDistribuidor.Checked, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero, CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked, CveTipoRetencion:=DdlTipoRetencion.SelectedValue.ToEntero(), CorreoEntregaCompras:=TxtCorreoEntregaCompras.Text, CorreoEntregaAlmacen:=TxtCorreoEntregaAlmacen.Text) Then
ObjClientes.LimpiaImpuestosLocales(CveCliente)

View File

@@ -2342,12 +2342,12 @@
<label for="<%= TxtCPCliente.ClientID.ToString()%>">Código Postal:</label>
</div>
<div class="form-group form-md-line-input input-iconright col-xs-4">
<asp:TextBox ID="TxtNumExtCliente" CssClass="form-control " runat="server" MaxLength="20" CausesValidation="true"></asp:TextBox>
<asp:TextBox ID="TxtNumExtCliente" CssClass="form-control " runat="server" MaxLength="40" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVNoEC" runat="server" ControlToValidate="TxtNumExtCliente" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Número Exterior''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarCliente"></asp:RequiredFieldValidator>
<label for="<%= TxtNumExtCliente.ClientID.ToString()%>">Número Exterior:</label>
</div>
<div class="form-group form-md-line-input input-iconright col-xs-4">
<asp:TextBox ID="TxtNumIntCliente" CssClass="form-control " runat="server" MaxLength="20" CausesValidation="true"></asp:TextBox>
<asp:TextBox ID="TxtNumIntCliente" CssClass="form-control " runat="server" MaxLength="50" CausesValidation="true"></asp:TextBox>
<label for="<%= TxtNumIntCliente.ClientID.ToString()%>">Número Interior:</label>
</div>
</div>

View File

@@ -1,134 +1,161 @@
<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="RepCancelacionesPorRespuesta.aspx.cs" Inherits="Ventas_RepCancelacionesPorRespuesta" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
Reporte de Cancelaciones por Respuesta
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<li>
<asp:LinkButton ID="LnkValidar" OnClick="LnkValidar_Click" runat="server"><i class="fa fa-check"></i>Verificar Cancelaciones</asp:LinkButton></li>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="portlet light smmallpadding traspasorow bordered">
<div class="portlet-title">
<div class="caption font-green">
<span class="caption-subject bold uppercase" style="line-height: 2;">Facturas Pendientes Por Respuesta</span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div class="tools">
<a href="javascript:;" class="collapse"></a>
</div>
</div>
<div class="portlet-body rowpadding">
<div class="row">
<div class="col-md-12">
<div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right" align="left">
<div style="margin-right: 15px">
<input type="text" id="TxtBusqueda1" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda1','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
</div>
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron solicitudes de cancelación"
DataKeyNames="CveVenta,CveCliente,Folio,TipoDocto,Nombre,FolioFiscal,Total,SubTotal,RFCCliente"
CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" data-sort="true" GridLines="None" Width="99%">
<Columns>
<asp:BoundField HeaderText="Cliente" DataField="Nombre" ItemStyle-Width="25%" />
<asp:BoundField HeaderText="Folio Fiscal" DataField="FolioFiscal" ItemStyle-Width="265px" />
<asp:HyperLinkField HeaderText="Serie Folio" DataTextField="SerieFolio" DataNavigateUrlFields="CveVenta" ItemStyle-Width="100px" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveVenta={0}" />
<asp:BoundField HeaderText="Fecha" DataField="Fecha" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-Width="80px" />
<asp:BoundField HeaderText="Importe" DataField="Total" DataFormatString="{0:N2}" ItemStyle-Width="90px" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Mon" DataField="Abreviatura" ItemStyle-Width="30px" />
<asp:BoundField HeaderText="Estatus" DataField="EstatusFactura" ItemStyle-Width="160px" />
<asp:TemplateField ItemStyle-Width="35px" HeaderText="Verificar">
<ItemTemplate>
<asp:LinkButton runat="server" OnClick="BtnValidar_Click" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea verificar la cancelación?" data-btn-ok-label="si"></asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
</Columns>
<RowStyle CssClass="Texto" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</div>
</div>
</div>
</div>
<div id="DivRefacturar" runat="server" visible="false" class="portlet light smmallpadding traspasorow bordered">
<div class="portlet-title">
<div class="caption font-green">
<span class="caption-subject bold uppercase" style="line-height: 2;">Facturas Pendientes Por Refacturar</span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div class="tools">
<a href="javascript:;" class="collapse"></a>
</div>
</div>
<div class="portlet-body rowpadding">
<div class="row">
<div class="col-md-12">
<div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right" align="left">
<div style="margin-right: 15px">
<input type="text" id="TxtBusqueda2" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvRefacturaciones.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvRefacturaciones.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
</div>
<asp:GridView ID="GvRefacturaciones" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron solicitudes de cancelación"
DataKeyNames="CveVenta,CveCliente,Folio,TipoDocto,Nombre,FolioFiscal,Total,SubTotal,RFCCliente"
CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" data-sort="true" GridLines="None" Width="99%" OnRowDataBound="GvDatos_RowDataBound">
<Columns>
<asp:BoundField HeaderText="Cliente" DataField="Nombre" ItemStyle-Width="25%" />
<asp:BoundField HeaderText="Folio Fiscal" DataField="FolioFiscal" ItemStyle-Width="265px" />
<asp:HyperLinkField HeaderText="Serie Folio" DataTextField="SerieFolio" DataNavigateUrlFields="CveVenta" ItemStyle-Width="100px" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveVenta={0}" />
<asp:BoundField HeaderText="Fecha" DataField="Fecha" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-Width="80px" />
<asp:BoundField HeaderText="Importe" DataField="Total" DataFormatString="{0:N2}" ItemStyle-Width="90px" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Mon" DataField="Abreviatura" ItemStyle-Width="30px" />
<asp:BoundField HeaderText="Estatus" DataField="EstatusFactura" ItemStyle-Width="160px" />
<asp:TemplateField ItemStyle-Width="35px" HeaderText="Verificar">
<ItemTemplate>
<asp:LinkButton runat="server" OnClick="BtnValidarRefacturacion_Click" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea verificar la cancelación?" data-btn-ok-label="si"></asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
<asp:HyperLinkField HeaderText="Refacturación" Text="Refacturar" DataNavigateUrlFields="CveVenta" ItemStyle-Width="100px" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveDevolucion={0}&NuevaFactura=1" />
<%-- <asp:TemplateField ItemStyle-Width="35px" HeaderText="Refacturar">
<ItemTemplate>
<asp:LinkButton runat="server" OnClick="BtnRefacturar_Click" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea verificar la cancelación?" data-btn-ok-label="si"></asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>--%>
</Columns>
<RowStyle CssClass="Texto" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</div>
</div>
</div>
</div>
<asp:Button ID="BtnRefacturarDocumento" runat="server" ClientIDMode="Static" Text="Refacturar Documento" Style="display: none;" />
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="RepCancelacionesPorRespuesta.aspx.cs" Inherits="Ventas_RepCancelacionesPorRespuesta" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
Reporte de Cancelaciones por Respuesta
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<li>
<asp:LinkButton ID="LnkValidar" OnClick="LnkValidar_Click" runat="server"><i class="fa fa-check"></i>Verificar Cancelaciones</asp:LinkButton></li>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="row">
<div class="col-md-12" style="vertical-align: middle;" align="center">
<div style="z-index: 5; position: relative;">
<div id="DivAdvertencia" clientidmode="Static" runat="server" class="alert alert-warning" style="padding: 5px; margin-bottom: 5px; padding-right: 25px;">
<button type="button" class="close" data-dismiss="alert" style="margin-top: 5px;" aria-hidden="true"></button>
<strong style="font-size: 20px; margin-right: 25px;">Información: </strong>
<asp:Literal Text="Para que el documento se cancele sin aceptación por parte del cliente tendrá que transcurrir 72 horas hábiles" runat="server" ID="LtlAdvertencia"></asp:Literal>
</div>
</div>
</div>
</div>
<div class="portlet light smmallpadding traspasorow bordered">
<div class="portlet-title">
<div class="caption font-green">
<span class="caption-subject bold uppercase" style="line-height: 2;">Facturas Pendientes Por Respuesta</span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div class="tools">
<a href="javascript:;" class="collapse"></a>
</div>
</div>
<div class="portlet-body rowpadding">
<div class="row">
<div class="col-md-12">
<div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right" align="left">
<div style="margin-right: 15px">
<input type="text" id="TxtBusqueda1" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda1','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
</div>
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron solicitudes de cancelación"
DataKeyNames="CveVenta,CveCliente,Folio,TipoDocto,Nombre,FolioFiscal,Total,SubTotal,RFCCliente"
CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" data-sort="true" GridLines="None" Width="99%">
<Columns>
<asp:BoundField HeaderText="Cliente" DataField="Nombre" ItemStyle-Width="25%" />
<asp:BoundField HeaderText="Folio Fiscal" DataField="FolioFiscal" ItemStyle-Width="265px" />
<asp:HyperLinkField HeaderText="Serie Folio" DataTextField="SerieFolio" DataNavigateUrlFields="CveVenta" ItemStyle-Width="100px" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveVenta={0}" />
<asp:BoundField HeaderText="Fecha" DataField="Fecha" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-Width="80px" />
<asp:BoundField HeaderText="Importe" DataField="Total" DataFormatString="{0:N2}" ItemStyle-Width="90px" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Mon" DataField="Abreviatura" ItemStyle-Width="30px" />
<asp:BoundField HeaderText="Estatus" DataField="EstatusFactura" ItemStyle-Width="160px" />
<asp:BoundField HeaderText="Fecha Solicitud" DataField="FechaCambioEstatus" ItemStyle-Width="160px" />
<asp:BoundField HeaderText="Fecha Cancelacion" DataField="FechaCancelacion" ItemStyle-Width="160px" />
<asp:TemplateField ItemStyle-Width="35px" HeaderText="Verificar">
<ItemTemplate>
<asp:LinkButton runat="server" OnClick="BtnValidar_Click" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea verificar la cancelación?" data-btn-ok-label="si"></asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
</Columns>
<RowStyle CssClass="Texto" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</div>
</div>
</div>
</div>
<div id="DivRefacturar" runat="server" visible="false" class="portlet light smmallpadding traspasorow bordered">
<div class="portlet-title">
<div class="caption font-green">
<span class="caption-subject bold uppercase" style="line-height: 2;">Facturas Pendientes Por Refacturar</span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div class="tools">
<a href="javascript:;" class="collapse"></a>
</div>
</div>
<div class="portlet-body rowpadding">
<div class="row">
<div class="col-md-12">
<div class="row" style="margin-left: 0px; margin-top: 5px; margin-bottom: 5px; text-align: right" align="left">
<div style="margin-right: 15px">
<input type="text" id="TxtBusqueda2" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda2','{0}')", GvRefacturaciones.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
<a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvRefacturaciones.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
</div>
</div>
<asp:GridView ID="GvRefacturaciones" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron solicitudes de cancelación"
DataKeyNames="CveVenta,CveCliente,Folio,TipoDocto,Nombre,FolioFiscal,Total,SubTotal,RFCCliente"
CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" data-sort="true" GridLines="None" Width="99%" OnRowDataBound="GvDatos_RowDataBound">
<Columns>
<asp:BoundField HeaderText="Cliente" DataField="Nombre" ItemStyle-Width="25%" />
<asp:BoundField HeaderText="Folio Fiscal" DataField="FolioFiscal" ItemStyle-Width="265px" />
<asp:HyperLinkField HeaderText="Serie Folio" DataTextField="SerieFolio" DataNavigateUrlFields="CveVenta" ItemStyle-Width="100px" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveVenta={0}" />
<asp:BoundField HeaderText="Fecha" DataField="Fecha" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-Width="80px" />
<asp:BoundField HeaderText="Importe" DataField="Total" DataFormatString="{0:N2}" ItemStyle-Width="90px" ItemStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Mon" DataField="Abreviatura" ItemStyle-Width="30px" />
<asp:BoundField HeaderText="Fecha Solicitud" DataField="FechaCambioEstatus" ItemStyle-Width="160px" />
<asp:BoundField HeaderText="Fecha Cancelacion" DataField="FechaCancelacion" ItemStyle-Width="160px" />
<asp:BoundField HeaderText="Estatus" DataField="EstatusFactura" ItemStyle-Width="160px" />
<asp:TemplateField ItemStyle-Width="35px" HeaderText="Verificar">
<ItemTemplate>
<asp:LinkButton runat="server" OnClick="BtnValidarRefacturacion_Click" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea verificar la cancelación?" data-btn-ok-label="si"></asp:LinkButton>
</ItemTemplate>
</asp:TemplateField>
<asp:HyperLinkField HeaderText="Refacturación" Text="Refacturar" DataNavigateUrlFields="CveVenta" ItemStyle-Width="100px" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveDevolucion={0}&NuevaFactura=1" />
</Columns>
<RowStyle CssClass="Texto" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</div>
</div>
</div>
</div>
<asp:Button ID="BtnRefacturarDocumento" runat="server" ClientIDMode="Static" Text="Refacturar Documento" Style="display: none;" />
</ContentTemplate>
</asp:UpdatePanel>
<asp:Button ID="BtnEnviarMailCancelacion" runat="server" ClientIDMode="Static" Text="Enviar Mail Cliente" Style="display: none;" OnClick="BtnEnviarMailCancelacion_Click" />
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
<script src="/Metronic/assets/global/plugins/jquery.pulsate.min.js"></script>
<script type="text/javascript">
function BtnRefacturarDocumento() {
$('#BtnRefacturarDocumento').click();
function BtnRefacturarDocumento() {
$('#BtnRefacturarDocumento').click();
}
</script>
</asp:Content>
function BtnEnviarMailCancelacion() {
$('#BtnEnviarMailCancelacion').click();
}
$(document).ready(function () {
if ($('#DivAdvertencia')) {
$("#DivAdvertencia").pulsate("destroy");
jQuery('#DivAdvertencia').pulsate({
color: "#faebcc"
});
}
});
</script>
</asp:Content>

View File

@@ -10,7 +10,8 @@ using System.Web.UI;
using System.Web.UI.WebControls;
using Extensiones;
using static Extensiones.ModExtensiones;
using Microsoft.Reporting.WebForms;
public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas
{
private DataTable DtVentas
@@ -75,7 +76,16 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas
string Nombre = GvRow.DataKey("Nombre");
if (CveVenta > 0)
{
Alert(VerificarVigenciaSAT(CveVenta, CveCliente, Folio, TipoDocto, Uuid, UsuarioActual.Empresa.RFC, RFCCliente, Total));
var resp = VerificarVigenciaSAT(CveVenta, CveCliente, Folio, TipoDocto, Uuid, UsuarioActual.Empresa.RFC, RFCCliente, Total);
if (resp.EnviarAcuse)
{
Alert(resp.Mensaje,TipoMensaje.MsgConfirmacion,"BtnEnviarMailCancelacion();");
}
else
{
Alert(resp.Mensaje);
}
}
CargaDatos();
}
@@ -92,28 +102,53 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas
string Folio = GvRow.DataKey("Folio");
string TipoDocto = GvRow.DataKey("TipoDocto");
string Nombre = GvRow.DataKey("Nombre");
if (CveVenta > 0)
{
Alert(VerificarVigenciaSAT(CveVenta, CveCliente, Folio, TipoDocto, Uuid, UsuarioActual.Empresa.RFC, RFCCliente, Total, true));
var respuesta = VerificarVigenciaSAT(CveVenta, CveCliente, Folio, TipoDocto, Uuid, UsuarioActual.Empresa.RFC, RFCCliente, Total, true);
Alert(respuesta.Mensaje);
CargaDatos();
//if (respuesta.IrARefacturar)
//{
// Server.Transfer(respuesta.LigaRefacturacion);
//}
//else
//{
// Alert(respuesta.Mensaje);
// CargaDatos();
//}
}
CargaDatos();
}
private string VerificarVigenciaSAT(int CveVenta, int CveCliente, string Folio, string TipoDocto, string uuid, string emisor, string receptor, string total, bool EsRefacturacion = false)
private MRespuestaSAT VerificarVigenciaSAT(int CveVenta, int CveCliente, string Folio, string TipoDocto, string uuid, string emisor, string receptor, string total, bool EsRefacturacion = false)
{
var retorno = new MRespuestaSAT()
{
Mensaje = "",
EnviarAcuse = false,
LigaRefacturacion = "",
IrARefacturar = false
};
var sb = new StringBuilder();
var CancelacionAcuse = "";
var CancelacionFecha = DateTime.Now;
string CancelacionAcuse = "";
DateTime CancelacionFecha = DateTime.Now;
int CveEstatus = 4;
try
{
var resp = Timbrado.VerificarVigenciaSAT(uuid, UsuarioActual.Empresa.RFC, receptor, total, UsuarioActual.Empresa.FacturaProduccion);
var resp = Timbrado.VerificarVigenciaSAT(uuid, UsuarioActual.Empresa.RFC, receptor, total, true);
if (resp != null)
{
if (resp.Estado == null)
{
sb.Append("No se pudo comprobar el estado de la factura. El servicio del sat no esta disponible");
return sb.ToString();
retorno.Mensaje = sb.ToString();
return retorno;
}
sb.AppendFormat("Folio Fiscal: {0} <br/>", uuid);
@@ -124,12 +159,22 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas
if (!UsuarioActual.Empresa.FacturaProduccion && (string.IsNullOrEmpty(uuid) || uuid.Contains("test")))
{
var FueCancelado = CancelarDocumento(CveVenta, CveEstatus, CveCliente, Folio, uuid, CancelacionAcuse, CancelacionFecha, TipoDocto, total.ToDouble(), UsuarioActual.Empresa.CvePAC).Mensaje;
var respCancelacion = CancelarDocumento(CveVenta, CveEstatus, CveCliente, Folio, uuid, CancelacionAcuse, CancelacionFecha, TipoDocto, total.ToDouble(), UsuarioActual.Empresa.CvePAC, EsRefacturacion: EsRefacturacion);
sb.AppendFormat("{0} <br/>", FueCancelado);
if (CveEstatus.Contiene(4, 5) && EsRefacturacion)
sb.AppendFormat("{0} <br/>", respCancelacion.Mensaje);
if (!respCancelacion.HuboError)
{
Response.Redirect(string.Format("Ventas.aspx?CveDevolucion={0}&NuevaFactura=1", CveVenta));
retorno.EnviarAcuse = true;
sb.Append("El Documento se canceló correctamente.");
sb.Append($"</br> <a href='/Compras/PopUpVerFactura.aspx?P={Encripta($"OP=CAN&CVEVTA={CveVenta}")}' class='Texto' target='_blank'>Imprimir Acuse</a>");
sb.Append("</br></br> ¿Desea enviar el Acuse de Cancelación al Cliente?");
}
if (respCancelacion.CveEstatus.Contiene(4, 5) && EsRefacturacion)
{
retorno.IrARefacturar = true;
retorno.LigaRefacturacion = string.Format("Ventas.aspx?CveDevolucion={0}&NuevaFactura=1", CveVenta);
}
}
else
@@ -137,30 +182,28 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas
if ((resp.EsCancelable.ToUpper() == "NO CANCELABLE"))
{
sb.Append("Esta factura no es cancelable.");
return sb.ToString();
retorno.Mensaje = sb.ToString();
return retorno;
}
if (resp.Estado.ToUpper().Trim() == "CANCELADO" || resp.EstatusCancelacion.ToUpper() == "PLAZO VENCIDO")
{
CveEstatus = 5;
var solicitud = new WSGF.Service1SoapClient();
var acuse = solicitud.GetAcuse(emisor, "rene.molina@adsistemas.mx", "rene2018", uuid);
if (acuse.Estado == 0)
var respCancelacion = CancelarDocumento(CveVenta, CveEstatus, CveCliente, Folio, uuid, CancelacionAcuse, CancelacionFecha, TipoDocto, total.ToDouble(), UsuarioActual.Empresa.CvePAC, EsRefacturacion: EsRefacturacion);
sb.AppendFormat("{0} <br/>", respCancelacion.Mensaje);
if (!respCancelacion.HuboError)
{
var xmlAcuse = new System.Xml.XmlDocument();
xmlAcuse.LoadXml(DecodeBase64(acuse.CfdiB64));
CancelacionAcuse = xmlAcuse.GetElementsByTagName("SignatureValue")[0].InnerText;
CancelacionFecha = xmlAcuse.SelectSingleNode("Acuse").Attributes["Fecha"].Value.ToDate();
sb.Append("El Documento se canceló correctamente.");
sb.Append($"</br> <a href='/Compras/PopUpVerFactura.aspx?P={Encripta($"OP=CAN&CVEVTA={CveVenta}")}' class='Texto' target='_blank'>Imprimir Acuse</a>");
sb.Append("</br></br> ¿Desea enviar el Acuse de Cancelación al Cliente?");
}
var FueCancelado = CancelarDocumento(CveVenta, CveEstatus, CveCliente, Folio, uuid, CancelacionAcuse, CancelacionFecha, TipoDocto, total.ToDouble(), UsuarioActual.Empresa.CvePAC, EsRefacturacion: EsRefacturacion).Mensaje;
sb.AppendFormat("{0} <br/>", FueCancelado);
if (CveEstatus.Contiene(4, 5) && EsRefacturacion)
if (respCancelacion.CveEstatus.Contiene(4, 5) && EsRefacturacion)
{
Response.Redirect(string.Format("Ventas.aspx?CveDevolucion={0}&NuevaFactura=1", CveVenta));
retorno.IrARefacturar = true;
retorno.LigaRefacturacion = string.Format("Ventas.aspx?CveDevolucion={0}&NuevaFactura=1", CveVenta);
}
}
else if (resp.EstatusCancelacion.ToUpper() == "SOLICITUD RECHAZADA")
@@ -183,16 +226,19 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas
else
{
sb.Append("No se pudo comprobar la vigencia de la factura.");
return sb.ToString();
retorno.Mensaje = sb.ToString();
return retorno;
}
}
catch (Exception ex)
{
sb.Append("Error al consumir el servicio: " + ex.Message);
return sb.ToString();
sb.Append("Error al consumir el servicio: " + ex.Message);
retorno.Mensaje = sb.ToString();
return retorno;
}
return sb.ToString();
retorno.Mensaje = sb.ToString();
return retorno;
}
private Modelos.Factura.MCancelacionVentaMensaje CancelarDocumento(int CveVenta, int CveEstatus, int CveCliente, string Folio, string FolioFiscal, string CancelacionAcuse, DateTime CancelacionFecha, string TipoComprobante, double Total, int CvePACCancelacion, bool EsRefacturacion = false)
{
@@ -209,181 +255,7 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas
return retorno;
}
//private int GenerarPolizaAC(ClsContPAQi ObjAC, int CveVenta, string Folio, int CveCliente, string TipoComprobante, DateTime Fecha, bool CancelacionIngreso = false)
//{
// int CtaCliente = 0;
// int OrdenPago = 0;
// string NombreCliente = "";
// var ObjClientes = new ClsClientes();
// if (ObjClientes.GetClientes(CveCliente, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa))
// {
// CtaCliente = ObjClientes.IdCtaContClientes;
// NombreCliente = ObjClientes.NombreComercial;
// }
// ObjClientes.Dispose();
// var ObjVentas = new ClsVentas();
// if (ObjVentas.GetVenta(CveVenta, UsuarioActual.CveEmpresa))
// {
// if (ObjVentas.DtResultados.Rows.Count > 0)
// {
// OrdenPago = ObjVentas.DtResultados.Rows[0]["Num3"].ToEntero();
// }
// }
// int Retorno = 0;
// int IDPoliza = 0;
// bool ErrorAC = false;
// string Concepto = string.Format("GD {0}", NombreCliente);
// int Paridad = 1;
// bool TipoMovto = false;
// if (CancelacionIngreso)
// {
// Concepto = string.Format("Cancelación GD {0}", NombreCliente);
// Paridad = -1;
// TipoMovto = true;
// }
// var TipoPoliza = TipoComprobante.Contiene("OP", "Com") ? 3 : 1;
// DataRow dr = null;
// int CtaISSSTESON = 643;
// int CtaISPT = 1745;
// var AC = new ClsAC();
// //var ObjAC = new ClsContPAQi(UsuarioActual.Empresa);
// //ObjAC.IniciaTransacSQL();
// IDPoliza = ObjAC.AddPoliza(TipoPoliza, Concepto, 0, 0, UsuarioActual.CveUsuario, Fecha);
// if (IDPoliza > 0)
// {
// if (TipoComprobante == "OP")
// {
// //Orden de PAGO
// if (OrdenPago == 1)
// {
// //ISSSTESON
// if (ObjAC.AddMovimiento(IDPoliza, CtaCliente, false, (Paridad * 0d), "", Concepto, 0, Fecha, ""))
// {
// if (!ObjAC.AddMovimiento(IDPoliza, CtaISSSTESON, true, (Paridad * 0d), "", Concepto, 0, Fecha, ""))
// {
// ErrorAC = true;
// }
// }
// else
// {
// ErrorAC = true;
// }
// }
// else
// {
// //ISPT
// if (ObjAC.AddMovimiento(IDPoliza, CtaCliente, false, (Paridad * 0d), "", Concepto, 0, Fecha, ""))
// {
// if (!ObjAC.AddMovimiento(IDPoliza, CtaISPT, true, (Paridad * 0d), "", Concepto, 0, Fecha, ""))
// {
// ErrorAC = true;
// }
// }
// else
// {
// ErrorAC = true;
// }
// }
// }
// else
// {
// //NORMAL
// DataTable Detalles = null;
// DataTable DTPresupuestoIngresos = null;
// if (ObjVentas.GetVentaDetalle(CveVenta))
// {
// Detalles = ObjVentas.DtResultados.Copy();
// }
// if (AC.GetPresupuestoIngresos(-1, DateTime.Now.Year, true, UsuarioActual.CveEmpresa))
// {
// DTPresupuestoIngresos = AC.DtResultados.Copy();
// }
// if (Detalles != null && DTPresupuestoIngresos != null)
// {
// var query = from gvr in Detalles.AsEnumerable()
// group gvr by gvr["CvePresupuestoIngreso"].ToString().ToEntero() into g
// select new { TotalImporte = g.Sum((x) => x["Total"].ToString().ToDouble()), CvePresupuestoIngreso = g.Key };
// foreach (var item in query)
// {
// dr = DTPresupuestoIngresos.FiltroPrimero(string.Format("CvePresupuestoIngreso = {0}", item.CvePresupuestoIngreso));
// if (dr != null)
// {
// Concepto = string.Format("{0} - {1}: {2}", NombreCliente, TipoComprobante, Folio);
// if (ObjAC.AddMovimiento(IDPoliza, dr["IdCuentaPorEjecutar"].ToString().ToEntero(), false, (Paridad * item.TotalImporte), "", Concepto, 0, Fecha, ""))
// {
// if (ObjAC.AddMovimiento(IDPoliza, dr["IdCuentaDevengado"].ToString().ToEntero(), true, (Paridad * item.TotalImporte), "", Concepto, 0, Fecha, ""))
// {
// // CARGO la deuda del cliente
// if (ObjAC.AddMovimiento(IDPoliza, CtaCliente, TipoMovto, item.TotalImporte, "", Concepto, 0, Fecha, ""))
// {
// // abono,
// if (!ObjAC.AddMovimiento(IDPoliza, dr["IdCuentaMatriz"].ToString().ToEntero(), !TipoMovto, item.TotalImporte, "", Concepto, 0, Fecha, ""))
// {
// ErrorAC = true;
// break;
// }
// }
// else
// {
// ErrorAC = true;
// break;
// }
// }
// else
// {
// ErrorAC = true;
// break;
// }
// }
// else
// {
// ErrorAC = true;
// break;
// }
// }
// else
// {
// ErrorAC = true;
// break;
// }
// }
// }
// else
// {
// ErrorAC = true;
// }
// }
// }
// else
// {
// ErrorAC = true;
// }
// if (!ErrorAC)
// {
// ObjAC.AjustaPoliza(IDPoliza);
// Retorno = IDPoliza;
// }
// else
// {
// Alert("Error al Agregar la Póliza de AC.", TipoMensaje.MsgError);
// }
// AC.Dispose();
// ObjVentas.Dispose();
// return Retorno;
//}
private string DecodeBase64(string strXMLCodificado)
{
try
@@ -429,8 +301,124 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas
{
if (e.Row.DBCampo("PuedeRefacturar").ToString().ToEntero() == 0)
{
e.Row.Cells[8].Text = "";
e.Row.Cells[10].Text = "";
}
}
}
public void BtnEnviarMailCancelacion_Click(object sender, EventArgs e)
{
ImprimeCancelacion(CveVenta);
}
public void ImprimeCancelacion(int CveVenta)
{
var Archivo = new System.IO.FileInfo(ModExtensiones.DirectorioBaseEmpresas + @"Empresas\Grales\Formatos\AcuseCancelacion.rdlc");
if (Archivo.Exists)
{
var ObjFactura = new Modelos.Factura(UsuarioActual, CveVenta, UsuarioActual.CveEmpresa);
string SelloCancelacion = "";
string FechaCancelacion = "";
DataTable DtDatos = null;
using (ClsVentas ObjVentas = new ClsVentas())
{
if (ObjVentas.GetVenta(CveVenta, UsuarioActual.CveEmpresa))
{
DtDatos = ObjVentas.DtResultados.Copy();
DataRow drv = DtDatos.Rows[0];
SelloCancelacion = drv["SelloCancelacion"].ToString();
FechaCancelacion = drv["FechaCancelacion"].ToString().ToDateTime().ToString("dd/MM/yyyy HH:mm:ss");
}
}
List<ReportParameter> parametros = new List<ReportParameter>();
parametros.Add(new ReportParameter("FechaCancelacion", FechaCancelacion.ToString()));
parametros.Add(new ReportParameter("FolioFiscal", ObjFactura.FolioFiscal));
parametros.Add(new ReportParameter("RFCEmisor", UsuarioActual.Empresa.RFC));
parametros.Add(new ReportParameter("SelloCancelacion", SelloCancelacion));
byte[] ObjetoPDF = StreamPDF(@"Empresas\Grales\Formatos\AcuseCancelacion.rdlc", DtDatos, parametros, "AcuseCancelacion" + CveVenta);
List<ClsSisMail.ArchivoMail> LSRutasMail = new List<ClsSisMail.ArchivoMail>();
string Asunto = string.Empty;
string Cuerpo = string.Empty;
StringBuilder sb = new StringBuilder();
if (UsuarioActual.CveEmpresa == 119)
{
sb.Append("<!DOCTYPE html>");
sb.Append("<html>");
sb.Append("<head>");
sb.Append("<meta http-equiv=\"Content-Type\" content=\"text/html; charset=utf-8\"/>");
sb.Append(" <title>Acuse De Cancelación</title>");
sb.Append(" <meta charset=\"utf-8\" />");
sb.Append("</head>");
sb.Append("<body>");
sb.Append(" <font face=\"calibri\">");
sb.Append($" Estimado Cliente <b>{ObjFactura.Cliente.Nombre}</b>,<br /><br />");
sb.Append($" Le informamos que Agroquímicos JAM, S.A. DE C.V ha cancelado el CFDI <b>{ObjFactura.SerieFolio}</b>, el cual ha quedado sin Efectos Fiscales y encontrará adjunto en este correo el Acuse de <br />");
sb.Append($" cancelación del SAT.<br />");
sb.Append(" POR LO QUE PEDIMOS ELIMINARLO Y NO INCLUIRLO EN SU CONTABILIDAD, YA QUE PUEDE REPRESENTAR UN PROBLEMA FISCAL PARA USTED O SU EMPRESA CUANDO EL SAT REALICE UNA FUTURA AUDITORIA <br /> ");
sb.Append(" EN SU CONTABILIDAD. </font> ");
sb.Append(" <font face=\"calibri\" size=\"2\">");
sb.Append(" <br /><br /><br /><br /><br />");
sb.Append(" <i>Este correo se generó automaticamente, favor de no responder este mensaje.</i>");
sb.Append(" </font>");
sb.Append("</body>");
sb.Append("</html>");
}
else
{
sb.Append("<!DOCTYPE html>");
sb.Append("<html>");
sb.Append("<head>");
sb.Append("<meta http-equiv=\"Content-Type\" content=\"text/html; charset=utf-8\"/>");
sb.Append(" <title>Acuse De Cancelación</title>");
sb.Append(" <meta charset=\"utf-8\" />");
sb.Append("</head>");
sb.Append("<body>");
sb.Append(" <font face=\"calibri\">");
sb.Append($" Estimado Cliente <b>{ObjFactura.Cliente.Nombre}</b>,<br /><br />");
sb.Append($" A través del presente medio la Empresa <b>{UsuarioActual.Empresa.Empresa} - {UsuarioActual.Empresa.RFC}</b>, canceló el documento tipo <b>{ObjFactura.TipodeComprobante}</b> <br />");
sb.Append($" con folio <b>{ObjFactura.SerieFolio}</b> y el Importe de <b>${ObjFactura.Total}</b>. <br /><br />");
sb.Append(" Le hacemos llegar el acuse de cancelación. </font> ");
sb.Append(" <font face=\"calibri\" size=\"2\">");
sb.Append(" <br /><br /><br /><br /><br />");
sb.Append(" <i>Este correo se generó automaticamente, favor de no responder este mensaje.</i>");
sb.Append(" </font>");
sb.Append("</body>");
sb.Append("</html>");
}
Asunto = $"Acuse de Cancelacion {ObjFactura.SerieFolio}";
Cuerpo = sb.ToString();
string DisplayName = "";
if (UsuarioActual.CveEmpresa == 119)
DisplayName = "Facturación Agroquímicos JAM";
LSRutasMail.Add(new ClsSisMail.ArchivoMail() { ArchivoBinario = ObjetoPDF, NombreArchivo = $"AcuseCancelacion{ObjFactura.SerieFolio}.pdf" });
ClsSisMail ObjMail = new ClsSisMail();
if (ObjMail.SendMail(UsuarioActual.Empresa, ObjFactura.Cliente.Mail, Asunto, Cuerpo, "", LSRutasMail, Displayname: DisplayName))
{
Alert("El acuse de cancelación ha sido envíado correctamente.");
}
else
{
Alert("El acuse de cancelación no pudo ser enviado.",TipoMensaje.MsgError);
}
}
}
}
public class MRespuestaSAT
{
public bool EnviarAcuse { get; set; }
public string LigaRefacturacion { get; set; }
public bool IrARefacturar { get; set; }
public string Mensaje { get; set; }
}

View File

@@ -6326,12 +6326,12 @@
<label for="<%= TxtCPCliente.ClientID.ToString()%>">Código Postal:</label>
</div>
<div class="form-group form-md-line-input input-iconright col-xs-4">
<asp:TextBox ID="TxtNumExtCliente" CssClass="form-control " runat="server" MaxLength="20" CausesValidation="true"></asp:TextBox>
<asp:TextBox ID="TxtNumExtCliente" CssClass="form-control " runat="server" MaxLength="40" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVNoEC" runat="server" ControlToValidate="TxtNumExtCliente" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Número Exterior''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarCliente"></asp:RequiredFieldValidator>
<label for="<%= TxtNumExtCliente.ClientID.ToString()%>">Número Exterior:</label>
</div>
<div class="form-group form-md-line-input input-iconright col-xs-4">
<asp:TextBox ID="TxtNumIntCliente" CssClass="form-control " runat="server" MaxLength="20" CausesValidation="true"></asp:TextBox>
<asp:TextBox ID="TxtNumIntCliente" CssClass="form-control " runat="server" MaxLength="50" CausesValidation="true"></asp:TextBox>
<label for="<%= TxtNumIntCliente.ClientID.ToString()%>">Número Interior:</label>
</div>
</div>

View File

@@ -10,6 +10,7 @@ Imports System.Security.Cryptography.X509Certificates
Imports System.Globalization
Imports System.Net.Http
Imports Newtonsoft.Json.Linq
Imports System.Diagnostics
Partial Class Ventas
Inherits ClsPaginas
@@ -7018,11 +7019,18 @@ Partial Class Ventas
'End If
'Esquema viejo, evitamos que aparezca por surtir
If ErrorList.Count = 0 Then
'MARCAR VENTA ANTERIOR
If Not ObjInventario.ActualizarEsDevolucionVenta(CveDevolucion, 2) Then
ErrorList.Add("No se pudo Cancelar el movimiento de almacen de la Factura")
End If
'MARCAR VENTA ANTERIOR
If VentaSaldoAlmacenNC <> 0 OrElse DevolucionAlmacenNC = 2 Then
If Not ObjInventario.ActualizarEsDevolucionVenta(ObjFactura.CveVenta, 2) Then
ErrorList.Add("No se pudo Cancelar el movimiento de almacen de la Factura")
End If
End If
End If
End If
End If
@@ -9478,7 +9486,7 @@ Partial Class Ventas
Kilometraje:=TxtKilometraje.Text.ToDouble, EsAmortizacion:=EsNCAmortizacion, CveTipoRetencion:=CveTipoRetencion) Then
ErrorList.Add("Ocurrió un error al Generar la Venta.<br />Revise su factura y cualquier detalle comuníquese a Soporte Técnico")
Else
If factura.TipoDocto.Contiene("Dev", "Egs") Or DtVentasNC IsNot Nothing Then
If factura.TipoDocto.Contiene("Dev", "Egs") Or DtVentasNC IsNot Nothing Or CveEstatusRefacturacion = 1 Then
If DtVentasNC IsNot Nothing Then
For Each row As DataRow In DtVentasNC.Rows
If Not row("CveVenta").ToString().ToEntero() = -1 Then
@@ -13302,7 +13310,7 @@ Partial Class Ventas
End If
Else
Alert("Se presento un error al cancelar el complemento.")
Alert("Los servicios de cancelación del SAT no se encuentran disponibles o presentan time out. Intente de nuevo en unos minutos.<br/>Origen del error: WebService www.sat.gob.mx", TipoMensaje.MsgError)
End If
ObjBanco.Dispose()
@@ -16167,6 +16175,8 @@ Partial Class Ventas
End If
MovDetalle.Dispose()
OcurrioError = Not GeneroMovimientoAlmacen
End If
End If
@@ -16180,7 +16190,7 @@ Partial Class Ventas
End If
Next
OcurrioError = Not GeneroMovimientoAlmacen
End If
End If
@@ -16334,7 +16344,7 @@ Partial Class Ventas
CveMovimientoDetalleEntrada = MovDet("CveMovimientoDetalle").ToString().ToEntero()
End If
If ObjInventario.AddMovimientoDetalle(CveMovimientoInventario, Cantidad, CveUnidad, CveProducto, PU, -1, CveSeccionAlmacen:=CVeSeccionAlmacen, Serie:=Serie, Lote:=Lote, FechaCaducidad:=FechaCaducidad, CveVentaDetalle:=CveVentaDetalle, CveMovimientoDetalleEntrada:=CveMovimientoDetalleEntrada) Then
If ObjInventario.AddMovimientoDetalle(CveMovimientoInventario, Cantidad, CveUnidad, CveProducto, PU, -1, CveSeccionAlmacen:=CveSeccionAlmacen, Serie:=Serie, Lote:=Lote, FechaCaducidad:=FechaCaducidad, CveVentaDetalle:=CveVentaDetalle, CveMovimientoDetalleEntrada:=CveMovimientoDetalleEntrada) Then
ContadorMovtosDetalles += 1
Else
OcurrioError = True
@@ -17035,7 +17045,21 @@ Partial Class Ventas
Dim TotalT As Decimal = TxtTotal.Text.ToDecimal
Dim RFCReceptor As String = LblRFC.Text.Trim
Dim SWatch As New Stopwatch
SWatch.Start()
Dim Vigencia = Timbrado.VerificarVigenciaSAT(FolioFiscal, UsuarioActual.Empresa.RFC, RFCReceptor, TotalT.ToString(), True)
SWatch.Stop()
Dim SegundosRespuesta As Double = SWatch.ElapsedMilliseconds / 1000
SegundosRespuesta = SegundosRespuesta.ToEntero
If SegundosRespuesta >= 5 Then
Alert($"Los servicios de validacion del SAT presentan lentitud en la respuesta [{ SegundosRespuesta } s].", TipoMensaje.ToastError, "")
End If
If Vigencia IsNot Nothing Then
If Vigencia.EsCancelable.ToUpper() = "NO CANCELABLE" Then
@@ -18003,17 +18027,30 @@ Partial Class Ventas
Private Function ValidaPagosContado() As Boolean
Dim Retorno = False
Dim AmortizacionNC As Decimal = 0
'SI ES AMORTIZACION POR NOTA DE CREDITO DEBE SUMAR LA TOTALIDAD PARA COMPARAR EL PAGO
If DdlTipoAmortizacionAnticipo.SelectedValue = "2" Then
For Each gvr As GridViewRow In GVAnticipos.Rows
If gvr.FCCheckBox("Chk" & gvr.RowIndex) IsNot Nothing AndAlso gvr.FCCheckBox("Chk" & gvr.RowIndex).Checked AndAlso gvr.DataKey("CveConceptoContable").ToEntero().Contiene(3) Then
AmortizacionNC += gvr.FCTextBox(String.Format("TxtAnticipo{0}", gvr.RowIndex)).Text.ToDecimal
End If
Next
End If
Dim TienePagos As Boolean = ((Not (DtPagos Is Nothing OrElse DtPagos.Rows.Count = 0)) AndAlso (DtPagos IsNot Nothing AndAlso DtPagos.Rows.Count > 0)) OrElse AmortizacionNC > 0
'SI LA VENTA ES NUEVA VALIDAR TAMBIEN LOS PAGOS DE CONTADO
If UsuarioActual.CveEmpresa = 141 AndAlso CveVenta <= 0 AndAlso DdlTipoComprobante.SelectedValue.Contiene("Ing", "Rem", "Ant") Then
If Not PermiteCredito AndAlso (DtPagos Is Nothing OrElse DtPagos.Rows.Count = 0) AndAlso TxtTotal.Text.ToDecimal > 0 Then
If Not PermiteCredito AndAlso Not TienePagos AndAlso TxtTotal.Text.ToDecimal > 0 Then
Alert("Es necesario especificar un pago.", TipoMensaje.MsgAdvertencia)
Retorno = True
Return Retorno
End If
If Not PermiteCredito AndAlso (DtPagos IsNot Nothing AndAlso DtPagos.Rows.Count > 0) AndAlso TxtTotal.Text.ToDecimal > 0 Then
Dim TotalPago As Decimal = DtPagos.SUM("Importe").ToDecimal()
If Not PermiteCredito AndAlso TienePagos AndAlso TxtTotal.Text.ToDecimal > 0 Then
Dim TotalPago As Decimal = DtPagos.SUM("Importe").ToDecimal() + AmortizacionNC
If TotalPago < TxtTotal.Text.ToDecimal Then
Alert("La suma de los pagos debe ser igual al total de la venta.", TipoMensaje.MsgAdvertencia)
@@ -18026,15 +18063,15 @@ Partial Class Ventas
'SI TIENE SALDO PENDIENTE VALIDA SI TIENE PAGOS
If Me.SaldoVenta > 0 Then
If DdlTipoComprobante.SelectedValue.Contiene("Ing", "Rem", "Ant") AndAlso (UsuarioActual.Empresa.Funcionalidad(531) = "1") AndAlso (Not PermiteCredito) AndAlso (DtPagos Is Nothing OrElse DtPagos.Rows.Count = 0) And TxtTotal.Text.ToDecimal > 0 Then
If DdlTipoComprobante.SelectedValue.Contiene("Ing", "Rem", "Ant") AndAlso (UsuarioActual.Empresa.Funcionalidad(531) = "1") AndAlso (Not PermiteCredito) AndAlso Not TienePagos And TxtTotal.Text.ToDecimal > 0 Then
Alert("Es necesario especificar un pago.", TipoMensaje.MsgAdvertencia)
Retorno = True
End If
If UsuarioActual.CveEmpresa = 141 AndAlso DdlTipoComprobante.SelectedValue.Contiene("Ing", "Rem", "Ant") Then
If Not PermiteCredito AndAlso DtPagos IsNot Nothing AndAlso DtPagos.Rows.Count > 0 AndAlso TxtTotal.Text.ToDecimal > 0 Then
Dim TotalPago As Decimal = DtPagos.SUM("Importe").ToDecimal()
If Not PermiteCredito AndAlso TienePagos AndAlso TxtTotal.Text.ToDecimal > 0 Then
Dim TotalPago As Decimal = DtPagos.SUM("Importe").ToDecimal() + AmortizacionNC
If TotalPago < TxtTotal.Text.ToDecimal Then
Alert("La suma de los pagos debe ser igual al total de la venta.", TipoMensaje.MsgAdvertencia)
@@ -18048,18 +18085,18 @@ Partial Class Ventas
If UsuarioActual.Empresa.Funcionalidad(572) = "1" Then
Dim TotalNC As Decimal = If(ListaNCDesc IsNot Nothing AndAlso ListaNCDesc.Count > 0, LblTotalNC.Text.Trim().ToDecimal(), 0)
If TotalNC > 0 Then
If (DtPagos.SUM("Importe").ToString().ToDecimal + Total - TxtCambio.Text.ToDecimal) > TotalNC Then
If (DtPagos.SUM("Importe").ToString().ToDecimal() + AmortizacionNC + Total - TxtCambio.Text.ToDecimal) > TotalNC Then
Alert("El importe de los pagos no puede exceder el importe de la factura. Por favor verifique.", TipoMensaje.MsgAdvertencia)
Retorno = True
End If
Else
If (DtPagos.SUM("Importe").ToString().ToDecimal + Total - TxtCambio.Text.ToDecimal) > TxtTotal.Text.ToDecimal Then
If (DtPagos.SUM("Importe").ToString().ToDecimal() + AmortizacionNC + Total - TxtCambio.Text.ToDecimal) > TxtTotal.Text.ToDecimal Then
Alert("El importe de los pagos no puede exceder el importe de la factura. Por favor verifique.", TipoMensaje.MsgAdvertencia)
Retorno = True
End If
End If
Else
If (DtPagos.SUM("Importe").ToString().ToDecimal + Total - TxtCambio.Text.ToDecimal) > TxtTotal.Text.ToDecimal Then
If (DtPagos.SUM("Importe").ToString().ToDecimal() + AmortizacionNC + Total - TxtCambio.Text.ToDecimal) > TxtTotal.Text.ToDecimal Then
Alert("El importe de los pagos no puede exceder el importe de la factura. Por favor verifique.", TipoMensaje.MsgAdvertencia)
Retorno = True
End If
@@ -19178,6 +19215,7 @@ Partial Class Ventas
End If
sb.Clear()
End If
ObjVentas.Dispose()
End Sub
Private Sub MostrarCondicionesCancelacion()
@@ -19212,7 +19250,19 @@ Partial Class Ventas
Dim TotalT As Decimal = TxtTotal.Text.ToDecimal
Dim RFCReceptor As String = LblRFC.Text.Trim
Dim SWatch As New Stopwatch
SWatch.Start()
Dim Vigencia = Timbrado.VerificarVigenciaSAT(FolioFiscal, UsuarioActual.Empresa.RFC, RFCReceptor, TotalT.ToString(), True)
SWatch.Stop()
Dim SegundosRespuesta As Double = SWatch.ElapsedMilliseconds / 1000
SegundosRespuesta = SegundosRespuesta.ToEntero
If SegundosRespuesta >= 5 Then
Alert($"Los servicios de validacion del SAT presentan lentitud en la respuesta [{ SegundosRespuesta } s].", TipoMensaje.ToastAdventencia, "")
End If
If Vigencia IsNot Nothing Then
If Vigencia.EsCancelable.ToUpper() = "NO CANCELABLE" Then
Alert("Esta factura no es cancelable.", TipoMensaje.MsgAdvertencia)
@@ -19272,7 +19322,7 @@ Partial Class Ventas
CancelacionAcuse = ObjCancelacion.CancelacionAcuse
CveEstatus = 5
Else
Alert("La factura no se pudo cancelar ante el SAT", TipoMensaje.MsgError)
Alert("Los servicios de cancelación del SAT no se encuentran disponibles o presentan time out. Intente de nuevo en unos minutos.<br/>Origen del error: WebService www.sat.gob.mx", TipoMensaje.MsgError)
Exit Sub
End If
Else
@@ -19392,6 +19442,8 @@ Partial Class Ventas
Dim resp As Modelos.Factura.MCancelacionVentaMensaje = Nothing
If ObjFacturaCancelacion IsNot Nothing AndAlso ObjFacturaCancelacion.CveVenta > 0 Then
Dim SWatch As New Stopwatch
SWatch.Start()
If EsRefacturacion Then
resp = ObjFacturaCancelacion.CancelarPorRefacturacion()
@@ -19410,16 +19462,25 @@ Partial Class Ventas
resp = ObjFacturaCancelacion.CancelarFactura(ChkDevAlm.Checked, ListaRemisionesCancelar)
End If
SWatch.Stop()
Dim SegundosRespuesta As Double = SWatch.ElapsedMilliseconds / 1000
SegundosRespuesta = SegundosRespuesta.ToEntero
If SegundosRespuesta >= 5 Then
Alert($"Los servicios de cancelación del SAT presentan lentitud en la respuesta [{ SegundosRespuesta } s].", TipoMensaje.ToastAdventencia, "")
End If
If resp.CveEstatus = 5 AndAlso Not EsRefacturacion Then
Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnEnviarMailCancelacion();", TextoConfirmacion:="&nbsp;&nbsp;&nbsp;&nbsp;Si&nbsp;&nbsp;&nbsp;&nbsp;", TextoCancelacion:="&nbsp;&nbsp;&nbsp;&nbsp;<a onclick='Recargar()'>No</>&nbsp;&nbsp;&nbsp;&nbsp;")
Else
If EsRefacturacion Then
If resp.CveEstatus = 20 Then
ObjFacturaCancelacion.Dispose()
Response.Redirect($"/Ventas/RepCancelacionesPorRespuesta.aspx?CveVenta={CveVenta}")
Server.Transfer($"/Ventas/RepCancelacionesPorRespuesta.aspx?CveVenta={CveVenta}")
ElseIf resp.CveEstatus.Contiene(4, 5) Then
ObjFacturaCancelacion.Dispose()
Response.Redirect($"Ventas.aspx?CveDevolucion={CveVenta}&NuevaFactura=1")
Server.Transfer($"Ventas.aspx?CveDevolucion={CveVenta}&NuevaFactura=1")
Else
Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnRefrescarPagina();")
End If

View File

@@ -60,6 +60,8 @@