diff --git a/Compras/eFacturas.aspx.vb b/Compras/eFacturas.aspx.vb
index b7a4ef535..dc6f3a20b 100644
--- a/Compras/eFacturas.aspx.vb
+++ b/Compras/eFacturas.aspx.vb
@@ -1537,23 +1537,27 @@ Partial Class Compras_eFacturas
Dim sOnlyFilename As String
For Each filePath In fileEntries
+
ArchivoExtension = IO.Path.GetExtension(String.Format("{0}", filePath)).Replace(".", "")
sOnlyFilename = System.IO.Path.GetFileName(filePath)
- If ArchivoExtension.ToUpper = "RAR" Or ArchivoExtension.ToUpper = "ZIP" Then
- ListaComprimidos.Add(filePath)
- 'CREO DIRECTORIO ALEATORIO
- Dim Aleatorio As New Random
- Dim TempDirectorio As String = String.Format("{0}{1}\{2}{3}", UsuarioActual.Empresa.Ruta, "Temp\Facturas", Date.Now.Ticks, Aleatorio.Next(100, 999))
- Directory.CreateDirectory(TempDirectorio)
- ListaDirectoriosTemporales.Add(TempDirectorio)
- 'AGREGA DIRECTORIO A LA LISTA
- ListDirectorios.Add(TempDirectorio)
- 'DESCOMPRIME RAR
- DescomprimeFacturas(filePath, TempDirectorio)
- 'AGREGA XML A LA LISTA
- ListXML.AddRange(Directory.GetFiles(TempDirectorio))
- End If
+ If ArchivoExtension.ToUpper = "RAR" Or ArchivoExtension.ToUpper = "ZIP" Then
+ 'ListaComprimidos.Add(filePath)
+ ''CREO DIRECTORIO ALEATORIO
+ 'Dim Aleatorio As New Random
+ 'Dim TempDirectorio As String = String.Format("{0}{1}\{2}{3}", UsuarioActual.Empresa.Ruta, "Temp\Facturas", Date.Now.Ticks, Aleatorio.Next(100, 999))
+ 'Directory.CreateDirectory(TempDirectorio)
+ 'ListaDirectoriosTemporales.Add(TempDirectorio)
+ ''AGREGA DIRECTORIO A LA LISTA
+ 'ListDirectorios.Add(TempDirectorio)
+ ''DESCOMPRIME RAR
+ 'DescomprimeFacturas(filePath, TempDirectorio)
+ ''AGREGA XML A LA LISTA
+ 'ListXML.AddRange(Directory.GetFiles(TempDirectorio))
+
+ ListXML.Add(filePath)
+
+ End If
Next
diff --git a/Empresas/2/Formatos/Factura.rdlc b/Empresas/2/Formatos/Factura.rdlc
index 5068cbbff..59b130a68 100644
--- a/Empresas/2/Formatos/Factura.rdlc
+++ b/Empresas/2/Formatos/Factura.rdlc
@@ -23,7 +23,7 @@
Textbox3
0.92083in
- 5.662in
+ 5.79542in
0.5cm
2.24597in
- true
@@ -2442,7 +2441,7 @@
DsOC
4.59222cm
- 0.11468cm
+ 0.45356cm
1.01949cm
20.01064cm
25
@@ -2481,7 +2480,7 @@
Textbox19
1.6173in
- 5.662in
+ 5.79542in
0.20317in
2.26391in
26
@@ -2770,7 +2769,7 @@
DataSet3
2.54983in
- 5.73412in
+ 5.86754in
0.34081in
2.19818in
27
@@ -2889,7 +2888,7 @@
DataSet1
5.75282cm
- 14.56464cm
+ 14.90352cm
0.6cm
5.58343cm
28
@@ -3438,7 +3437,7 @@
DsOC
5.75282cm
- 0.11468cm
+ 0.45356cm
5.16188cm
14.34413cm
29
@@ -3483,7 +3482,7 @@
Textbox18
4.59585in
- 0.04404in
+ 0.17746in
0.36457in
7.87931in
30
@@ -3519,7 +3518,7 @@
Textbox1
10.95026cm
- 0.13016cm
+ 0.46904cm
0.6cm
19.96256cm
31
@@ -3611,7 +3610,7 @@
Textbox5
12.7053cm
- 10.16136cm
+ 10.50025cm
2.37271cm
9.55228cm
32
@@ -3702,7 +3701,7 @@
Textbox5
12.7053cm
- 0.50677cm
+ 0.84566cm
2.37271cm
9.55228cm
33
@@ -3716,11 +3715,523 @@
2pt
+
+ true
+ true
+
+
+
+
+ VERSION
+
+
+
+ =Parameters!CFDIVersion.Value
+
+
+
+
+
+
+ Textbox5
+ 20.52317cm
+ 16.8018cm
+ 0.65292cm
+ 3.68516cm
+ 34
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+ true
+ true
+
+
+
+
+ CFDI Relacionados
+
+
+
+
+
+
+ Textbox5
+ 0.14926cm
+ 0.07193cm
+ 0.54004cm
+ 20.01791cm
+
+
+ #bdd7ee
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Tipo Relación:
+
+
+
+
+
+
+ Textbox29
+ 0.83025cm
+ 4.78817cm
+ 0.41981cm
+ 5.31841cm
+ 1
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =Parameters!TipoRelacionTexto.Value
+
+
+
+
+
+
+ Textbox29
+ 0.83025cm
+ 10.10658cm
+ 0.41981cm
+ 7.14985cm
+ 2
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+ 2.42456cm
+
+
+ 2.05585cm
+
+
+ 3.03631cm
+
+
+ 7.7847cm
+
+
+
+
+ 0.44125cm
+
+
+
+
+ true
+ true
+
+
+
+
+ Folio
+
+
+
+
+
+
+ Textbox10
+
+
+ #bdd7ee
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Fecha
+
+
+
+
+
+
+ Textbox12
+
+
+ #bdd7ee
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Importe
+
+
+
+
+
+
+ Textbox21
+
+
+ #bdd7ee
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Folio Fiscal
+
+
+
+
+
+
+ Textbox11
+
+
+ #bdd7ee
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ 0.41479cm
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!SerieFolio.Value
+
+
+
+
+
+
+ SerieFolio
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Fecha.Value
+
+
+
+
+
+
+ Fecha
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Importe.Value
+
+
+
+
+
+
+ Importe1
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!FolioFiscal.Value
+
+
+
+
+
+
+ FolioFiscal
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ After
+
+
+
+
+
+
+ DataSet4
+ 1.39643cm
+ 3.28643cm
+ 0.85604cm
+ 15.30142cm
+ 3
+
+
+
+
+
+ true
+ 18.09605cm
+ 0.39712cm
+ 2.25247cm
+ 20.08984cm
+ 35
+
+ =Microsoft.VisualBasic.Interaction.IIF(First(Fields!SerieFolio.Value, "DataSet4") <> "", False, True)
+
+
+
+
+
- 22.9929cm
+ 25.5329cm