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

Nuevos parametos

Browse Source
This commit is contained in:
Hector Javier Rodriguez Flores
2021-09-29 00:08:50 -07:00
parent 50b59323e2
commit a241020dc7
2 changed files with 3 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
App_Code/ClsGenerales.vb
View File

@@ -2527,7 +2527,7 @@ Public Class ClsGenerales
CveEmpresa As Integer, Optional CveUsuario As Integer = -1, Optional CvePersonal As Integer = -1,
Optional IdPoliza As Integer = -1, Optional CvePrePoliza As Integer = -1, Optional CvePeriodo As Integer = -1, Optional CveConceptoNomina As Integer = -1, Optional CvePromocion As Integer = -1,
Optional CveAsistencia As Integer = -1, Optional CveAsistenciaDetalle As Integer = -1, Optional CveTipoBitacora As Integer = -1,
Optional FechaInicio As String = "", Optional FechaFin As String = "") As Boolean
Optional FechaInicio As String = "", Optional FechaFin As String = "", Optional Fecha As Date = MinFecha) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Gral_HistorialBitacoraGet")
@@ -2554,6 +2554,8 @@ Public Class ClsGenerales
.Add("@CveTipoBitacora", SqlDbType.Int).Value = CveTipoBitacora
.Add("@FechaInicio", SqlDbType.VarChar).Value = FechaInicio
.Add("@FechaFin", SqlDbType.VarChar).Value = FechaFin
.Add("@Fecha", SqlDbType.Date).Value = Fecha
End With
'SqlTypes.SqlDateTime.Null

4
App_Code/ClsInventarios.vb
View File

@@ -131,8 +131,6 @@ Public Class ClsInventarios
Public Property ResponsableCarga As String
Public Property ResponsableRecibio As String
Public Property Modulo As String
Public Property ConAplicacion As Boolean
@@ -2309,8 +2307,6 @@ Public Class ClsInventarios
FechaI = dr("FechaInicio").ToString
FechaF = dr("FechaFin").ToString
Estatus = dr("Estatus").ToString
ConAplicacion = Convert.ToBoolean(dr("ConAplicacion").ToString)
Retorno = True
End If