diff --git a/Bancos/IE.aspx b/Bancos/IE.aspx
index c5e19185d..574ec5150 100644
--- a/Bancos/IE.aspx
+++ b/Bancos/IE.aspx
@@ -1291,7 +1291,7 @@
                         </div>
 
                         <asp:GridView ID="GvComplementoPagos" runat="server"
-                            DataKeyNames="CveComplementoPago,FolioFiscal,CveIE,Folio,RFCReceptor,CvePAC,Estatus"
+                            DataKeyNames="CveComplementoPago,FolioFiscal,CveIE,Folio,RFCReceptor,CvePAC,Estatus,Tipo"
                             AutoGenerateColumns="False" EmptyDataText="Sin resultados" ShowHeaderWhenEmpty="true" CssClass="table table-striped table-hover Widthall ScrollAD" GridLines="None" data-sort="true">
                             <Columns>
 
diff --git a/Bancos/IE.aspx.vb b/Bancos/IE.aspx.vb
index 503feacc6..663b0e342 100644
--- a/Bancos/IE.aspx.vb
+++ b/Bancos/IE.aspx.vb
@@ -1945,7 +1945,7 @@ Partial Class Bancos_IE
         ObjOtrosPagos.Add(New CFDINominaOtrosPagos With {.TipoOtroPago = "003",
                                                     .Clave = "003",
                                                     .Concepto = "Viáticos (entregados al trabajador).",
-                                                    .Importe = TxtImporte.Text.ToString.ToDouble
+                                                    .Importe = TxtImporte.Text.ToString.ToDecimal
                           }
         )
         If ObjOtrosPagos IsNot Nothing AndAlso ObjOtrosPagos.Count > 0 Then cfdi.Nomina.OtrosPagos = ObjOtrosPagos
@@ -5678,15 +5678,31 @@ Partial Class Bancos_IE
     Protected Sub GvComplementoPagos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvComplementoPagos.RowDataBound
 
         If e.Row.RowType = DataControlRowType.DataRow Then
-            e.Row.Cells(3).Text = String.Format("<a class="" texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class="" fa fa-ad-excel""></i></a>", Encripta(String.Format("OP=CompP&EXT=xml&SerieFolio={0}&CVECOMPLEMENTOPAGO={1}&CVEIE={2}", e.Row.DBCampo("SerieFolio"), e.Row.DBCampo("CveComplementoPago"), e.Row.DBCampo("CveIE"))))
-            e.Row.Cells(4).Text = String.Format("<a class="" texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class="" fa fa-ad-pdf""></i></a>", Encripta(String.Format("OP=CompP&EXT=pdf&SerieFolio={0}&CVECOMPLEMENTOPAGO={1}&CVEIE={2}", e.Row.DBCampo("SerieFolio"), e.Row.DBCampo("CveComplementoPago"), e.Row.DBCampo("CveIE"))))
 
-            If e.Row.DataKey("Estatus").Contiene("1", "3") Then
-                e.Row.FCLinkButton("LnkCancelarComplemetno").Visible = True
-            Else
-                e.Row.FCLinkButton("LnkCancelarComplemetno").Visible = False
+            If e.Row.DataKey("Tipo") = "Ing" Then
+                e.Row.Cells(3).Text = String.Format("<a class="" texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class="" fa fa-ad-excel""></i></a>", Encripta(String.Format("OP=CompP&EXT=xml&SerieFolio={0}&CVECOMPLEMENTOPAGO={1}&CVEIE={2}", e.Row.DBCampo("SerieFolio"), e.Row.DBCampo("CveComplementoPago"), e.Row.DBCampo("CveIE"))))
+                e.Row.Cells(4).Text = String.Format("<a class="" texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class="" fa fa-ad-pdf""></i></a>", Encripta(String.Format("OP=CompP&EXT=pdf&SerieFolio={0}&CVECOMPLEMENTOPAGO={1}&CVEIE={2}", e.Row.DBCampo("SerieFolio"), e.Row.DBCampo("CveComplementoPago"), e.Row.DBCampo("CveIE"))))
+
+                If e.Row.DataKey("Estatus").Contiene("1", "3") Then
+                    e.Row.FCLinkButton("LnkCancelarComplemetno").Visible = True
+                Else
+                    e.Row.FCLinkButton("LnkCancelarComplemetno").Visible = False
+                End If
+
+            ElseIf e.Row.DataKey("Tipo") = "Egs" Then
+
+                e.Row.Cells(3).Text = String.Format("<a class=""texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class=""fa fa-ad-excel""></i></a>", Encripta(String.Format("OP=Fact&EXT=xml&CveFactura={0}&RFC={1}", e.Row.DBCampo("CveFactura"), e.Row.DBCampo(("RFCde").ToString.Replace("&", "%26%")))))
+                e.Row.Cells(4).Text = String.Format("<a class=""texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"" target=""_blank""><i class=""fa fa-ad-pdf""></i></a>", Encripta(String.Format("OP=Fact&EXT=pdf&CveFactura={0}&RFC={1}", e.Row.DBCampo("CveFactura"), e.Row.DBCampo("RFCde").ToString.Replace("&", "%26%"))))
+
+                GvComplementoPagos.Columns(6).Visible = False
+                GvComplementoPagos.Columns(7).Visible = False
+                GvComplementoPagos.Columns(8).Visible = False
+
             End If
 
+
+
+
         End If
 
     End Sub