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

--FIX acento en clase

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2024-07-16 19:50:23 -07:00
parent 7fbba457ad
commit da8603c803
1 changed files with 6 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
App_Code/ClsVentas.vb
View File

@@ -2782,12 +2782,12 @@ Public Class ClsVentas
End Function End Function
Public Function UpdateMotivoDevolucion(CveMotivoDevolución As Integer, Motivo As String, Estatus As Boolean, CveEmpresa As Integer) As Boolean Public Function UpdateMotivoDevolucion(CveMotivoDevolucion As Integer, Motivo As String, Estatus As Boolean, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Vta_VentasMotivosDevolucionUpdate") DataAdapter("PA_Vta_VentasMotivosDevolucionUpdate")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@CveMotivoDevolución", SqlDbType.Int).Value = CveMotivoDevolución .Add("@CveMotivoDevolucion", SqlDbType.Int).Value = CveMotivoDevolucion
.Add("@Motivo", SqlDbType.VarChar).Value = Motivo .Add("@Motivo", SqlDbType.VarChar).Value = Motivo
.Add("@Estatus", SqlDbType.Bit).Value = Estatus .Add("@Estatus", SqlDbType.Bit).Value = Estatus
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
@@ -2802,12 +2802,12 @@ Public Class ClsVentas
Return Retorno Return Retorno
End Function End Function
Public Function GetMotivoDevolucion(CveMotivoDevolución As Integer, Estatus As Boolean, CveEmpresa As Integer) As Boolean Public Function GetMotivoDevolucion(CveMotivoDevolucion As Integer, Estatus As Boolean, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Vta_VentasMotivosDevolucionGet") DataAdapter("PA_Vta_VentasMotivosDevolucionGet")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@CveMotivoDevolución", SqlDbType.Int).Value = CveMotivoDevolución .Add("@CveMotivoDevolucion", SqlDbType.Int).Value = CveMotivoDevolucion
.Add("@Estatus", SqlDbType.Bit).Value = Estatus .Add("@Estatus", SqlDbType.Bit).Value = Estatus
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With End With
@@ -2821,12 +2821,12 @@ Public Class ClsVentas
Return Retorno Return Retorno
End Function End Function
Public Function RemoveMotivoDevolucion(CveMotivoDevolución As Integer, CveEmpresa As Integer) As Boolean Public Function RemoveMotivoDevolucion(CveMotivoDevolucion As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Vta_VentasMotivosDevolucionRemove") DataAdapter("PA_Vta_VentasMotivosDevolucionRemove")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@CveMotivoDevolución", SqlDbType.Int).Value = CveMotivoDevolución .Add("@CveMotivoDevolucion", SqlDbType.Int).Value = CveMotivoDevolucion
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With End With