Merge branch 'master' of http://agonzalez@192.168.10.111:8383/SIG.git
This commit is contained in:
@@ -1149,12 +1149,6 @@ Public Class ClsInventarios
|
||||
End With
|
||||
Try
|
||||
SqlAdapter.Fill(Data)
|
||||
|
||||
If Data IsNot Nothing AndAlso Data.Rows.Count >= 1 Then
|
||||
Dim dr As DataRow = Data.Rows(0)
|
||||
CveSeccion = dr("CveSeccionAlmacen").ToString.ToEntero
|
||||
End If
|
||||
|
||||
Retorno = True
|
||||
Catch ex As Exception
|
||||
OnError("Ocurrió un error al obtener los movimientos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||
@@ -2952,7 +2946,7 @@ Public Class ClsInventarios
|
||||
DataAdapter("Vta_UpdateDevolucionVentaDetalle")
|
||||
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
.Add("@CveVentaDetalle", SqlDbType.Int).Value = CveVenta
|
||||
.Add("@CveVentaDetalle", SqlDbType.Int).Value = CveVentaDetalle
|
||||
.Add("@Valor", SqlDbType.Int).Value = Valor
|
||||
End With
|
||||
|
||||
|
||||
@@ -522,10 +522,28 @@ Public Class ClsNominas
|
||||
Return Retorno
|
||||
End Function
|
||||
|
||||
Public Function AutorizaNom_Nominas(CvePersonal As Integer, CvePeriodo As Integer, Optional Autorizado As Boolean = True) As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
DataAdapter("PA_Nom_Nominas_Autoriza")
|
||||
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
.Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal
|
||||
.Add("@CvePeriodo", SqlDbType.Int).Value = CvePeriodo
|
||||
.Add("@Autorizado", SqlDbType.Bit).Value = Autorizado
|
||||
End With
|
||||
Try
|
||||
SqlAdapter.Fill(Data)
|
||||
Retorno = True
|
||||
Catch ex As Exception
|
||||
OnError("Ocurrió un error al autorizar la nomina.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
|
||||
End Try
|
||||
|
||||
Return Retorno
|
||||
End Function
|
||||
Public Function AddNom_Nominas(FolioNom As Integer, CveNominaTipo As Integer, CvePersonal As Integer, CvePeriodo As Integer, SubTotal As Double, Descuento As Double, RetISR As Double, Total As Double,
|
||||
CveMoneda As Integer, TipoCambio As Double, CveMetodoPago As Integer, Fecha As Date, MotivoDescuento As String, Observaciones As String,
|
||||
Alfa1 As String, Alfa2 As String, Alfa3 As String, Num1 As Double, Num2 As Double, Num3 As Double,
|
||||
Fech1 As Date, Fech2 As Date, Fech3 As Date, CveUsuario As Integer, CveEmpresa As Integer) As Boolean
|
||||
Fech1 As Date, Fech2 As Date, Fech3 As Date, CveUsuario As Integer, CveEmpresa As Integer, Optional Autorizado As Boolean = True) As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
DataAdapter("PA_Nom_NominasAdd")
|
||||
|
||||
@@ -555,6 +573,7 @@ Public Class ClsNominas
|
||||
.Add("@Fech3", SqlDbType.VarChar).Value = IIf(Fech3.ToString = "01/01/0001 12:00:00 a.m.", "-1", Fech3.ToString)
|
||||
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
|
||||
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
|
||||
.Add("@Autorizado", SqlDbType.Bit).Value = Autorizado
|
||||
.Add("@RETURN_VALUE", SqlDbType.Int).Direction = ParameterDirection.ReturnValue
|
||||
End With
|
||||
'SqlTypes.SqlDateTime.Null
|
||||
|
||||
@@ -851,14 +851,7 @@ Public Class ClsPaginas
|
||||
Application("GlobalDTLeyendasFiscales") = value
|
||||
End Set
|
||||
End Property
|
||||
Property GlobalDTFolios() As DataTable
|
||||
Get
|
||||
GlobalDTFolios = DirectCast(Application("GlobalDTFolios"), DataTable)
|
||||
End Get
|
||||
Set(value As DataTable)
|
||||
Application("GlobalDTFolios") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Property GlobalDTEstatusFactura() As DataTable
|
||||
Get
|
||||
GlobalDTEstatusFactura = DirectCast(Application("GlobalDTEstatusFactura"), DataTable)
|
||||
|
||||
@@ -2298,10 +2298,36 @@ chkAplicaVacacion As Boolean, chkAplicaIncapacidad As Boolean, chkAplicaRetardo
|
||||
End Try
|
||||
|
||||
Return Retorno
|
||||
End Function
|
||||
End Function
|
||||
|
||||
Public Function AddAsistenciaMasiva2(CvePeriodo As Integer, CveUsuario As Integer, CveEmpresa As Integer) As Boolean
|
||||
|
||||
Dim Retorno As Boolean = False
|
||||
Data = New DataTable
|
||||
SqlDataAdapter("PA_RH_PersonalAsistenciasMasivaAddUpd2")
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
.Add("@CvePeriodo", SqlDbType.Int).Value = CvePeriodo
|
||||
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
|
||||
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
|
||||
End With
|
||||
|
||||
Try
|
||||
SqlAdapter.Fill(Data)
|
||||
Retorno = True
|
||||
Catch Ex1 As SqlException
|
||||
If Ex1.Message.Contains("Número: 2627;") Then
|
||||
Alert("Ya se registró la Asistencia para el empleado.", TipoMensaje.MsgAdvertencia)
|
||||
Else
|
||||
Me.OnError("Ocurrió un error al guardar la Asistencia.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||
End If
|
||||
Catch ex As Exception
|
||||
OnError("Ocurrió un error al guardar la Asistencia.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
|
||||
End Try
|
||||
|
||||
Return Retorno
|
||||
End Function
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "Asistencias Detalles"
|
||||
Public Function GetAsistenciasDetalle() As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
|
||||
@@ -6684,14 +6684,6 @@ Namespace Modelos
|
||||
HttpContext.Current.Application("GlobalDTLeyendasFiscales") = value
|
||||
End Set
|
||||
End Property
|
||||
Property GlobalDTFolios() As DataTable
|
||||
Get
|
||||
GlobalDTFolios = DirectCast(HttpContext.Current.Application("GlobalDTFolios"), DataTable)
|
||||
End Get
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTFolios") = value
|
||||
End Set
|
||||
End Property
|
||||
Property GlobalDTEstatusFactura() As DataTable
|
||||
Get
|
||||
GlobalDTEstatusFactura = DirectCast(HttpContext.Current.Application("GlobalDTEstatusFactura"), DataTable)
|
||||
|
||||
@@ -1,5 +1,5 @@
|
||||
<%@ WebHandler Language="VB" Class="SIGFacturacion" %>
|
||||
|
||||
<%@ WebHandler Language="VB" Class="SIGFacturacion" %>
|
||||
|
||||
Imports System
|
||||
Imports System.Web
|
||||
Imports System.Net.Http
|
||||
@@ -212,8 +212,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
json.Add(New JProperty("Almacen", ObsInv.ToString()))
|
||||
|
||||
Return json
|
||||
End Function
|
||||
|
||||
End Function
|
||||
|
||||
#Region "V A L I D A - D A T O S"
|
||||
Private Function ValidaUsuarioSistema(CveEmpresa As Integer) As Usuario
|
||||
Dim UsuarioActual As Usuario = Nothing
|
||||
@@ -247,8 +247,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
UsuarioActual.Empresa = ObjEmpresa.Empresa
|
||||
End If
|
||||
ObjEmpresa.Dispose()
|
||||
End Sub
|
||||
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
#Region "D E F I N I R - O B J E T O S"
|
||||
Private Function CreaFactura(Resp As Modelos.Factura.MMensajeFactura, UsuarioActual As Usuario, DTRemisionesPS As DataTable, CveCliente As Integer, CveSubProyecto As Integer, CveMoneda As Integer, DatosRemisiones As JObject, FechaI As DateTime, FechaF As DateTime) As Modelos.Factura
|
||||
@@ -750,7 +750,7 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
|
||||
'RECARGAR GV
|
||||
Return Row
|
||||
End Function
|
||||
End Function
|
||||
#End Region
|
||||
#Region "E N V I O - C O R R E O"
|
||||
Private Sub EnviarCorreo(Objfactura As Modelos.Factura, UsuarioActual As Usuario)
|
||||
@@ -894,9 +894,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
End If
|
||||
End Try
|
||||
End If
|
||||
End Sub
|
||||
End Sub
|
||||
#End Region
|
||||
|
||||
|
||||
Public Sub GuardaLogFacturacion(Str As String)
|
||||
Dim ArchivoW As StreamWriter
|
||||
Dim strLineaTMP As String
|
||||
@@ -919,8 +919,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
|
||||
ArchivoW.Close()
|
||||
ArchivoW.Dispose()
|
||||
End Sub
|
||||
|
||||
End Sub
|
||||
|
||||
#Region "G L O B A L - D T"
|
||||
Public Property GlobalTipoCambio(Optional Fecha As Date = MinFecha) As Double
|
||||
Get
|
||||
@@ -1105,10 +1105,10 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTPSATPS") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#Region "GLOBALES DE SAT COMERCIO EXTERIOR"
|
||||
|
||||
|
||||
Property GlobalDTClavePedimento() As DataTable
|
||||
Get
|
||||
GlobalDTClavePedimento = DirectCast(HttpContext.Current.Application("GlobalDTClavePedimento"), DataTable)
|
||||
@@ -1218,10 +1218,10 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTColonia") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
Property GlobalDTPSATUM() As DataTable
|
||||
Get
|
||||
GlobalDTPSATUM = DirectCast(HttpContext.Current.Application("GlobalDTPSATUM"), DataTable)
|
||||
@@ -1605,15 +1605,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTLeyendasFiscales") = value
|
||||
End Set
|
||||
End Property
|
||||
Property GlobalDTFolios() As DataTable
|
||||
Get
|
||||
GlobalDTFolios = DirectCast(HttpContext.Current.Application("GlobalDTFolios"), DataTable)
|
||||
End Get
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTFolios") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
|
||||
Property GlobalDTEstatusFactura() As DataTable
|
||||
Get
|
||||
GlobalDTEstatusFactura = DirectCast(HttpContext.Current.Application("GlobalDTEstatusFactura"), DataTable)
|
||||
@@ -2354,9 +2347,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTVtaCobranzaEstatus") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
End Property
|
||||
|
||||
|
||||
#Region "***********************************************************************DT EVENTOS****************************************************************************************"
|
||||
Property GlobalDTTiposEventos() As DataTable
|
||||
Get
|
||||
@@ -2392,9 +2385,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTOIEstatusEventos") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region " **********************************************************************DT PROSPECTOS*************************************************************************************"
|
||||
Property GlobalDTProspectosCaracteristicasClasificaciones() As DataTable
|
||||
Get
|
||||
@@ -2435,9 +2428,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTProspectosCaracteristicasOpciones") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "***********************************************************************DT ACTIVOS FIJOS**********************************************************************************"
|
||||
Property GlobalDTActivoFijos(CveEmpresa As Integer, Optional CveSubTipoActivoFijo As Integer = -1, Optional CveActivoFijo As Integer = -1) As DataTable
|
||||
Get
|
||||
@@ -2530,10 +2523,10 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTTipoActivoFijo") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "***********************************************************************DT GENERALES**************************************************************************************"
|
||||
Property GlobalDTGralPaises() As DataTable
|
||||
Get
|
||||
@@ -2621,10 +2614,10 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTGralColectivas") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "***********************************************************************DT PROSPECTOS*************************************************************************************"
|
||||
Property GlobalDTProspectosSupervisores(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
@@ -2833,8 +2826,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTProspectosTipos") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#Region " DT PROSPECTOS SOLICITUDES"
|
||||
Property GlobalDTProspectosSolicitudes(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
@@ -2901,15 +2894,15 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTProspectosSolicitudesApoyos") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "**********************************************DT AMORTIZACIÓN CONTABLE PLAN DE DESARROLLO********************************************************************************"
|
||||
|
||||
|
||||
#Region "***********************************************************************DT AMORTIZACIÓN CONTABLE*********************************************************************************************"
|
||||
|
||||
|
||||
Property GlobalDTAC_RubrosIngreso() As DataTable
|
||||
Get
|
||||
GlobalDTAC_RubrosIngreso = DirectCast(HttpContext.Current.Application("GlobalDTAC_RubrosIngreso"), DataTable)
|
||||
@@ -3165,11 +3158,11 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTAC_MatrizEgresos") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
End Property
|
||||
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
Property GlobalDTAC_PD_EjeRector(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
If CveEmpresa <> -1 Then
|
||||
@@ -3248,9 +3241,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTAC_PD_Metas") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "***********************************************************************GLOBAL DT ORDENES DE COMPRA***********************************************************************"
|
||||
Property GlobalDTOCEstatus(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
@@ -3287,11 +3280,11 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTOCEstatusUsuarios") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
|
||||
End Property
|
||||
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "F I N A N Z A S "
|
||||
Property GlobalDTFinan_RazonesFinancieras() As DataTable
|
||||
Get
|
||||
@@ -3300,10 +3293,10 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTFinan_RazonesFinancieras") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
|
||||
|
||||
#Region "***********************************************************************GLOBAL DT CONTABILIDAD****************************************************************************"
|
||||
Property GlobalDTContaPlantillasPolizas(CveEmpresa As Integer, Optional TipoPlantilla As Integer = -1) As DataTable
|
||||
Get
|
||||
@@ -3357,9 +3350,9 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTContaConceptosContables") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "**********************************************************************GLOBAL DT RH (RECURSOS HUMANOS)********************************************************************"
|
||||
Property GlobalDTAsistenciaDetalle() As DataTable
|
||||
Get
|
||||
@@ -3511,13 +3504,13 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTTipoBuzon") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "*********** D T - C O M B U S T I B L E S ***********"
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Property GlobalDTCombustibles(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
If CveEmpresa <> -1 Then
|
||||
@@ -3556,11 +3549,11 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(ByVal value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTCombustiblesTipos") = value
|
||||
End Set
|
||||
End Property
|
||||
End Property
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "*********** D T - M A N T E N I M I E N T O S ***********"
|
||||
|
||||
|
||||
Property GlobalDTMantenimientosTipos() As DataTable
|
||||
Get
|
||||
GlobalDTMantenimientosTipos = DirectCast(HttpContext.Current.Application("GlobalDTMantenimientosTipos"), DataTable)
|
||||
@@ -3599,13 +3592,13 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
|
||||
HttpContext.Current.Application("GlobalDTMantenimientosTipos") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
|
||||
|
||||
#Region "*********** D T - T A L L E R E S ***********"
|
||||
|
||||
|
||||
Property GlobalDTTalleresTipos() As DataTable
|
||||
Get
|
||||
GlobalDTTalleresTipos = DirectCast(HttpContext.Current.Application("GlobalDTTalleresTipos"), DataTable)
|
||||
@@ -3622,12 +3615,12 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTTalleres") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
#Region "*********** D T - D I S T R I B U I D O R E S ***********"
|
||||
|
||||
|
||||
Property GlobalDTDistribuidoresTipos() As DataTable
|
||||
Get
|
||||
GlobalDTDistribuidoresTipos = DirectCast(HttpContext.Current.Application("GlobalDTDistribuidoresTipos"), DataTable)
|
||||
@@ -3644,11 +3637,11 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTDistribuidores") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
|
||||
|
||||
Property GlobalDTOIRevision(CveEmpresa As Integer) As DataTable
|
||||
Get
|
||||
If CveEmpresa <> -1 Then
|
||||
@@ -3739,8 +3732,8 @@ Public Class SIGFacturacion : Implements IHttpHandler, IRequiresSessionState
|
||||
Set(value As DataTable)
|
||||
HttpContext.Current.Application("GlobalDTPaqueterias") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
End Property
|
||||
|
||||
#End Region
|
||||
|
||||
|
||||
End Class
|
||||
@@ -6591,7 +6591,7 @@ Partial Class Compras_Compras
|
||||
Next
|
||||
|
||||
'calcula la diferencia entre lo recibido por la OC, considerando costos indirectos y lo que se ingresaria en la compra
|
||||
SumatoriaOCINV = SumatoriaInventario - (TmpDT.SUMD("Total") * 1).RoundSQL 'sumatoria de la factura
|
||||
SumatoriaOCINV = SumatoriaInventario - (TmpDT.SUMD("Total") * TCO).RoundSQL 'sumatoria de la factura
|
||||
If SumatoriaOCINV.RoundSQL <> 0 Then
|
||||
' se abona el costo, cambiamos su naturaleza
|
||||
'SumatoriaOCINV = -SumatoriaOCINV
|
||||
|
||||
@@ -19,6 +19,15 @@ Partial Class Contratos_FacturacionMasiva
|
||||
ViewState("DTCicloComercial") = value
|
||||
End Set
|
||||
End Property
|
||||
Private Property FolioVigentes As Boolean
|
||||
Get
|
||||
Return CType(ViewState("FolioVigentes"), Boolean)
|
||||
End Get
|
||||
Set(value As Boolean)
|
||||
ViewState("FolioVigentes") = value
|
||||
End Set
|
||||
End Property
|
||||
|
||||
Private Property Mensaje As String
|
||||
Get
|
||||
Return CType(ViewState("Mensaje"), String)
|
||||
@@ -100,6 +109,7 @@ Partial Class Contratos_FacturacionMasiva
|
||||
|
||||
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
||||
If Not IsPostBack Then
|
||||
FolioVigentes = False
|
||||
CargaCombos()
|
||||
txtFechaI.Text = DateTime.Today.ToString("d")
|
||||
txtFechaF.Text = DateTime.Today.ToString("d")
|
||||
@@ -118,6 +128,8 @@ Partial Class Contratos_FacturacionMasiva
|
||||
DdlSucursal.DataBind()
|
||||
End Sub
|
||||
Private Sub CargaDatos(CveContrato As Integer, CveCliente As Integer)
|
||||
ValidaFolio()
|
||||
|
||||
Dim ObjContratos As New ClsContratos
|
||||
If ObjContratos.CicloComercialGet(CveContrato, CveCliente, -1, UsuarioActual.CveEmpresa, txtFechaI.Text.ToDateTime, txtFechaF.Text.ToDateTime, DdlSucursal.SelectedValue.ToEntero) Then
|
||||
DTCicloComercial = ObjContratos.DtResultados().FiltraParametros($"FueFacturado = 0")
|
||||
@@ -127,9 +139,21 @@ Partial Class Contratos_FacturacionMasiva
|
||||
GvCiclosComerciales.DataBind()
|
||||
UpGv.Update()
|
||||
End Sub
|
||||
|
||||
Private Sub ValidaFolio()
|
||||
Dim ObjFolios As New ClsGralFolios
|
||||
If ObjFolios.GetFolios("Ing", UsuarioActual.CveEmpresa) Then
|
||||
If ObjFolios.DtResultados.Rows.Count > 0 Then
|
||||
FolioVigentes = True
|
||||
End If
|
||||
End If
|
||||
|
||||
ObjFolios.Dispose()
|
||||
End Sub
|
||||
Protected Sub GvCiclosComerciales_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvCiclosComerciales.RowDataBound
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
If GlobalDTFolios().FiltraParametros($"CveSubProyecto = {e.Row.DBCampo("CveSubProyecto")} AND TipoDocto = 'Ing' ").Rows.Count = 0 Then
|
||||
'' Pendiente de aplicar validacion
|
||||
If Not FolioVigentes Then
|
||||
e.Row.FCCheckBox("chkDis").Enabled = False
|
||||
e.Row.FCCheckBox("chkDis").ToolTip = "La sucursal vinculada con este contrato no tiene folios"
|
||||
End If
|
||||
|
||||
@@ -134,7 +134,7 @@
|
||||
<asp:BoundField runat="server" HeaderText="Contrato Externo" DataField="ContratoExterno" />
|
||||
<asp:BoundField runat="server" HeaderText="Cantidad" DataField="Cantidad" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
|
||||
<asp:BoundField runat="server" HeaderText="PS" DataField="CodigoPS" />
|
||||
<asp:BoundField runat="server" HeaderText="Serie" DataField="SerieLote" />
|
||||
<asp:BoundField runat="server" HeaderText="Serie" DataField="Serie" />
|
||||
<asp:BoundField runat="server" HeaderText="Costo Almacén" DataField="Surtido" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
|
||||
@@ -27,6 +27,14 @@ Partial Class Contratos_FacturacionMasiva
|
||||
ViewState("Mensaje") = value
|
||||
End Set
|
||||
End Property
|
||||
Private Property FolioVigentes As Boolean
|
||||
Get
|
||||
Return CType(ViewState("FolioVigentes"), Boolean)
|
||||
End Get
|
||||
Set(value As Boolean)
|
||||
ViewState("FolioVigentes") = value
|
||||
End Set
|
||||
End Property
|
||||
Private Property ErrorList As List(Of String)
|
||||
Get
|
||||
Return CType(ViewState("ErrorList"), List(Of String))
|
||||
@@ -79,6 +87,7 @@ Partial Class Contratos_FacturacionMasiva
|
||||
|
||||
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
||||
If Not IsPostBack Then
|
||||
FolioVigentes = False
|
||||
CargaCombos()
|
||||
txtFechaI.Text = DateTime.Today.ToString("d")
|
||||
txtFechaF.Text = DateTime.Today.ToString("d")
|
||||
@@ -97,6 +106,7 @@ Partial Class Contratos_FacturacionMasiva
|
||||
DdlSucursal.DataBind()
|
||||
End Sub
|
||||
Private Sub CargaDatos(CveContrato As Integer, CveCliente As Integer)
|
||||
ValidaFolio()
|
||||
Dim ObjContratos As New ClsContratos
|
||||
If ObjContratos.CicloComercialGet(CveContrato, CveCliente, -1, UsuarioActual.CveEmpresa, txtFechaI.Text.ToDateTime, txtFechaF.Text.ToDateTime, DdlSucursal.SelectedValue.ToEntero) Then
|
||||
DTCicloComercial = ObjContratos.DtResultados().FiltraParametros($"FueFacturado = 0")
|
||||
@@ -106,9 +116,20 @@ Partial Class Contratos_FacturacionMasiva
|
||||
GvCiclosComerciales.DataBind()
|
||||
UpGv.Update()
|
||||
End Sub
|
||||
|
||||
Private Sub ValidaFolio()
|
||||
Dim ObjFolios As New ClsGralFolios
|
||||
If ObjFolios.GetFolios("Ing", UsuarioActual.CveEmpresa) Then
|
||||
If ObjFolios.DtResultados.Rows.Count > 0 Then
|
||||
FolioVigentes = True
|
||||
End If
|
||||
End If
|
||||
|
||||
ObjFolios.Dispose()
|
||||
End Sub
|
||||
Protected Sub GvCiclosComerciales_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvCiclosComerciales.RowDataBound
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
If GlobalDTFolios().FiltraParametros($"CveSubProyecto = {e.Row.DBCampo("CveSubProyecto")} AND TipoDocto = 'Ing' ").Rows.Count = 0 Then
|
||||
If Not FolioVigentes Then
|
||||
e.Row.FCCheckBox("chkDis").Enabled = False
|
||||
e.Row.FCCheckBox("chkDis").ToolTip = "La sucursal vinculada con este contrato no tiene folios"
|
||||
End If
|
||||
|
||||
19
Global.asax
19
Global.asax
@@ -356,18 +356,13 @@
|
||||
|
||||
Dim ObjLeyendasFiscales As New ClsLeyendasFiscales()
|
||||
If ObjLeyendasFiscales.GetLeyendasFiscales() Then Application("GlobalDTLeyendasFiscales") = ObjLeyendasFiscales.DtResultados Else Application("GlobalDTLeyendasFiscales") = Nothing
|
||||
ObjLeyendasFiscales.Dispose()
|
||||
|
||||
'------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
'C A R G A - F O L I O S
|
||||
|
||||
Dim ObjFolios As New ClsGralFolios()
|
||||
If ObjFolios.GetFolios() Then Application("GlobalDTFolios") = ObjFolios.DtResultados Else Application("GlobalDTFolios") = Nothing
|
||||
ObjFolios.Dispose()
|
||||
|
||||
'------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
'F A C T U R A S
|
||||
|
||||
ObjLeyendasFiscales.Dispose()
|
||||
|
||||
'------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
|
||||
'------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
'F A C T U R A S
|
||||
|
||||
Dim ObjEstatusFactura As New ClsEstatusFactura()
|
||||
If ObjEstatusFactura.GetEstatusFactura() Then Application("GlobalDTEstatusFactura") = ObjEstatusFactura.DtResultados Else Application("GlobalDTEstatusFactura") = Nothing
|
||||
ObjEstatusFactura.Dispose()
|
||||
|
||||
@@ -86,7 +86,7 @@
|
||||
<div class="row">
|
||||
<label class="col-md-2">Cliente:</label>
|
||||
<div class="col-md-3">
|
||||
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" OnSelectedIndexChanged="DdlCliente_SelectedIndexChanged" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;">
|
||||
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" OnSelectedIndexChanged="DdlCliente_SelectedIndexChanged" Width="100%" data-metodo="getcliente" IncluyeTodos="false" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;">
|
||||
</ADS:Dropdownlost>
|
||||
</div>
|
||||
<label class="col-md-2">Vendedor:</label>
|
||||
@@ -203,7 +203,7 @@
|
||||
<asp:ListItem Selected="True" Text="Seleccione la Clasificación (Todas)" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
<br />
|
||||
<ADS:Dropdownlost runat="server" ID="DdlProducto2" CssStyle="width: 100%;" CssClassDdl="select2me" DataTextField="PSCodigo" DataValueField="CvePS" />
|
||||
<ADS:Dropdownlost runat="server" ID="DdlProducto2" CssStyle="width: 100%;" CssClassDdl="select2me" IncluyeTodos="false" DataTextField="PSCodigo" DataValueField="CvePS" />
|
||||
</div>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
@@ -310,7 +310,7 @@
|
||||
</div>
|
||||
<div class="col-md-1" style="max-width: 70px">Cliente</div>
|
||||
<div class="col-md-2">
|
||||
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClienteDesapartado" OnSelectedIndexChanged="DdlClienteDesapartado_SelectedIndexChanged" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;">
|
||||
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClienteDesapartado" OnSelectedIndexChanged="DdlClienteDesapartado_SelectedIndexChanged" Width="100%" IncluyeTodos="false" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;">
|
||||
</ADS:Dropdownlost>
|
||||
|
||||
<%--<asp:RequiredFieldValidator ID="RFVFClienteDesapartado" runat="server" ControlToValidate="DdlClienteDesapartado" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cliente''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpCargarApartados"></asp:RequiredFieldValidator>
|
||||
|
||||
@@ -466,7 +466,8 @@ Partial Class Inventarios_Apartados
|
||||
Dim Valido = ValidaExistencia(Cantidad, CveProducto, DdlUnidad.SelectedValue.ToEntero, CveSeccionAlmacen:=DdlSeccionAlmacen.SelectedValue.ToEntero, Serie:=If(TxtnSerie.Visible, TxtnSerie.Text, "-1"))
|
||||
|
||||
If Valido Then
|
||||
AgregarPS(Cantidad, CveProducto, DdlUnidad.SelectedValue.ToEntero, CveSeccionAlmacen:=DdlSeccionAlmacen.SelectedValue.ToEntero, SeccionAlmacen:=DdlSeccionAlmacen.SelectedItem.Text, Serie:=If(TxtnSerie.Text <> "", TxtnSerie.Text, ""), Limpia:=FuncionalidadSinSerie)
|
||||
Dim StrSeccion As String = If(DdlSeccionAlmacen.SelectedValue.ToEntero > 0, DdlSeccionAlmacen.SelectedItem.Text, "")
|
||||
AgregarPS(Cantidad, CveProducto, DdlUnidad.SelectedValue.ToEntero, CveSeccionAlmacen:=DdlSeccionAlmacen.SelectedValue.ToEntero, SeccionAlmacen:=StrSeccion, Serie:=If(TxtnSerie.Text <> "", TxtnSerie.Text, ""), Limpia:=FuncionalidadSinSerie)
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
@@ -255,9 +255,9 @@
|
||||
<div class="col-md-2 ">
|
||||
<asp:DropDownList ID="DdlMoneda" runat="server" Style="max-width: 200px" CssClass="form-control input-sm select2me" DataTextField="Moneda" DataValueField="CveMoneda"></asp:DropDownList>
|
||||
</div>
|
||||
<label class="col-md-1 truncate" style="width: 110px">Sección:</label>
|
||||
<label class="col-md-1 truncate" style="width: 110px"></label>
|
||||
<div class="col-md-2">
|
||||
<asp:DropDownList ID="DdlSeccion" runat="server" CssClass="form-control input-sm" Style="max-width: 200px" DataTextField="Seccion" DataValueField="CveSeccion"></asp:DropDownList>
|
||||
|
||||
</div>
|
||||
</div>
|
||||
<div class="row" id="divGuia" runat="server" visible="False">
|
||||
|
||||
@@ -463,10 +463,6 @@ Partial Class Inventarios_EntradasSalidas
|
||||
End If
|
||||
DdlClasificacion.DataBind()
|
||||
|
||||
DdlSeccion.DataSource = GlobalDTSeccionAlmacen(UsuarioActual.CveEmpresa, -1)
|
||||
DdlSeccion.Items.Insert(0, New ListItem("Seleccione", "-1"))
|
||||
DdlSeccion.DataBind()
|
||||
|
||||
DdlSeccionAlmacen.DataSource = GlobalDTSeccionAlmacen(UsuarioActual.CveEmpresa, -1)
|
||||
DdlSeccionAlmacen.DataBind()
|
||||
|
||||
@@ -825,7 +821,7 @@ Partial Class Inventarios_EntradasSalidas
|
||||
|
||||
'cargar también los movimentos detalle
|
||||
If Mov.GetMovimientosDetalle(CveMovimiento, UsuarioActual.CveEmpresa) Then
|
||||
DdlSeccion.SelectedValueExist(Mov.CveSeccion.ToString)
|
||||
|
||||
DtMovimientos = Mov.DtResultados.FiltraParametros("", "CveMovimientoDetalle")
|
||||
|
||||
DtMovimientos.Columns("No").AutoIncrement = True
|
||||
@@ -929,7 +925,6 @@ Partial Class Inventarios_EntradasSalidas
|
||||
TxtObservaciones.Enabled = True
|
||||
DdlMoneda.Enabled = True
|
||||
TxtGuia.Enabled = True
|
||||
DdlSeccion.Enabled = True
|
||||
|
||||
If CveMovimiento > 0 Then
|
||||
DdlAlmacen.Enabled = False
|
||||
@@ -940,7 +935,7 @@ Partial Class Inventarios_EntradasSalidas
|
||||
TxtObservaciones.Enabled = False
|
||||
DdlMoneda.Enabled = False
|
||||
TxtGuia.Enabled = False
|
||||
DdlSeccion.Enabled = False
|
||||
|
||||
End If
|
||||
UppGrid.Update()
|
||||
End Sub
|
||||
@@ -2233,10 +2228,10 @@ Partial Class Inventarios_EntradasSalidas
|
||||
End If
|
||||
|
||||
If DtTemp IsNot Nothing AndAlso DtTemp.Rows.Count > 0 Then
|
||||
GvM.Columns(9).Visible = DtTemp.MAX("Serie").ToString <> ""
|
||||
GvM.Columns(10).Visible = DtTemp.MAX("Lote").ToString <> ""
|
||||
GvM.Columns(11).Visible = DtTemp.MAX("FechaCaducidad").ToString <> ""
|
||||
GvM.Columns(12).Visible = DtTemp.MAX("CveSeccionAlmacen").ToString <> ""
|
||||
GvM.Columns(9).Visible = DtTemp.MAX("Serie") <> ""
|
||||
GvM.Columns(10).Visible = DtTemp.MAX("Lote") <> ""
|
||||
GvM.Columns(11).Visible = DtTemp.MAX("FechaCaducidad").ToDate > MinFecha
|
||||
GvM.Columns(12).Visible = DtTemp.MAX("CveSeccionAlmacen") <> ""
|
||||
|
||||
End If
|
||||
|
||||
@@ -4042,7 +4037,6 @@ Partial Class Inventarios_EntradasSalidas
|
||||
If TxtRemision.Visible Then TxtRemision.Enabled = True
|
||||
If DdlMoneda.Visible Then DdlMoneda.Enabled = True
|
||||
If TxtGuia.Visible Then TxtGuia.Enabled = True
|
||||
If DdlSeccion.Visible Then DdlSeccion.Enabled = True
|
||||
|
||||
If BtnEliminar.Visible Then BtnEliminar.Visible = False
|
||||
|
||||
|
||||
@@ -660,8 +660,9 @@ Partial Class Inventarios_EntregaAlmacen
|
||||
Alert("Ocurrió un error al cargar los datos de devolución. Por favor vuelva a intentar.", TipoMensaje.MsgError)
|
||||
End If
|
||||
End If
|
||||
|
||||
CargaDocumentos(CveVenta)
|
||||
If UsuarioActual.Empresa.FacturaProduccion Then
|
||||
CargaDocumentos(CveVenta)
|
||||
End If
|
||||
Else
|
||||
Alert("No se encontraron productos pendientes por surtir. Por favor verifique y vuelva a intentar.", TipoMensaje.MsgAdvertencia)
|
||||
End If
|
||||
|
||||
@@ -479,7 +479,8 @@ Partial Class Inventarios_RecepcionAlmacen
|
||||
|
||||
Protected Sub DdlAlmacen_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlAlmacen.SelectedIndexChanged
|
||||
If DdlAlmacen.SelectedValue <> "-1" Then
|
||||
CargaCompra(CveCompraSurtir, CveProveedor)
|
||||
|
||||
CargaGVInv()
|
||||
'For Each Gvr As GridViewRow In GvInv.Rows
|
||||
' If Gvr.FCDropDownList("DdlSeccionAlmacen").SelectedValue = "-1" Then
|
||||
' Dim Dr As DataRow = GlobalDTSeccionAlmacen(UsuarioActual.CveEmpresa, DdlAlmacen.SelectedValue.ToEntero).FiltroPrimero("")
|
||||
@@ -1263,7 +1264,7 @@ Partial Class Inventarios_RecepcionAlmacen
|
||||
If CBool(e.Row.DBCampo("AplicaSeccion")) Then
|
||||
e.Row.FCDropDownList("DdlSeccionAlmacen").Visible = True
|
||||
If DdlAlmacen.SelectedValue.ToEntero > 0 Then
|
||||
e.Row.FCDropDownList("DdlSeccionAlmacen").DataSource = GlobalDTSeccionAlmacen(UsuarioActual.CveEmpresa, DdlAlmacen.SelectedValue.ToEntero)
|
||||
e.Row.FCDropDownList("DdlSeccionAlmacen").DataSource = GlobalDTInvPSSeccionesAlmacen(UsuarioActual.CveEmpresa, DdlAlmacen.SelectedValue.ToEntero, e.Row.DBCampo("CvePS").ToEntero)
|
||||
e.Row.FCDropDownList("DdlSeccionAlmacen").DataBind()
|
||||
e.Row.FCDropDownList("DdlSeccionAlmacen").Items.Insert(0, New ListItem("Seleccione", "-1"))
|
||||
End If
|
||||
@@ -2192,7 +2193,7 @@ Partial Class Inventarios_RecepcionAlmacen
|
||||
'ENTRADA ALMACÉN
|
||||
CveMovimiento = ObjInventario.AddMovimiento(DdlAlmacen.SelectedValue.ToEntero, If(TipoMovimiento > 1, 13, 2), 1, FechaMovto, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa,
|
||||
CveCompraSurtir, -1, -1, -1, Observaciones:=TxtObservaciones.Text.Trim, TipoCambio:=If(DdlMonedaTC.SelectedValue.ToEntero = 1, -1, TipoCambio),
|
||||
MovimientoFijo:=If(TipoMovimiento = 2, True, False), Remision:=TxtRemision.Text, Modulo:="RA/G")
|
||||
MovimientoFijo:=If(TipoMovimiento = 2, True, False), Remision:=TxtRemision.Text, Modulo:="RA/G1")
|
||||
If CveMovimiento > 0 Then
|
||||
InvFolio = ObjInventario.Folio.ToString
|
||||
Dim DtDetalle As New DataTable
|
||||
@@ -2311,7 +2312,7 @@ Partial Class Inventarios_RecepcionAlmacen
|
||||
|
||||
CveMovtoSalidaDirecta = ObjInventario.AddMovimiento(DdlAlmacen.SelectedValue.ToEntero, 3, 1, TxtFecha.Text.ToDate, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1,
|
||||
CveVenta, -1, -1, Observaciones:=TxtObservaciones.Text.Trim, TipoCambio:=If(DdlMonedaTC.SelectedValue.ToEntero = 1, -1, TipoCambio),
|
||||
MovimientoFijo:=True, CveMovimientoRelacionado:=CveMovimiento, Remision:=TxtRemision.Text, CveVendedor:=CveVendedor, CveCliente:=CveCliente, Modulo:="RA/G")
|
||||
MovimientoFijo:=True, CveMovimientoRelacionado:=CveMovimiento, Remision:=TxtRemision.Text, CveVendedor:=CveVendedor, CveCliente:=CveCliente, Modulo:="RA/G2")
|
||||
FolioSalidaDirecta = ObjInventario.Folio
|
||||
|
||||
If Not CveMovtoSalidaDirecta > 0 Then
|
||||
@@ -2365,7 +2366,7 @@ Partial Class Inventarios_RecepcionAlmacen
|
||||
If CveVendedorActual = -1 Or (Dr("CveVendedor").ToString.ToEntero <> CveVendedorActual Or Dr("CveCliente").ToString.ToEntero <> CveClienteActual) Then
|
||||
CveMovtoSalidaActual = ObjInventario.AddMovimiento(DdlAlmacen.SelectedValue.ToEntero, 8, 1, FechaMovto, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompraSurtir, -1, -1, -1, Observaciones:=TxtObservaciones.Text.Trim,
|
||||
TipoCambio:=If(DdlMonedaTC.SelectedValue.ToEntero = 1, -1, TipoCambio), CveAlmacenDestino:=CveAlmacenDestino, MovimientoFijo:=True, CveVendedor:=Dr("CveVendedor").ToString.ToEntero,
|
||||
CveCliente:=Dr("CveCliente").ToString.ToEntero, Remision:=TxtRemision.Text, Modulo:="RA/G")
|
||||
CveCliente:=Dr("CveCliente").ToString.ToEntero, Remision:=TxtRemision.Text, Modulo:="RA/G3")
|
||||
MovtosSalida.Add(CveMovtoSalidaActual)
|
||||
FoliosSalida.Add(ObjInventario.Folio)
|
||||
|
||||
@@ -2447,7 +2448,7 @@ Partial Class Inventarios_RecepcionAlmacen
|
||||
|
||||
Dim CveAlmacenVirutal As Integer = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveTipoAlmacenFiltro).FiltroPrimeroValor("CveAlmacen", $"CveSubProyecto={CveSubProyecto}").ToEntero()
|
||||
|
||||
CveMovimientoVirtual = ObjInventario.AddMovimiento(CveAlmacenVirutal, If(TipoMovimiento > 1, 13, 2), 1, TxtFecha.Text.ToDate, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompraSurtir, -1, -1, -1, Observaciones:=TxtObservaciones.Text.Trim, Modulo:="RA/G")
|
||||
CveMovimientoVirtual = ObjInventario.AddMovimiento(CveAlmacenVirutal, If(TipoMovimiento > 1, 13, 2), 1, TxtFecha.Text.ToDate, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompraSurtir, -1, -1, -1, Observaciones:=TxtObservaciones.Text.Trim, Modulo:="RA/G4")
|
||||
FolioVirtual = ObjInventario.Folio
|
||||
|
||||
For Each RowUsado As DataRow In DtPSVirtual.Rows
|
||||
@@ -2590,7 +2591,7 @@ Partial Class Inventarios_RecepcionAlmacen
|
||||
|
||||
Dim CveAlmacenVirutal As Integer = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 25).FiltroPrimeroValor("CveAlmacen", $"CveSubProyecto={CveSubProyecto}").ToEntero()
|
||||
|
||||
CveMovimientoVirtual = ObjInventario.AddMovimiento(CveAlmacenVirutal, If(TipoMovimiento > 1, 13, 2), 1, TxtFecha.Text.ToDate, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompraSurtir, -1, -1, -1, Observaciones:=TxtObservaciones.Text.Trim, Modulo:="RA/G")
|
||||
CveMovimientoVirtual = ObjInventario.AddMovimiento(CveAlmacenVirutal, If(TipoMovimiento > 1, 13, 2), 1, TxtFecha.Text.ToDate, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompraSurtir, -1, -1, -1, Observaciones:=TxtObservaciones.Text.Trim, Modulo:="RA/G5")
|
||||
FolioVirtual = ObjInventario.Folio
|
||||
|
||||
For Each RowUsado As DataRow In DtPSVirtual.Rows
|
||||
@@ -3048,7 +3049,7 @@ Partial Class Inventarios_RecepcionAlmacen
|
||||
Dim ObjContaAC As ClsContPAQi = Nothing
|
||||
|
||||
'ENTRADA ALMACÉN
|
||||
CveMovimiento = ObjInventario.AddMovimiento(DdlAlmacen.SelectedValue.ToEntero, 2, 1, FechaMovto, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveImportacionCompra, -1, -1, -1, Observaciones:=TxtObservaciones.Text.Trim, TipoCambio:=-1, Remision:=TxtRemision.Text, Modulo:="RA/G")
|
||||
CveMovimiento = ObjInventario.AddMovimiento(DdlAlmacen.SelectedValue.ToEntero, 2, 1, FechaMovto, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveImportacionCompra, -1, -1, -1, Observaciones:=TxtObservaciones.Text.Trim, TipoCambio:=-1, Remision:=TxtRemision.Text, Modulo:="RA/G6")
|
||||
If CveMovimiento > 0 Then
|
||||
InvFolio = ObjInventario.Folio.ToString
|
||||
Dim DtDetalle As New DataTable
|
||||
|
||||
@@ -608,7 +608,7 @@ Partial Class Inventarios_ResguardoMaterial
|
||||
Private Sub CargaGvMLiberacion()
|
||||
GvM.Columns(5).Visible = False
|
||||
For Each Dr As DataRow In DtMovimientosLiberacion.Rows
|
||||
If Dr("SerieLote").ToString <> "" Then
|
||||
If Dr("Serie").ToString <> "" Then
|
||||
GvM.Columns(5).Visible = True
|
||||
Exit For
|
||||
End If
|
||||
@@ -777,7 +777,7 @@ Partial Class Inventarios_ResguardoMaterial
|
||||
|
||||
Dim Cont As Integer = 0
|
||||
For Each Dr As DataRow In DtMovimientos.Rows
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoSalida, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, 0, -1, -1, Dr("SerieLote").ToString, Dr("Observaciones").ToString) Then
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoSalida, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, 0, -1, -1, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString) Then
|
||||
MensajeError = "Ocurrió un error al guardar los detalles del movimiento de salida. Por favor vuelva a intentar."
|
||||
TieneError = True
|
||||
Exit For
|
||||
@@ -796,7 +796,7 @@ Partial Class Inventarios_ResguardoMaterial
|
||||
Else
|
||||
If ObjInventario.GetMovimientosDetalle(CveMovimientoSalida, UsuarioActual.CveEmpresa) Then
|
||||
For Each Dr As DataRow In ObjInventario.DtResultados.Rows
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoEntrada, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, Dr("PU").ToString.ToDecimal, Dr("CveAF").ToString.ToEntero, -1, Dr("SerieLote").ToString, Dr("Observaciones").ToString) Then
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoEntrada, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, Dr("PU").ToString.ToDecimal, Dr("CveAF").ToString.ToEntero, -1, Serie:=Dr("Serie").ToString, Observaciones:=Dr("Observaciones").ToString) Then
|
||||
TieneError = True
|
||||
MensajeError = "Ocurrió un error al guardar los movimientos de entrada"
|
||||
Exit For
|
||||
|
||||
@@ -855,7 +855,7 @@ Partial Class Inventarios_TraspasoAlmacen
|
||||
If ObjInventario.GetMovimientosDetalle(CveMovimientoSalida, UsuarioActual.CveEmpresa) Then
|
||||
Dim Cont As Integer = 0
|
||||
For Each Dr As DataRow In ObjInventario.DtResultados.Rows
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoEntrada, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, Dr("PU").ToString.ToDecimal, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=Dr("CveSeccionAlmacenDestino").ToString.ToEntero, Serie:=Dr("Serie").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveMovimientoDetalleEntrada:=Dr("CveMovimientoDetalle").ToString.ToEntero, Observaciones:=Dr("Observaciones").ToString) Then
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoEntrada, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero, Dr("PU").ToString.ToDecimal, CveAF:=Dr("CveAF").ToString.ToEntero, CveSeccionAlmacen:=-1, Serie:=Dr("Serie").ToString, Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveMovimientoDetalleEntrada:=Dr("CveMovimientoDetalle").ToString.ToEntero, Observaciones:=Dr("Observaciones").ToString) Then
|
||||
ErrorMovInv = True
|
||||
TextoError = "Ocurrió un error al guardar los movimientos de entrada"
|
||||
Exit For
|
||||
|
||||
@@ -229,7 +229,7 @@ Partial Class Nomina_Nomina
|
||||
|
||||
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
||||
If Not IsPostBack Then
|
||||
If UsuarioActual.CveEmpresa = 80 OrElse UsuarioActual.CveEmpresa = 72 Then
|
||||
If UsuarioActual.CveEmpresa = 80 OrElse UsuarioActual.CveEmpresa = 72 OrElse UsuarioActual.CveEmpresa = 119 Then
|
||||
Response.Redirect("/Nomina/Nomina2.aspx")
|
||||
End If
|
||||
CargaTiposPeriodo()
|
||||
|
||||
@@ -4,9 +4,10 @@
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
|
||||
<style>
|
||||
span.font-black{
|
||||
color:#333;
|
||||
span.font-black {
|
||||
color: #333;
|
||||
}
|
||||
|
||||
.GvConceptos {
|
||||
border: 1px solid #E87E04;
|
||||
}
|
||||
@@ -69,19 +70,25 @@
|
||||
<asp:UpdatePanel ID="UpAccciones" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<li>
|
||||
<asp:HyperLink ID="HypModalNomina" data-target="#DModalNominas" data-toggle="modal" runat="server">Cargar Nomina</asp:HyperLink>
|
||||
<asp:HyperLink ID="HypModalNomina" data-target="#DModalNominas" data-toggle="modal" runat="server"><i class="fa fa-upload" aria-hidden="true"></i>Cargar Nomina</asp:HyperLink>
|
||||
</li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkVerTablas" OnClick="LnkVerTablas_Click" runat="server">Tablas</asp:LinkButton>
|
||||
<asp:LinkButton ID="LnkVerTablas" OnClick="LnkVerTablas_Click" runat="server"><i class="fa fa-columns" aria-hidden="true"></i>Tablas</asp:LinkButton>
|
||||
</li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkAutorizar" OnClick="LnkAutorizar_Click" runat="server"><i class="fa fa-thumbs-up" aria-hidden="true"></i>Autorizar</asp:LinkButton>
|
||||
</li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkCargaAsistenciaMasiva" OnClick="LnkCargaAsistenciaMasiva_Click" runat="server"><i class="fa fa-check" aria-hidden="true"></i>Carga Asistencia</asp:LinkButton>
|
||||
</li>
|
||||
<li>
|
||||
<asp:HyperLink ID="HypAsistencia" NavigateUrl="/RH/Asistencias.aspx" runat="server"><i class="fa fa-list" aria-hidden="true"></i>Asistencia</asp:HyperLink>
|
||||
</li>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkListaRaya" OnClick="LnkListaRaya_Click" runat="server">Lista de Raya</asp:LinkButton>
|
||||
<asp:LinkButton ID="LnkListaRaya" OnClick="LnkListaRaya_Click" runat="server"><i class="fa fa-file-text" aria-hidden="true"></i>Lista de Raya</asp:LinkButton>
|
||||
</li>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
|
||||
@@ -204,7 +211,7 @@
|
||||
<div class="portlet-body nomarginleftright form-horizontal form-row-sepe formnombottom ">
|
||||
<asp:GridView ID="GvNominas" runat="server" DataKeyNames="CvePeriodo,CvePersonal,CveNomina,SeTimbro,SerieFolio,Nombre,Correo,Turno,SubProyecto" AutoGenerateColumns="False" OnRowDataBound="GvNominas_RowDataBound"
|
||||
CssClass="table table-striped table-advance table-hover mysmallbtn ScrollAD Widthall GvNominas" Style="text-align: center;" GridLines="None"
|
||||
data-rows="2">
|
||||
data-rows="1">
|
||||
<Columns>
|
||||
|
||||
<asp:TemplateField>
|
||||
@@ -385,7 +392,7 @@
|
||||
<div class="portlet-title">
|
||||
<div class="caption ">
|
||||
<i class="fa fa-user font-yellow-gold"></i>
|
||||
<span class="caption-subject bold font-black uppercase">Trabajador :<asp:Label ID="LblEmpleado" runat="server" Text=""></asp:Label></span>
|
||||
<span class="caption-subject bold font-black uppercase">Trabajador :<asp:Label ID="LblEmpleado" runat="server" Text=""></asp:Label></span>
|
||||
</div>
|
||||
<div class="tools">
|
||||
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
|
||||
@@ -394,40 +401,53 @@
|
||||
<div class="portlet-body " style="padding: 0px;">
|
||||
<div class="row">
|
||||
<div class="col-md-2 bold">No. Trabajador</div>
|
||||
<div class="col-md-4"><asp:Label ID="LblCodigoEmpleado" runat="server"></asp:Label></div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblCodigoEmpleado" runat="server"></asp:Label></div>
|
||||
<div class="col-md-2 bold">Días Trabajados</div>
|
||||
<div class="col-md-4"><asp:Label ID="LblDiasLaborados" runat="server"></asp:Label></div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblDiasLaborados" runat="server"></asp:Label></div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<div class="col-md-2 bold">Afi IMSS </div>
|
||||
<div class="col-md-4"><asp:Label ID="LblNSS" runat="server"></asp:Label> </div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblNSS" runat="server"></asp:Label>
|
||||
</div>
|
||||
<div class="col-md-2 bold">Faltas</div>
|
||||
<div class="col-md-4"><asp:Label ID="LblDiasFaltados" runat="server"></asp:Label></div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblDiasFaltados" runat="server"></asp:Label></div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<div class="col-md-2 bold">R.F.C.</div>
|
||||
<div class="col-md-4"><asp:Label ID="LblRFC" runat="server"></asp:Label></div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblRFC" runat="server"></asp:Label></div>
|
||||
<div class="col-md-2 bold">Retardos</div>
|
||||
<div class="col-md-4"><asp:Label ID="LblDiasRetardos" runat="server"></asp:Label></div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblDiasRetardos" runat="server"></asp:Label></div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<div class="col-md-2 bold">Curp</div>
|
||||
<div class="col-md-4"><asp:Label ID="LblCURP" runat="server"></asp:Label></div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblCURP" runat="server"></asp:Label></div>
|
||||
<div class="col-md-2 bold">Días Vacaciones</div>
|
||||
<div class="col-md-4"><asp:Label ID="LblDiasVacaciones" runat="server"></asp:Label></div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblDiasVacaciones" runat="server"></asp:Label></div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<div class="col-md-2 bold">Tipo de Pago</div>
|
||||
<div class="col-md-4"><asp:Label ID="LblTipoPeriodo" runat="server"></asp:Label></div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblTipoPeriodo" runat="server"></asp:Label></div>
|
||||
<div class="col-md-2 bold">Días Incapacidad</div>
|
||||
<div class="col-md-4"><asp:Label ID="LblDiasIncapacidad" runat="server"></asp:Label></div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblDiasIncapacidad" runat="server"></asp:Label></div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<div class="col-md-2 bold">Fecha de Pago</div>
|
||||
<div class="col-md-4"><asp:Label ID="LblFechaPagosrb" runat="server"></asp:Label></div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblFechaPagosrb" runat="server"></asp:Label></div>
|
||||
<div class="col-md-2 bold">Periodo del</div>
|
||||
<div class="col-md-4"><asp:Label ID="LblFecha" runat="server"></asp:Label></div>
|
||||
</div>
|
||||
<div class="col-md-4">
|
||||
<asp:Label ID="LblFecha" runat="server"></asp:Label></div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
@@ -917,7 +937,6 @@
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
|
||||
</div>
|
||||
|
||||
<div id="DModalNominas" class="modal ADS fade" role="dialog">
|
||||
@@ -959,6 +978,48 @@
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
|
||||
<div id="DModalCargaASistenciaMasiva" class="modal ADS fade" role="dialog">
|
||||
<asp:UpdatePanel ID="UpModalAsistenciaMasiva" class="modal-dialog" tabindex="-1" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<div class="modal-content rowpadding">
|
||||
<div class="modal-header">
|
||||
<button type="button" class="close" data-dismiss="modal" aria-label="Close">
|
||||
<span aria-hidden="true">×</span>
|
||||
</button>
|
||||
<h4 class="modal-title" runat="server" style="text-align: left">Cargar asistencia del periodo</h4>
|
||||
</div>
|
||||
<div class="modal-body">
|
||||
|
||||
<div class="form-group form-md-line-input" >
|
||||
<asp:DropDownList ID="DdlEjerciciosCM" runat="server" AutoPostBack="true" OnSelectedIndexChanged="DdlEjerciciosCM_SelectedIndexChanged" Style="width: 100% !important;" CssClass="select2me" DataValueField="Ejercicio" DataTextField="Ejercicio"></asp:DropDownList>
|
||||
|
||||
<asp:Label runat="server" AssociatedControlID="DdlEjerciciosCM">Ejercicio:</asp:Label>
|
||||
</div>
|
||||
<div class="form-group form-md-line-input">
|
||||
<asp:DropDownList ID="DdlTipoPeriodoCM" runat="server" AutoPostBack="true" OnSelectedIndexChanged="DdlTipoPeriodoCM_SelectedIndexChanged" DataTextField="TipoPeriodo" DataValueField="CveTipoPeriodo" Class="form-control select2me input-sm" Style="width: 100% !important;">
|
||||
</asp:DropDownList>
|
||||
<asp:Label runat="server" AssociatedControlID="DdlTipoPeriodoCM">Tipo:</asp:Label>
|
||||
</div>
|
||||
<div class="form-group form-md-line-input">
|
||||
<asp:DropDownList ID="DdlPeriodoCM" runat="server" DataTextField="NominaEstatus" DataValueField="CvePeriodo" Class="form-control select2me input-sm" Style="width: 100% !important;">
|
||||
</asp:DropDownList>
|
||||
<asp:Label runat="server" AssociatedControlID="DdlPeriodoCM">Periodo:</asp:Label>
|
||||
</div>
|
||||
|
||||
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<asp:UpdatePanel runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<asp:LinkButton ID="LnkCargarAsistenciaMasiva" OnClick="LnkCargarAsistenciaMasiva_Click" CssClass="btn btn-primary" runat="server">Cargar</asp:LinkButton>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
|
||||
<script>
|
||||
@@ -971,7 +1032,7 @@
|
||||
}
|
||||
function FiltrarTabla(idtxt, idtable, idcontador) {
|
||||
if ($('' + idtxt).val() == '') { $('table' + idtable + ' tr').css('display', ''); }
|
||||
else { $('table' + idtable + ' tr:not(.ADtr):not(.SearchADHeader)').css('display', 'none'); $('table' + idtable + ' tr:contains("' + $('' + idtxt).val() + '")').css('display', ''); }
|
||||
else { $('table' + idtable + ' tr:not(.ADtr):not(.SearchADHeader):not(.Titulos)').css('display', 'none'); $('table' + idtable + ' tr:contains("' + $('' + idtxt).val() + '")').css('display', ''); }
|
||||
if ($('' + idcontador).length > 0) {
|
||||
$('' + idcontador).html('(' + $('' + idtable + ' tr:not(.ADtr):not(.SearchADHeader):visible').length + '/' + $('' + idtable + ' tr:not(.ADtr):not(.SearchADHeader)').length + ')');
|
||||
}
|
||||
|
||||
@@ -151,22 +151,33 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
}
|
||||
}
|
||||
DdlEjercicios.DataSource = dtejercicio;
|
||||
DdlEjerciciosCM.DataSource = dtejercicio;
|
||||
DdlEjercicios.DataBind();
|
||||
DdlEjerciciosCM.DataBind();
|
||||
ListItem litem = null;
|
||||
if ((dtejercicio != null) && dtejercicio.Rows.Count > 0)
|
||||
{
|
||||
if (dtejercicio.COUNT("Ejercicio", string.Format("Ejercicio={0}", EjercicioActual)) == 0)
|
||||
{
|
||||
DdlEjercicios.Items.Insert(0, new ListItem(EjercicioActual.ToString(), EjercicioActual.ToString()));
|
||||
litem = new ListItem(EjercicioActual.ToString(), EjercicioActual.ToString());
|
||||
DdlEjercicios.Items.Insert(0, litem);
|
||||
DdlEjerciciosCM.Items.Insert(0, litem);
|
||||
}
|
||||
if (dtejercicio.COUNT("Ejercicio", string.Format("Ejercicio={0}", (EjercicioActual - 1))) == 0)
|
||||
{
|
||||
DdlEjercicios.Items.Insert(1, new ListItem((EjercicioActual - 1).ToString(), (EjercicioActual - 1).ToString()));
|
||||
litem = new ListItem((EjercicioActual - 1).ToString(), (EjercicioActual - 1).ToString());
|
||||
DdlEjercicios.Items.Insert(1, litem);
|
||||
DdlEjerciciosCM.Items.Insert(1, litem);
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
DdlEjercicios.Items.Add(new ListItem(EjercicioActual.ToString(), EjercicioActual.ToString()));
|
||||
DdlEjercicios.Items.Add(new ListItem((EjercicioActual - 1).ToString(), (EjercicioActual - 1).ToString()));
|
||||
litem = new ListItem(EjercicioActual.ToString(), EjercicioActual.ToString());
|
||||
DdlEjercicios.Items.Insert(0, litem);
|
||||
DdlEjerciciosCM.Items.Insert(0, litem);
|
||||
litem = new ListItem((EjercicioActual - 1).ToString(), (EjercicioActual - 1).ToString());
|
||||
DdlEjercicios.Items.Insert(0, litem);
|
||||
DdlEjerciciosCM.Items.Insert(0, litem);
|
||||
|
||||
}
|
||||
if (DdlEjercicios.Items.Count > 0)
|
||||
@@ -177,6 +188,8 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
private void CargaTiposPeriodo()
|
||||
{
|
||||
DdlTipoPeriodo.DataSource = GlobalDTTipoPeriodo.FiltraParametros("Estatus = 'Activo'");
|
||||
DdlTipoPeriodoCM.DataSource = DdlTipoPeriodo.DataSource;
|
||||
DdlTipoPeriodoCM.DataBind();
|
||||
DdlTipoPeriodo.DataBind();
|
||||
DdlTipoPeriodo.Items.Insert(0, new ListItem("Seleccione", "-1"));
|
||||
if (DdlTipoPeriodo.Items.Count > 0)
|
||||
@@ -700,37 +713,38 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
{
|
||||
try
|
||||
{
|
||||
using (System.Data.Odbc.OdbcConnection conn = new System.Data.Odbc.OdbcConnection("Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};DBQ=" + fileItem.FileUrl))
|
||||
{
|
||||
conn.Open();
|
||||
string exceltableName = "Nomina";
|
||||
DataTable tables = conn.GetSchema("Tables");
|
||||
if (tables.FiltraParametros(string.Format("TABLE_NAME LIKE'%{0}%'", exceltableName)).Rows.Count == 0)
|
||||
{
|
||||
continuar = false;
|
||||
stringError = "El documento no contiene la hoja nomina";
|
||||
//using (System.Data.Odbc.OdbcConnection conn = new System.Data.Odbc.OdbcConnection("Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};DBQ=" + fileItem.FileUrl))
|
||||
//{
|
||||
// conn.Open();
|
||||
// string exceltableName = "Nomina";
|
||||
// DataTable tables = conn.GeaaffotSchema("Tables");
|
||||
// if (tables.FiltraParametros(string.Format("TABLE_NAME LIKE'%{0}%'", exceltableName)).Rows.Count == 0)
|
||||
// {
|
||||
// continuar = false;
|
||||
// stringError = "El documento no contiene la hoja nomina";
|
||||
|
||||
}
|
||||
else
|
||||
{
|
||||
// }
|
||||
// else
|
||||
// {
|
||||
|
||||
exceltableName = tables.FiltroPrimero(string.Format("TABLE_NAME LIKE'%{0}%'", exceltableName))["TABLE_NAME"].ToString();
|
||||
}
|
||||
if (continuar)
|
||||
{
|
||||
using (System.Data.Odbc.OdbcCommand cmd = conn.CreateCommand())
|
||||
{
|
||||
// exceltableName = tables.FiltroPrimero(string.Format("TABLE_NAME LIKE'%{0}%'", exceltableName))["TABLE_NAME"].ToString();
|
||||
// }
|
||||
// if (continuar)
|
||||
// {
|
||||
// using (System.Data.Odbc.OdbcCommand cmd = conn.CreateCommand())
|
||||
// {
|
||||
|
||||
cmd.CommandType = CommandType.Text;
|
||||
cmd.CommandText = $"SELECT * FROM [{exceltableName}] WHERE LEN(Codigo)>0 AND Codigo <> 'Codigo'";
|
||||
using (System.Data.Odbc.OdbcDataAdapter da = new System.Data.Odbc.OdbcDataAdapter(cmd))
|
||||
{
|
||||
da.Fill(DTEXcel);
|
||||
// cmd.CommandType = CommandType.Text;
|
||||
// cmd.CommandText = $"SELECT * FROM [{exceltableName}] WHERE LEN(Codigo)>0 AND Codigo <> 'Codigo'";
|
||||
// using (System.Data.Odbc.OdbcDataAdapter da = new System.Data.Odbc.OdbcDataAdapter(cmd))
|
||||
// {
|
||||
// da.Fill(DTEXcel);
|
||||
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
// }
|
||||
// }
|
||||
// }
|
||||
//}
|
||||
DTEXcel = Extensiones.ModExtensiones.ReadExcelFile(fileItem.FileUrl, true).FiltraParametros(" LEN(Codigo)>0 AND Codigo <> 'Codigo'");
|
||||
|
||||
}
|
||||
catch (Exception ex)
|
||||
@@ -738,7 +752,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
|
||||
continuar = false;
|
||||
stringError = "Ocurrio un Error al procesar el excel ";
|
||||
string.Format(stringError, ex.ToString()).GuardaLog();
|
||||
string.Format("{0} \r\n{0}", stringError, ex.ToString()).GuardaLog();
|
||||
}
|
||||
}
|
||||
if (continuar && DTEXcel.Rows.Count == 0)
|
||||
@@ -795,7 +809,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
else
|
||||
{
|
||||
if (objNomina.AddNom_Nominas(-1, 1, CvePersonal, CvePeriodoSeleccionado, SubTotal, 0, 0, Total, CveMoneda, 1, CveMetodoPago, DateTime.Now, "Deducciones nómina",
|
||||
"", "", "", "", 0, 0, 0, new DateTime(), new DateTime(), new DateTime(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa))
|
||||
"", "", "", "", 0, 0, 0, new DateTime(), new DateTime(), new DateTime(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, false))
|
||||
{
|
||||
CveNomina = objNomina.CveNomina;
|
||||
}
|
||||
@@ -859,6 +873,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
if (rollback)
|
||||
{
|
||||
objpersonal.RollBack();
|
||||
continuar = false;
|
||||
}
|
||||
else
|
||||
{
|
||||
@@ -972,7 +987,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
LblDiasLaborados.Text = DiasLaborados;
|
||||
LblDiasFaltados.Text = DiasFaltados;
|
||||
LblDiasVacaciones.Text = DiasVacaciones;
|
||||
LblFecha.Text = string.Format("{0} al {1}",FechaInicio, FechaFin);
|
||||
LblFecha.Text = string.Format("{0} al {1}", FechaInicio, FechaFin);
|
||||
LblDiasRetardos.Text = DiasRetardos;
|
||||
LblDiasIncapacidad.Text = DiasIncapacidad;
|
||||
#endregion
|
||||
@@ -3193,11 +3208,6 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
if (continuar)
|
||||
{
|
||||
dtconp = dtempleadosConceptos.FiltraParametros(string.Format("CvePersonal={0}", CvePersonal));
|
||||
@@ -3205,8 +3215,8 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
{
|
||||
|
||||
CveConcepto = rcon["CveConcepto"].ToString().ToEntero();
|
||||
ImporteConcepto = rcon["ImporteConcepto"].ToString().ToDecimal();
|
||||
ImporteGravadoConcepto = rcon["ImporteGravadoConcepto"].ToString().ToDecimal();
|
||||
ImporteConcepto = rcon["Importe"].ToString().ToDecimal();
|
||||
ImporteGravadoConcepto = rcon["ImporteGravado"].ToString().ToDecimal();
|
||||
ImporteExentoConcepto = ImporteConcepto - ImporteGravadoConcepto;
|
||||
if (continuar)
|
||||
{
|
||||
@@ -3221,6 +3231,14 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
|
||||
|
||||
if (continuar)
|
||||
{
|
||||
continuar = objNomina.AutorizaNom_Nominas(-1, CvePeriodoSeleccionado, true);
|
||||
}
|
||||
|
||||
if (continuar)
|
||||
{
|
||||
objNomina.Commit();
|
||||
@@ -3235,4 +3253,69 @@ public partial class Nomina_Nomina2 : ClsPaginas
|
||||
dtconp.Dispose();
|
||||
Alert("Termine");
|
||||
}
|
||||
|
||||
protected void LnkCargaAsistenciaMasiva_Click(object sender, EventArgs e)
|
||||
{
|
||||
RegistraScript("$('#DModalCargaASistenciaMasiva').modal();");
|
||||
}
|
||||
|
||||
protected void LnkCargarAsistenciaMasiva_Click(object sender, EventArgs e)
|
||||
{
|
||||
using (ClsRH ObjPersonal = new ClsRH())
|
||||
{
|
||||
ObjPersonal.IniciaTransacSQL();
|
||||
bool OcurrioError = false;
|
||||
|
||||
if (!ObjPersonal.AddAsistenciaMasiva2(DdlPeriodoCM.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa))
|
||||
OcurrioError = true;
|
||||
|
||||
if (OcurrioError)
|
||||
{
|
||||
ObjPersonal.RollBack();
|
||||
Alert("Ocurrió un error al guardar las Asistencias.", ModExtensiones.TipoMensaje.MsgError);
|
||||
}
|
||||
else
|
||||
{
|
||||
ObjPersonal.Commit();
|
||||
Alert("Las Asistencias se guardaron correctamente.", ModExtensiones.TipoMensaje.ToastInformacion);
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
private void cargaPeriodosCM()
|
||||
{
|
||||
int tipoPeriodo = DdlTipoPeriodoCM.SelectedValue.ToEntero();
|
||||
int ejercicio = DdlEjerciciosCM.SelectedValue.ToEntero();
|
||||
DataTable dtPeriodos = null;
|
||||
if (tipoPeriodo > 0)
|
||||
{
|
||||
using (ClsNominas objperiodos = new ClsNominas())
|
||||
{
|
||||
if (objperiodos.GetPeriodos(tipoPeriodo, UsuarioActual.CveEmpresa, ejercicio, -1, -1))
|
||||
{
|
||||
dtPeriodos = objperiodos.DtResultados;
|
||||
}
|
||||
}
|
||||
}
|
||||
DdlPeriodoCM.DataSource = dtPeriodos;
|
||||
DdlPeriodoCM.DataBind();
|
||||
DdlPeriodoCM.Items.Insert(0, new ListItem("Seleccione", "-1"));
|
||||
UpModalAsistenciaMasiva.Update();
|
||||
}
|
||||
|
||||
protected void DdlEjerciciosCM_SelectedIndexChanged(object sender, EventArgs e)
|
||||
{
|
||||
cargaPeriodosCM();
|
||||
}
|
||||
protected void DdlTipoPeriodoCM_SelectedIndexChanged(object sender, EventArgs e)
|
||||
{
|
||||
cargaPeriodosCM();
|
||||
}
|
||||
|
||||
protected void DdlTipoPeriodoCM_SelectedIndexChanged1(object sender, EventArgs e)
|
||||
{
|
||||
|
||||
}
|
||||
}
|
||||
@@ -129,7 +129,7 @@ public partial class OI_CircularDetalleB : ClsPaginas
|
||||
string Correo = gvuser.DataKey("Correo");
|
||||
if (ChkOk.Checked && Correo.Length >0)
|
||||
{
|
||||
UsuariosCorreos = string.Format("{1}{0}" + ";", UsuariosCorreos, Correo);
|
||||
UsuariosCorreos = string.Format("{1};{0}" , UsuariosCorreos, Correo);
|
||||
}
|
||||
}
|
||||
TxtCorreo.Text = UsuariosCorreos;
|
||||
@@ -161,8 +161,20 @@ public partial class OI_CircularDetalleB : ClsPaginas
|
||||
GuardarArchivo(CircularInsertado);
|
||||
Alert("Ingresado correctamente");
|
||||
CveCircular = CircularInsertado;
|
||||
|
||||
if (CveCircular > 0)
|
||||
{
|
||||
|
||||
string[] correos;
|
||||
correos = TxtCorreo.Text.Split(';');
|
||||
byte[] ArchivoBytes = ArchivoBytesArrya(HkArchivo.Text);
|
||||
|
||||
int Contador = 0;
|
||||
foreach (string Correo in correos)
|
||||
{
|
||||
MandaCorreo(TxtAsunto.Text, Correo, Contador > 0 ? "" : TxtCorreoAdicional.Text, TxtCircular.Text.Replace("< ", "<"), ArchivoBytes, HkArchivo.Text);
|
||||
Contador += 1;
|
||||
}
|
||||
BtnGuardar.Text = "Actualizar";
|
||||
BtnEliminar.Visible = true;
|
||||
}
|
||||
@@ -274,7 +286,7 @@ public partial class OI_CircularDetalleB : ClsPaginas
|
||||
{
|
||||
foreach (string Correo in correos)
|
||||
{
|
||||
MandaCorreo(TxtAsunto.Text, Correo, Contador > 0 ? "" : TxtCorreoAdicional.Text, TxtCircular.Text, ArchivoBytes, HkArchivo.Text);
|
||||
MandaCorreo(TxtAsunto.Text, Correo, Contador > 0 ? "" : TxtCorreoAdicional.Text, TxtCircular.Text.Replace("< ", "<"), ArchivoBytes, HkArchivo.Text);
|
||||
Contador += 1;
|
||||
}
|
||||
Alert("El correo se envió correctamente");
|
||||
|
||||
@@ -219,13 +219,13 @@
|
||||
<ajax:ValidatorCalloutExtender ID="VcoFechaI" runat="server" HighlightCssClass="vco" TargetControlID="RFVtxtFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-sm-6">
|
||||
<div class="col-sm-6" 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="txtFechaF" runat="server" autocomplete="false" CssClass="form-control ADDateTimePicker" CausesValidation="true" MaxLength="18" Width="132px " placeholder=""></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RFVtxtFechaF" runat="server" ControlToValidate="txtFechaF" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Fin''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>
|
||||
<%--<asp:RequiredFieldValidator ID="RFVtxtFechaF" runat="server" ControlToValidate="txtFechaF" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Fin''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpTarea"></asp:RequiredFieldValidator>--%>
|
||||
<asp:Label AssociatedControlID="txtFechaF" runat="server" Text="Fecha Fin"></asp:Label>
|
||||
<%--<ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999 99:99" MaskType="DateTime" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>--%>
|
||||
<ajax:ValidatorCalloutExtender ID="VcoFechaF" runat="server" HighlightCssClass="vco" TargetControlID="RFVtxtFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
|
||||
<%--<ajax:ValidatorCalloutExtender ID="VcoFechaF" runat="server" HighlightCssClass="vco" TargetControlID="RFVtxtFechaF" Width="350px"></ajax:ValidatorCalloutExtender>--%>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
@@ -322,9 +322,9 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
}
|
||||
string fechaFin = "";
|
||||
DateTime dfechaF;
|
||||
if ((dfechaF=txtFechaF.Text.ToDateTimeExcat()).Year <= 1999)
|
||||
if ((dfechaF = txtFechaI.Text.ToDateTimeExcat()).Year <= 1999)
|
||||
{
|
||||
if ((dfechaF = txtFechaF.Text.ToDateTimeExcat("dd/MM/yyyy")).Year <= 1999)
|
||||
if ((dfechaF = txtFechaI.Text.ToDateTimeExcat("dd/MM/yyyy")).Year <= 1999)
|
||||
{
|
||||
errorMessage = "No se ingresó una fecha fin valida";
|
||||
|
||||
@@ -353,8 +353,8 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
errorMessage = "Asegúrese de seleccionar al menos un miembro \"C C Para\"";
|
||||
}
|
||||
if (EsNuevo)
|
||||
{
|
||||
bool Continuar = false;
|
||||
{
|
||||
bool Continuar = false;
|
||||
if (errorMessage.Length == 0)
|
||||
{
|
||||
|
||||
@@ -373,7 +373,6 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
if (Continuar)
|
||||
{
|
||||
objOI.Commit();
|
||||
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, "");
|
||||
@@ -386,6 +385,7 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
}
|
||||
if (Continuar && CveEvento > 0)
|
||||
{
|
||||
enviarConvocatoria(CveEvento);
|
||||
if (rutaarchivoOri.Length > 0)
|
||||
{
|
||||
string ruta = string.Format("{0}OIFiles\\", UsuarioActual.Empresa.Ruta);
|
||||
@@ -407,7 +407,7 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
}
|
||||
else
|
||||
{
|
||||
|
||||
|
||||
bool Continuar = true;
|
||||
using (ClsOIEventos objOI = new ClsOIEventos())
|
||||
{
|
||||
@@ -416,7 +416,7 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
if (Continuar)
|
||||
{
|
||||
|
||||
Continuar= objOI.UpdateEventoMinuta(asunto, descripcion, TxtOrdendeldia.Text.Replace("< ", "<"), dfechaF, "-1", RCveEvento);
|
||||
Continuar = objOI.UpdateEventoMinuta(asunto, descripcion, TxtOrdendeldia.Text.Replace("< ", "<"), dfechaF, "-1", RCveEvento);
|
||||
}
|
||||
if (Continuar)
|
||||
{
|
||||
@@ -520,7 +520,7 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
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);
|
||||
LnkOpenModalAsistencia_Click(null, null);
|
||||
}
|
||||
}
|
||||
|
||||
@@ -565,7 +565,7 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
}
|
||||
else
|
||||
{
|
||||
Alert("se ingresó la asistencia correctamente.");
|
||||
Alert("se ingresó la asistencia correctamente.");
|
||||
|
||||
}
|
||||
RegistraScript(string.Format("$('#{0}').modal('hide');", iddivTomarAsistencia));
|
||||
@@ -585,6 +585,7 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
{
|
||||
return string.Format("{0}/{1}", HttpContext.Current.Request.Url.ToString().Replace(HttpContext.Current.Request.Url.PathAndQuery, ""), addstr);
|
||||
}
|
||||
string UsuarioDemail = "";
|
||||
private string MailgetBodyConvocatoria(int RCveEvento)
|
||||
{
|
||||
|
||||
@@ -599,6 +600,7 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
{
|
||||
System.Data.DataRow drow = ObjOI_E.DtResultados.Rows[0];
|
||||
UsuarioDe = drow["NombreRegistro"].ToString();
|
||||
UsuarioDemail= drow["NombreRegistro"].ToString();
|
||||
Folio = drow["Folio"].ToString().ToEntero();
|
||||
Link = GetDominio(string.Format("OI/ConvocatoriaDetalle.aspx?CveEvento={0}", RCveEvento));
|
||||
Asunto = drow["Asunto"].ToString();
|
||||
@@ -687,7 +689,7 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
StrMail.Append(" </div>");
|
||||
StrMail.Append(" <br />");
|
||||
|
||||
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 />");
|
||||
@@ -731,11 +733,40 @@ public partial class OI_ConvocatoriaDetalle : ClsPaginas
|
||||
|
||||
|
||||
ClsSisMail Mail = new ClsSisMail();
|
||||
Mail.SendMail(EmpresaNotificaciones, get_GlobalDTUsuarios(UsuarioActual.CveUsuario).Rows[0]["correo"].ToString() + TxtCorreoExterno.Text, TxtAsunto.Text, Body, CCP: ArrayCC, Archivos: LSRutasMail);
|
||||
Mail.SendMail(EmpresaNotificaciones, get_GlobalDTUsuarios(UsuarioActual.CveUsuario).Rows[0]["correo"].ToString() + ";" + TxtCorreoExterno.Text, string.Format("⏰ {1} te ha invitado a una reunión, {0}", TxtAsunto.Text, UsuarioDemail), 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);
|
||||
Alert("Se Envió por correo la convocatoria", ModExtensiones.TipoMensaje.MsgInformacion);
|
||||
}
|
||||
|
||||
|
||||
public string GenerateIcsContent(DateTime dateStart,
|
||||
DateTime dateEnd, string email, string location,
|
||||
string summary, string description)
|
||||
{
|
||||
string DateFormat = "yyyyMMddTHHmmssZ";
|
||||
var s = dateStart.ToUniversalTime().ToString(DateFormat);
|
||||
var e = dateEnd.ToUniversalTime().ToString(DateFormat);
|
||||
var iCal = string.Format(@"BEGIN:VCALENDAR
|
||||
VERSION:2.0
|
||||
METHOD:PUBLISH
|
||||
BEGIN:VEVENT
|
||||
ORGANIZER:MAILTO:{0}
|
||||
DTSTART:{1}
|
||||
DTEND:{2}
|
||||
LOCATION:{3}
|
||||
UID:{4}
|
||||
DTSTAMP:{4}
|
||||
SUMMARY:{5}
|
||||
DESCRIPTION:{6}
|
||||
PRIORITY:5
|
||||
CLASS:PUBLIC
|
||||
END:VEVENT
|
||||
END:VCALENDAR", email, s, e, location,
|
||||
DateTime.Now.ToUniversalTime().ToString(DateFormat),
|
||||
summary, description);
|
||||
return iCal;
|
||||
}
|
||||
}
|
||||
@@ -1025,7 +1025,7 @@ public partial class OI_MinutaDetalle : ClsPaginas
|
||||
|
||||
|
||||
ClsSisMail Mail = new ClsSisMail();
|
||||
Mail.SendMail(EmpresaNotificaciones, get_GlobalDTUsuarios(UsuarioActual.CveUsuario).Rows[0]["correo"].ToString() + TxtCorreoExterno.Text, TxtAsunto.Text, Body, CCP: ArrayCC,Archivos: LSRutasMail);
|
||||
Mail.SendMail(EmpresaNotificaciones, get_GlobalDTUsuarios(UsuarioActual.CveUsuario).Rows[0]["correo"].ToString() +";"+ TxtCorreoExterno.Text, TxtAsunto.Text, Body, CCP: ArrayCC,Archivos: LSRutasMail);
|
||||
//Alert("Se Envió por correo la Minuta", ModExtensiones.TipoMensaje.MsgInformacion);
|
||||
Retorno = true;
|
||||
}
|
||||
|
||||
@@ -20,10 +20,10 @@
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
|
||||
<li>
|
||||
<asp:HyperLink runat="server" NavigateUrl="/OI/MinutaDetalle.aspx"><i class="fa fa-plus"></i>Nueva Minuta</asp:HyperLink>
|
||||
<asp:HyperLink runat="server" NavigateUrl="/OI/ConvocatoriaDetalle.aspx"><i class="fa fa-plus"></i>Nueva Convocatoria</asp:HyperLink>
|
||||
</li>
|
||||
<li>
|
||||
<asp:HyperLink runat="server" NavigateUrl="/OI/ConvocatoriaDetalle.aspx"><i class="fa fa-plus"></i>Nueva Convocatoria</asp:HyperLink>
|
||||
<asp:HyperLink runat="server" NavigateUrl="/OI/MinutaDetalle.aspx"><i class="fa fa-plus"></i>Nueva Minuta</asp:HyperLink>
|
||||
</li>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
|
||||
|
||||
@@ -245,9 +245,10 @@ public partial class OI_RepReuniones : ClsPaginas
|
||||
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);
|
||||
Mail.SendMail(EmpresaNotificaciones, get_GlobalDTUsuarios(UsuarioActual.CveUsuario).Rows[0]["correo"].ToString()+";" + CorreoExternoconvocatoria, Asuntoconvocatoria, Body, CCP: ArrayCC, Archivos: LSRutasMail);
|
||||
}
|
||||
private string Asuntoconvocatoria;
|
||||
private string CorreoExternoconvocatoria;
|
||||
private string MailgetBodyConvocatoria(int RCveEvento)
|
||||
{
|
||||
|
||||
@@ -264,7 +265,8 @@ public partial class OI_RepReuniones : ClsPaginas
|
||||
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());
|
||||
Asuntoconvocatoria = string.Format("⏰ {1} te ha invitado a una reunión, {0}", drow["Asunto"].ToString(), UsuarioDe);
|
||||
CorreoExternoconvocatoria =drow["CorreoExterno"].ToString();
|
||||
Asunto = drow["Asunto"].ToString();
|
||||
Descripcion = drow["Descripcion"].ToString();
|
||||
Acuerdos = drow["Acuerdos"].ToString();
|
||||
|
||||
@@ -145,21 +145,21 @@
|
||||
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkAgregarCheckList" OnClick="LnkAgregarCheckList_Click" runat="server"><i class="fa fa-plus"></i> Agregar CheckList</asp:LinkButton></li>
|
||||
<asp:LinkButton ID="LnkAgregarCheckList" OnClick="LnkAgregarCheckList_Click" runat="server"><i class="fa fa-plus"></i> Agregar checkList</asp:LinkButton></li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkcambiarEstatus" OnClick="LnkcambiarEstatus_Click" runat="server"><i class="fa fa-exchange"></i>Cambiar Estatus</asp:LinkButton></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 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>
|
||||
<asp:LinkButton ID="LnkAgregarTema" OnClick="LnkAgregarTema_Click" runat="server"><i class="fa fa-plus"></i> Agregar tema</asp:LinkButton></li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkUpFile" OnClick="LnkUpFile_Click" Visible="false" runat="server"><i class="fa fa-plus"></i> Agregar Archivo</asp:LinkButton></li>
|
||||
<asp:LinkButton ID="LnkUpFile" OnClick="LnkUpFile_Click" Visible="false" runat="server"><i class="fa fa-plus"></i> Agregar archivo</asp:LinkButton></li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkUpUsuarios" OnClick="LnkUpUsuarios_Click" Visible="true" runat="server"><i class="fa fa-pencil"></i> Actualizar Miembros</asp:LinkButton></li>
|
||||
<asp:LinkButton ID="LnkUpUsuarios" OnClick="LnkUpUsuarios_Click" Visible="true" runat="server"><i class="fa fa-pencil"></i> Actualizar miembros</asp:LinkButton></li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkReasignar" OnClick="LnkReasignar_Click" Visible="true" runat="server"><i class="fa fa-pencil"></i> Reasignar</asp:LinkButton></li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkUpVinculo" OnClick="LnkUpVinculo_Click" Visible="false" runat="server"><i class="fa fa-pencil"></i> Agregar Vinculo</asp:LinkButton></li>
|
||||
<asp:LinkButton ID="LnkUpVinculo" OnClick="LnkUpVinculo_Click" Visible="false" runat="server"><i class="fa fa-pencil"></i> Agregar vinculo</asp:LinkButton></li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkEliminar" OnClick="LnkEliminar_Click" Visible="false" runat="server"><i class="fa fa-remove"></i> Eliminar</asp:LinkButton></li>
|
||||
|
||||
@@ -520,10 +520,10 @@
|
||||
<span class="caption-subject bold uppercase">Bitácora</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" >
|
||||
<asp:UpdatePanel ID="UpActividades" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<asp:GridView ID="GvActividades" runat="server" AutoGenerateColumns="False" CssClass="table table-striped table-advance table-hover Widthall ScrollAD GvActividades"
|
||||
|
||||
@@ -393,7 +393,7 @@ public partial class OI_TareaDetalle : ClsPaginas
|
||||
if (ObjOI_E.GetEventos2(RCveEvento, UsuarioActual.CveEmpresa) && ObjOI_E.DtResultados.Rows.Count > 0)
|
||||
{
|
||||
LnkUpVinculo.Visible = true;
|
||||
LnkUpVinculo.Text = "<i class=\"fa fa-plus\"></i> Agregar Relación";
|
||||
LnkUpVinculo.Text = "<i class=\"fa fa-plus\"></i> Agregar relación";
|
||||
|
||||
PnlUsuarios.Visible = true;
|
||||
portletMiembros.Visible = false;
|
||||
@@ -553,7 +553,7 @@ public partial class OI_TareaDetalle : ClsPaginas
|
||||
else
|
||||
{
|
||||
LnkUpVinculo.Visible = true;
|
||||
LnkUpVinculo.Text = "<i class=\"fa fa-pencil\"></i> Actualizar Relación";
|
||||
LnkUpVinculo.Text = "<i class=\"fa fa-pencil\"></i> Actualizar relación";
|
||||
}
|
||||
titulo = "";
|
||||
link = "";//EP.[CveTipoEvento] CveTipoEventoPadre,EP.Asunto AS AsuntoPadre
|
||||
|
||||
@@ -91,7 +91,7 @@ Partial Class CatFolios
|
||||
Dim ObjFolios As New ClsGralFolios
|
||||
If ObjFolios.GetFolios() Then
|
||||
ViewState("DTFolios") = ObjFolios.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
|
||||
GlobalDTFolios = ObjFolios.DtResultados
|
||||
|
||||
GvDatos.DataSource = ObjFolios.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
|
||||
GvDatos.DataBind()
|
||||
Else
|
||||
@@ -153,7 +153,7 @@ Partial Class CatFolios
|
||||
If ObjFolios.RemoveFolios(GvDatos.DataKeys(e.RowIndex).Value.ToString.ToEntero) Then
|
||||
GvDatos.EditIndex = -1
|
||||
ViewState("DTFolios") = ObjFolios.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
|
||||
GlobalDTFolios = ObjFolios.DtResultados
|
||||
|
||||
Alert("La Aprobación de Folios se eliminó correctamente.", TipoMensaje.MsgInformacion)
|
||||
End If
|
||||
ObjFolios.Dispose()
|
||||
@@ -194,7 +194,7 @@ Partial Class CatFolios
|
||||
Session("FileUpload") = ""
|
||||
|
||||
Alert("La nueva Aprobación de Folios se guardó/editó correctamente.", TipoMensaje.MsgInformacion)
|
||||
GlobalDTFolios = ObjFolios.DtResultados
|
||||
|
||||
ViewState("DTFolios") = ObjFolios.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
|
||||
|
||||
|
||||
|
||||
@@ -10,45 +10,41 @@
|
||||
Registro de Asistencias
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
|
||||
<asp:Panel ID="PnlMasivo" runat="server" Visible="False">
|
||||
<li>
|
||||
<asp:HyperLink ID="HypCargaAsistenciaMasiva" data-toggle="modal" data-target="#DModalCargaASistenciaMasiva" runat="server"><i class="fa fa-check" aria-hidden="true"></i>Carga masiva de asistencia</asp:HyperLink>
|
||||
</li>
|
||||
</asp:Panel>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
|
||||
<asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<div class="portlet solid grey-cascade portlet-filter" style="" id="PorletAsistencia">
|
||||
<div class="portlet-title portlet-filterT" style="">
|
||||
<div class="portlet-body" style="font-size:120%">
|
||||
|
||||
<div class="tools">
|
||||
<asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
|
||||
<a href="javascript:;" class="collapse"></a>
|
||||
<a onclick="document.getElementById('C_BtnConsultar').click();" class="reload"></a>
|
||||
</div>
|
||||
<div class="titlefiltros caption ">
|
||||
<ul class="list-inline">
|
||||
<li>Cliente:
|
||||
<asp:Button ID="BtnCargarClientes" runat="server" ClientIDMode="Static" Text="CargarClientes" Style="display: none;" />
|
||||
<asp:DropDownList ID="DdlCliente" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 250px !important;">
|
||||
<asp:DropDownList ID="DdlCliente" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 150px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</li>
|
||||
<li>Proyecto:
|
||||
<asp:DropDownList ID="DdlProyecto" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 200px !important;" ValidationGroup="GrpGuardar">
|
||||
<asp:DropDownList ID="DdlProyecto" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;" ValidationGroup="GrpGuardar">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</li>
|
||||
<li>SubProyecto:
|
||||
<asp:DropDownList ID="DdlSubProyecto" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 200px !important;" ValidationGroup="GrpGuardar">
|
||||
<asp:DropDownList ID="DdlSubProyecto" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;" ValidationGroup="GrpGuardar">
|
||||
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</li>
|
||||
</ul>
|
||||
</div>
|
||||
<div class="tools">
|
||||
<asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
|
||||
<a href="javascript:;" class="expand"></a>
|
||||
<a onclick="document.getElementById('C_BtnConsultar').click();" class="reload"></a>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body" style="display: none;font-size:120%">
|
||||
<ul class="list-inline">
|
||||
<li style="width: 297px;"> Turno:
|
||||
<asp:DropDownList ID="DdlTurno" runat="server" AppendDataBoundItems="true" DataTextField="Turno" DataValueField="CveTurno" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;" ValidationGroup="GrpGuardar">
|
||||
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</li>
|
||||
<li>F. Asistencia:
|
||||
<asp:TextBox ID="TxtFechaAsistencia" runat="server" MaxLength="10" Width="70px" Height="30px"></asp:TextBox>
|
||||
<asp:ImageButton runat="server" ID="ImgFechaAsistencia" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
|
||||
@@ -60,133 +56,153 @@
|
||||
|
||||
<ajax:ValidatorCalloutExtender ID="VCOFechaAsistencia2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaAsistencia" Width="350px"></ajax:ValidatorCalloutExtender>
|
||||
</li>
|
||||
<li style="width: 185px;"> Turno:
|
||||
<asp:DropDownList ID="DdlTurno" runat="server" AppendDataBoundItems="true" DataTextField="Turno" DataValueField="CveTurno" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;" ValidationGroup="GrpGuardar">
|
||||
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</li>
|
||||
</ul>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body" style="font-size: 120%">
|
||||
<ul class="list-inline">
|
||||
</ul>
|
||||
</div>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
<table width="100%">
|
||||
<table style="width: 100%;">
|
||||
<tr>
|
||||
<td width="48%"> </td>
|
||||
<td>
|
||||
<asp:UpdatePanel ID="UPP" runat="server">
|
||||
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<asp:Panel ID="PnlMasivo" runat="server" Visible="False">
|
||||
<table width="200px" border="0">
|
||||
<tr>
|
||||
<td>Tipo:</td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlTipoPeriodo" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="TipoPeriodo" DataValueField="CveTipoPeriodo" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 110px !important;">
|
||||
<asp:GridView ID="GV" runat="server" AutoGenerateColumns="false" DataKeyNames="CvePersonal" EmptyDataText="No se encontró Personal asignado al Proyecto o al Cliente" ToolTip="Listado de Personal" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" Style="margin-top: -10px; text-align: center;" GridLines="None">
|
||||
<Columns>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>N°</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Literal ID="LtlCodigo" runat="server" Text='<%# Eval("Codigo") %>'></asp:Literal>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Personal</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Literal ID="LtlPersonal" runat="server" Text='<%# Eval("Nombre") %>'></asp:Literal>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Asistencia</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:DropDownList ID="DdlTipoAsistencias" runat="server" DataTextField="Tipo" DataValueField="CveAsistenciasInasistencias" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 90px !important;"></asp:DropDownList>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>% de Pago</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:TextBox ID="TxtPorPago" runat="server" MaxLength="3" Text="100" Width="74px"></asp:TextBox>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Hrs Dobles</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:TextBox ID="TxtHorasDobles" runat="server" MaxLength="3" Text="0" Width="79px"></asp:TextBox>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Hrs Triples</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:TextBox ID="TxtHorasTriples" runat="server" MaxLength="3" Text="0" Width="79px"></asp:TextBox>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Motivo H. Extras</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:DropDownList ID="DdlMotivoHoraExtra" runat="server" AppendDataBoundItems="true" DataTextField="MotivoHoraExtra" DataValueField="CveMotivoHoraExtra" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 140px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>Periodo:</td>
|
||||
<td>
|
||||
<asp:DropDownList ID="DdlPeriodo" runat="server" AppendDataBoundItems="true" DataTextField="NominaEstatus" DataValueField="CvePeriodo" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 150px !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td colspan="2" style="text-align: center;">
|
||||
<asp:Button ID="BtnCargaMasiva" runat="server" Text="Carga Masiva" class="btn btn-primary" />
|
||||
</td>
|
||||
</tr>
|
||||
|
||||
</table>
|
||||
</asp:Panel>
|
||||
</asp:DropDownList>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Obs.</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:TextBox ID="TxtObservaciones" runat="server" Width="84px" MaxLength="150"></asp:TextBox>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
<RowStyle CssClass="Texto" />
|
||||
<AlternatingRowStyle CssClass="TextoAlterno" />
|
||||
<HeaderStyle CssClass="Titulos" />
|
||||
</asp:GridView>
|
||||
<div class="text-right"><asp:Button ID="BtnGuardar" Visible="false" runat="server" Text="Guardar Asistencia" class="btn btn-primary" /></div>
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</td>
|
||||
<td align="left">
|
||||
<td style="width: 250px;text-align:left;vertical-align: top;">
|
||||
<table class="table table-striped table-advance table-hover">
|
||||
<thead>
|
||||
<tr class="Titulos">
|
||||
<th>#</th>
|
||||
<th align="left"> Notación</th>
|
||||
<th style="text-align:left;"> Notación</th>
|
||||
</tr>
|
||||
</thead>
|
||||
<tr>
|
||||
<td>1 </td>
|
||||
<td align="left"> Sin registrar asistencia</td>
|
||||
<td style="text-align:left;"> Sin registrar asistencia</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>2 </td>
|
||||
<td align="left" style="background-color: #ADD8E6"> Se registró asistencia</td>
|
||||
<td style="text-align:left;background-color: #ADD8E6"> Se registró asistencia</td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>3 </td>
|
||||
<td align="left" style="color: #FF0000"> Se registró asistencia y fue modificada</td>
|
||||
<td style="text-align:left;color: #FF0000"> Se registró asistencia y fue modificada</td>
|
||||
</tr>
|
||||
</table>
|
||||
</td>
|
||||
</tr>
|
||||
</table>
|
||||
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<asp:GridView ID="GV" runat="server" AutoGenerateColumns="false" DataKeyNames="CvePersonal" EmptyDataText="No se encontró Personal asignado al Proyecto o al Cliente" ToolTip="Listado de Personal" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;" GridLines="None">
|
||||
<Columns>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>N°</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Literal ID="LtlCodigo" runat="server" Text='<%# Eval("Codigo") %>'></asp:Literal>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Personal</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Literal ID="LtlPersonal" runat="server" Text='<%# Eval("Nombre") %>'></asp:Literal>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Asistencia</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:DropDownList ID="DdlTipoAsistencias" runat="server" DataTextField="Tipo" DataValueField="CveAsistenciasInasistencias" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 90px !important;"></asp:DropDownList>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>% de Pago</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:TextBox ID="TxtPorPago" runat="server" MaxLength="3" Text="100" Width="74px"></asp:TextBox>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Hrs Dobles</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:TextBox ID="TxtHorasDobles" runat="server" MaxLength="3" Text="0" Width="79px"></asp:TextBox>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Hrs Triples</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:TextBox ID="TxtHorasTriples" runat="server" MaxLength="3" Text="0" Width="79px"></asp:TextBox>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Motivo H. Extras</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:DropDownList ID="DdlMotivoHoraExtra" runat="server" AppendDataBoundItems="true" DataTextField="MotivoHoraExtra" DataValueField="CveMotivoHoraExtra" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 140px !important;">
|
||||
|
||||
<div id="DModalCargaASistenciaMasiva" class="modal ADS fade" role="dialog">
|
||||
<asp:UpdatePanel ID="UPP" class="modal-dialog" tabindex="-1" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<div class="modal-content rowpadding">
|
||||
<div class="modal-header">
|
||||
<button type="button" class="close" data-dismiss="modal" aria-label="Close">
|
||||
<span aria-hidden="true">×</span>
|
||||
</button>
|
||||
<h4 class="modal-title" runat="server" style="text-align: left">Cargar asistencia del periodo</h4>
|
||||
</div>
|
||||
<div class="modal-body">
|
||||
<div class="form-group form-md-line-input">
|
||||
<asp:DropDownList ID="DdlTipoPeriodo" runat="server" AppendDataBoundItems="true" AutoPostBack="true" OnSelectedIndexChanged="DdlTipoPeriodo_SelectedIndexChanged" DataTextField="TipoPeriodo" DataValueField="CveTipoPeriodo" Class="form-control select2me input-sm" Style="width: 100% !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>Obs.</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:TextBox ID="TxtObservaciones" runat="server" Width="84px" MaxLength="150"></asp:TextBox>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
<RowStyle CssClass="Texto" />
|
||||
<AlternatingRowStyle CssClass="TextoAlterno" />
|
||||
<HeaderStyle CssClass="Titulos" />
|
||||
</asp:GridView>
|
||||
<asp:Button ID="BtnGuardar" runat="server" Text="Guardar Asistencia" class="btn btn-primary" />
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
<asp:Label runat="server" AssociatedControlID="DdlTipoPeriodo">Tipo:</asp:Label>
|
||||
</div>
|
||||
<div class="form-group form-md-line-input">
|
||||
<asp:DropDownList ID="DdlPeriodo" runat="server" AppendDataBoundItems="true" DataTextField="NominaEstatus" DataValueField="CvePeriodo" Class="form-control select2me input-sm" Style="width: 100% !important;">
|
||||
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
<asp:Label runat="server" AssociatedControlID="DdlPeriodo">Periodo:</asp:Label>
|
||||
</div>
|
||||
|
||||
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<asp:UpdatePanel runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<asp:LinkButton ID="BtnCargaMasiva" OnClick="BtnCargaMasiva_Click" CssClass="btn btn-primary" runat="server">Cargar</asp:LinkButton>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
|
||||
<script language="javascript" type="text/javascript">
|
||||
<script type="text/javascript">
|
||||
function CargaClientes() {
|
||||
$("#BtnCargarClientes").click();
|
||||
}
|
||||
|
||||
@@ -71,6 +71,7 @@ Partial Class RH_Asistencias
|
||||
End If
|
||||
objpersonal.Dispose()
|
||||
GV.DataBind()
|
||||
BtnGuardar.Visible = (GV.Rows.Count > 0)
|
||||
UpDatos.Update()
|
||||
Else
|
||||
Alert("La Fecha está fuera de los parámetros establecidos, por favor revise. Fecha: " & TxtFechaAsistencia.Text, TipoMensaje.MsgAdvertencia)
|
||||
@@ -150,7 +151,7 @@ Partial Class RH_Asistencias
|
||||
End Sub
|
||||
|
||||
|
||||
Protected Sub BtnCargaMasiva_Click(sender As Object, e As EventArgs) Handles BtnCargaMasiva.Click
|
||||
Protected Sub BtnCargaMasiva_Click(sender As Object, e As EventArgs)
|
||||
Dim ObjPersonal As New ClsRH()
|
||||
ObjPersonal.IniciaTransacSQL()
|
||||
Dim OcurrioError As Boolean = False
|
||||
|
||||
@@ -20,8 +20,7 @@
|
||||
<asp:ListItem Text="Proyectos" Value="GlobalDTProyectos"></asp:ListItem>
|
||||
<asp:ListItem Text="ProyectosUsuarios" Value="GlobalDTProyectosUsuarios"></asp:ListItem>
|
||||
<asp:ListItem Text="Sub Proyectos" Value="GlobalDTSubProyectos"></asp:ListItem>
|
||||
<asp:ListItem Text="Sub ProyectosUsuarios" Value="GlobalDTSubProyectosUsuarios"></asp:ListItem>
|
||||
<asp:ListItem Text="Folios" Value="GlobalDTFolios"></asp:ListItem>
|
||||
<asp:ListItem Text="Sub ProyectosUsuarios" Value="GlobalDTSubProyectosUsuarios"></asp:ListItem>
|
||||
<%-- <asp:ListItem Text="Sucursales" Value="GlobalDTSucursales"></asp:ListItem>--%>
|
||||
<asp:ListItem Text="Proveedores" Value="GlobalDTCompProveedores"></asp:ListItem>
|
||||
<asp:ListItem Text="Métodos de Pago" Value="GlobalDTMetodosPago"></asp:ListItem>
|
||||
|
||||
@@ -24,8 +24,6 @@ Partial Class Sistemas_CatSesiones
|
||||
CargaSubProyectos()
|
||||
ElseIf DdlVariable.SelectedItem.Value = "GlobalDTSubProyectosUsuarios" Then
|
||||
CargaSubProyectos()
|
||||
ElseIf DdlVariable.SelectedItem.Value = "GlobalDTFolios" Then
|
||||
CargaFolios()
|
||||
'ElseIf DdlVariable.SelectedItem.Value = "GlobalDTSucursales" Then
|
||||
' CargaSucursales()
|
||||
ElseIf DdlVariable.SelectedItem.Value = "GlobalDTCompProveedores" Then
|
||||
@@ -341,18 +339,6 @@ Partial Class Sistemas_CatSesiones
|
||||
'Fin Carga Proyectos
|
||||
End Sub
|
||||
|
||||
Private Sub CargaFolios()
|
||||
'Carga Folios
|
||||
Dim ObjFolios As New ClsGralFolios()
|
||||
If ObjFolios.GetFolios() Then
|
||||
Application("GlobalDTFolios") = ObjFolios.DtResultados
|
||||
Else
|
||||
Application("GlobalDTFolios") = Nothing
|
||||
End If
|
||||
ObjFolios.Dispose()
|
||||
'Fin Carga Folios
|
||||
End Sub
|
||||
|
||||
'Private Sub CargaSucursales()
|
||||
' 'Carga Sucursales
|
||||
' Dim ObjSucursales As New ClsSucursales()
|
||||
|
||||
@@ -5152,7 +5152,9 @@ Partial Class Ventas
|
||||
|
||||
CargarAlmacenes()
|
||||
|
||||
CargaDocumentacionCliente()
|
||||
If UsuarioActual.Empresa.FacturaProduccion Then
|
||||
CargaDocumentacionCliente()
|
||||
End If
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(72, 80, 1, 119) Then
|
||||
BtnEmitirImprimir.OnClientClick = $"ValidaGuardar({ If(ImprimeNombreSucursal = True, 1, 0)});"
|
||||
@@ -7029,7 +7031,7 @@ Partial Class Ventas
|
||||
|
||||
'MARCA LO PENDIENTE A NIVEL DETALLE
|
||||
Dim DtMovDetalles As DataTable = Nothing
|
||||
If ObjInventario.GetSaldoVentaDetalle(ObjFactura.CveVenta, UsuarioActual.CveEmpresa) Then
|
||||
If ObjInventario.GetSaldoVentaDetalle(CveDevolucion, UsuarioActual.CveEmpresa) Then
|
||||
DtMovDetalles = ObjInventario.DtResultados.Copy()
|
||||
End If
|
||||
|
||||
@@ -7037,9 +7039,9 @@ Partial Class Ventas
|
||||
For Each Row As DataRow In DtMovDetalles.Rows
|
||||
Dim SaldoAlmacen As Decimal = Row("SaldoAlmacen").ToString().ToEntero()
|
||||
If SaldoAlmacen < 0 Then
|
||||
ObjInventario.UpdateEstatusAlmacen(Row("CveVentaDetalle").ToString().ToEntero(), 1)
|
||||
ObjInventario.UpdateEstatusAlmacen(Row("CveVentaDetalleNueva").ToString().ToEntero(), 1)
|
||||
ElseIf SaldoAlmacen = 0 Then
|
||||
ObjInventario.UpdateEstatusAlmacen(Row("CveVentaDetalle").ToString().ToEntero(), 0)
|
||||
ObjInventario.UpdateEstatusAlmacen(Row("CveVentaDetalleNueva").ToString().ToEntero(), 0)
|
||||
End If
|
||||
Next
|
||||
End If
|
||||
@@ -10186,7 +10188,7 @@ Partial Class Ventas
|
||||
Exit For
|
||||
Else
|
||||
ViewState("SeGuardoPrePoliza") = True
|
||||
If Not ObjConta.AddPrePolizasDetalle(ObjFactura.CvePrePoliza, True, importeMovimiento, Referencia, 2, Concepto, FechaMovimiento, IdCtaContable, -1, CveVenta:=Dr("CveVenta").ToString().ToEntero(), CveCliente:=ObjFactura.CveCliente, ImporteMX:=importeMovimiento, ImporteME:=If(Dr("TCCambioValuacion").ToString().ToDecimal = 1, 0, importeMovimiento), CveSubProyecto:=CveSubProyectoContabilizar, CveIE:=CveIEAnticipo, CveVentaAmortizacion:=ObjFactura.CveVenta, TipoCambio:=Dr("TCCambioValuacion").ToString().ToDecimal, TipoCambioPago:=tipoCambio) Then
|
||||
If Not ObjConta.AddPrePolizasDetalle(ObjFactura.CvePrePoliza, True, importeMovimiento, Referencia, 2, Concepto, FechaMovimiento, ObjFactura.Cliente.IdCtaContClientes, -1, CveVenta:=Dr("CveVenta").ToString().ToEntero(), CveCliente:=ObjFactura.CveCliente, ImporteMX:=importeMovimiento, ImporteME:=If(Dr("TCCambioValuacion").ToString().ToDecimal = 1, 0, importeMovimiento), CveSubProyecto:=CveSubProyectoContabilizar, CveIE:=CveIEAnticipo, CveVentaAmortizacion:=ObjFactura.CveVenta, TipoCambio:=Dr("TCCambioValuacion").ToString().ToDecimal, TipoCambioPago:=tipoCambio) Then
|
||||
ErrorPrepoliza = True
|
||||
Exit For
|
||||
End If
|
||||
@@ -19451,6 +19453,7 @@ Partial Class Ventas
|
||||
|
||||
Private Sub CancelarDocumento(Optional EsRefacturacion As Boolean = False)
|
||||
|
||||
Dim LigaRedirigir As String = ""
|
||||
'Si es cancelacion de una refactura ignoramos las condiciones
|
||||
If Me.CveEstatus = 13 Then
|
||||
CancelarRefacturada()
|
||||
@@ -19495,11 +19498,9 @@ Partial Class Ventas
|
||||
Else
|
||||
If EsRefacturacion Then
|
||||
If resp.CveEstatus = 20 Then
|
||||
ObjFacturaCancelacion.Dispose()
|
||||
Server.Transfer($"/Ventas/RepCancelacionesPorRespuesta.aspx?CveVenta={CveVenta}")
|
||||
LigaRedirigir = $"/Ventas/RepCancelacionesPorRespuesta.aspx?CveVenta={CveVenta}"
|
||||
ElseIf resp.CveEstatus.Contiene(4, 5) Then
|
||||
ObjFacturaCancelacion.Dispose()
|
||||
Server.Transfer($"Ventas.aspx?CveDevolucion={CveVenta}&NuevaFactura=1")
|
||||
LigaRedirigir = $"Ventas.aspx?CveDevolucion={CveVenta}&NuevaFactura=1"
|
||||
Else
|
||||
Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnRefrescarPagina();")
|
||||
End If
|
||||
@@ -19507,8 +19508,6 @@ Partial Class Ventas
|
||||
Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnRefrescarPagina();")
|
||||
End If
|
||||
End If
|
||||
|
||||
ObjFacturaCancelacion.CveAlmacen = -1
|
||||
Else
|
||||
Alert("Ocurrió un error al generar la cancelación", TipoMensaje.MsgError)
|
||||
End If
|
||||
@@ -19520,6 +19519,10 @@ Partial Class Ventas
|
||||
|
||||
UpEstatus.Update()
|
||||
|
||||
If Not String.IsNullOrEmpty(LigaRedirigir) Then
|
||||
Response.Redirect(LigaRedirigir)
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
@@ -633,7 +633,7 @@ Public Class WSApp
|
||||
Dim retorno As String = "[]"
|
||||
Dim CvePS = -1
|
||||
Dim ObjPS As New ClsProductosServicios
|
||||
If ObjPS.GetPSExistencias(CvePS, CvePrecioLista, -1, CveEmpresa, -1, FechaMovto:=DateTime.Today.AddDays(1).ToString("yyyy/MM/dd HH:mm")) Then
|
||||
If ObjPS.GetPSExistenciasWS(CvePS, CvePrecioLista, -1, CveEmpresa, -1, FechaMovto:=DateTime.Today.AddDays(1).ToString("yyyy/MM/dd HH:mm")) Then
|
||||
If CveClasificacion > 0 Then
|
||||
retorno = ObjPS.DtResultados.FiltraParametros($"CveClasificacion = {CveClasificacion}").ToJson()
|
||||
Else
|
||||
@@ -1122,7 +1122,7 @@ Public Class WSApp
|
||||
TmpDT.Columns.Add("NoIdentificacion", GetType(String))
|
||||
TmpDT.Columns.Add("CveTipoPS", GetType(Integer))
|
||||
TmpDT.Columns.Add("CveTipoInvPS", GetType(Integer))
|
||||
TmpDT.Columns.Add("SerieLote", GetType(String))
|
||||
TmpDT.Columns.Add("Serie", GetType(String))
|
||||
TmpDT.Columns.Add("CuentaPredial", GetType(String))
|
||||
TmpDT.Columns.Add("Obs", GetType(String))
|
||||
TmpDT.Columns.Add("TiempoEntrega", GetType(String))
|
||||
@@ -1210,7 +1210,7 @@ Public Class WSApp
|
||||
TmpDT.Columns.Add("CveUM", GetType(Integer))
|
||||
TmpDT.Columns.Add("Cantidad", GetType(Decimal))
|
||||
TmpDT.Columns.Add("CveTipoInvPS", GetType(Integer))
|
||||
TmpDT.Columns.Add("SerieLote", GetType(String))
|
||||
TmpDT.Columns.Add("Serie", GetType(String))
|
||||
TmpDT.Columns.Add("CveVentaDetalle", GetType(Integer))
|
||||
|
||||
For Each Dr As DataRow In DtDetalle.FiltraParametros("CveTipoPS = 2").Rows
|
||||
@@ -1219,7 +1219,7 @@ Public Class WSApp
|
||||
ss("CveUM") = Dr("CveUM")
|
||||
ss("Cantidad") = Dr("Cantidad")
|
||||
ss("CveTipoInvPS") = Dr("CveTipoInvPS")
|
||||
ss("SerieLote") = Dr("SerieLote")
|
||||
ss("Serie") = Dr("Serie")
|
||||
ss("CveVentaDetalle") = -1
|
||||
|
||||
TmpDT.Rows.Add(ss)
|
||||
@@ -1228,7 +1228,7 @@ Public Class WSApp
|
||||
Return TmpDT
|
||||
End Function
|
||||
Private Function AgregarProductoServicio(ByRef Retorno As Modelos.Factura.MMensajeFactura, TmpDT As DataTable, PS As MVentaProductos, CveEmpresa As Integer, CvePrecioLista As Integer, CveSubProyecto As Integer,
|
||||
Optional SerieLote As String = "", Optional TiempoEntrega As String = "", Optional EntregaDirecta As Integer = 0,
|
||||
Optional Serie As String = "", Optional TiempoEntrega As String = "", Optional EntregaDirecta As Integer = 0,
|
||||
Optional CveContratoDetalle As Integer = 0, Optional CveVentaDetalle As Integer = 0, Optional CveMovimientoDetallePedido As Integer = 0,
|
||||
Optional CveOrdenCompraDetalle As Integer = 0, Optional CveVentaDetalleRemision As Integer = 0, Optional CveVentaDetalleCotizacion As Integer = 0,
|
||||
Optional CuentaPredial As String = "", Optional RegeneraIEPS As Boolean = True, Optional CveVentaDetallePedido2 As Integer = 0,
|
||||
@@ -1290,7 +1290,7 @@ Public Class WSApp
|
||||
Row("Proyecto") = DrSubProyecto("Proyecto").ToString()
|
||||
Row("CveSubProyecto") = CveSubProyecto
|
||||
Row("SubProyecto") = DrSubProyecto("SubProyecto").ToString()
|
||||
Row("SerieLote") = SerieLote
|
||||
Row("Serie") = Serie
|
||||
Row("TiempoEntrega") = TiempoEntrega
|
||||
Row("Orden") = TmpDT.Rows.Count + 1
|
||||
Row("Cantidad") = PS.Cantidad
|
||||
|
||||
Reference in New Issue
Block a user