diff --git a/App_Code/ClsClientes.vb b/App_Code/ClsClientes.vb
index b7b8d93d5..60c2d2a48 100644
--- a/App_Code/ClsClientes.vb
+++ b/App_Code/ClsClientes.vb
@@ -1455,14 +1455,15 @@ Public Class ClsClientes
OnError("Ocurrió un error eliminar la Clasificación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
- End Function
-
+ End Function
+
#End Region
-
-
+
+
#Region "D I R E C C I O N D E E N V I O "
Public Function DireccionEnvioAdd(CveCliente As Integer, EnvioDireccion As String, EnvioNoExt As String, EnvioNoInt As String, EnvioColonia As String, EnvioCiudad As String, EnvioEstado As String,
- EnvioCP As Integer, EnvioContacto As String, CveUsuario As Integer, Estatus As Integer, Optional CveClienteSucursal As Integer = -1, Optional EnvioDepartamento As String = "-1", Optional EnvioTel As String = "-1") As Integer
+ EnvioCP As Integer, EnvioContacto As String, CveUsuario As Integer, Estatus As Integer, Optional CveClienteSucursal As Integer = -1, Optional EnvioDepartamento As String = "-1", Optional EnvioTel As String = "-1",
+ Optional CvePais As Integer = -1, Optional CveEstado As Integer = -1, Optional CveMunicipio As Integer = -1, Optional CveLocalidad As Integer = -1, Optional CveColonia As Integer = -1) As Integer
Dim Retorno As Integer = -1
DataAdapter("PA_Vta_ClientesDireccionesEnvioAdd")
@@ -1481,6 +1482,13 @@ Public Class ClsClientes
.Add("@EnvioTel", SqlDbType.VarChar).Value = EnvioTel
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@Estatus", SqlDbType.Int).Value = Estatus
+
+ .Add("@CvePais", SqlDbType.Int).Value = CvePais
+ .Add("@CveEstado", SqlDbType.Int).Value = CveEstado
+ .Add("@CveMunicipio", SqlDbType.Int).Value = CveMunicipio
+ .Add("@CveLocalidad", SqlDbType.Int).Value = CveLocalidad
+ .Add("@CveColonia", SqlDbType.Int).Value = CveColonia
+
.Add("@CveDireccionEnvio", SqlDbType.Int).Direction = ParameterDirection.Output
End With
@@ -1514,7 +1522,8 @@ Public Class ClsClientes
End Function
Public Function DireccionEnvioUpdate(CveCliente As Integer, EnvioDireccion As String, EnvioNoExt As String, EnvioNoInt As String, EnvioColonia As String, EnvioCiudad As String, EnvioEstado As String,
- EnvioCP As Integer, EnvioContacto As String, CveUsuario As Integer, Estatus As Integer, CveDireccionEnvio As Integer, Optional EnvioDepartamento As String = "-1", Optional CveClienteSucursal As Integer = -1, Optional EnvioTel As String = "-1") As Boolean
+ EnvioCP As Integer, EnvioContacto As String, CveUsuario As Integer, Estatus As Integer, CveDireccionEnvio As Integer, Optional EnvioDepartamento As String = "-1", Optional CveClienteSucursal As Integer = -1, Optional EnvioTel As String = "-1",
+ Optional CvePais As Integer = -1, Optional CveEstado As Integer = -1, Optional CveMunicipio As Integer = -1, Optional CveLocalidad As Integer = -1, Optional CveColonia As Integer = -1) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Vta_ClientesDireccionesEnvioUpdate")
@@ -1534,6 +1543,13 @@ Public Class ClsClientes
.Add("@EnvioTel", SqlDbType.VarChar).Value = EnvioTel
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@Estatus", SqlDbType.Int).Value = Estatus
+
+ .Add("@CvePais", SqlDbType.Int).Value = CvePais
+ .Add("@CveEstado", SqlDbType.Int).Value = CveEstado
+ .Add("@CveMunicipio", SqlDbType.Int).Value = CveMunicipio
+ .Add("@CveLocalidad", SqlDbType.Int).Value = CveLocalidad
+ .Add("@CveColonia", SqlDbType.Int).Value = CveColonia
+
End With
Try
diff --git a/App_Code/ClsGenerales.vb b/App_Code/ClsGenerales.vb
index c693d37a3..51f446d2f 100644
--- a/App_Code/ClsGenerales.vb
+++ b/App_Code/ClsGenerales.vb
@@ -3036,7 +3036,7 @@ Public Class ClsGenerales
Return Retorno
End Function
- Public Function AsignarEntregasPorRealizar(CvePaqueteriaGuia As Integer, CvePersonal As Integer, Optional CveAsignacionEntrega As Long = -1, Optional CveMotivoRechazoPaqueteria As Integer = -1) As Boolean
+ Public Function AsignarEntregasPorRealizar(CvePaqueteriaGuia As Integer, CvePersonal As Integer, Optional CveAsignacionEntrega As Long = -1, Optional CveMotivoRechazoPaqueteria As Integer = -1, Optional Orden As Integer = 0) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Gral_AsignarEntregasPorRealizar")
With SqlAdapter.SelectCommand.Parameters
@@ -3044,6 +3044,7 @@ Public Class ClsGenerales
.Add("@CveUsuarioAsignado", SqlDbType.Int).Value = CvePersonal
.Add("@CveAsignacionEntrega", SqlDbType.BigInt).Value = CveAsignacionEntrega
.Add("@CveMotivoRechazoPaqueteria", SqlDbType.Int).Value = CveMotivoRechazoPaqueteria
+ .Add("@Orden", SqlDbType.Int).Value = Orden
End With
Try
SqlAdapter.Fill(Data)
@@ -3598,5 +3599,137 @@ Public Class ClsGenerales
Return Retorno
End Function
#End Region
+
+
+
+
+#Region "GRAL TIMBRES"
+
+
+ Public Function GralTimbreAdd(TipoDocto As Integer, Serie As String, Folio As Integer, FolioFiscal As String, Fecha As Date, CveVenta As Integer, CveMovimientoAlmacen As Integer, CveUsuario As Integer, CveEmpresa As Integer,
+ Estatus As Integer, CvePAC As Integer, AplicaCP As Boolean, CveSubProyectoOrigen As Integer, CveDireccionOrigen As Integer, CveDireccionDestino As Integer) As Integer
+ Dim Retorno As Integer = -1
+ DataAdapter("PA_Gral_TimbreAdd")
+
+ With SqlAdapter.SelectCommand.Parameters
+
+ .Add("@TipoDocto", SqlDbType.VarChar).Value = TipoDocto
+ .Add("@Serie", SqlDbType.VarChar).Value = Serie
+ .Add("@Folio", SqlDbType.Int).Value = Folio
+ .Add("@FolioFiscal", SqlDbType.VarChar).Value = FolioFiscal
+ .Add("@Fecha", SqlDbType.Date).Value = Fecha
+ .Add("@CveVenta", SqlDbType.Int).Value = CveVenta
+ .Add("@CveMovimientoAlmacen", SqlDbType.Int).Value = CveMovimientoAlmacen
+ .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+ .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+ .Add("@Estatus", SqlDbType.Int).Value = Estatus
+ .Add("@CvePAC", SqlDbType.Int).Value = CvePAC
+ .Add("@AplicaCP", SqlDbType.Bit).Value = AplicaCP
+ .Add("@CveSubProyectoOrigen", SqlDbType.Int).Value = CveSubProyectoOrigen
+ .Add("@CveDireccionOrigen", SqlDbType.Int).Value = CveDireccionOrigen
+ .Add("@CveDireccionDestino", SqlDbType.Int).Value = CveDireccionDestino
+ .Add("@CveTimbre", SqlDbType.Int).Direction = ParameterDirection.Output
+ End With
+
+ Try
+ SqlAdapter.Fill(Data)
+ Retorno = SqlAdapter.SelectCommand.Parameters("@CveTimbre").Value.ToString.ToEntero
+ Catch ex As Exception
+ OnError("Ocurrió un error al agregar el timbre", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ End Try
+ Return Retorno
+ End Function
+
+ Public Function GralTimbreGet(CveTimbre As Integer, TipoDocto As String, Serie As String, Folio As Integer, FechaI As Date, FechaF As Date, Estatus As Integer, CveEmpresa As Integer, CveVenta As Integer) As Boolean
+ Dim Retorno As Boolean = False
+ DataAdapter("PA_Gral_TimbreGet")
+
+ With SqlAdapter.SelectCommand.Parameters
+ .Add("@CveTimbre", SqlDbType.Int).Value = CveTimbre
+ .Add("@TipoDocto", SqlDbType.VarChar).Value = TipoDocto
+ .Add("@Serie", SqlDbType.VarChar).Value = Serie
+ .Add("@Folio", SqlDbType.Int).Value = Folio
+ .Add("@FechaI", SqlDbType.Date).Value = FechaI
+ .Add("@FechaF", SqlDbType.Date).Value = FechaF
+
+ .Add("@Estatus", SqlDbType.Int).Value = Estatus
+ .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+
+ .Add("@CveVenta", SqlDbType.Int).Value = CveVenta
+
+
+
+ End With
+
+ Try
+ SqlAdapter.Fill(Data)
+ Retorno = True
+ Catch ex As Exception
+ OnError("Ocurrió un error al obtener los timbres.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ End Try
+
+ Return Retorno
+ End Function
+
+ Public Function GralTimbreUpdate(CveTimbre As Integer, TipoDocto As Integer, Serie As String, Folio As Integer, FolioFiscal As String, Fecha As Date, CveVenta As Integer, CveMovimientoAlmacen As Integer, CveUsuario As Integer, CveEmpresa As Integer,
+ Estatus As Integer, CvePAC As Integer, CvePACCancelacion As Integer, FechaCancelacion As Date, AplicaCP As Boolean, CveSubProyectoOrigen As Integer, CveDireccionOrigen As Integer, CveDireccionDestino As Integer) As Boolean
+ Dim Retorno As Boolean = False
+ DataAdapter("PA_Gral_TimbreUpdate")
+
+ With SqlAdapter.SelectCommand.Parameters
+
+ .Add("@CveTimbre", SqlDbType.Int).Value = CveTimbre
+ .Add("@TipoDocto", SqlDbType.VarChar).Value = TipoDocto
+ .Add("@Serie", SqlDbType.VarChar).Value = Serie
+ .Add("@Folio", SqlDbType.Int).Value = Folio
+ .Add("@FolioFiscal", SqlDbType.VarChar).Value = FolioFiscal
+ .Add("@Fecha", SqlDbType.Date).Value = Fecha
+ .Add("@CveVenta", SqlDbType.Int).Value = CveVenta
+ .Add("@CveMovimientoAlmacen", SqlDbType.Int).Value = CveMovimientoAlmacen
+ .Add("@Estatus", SqlDbType.Int).Value = Estatus
+ .Add("@CvePAC", SqlDbType.Int).Value = CvePAC
+ .Add("@CvePACCancelacion", SqlDbType.Int).Value = CvePACCancelacion
+ .Add("@FechaCancelacion", SqlDbType.DateTime).Value = FechaCancelacion
+ .Add("@AplicaCP", SqlDbType.Bit).Value = AplicaCP
+ .Add("@CveSubProyectoOrigen", SqlDbType.Int).Value = CveSubProyectoOrigen
+ .Add("@CveDireccionOrigen", SqlDbType.Int).Value = CveDireccionOrigen
+ .Add("@CveDireccionDestino", SqlDbType.Int).Value = CveDireccionDestino
+ .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+ .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+
+ End With
+
+ Try
+ SqlAdapter.Fill(Data)
+ Retorno = True
+ Catch ex As Exception
+ OnError("Ocurrió un error al actualizar el timbre", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ End Try
+ Return Retorno
+ End Function
+
+
+
+ Public Function GralTimbreRemove(CveTimbre As Integer, CveEmpresa As Integer) As Boolean
+ Dim Retorno As Boolean = False
+ DataAdapter("PA_Gral_TimbreRemove")
+
+ With SqlAdapter.SelectCommand.Parameters
+ .Add("@CveTimbre", SqlDbType.Int).Value = CveTimbre
+ .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+ End With
+
+ Try
+ SqlAdapter.Fill(Data)
+ Retorno = True
+ Catch ex As Exception
+ OnError("Ocurrió un error al eliminar Timbre", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ End Try
+ Return Retorno
+ End Function
+
+
+#End Region
+
End Class
diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 40ca553a3..668fa1c7d 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -7834,14 +7834,19 @@ Public Class ClsPaginas
End If
'params.Add(New ReportParameter("FechaOC", ObjOC.Fecha.ToShortDateString))
Dim RutaFisicaSol As String = String.Format("Empresas\{0}\Firmas\{1}.png", EmpresaActual.CveEmpresa, CveUsuarioSol)
- Dim RutaVirtuaSol As String = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={0}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(RutaFisicaSol))
+ Dim RutaVirtuaSol As String = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(RutaFisicaSol))
Dim FirmaSol As New System.IO.FileInfo(String.Format("{0}Firmas\{1}.png", EmpresaActual.Ruta, CveUsuarioSol))
- params.Add(New ReportParameter("FirmaSolicito", If(FirmaSol.Exists, RutaVirtuaSol, "")))
+ 'params.Add(New ReportParameter("FirmaSolicito", If(FirmaSol.Exists, RutaVirtuaSol, "")))
+ params.Add(New ReportParameter("FirmaSolicito", If(FirmaSol.Exists, ImageToBase64(Drawing.Image.FromFile(FirmaSol.FullName), Drawing.Imaging.ImageFormat.Png), "")))
Dim RutaFisicaAut As String = String.Format("Empresas\{0}\Firmas\{1}.png", EmpresaActual.CveEmpresa, CveUsuarioAut)
Dim RutaVirtuaAut As String = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(RutaFisicaAut))
Dim FirmaAut As New System.IO.FileInfo(String.Format("{0}Firmas\{1}.png", EmpresaActual.Ruta, CveUsuarioAut))
- params.Add(New ReportParameter("FirmaAutorizo", If(FirmaAut.Exists, RutaVirtuaAut, "")))
+ 'params.Add(New ReportParameter("FirmaAutorizo", If(FirmaAut.Exists, RutaVirtuaAut, "")))
+ params.Add(New ReportParameter("FirmaAutorizo", If(FirmaAut.Exists, ImageToBase64(Drawing.Image.FromFile(FirmaAut.FullName), Drawing.Imaging.ImageFormat.Png), "")))
+
+
+
If Archivo.Exists Then
bytes = StreamPDF(String.Format("{0}Formatos\OC.rdlc", EmpresaActual.Ruta), DtDetalle, params, $"OC_{ObjOC.Folio.ToString}", RDSName:="DsOC", MR:=MR)
@@ -7910,6 +7915,26 @@ Public Class ClsPaginas
Return bytes
End Function
+
+
+ Public Function ImageToBase64(ByVal image As System.Drawing.Image, ByVal format As System.Drawing.Imaging.ImageFormat) As String
+ Dim base64String As String = ""
+
+
+ Try
+ Using ms As New System.IO.MemoryStream()
+ image.Save(ms, format)
+ Dim imageBytes As Byte() = ms.ToArray()
+ base64String = Convert.ToBase64String(imageBytes)
+ End Using
+ Catch ex As Exception
+ GuardaLog(String.Format("Ocurrio un error al generar convertir la imagen a Base64 {0}", ex.Message))
+ End Try
+
+ Return base64String
+ End Function
+
+
Public Function NewGeneraOCCotizacion(tCveOrdenCompra As Integer, Optional MR As ReportViewer = Nothing, Optional ConBitacora As Boolean = False) As Byte()
Dim bytes As Byte() = Nothing
Dim CveEmpresaActual As Integer
diff --git a/Ashx/SigFiles.ashx b/Ashx/SigFiles.ashx
index bb4a91d48..3ab1e80ad 100644
--- a/Ashx/SigFiles.ashx
+++ b/Ashx/SigFiles.ashx
@@ -33,7 +33,9 @@ public class SigFiles : IHttpHandler
{
mimeType = MimeMapping.GetMimeMapping(path);
}
- catch (Exception) { }//si truena no existe el arhivo
+ catch (Exception ex) {
+ this.GuardaLog(ex.ToString());
+ }//si truena no existe el arhivo
context.Response.Clear();
context.Response.ClearHeaders();
context.Response.ClearContent();
diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb
index e304c226a..5d3ac2f06 100644
--- a/Compras/PopUpVerFactura.aspx.vb
+++ b/Compras/PopUpVerFactura.aspx.vb
@@ -670,8 +670,10 @@ Partial Class PopUpVerFactura
#Region "OP = 'CONG' - IMPRIME GASTO DE CONTRATO"
Private Sub ImprimeGastoContrato(CveContrato As Integer, CveContratoGasto As Integer)
+
Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
+
Dim Dr As DataRow = Nothing
Dim ObjContratos As New ClsContratos
If Not ObjContratos.GetContratos(CveContrato, UsuarioActual.CveEmpresa) Or Not ObjContratos.DtResultados.Rows.Count > 0 Then
@@ -841,12 +843,19 @@ Partial Class PopUpVerFactura
If Dt.Rows.Count > 0 Then
Dim params As New List(Of ReportParameter)
Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
- Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
- If Imagen.Exists Then
- params.Add(New ReportParameter("LogoPath", logouri))
- Else
- params.Add(New ReportParameter("LogoPath", ""))
- End If
+ Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
+
+
+ params.Add(New ReportParameter("LogoPath", If(Imagen.Exists, ImageToBase64(Drawing.Image.FromFile(Imagen.FullName), Drawing.Imaging.ImageFormat.Png), "")))
+
+ 'If Imagen.Exists Then
+ ' params.Add(New ReportParameter("LogoPath", logouri))
+
+
+ 'Else
+ ' params.Add(New ReportParameter("LogoPath", ""))
+ 'End If
+
params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
params.Add(New ReportParameter("FechaImpresion", Now.ToDateTime.ToShortDateString))
diff --git a/Empresas/11/Formatos/OC.rdlc b/Empresas/11/Formatos/OC.rdlc
index d97aac41e..8392cfa13 100644
--- a/Empresas/11/Formatos/OC.rdlc
+++ b/Empresas/11/Formatos/OC.rdlc
@@ -1264,7 +1264,7 @@
7.79628in
- 7.01282cm
+ 6.5434cm
true
true
@@ -1577,8 +1577,9 @@
- External
- =Parameters!FirmaAutorizo.Value
+ Database
+ =System.Convert.FromBase64String(Parameters!FirmaAutorizo.Value)
+ image/png
Fit
5.61055cm
2.31533cm
@@ -2186,51 +2187,6 @@
-
- true
- true
-
-
-
-
- Fecha Impresión:
-
-
-
-
-
-
-
- =Today
-
-
-
-
-
-
- Textbox8
- 6.38636cm
- 0.10188cm
- 0.46771cm
- 6.86562cm
- 20
-
-
- 2pt
- 2pt
- 2pt
- 2pt
-
-
- External
- =Parameters!FirmaAutorizo.Value
+ Database
+ =System.Convert.FromBase64String(Parameters!FirmaAutorizo.Value)
+ image/png
Fit
0.74655cm
5.63442cm
diff --git a/Empresas/122/Formatos/OC.rdlc b/Empresas/122/Formatos/OC.rdlc
index dc5b911b6..eb08206e9 100644
--- a/Empresas/122/Formatos/OC.rdlc
+++ b/Empresas/122/Formatos/OC.rdlc
@@ -1571,8 +1571,9 @@
- External
- =Parameters!FirmaAutorizo.Value
+ Database
+ =System.Convert.FromBase64String(Parameters!FirmaAutorizo.Value)
+ image/png
Fit
0.17639cm
5.66608cm
diff --git a/Empresas/145/Formatos/OC.rdlc b/Empresas/145/Formatos/OC.rdlc
index 3801160d9..afe4e0e67 100644
--- a/Empresas/145/Formatos/OC.rdlc
+++ b/Empresas/145/Formatos/OC.rdlc
@@ -1595,8 +1595,9 @@
- External
- =Parameters!FirmaAutorizo.Value
+ Database
+ =System.Convert.FromBase64String(Parameters!FirmaAutorizo.Value)
+ image/png
Fit
0.17639cm
5.67997cm
diff --git a/Empresas/154/Formatos/Factura.rdlc b/Empresas/154/Formatos/Factura.rdlc
index da1a806f4..f3498c44d 100644
--- a/Empresas/154/Formatos/Factura.rdlc
+++ b/Empresas/154/Formatos/Factura.rdlc
@@ -479,7 +479,7 @@
true
4.65368in
0.06752in
- 1.60919in
+ 1.41544in
8.23953in
+
+
+
+ true
+ true
+
+
+
+
+ Tipo Relación:
+
+
+
+
+
+
+ Textbox29
+ 0.69848cm
+ 2.57101cm
+ 0.41981cm
+ 6.35221cm
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =Parameters!TipoRelacionTexto.Value
+
+
+
+
+
+
+ Textbox29
+ 0.69848cm
+ 8.99377cm
+ 0.41981cm
+ 9.52264cm
+ 1
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+ 2.63922cm
+
+
+ 2.27051cm
+
+
+ 3.25097cm
+
+
+ 7.7847cm
+
+
+
+
+ 0.44125cm
+
+
+
+
+ true
+ true
+
+
+
+
+ Folio
+
+
+
+
+
+
+ Textbox10
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Fecha
+
+
+
+
+
+
+ Textbox12
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Importe
+
+
+
+
+
+
+ Textbox21
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Folio Fiscal
+
+
+
+
+
+
+ Textbox11
+
+
+ 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.22386cm
+ 2.57101cm
+ 0.85604cm
+ 15.9454cm
+ 2
+
+
+
+
+
+ true
+ true
+
+
+
+
+ VERSION 3.3
+
+
+
+
+
+
+ Textbox5
+ 2.15724cm
+ 17.53151cm
+ 0.52063cm
+ 3.32021cm
+ 3
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ CFDI Relacionados
+
+
+
+
+
+
+ Textbox5
+ 0.03101cm
+ 0.54004cm
+ 20.79183cm
+ 4
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ 15.5602cm
+ 0.16937cm
+ 2.67786cm
+ 20.85172cm
+ 20
+
+ =Microsoft.VisualBasic.Interaction.IIF(First(Fields!SerieFolio.Value, "DataSet4") <> "", False, True)
+
+
+
+
+
- 15.90769cm
+ 18.23806cm