- al registar comra manual activar cxc en NC

Compras/Compras.aspx.vb

@@ -15644,6 +15644,16 @@ Partial Class Compras_Compras
                 RBLPago.Items(2).Enabled = True
             End If
             ImgAnticiposPendientes.Visible = False
+            If DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") Then
+                paneldevolucion.Visible = True
+                Pnlalmaceninventarios.Visible = False
+                cargaddldevoluciones(CveProveedor, TxtSubTotal.Text.ToDouble)
+                InicializaAplicaNCFact()
+                DivReembolso.Visible = False
+                RBLPago.Items(2).Enabled = False
+                UpPS.Update()
+
+            End If
         End If
         UPCondicionesPago.Update()
     End Sub