From 63b251fe4d11c8f72c5187e83867b46f82d95f7b Mon Sep 17 00:00:00 2001 From: rrene Date: Mon, 4 Nov 2024 09:32:50 -0700 Subject: [PATCH] =?UTF-8?q?--=20correcci=C3=B3n=20de=20concepto=20en=20la?= =?UTF-8?q?=20aplicaci=C3=B3n=20de=20NC=20de=20compra?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- App_Code/ClsPaginas.vb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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