From c544a8e78666e6cecbc78b040d6a2ec46fdffb76 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 17 Jun 2021 13:35:12 -0700
Subject: [PATCH] parametro de codigosat, para productosSAT

---
 App_Code/ClsGenerales.vb | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/App_Code/ClsGenerales.vb b/App_Code/ClsGenerales.vb
index f9f915c25..55c6e7eca 100644
--- a/App_Code/ClsGenerales.vb
+++ b/App_Code/ClsGenerales.vb
@@ -2619,13 +2619,15 @@ Public Class ClsGenerales
 #End Region
 
 #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
         DataAdapter("PA_Gral_SAT_ProductosServiciosGet")
 
         With SqlAdapter.SelectCommand.Parameters
+            .Add("@CodigoSAT", SqlDbType.VarChar).Value = CodigoSAT
             .Add("@SATClaveProductoServicio", SqlDbType.VarChar).Value = SATClaveProductoServicio
             .Add("@CveSATPS", SqlDbType.Int).Value = CveSATPS
+
         End With
         'SqlTypes.SqlDateTime.Null
         Try