diff --git a/OC/OC.aspx b/OC/OC.aspx
index 01867c377..b2d5821c9 100644
--- a/OC/OC.aspx
+++ b/OC/OC.aspx
@@ -871,7 +871,7 @@
 
 
                                     <asp:GridView ID="GvD" runat="server" AutoGenerateColumns="False" GridLines=" none" BorderColor="Transparent" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn"
-                                        DataKeyNames="SubProyecto, Cantidad, Importe, Descuento, CveOrdenCompra, CveUnidadMedida, CvePresupuestoEgreso, PS,CveClasificacion, CvePS, CveSubProyecto, CveActivoFijo, CodigoAF, TipoDato, Observacion, CveOrdenCompraDetalle,CveCompra,IVAPorcentaje,RetIVAPorcentaje,RetISRPorcentaje,IEPSPSPorcentaje,IEPSPSIVAPorcentaje" data-tableheader=".GVDHeader" ShowHeader="false" data-rows="0">
+                                        DataKeyNames="SubProyecto, Cantidad, Importe, Descuento, CveOrdenCompra, CveUnidadMedida, CvePresupuestoEgreso, PS,CveClasificacion, CvePS, CveSubProyecto, CveActivoFijo, CodigoAF, TipoDato, Observacion, CveOrdenCompraDetalle,CveCompra,IVAPorcentaje,RetIVAPorcentaje,RetISRPorcentaje,IEPSPSPorcentaje,IEPSPSIVAPorcentaje,CantidadNoEditable" data-tableheader=".GVDHeader" ShowHeader="false" data-rows="0">
                                         <Columns>
                                             <asp:TemplateField>
                                                 <EditItemTemplate>
diff --git a/OC/OC.aspx.vb b/OC/OC.aspx.vb
index dc0d4a830..35b261248 100644
--- a/OC/OC.aspx.vb
+++ b/OC/OC.aspx.vb
@@ -3741,7 +3741,7 @@ Partial Class OC
         CargaDatosDetalles()
         Dim EditingRow As GridViewRow = GvD.Rows(e.NewEditIndex)
         If Not EsCreaApartirDe Then
-            If EditingRow.DataKey("TipoDato").ToEntero = 2 Then
+            If EditingRow.DataKey("TipoDato").ToEntero = 2 Or EditingRow.DataKey("CantidadNoEditable").ToDecimal > 0 Then
                 EditingRow.FCDropDownList("DdlClasificacion").Enabled = False
                 EditingRow.FCDropDownList("DdlPS").Enabled = False
                 EditingRow.FCDropDownList("CboUnidadMedidaEdit").Enabled = False