diff --git a/Bancos/PopIEVentas.aspx b/Bancos/PopIEVentas.aspx
index 9d28c6d86..078ca609f 100644
--- a/Bancos/PopIEVentas.aspx
+++ b/Bancos/PopIEVentas.aspx
@@ -217,7 +217,7 @@
                                                 <div class="col-xs-12">
                                                     <asp:UpdatePanel ID="UpIngresos" runat="server" UpdateMode="Conditional">
                                                         <ContentTemplate>
-                                                            <asp:GridView ID="GvIngresos" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron movimientos" DataKeyNames="CveIE,Saldo,RazonSocial,Folio,CveProveedor,SaldoVentas,CveMoneda,FechaDocumento"
+                                                            <asp:GridView ID="GvIngresos" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron movimientos" DataKeyNames="CveIE,Saldo,RazonSocial,Folio,CveProveedor,SaldoVentas,CveMoneda,FechaDocumento,TipoCambio"
                                                                 ToolTip="Listado de Movimientos" Style="width: 100%; height: 100%; text-align: center;" GridLines="None" HeaderStyle-ForeColor="Black">
                                                                 <Columns>
                                                                     <asp:TemplateField>
diff --git a/Bancos/PopIEVentas.aspx.vb b/Bancos/PopIEVentas.aspx.vb
index d0212c8c6..ce767e7c4 100644
--- a/Bancos/PopIEVentas.aspx.vb
+++ b/Bancos/PopIEVentas.aspx.vb
@@ -1264,8 +1264,9 @@ Partial Class Bancos_PopIEVentas
                                             CveIE = rw.DataKey("CveIE").ToEntero
                                             Pago.CveMonedaPago = rw.DataKey("CveMoneda").ToEntero
                                             Pago.ImportePago = rw.FCTextBox("TxtSaldoDeudor").Text.ToDecimal
+                                            Pago.ImportePagoVenta = rw.FCTextBox("TxtSaldoDeudor").Text.ToDecimal
                                             Pago.TCPago = rw.DataKey("TipoCambio").ToDecimal
-                                            Pago.FechaDocumentoRelacionado = rw.DataKey("Fecha").ToDate
+                                            Pago.FechaDocumentoRelacionado = rw.DataKey("FechaDocumento").ToDate
                                             If ChkPagarPesos.Checked Then Pago.TCPago = 1 / rw.DataKey("TipoCambio").ToDecimal
                                             If ChkPagarDolares.Checked Then Pago.TCPago = rw.DataKey("TipoCambio").ToDecimal