diff --git a/Bancos/IE.aspx b/Bancos/IE.aspx
index b60f17172..af9359a92 100644
--- a/Bancos/IE.aspx
+++ b/Bancos/IE.aspx
@@ -30,6 +30,9 @@
Actualizar Tipo Cambio
+
+ PrePoliza
+
<%--
Emitir Complemento de Pago
diff --git a/Bancos/IE.aspx.vb b/Bancos/IE.aspx.vb
index d2f2a0233..5dab27d13 100644
--- a/Bancos/IE.aspx.vb
+++ b/Bancos/IE.aspx.vb
@@ -863,6 +863,8 @@ Partial Class Bancos_IE
LblCuenta.Text = ObjIE.BancoNumCuentaMoneda
ViewState("CvePrePoliza") = ObjIE.DtResultados.Rows(0)("CvePrePoliza").ToString.ToEntero
+ HpLPrePoliza.NavigateUrl = String.Format("/Contabilidad/RegPrePoliza.aspx?CvePrepoliza={0}", ViewState("CvePrePoliza"))
+ HpLPrePoliza.Visible = True
TxtFechaDocumento.Text = ObjIE.FechaDocumento.ToShortDateString
TxtFolio.Text = ObjIE.Folio
LblBeneficiario.Text = ObjIE.PagueseA