diff --git a/Compras/eFacturas.aspx.vb b/Compras/eFacturas.aspx.vb index 3bd8d405b..322ac5493 100644 --- a/Compras/eFacturas.aspx.vb +++ b/Compras/eFacturas.aspx.vb @@ -2924,14 +2924,18 @@ Partial Class Compras_eFacturas For Each dRow2 As DataRow In DTDocumentosRelacionados.Rows - If dRow2("IdDocumento").ToString.ToUpper = drow("IdDocumento").ToString.ToUpper And drow("CveIE").ToString.ToEntero > 0 Then + If dRow2("IdDocumento").ToString.ToUpper = drow("IdDocumento").ToString.ToUpper Then dRow2("CveCompra") = drow("CveCompra").ToString.ToEntero dRow2("CveFactura") = drow("CveFactura").ToString.ToEntero dRow2("CveMetodoPago") = drow("CveMetodoPago").ToString.ToEntero dRow2("SerieFolioCompra") = drow("SerieFolioCompra").ToString Try - dRow2("CvePrePolizaDetalle") = drow("CvePrePolizaDetalle").ToString + + If drow("CveIE").ToString.ToEntero > 0 Then + dRow2("CvePrePolizaDetalle") = drow("CvePrePolizaDetalle").ToString + End If + Catch ex As Exception dRow2("CvePrePolizaDetalle") = 0 End Try diff --git a/Planeacion/CatSubProyectos.aspx b/Planeacion/CatSubProyectos.aspx index 4535b4e75..a0f58e6cf 100644 --- a/Planeacion/CatSubProyectos.aspx +++ b/Planeacion/CatSubProyectos.aspx @@ -300,7 +300,7 @@
@@ -310,7 +310,7 @@ @@ -323,8 +323,9 @@