diff --git a/Compras/Compras.aspx b/Compras/Compras.aspx
index e5d9d7edc..f5b737fcd 100644
--- a/Compras/Compras.aspx
+++ b/Compras/Compras.aspx
@@ -197,7 +197,7 @@
                                 <div class="form-group whitoutcol" style="width: 280px;">
                                     <span class="whitoutcol linewhitsize comprasdfleft">Tipo:</span>
                                     <div class="whitoutcol whitoutcol comprasdfleftvar">
-                                        <asp:DropDownList ID="DdlTipoComprobante" runat="server" AutoPostBack="true" CssClass="form-control input-sm input-small">
+                                        <asp:DropDownList ID="DdlTipoComprobante" runat="server" AutoPostBack="true" CssClass="form-control input-sm input-small" OnSelectedIndexChanged="DdlTipoComprobante_SelectedIndexChanged">
                                             <asp:ListItem Selected="True" Text="Factura" Value="Fac"></asp:ListItem>
                                             <asp:ListItem Text="Nota de Crédito" Value="NC"></asp:ListItem>
                                             <asp:ListItem Text="Anticipo" Value="Ant"></asp:ListItem>
diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 36373feb4..4a22ead1a 100644
--- a/Compras/Compras.aspx.vb
+++ b/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