diff --git a/Bancos/PopIEVentas.aspx.vb b/Bancos/PopIEVentas.aspx.vb
index e8da3815a..9f9dcaf4e 100644
--- a/Bancos/PopIEVentas.aspx.vb
+++ b/Bancos/PopIEVentas.aspx.vb
@@ -298,6 +298,7 @@ Partial Class Bancos_PopIEVentas
             End If
             CveClienteOriginal = -1
             CveSubProyectoVenta = -1
+            TxtFechaEmision.Text = Now.ToShortDateString
 
             CType(Me.Master, BaseMasterPage).EsPopup = True
             CType(Me.Master, BaseMasterPage).PopupWidth = 750