--FIX acento en clase
This commit is contained in:
@@ -2782,12 +2782,12 @@ Public Class ClsVentas
|
||||
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
|
||||
DataAdapter("PA_Vta_VentasMotivosDevolucionUpdate")
|
||||
|
||||
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("@Estatus", SqlDbType.Bit).Value = Estatus
|
||||
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
|
||||
@@ -2802,12 +2802,12 @@ Public Class ClsVentas
|
||||
Return Retorno
|
||||
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
|
||||
DataAdapter("PA_Vta_VentasMotivosDevolucionGet")
|
||||
|
||||
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("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
|
||||
End With
|
||||
@@ -2821,12 +2821,12 @@ Public Class ClsVentas
|
||||
Return Retorno
|
||||
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
|
||||
DataAdapter("PA_Vta_VentasMotivosDevolucionRemove")
|
||||
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
.Add("@CveMotivoDevolución", SqlDbType.Int).Value = CveMotivoDevolución
|
||||
.Add("@CveMotivoDevolucion", SqlDbType.Int).Value = CveMotivoDevolucion
|
||||
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
|
||||
End With
|
||||
|
||||
|
||||
Reference in New Issue
Block a user