Merge branch 'master' of http://192.168.10.111:8383/SIG

Compras/eFacturas.aspx

@@ -658,7 +658,7 @@
                 <div class="modal-footer">
                     <asp:UpdatePanel runat="server">
                         <ContentTemplate>
-                            <asp:Button ID="BtnGuardarFaturas" runat="server" ClientIDMode="Static" Text="Guardar" CssClass="btn btn-primary" />
+                            <asp:Button ID="BtnGuardarFaturas" runat="server" ClientIDMode="Static" Text="Aceptar" CssClass="btn btn-primary" />
                             <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
                         </ContentTemplate>
                     </asp:UpdatePanel>

Compras/eFacturas.aspx.vb

@@ -1208,7 +1208,7 @@ Partial Class Compras_eFacturas
             DtNoRecibidas.ReadXml(Ruta)
 
             Dim conta As Integer = 1
-            Str.Append("Se encontraron las siguientes facturas con problema:<br/> <table width='900px'><tr class='Titulos'><td>Serie</td><td>Folio</td><td>Fecha</td><td>Proveedor</td><td>Importe</td><td>Motivo</td><td>Correo</td><td>F. Recepción</td></tr>")
+            Str.Append("Se procesó la información con la siguiente información:<br/> <table width='900px'><tr class='Titulos'><td>Serie</td><td>Folio</td><td>Fecha</td><td>Proveedor</td><td>Importe</td><td>Motivo</td><td>Correo</td><td>F. Recepción</td></tr>")
 
             For Each dr As DataRow In DtNoRecibidas.FiltraParametros("", "Fecha DESC").Rows
 
@@ -2809,7 +2809,12 @@ Partial Class Compras_eFacturas
                                 dRow2("CveFactura") = drow("CveFactura").ToString.ToEntero
                                 dRow2("CveMetodoPago") = drow("CveMetodoPago").ToString.ToEntero
                                 dRow2("SerieFolioCompra") = drow("SerieFolioCompra").ToString
-                                dRow2("CvePrePolizaDetalle") = drow("CvePrePolizaDetalle").ToString
+                                Try
+                                    dRow2("CvePrePolizaDetalle") = drow("CvePrePolizaDetalle").ToString
+                                Catch ex As Exception
+                                    dRow2("CvePrePolizaDetalle") = 0
+                                End Try
+
 
                                 If drow("CveIE").ToString.ToEntero > 0 Then