diff --git a/Bancos/PagoAcreedor.aspx.cs b/Bancos/PagoAcreedor.aspx.cs
index 9643bbd97..6e6eed7ae 100644
--- a/Bancos/PagoAcreedor.aspx.cs
+++ b/Bancos/PagoAcreedor.aspx.cs
@@ -242,11 +242,8 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
             CveIE = ObjIE.AddBancos_IE(DdlCuenta.SelectedValue.ToEntero(), DdlTipoTransaccion.SelectedValue.ToEntero(), TxtFechaDocumento.Text.Trim().ToDate(), TxtFolio.Text.Trim(), DdlProveedores.SelectedText.ToString(), ImporteBanco.ToString().ToDouble(), CveMonedaPago,
                                      TCPago.ToString().ToDouble(), TxtObservaciones.Text.Trim(), "", ChkAbonoCuenta.Checked, false, -1, CvePrePoliza, Comprobante, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa);
 
-
-
             if (CveIE > 0)
             {
-
                 decimal Importe;
                 decimal ImporteMN;
                 decimal ImporteComision;
@@ -286,6 +283,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
                         if (tCveMoneda > 1 && gvr.DataKey("FechaDocumento").ToDate() < TxtFechaDocumento.Text.ToDate().FirstDayOfMonth())
                         {
                             TC = get_GlobalTipoCambio(TxtFechaDocumento.Text.ToDate().AddMonths(-1).LastDayOfMonth()).ToDecimal();//obtengo el TC del mes anterior del pago
+                            CveConceptoContablePago = 384;
                         }
                         ImporteBancosMN = (Importe * TCPago).RoundSQL();
                         ImporteAcreedorMN = (Importe * TC).RoundSQL();
@@ -323,6 +321,8 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
                         ImporteComision = ImporteComision.RoundSQL();
                         AcumImporteMN += ImporteMN;
 
+                        if (tCveMoneda > 1 ) { CveConceptoContablePago = 384; }
+
                         if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, false, Importe, ImporteMN, CveConceptoContablePago, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), CveIEDevolucion: gvr.DataKey("CveIE").ToEntero(), TipoCambio: TC, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyectoPago.SelectedValue.ToEntero()))
                         {
                             MsgError = "No se pudo insertar concepto de pago acreedor";
@@ -619,10 +619,9 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
                     MsgError = "No se pudo insertar concepto de bancos";
                 }
 
-
                 if (CveMoneda != 1)
                 {
-                    if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, ImporteMN, CveConceptoContablePrestamo, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
+                    if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, Importe, ImporteMN, 383, Ref, Conc, CveIE: CveIE, CveProveedor: DdlProveedorPrestamo.SelectedValue.ToEntero(), TipoCambio: TC, TipoCambioPago: TC, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
                     {
                         MsgError = "No se pudo insertar concepto de acreedor";
                     }