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

cambio funcion en tipo de fechas

Browse Source
This commit is contained in:
rrene
2023-10-07 11:50:33 -07:00
parent 2690361d7a
commit be6e9812fa
1 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
App_Code/ClsMovimientos.vb
View File

@@ -1481,7 +1481,7 @@ Public Class ClsMovimientos
#End Region
#Region "Anticipos de Proveedores"
Public Function GetAnticiposProveedor(CveProveedor As Integer, CveProveedorSucursal As Integer, Optional CveMoneda As Integer = -1, Optional SelectTop As Integer = -1, Optional FechaI As String = "-1", Optional FechaF As String = "-1", Optional TipoDocto As String = "-1") As Boolean
Public Function GetAnticiposProveedor(CveProveedor As Integer, CveEmpresa As Integer, Optional CveMoneda As Integer = -1, Optional CveProveedorSucursal As Integer = -1, Optional SelectTop As Integer = -1, Optional FechaI As Date = MinFecha, Optional FechaF As Date = MaxFecha, Optional TipoDocto As String = "-1") As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Comp_ProveedorAnticipos")
@@ -1489,13 +1489,13 @@ Public Class ClsMovimientos
.Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
.Add("@CveMoneda", SqlDbType.Int).Value = CveMoneda
.Add("@CveProveedorSucursal", SqlDbType.Int).Value = CveProveedorSucursal
.Add("@SelectTop", SqlDbType.Int).Value = SelectTop
.Add("@FechaI", SqlDbType.VarChar).Value = FechaI
.Add("@FechaF", SqlDbType.VarChar).Value = FechaF
.Add("@SelectTop", SqlDbType.Int).Value = SelectTop
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@FechaI", SqlDbType.Date).Value = FechaI
.Add("@FechaF", SqlDbType.Date).Value = FechaF
.Add("@TipoDocto", SqlDbType.VarChar).Value = TipoDocto
End With
Try
SqlAdapter.Fill(Data)
Retorno = True