From f9aa4b899f409acd43f701bdd21e4fcaadbd04ca Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Mon, 9 Sep 2019 16:20:54 -0700 Subject: [PATCH 1/7] Refacturacion sin aceptacion --- App_Code/ClsVentas.vb | 3 +- App_Code/Modelos.vb | 2 +- Global.asax | 210 ++++++++++---------- Ventas/RepCancelacionesPorRespuesta.aspx.cs | 2 +- Ventas/Ventas.aspx.vb | 2 +- 5 files changed, 110 insertions(+), 109 deletions(-) diff --git a/App_Code/ClsVentas.vb b/App_Code/ClsVentas.vb index d405f8630..a5f4d0b01 100644 --- a/App_Code/ClsVentas.vb +++ b/App_Code/ClsVentas.vb @@ -667,7 +667,7 @@ Public Class ClsVentas Return Retorno End Function - Public Function UpdateCancelaVenta(CveVenta As Integer, FechaCancelacion As DateTime, SelloCancelacionSAT As String, CveEmpresa As Integer, Optional CvePAC As Integer = -1) As Boolean + Public Function UpdateCancelaVenta(CveVenta As Integer, FechaCancelacion As DateTime, SelloCancelacionSAT As String, CveEmpresa As Integer, Optional CvePAC As Integer = -1, Optional CveEstatusRefacturacion As Integer = 0) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Vta_VentasCancelacion") @@ -678,6 +678,7 @@ Public Class ClsVentas .Add("@SelloDigitalSAT", SqlDbType.VarChar).Value = SelloCancelacionSAT .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@CvePAC", SqlDbType.SmallInt).Value = CvePAC + .Add("@CveEstatusRefacturacion", SqlDbType.TinyInt).Value = CveEstatusRefacturacion End With Try diff --git a/App_Code/Modelos.vb b/App_Code/Modelos.vb index c08365267..56b348dd8 100644 --- a/App_Code/Modelos.vb +++ b/App_Code/Modelos.vb @@ -4297,7 +4297,7 @@ Namespace Modelos End Select If CveEstatus.Contiene(4, 5) Then - If Not ObjVentas.UpdateCancelaVenta(CveVenta, CancelacionFecha, CancelacionAcuse, UsuarioActual.CveEmpresa, CvePACCancelacion) Then + If Not ObjVentas.UpdateCancelaVenta(CveVenta, CancelacionFecha, CancelacionAcuse, UsuarioActual.CveEmpresa, CvePACCancelacion, CveEstatusRefacturacion) Then ErrorCancelar = True MensajeError = "Ocurrió un error al guardar el estatus de cancelación." End If diff --git a/Global.asax b/Global.asax index dcb70128c..ac7f3e872 100644 --- a/Global.asax +++ b/Global.asax @@ -601,112 +601,112 @@ End If End If - ObjGPS.Dispose() - - If EsProduccion = "1" Then - RegisterNotification() - End If - '----------------- - AspMap.License.SetLicenseKey("ccfecfcegknepnhmjighpjjpmpmbajfejhnladegmeanci") - - - GlobalConfiguration.Configure(AddressOf WebApiConfig.Register) - GlobalConfiguration.Configuration.EnsureInitialized() - End Sub - - Sub Application_End(sender As Object, e As EventArgs) - If EsProduccion = "1" Then - SqlDependency.Stop(ConfigurationManager.ConnectionStrings("Conexion").ConnectionString) - End If - ' Code that runs on application shutdown - End Sub - - Sub Application_Error(sender As Object, e As EventArgs) - ' Code that runs when an unhandled error occurs - Dim CveUsuario As String = "" - Dim Nombre As String = "" - Try - Dim user As Usuario = ADSSessionConfig.sessionUser - If Not IsNothing(user) Then - CveUsuario = user.CveUsuario.ToString() - Nombre = user.Nombre - End If - Catch ex As Exception - Usuario.CerrarSession() - End Try - Dim InfoAdicional As String = vbCrLf & "CveUsuario: " & CveUsuario & "; Nombre: " & Nombre & vbCrLf & "Ruta: " & Context.Request.RawUrl & " " - OnError("Ocurrió un error en la página.", Context.Error, InfoAdicional) - End Sub - - Sub Session_Start(sender As Object, e As EventArgs) - - ' Code that runs when a new session is started - 'Dim sessionData As Dictionary(Of String, HttpSessionState) = DirectCast(Application("s"), Dictionary(Of String, HttpSessionState)) - - 'If sessionData.Keys.Contains(HttpContext.Current.Session.SessionID) Then - ' sessionData.Remove(HttpContext.Current.Session.SessionID) - ' sessionData.Add(HttpContext.Current.Session.SessionID, HttpContext.Current.Session) - 'Else - ' sessionData.Add(HttpContext.Current.Session.SessionID, HttpContext.Current.Session) - 'End If - 'Application("s") = sessionData - End Sub - - Sub Session_End(sender As Object, e As EventArgs) - Dim objsession As Object = ADSSessionConfig.SessionManager(OpcionSession.removerSession, Nothing, -1, Session.SessionID) - If Not IsNothing(objsession) Then - 'MyHub.RemoveConexiones(DirectCast(objsession, ADSSessionObj).CveUsuario) - End If - 'Code that runs when a session ends. - ' Note: The Session_End event Is raised only when the sessionstate mode - ' Is set to InProc in the Web.config file. If session mode Is set to StateServer - '' or SQLServer, the event is not raised. - 'Dim sessionData As Dictionary(Of String, HttpSessionState) = DirectCast(Application("s"), Dictionary(Of String, HttpSessionState)) - 'sessionData.Remove(HttpContext.Current.Session.SessionID) - 'Application("s") = sessionData - End Sub - + ObjGPS.Dispose() + + 'If EsProduccion = "1" Then + ' RegisterNotification() + 'End If + '----------------- + AspMap.License.SetLicenseKey("ccfecfcegknepnhmjighpjjpmpmbajfejhnladegmeanci") + + + GlobalConfiguration.Configure(AddressOf WebApiConfig.Register) + GlobalConfiguration.Configuration.EnsureInitialized() + End Sub + + Sub Application_End(sender As Object, e As EventArgs) + If EsProduccion = "1" Then + SqlDependency.Stop(ConfigurationManager.ConnectionStrings("Conexion").ConnectionString) + End If + ' Code that runs on application shutdown + End Sub + + Sub Application_Error(sender As Object, e As EventArgs) + ' Code that runs when an unhandled error occurs + Dim CveUsuario As String = "" + Dim Nombre As String = "" + Try + Dim user As Usuario = ADSSessionConfig.sessionUser + If Not IsNothing(user) Then + CveUsuario = user.CveUsuario.ToString() + Nombre = user.Nombre + End If + Catch ex As Exception + Usuario.CerrarSession() + End Try + Dim InfoAdicional As String = vbCrLf & "CveUsuario: " & CveUsuario & "; Nombre: " & Nombre & vbCrLf & "Ruta: " & Context.Request.RawUrl & " " + OnError("Ocurrió un error en la página.", Context.Error, InfoAdicional) + End Sub + + Sub Session_Start(sender As Object, e As EventArgs) + + ' Code that runs when a new session is started + 'Dim sessionData As Dictionary(Of String, HttpSessionState) = DirectCast(Application("s"), Dictionary(Of String, HttpSessionState)) + + 'If sessionData.Keys.Contains(HttpContext.Current.Session.SessionID) Then + ' sessionData.Remove(HttpContext.Current.Session.SessionID) + ' sessionData.Add(HttpContext.Current.Session.SessionID, HttpContext.Current.Session) + 'Else + ' sessionData.Add(HttpContext.Current.Session.SessionID, HttpContext.Current.Session) + 'End If + 'Application("s") = sessionData + End Sub + + Sub Session_End(sender As Object, e As EventArgs) + Dim objsession As Object = ADSSessionConfig.SessionManager(OpcionSession.removerSession, Nothing, -1, Session.SessionID) + If Not IsNothing(objsession) Then + 'MyHub.RemoveConexiones(DirectCast(objsession, ADSSessionObj).CveUsuario) + End If + 'Code that runs when a session ends. + ' Note: The Session_End event Is raised only when the sessionstate mode + ' Is set to InProc in the Web.config file. If session mode Is set to StateServer + '' or SQLServer, the event is not raised. + 'Dim sessionData As Dictionary(Of String, HttpSessionState) = DirectCast(Application("s"), Dictionary(Of String, HttpSessionState)) + 'sessionData.Remove(HttpContext.Current.Session.SessionID) + 'Application("s") = sessionData + End Sub + #Region "S Q L D E P E N D E N C Y" - - Public Sub RegisterNotification() - Try - 'Get the connection string from the Web.Config file. Make sure that the key exists and it is the connection string for the Notification Database and the NotificationList Table that we created - Dim connectionString As String = ConfigurationManager.ConnectionStrings("Conexion").ConnectionString - 'We have selected the entire table as the command, so SQL Server executes this script and sees if there is a change in the result, raise the event - Dim commandText As String = "SELECT [FechaNotificacion] FROM dbo.Sis_NotificacionesActualizaciones" - 'Start the SQL Dependency - SqlDependency.Start(connectionString) - Using connection As New SqlConnection(connectionString) - Using command As New SqlCommand(commandText, connection) - connection.Open() - Dim sqlDependency = New SqlDependency(command) - AddHandler sqlDependency.OnChange, AddressOf sqlDependency_OnChange - ' NOTE: You have to execute the command, or the notification will never fire. - Using reader As SqlDataReader = command.ExecuteReader() - End Using - End Using - End Using - Catch ex As Exception - - End Try - - End Sub - - Private Sub sqlDependency_OnChange(sender As Object, e As SqlNotificationEventArgs) - If e.Info = SqlNotificationInfo.Update Then - Try - Dim ObjNotificaciones As New ClsSisNotificaciones - ObjNotificaciones.ObtenerNotificaciones() - ObjNotificaciones.Dispose() - 'System.Threading.Thread.Sleep(5000) - RegisterNotification() - Catch ex As Exception - - End Try - End If - 'Call the RegisterNotification method again - End Sub - + + 'Public Sub RegisterNotification() + ' Try + ' 'Get the connection string from the Web.Config file. Make sure that the key exists and it is the connection string for the Notification Database and the NotificationList Table that we created + ' Dim connectionString As String = ConfigurationManager.ConnectionStrings("Conexion").ConnectionString + ' 'We have selected the entire table as the command, so SQL Server executes this script and sees if there is a change in the result, raise the event + ' Dim commandText As String = "SELECT [FechaNotificacion] FROM dbo.Sis_NotificacionesActualizaciones" + ' 'Start the SQL Dependency + ' SqlDependency.Start(connectionString) + ' Using connection As New SqlConnection(connectionString) + ' Using command As New SqlCommand(commandText, connection) + ' connection.Open() + ' Dim sqlDependency = New SqlDependency(command) + ' AddHandler sqlDependency.OnChange, AddressOf sqlDependency_OnChange + ' ' NOTE: You have to execute the command, or the notification will never fire. + ' Using reader As SqlDataReader = command.ExecuteReader() + ' End Using + ' End Using + ' End Using + ' Catch ex As Exception + + ' End Try + + 'End Sub + + 'Private Sub sqlDependency_OnChange(sender As Object, e As SqlNotificationEventArgs) + ' If e.Info = SqlNotificationInfo.Update Then + ' Try + ' Dim ObjNotificaciones As New ClsSisNotificaciones + ' ObjNotificaciones.ObtenerNotificaciones() + ' ObjNotificaciones.Dispose() + ' 'System.Threading.Thread.Sleep(5000) + ' RegisterNotification() + ' Catch ex As Exception + + ' End Try + ' End If + ' 'Call the RegisterNotification method again + 'End Sub + #End Region diff --git a/Ventas/RepCancelacionesPorRespuesta.aspx.cs b/Ventas/RepCancelacionesPorRespuesta.aspx.cs index 2aa5cc4d5..d0d5ad0fc 100644 --- a/Ventas/RepCancelacionesPorRespuesta.aspx.cs +++ b/Ventas/RepCancelacionesPorRespuesta.aspx.cs @@ -50,7 +50,7 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas } ObjVentas.Dispose(); GvDatos.DataSource = DtVentas.FiltraParametros("CveEstatusFactura = 20 AND CveEstatusRefacturacion = 0"); - var DtRefacturar = DtVentas.FiltraParametros("CveEstatusRefacturacion = 1"); + var DtRefacturar = DtVentas.FiltraParametros("CveEstatusRefacturacion IN (1,3)"); if (DtRefacturar.Rows.Count > 0) { DivRefacturar.Visible = true; diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index a57d52322..c41cc1cc7 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -15529,7 +15529,7 @@ Partial Class Ventas CancelarDocumento(True) End Sub Private Sub BtnRefacturacionConfirmarAceptacion_Click(sender As Object, e As System.EventArgs) Handles BtnRefacturacionConfirmarAceptacion.Click - Response.Redirect(String.Format("Ventas.aspx?CveDevolucion={0}&NuevaFactura=1", CveVenta)) + CancelarDocumento(True) End Sub Private Sub BtnContabilizar_Click(sender As Object, e As System.EventArgs) Handles BtnContabilizar.Click 'Dim ObjMov As New ClsContabilidad From 747a6d8f3451bf0e06c5c35671c8c4c38f4724ad Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Mon, 9 Sep 2019 18:39:15 -0700 Subject: [PATCH 2/7] Usuario registro en polizas emp 199 --- Empresas/119/Formatos/Polizas.rdlc | 4782 ++++++++++++++-------------- 1 file changed, 2391 insertions(+), 2391 deletions(-) diff --git a/Empresas/119/Formatos/Polizas.rdlc b/Empresas/119/Formatos/Polizas.rdlc index 253ea17b1..5df38836e 100644 --- a/Empresas/119/Formatos/Polizas.rdlc +++ b/Empresas/119/Formatos/Polizas.rdlc @@ -1,2392 +1,2392 @@ - - - 0 - - - - System.Data.DataSet - /* Local Connection */ - - 7ef92796-1755-4a85-b80c-8c8266256a94 - - - - - - DataSet1 - /* Local Query */ - - - - Id - System.Int16 - - - IdPoliza - System.Int16 - - - Fecha - System.DateTime - - - TipoPol - System.String - - - Nombre - System.String - - - Cuenta - System.String - - - CuentaFormato - System.String - - - Numero - System.String - - - Referencia - System.String - - - Concepto - System.String - - - ConceptoPoliza - System.String - - - Cargos - System.Double - - - Abonos - System.Double - - - Cargo - System.Double - - - Abono - System.Double - - - Folio - System.Double - - - Codigo - System.Double - - - SegNeg - System.String - - - TipoMovto - System.Double - - - UsuarioRegistro - System.String - - - - DataSet1 - C:\inetpub\wwwroot\ADSistemas\Ventas.root\Reportes\DataSet1.xsd - DataTable1 - - - - - - - - - - - - - - - 2.5cm - - - 2.5cm - - - 8.64979cm - - - 2.15333cm - - - 2.15604cm - - - 1.89146cm - - - - - 0.6cm - - - - - true - true - - - - - - - - - - - - Textbox1 - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - - - - - - - - Textbox2 - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - - - - - - - - Textbox3 - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - - - - - - - - Textbox5 - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - ="Folio: " & Fields!Folio.Value - - - - - - - Textbox7 - - - 2pt - 2pt - 2pt - 2pt - - - 2 - - - - - - - 0.6cm - - - - - true - true - - - - - Concepto: - - - - =Fields!ConceptoPoliza.Value - - - - - - - Textbox103 - - - 2pt - 2pt - 2pt - 2pt - - - 4 - - - - - - - - - true - true - - - - - Fecha: - - - - =Fields!Fecha.Value - - - - - - - Textbox107 - - - 2pt - 2pt - 2pt - 2pt - - - 2 - - - - - - - 0.6cm - - - - - true - true - - - - - Referencia - - - - - - - Textbox15 - - - #008204 - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Cuenta - - - - - - - Textbox16 - - - #008204 - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Concepto - - - - - - - Textbox28 - - - #008204 - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Sucursal - - - - - - - Textbox46 - - - #008204 - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Cargos - - - - - - - Textbox52 - - - #008204 - 2pt - 2pt - 2pt - 2pt - - - - - - - - true - true - - - - - Abonos - - - - - - - Textbox66 - - - #008204 - 2pt - 2pt - 2pt - 2pt - - - - - - - - 0.37063cm - - - - - true - - - - - =Fields!Referencia.Value - - - - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - - - - - =Fields!CuentaFormato.Value - - - - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - true - - - - - =Fields!Cuenta.Value - - - - - - - Cuenta1 - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - true - - - - - =Fields!SegNeg.Value - - - - - - - SegNeg - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - - - - - = Fields!Cargo.Value - - - - - - - - =iif(Fields!TipoMovto.Value ="0",False,True) - - - - 1pt - 1pt - 1pt - 1pt - es-MX - - - - - - - - true - - - - - = Fields!Abono.Value - - - - - - - Abono - - =iif(Fields!TipoMovto.Value ="1",False,True) - - - - 1pt - 1pt - 1pt - 1pt - es-MX - - - - - - - - 0.41479cm - - - - - true - true - - - - - - - - - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - true - - - - - - - - - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - true - - - - - =Fields!Concepto.Value - - - - - - - Concepto - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - true - - - - - - - - - - - - Textbox113 - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - true - - - - - - - - - - - - Textbox114 - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - true - - - - - - - - - - - - Textbox115 - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - 0.6cm - - - - - true - true - - - - - =Code.IsNewPage(Fields!IdPoliza.Value,nothing,nothing) - - - - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - true - - - - - - - - - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - true - - - - - - - - - - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - true - - - - - Totales: - - - - - - - Textbox11 - - - - Black - - 1pt - - 1pt - 1pt - 1pt - 1pt - - - - - - - - true - true - - - - - =Sum(Fields!Cargo.Value) - - - - - - - Textbox12 - - - - - - 1pt - 1pt - 1pt - 1pt - en-US - - - - - - - - true - true - - - - - =Sum(Fields!Abono.Value) - - - - - - - Abono - - - - - - 1pt - 1pt - 1pt - 1pt - en-US - - - - - - - - - - - - - - - - - - - - - - - - =Fields!IdPoliza.Value - - - End - - - - =Fields!UsuarioRegistro.Value - - - - - - =Fields!Folio.Value - - - - - After - - - After - - - After - - - - - - - - - - Before - - - - - - DataSet1 - - End - - 0.05076cm - 3.18542cm - 19.85062cm - - - - - - true - true - - - - - - - - 2pt - 2pt - 2pt - 2pt - - - - 3.96847cm - - - - - - - - - Impreso de póliza del - - - - =Parameters!Finicio.Value - - - - al - - - - =Parameters!FFin.Value - - - - - - - - - =UCase(Parameters!TipoPoliza.Value) - - - - - - - Textbox4 - 2.10635in - 1.6616cm - 9.94376cm - - - 2pt - 2pt - - - - Embedded - jam3 - FitProportional - 2.14642cm - 4.13cm - 1 - - - - - - true - true - - - - - ="Página: " & Code.GetGroupPageNumber(ReportItems!NewPage.Value,Globals!PageNumber) - - - - - - - Textbox35 - 17.03312cm - 0.52564cm - 2.8175cm - 2 - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - - 1.99978cm - true - true - - - true - true - - - - - Usuario: - - - - - - - - - - - - - =Parameters!UsuarioRegistro.Value - - - - - - - Textbox31 - 1.09978cm - 0.9cm - 6cm - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Revisado Por: - - - - - - - - - - - Textbox31 - 1.09978cm - 7.295cm - 0.9cm - 6cm - 1 - - - 2pt - 2pt - 2pt - 2pt - - - - true - true - - - - - Autorizado Por: - - - - - - - - - - - Textbox31 - 1.09978cm - 14.14166cm - 0.9cm - 5.70896cm - 2 - - - 2pt - 2pt - 2pt - 2pt - - - - - - - - 27.94cm - 21.59cm - 0.5cm - 0.5cm - 0.5cm - 0.5cm - 0.03cm - + + + + + + Textbox1 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + + Textbox2 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + + Textbox3 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + + + + + + + + Textbox5 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + ="Folio: " & Fields!Folio.Value + + + + + + + Textbox7 + + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + 0.6cm + + + + + true + true + + + + + Concepto: + + + + =Fields!ConceptoPoliza.Value + + + + + + + Textbox103 + + + 2pt + 2pt + 2pt + 2pt + + + 4 + + + + + + + + + true + true + + + + + Fecha: + + + + =Fields!Fecha.Value + + + + + + + Textbox107 + + + 2pt + 2pt + 2pt + 2pt + + + 2 + + + + + + + 0.6cm + + + + + true + true + + + + + Referencia + + + + + + + Textbox15 + + + #008204 + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Cuenta + + + + + + + Textbox16 + + + #008204 + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Concepto + + + + + + + Textbox28 + + + #008204 + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Sucursal + + + + + + + Textbox46 + + + #008204 + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Cargos + + + + + + + Textbox52 + + + #008204 + 2pt + 2pt + 2pt + 2pt + + + + + + + + true + true + + + + + Abonos + + + + + + + Textbox66 + + + #008204 + 2pt + 2pt + 2pt + 2pt + + + + + + + + 0.37063cm + + + + + true + + + + + =Fields!Referencia.Value + + + + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + + + + + =Fields!CuentaFormato.Value + + + + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + true + + + + + =Fields!Cuenta.Value + + + + + + + Cuenta1 + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + true + + + + + =Fields!SegNeg.Value + + + + + + + SegNeg + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + + + + + = Fields!Cargo.Value + + + + + + + + =iif(Fields!TipoMovto.Value ="0",False,True) + + + + 1pt + 1pt + 1pt + 1pt + es-MX + + + + + + + + true + + + + + = Fields!Abono.Value + + + + + + + Abono + + =iif(Fields!TipoMovto.Value ="1",False,True) + + + + 1pt + 1pt + 1pt + 1pt + es-MX + + + + + + + + 0.41479cm + + + + + true + true + + + + + + + + + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + true + + + + + + + + + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + true + + + + + =Fields!Concepto.Value + + + + + + + Concepto + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + true + + + + + + + + + + + + Textbox113 + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + true + + + + + + + + + + + + Textbox114 + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + true + + + + + + + + + + + + Textbox115 + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + 0.6cm + + + + + true + true + + + + + =Code.IsNewPage(Fields!IdPoliza.Value,nothing,nothing) + + + + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + true + + + + + + + + + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + true + + + + + + + + + + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + true + + + + + Totales: + + + + + + + Textbox11 + + + + Black + + 1pt + + 1pt + 1pt + 1pt + 1pt + + + + + + + + true + true + + + + + =Sum(Fields!Cargo.Value) + + + + + + + Textbox12 + + + + + + 1pt + 1pt + 1pt + 1pt + en-US + + + + + + + + true + true + + + + + =Sum(Fields!Abono.Value) + + + + + + + Abono + + + + + + 1pt + 1pt + 1pt + 1pt + en-US + + + + + + + + + + + + + + + + + + + + + + + + =Fields!IdPoliza.Value + + + End + + + + =Fields!UsuarioRegistro.Value + + + + + + =Fields!Folio.Value + + + + + After + + + After + + + After + + + + + + + + + + Before + + + + + + DataSet1 + + End + + 0.05076cm + 3.18542cm + 19.85062cm + + + + + + true + true + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + 3.96847cm + + + + + + + + + Impreso de póliza del + + + + =Parameters!Finicio.Value + + + + al + + + + =Parameters!FFin.Value + + + + + + + + + =UCase(Parameters!TipoPoliza.Value) + + + + + + + Textbox4 + 2.10635in + 1.6616cm + 9.94376cm + + + 2pt + 2pt + + + + Embedded + jam3 + FitProportional + 2.14642cm + 4.13cm + 1 + + + + + + true + true + + + + + ="Página: " & Code.GetGroupPageNumber(ReportItems!NewPage.Value,Globals!PageNumber) + + + + + + + Textbox35 + 17.03312cm + 0.52564cm + 2.8175cm + 2 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + + 1.99978cm + true + true + + + true + true + + + + + Usuario: + + + + + + + + + + + + + =ReportItems!TxtUsuarioRegistro.Value + + + + + + + Textbox31 + 1.09978cm + 0.9cm + 6cm + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Revisado Por: + + + + + + + + + + + Textbox31 + 1.09978cm + 7.295cm + 0.9cm + 6cm + 1 + + + 2pt + 2pt + 2pt + 2pt + + + + true + true + + + + + Autorizado Por: + + + + + + + + + + + Textbox31 + 1.09978cm + 14.14166cm + 0.9cm + 5.70896cm + 2 + + + 2pt + 2pt + 2pt + 2pt + + + + + + + + 27.94cm + 21.59cm + 0.5cm + 0.5cm + 0.5cm + 0.5cm + 0.03cm +