diff --git a/Bancos/PopIECompras.aspx b/Bancos/PopIECompras.aspx index 48e01ca67..5f33cdea9 100644 --- a/Bancos/PopIECompras.aspx +++ b/Bancos/PopIECompras.aspx @@ -433,8 +433,7 @@
- -
+ @@ -485,7 +484,8 @@ - + +
diff --git a/Bancos/PopIECompras.aspx.vb b/Bancos/PopIECompras.aspx.vb index c4bc99aac..38f68f496 100644 --- a/Bancos/PopIECompras.aspx.vb +++ b/Bancos/PopIECompras.aspx.vb @@ -1501,7 +1501,7 @@ Partial Class Bancos_PopIECompras End If If RBLContado.SelectedValue.ToEntero = 6 And ChkEmitirComplementoPago.Checked Then GeneraTimbre(CvePrePoliza) Else Alert(StrMsg.ToString, TipoMensaje.MsgInformacion, "self.parent.tb_remove();self.parent.location.reload();") - EnviarCorreoNotificacion(CveIE, NotificarA, "", UsuarioActual, False) + If NotificarA <> "" Then EnviarCorreoNotificacion(CveIE, NotificarA, "", UsuarioActual, False) Else ObjIE.RollBack() @@ -1574,7 +1574,7 @@ Partial Class Bancos_PopIECompras Banco.IniciaTransacSQL() - If Banco.GeneraTimbrePago(CveIE, -1, UsuarioActual, CvePrePoliza:=CvePrePoliza) Then + If Banco.GeneraTimbrePago(-1, -1, UsuarioActual, CvePrePoliza:=CvePrePoliza) Then If Banco.Mensaje = "" Then Banco.Commit() PDFReciboDePagos(-1, -1, Banco.CveComplementoPago, False)