parametro de codigosat, para productosSAT
This commit is contained in:
@@ -2619,13 +2619,15 @@ Public Class ClsGenerales
|
|||||||
#End Region
|
#End Region
|
||||||
|
|
||||||
#Region "SAT PRODUCTOS SERVICIOS Y UNIDAD DE MEDIDA"
|
#Region "SAT PRODUCTOS SERVICIOS Y UNIDAD DE MEDIDA"
|
||||||
Public Function GetSATProductosServicios(Optional SATClaveProductoServicio As String = "-1", Optional CveSATPS As Integer = -1) As Boolean
|
Public Function GetSATProductosServicios(Optional CodigoSAT As String = "-1", Optional SATClaveProductoServicio As String = "-1", Optional CveSATPS As Integer = -1) As Boolean
|
||||||
Dim Retorno As Boolean = False
|
Dim Retorno As Boolean = False
|
||||||
DataAdapter("PA_Gral_SAT_ProductosServiciosGet")
|
DataAdapter("PA_Gral_SAT_ProductosServiciosGet")
|
||||||
|
|
||||||
With SqlAdapter.SelectCommand.Parameters
|
With SqlAdapter.SelectCommand.Parameters
|
||||||
|
.Add("@CodigoSAT", SqlDbType.VarChar).Value = CodigoSAT
|
||||||
.Add("@SATClaveProductoServicio", SqlDbType.VarChar).Value = SATClaveProductoServicio
|
.Add("@SATClaveProductoServicio", SqlDbType.VarChar).Value = SATClaveProductoServicio
|
||||||
.Add("@CveSATPS", SqlDbType.Int).Value = CveSATPS
|
.Add("@CveSATPS", SqlDbType.Int).Value = CveSATPS
|
||||||
|
|
||||||
End With
|
End With
|
||||||
'SqlTypes.SqlDateTime.Null
|
'SqlTypes.SqlDateTime.Null
|
||||||
Try
|
Try
|
||||||
|
|||||||
Reference in New Issue
Block a user