diff --git a/App_Code/ClsCompras.vb b/App_Code/ClsCompras.vb
index c02185a18..f35f52a0b 100644
--- a/App_Code/ClsCompras.vb
+++ b/App_Code/ClsCompras.vb
@@ -240,7 +240,7 @@ Public Class ClsCompras
             .Add("@NoDeducible", SqlDbType.Bit).Value = NoDeducible
             .Add("@CveTipoCompra", SqlDbType.Int).Value = CveTipoCompra
             .Add("@TotalOriginal", SqlDbType.Money).Value = TotalOriginal
-            .Add("@CveConceptoContable", SqlDbType.Int).Value = CveConceptoContable
+            .Add("@CveTipoConcepto", SqlDbType.Int).Value = CveConceptoContable
         End With
 
         Try