Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git

2023-05-23 20:08:54 -07:00
parent e23538023f 85000a1010
commit 81e63ba948
19 changed files with 288 additions and 183 deletions
--- a/Ventas/CatPS.aspx.vb
+++ b/Ventas/CatPS.aspx.vb
@@ -406,7 +406,7 @@ Partial Class CatPS
                            Dim CodigoPSAdicional As String = dr("CodigoProductoAdicional").ToString.Trim
                            Dim Cantidad As Integer = dr("CantidadFija").ToString.ToEntero
                            msgg = GuardarProductosEquivalenteEnFranquicia(ObjPS, CodigoPS, CodigoPSAdicional, Cantidad, 1)
-                            If GuardarProductosEquivalenteEnFranquicia(ObjPS, CodigoPS, CodigoPSAdicional, Cantidad, 1) <> "" Then
+                            If msgg <> "" Then
                                ErrorExcel = True
                                strNoCargados.AppendFormat(" {0}  <br/>", msgg)
                                Exit For