diff --git a/Inventarios/TraspasoAlmacen.aspx.vb b/Inventarios/TraspasoAlmacen.aspx.vb
index ed6e4b4e1..0f6103c6a 100644
--- a/Inventarios/TraspasoAlmacen.aspx.vb
+++ b/Inventarios/TraspasoAlmacen.aspx.vb
@@ -2775,10 +2775,10 @@ Partial Class Inventarios_TraspasoAlmacen
         If ObjTimbres.Timbrar(CvePACEspecifico:=4) Then
 
             Try
-                PdfFactura(ObjTimbres.ObjFactura)
                 ObjTimbres.ObjFactura.Inv_CveMovimiento = CveMovimientoTimbrado
+                PdfFactura(ObjTimbres.ObjFactura)
             Catch ex As Exception
-
+                OnError("Ocurrió un error al generar el pdf", ex)
             End Try
 
             MensajeAlert.Append("Emitido con éxito.")
@@ -2788,11 +2788,6 @@ Partial Class Inventarios_TraspasoAlmacen
                 MensajeAlert.AppendFormat("<ul><li><a class=""Texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"">Descargar XML</a></li></ul>", Encripta(String.Format("OP=DesXmlTra&CVEMOVIMIENTO={0}&EXT={1}&FOLIO={2}&TIPODOCTO={3}", CveMovimientoTimbrado, "XML", ObjTimbres.ObjFactura.SerieFolio, ObjTimbres.ObjFactura.TipoDocto)))
             End If
             'PDF
-            'Dim ArchivoPDF = String.Format("{0}/PDF/{1}/{2}.pdf", UsuarioActual.Empresa.Ruta, ObjTimbres.ObjFactura.TipoDocto, ObjTimbres.ObjFactura.SerieFolio)
-            'If File.Exists(ArchivoPDF) Then
-            '    MensajeAlert.AppendFormat("<ul><li><a class=""Texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"">Descargar PDF</a></li></ul>", Encripta(String.Format("OP=DesPdfTra&CVEMOVIMIENTO={0}&EXT={1}&FOLIO={2}&TIPODOCTO={3}", CveMovimientoTimbrado, "PDF", ObjTimbres.ObjFactura.SerieFolio, ObjTimbres.ObjFactura.TipoDocto)))
-            'End If
-
             If ChkEmitirCartaPorte.Checked Then
                 MensajeAlert.AppendFormat("<ul><li><a class=""Texto"" href=""/Compras/PopUpVerFactura.aspx?P={0}"">Descargar Carta Porte</a></li></ul>", Encripta(String.Format("OP=CARPOTIMBRE&CVETIMBRE={0}", CveTimbre)))
             Else