diff --git a/AC/RepProgramasOperativosAvances.aspx b/AC/RepProgramasOperativosAvances.aspx
index 20fd5c81e..f1cfb142d 100644
--- a/AC/RepProgramasOperativosAvances.aspx
+++ b/AC/RepProgramasOperativosAvances.aspx
@@ -127,7 +127,7 @@
- NavigateUrl="/AC/ProgramaOperativo.aspx?CveProgramaOperativo=703&EsProyecto=1,&Bloqueado=1"
+
diff --git a/AC/RepProgramasOperativosAvances.aspx.vb b/AC/RepProgramasOperativosAvances.aspx.vb
index 94d2c5f5b..312da416f 100644
--- a/AC/RepProgramasOperativosAvances.aspx.vb
+++ b/AC/RepProgramasOperativosAvances.aspx.vb
@@ -191,8 +191,12 @@ Partial Class AC_RepProgramasOperativosAvances
cell.ColumnSpan = 2
cell.Text = ""
row.Controls.Add(cell)
+ Try
+ GVD.HeaderRow.Parent.Controls.AddAt(0, row)
+ Catch ex As Exception
+
+ End Try
- GVD.HeaderRow.Parent.Controls.AddAt(0, row)
diff --git a/App_Code/ClsGenerales.vb b/App_Code/ClsGenerales.vb
index 4212d5715..fa1c9f6d7 100644
--- a/App_Code/ClsGenerales.vb
+++ b/App_Code/ClsGenerales.vb
@@ -3,7 +3,8 @@ Option Explicit On
Imports System.Data
Imports System.Data.SqlClient
Imports Extensiones
-
+Imports Stimulsoft.Base.Analysis
+
Public Class ClsGenerales
Implements IDisposable
@@ -1621,7 +1622,14 @@ Public Class ClsGenerales
' Me.OnError("Ocurrió un error al Guardar el registro.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
' End If
Catch ex As Exception
- OnError("Ocurrió un error al Guardar la cuenta", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+
+ If ex.Message.Contains("IX_Gral_CuentasDepositos_CLABE") Then
+ OnError($"Ocurrió un error al Guardar la cuenta, la CLABE {CLABE} ya esta registrada en otra cuenta.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ Else
+ OnError("Ocurrió un error al Guardar la cuenta", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ End If
+
+
End Try
Return Retorno
@@ -1678,11 +1686,21 @@ Public Class ClsGenerales
Catch Ex1 As SqlException
If Ex1.Message.Contains("Número: 2627;") Then
Alert("Ya existe un registro con el mismo nombre", TipoMensaje.MsgAdvertencia)
+ ElseIf Ex1.Message.Contains("IX_Gral_CuentasDepositos_CLABE") Then
+ OnError($"Ocurrió un error al actualizar la cuenta, la CLABE {CLABE} ya esta registrada en otra cuenta.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
Else
+
Me.OnError("Ocurrió un error al guardar los cambios", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End If
Catch ex As Exception
- OnError("Ocurrió un error al guardar los cambios.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+
+ If ex.Message.Contains("IX_Gral_CuentasDepositos_CLABE") Then
+ OnError($"Ocurrió un error al actualizar la cuenta, la CLABE {CLABE} ya esta registrada en otra cuenta.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ Else
+ OnError("Ocurrió un error al guardar los cambios.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ End If
+
+
End Try
Return Retorno
@@ -1727,12 +1745,19 @@ Public Class ClsGenerales
Retorno = True
Catch Ex1 As SqlException
If Ex1.Message.Contains("Número: 2627;") Then
- Alert("Ya existe un registro con el mismo nombre", TipoMensaje.MsgAdvertencia)
+ Alert("Ya existe un registro con el mismo nombre", TipoMensaje.MsgAdvertencia)
+ ElseIf Ex1.Message.Contains("IX_Gral_CuentasDepositos_CLABE") Then
+ OnError($"Ocurrió un error al actualizar la cuenta, la CLABE {CLABE} ya esta registrada en otra cuenta.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
Else
Me.OnError("Ocurrió un error al guardar los cambios", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End If
- Catch ex As Exception
- OnError("Ocurrió un error al guardar los cambios.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ Catch ex As Exception
+
+ If ex.Message.Contains("IX_Gral_CuentasDepositos_CLABE") Then
+ OnError($"Ocurrió un error al actualizar la cuenta, la CLABE {CLABE} ya esta registrada en otra cuenta.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ Else
+ OnError("Ocurrió un error al guardar los cambios.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+ End If
End Try
Return Retorno
diff --git a/Bancos/ProveedoresAbonar.aspx.vb b/Bancos/ProveedoresAbonar.aspx.vb
index 1160ede4b..a6e121345 100644
--- a/Bancos/ProveedoresAbonar.aspx.vb
+++ b/Bancos/ProveedoresAbonar.aspx.vb
@@ -1939,29 +1939,31 @@ Partial Class Bancos_ProveedoresAbonar
End If
End If
- If MsgError = "" AndAlso ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, 5) Then
- If ObjConta.ValorPolizaDescuadre > 0 Then
- MsgError = ObjConta.MensajePolizaDescuadre + " " + ObjConta.ValorDiferencia
- GuardaLogAD($"Bancos/ProveedoresAbonar | Error:{ObjConta.MensajePolizaDescuadre} Diferencia:{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
- Exit For
- Else
+ End If
+ Next
- If UsuarioActual.Empresa.Funcionalidad(200) = "1" AndAlso MsgError = "" Then
- If ObjConta.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then
- ' Alert(alertaContabilizacion, ModExtensiones.TipoMensaje.MsgInformacion)
- Else
- 'Alert("Ocurrio un error al contabilizar, pongase en contacto con Soporte Técnico", TipoMensaje.MsgError)
- MsgError = "Ocurrio un error al contabilizar, pongase en contacto con Soporte Técnico"
- End If
+ If MsgError.Trim.Length = 0 AndAlso CvePrePoliza > 0 Then
+ If MsgError = "" AndAlso ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, 5) Then
+ If ObjConta.ValorPolizaDescuadre > 0 Then
+ MsgError = ObjConta.MensajePolizaDescuadre + " " + ObjConta.ValorDiferencia
+ GuardaLogAD($"Bancos/ProveedoresAbonar | Error:{ObjConta.MensajePolizaDescuadre} Diferencia:{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
+ Else
+ If UsuarioActual.Empresa.Funcionalidad(200) = "1" AndAlso MsgError = "" Then
+
+ If ObjConta.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then
+ ' Alert(alertaContabilizacion, ModExtensiones.TipoMensaje.MsgInformacion)
+ Else
+ 'Alert("Ocurrio un error al contabilizar, pongase en contacto con Soporte Técnico", TipoMensaje.MsgError)
+ MsgError = "Ocurrio un error al contabilizar, pongase en contacto con Soporte Técnico"
End If
End If
- End If
+ End If
End If
- Next
+ End If
diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 642b778e6..9a557b9a8 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -8139,7 +8139,7 @@ Partial Class Compras_Compras
If UsuarioActual.TienePermisoProceso(354) Then 'visualizar la póliza al registros
Msg.AppendFormat("Ver Póliza . ", CvePrePoliza)
Dim TempParametros = Encripta(String.Format("OP=PREPO&CvePrePoliza={0}", CvePrePoliza))
- Msg.Append($" Descargar PDF ")
+ Msg.Append($" Imprimir PDF ")
@@ -8263,7 +8263,6 @@ Partial Class Compras_Compras
If listaUUIDSRelacionados.Count > 0 Then
DoctosRelacionados = String.Join(",", listaUUIDSRelacionados.ToArray())
- DoctosRelacionados = DoctosRelacionados.Substring(0, DoctosRelacionados.Length - 2)
End If
Return DoctosRelacionados
diff --git a/Compras/Proveedores.aspx.vb b/Compras/Proveedores.aspx.vb
index b542189c3..15dc5bff8 100644
--- a/Compras/Proveedores.aspx.vb
+++ b/Compras/Proveedores.aspx.vb
@@ -3123,15 +3123,22 @@ Partial Class Compras_Proveedores
Alert("No se pudieron cargar las cuentas bancarias. Por favor intente nuevamente.", TipoMensaje.MsgAdvertencia)
End If
ObjCuentasBancos.Dispose()
- End If
+ Else
-
- If CveProveedor < 0 Then
- 'Alert("No hay proveedor", TipoMensaje.MsgInformacion)
- TempDTCuentasBancos = DTCuentasBancos.Clone
+ 'SE USA CUANDO SE REGISTRA UN PROVEEDOR NUEVO
+ 'ESTE ELSE ES PARA OBTENER LA ESTRUCTURA DE LA TABLA
+ Dim ObjCuentasBancos As New ClsGenerales
+ If ObjCuentasBancos.GetCuentasDepositos(0, CveEmpresa:=-2) Then
+ DTCuentasBancos.Merge(ObjCuentasBancos.DtResultados)
+ Else
+ Alert("No se pudieron cargar las cuentas bancarias. Por favor intente nuevamente.", TipoMensaje.MsgAdvertencia)
+ End If
+ ObjCuentasBancos.Dispose()
End If
+ TempDTCuentasBancos = DTCuentasBancos.Clone
+
CargaPSGridCuentasBancos(ViewState("OrdenCuentasBancos").ToString)
End Sub
diff --git a/Contabilidad2/CatCuentasAsignaciones.aspx.vb b/Contabilidad2/CatCuentasAsignaciones.aspx.vb
index 2ae4ea7c8..3ec01dd77 100644
--- a/Contabilidad2/CatCuentasAsignaciones.aspx.vb
+++ b/Contabilidad2/CatCuentasAsignaciones.aspx.vb
@@ -11,8 +11,20 @@ Partial Class Contabilidad2_CatCuentasAsignaciones
Set
ViewState("CveConceptoAsignacion") = Value
End Set
- End Property
-
+ End Property
+
+ Public Property OpAgregar As Boolean
+ Get
+ If ViewState("OpAgregar") Is Nothing Then
+ ViewState("OpAgregar") = False
+ End If
+ Return Boolean.Parse(ViewState("OpAgregar").ToString)
+ End Get
+ Set(value As Boolean)
+ ViewState("OpAgregar") = value
+ End Set
+ End Property
+
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
@@ -116,7 +128,8 @@ Partial Class Contabilidad2_CatCuentasAsignaciones
DdlAlmacen.Items.Insert(0, New ListItem("Seleccione", "-1"))
End Sub
- Protected Sub ActualizaModulo(sender As Object, e As EventArgs)
+ Protected Sub ActualizaModulo(sender As Object, e As EventArgs)
+ OpAgregar = False
LimpiarDatos()
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim Dr As DataRow = GlobalDTContaConceptosContables(GvRow.DataKey("CveConceptoContable").ToEntero).FiltroPrimero("")
@@ -149,6 +162,8 @@ Partial Class Contabilidad2_CatCuentasAsignaciones
DdlSubProyectos.SelectedValueExist(GvRow.DataKey("CveSubProyecto").ToEntero)
DdlTipoGasto.SelectedValueExist(GvRow.DataKey("CveTipoGasto").ToEntero)
DdlActivoFijo.SelectedValueExist(GvRow.DataKey("CveActivoFijo").ToEntero)
+ DdlActivoFijo.Enabled = False
+
Dim CveCliente As Integer = GvRow.DataKey("CveCliente").ToEntero
Dim CvePersonal As Integer = GvRow.DataKey("CvePersonal").ToEntero
@@ -176,29 +191,31 @@ Partial Class Contabilidad2_CatCuentasAsignaciones
If Dr IsNot Nothing Then
- divCliente.Visible = Dr("AplicaCliente").ToString = "True"
+ divCliente.Visible = Boolean.Parse(Dr("AplicaCliente").ToString)
+ divProveedor.Visible = Boolean.Parse(Dr("AplicaProveedor").ToString)
+ divPersonal.Visible = Boolean.Parse(Dr("AplicaPersonal").ToString)
+ divPorcentajeIVA.Visible = Boolean.Parse(Dr("AplicaImpuesto").ToString)
+ divClasificacion.Visible = Boolean.Parse(Dr("AplicaClasificacion").ToString)
+ divBancos.Visible = Boolean.Parse(Dr("AplicaBancos").ToString)
+ divAlmacen.Visible = Boolean.Parse(Dr("AplicaAlmacen").ToString)
+ divSubProyectos.Visible = Boolean.Parse(Dr("AplicaSubProyecto").ToString)
+ divActivoFijo.Visible = Boolean.Parse(Dr("AplicaActivoFijo").ToString)
- divProveedor.Visible = Dr("AplicaProveedor").ToString = "True"
-
- divPersonal.Visible = Dr("AplicaPersonal").ToString = "True"
-
- divPorcentajeIVA.Visible = Dr("AplicaImpuesto").ToString = "True"
-
- divClasificacion.Visible = Dr("AplicaClasificacion").ToString = "True"
-
- divBancos.Visible = Dr("AplicaBancos").ToString = "True"
-
- divAlmacen.Visible = Dr("AplicaAlmacen").ToString = "True"
-
- divSubProyectos.Visible = Dr("AplicaSubProyecto").ToString = "True"
+ DdlActivoFijo.Enabled = False
If Dr("AplicaActivoFijo").ToString = "True" Then
- divActivoFijo.Visible = True
DdlActivoFijo.DataSource = GlobalDTActivoFijos(UsuarioActual.CveEmpresa)
- DdlActivoFijo.DataBind()
- ' DdlActivoFijo.SelectedValueExist(GvRow.DataKey("CveActivoFijo"))
+ DdlActivoFijo.DataBind() ' DdlActivoFijo.SelectedValueExist(GvRow.DataKey("CveActivoFijo"))
+
+ If OpAgregar Then
+ DdlActivoFijo.Enabled = True
+ Else
+ DdlActivoFijo.Enabled = False
+ End If
+
End If
+
divConceptoNomina.Visible = Dr("AplicaNomina").ToString = "True"
If CveConceptoContable = 51 Then
@@ -244,6 +261,8 @@ Partial Class Contabilidad2_CatCuentasAsignaciones
End Sub
Protected Sub BtnAgregarAsignacion_Click(sender As Object, e As EventArgs) Handles BtnAgregarAsignacion.Click
+ OpAgregar = True
+
LimpiarDatos()
DdlCconceptosContables.Enabled = True
DdlSubProyectos.Enabled = True
@@ -272,6 +291,23 @@ Partial Class Contabilidad2_CatCuentasAsignaciones
DdlPersonal.ddl.DataBind()
DdlPersonal.setEsWebService(True)
HdnCveCuentaAsignacion.Value = ""
+
+ If OpAgregar Then
+ divCliente.Visible = False
+ divProveedor.Visible = False
+ divPersonal.Visible = False
+ divPorcentajeIVA.Visible = False
+ divClasificacion.Visible = False
+ divBancos.Visible = False
+ divAlmacen.Visible = False
+ divSubProyectos.Visible = False
+ divActivoFijo.Visible = False
+ End If
+
+
+
+
+
End Sub
Protected Sub LbAgregar_Click(sender As Object, e As EventArgs) Handles LbAgregar.Click
diff --git a/Empresas/Grales/Formatos/PolizasResumen.rdlc b/Empresas/Grales/Formatos/PolizasResumen.rdlc
new file mode 100644
index 000000000..a5287f9f5
--- /dev/null
+++ b/Empresas/Grales/Formatos/PolizasResumen.rdlc
@@ -0,0 +1,1380 @@
+
+
+ 0
+
+
+
+ System.Data.DataSet
+ /* Local Connection */
+
+ 7ef92796-1755-4a85-b80c-8c8266256a94
+
+
+
+
+
+ DataSet1
+ /* Local Query */
+
+
+
+ CveCuenta
+ System.Int16
+
+
+ CveSubProyecto
+ System.Int16
+
+
+ TipoPol
+ System.Boolean
+
+
+ Codigo
+ System.String
+
+
+ Nombre
+ System.String
+
+
+ SubProyecto
+ System.String
+
+
+ Concepto
+ System.String
+
+
+ Referencia
+ System.String
+
+
+ Parcial
+ System.Double
+
+
+ Cargo
+ System.Double
+
+
+ Abono
+ System.Double
+
+
+ CuentaFormato
+ System.String
+
+
+
+ DataSet1
+ C:\inetpub\wwwroot\ADSistemas\Ventas.root\Reportes\DataSet1.xsd
+ DataTable1
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ 1.04101in
+
+
+ 1.64453in
+
+
+ 1.25976in
+
+
+ 1.03754in
+
+
+ 1.00976in
+
+
+ 1.00976in
+
+
+ 1.00976in
+
+
+
+
+ 0.1875in
+
+
+
+
+ true
+ true
+
+
+
+
+ Cuenta
+
+
+
+
+
+
+ Textbox1
+
+
+ Silver
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Nombre
+
+
+
+
+
+
+ Textbox3
+
+
+ Silver
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Referencia
+
+
+
+
+
+
+ Textbox10
+
+
+ Silver
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Seg
+
+
+
+
+
+
+ Textbox12
+
+
+ Silver
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Parcial
+
+
+
+
+
+
+ Textbox6
+
+
+ Silver
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Cargo
+
+
+
+
+
+
+ Textbox2
+
+
+ Silver
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Abono
+
+
+
+
+
+
+ Textbox8
+
+
+ Silver
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ 0.17708in
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Codigo.Value
+
+
+
+
+
+
+ Codigo
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Nombre.Value
+
+
+
+
+
+
+ Nombre
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Referencia.Value
+
+
+
+
+
+
+ Referencia
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!SubProyecto.Value
+
+
+
+
+
+
+ SubProyecto
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Parcial.Value
+
+
+
+
+
+
+ Parcial
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Cargo.Value
+
+
+
+
+
+
+ Cargo
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Abono.Value
+
+
+
+
+
+
+ Abono
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ 0.25in
+
+
+
+
+ true
+ true
+
+
+
+
+
+
+
+
+
+
+
+ Textbox5
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+
+
+
+
+
+
+
+ Textbox9
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+
+
+
+
+
+
+
+ Textbox11
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+
+
+
+
+
+
+
+ Textbox13
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Total
+
+
+
+
+
+
+ Textbox14
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Sum(IIF(IsNothing(Fields!Referencia.Value),0,cdbl(Fields!Cargo.Value)))
+
+
+
+
+
+
+ Textbox15
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Sum(IIF(IsNothing(Fields!Referencia.Value),0,cdbl(Fields!Abono.Value)))
+
+
+
+
+
+
+ Textbox16
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ After
+
+
+
+
+
+ Before
+
+
+
+ true
+ true
+ true
+ true
+ DataSet1
+ 0.61458in
+ 8.01212in
+
+
+
+
+
+ 0.61458in
+
+
+ 8.01212in
+
+
+ 1.20877in
+ true
+ true
+
+
+ true
+
+
+
+
+ =Parameters!Empresa.Value
+
+
+
+
+
+
+
+
+ Impreso de póliza del
+
+
+
+ =Parameters!Finicio.Value
+
+
+
+ al
+
+
+
+ =Parameters!FFin.Value
+
+
+
+
+
+
+
+
+ Moneda:
+
+
+
+ =Parameters!Moneda.Value
+
+
+
+
+
+
+ Textbox4
+ 0.61055cm
+ 1.8125in
+ 1.26472cm
+ 9.94376cm
+
+
+ 2pt
+ 2pt
+
+
+
+ true
+
+
+
+
+ Hoja:
+
+
+
+ =Globals!PageNumber
+
+
+
+
+
+
+
+
+ Fecha:
+
+
+
+ =Parameters!Fecha.Value
+
+
+
+
+
+
+
+
+
+
+
+ Textbox4
+ 0.61055cm
+ 5.94612in
+ 0.89872cm
+ 4.22452cm
+ 1
+
+
+
+
+
+ External
+ = Parameters!pImg.Value
+ FitProportional
+ 2.08251cm
+ 2.64415cm
+ 2
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Concepto:
+
+
+
+ =Parameters!ConceptoPoliza.Value
+
+
+
+
+
+
+ Textbox103
+ 2.11779cm
+ 0.72758cm
+ 16.28503cm
+ 3
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ ="Folio: " & Parameters!Folio.Value
+
+
+
+
+
+
+ Textbox7
+ 1.78707cm
+ 16.35558cm
+ 0.6cm
+ 3.6205cm
+ 4
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Fecha:
+
+
+
+ =Parameters!Fecha.Value
+
+
+
+
+
+
+
+
+
+
+ Textbox107
+ 2.42235cm
+ 16.35558cm
+ 0.6cm
+ 3.6205cm
+ 5
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+
+ 0.23958in
+ true
+ true
+
+
+ true
+ true
+
+
+
+
+ Fecha Impresión:
+
+
+
+ =Today
+
+
+
+
+
+
+
+
+
+
+ Textbox5
+ 0.08364cm
+ 0.17346cm
+ 0.46771cm
+ 6.92282cm
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ 0.19685in
+ 0.19685in
+ 0.01181in
+
+
+
+
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ String
+ true
+ true
+ ReportParameter1
+
+
+ Dim private count as integer
+
+ Public function MatrixRow() as integer
+ count = count + 1
+ Return count
+ End function
+ Inch
+ 644b5749-ad74-45b6-ab76-777b4ab74aff
+
\ No newline at end of file
diff --git a/Empresas/Grales/Formatos/ReciboDePagoGOPDF.rdlc b/Empresas/Grales/Formatos/ReciboDePagoGOPDF.rdlc
new file mode 100644
index 000000000..b59ae88e4
--- /dev/null
+++ b/Empresas/Grales/Formatos/ReciboDePagoGOPDF.rdlc
@@ -0,0 +1,4450 @@
+
+
+ 0
+
+
+
+ System.Data.DataSet
+ /* Local Connection */
+
+ 2096e430-0233-47df-91e3-ee8c57447966
+
+
+
+
+
+ Cfdi40DataSet
+ /* Local Query */
+
+
+
+ ClaveProdServ
+ System.String
+
+
+ NoIdentificacion
+ System.String
+
+
+ Cantidad
+ System.Double
+
+
+ ClaveUnidad
+ System.String
+
+
+ Unidad
+ System.String
+
+
+ Descripcion
+ System.String
+
+
+ ValorUnitario
+ System.Double
+
+
+ Importe
+ System.Double
+
+
+ Descuento
+ System.String
+
+
+
+ Cfdi40DataSet
+ C:\Users\Juan Manuel Calderon\Dropbox\Proyectos\Librerias\GoCfdi\GoPdf\DataSets\Cfdi40DataSet.xsd
+ Concepto
+
+
+
+
+
+
+
+ Cfdi40DataSet
+ /* Local Query */
+
+
+
+ Version
+ System.String
+
+
+ Serie
+ System.String
+
+
+ Folio
+ System.String
+
+
+ Fecha
+ System.String
+
+
+ Sello
+ System.String
+
+
+ FormaPago
+ System.String
+
+
+ NoCertificado
+ System.String
+
+
+ Certificado
+ System.String
+
+
+ CondicionesDePago
+ System.String
+
+
+ SubTotal
+ System.String
+
+
+ Descuento
+ System.String
+
+
+ Moneda
+ System.String
+
+
+ TipoCambio
+ System.String
+
+
+ Total
+ System.String
+
+
+ TipoDeComprobante
+ System.String
+
+
+ MetodoPago
+ System.String
+
+
+ LugarExpedicion
+ System.String
+
+
+
+ Cfdi40DataSet
+ C:\Users\Juan Manuel Calderon\Dropbox\Proyectos\Librerias\GoCfdi\GoPdf\DataSets\Cfdi40DataSet.xsd
+ Comprobante
+
+
+
+
+
+
+
+ Cfdi40DataSet
+ /* Local Query */
+
+
+
+ TotalLetras
+ System.String
+
+
+ QrCode
+ System.Byte[]
+
+
+ Observacion
+ System.String
+
+
+ Logotipo
+ System.Byte[]
+
+
+ TotalMontoDispersion
+ System.String
+
+
+ DireccionEmisor
+ System.String
+
+
+ DireccionReceptor
+ System.String
+
+
+
+ Cfdi40DataSet
+ C:\Users\emxcvz56ru\Dropbox\Proyectos\Librerias\GoCfdi\GoPdf\DataSets\Cfdi40DataSet.xsd
+ DatosAdicionales
+
+
+
+
+
+
+
+ Cfdi40DataSet
+ /* Local Query */
+
+
+
+ Version
+ System.String
+
+
+ UUID
+ System.String
+
+
+ FechaTimbrado
+ System.String
+
+
+ SelloCFD
+ System.String
+
+
+ NoCertificadoSAT
+ System.String
+
+
+ SelloSAT
+ System.String
+
+
+ RfcProvCertif
+ System.String
+
+
+
+ Cfdi40DataSet
+ C:\Users\Juan Manuel Calderon\Dropbox\Proyectos\Librerias\GoCfdi\GoPdf\DataSets\Cfdi40DataSet.xsd
+ TimbreFiscalDigital
+
+
+
+
+
+
+
+ Cfdi40DataSet
+ /* Local Query */
+
+
+
+ Rfc
+ System.String
+
+
+ Nombre
+ System.String
+
+
+ RegimenFiscal
+ System.String
+
+
+ FacAtrAdquirente
+ System.String
+
+
+
+ Cfdi40DataSet
+ C:\Users\emxcvz56ru\Dropbox\Proyectos\Librerias\GoCfdi\GoPdf\DataSets\Cfdi40DataSet.xsd
+ Emisor
+
+
+
+
+
+
+
+ Cfdi40DataSet
+ /* Local Query */
+
+
+
+ Rfc
+ System.String
+
+
+ Nombre
+ System.String
+
+
+ DomicilioFiscalReceptor
+ System.String
+
+
+ ResidenciaFiscal
+ System.String
+
+
+ NumRegIdTrib
+ System.String
+
+
+ RegimenFiscalReceptor
+ System.String
+
+
+ UsoCFDI
+ System.String
+
+
+
+ Cfdi40DataSet
+ C:\Users\emxcvz56ru\Dropbox\Proyectos\Librerias\GoCfdi\GoPdf\DataSets\Cfdi40DataSet.xsd
+ Receptor
+
+
+
+
+
+
+
+ Cfdi40DataSet
+ /* Local Query */
+
+
+
+ TipoRelacion
+ System.String
+
+
+
+ Cfdi40DataSet
+ C:\Users\Juan Manuel Calderon\Dropbox\Proyectos\Librerias\GoCfdi\GoPdf\DataSets\Cfdi40DataSet.xsd
+ CfdiRelacionados
+
+
+
+
+
+
+
+ Cfdi40DataSet
+ /* Local Query */
+
+
+
+ UUID
+ System.String
+
+
+
+ Cfdi40DataSet
+ C:\Users\Juan Manuel Calderon\Dropbox\Proyectos\Librerias\GoCfdi\GoPdf\DataSets\Cfdi40DataSet.xsd
+ CfdiRelacionado
+
+
+
+
+
+
+
+ Cfdi40DataSet
+ /* Local Query */
+
+
+
+ Impuesto
+ System.String
+
+
+ Importe
+ System.String
+
+
+
+ Cfdi40DataSet
+ C:\Users\Juan Manuel Calderon\Dropbox\Proyectos\Librerias\GoCfdi\GoPdf\DataSets\Cfdi40DataSet.xsd
+ ImpuestosUnidos
+
+
+
+
+
+
+
+ Cfdi40DataSet
+ /* Local Query */
+
+
+
+ FechaPago
+ System.String
+
+
+ FormaDePagoP
+ System.String
+
+
+ MonedaP
+ System.String
+
+
+ TipoCambioP
+ System.String
+
+
+ Monto
+ System.String
+
+
+ NumOperacion
+ System.String
+
+
+ RfcEmisorCtaOrd
+ System.String
+
+
+ NomBancoOrdExt
+ System.String
+
+
+ CtaOrdenante
+ System.String
+
+
+ RfcEmisorCtaBen
+ System.String
+
+
+ CtaBeneficiario
+ System.String
+
+
+ TipoCadPago
+ System.String
+
+
+ CertPago
+ System.String
+
+
+ CadPago
+ System.String
+
+
+ SelloPago
+ System.String
+
+
+
+ Cfdi40DataSet
+ C:\Users\Juan Manuel Calderon\Dropbox\Proyectos\Librerias\GoCfdi\GoPdf\DataSets\Cfdi40DataSet.xsd
+ Pago
+
+
+
+
+
+
+
+ Cfdi40DataSet
+ /* Local Query */
+
+
+
+ IdDocumento
+ System.String
+
+
+ Serie
+ System.String
+
+
+ Folio
+ System.String
+
+
+ MonedaDR
+ System.String
+
+
+ TipoCambioDR
+ System.String
+
+
+ MetodoDePagoDR
+ System.String
+
+
+ NumParcialidad
+ System.String
+
+
+ ImpSaldoAnt
+ System.String
+
+
+ ImpPagado
+ System.String
+
+
+ ImpSaldoInsoluto
+ System.String
+
+
+
+ Cfdi40DataSet
+ C:\Users\Juan Manuel Calderon\Dropbox\Proyectos\Librerias\GoCfdi\GoPdf\DataSets\Cfdi40DataSet.xsd
+ DoctoRelacionado
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ 1.2479in
+
+
+ 0.56276in
+
+
+ 0.702in
+
+
+ 2.77462in
+
+
+ 0.8966in
+
+
+ 1.03508in
+
+
+ 0.49366in
+
+
+
+
+ 0.25in
+
+
+
+
+ true
+ true
+
+
+
+
+ Prod. Serv/Código
+
+
+
+
+
+
+ Textbox2
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Cant
+
+
+
+
+
+
+ Textbox4
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ U. Medida
+
+
+
+
+
+
+ Textbox13
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Descripcion
+
+
+
+
+
+
+ Textbox6
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Precio
+
+
+
+
+
+
+ Textbox18
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Importe
+
+
+
+
+
+
+ Textbox20
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Descto.
+
+
+
+
+
+
+ Textbox21
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ 0.25in
+
+
+
+
+ true
+ true
+
+
+
+
+ =IIF(First(Fields!NoIdentificacion.Value, "Concepto") = "",
+First(Fields!ClaveProdServ.Value, "Concepto"),
+First(Fields!ClaveProdServ.Value, "Concepto") + " - " + First(Fields!NoIdentificacion.Value, "Concepto"))
+
+
+
+
+
+
+ ClaveProdServ
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Cantidad.Value
+
+
+
+
+
+
+ Cantidad
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =IIF(First(Fields!Unidad.Value, "Concepto") = "",
+First(Fields!ClaveUnidad.Value, "Concepto"),
+First(Fields!ClaveUnidad.Value, "Concepto") + " - " + First(Fields!Unidad.Value, "Concepto"))
+
+
+
+
+
+
+ Unidad
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Descripcion.Value
+
+
+
+
+
+
+ Descripcion
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =CDbl(Fields!ValorUnitario.Value)
+
+
+
+
+
+
+ ValorUnitario
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+ en-US
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =CDbl(Fields!Importe.Value)
+
+
+
+
+
+
+ Importe1
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+ en-US
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =CDbl(IIF(First(Fields!Descuento.Value, "Concepto") Is Nothing,
+ "0",
+ First(Fields!Descuento.Value, "Concepto")))
+
+
+
+
+
+
+ Descuento
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ true
+ After
+ true
+
+
+
+
+
+
+ Concepto
+ 0.06944in
+ 0.00012in
+ 0.5in
+ 7.71262in
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Tipo Relación Cfdi:
+
+
+
+
+
+
+ Textbox48
+ 7.26368cm
+ 0.51592cm
+ 2.7201cm
+ 1
+
+ =First(Fields!TipoRelacion.Value, "CfdiRelacionados") is Nothing
+
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!TipoRelacion.Value, "CfdiRelacionados")
+
+
+
+
+
+
+ Textbox49
+ 7.26368cm
+ 2.72009cm
+ 0.51592cm
+ 4.91764cm
+ 2
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+ 5.50118cm
+
+
+
+
+ 0.51592cm
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!UUID.Value
+
+
+
+
+
+
+ UUID
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ CfdiRelacionado
+ 7.26368cm
+ 8.92912cm
+ 0.51592cm
+ 5.50118cm
+ 3
+
+
+
+
+
+ true
+ true
+
+
+
+
+ UUID(s):
+
+
+
+
+
+
+ Textbox48
+ 7.26368cm
+ 7.63774cm
+ 0.51592cm
+ 1.29138cm
+ 4
+
+ =First(Fields!UUID.Value, "CfdiRelacionado") is Nothing
+
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Fecha Pago:
+
+
+
+
+
+
+ Textbox10
+ 0.00001cm
+ 0.52062cm
+ 2.54372cm
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!FechaPago.Value, "Pago")
+
+
+
+
+
+
+ Textbox12
+ 0.00001cm
+ 2.54373cm
+ 0.52062cm
+ 3.06703cm
+ 1
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Forma de Pago:
+
+
+
+
+
+
+ Textbox14
+ 0.00001cm
+ 5.61076cm
+ 0.52062cm
+ 2.77213cm
+ 2
+
+
+
+ LightGrey
+
+ 1pt
+
+
+ LightGrey
+
+ 1pt
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!FormaDePagoP.Value, "Pago")
+
+
+
+
+
+
+ Textbox48
+ 0.00001cm
+ 8.38289cm
+ 0.52062cm
+ 5.3025cm
+ 3
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Moneda:
+
+
+
+
+
+
+ Textbox49
+ 13.68572cm
+ 0.52062cm
+ 2.54853cm
+ 4
+
+
+
+ LightGrey
+
+ 1pt
+
+
+ LightGrey
+
+ 1pt
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =IIF(First(Fields!TipoCambioP.Value, "Pago") Is Nothing,
+First(Fields!MonedaP.Value, "Pago"),
+First(Fields!MonedaP.Value, "Pago") + " - " + First(Fields!TipoCambioP.Value, "Pago"))
+
+
+
+
+
+
+ Textbox50
+ 0.00001cm
+ 16.23425cm
+ 0.52062cm
+ 3.35575cm
+ 5
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Monto:
+
+
+
+
+
+
+ Textbox51
+ 0.52063cm
+ 0.00047cm
+ 0.52062cm
+ 2.54326cm
+ 6
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =CDbl(First(Fields!Monto.Value, "Pago"))
+
+
+
+
+
+
+ Textbox52
+ 0.52063cm
+ 2.54372cm
+ 0.52062cm
+ 3.06704cm
+ 7
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+ en-US
+
+
+
+ true
+ true
+
+
+
+
+ Num. Operacion:
+
+
+
+
+
+
+ Textbox53
+ 0.52063cm
+ 5.61076cm
+ 0.52062cm
+ 2.77213cm
+ 8
+
+
+
+ LightGrey
+
+ 1pt
+
+
+ LightGrey
+
+ 1pt
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!NumOperacion.Value, "Pago")
+
+
+
+
+
+
+ Textbox54
+ 0.52063cm
+ 8.38289cm
+ 0.52062cm
+ 5.3025cm
+ 9
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Rfc Emi. Cta Ord:
+
+
+
+
+
+
+ Textbox55
+ 0.52062cm
+ 13.68539cm
+ 0.52062cm
+ 2.54886cm
+ 10
+
+
+
+ LightGrey
+
+ 1pt
+
+
+ LightGrey
+
+ 1pt
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!RfcEmisorCtaOrd.Value, "Pago")
+
+
+
+
+
+
+ Textbox56
+ 0.52063cm
+ 16.23425cm
+ 0.52062cm
+ 3.35575cm
+ 11
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Banco Ord. Ext:
+
+
+
+
+
+
+ Textbox57
+ 1.04126cm
+ 0.52062cm
+ 2.54373cm
+ 12
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!NomBancoOrdExt.Value, "Pago")
+
+
+
+
+
+
+ Textbox58
+ 1.04126cm
+ 2.54373cm
+ 0.52062cm
+ 3.06703cm
+ 13
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Cta. Ordenante:
+
+
+
+
+
+
+ Textbox59
+ 1.04126cm
+ 5.61076cm
+ 0.52062cm
+ 2.77213cm
+ 14
+
+
+
+ LightGrey
+
+ 1pt
+
+
+ LightGrey
+
+ 1pt
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!CtaOrdenante.Value, "Pago")
+
+
+
+
+
+
+ Textbox60
+ 1.04126cm
+ 8.38289cm
+ 0.52062cm
+ 5.3025cm
+ 15
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Rfc Emi. Cta Ben:
+
+
+
+
+
+
+ Textbox61
+ 1.04125cm
+ 13.68539cm
+ 0.52062cm
+ 2.54886cm
+ 16
+
+
+
+ LightGrey
+
+ 1pt
+
+
+ LightGrey
+
+ 1pt
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!RfcEmisorCtaBen.Value, "Pago")
+
+
+
+
+
+
+ Textbox65
+ 1.04126cm
+ 16.23425cm
+ 0.52062cm
+ 3.35575cm
+ 17
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Cta. Beneficiario:
+
+
+
+
+
+
+ Textbox66
+ 1.56189cm
+ 0.00047cm
+ 0.52062cm
+ 2.54326cm
+ 18
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!CtaBeneficiario.Value, "Pago")
+
+
+
+
+
+
+ Textbox67
+ 1.56189cm
+ 2.54373cm
+ 0.52062cm
+ 3.06703cm
+ 19
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Tipo Cad. Pago:
+
+
+
+
+
+
+ Textbox68
+ 1.56189cm
+ 5.61076cm
+ 0.52062cm
+ 2.77213cm
+ 20
+
+
+
+ LightGrey
+
+ 1pt
+
+
+ LightGrey
+
+ 1pt
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =IIF(First(Fields!TipoCadPago.Value, "Pago") is Nothing,
+"",
+"01 - SPEI")
+
+
+
+
+
+
+ Textbox69
+ 1.56189cm
+ 8.38289cm
+ 0.52062cm
+ 5.3025cm
+ 21
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Cert. Pago:
+
+
+
+
+
+
+ Textbox76
+ 1.56188cm
+ 13.68539cm
+ 0.52062cm
+ 2.54886cm
+ 22
+
+
+
+ LightGrey
+
+ 1pt
+
+
+ LightGrey
+
+ 1pt
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!CertPago.Value, "Pago")
+
+
+
+
+
+
+ Textbox78
+ 1.56189cm
+ 16.23425cm
+ 0.52062cm
+ 3.35575cm
+ 23
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Cad. Pago:
+
+
+
+
+
+
+ Textbox79
+ 2.11779cm
+ 0.00086cm
+ 0.6441cm
+ 2.54326cm
+ 24
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!CadPago.Value, "Pago")
+
+
+
+
+
+
+ Textbox80
+ 2.11779cm
+ 2.54411cm
+ 0.6441cm
+ 17.04626cm
+ 25
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Sello Pago:
+
+
+
+
+
+
+ Textbox81
+ 2.76189cm
+ 1.0723cm
+ 2.54327cm
+ 26
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!SelloPago.Value, "Pago")
+
+
+
+
+
+
+ Textbox82
+ 2.76189cm
+ 2.54327cm
+ 1.0723cm
+ 17.04627cm
+ 27
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ 3.83418cm
+ 2.54327cm
+ -3.83417cm
+ 0cm
+ 28
+
+
+
+
+
+ true
+ 1.73173cm
+ 3.86946cm
+ 19.59037cm
+ 5
+
+
+
+
+
+ 3.81424cm
+ 2.54411cm
+ 0cm
+ 17.04626cm
+ 6
+
+
+
+
+
+
+
+
+ 5.83898cm
+
+
+ 1.25217cm
+
+
+ 2.39283cm
+
+
+ 1.46313cm
+
+
+ 1.41102cm
+
+
+ 1.07186cm
+
+
+ 2.07761cm
+
+
+ 2.10269cm
+
+
+ 1.97924cm
+
+
+
+
+ 0.6cm
+
+
+
+
+ true
+ true
+
+
+
+
+ UUID
+
+
+
+
+
+
+ Textbox83
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Serie
+
+
+
+
+
+
+ Textbox85
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Folio
+
+
+
+
+
+
+ Textbox87
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Moneda
+
+
+
+
+
+
+ Textbox91
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Método
+
+
+
+
+
+
+ Textbox93
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Parc.
+
+
+
+
+
+
+ Textbox95
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Saldo Ant.
+
+
+
+
+
+
+ Textbox97
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Pagado
+
+
+
+
+
+
+ Textbox99
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Saldo
+
+
+
+
+
+
+ Textbox101
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ 0.6cm
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!IdDocumento.Value
+
+
+
+
+
+
+ IdDocumento
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Serie.Value
+
+
+
+
+
+
+ Serie
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Folio.Value
+
+
+
+
+
+
+ Folio
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!MonedaDR.Value
+
+
+
+
+
+
+ MonedaDR
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!MetodoDePagoDR.Value
+
+
+
+
+
+
+ MetodoDePagoDR
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!NumParcialidad.Value
+
+
+
+
+
+
+ NumParcialidad
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =CDbl(Fields!ImpSaldoAnt.Value)
+
+
+
+
+
+
+ ImpSaldoAnt
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+ en-US
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =CDbl(Fields!ImpPagado.Value)
+
+
+
+
+
+
+ ImpPagado
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+ en-US
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =CDbl(Fields!ImpSaldoInsoluto.Value)
+
+
+
+
+
+
+ ImpSaldoInsoluto
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+ en-US
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ After
+
+
+
+
+
+
+ DoctoRelacionado
+ 5.88729cm
+ 1.2cm
+ 19.58953cm
+ 7
+
+
+
+
+
+ 7.93837cm
+
+
+ 19.59037cm
+
+
+ 6.48735cm
+ true
+ true
+
+
+ Database
+ =First(Fields!Logotipo.Value, "DatosAdicionales")
+ image/x-png
+ FitProportional
+ 0.18761in
+ 0.00012in
+ 3.32584cm
+ 4.76729cm
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Folio Fiscal:
+
+
+
+
+
+
+ Textbox35
+ 0.07055cm
+ 0.00002cm
+ 0.44125cm
+ 5.15982cm
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!UUID.Value, "TimbreFiscalDigital")
+
+
+
+
+
+
+ Textbox35
+ 0.5118cm
+ 0.00002cm
+ 0.44125cm
+ 5.15982cm
+ 1
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ No. de serie del CFD:
+
+
+
+
+
+
+ Textbox35
+ 0.95305cm
+ 0.00002cm
+ 0.44125cm
+ 5.15982cm
+ 2
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!NoCertificado.Value, "Comprobante")
+
+
+
+
+
+
+ Textbox35
+ 1.3943cm
+ 0.00002cm
+ 0.44125cm
+ 5.15982cm
+ 3
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Fecha y hora de emisión
+
+
+
+
+
+
+ Textbox35
+ 1.82571cm
+ 0.44125cm
+ 5.15982cm
+ 4
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!Fecha.Value, "Comprobante")
+
+
+
+
+
+
+ Textbox35
+ 2.2768cm
+ 0.44125cm
+ 5.15982cm
+ 5
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!TipoDeComprobante.Value, "Comprobante")
+
+
+
+
+
+
+ Textbox17
+ 3.1593cm
+ 0.44243cm
+ 5.15982cm
+ 6
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Efecto del comprobante
+
+
+
+
+
+
+ Textbox35
+ 2.71805cm
+ 0.44125cm
+ 5.15982cm
+ 7
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ 14.43035cm
+ 3.60173cm
+ 5.15991cm
+ 1
+
+
+
+ LightGrey
+
+
+ LightGrey
+
+
+ LightGrey
+
+
+ LightGrey
+
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!Nombre.Value, "Emisor")
+
+
+
+
+
+
+ Textbox11
+ 4.7676cm
+ 1.61405cm
+ 9.66283cm
+ 2
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!Rfc.Value, "Emisor")
+
+
+
+
+
+
+ Textbox15
+ 1.62389cm
+ 4.7676cm
+ 0.54708cm
+ 9.66283cm
+ 3
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!RegimenFiscal.Value, "Emisor")
+
+
+
+
+
+
+ Textbox16
+ 3.2553cm
+ 4.76759cm
+ 0.54708cm
+ 9.66281cm
+ 4
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Régimen fiscal:
+
+
+
+
+
+
+ Textbox19
+ 2.70821cm
+ 4.76759cm
+ 0.54708cm
+ 9.66281cm
+ 5
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ ="Lugar de expedición: " + First(Fields!LugarExpedicion.Value, "Comprobante")
+
+
+
+
+
+
+ Textbox22
+ 2.17097cm
+ 4.76762cm
+ 0.53724cm
+ 9.66281cm
+ 6
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Serie/Folio:
+
+
+
+
+
+
+ Textbox31
+ 0.00031cm
+ 0.47652cm
+ 1.90028cm
+ 7
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!Serie.Value, "Comprobante") + " - " + First(Fields!Folio.Value, "Comprobante")
+
+
+
+
+
+
+ Textbox32
+ 1.90059cm
+ 0.47652cm
+ 2.86701cm
+ 8
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+ true
+ true
+
+
+
+
+ RFC:
+
+
+
+
+
+
+ Textbox42
+ 0.02426cm
+ 0.00031cm
+ 0.56193cm
+ 2.49969cm
+
+
+
+
+
+
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Razón social:
+
+
+
+
+
+
+ Textbox42
+ 0.02426cm
+ 2.5cm
+ 0.56193cm
+ 11.93043cm
+ 1
+
+
+
+
+
+
+
+
+
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!Nombre.Value, "Receptor")
+
+
+
+
+
+
+ Textbox43
+ 0.58619cm
+ 2.5cm
+ 0.56193cm
+ 11.9301cm
+ 2
+
+
+
+ LightGrey
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Uso de CFDI:
+
+
+
+
+
+
+ Textbox42
+ 0.02426cm
+ 14.4301cm
+ 0.54812cm
+ 5.1599cm
+ 3
+
+
+
+
+
+
+
+
+
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!UsoCFDI.Value, "Receptor")
+
+
+
+
+
+
+ Textbox43
+ 0.60001cm
+ 14.4301cm
+ 0.54811cm
+ 5.1599cm
+ 4
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!Rfc.Value, "Receptor")
+
+
+
+
+
+
+ Textbox43
+ 0.58619cm
+ 0.00035cm
+ 0.56193cm
+ 2.49965cm
+ 5
+
+
+
+ LightGrey
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =IIF(First(Fields!DireccionReceptor.Value, "DatosAdicionales") = "", First(Fields!DomicilioFiscalReceptor.Value, "Receptor"), First(Fields!DireccionReceptor.Value, "DatosAdicionales"))
+
+
+
+
+
+
+ Textbox43
+ 1.71005cm
+ 0.00035cm
+ 0.56193cm
+ 9.99712cm
+ 6
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Domicilio fiscal:
+
+
+
+
+
+
+ Textbox43
+ 1.14812cm
+ 0.56193cm
+ 9.99747cm
+ 7
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Régimen fiscal:
+
+
+
+
+
+
+ Textbox43
+ 1.14812cm
+ 9.99747cm
+ 0.56193cm
+ 9.59253cm
+ 8
+
+
+ WhiteSmoke
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!RegimenFiscalReceptor.Value, "Receptor")
+
+
+
+
+
+
+ Textbox43
+ 1.71005cm
+ 9.99747cm
+ 0.56193cm
+ 9.59253cm
+ 9
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ 4.21537cm
+ 0.00007cm
+ 2.27198cm
+ 19.59023cm
+ 9
+
+
+
+
+
+
+
+
+
+
+ 5.10291cm
+ true
+ true
+
+
+ Database
+ =First(Fields!QrCode.Value, "DatosAdicionales")
+ image/jpeg
+ FitProportional
+ 0.00086cm
+ 0.00012in
+ 1.5in
+ 1.5in
+ QrCode
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Este documento es una representación impresa de un CFDI
+
+
+
+
+
+
+ Textbox23
+ 1.56978in
+ 0.25in
+ 7.7126in
+ 1
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Página
+
+
+
+ =Globals!PageNumber
+
+
+
+ de
+
+
+
+ =Globals!TotalPages
+
+
+
+
+
+
+ Textbox24
+ 1.56978in
+ 5.08934in
+ 0.25in
+ 2.62326in
+ 2
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Cadena Original del complemento de certificación digital del SAT:
+
+
+
+
+
+
+ Textbox25
+ 0.875in
+ 1.50012in
+ 0.15625in
+ 6.21248in
+ 3
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ ="||" + First(Fields!Version.Value, "TimbreFiscalDigital") + "|" +
+First(Fields!UUID.Value, "TimbreFiscalDigital") + "|" +
+First(Fields!FechaTimbrado.Value, "TimbreFiscalDigital") + "|" +
+First(Fields!RfcProvCertif.Value, "TimbreFiscalDigital") + "|" +
+First(Fields!SelloCFD.Value, "TimbreFiscalDigital") + "|" +
+First(Fields!NoCertificadoSAT.Value, "TimbreFiscalDigital")
+
+
+
+
+
+
+ Textbox1
+ 2.61938cm
+ 3.8103cm
+ 0.63528cm
+ 15.78cm
+ 4
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ RFC del prov. de certificación:
+
+
+
+
+
+
+ Textbox25
+ 1.28136in
+ 1.50012in
+ 0.19792in
+ 1.29167in
+ 5
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!RfcProvCertif.Value, "TimbreFiscalDigital")
+
+
+
+
+
+
+ Textbox5
+ 3.25465cm
+ 7.09115cm
+ 0.50272cm
+ 1.64452cm
+ 6
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Fecha y hora de certificación:
+
+
+
+
+
+
+ Textbox25
+ 1.28137in
+ 3.43924in
+ 0.19792in
+ 1.26682in
+ 7
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!FechaTimbrado.Value, "TimbreFiscalDigital")
+
+
+
+
+
+
+ Textbox5
+ 3.25465cm
+ 11.95338cm
+ 0.50272cm
+ 2.2301cm
+ 8
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ No. de certificado SAT:
+
+
+
+
+
+
+ Textbox25
+ 1.28137in
+ 5.58405in
+ 0.19792in
+ 0.98794in
+ 9
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!NoCertificadoSAT.Value, "TimbreFiscalDigital")
+
+
+
+
+
+
+ Textbox5
+ 3.25466cm
+ 16.69286cm
+ 0.50272cm
+ 2.89742cm
+ 10
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!SelloCFD.Value, "TimbreFiscalDigital")
+
+
+
+
+
+
+ Textbox1
+ 0.39688cm
+ 3.81028cm
+ 0.70583cm
+ 15.78cm
+ 11
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Sello digital del CFDI:
+
+
+
+
+
+
+ Textbox25
+ 0cm
+ 1.5001in
+ 0.15625in
+ 6.2125in
+ 12
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ Sello digital del SAT:
+
+
+
+
+
+
+ Textbox25
+ 0.43414in
+ 1.5001in
+ 0.15625in
+ 6.2125in
+ 13
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+ true
+ true
+
+
+
+
+ =First(Fields!SelloSAT.Value, "TimbreFiscalDigital")
+
+
+
+
+
+
+ Textbox1
+ 1.4996cm
+ 3.81025cm
+ 0.70583cm
+ 15.78cm
+ 14
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ 27.94cm
+ 21.59cm
+ 1cm
+ 1cm
+ 1cm
+ 1cm
+ 1.27cm
+
+
+
+
+ Cm
+ 01f5892c-0046-409e-9fb9-7645ea4fa54f
+
\ No newline at end of file
diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb
index c30cfc4bb..2c538f4b3 100644
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -4490,7 +4490,7 @@ Partial Class Inventarios_EntradasSalidas
For Each Dr As DataRow In DtMovimientosSalidaInvFisico.Rows
If ObjInventario.GetExistenciasPS(Dr("CvePS").ToString.ToEntero, Dr("CveUM").ToString.ToEntero, UsuarioActual.CveEmpresa, DdlAlmacenInventarioFisico.SelectedValue.ToEntero, PendientePorSurtir:=1) >= Dr("Cantidad").ToString.ToDouble Then
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoSalida, Dr("Cantidad").ToString.ToDouble, Dr("CveUM").ToString.ToEntero, Dr("CvePS").ToString.ToEntero,
- Dr("PU").ToString.ToDecimal, -1, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString,
+ Dr("PU").ToString.ToDecimal.RoundSQL(6), -1, CveSeccionAlmacen:=Dr("CveSeccionAlmacen").ToString.ToEntero, Serie:=Dr("Serie").ToString,
Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate) Then
Mensaje = "Ocurrió un error al guardar los movimientos de salida"
ErrorMovInv = True
@@ -4511,10 +4511,10 @@ Partial Class Inventarios_EntradasSalidas
If Not ErrorMovInv AndAlso CveMovimientoSalida > 0 Then
If ObjInventario.GetMovimientosDetalle(CveMovimientoSalida, UsuarioActual.CveEmpresa) Then
- Dim ProTotalSalida As Decimal = ObjInventario.DtResultados.SUMD("Total", "")
+ Dim ProTotalSalida As Decimal = ObjInventario.DtResultados.SUMD("Total", "").RoundSQL(2)
Dim ProCantidadEntrada As Decimal = DtMovimientosEntradaInvFisico.SUMD("Cantidad", "")
- ProPU = (ProTotalSalida / ProCantidadEntrada).RoundSQL(6)
+ ProPU = (ProTotalSalida / ProCantidadEntrada).RoundSQL(10)
If Not ProPU > 0 Then
ErrorMovInv = True
@@ -4546,7 +4546,7 @@ Partial Class Inventarios_EntradasSalidas
'Obtiene valor entrada
If Not ErrorMovInv AndAlso CveMovimientoEntrada > 0 Then
If ObjInventario.GetMovimientosDetalle(CveMovimientoEntrada, UsuarioActual.CveEmpresa) Then
- Dim tValorInventario As Decimal = ObjInventario.DtResultados.SUMD("Total", "").RoundSQL()
+ Dim tValorInventario As Decimal = ObjInventario.DtResultados.SUMD("Total", "").RoundSQL(2)
ValorEntrada = tValorInventario
Dim drA2 As DataRow = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimero(String.Format("CveAlmacen = {0}", DdlAlmacenInventarioFisico.SelectedValue))
@@ -4563,7 +4563,7 @@ Partial Class Inventarios_EntradasSalidas
'Obtiene valor salida
If Not ErrorMovInv AndAlso CveMovimientoSalida > 0 Then
If ObjInventario.GetMovimientosDetalle(CveMovimientoSalida, UsuarioActual.CveEmpresa) Then
- Dim tValorInventario As Decimal = ObjInventario.DtResultados.SUMD("Total", "").RoundSQL()
+ Dim tValorInventario As Decimal = ObjInventario.DtResultados.SUMD("Total", "").RoundSQL(2)
ValorSalida = tValorInventario
Dim drA2 As DataRow = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimero(String.Format("CveAlmacen = {0}", DdlAlmacenInventarioFisico.SelectedValue))
If drA2 IsNot Nothing Then