diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index d6093e399..2cfcde5e5 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -9282,7 +9282,7 @@ Public Class ClsPaginas
                         Select Case CveMoneda
                             Case 1 'pesos
                                 Retorno.CveConcepto = If(CveTipoProveedorTipoDocto = 1, 17, 308)
-                                If TipoAplicacionPago.Contiene("NC", "DEV", "RNC") Then Retorno.CveConcepto = If(CveTipoProveedorTipoDocto = 1, 22, 363)  'pago nota de crédito
+                                If TipoAplicacionPago.Contiene("NC", "DEV", "RNC") Then Retorno.CveConcepto = If(CveTipoProveedorTipoDocto = 1, 272, 363)  'pago nota de crédito
                             Case 2 'dólares
                                 Retorno.CveConcepto = If(CveTipoProveedorTipoDocto = 1, 312, 309)
                                 If TipoAplicacionPago.Contiene("NC", "DEV", "RNC") Then Retorno.CveConcepto = If(CveTipoProveedorTipoDocto = 1, 304, 364)  'pago nota de crédito ME