AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge branch 'master' of http://192.168.10.111:8383/SIG

Browse Source
This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
2024-02-29 10:06:01 -07:00
parent ce0b57a1ab cec5f48473
commit 8e2e9b198b
147 changed files with 6927 additions and 3890 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
AF/AF.aspx.vb
View File

@@ -661,6 +661,7 @@ Partial Class AF_AF
End Sub End Sub
Private Sub CargaTipoActivoFijo() Private Sub CargaTipoActivoFijo()
DdlTipoActivoFijo.Items.Clear()
DdlTipoActivoFijo.DataSource = GlobalDTTipoActivoFijo(CveEmpresaActual).FiltraParametros("", "TipoActivoFijo") DdlTipoActivoFijo.DataSource = GlobalDTTipoActivoFijo(CveEmpresaActual).FiltraParametros("", "TipoActivoFijo")
DdlTipoActivoFijo.DataBind() DdlTipoActivoFijo.DataBind()
CargaSubTipoActivoFijo() CargaSubTipoActivoFijo()

4
AF/CatAF.aspx.vb
View File

@@ -124,8 +124,8 @@ Partial Class AF_CatAF
DdlTipoActivo.Items.Insert(0, New ListItem("Todos", "-1")) DdlTipoActivo.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub End Sub
Private Sub CargaResponsable() Private Sub CargaResponsable()
Dim DtPersonal = GlobalDTRHPersonal(UsuarioActual.CveEmpresa).FiltraParametros("", "NombreCompleto")
DdlResponsable.DataSource = GlobalDTRHPersonal(UsuarioActual.CveEmpresa).FiltraParametros("", "NombreCompleto") DdlResponsable.DataSource = DtPersonal
DdlResponsable.DataBind() DdlResponsable.DataBind()
End Sub End Sub
Protected Sub DdlTipoActivo_SelectedIndexChanged(sender As Object, e As EventArgs) Protected Sub DdlTipoActivo_SelectedIndexChanged(sender As Object, e As EventArgs)

6
AF/CatClasificacionesCaracteristicas.aspx
View File

@@ -90,7 +90,7 @@
</asp:UpdatePanel> </asp:UpdatePanel>
<asp:UpdatePanel ID="UpDatosCL" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpDatosCL" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvDatosCL" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristicaClasificacion" EmptyDataText="No se encontraron Clasificaciones" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;" GridLines="None"> <asp:GridView ID="GvDatosCL" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristicaClasificacion" EmptyDataText="No se encontraron Clasificaciones" CssClass="table table-striped table-advance table-hover mysmallbtn" Style="margin-top: -10px; text-align: center;" GridLines="None">
<Columns> <Columns>
<%--<asp:TemplateField> <%--<asp:TemplateField>
<ItemTemplate>&nbsp;<asp:Literal ID="LtlTiposActivosFijosCL" runat="server" Text='<%# Eval("TipoActivoFijo", "{0}")%>'></asp:Literal></ItemTemplate> <ItemTemplate>&nbsp;<asp:Literal ID="LtlTiposActivosFijosCL" runat="server" Text='<%# Eval("TipoActivoFijo", "{0}")%>'></asp:Literal></ItemTemplate>
@@ -300,7 +300,7 @@
</asp:UpdatePanel> </asp:UpdatePanel>
<asp:UpdatePanel ID="UpDatosCA" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpDatosCA" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvDatosCA" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristica" EmptyDataText="No se encontraron Características" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;" GridLines="None"> <asp:GridView ID="GvDatosCA" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristica" EmptyDataText="No se encontraron Características" CssClass="table table-striped table-advance table-hover mysmallbtn" Style="margin-top: -10px; text-align: center;" GridLines="None">
<Columns> <Columns>
<asp:TemplateField> <asp:TemplateField>
<ItemTemplate>&nbsp;<asp:Literal ID="LtlTiposActivosFijosCA" runat="server" Text='<%# Eval("TipoActivoFijo", "{0}")%>'></asp:Literal></ItemTemplate> <ItemTemplate>&nbsp;<asp:Literal ID="LtlTiposActivosFijosCA" runat="server" Text='<%# Eval("TipoActivoFijo", "{0}")%>'></asp:Literal></ItemTemplate>
@@ -537,7 +537,7 @@
</asp:UpdatePanel> </asp:UpdatePanel>
<asp:UpdatePanel ID="UpDatosOpciones" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpDatosOpciones" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvDatosOpciones" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristicaOpcion" EmptyDataText="No se encontraron Opciones" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;" GridLines="None"> <asp:GridView ID="GvDatosOpciones" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristicaOpcion" EmptyDataText="No se encontraron Opciones" CssClass="table table-striped table-advance table-hover mysmallbtn" GridLines="None">
<Columns> <Columns>
<asp:TemplateField> <asp:TemplateField>
<ItemTemplate>&nbsp;<asp:Literal ID="LtlTiposActivosFijosOpciones" runat="server" Text='<%# Eval("TipoActivoFijo", "{0}")%>'></asp:Literal></ItemTemplate> <ItemTemplate>&nbsp;<asp:Literal ID="LtlTiposActivosFijosOpciones" runat="server" Text='<%# Eval("TipoActivoFijo", "{0}")%>'></asp:Literal></ItemTemplate>

35
AF/CatClasificacionesCaracteristicas.aspx.vb
View File

@@ -52,7 +52,6 @@ Partial Class AF_CatClasificacionesCaracteristicas
'Carga Globals para DT 'Carga Globals para DT
CargaTiposActivosFijos() CargaTiposActivosFijos()
CargaSubTiposActivosFijos()
''CargaCaracteristicasClasificaciones() ''CargaCaracteristicasClasificaciones()
'CargaCaracteristicas() 'CargaCaracteristicas()
End If End If
@@ -66,17 +65,7 @@ Partial Class AF_CatClasificacionesCaracteristicas
DdlTiposActivosFijosOpciones.DataSource = GlobalDTTipoActivoFijo(UsuarioActual.CveEmpresa) DdlTiposActivosFijosOpciones.DataSource = GlobalDTTipoActivoFijo(UsuarioActual.CveEmpresa)
DdlTiposActivosFijosOpciones.DataBind() DdlTiposActivosFijosOpciones.DataBind()
End Sub End Sub
Private Sub CargaSubTiposActivosFijos()
Dim ObjAF As New ClsAF
If ObjAF.GetSubTiposActivosFijos(UsuarioActual.CveEmpresa) Then
GlobalDTSubTipoActivoFijo(UsuarioActual.CveEmpresa) = ObjAF.DtResultados
Else
Alert("Ocurrio un error al obtener los SubTipos de Activos Fijos", TipoMensaje.MsgError)
End If
ObjAF.Dispose()
End Sub
#Region "CLASIFICACIONES" #Region "CLASIFICACIONES"
Protected Sub LbAgregarCL_Click(sender As Object, e As System.EventArgs) Handles LbAgregarCL.Click Protected Sub LbAgregarCL_Click(sender As Object, e As System.EventArgs) Handles LbAgregarCL.Click
Dim ObjCaracteristicaClasificacion As New ClsAF Dim ObjCaracteristicaClasificacion As New ClsAF
@@ -85,8 +74,7 @@ Partial Class AF_CatClasificacionesCaracteristicas
TxtCaracteristicaClasificacionCL.Text = "" TxtCaracteristicaClasificacionCL.Text = ""
Alert("La Nueva Clasificación de Activo Fijo se guardó correctamente.", TipoMensaje.MsgInformacion) Alert("La Nueva Clasificación de Activo Fijo se guardó correctamente.", TipoMensaje.MsgInformacion)
UpTitulosCL.Update() UpTitulosCL.Update()
GlobalDTAFCaracteristicasClasificaciones(UsuarioActual.CveEmpresa) = Nothing
CargaSubTiposActivosFijos()
If ViewState("OrdenCL").ToString() <> String.Empty Then If ViewState("OrdenCL").ToString() <> String.Empty Then
CargaGrid(ViewState("OrdenCL").ToString(), 0) CargaGrid(ViewState("OrdenCL").ToString(), 0)
@@ -147,10 +135,7 @@ Partial Class AF_CatClasificacionesCaracteristicas
Dim ObjCaracteristicaClasificacion As New ClsAF Dim ObjCaracteristicaClasificacion As New ClsAF
If ObjCaracteristicaClasificacion.RemoveClasificacionesCaracteristicas(GvDatosCL.DataKeys(e.RowIndex).Value.ToString.ToEntero, UsuarioActual.CveEmpresa) Then If ObjCaracteristicaClasificacion.RemoveClasificacionesCaracteristicas(GvDatosCL.DataKeys(e.RowIndex).Value.ToString.ToEntero, UsuarioActual.CveEmpresa) Then
GvDatosCL.EditIndex = -1 GvDatosCL.EditIndex = -1
GlobalDTAFCaracteristicasClasificaciones(UsuarioActual.CveEmpresa) = Nothing
CargaSubTiposActivosFijos()
'CargaCaracteristicasClasificaciones()
Alert("La Clasificación se eliminó correctamente.", TipoMensaje.MsgInformacion) Alert("La Clasificación se eliminó correctamente.", TipoMensaje.MsgInformacion)
End If End If
@@ -183,9 +168,7 @@ Partial Class AF_CatClasificacionesCaracteristicas
If ObjCaracteristicaClasificacion.UpdateClasificacionesCaracteristicas(CaracteristicaClasificacion, Estatus, CveCaracteristicaClasificacion, UsuarioActual.CveEmpresa) Then If ObjCaracteristicaClasificacion.UpdateClasificacionesCaracteristicas(CaracteristicaClasificacion, Estatus, CveCaracteristicaClasificacion, UsuarioActual.CveEmpresa) Then
GvDatosCL.EditIndex = -1 GvDatosCL.EditIndex = -1
CargaSubTiposActivosFijos() GlobalDTAFCaracteristicasClasificaciones(UsuarioActual.CveEmpresa) = Nothing
'CargaCaracteristicasClasificaciones()
Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion) Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
End If End If
@@ -228,12 +211,10 @@ Partial Class AF_CatClasificacionesCaracteristicas
TxtLongitudCA.Text = "" TxtLongitudCA.Text = ""
Alert("La Nueva Característica de Activo Fijo se guardó correctamente.", TipoMensaje.MsgInformacion) Alert("La Nueva Característica de Activo Fijo se guardó correctamente.", TipoMensaje.MsgInformacion)
UpTitulosCA.Update() UpTitulosCA.Update()
ViewState("DTCatacteristica") = ObjCaracteristicas.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
CargaSubTiposActivosFijos() GlobalDTAFCaracteristicas(UsuarioActual.CveEmpresa) = Nothing
''CargaCaracteristicasClasificaciones()
'CargaCaracteristicas()
If ViewState("OrdenCA").ToString() <> String.Empty Then If ViewState("OrdenCA").ToString() <> String.Empty Then
CargaGrid(ViewState("OrdenCA").ToString(), 1) CargaGrid(ViewState("OrdenCA").ToString(), 1)
@@ -262,7 +243,7 @@ Partial Class AF_CatClasificacionesCaracteristicas
End Sub End Sub
Protected Sub DdlTiposActivosFijosCA_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlTiposActivosFijosCA.SelectedIndexChanged Protected Sub DdlTiposActivosFijosCA_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlTiposActivosFijosCA.SelectedIndexChanged
DdlSubTiposActivosFijosCA.Items.Clear() DdlSubTiposActivosFijosCA.Items.Clear()
DdlSubTiposActivosFijosCA.DataSource = GlobalDTSubTipoActivoFijo(UsuarioActual.CveEmpresa).FiltraParametros(String.Format("CveTipoActivoFijo = {0} AND CveEmpresa = {1}", DdlTiposActivosFijosCA.SelectedValue.ToEntero, UsuarioActual.CveEmpresa)) DdlSubTiposActivosFijosCA.DataSource = GlobalDTSubTipoActivoFijo(UsuarioActual.CveEmpresa, DdlTiposActivosFijosCA.SelectedValue.ToEntero)
DdlSubTiposActivosFijosCA.DataBind() DdlSubTiposActivosFijosCA.DataBind()
DdlSubTiposActivosFijosCA.Items.Insert(0, New ListItem("Todos", "-1")) DdlSubTiposActivosFijosCA.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub End Sub
@@ -368,8 +349,6 @@ Partial Class AF_CatClasificacionesCaracteristicas
GvDatosCA.EditIndex = -1 GvDatosCA.EditIndex = -1
GlobalDTAFCaracteristicas(UsuarioActual.CveEmpresa) = Nothing GlobalDTAFCaracteristicas(UsuarioActual.CveEmpresa) = Nothing
CargaSubTiposActivosFijos()
Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion) Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
End If End If
@@ -596,8 +575,6 @@ Partial Class AF_CatClasificacionesCaracteristicas
GvDatosOpciones.EditIndex = -1 GvDatosOpciones.EditIndex = -1
ViewState("DTCatacteristicaOpciones") = ObjCaracteristicas.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa) ViewState("DTCatacteristicaOpciones") = ObjCaracteristicas.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
CargaSubTiposActivosFijos()
Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion) Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
End If End If

2
AF/CatSubTipos.aspx
View File

@@ -74,7 +74,7 @@
</asp:UpdatePanel> </asp:UpdatePanel>
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveSubTipoActivoFijo" EmptyDataText="No se encontraron SubTipos" CssClass="table table-striped table-advance table-hover Widthall" GridLines="None"> <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CveSubTipoActivoFijo" EmptyDataText="No se encontraron SubTipos" CssClass="table table-striped table-advance table-hover Widthall mysmallbtn" GridLines="None">
<Columns> <Columns>
<asp:TemplateField> <asp:TemplateField>
<ItemStyle Width="206px" /> <ItemStyle Width="206px" />

6
AF/CatTiposServicios.aspx.cs
View File

@@ -72,7 +72,7 @@ public partial class AF_CatTiposServicios : ClsPaginas
GridViewRow GvRow = (GridViewRow)(((LinkButton)sender).NamingContainer); GridViewRow GvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
CveTipoServicio = GvRow.DataKey("CveTipoServicio").ToEntero(); CveTipoServicio = GvRow.DataKey("CveTipoServicio").ToEntero();
ClsAF ObjAF = new ClsAF(); ClsAF ObjAF = new ClsAF();
if (ObjAF.DeleteTiposServicios(CveTipoServicio)) if (ObjAF.DeleteTiposServicios(CveTipoServicio, UsuarioActual.CveEmpresa))
{ {
CargaDatos(); CargaDatos();
UpDatos.Update(); UpDatos.Update();
@@ -87,7 +87,7 @@ public partial class AF_CatTiposServicios : ClsPaginas
ClsAF ObjAF = new ClsAF(); ClsAF ObjAF = new ClsAF();
if (BtnAgregarTipoServicio.Text == "Agregar") if (BtnAgregarTipoServicio.Text == "Agregar")
{ {
if (ObjAF.AddTiposServicios(TxtNombre.Text,DdlTipoMantenimiento.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)) if (ObjAF.AddTiposServicios(TxtNombre.Text,DdlTipoMantenimiento.SelectedValue.ToEntero(), 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa))
{ {
CargaDatos(); CargaDatos();
UpDatos.Update(); UpDatos.Update();
@@ -97,7 +97,7 @@ public partial class AF_CatTiposServicios : ClsPaginas
} }
else else
{ {
if (ObjAF.UpdateTiposServicios(CveTipoServicio, TxtNombre.Text, DdlTipoMantenimiento.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)) if (ObjAF.UpdateTiposServicios(CveTipoServicio, TxtNombre.Text, DdlTipoMantenimiento.SelectedValue.ToEntero(), 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa))
{ {
CargaDatos(); CargaDatos();
UpDatos.Update(); UpDatos.Update();

4
AF/TipoOrdenTrabajo.aspx.vb
View File

@@ -603,7 +603,7 @@ Partial Class AF_TipoOrdenTrabajo
If CveTipoServicio = -1 Then If CveTipoServicio = -1 Then
If ObjAF.AddTiposServicios(TxtTipoServicio.Text.Trim, DdlTipoMantenimiento.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then If ObjAF.AddTiposServicios(TxtTipoServicio.Text.Trim, DdlTipoMantenimiento.SelectedValue.ToEntero, 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
CveTipoServicio = ObjAF.CveTipoServicio CveTipoServicio = ObjAF.CveTipoServicio
@@ -651,7 +651,7 @@ Partial Class AF_TipoOrdenTrabajo
Else Else
If Not ObjAF.UpdateTiposServicios(CveTipoServicio, TxtTipoServicio.Text.Trim, DdlTipoMantenimiento.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then If Not ObjAF.UpdateTiposServicios(CveTipoServicio, TxtTipoServicio.Text.Trim, DdlTipoMantenimiento.SelectedValue.ToEntero, 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
ErrorProceso = True ErrorProceso = True
End If End If

178
AF/ValesCombustible.aspx.vb
View File

@@ -143,33 +143,33 @@ Partial Class AF_ValesCombustible
#Region "DDL CHANGED & CHK CHANGED & TXT CHANGUED" #Region "DDL CHANGED & CHK CHANGED & TXT CHANGUED"
Private Sub DdlActivoFijo_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlActivoFijo.SelectedIndexChanged Private Sub DdlActivoFijo_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlActivoFijo.SelectedIndexChanged
Dim ObjValesCombustible As New ClsAF 'Dim ObjValesCombustible As New ClsAF
If ObjValesCombustible.GetValesCombustible(-1, -1, -1, -1, DdlActivoFijo.SelectedValue.ToEntero, -1, -1, -1, -1, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1) Then 'If ObjValesCombustible.GetValesCombustible(-1, -1, -1, -1, DdlActivoFijo.SelectedValue.ToEntero, -1, -1, -1, -1, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1) Then
Dim dtAF As DataTable = ObjValesCombustible.DtResultados.FiltraParametros("", Orderby:="CveVale DESC") ' Dim dtAF As DataTable = ObjValesCombustible.DtResultados.FiltraParametros("", Orderby:="CveVale DESC")
If dtAF.Rows.Count > 0 Then ' If dtAF.Rows.Count > 0 Then
Dim dr As DataRow = dtAF.Rows(0) ' Dim dr As DataRow = dtAF.Rows(0)
LblFecha.Text = dr("Fecha").ToString ' LblFecha.Text = dr("Fecha").ToString
LblLitrosAF.Text = dr("Litros").ToString ' LblLitrosAF.Text = dr("Litros").ToString
LblCombustible.Text = dr("Combustible").ToString ' LblCombustible.Text = dr("Combustible").ToString
LblOdometro.Text = dr("Odometro").ToString ' LblOdometro.Text = dr("Odometro").ToString
If dr("CvePersonal").ToString.ToEntero > 0 Then ' If dr("CvePersonal").ToString.ToEntero > 0 Then
LbPersonal.Text = String.Format("{0}, {1}", dr("NombreCompleto").ToString, dr("Recibe").ToString) ' LbPersonal.Text = String.Format("{0}, {1}", dr("NombreCompleto").ToString, dr("Recibe").ToString)
Else ' Else
LbPersonal.Text = dr("NombreCompleto").ToString ' LbPersonal.Text = dr("NombreCompleto").ToString
End If ' End If
Else ' Else
LblFecha.Text = "" ' LblFecha.Text = ""
LblLitrosAF.Text = "" ' LblLitrosAF.Text = ""
LblCombustible.Text = "" ' LblCombustible.Text = ""
LblOdometro.Text = "" ' LblOdometro.Text = ""
LbPersonal.Text = "" ' LbPersonal.Text = ""
UpConsumo.Update() ' UpConsumo.Update()
End If ' End If
End If 'End If
ObjValesCombustible.Dispose() 'ObjValesCombustible.Dispose()
End Sub End Sub
'Private Sub DdProveedorVinculacion_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdProveedorVinculacion.SelectedIndexChanged 'Private Sub DdProveedorVinculacion_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdProveedorVinculacion.SelectedIndexChanged
@@ -297,8 +297,8 @@ Partial Class AF_ValesCombustible
'Si TipoVale es 1 = Externo 'Si TipoVale es 1 = Externo
If ChkExterno.Checked = True Then If ChkExterno.Checked = True Then
CveVale = ObjVales.AddValesCombustible(FolioUsuario, 0, DdlProveedores.SelectedValue.ToEntero, DdlActivoFijo.SelectedValue.ToEntero, DdlRHPersonal.SelectedValue.ToEntero, TxtFechaVale.Text.ToDate, TxtNombreRecibe.Text, DdlSubProyecto.SelectedValue.ToEntero, TxtObservciones.Text, TxtOdometroActual.Text.ToEntero, DdlCombustible.SelectedValue.ToEntero, TxtLitros.Text.ToDouble, 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) 'CveVale = ObjVales.AddValesCombustible(FolioUsuario, 0, DdlProveedores.SelectedValue.ToEntero, DdlActivoFijo.SelectedValue.ToEntero, DdlRHPersonal.SelectedValue.ToEntero, TxtFechaVale.Text.ToDate, TxtNombreRecibe.Text, DdlSubProyecto.SelectedValue.ToEntero, TxtObservciones.Text, TxtOdometroActual.Text.ToEntero, DdlCombustible.SelectedValue.ToEntero, TxtLitros.Text.ToDouble, 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
Folio = ObjVales.FolioVale 'Folio = ObjVales.FolioVale
If CveVale < 0 Then If CveVale < 0 Then
@@ -307,8 +307,8 @@ Partial Class AF_ValesCombustible
ElseIf ChkInterno.Checked = True Then ElseIf ChkInterno.Checked = True Then
CveVale = ObjVales.AddValesCombustible(FolioUsuario, 0, DdlProveedores.SelectedValue.ToEntero, DdlActivoFijo.SelectedValue.ToEntero, DdlRHPersonal.SelectedValue.ToEntero, TxtFechaVale.Text.ToDate, TxtNombreRecibe.Text, DdlSubProyecto.SelectedValue.ToEntero, TxtObservciones.Text, TxtOdometroActual.Text.ToEntero, DdlCombustible.SelectedValue.ToEntero, TxtLitros.Text.ToDouble, 2, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) 'CveVale = ObjVales.AddValesCombustible(FolioUsuario, 0, DdlProveedores.SelectedValue.ToEntero, DdlActivoFijo.SelectedValue.ToEntero, DdlRHPersonal.SelectedValue.ToEntero, TxtFechaVale.Text.ToDate, TxtNombreRecibe.Text, DdlSubProyecto.SelectedValue.ToEntero, TxtObservciones.Text, TxtOdometroActual.Text.ToEntero, DdlCombustible.SelectedValue.ToEntero, TxtLitros.Text.ToDouble, 2, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
Folio = ObjVales.FolioVale 'Folio = ObjVales.FolioVale
'AGREGAMOS LA SALIDA 'AGREGAMOS LA SALIDA
@@ -339,37 +339,37 @@ Partial Class AF_ValesCombustible
'Si el odometro es mayor a la proxima recarga 'Si el odometro es mayor a la proxima recarga
Else Else
'Si TipoVale es 1 = Externo 'Si TipoVale es 1 = Externo
If ChkExterno.Checked = True Then 'If ChkExterno.Checked = True Then
CveVale = ObjVales.AddValesCombustible(FolioUsuario, 0, DdlProveedores.SelectedValue.ToEntero, DdlActivoFijo.SelectedValue.ToEntero, DdlRHPersonal.SelectedValue.ToEntero, TxtFechaVale.Text.ToDate, TxtNombreRecibe.Text, DdlSubProyecto.SelectedValue.ToEntero, TxtObservciones.Text, TxtOdometroActual.Text.ToEntero, DdlCombustible.SelectedValue.ToEntero, TxtLitros.Text.ToEntero, 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) ' CveVale = ObjVales.AddValesCombustible(FolioUsuario, 0, DdlProveedores.SelectedValue.ToEntero, DdlActivoFijo.SelectedValue.ToEntero, DdlRHPersonal.SelectedValue.ToEntero, TxtFechaVale.Text.ToDate, TxtNombreRecibe.Text, DdlSubProyecto.SelectedValue.ToEntero, TxtObservciones.Text, TxtOdometroActual.Text.ToEntero, DdlCombustible.SelectedValue.ToEntero, TxtLitros.Text.ToEntero, 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
Folio = ObjVales.FolioVale ' Folio = ObjVales.FolioVale
If CveVale < 0 Then ' If CveVale < 0 Then
ErrorMovInv = True ' ErrorMovInv = True
End If ' End If
'Si TipoVale es 2 = Interno ' 'Si TipoVale es 2 = Interno
ElseIf ChkInterno.Checked = True Then 'ElseIf ChkInterno.Checked = True Then
CveVale = ObjVales.AddValesCombustible(FolioUsuario, 0, DdlProveedores.SelectedValue.ToEntero, DdlActivoFijo.SelectedValue.ToEntero, DdlRHPersonal.SelectedValue.ToEntero, TxtFechaVale.Text.ToDate, TxtNombreRecibe.Text, DdlSubProyecto.SelectedValue.ToEntero, TxtObservciones.Text, TxtOdometroActual.Text.ToEntero, DdlCombustible.SelectedValue.ToEntero, TxtLitros.Text.ToDouble, 2, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) ' CveVale = ObjVales.AddValesCombustible(FolioUsuario, 0, DdlProveedores.SelectedValue.ToEntero, DdlActivoFijo.SelectedValue.ToEntero, DdlRHPersonal.SelectedValue.ToEntero, TxtFechaVale.Text.ToDate, TxtNombreRecibe.Text, DdlSubProyecto.SelectedValue.ToEntero, TxtObservciones.Text, TxtOdometroActual.Text.ToEntero, DdlCombustible.SelectedValue.ToEntero, TxtLitros.Text.ToDouble, 2, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
Folio = ObjVales.FolioVale ' Folio = ObjVales.FolioVale
'AGREGAMOS LA SALIDA ' 'AGREGAMOS LA SALIDA
CveMovimientoSalida = ObjInventario.AddMovimiento(DdlAlmacen.SelectedValue.ToEntero, 3, 1, TxtFechaVale.Text.Trim.ToDate, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1) ' CveMovimientoSalida = ObjInventario.AddMovimiento(DdlAlmacen.SelectedValue.ToEntero, 3, 1, TxtFechaVale.Text.Trim.ToDate, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1)
FolioSalida = ObjInventario.Folio ' FolioSalida = ObjInventario.Folio
If CveMovimientoSalida <= 0 Then ' If CveMovimientoSalida <= 0 Then
TextoError = "No se pudo generar el movimiento de salida correctamente" ' TextoError = "No se pudo generar el movimiento de salida correctamente"
ErrorMovInv = True ' ErrorMovInv = True
Else ' Else
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoSalida, TxtLitros.Text.Trim.ToEntero, CveUM, CvePS, -1, DdlActivoFijo.SelectedValue.ToEntero) Then ' If Not ObjInventario.AddMovimientoDetalle(CveMovimientoSalida, TxtLitros.Text.Trim.ToEntero, CveUM, CvePS, -1, DdlActivoFijo.SelectedValue.ToEntero) Then
ErrorMovInv = True ' ErrorMovInv = True
TextoError = "Ocurrió un error al guardar los movimientos" ' TextoError = "Ocurrió un error al guardar los movimientos"
End If ' End If
End If ' End If
Else 'Else
Alert("Debe Seleccionar un Tipo de Vale", TipoMensaje.MsgError) ' Alert("Debe Seleccionar un Tipo de Vale", TipoMensaje.MsgError)
End If 'End If
End If End If
If Not ErrorMovInv Then If Not ErrorMovInv Then
@@ -397,51 +397,51 @@ Partial Class AF_ValesCombustible
Private Sub BtnActualizar_Click(sender As Object, e As EventArgs) Handles BtnActualizar.Click Private Sub BtnActualizar_Click(sender As Object, e As EventArgs) Handles BtnActualizar.Click
Dim ObjValesCombustible As New ClsAF 'Dim ObjValesCombustible As New ClsAF
For Each gvr As GridViewRow In GVBuscar.Rows 'For Each gvr As GridViewRow In GVBuscar.Rows
If gvr.RowType = DataControlRowType.DataRow Then ' If gvr.RowType = DataControlRowType.DataRow Then
If gvr.FCCheckBox("Chk").Checked Then ' If gvr.FCCheckBox("Chk").Checked Then
Dim CveProveedor = If(gvr.FCDropDownList("DdlBuscarP").Visible, gvr.FCDropDownList("DdlBuscarP").SelectedValue.ToEntero, gvr.FCLiteral("LtlProveedor").Text.ToEntero) ' Dim CveProveedor = If(gvr.FCDropDownList("DdlBuscarP").Visible, gvr.FCDropDownList("DdlBuscarP").SelectedValue.ToEntero, gvr.FCLiteral("LtlProveedor").Text.ToEntero)
ObjValesCombustible.UpdateValeCombustible(gvr.DataKey("CveVale").ToEntero, gvr.DataKey("CveCompra").ToEntero, CveProveedor, gvr.FCTextBox("TxtNombreRecibe").Text, gvr.FCTextBox("TxtCantidad").Text.ToDouble, gvr.FCTextBox("TxtRecibo").Text.ToEntero, gvr.FCTextBox("TxtImporte").Text.ToEntero, UsuarioActual.CveEmpresa) ' ObjValesCombustible.UpdateValeCombustible(gvr.DataKey("CveVale").ToEntero, gvr.DataKey("CveCompra").ToEntero, CveProveedor, gvr.FCTextBox("TxtNombreRecibe").Text, gvr.FCTextBox("TxtCantidad").Text.ToDouble, gvr.FCTextBox("TxtRecibo").Text.ToEntero, gvr.FCTextBox("TxtImporte").Text.ToEntero, UsuarioActual.CveEmpresa)
Alert("Se Actualizo con exito") ' Alert("Se Actualizo con exito")
ActualizarM() ' ActualizarM()
Else ' Else
Alert("Seleccione una opcion") ' Alert("Seleccione una opcion")
End If ' End If
End If ' End If
Next 'Next
ObjValesCombustible.Dispose() 'ObjValesCombustible.Dispose()
End Sub End Sub
Private Sub BtnBuscar_Click(sender As Object, e As EventArgs) Handles BtnBuscar.Click Private Sub BtnBuscar_Click(sender As Object, e As EventArgs) Handles BtnBuscar.Click
Dim ObjValesCombustible As New ClsAF 'Dim ObjValesCombustible As New ClsAF
If ObjValesCombustible.GetValesCombustible(-1, -1, If(TxtBuscar.Text.Equals(""), -1, TxtBuscar.Text.ToEntero), DdlBuscarProveedor.SelectedValue.ToEntero, DdlBuscarActivo.SelectedValue.ToEntero, -1, -1, -1, -1, DdlBuscarPersonal.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1) Then 'If ObjValesCombustible.GetValesCombustible(-1, -1, If(TxtBuscar.Text.Equals(""), -1, TxtBuscar.Text.ToEntero), DdlBuscarProveedor.SelectedValue.ToEntero, DdlBuscarActivo.SelectedValue.ToEntero, -1, -1, -1, -1, DdlBuscarPersonal.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1) Then
GVBuscar.DataSource = ObjValesCombustible.DtResultados ' GVBuscar.DataSource = ObjValesCombustible.DtResultados
If ObjValesCombustible.DtResultados.Rows.Count > 0 Then ' If ObjValesCombustible.DtResultados.Rows.Count > 0 Then
BtnActualizar.Visible = True ' BtnActualizar.Visible = True
End If ' End If
Else 'Else
GVBuscar.DataSource = Nothing ' GVBuscar.DataSource = Nothing
BtnActualizar.Visible = False ' BtnActualizar.Visible = False
End If 'End If
ObjValesCombustible.Dispose() 'ObjValesCombustible.Dispose()
GVBuscar.DataBind() 'GVBuscar.DataBind()
UpBuscar.Update() 'UpBuscar.Update()
End Sub End Sub
Private Sub ActualizarM() Private Sub ActualizarM()
Dim ObjValesCombustible As New ClsAF 'Dim ObjValesCombustible As New ClsAF
If ObjValesCombustible.GetValesCombustible(-1, -1, If(TxtBuscar.Text.Equals(""), -1, TxtBuscar.Text.ToEntero), DdlBuscarProveedor.SelectedValue.ToEntero, DdlBuscarActivo.SelectedValue.ToEntero, -1, -1, -1, -1, DdlBuscarPersonal.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1) Then 'If ObjValesCombustible.GetValesCombustible(-1, -1, If(TxtBuscar.Text.Equals(""), -1, TxtBuscar.Text.ToEntero), DdlBuscarProveedor.SelectedValue.ToEntero, DdlBuscarActivo.SelectedValue.ToEntero, -1, -1, -1, -1, DdlBuscarPersonal.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1) Then
GVBuscar.DataSource = ObjValesCombustible.DtResultados ' GVBuscar.DataSource = ObjValesCombustible.DtResultados
Else 'Else
GVBuscar.DataSource = Nothing ' GVBuscar.DataSource = Nothing
End If 'End If
ObjValesCombustible.Dispose() 'ObjValesCombustible.Dispose()
GVBuscar.DataBind() 'GVBuscar.DataBind()
UpBuscar.Update() 'UpBuscar.Update()
End Sub End Sub
#End Region #End Region

6
Acumuladores/CatFoliosGarantia.aspx
View File

@@ -257,6 +257,12 @@
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtFolioGarantia" CssClass="form-control" runat="server" MaxLength="70" CausesValidation="true"></asp:TextBox> <asp:TextBox ID="TxtFolioGarantia" CssClass="form-control" runat="server" MaxLength="70" CausesValidation="true"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvTxtFolioGarantia" runat="server" ControlToValidate="TxtFolioGarantia" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Folio''</b> es necesario, por favor ingréselo." ValidationGroup="GrpFolioGarantia"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RfvTxtFolioGarantia" runat="server" ControlToValidate="TxtFolioGarantia" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Folio''</b> es necesario, por favor ingréselo." ValidationGroup="GrpFolioGarantia"></asp:RequiredFieldValidator>
<asp:RegularExpressionValidator ID="REVFolioGarantia"
ControlToValidate="TxtFolioGarantia" runat="server" CssClass="help-block errorimput"
ErrorMessage="solo números" ValidationGroup="GrpFolioGarantia"
ValidationExpression="\d+">
</asp:RegularExpressionValidator>
<ajax:FilteredTextBoxExtender ID="FilteredTextBoxExtender1" runat="server" Enabled="True" TargetControlID="TxtFolioGarantia" FilterType="Numbers" FilterMode="ValidChars"></ajax:FilteredTextBoxExtender>
<label for="<%= TxtFolioGarantia.ClientID.ToString()%>">Folio:</label> <label for="<%= TxtFolioGarantia.ClientID.ToString()%>">Folio:</label>
<i></i> <i></i>
</div> </div>

21
Acumuladores/EntradasUsadosResumenRep.aspx
View File

@@ -86,16 +86,17 @@
> >
<Columns> <Columns>
<asp:BoundField DataField="CodigoPS" HeaderText="Grupo" ReadOnly="true" ></asp:BoundField> <asp:BoundField DataField="CodigoPS" HeaderText="Grupo" ReadOnly="true" ></asp:BoundField>
<asp:BoundField DataField="Inicial" HeaderText="Inicial" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Center"></ItemStyle></asp:BoundField> <asp:BoundField DataField="Inicial" HeaderText="Inicial" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Right"></ItemStyle></asp:BoundField>
<asp:BoundField DataField="E_Almacen" HeaderText="E.Alm" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Center"></ItemStyle></asp:BoundField> <asp:BoundField DataField="E_Almacen" HeaderText="E.Alm" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Right"></ItemStyle></asp:BoundField>
<asp:BoundField DataField="E_Pub" HeaderText="E.Pub" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Center"></ItemStyle></asp:BoundField> <asp:BoundField DataField="E_Pub" HeaderText="E.Pub" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Right"></ItemStyle></asp:BoundField>
<asp:BoundField DataField="E_Traspaso" HeaderText="E.Tras" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Center"></ItemStyle></asp:BoundField> <asp:BoundField DataField="E_Traspaso" HeaderText="E.Tras" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Right"></ItemStyle></asp:BoundField>
<asp:BoundField DataField="E_Compra" HeaderText="E.Compra" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Center"></ItemStyle></asp:BoundField> <asp:BoundField DataField="E_Compra" HeaderText="E.Compra" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Right"></ItemStyle></asp:BoundField>
<asp:BoundField DataField="E_Otros" HeaderText="Otros" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Center"></ItemStyle></asp:BoundField> <asp:BoundField DataField="E_Recoleccion" HeaderText="E.Rec" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Right"></ItemStyle></asp:BoundField>
<asp:BoundField DataField="S_Almacen" HeaderText="S.Alm" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Center"></ItemStyle></asp:BoundField> <asp:BoundField DataField="E_Otros" HeaderText="Otros" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Right"></ItemStyle></asp:BoundField>
<asp:BoundField DataField="S_Traspaso" HeaderText="S.Tras" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Center"></ItemStyle></asp:BoundField> <asp:BoundField DataField="S_Almacen" HeaderText="S.Alm" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Right"></ItemStyle></asp:BoundField>
<asp:BoundField DataField="S_Otros" HeaderText="Otros" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Center"></ItemStyle></asp:BoundField> <asp:BoundField DataField="S_Traspaso" HeaderText="S.Tras" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Right"></ItemStyle></asp:BoundField>
<asp:BoundField DataField="Exist_Actual" HeaderText="Exist. Actual" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Center"></ItemStyle></asp:BoundField> <asp:BoundField DataField="S_Otros" HeaderText="Otros" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Right"></ItemStyle></asp:BoundField>
<asp:BoundField DataField="Exist_Actual" HeaderText="Exist. Actual" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Right"></ItemStyle></asp:BoundField>
</Columns> </Columns>
</asp:GridView> </asp:GridView>
</ContentTemplate> </ContentTemplate>

54
Acumuladores/RepRecolecciones.aspx
View File

@@ -13,14 +13,7 @@
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server"> <asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
</asp:Content> </asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server"> <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
<asp:UpdatePanel runat="server" ID="UpAgregar">
<ContentTemplate>
<li>
<asp:LinkButton runat="server" ID="BtnAgregarTiposUso" data-toggle="tooltip" data-placement="left" title="Agregar Tipo de Uso" Text="<i class='fa fa-plus'></i> Agregar Uso"></asp:LinkButton>
</li>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content> </asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server"> <asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
</asp:Content> </asp:Content>
@@ -32,7 +25,7 @@
<div class="portlet solid grey-cascade portlet-filter" id="idnecesaria"> <div class="portlet solid grey-cascade portlet-filter" id="idnecesaria">
<div class="portlet-title portlet-filterT smalltitle"> <div class="portlet-title portlet-filterT smalltitle">
<div class="tools"> <div class="tools">
<asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" Visible="true" /> <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" OnClick="BtnConsultar_Click" />
<a href="javascript:;" class="expand"></a> <a href="javascript:;" class="expand"></a>
</div> </div>
<div class="titlefiltros caption"> <div class="titlefiltros caption">
@@ -74,6 +67,15 @@
<asp:RequiredFieldValidator ID="rfvFechaF" runat="server" ControlToValidate="TxtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="rfvFechaF" runat="server" ControlToValidate="TxtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="vcoRfvFF" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaF" Width="350px"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="vcoRfvFF" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
</div> </div>
<label class="col-md-1 " style="width: 80px;">Estatus:</label>
<div class="col-md-2">
<asp:DropDownList ID="DdlEstatus" CssClass="select2me" runat="server">
<asp:ListItem Text="Vigente" Value="0" Selected="True"></asp:ListItem>
<asp:ListItem Text="Clasificado" Value="1"></asp:ListItem>
<asp:ListItem Text="Cerrado" Value="2"></asp:ListItem>
<asp:ListItem Text="Todos" Value="-1"></asp:ListItem>
</asp:DropDownList>
</div>
</div> </div>
</div> </div>
</div> </div>
@@ -92,7 +94,7 @@
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvR" runat="server" AutoGenerateColumns="False" OnRowDataBound="gvR_RowDataBound" <asp:GridView ID="GvR" runat="server" AutoGenerateColumns="False" OnRowDataBound="gvR_RowDataBound"
DataKeyNames="CveEntregaAlmacen,Orden,CveDireccionOrigen,CveSubProyecto,Estatus,CveTimbre,CveCliente,FolioReferencia,Referencia" DataKeyNames="CveEntregaAlmacen,CveSubProyecto,Estatus,CveCliente,FolioReferencia,Referencia"
EmptyDataText="No se encontraron registros" EmptyDataText="No se encontraron registros"
CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn"
data-sort="true" data-sort="true"
@@ -134,29 +136,29 @@
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Referencia" > <asp:TemplateField HeaderText="Referencia" >
<ItemTemplate> <ItemTemplate>
&nbsp;<asp:Literal ID="LblRef" runat="server" Text='<%# Eval("Referencia") %>'></asp:Literal> &nbsp;<asp:Label ID="LblRef" runat="server" Text='<%# Eval("Referencia") %>'></asp:Label>
&nbsp;<asp:Label ID="Label1" runat="server" Text='<%# Eval("CveEntregaAlmacen") %>'></asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Dirección" > <asp:TemplateField HeaderText="">
<ItemTemplate> <ItemTemplate>
<div class="truncate" style="width: 150px;"> <asp:HyperLink ID="HplR" runat="server" Target="_blank" visible="false" AlternateText="Registrar" ToolTip="Registrar entrada" CssClass="btn btn-circle btn-sm yellow" Text="<i class='fa fa-location-arrow'></i>" />
&nbsp;<asp:Literal ID="LblDir" runat="server" Text='<%# Eval("Direccion") %>'></asp:Literal> <asp:HyperLink ID="HplEnt" runat="server" NavigateUrl='<%# Eval("CveMovimientoEntrada", "/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}") %>' CssClass="Texto" Text='<%# Eval("FolioEntrada") %>' />
</div>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="">
<asp:TemplateField HeaderText="">
<ItemTemplate> <ItemTemplate>
<asp:HyperLink ID="HplR" runat="server" visible="false" AlternateText="Registrar" ToolTip="Registrar entrada" CssClass="btn btn-circle btn-sm yellow" Text="<i class='fa fa-location-arrow'></i>" /> <asp:LinkButton ID="LnkGvDatosRecoleccionEditar" runat="server" Visible="false" OnClick="LnkGvDatosRecoleccionEditar_Click" AlternateText="Editar" ToolTip="Actualizar" CssClass="btn btn-circle btn-xs blue" Text="<i class='fa fa-pencil'></i>" />
<asp:LinkButton ID="LnkGvDatosRecoleccionEditar" runat="server" Visible="false" OnClick="LnkGvDatosRecoleccionEditar_Click" AlternateText="Editar" ToolTip="Actualizar" CausesValidation="False" CssClass="btn btn-circle btn-xs blue" Text="<i class='fa fa-pencil'></i>" /> <asp:HyperLink ID="HplTra" runat="server" NavigateUrl='<%# Eval("CveMovimientoTraslado", "/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}") %>' CssClass="Texto" Text='<%# Eval("FolioTraslado") %>' />
</ItemTemplate> </ItemTemplate>
<ItemStyle Width="100px" HorizontalAlign="Center"></ItemStyle>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Factura" >
<ItemTemplate>
<asp:HyperLink ID="HplCompra" runat="server" NavigateUrl='<%# Eval("CveCompra", "/Compras/Compras.aspx?CveCompra={0}") %>' CssClass="Texto" Text='<%# Eval("FolioCompra") %>' />
</ItemTemplate>
</asp:TemplateField>
</Columns> </Columns>
</asp:GridView> </asp:GridView>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</div> </div>
@@ -180,6 +182,7 @@
<asp:Literal runat="server" ID="LblProductosCargados">P</asp:Literal> <asp:Literal runat="server" ID="LblProductosCargados">P</asp:Literal>
<asp:HiddenField ID="HdnPSRecoleccion" runat="server" /> <asp:HiddenField ID="HdnPSRecoleccion" runat="server" />
<asp:HiddenField ID="HdnCantidadRecoleccion" runat="server" /> <asp:HiddenField ID="HdnCantidadRecoleccion" runat="server" />
<asp:HiddenField ID="HdnCveEntregaAlmacen" runat="server" />
</div> </div>
</div> </div>
<hr /> <hr />
@@ -243,19 +246,17 @@
<div class="row"> <div class="row">
</div> </div>
<div class="row"> <div class="row">
<div class="col-md-12"> <div class="col-md-12">
<asp:GridView ID="GvModalPSRecoleccion" DataKeyNames="CveEntregaAlmacenDetalle,CodigoPS,CvePS,CveUnidadMedida,Cantidad" runat="server" <asp:GridView ID="GvModalPSRecoleccion" DataKeyNames="CveEntregaAlmacenDetalle,CodigoPS,CvePS,CveUnidadMedida,Cantidad" runat="server"
ShowHeader="true" AutoGenerateColumns="False" EmptyDataText="" ToolTip="Listado de Movimientos" CssClass="Widthall table table-striped table-hover" GridLines="None"> ShowHeader="true" AutoGenerateColumns="False" EmptyDataText="" ToolTip="Listado de Movimientos" CssClass="Widthall table table-striped table-hover" GridLines="None">
<Columns> <Columns>
<asp:BoundField HeaderText="Cantidad" DataField="Cantidad" ItemStyle-Width="86px" HeaderStyle-HorizontalAlign="Right" /> <asp:BoundField HeaderText="Cantidad" DataField="Cantidad" ItemStyle-Width="86px" HeaderStyle-HorizontalAlign="Right" />
<asp:BoundField HeaderText="Unidad" DataField="Abreviatura" ItemStyle-Width="86px" /> <asp:BoundField HeaderText="Unidad" DataField="Abreviatura" ItemStyle-Width="86px" />
<asp:BoundField HeaderText="Producto" DataField="CodigoPS" ItemStyle-Width="500px" /> <asp:BoundField HeaderText="Producto" DataField="CodigoPS" ItemStyle-Width="500px" />
<asp:TemplateField> <asp:TemplateField>
<ItemTemplate> <ItemTemplate>
<asp:LinkButton ID="LnkModalGvModalPSRecoleccionEliminar" runat="server" CssClass="btn btn-circle btn-xs red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Seguro que desea eliminar el producto?" data-btn-ok-label="si"></asp:LinkButton> <asp:LinkButton ID="LnkModalGvModalPSRecoleccionEliminar" runat="server" CommandArgument='<%# Eval("CveEntregaAlmacenDetalle") %>' CssClass="btn btn-circle btn-xs red" OnClick="LnkModalGvModalPSRecoleccionEliminar_Click" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="¿Seguro que desea eliminar el producto?" data-btn-ok-label="si"></asp:LinkButton>
</ItemTemplate> </ItemTemplate>
<ItemStyle Width="160px" HorizontalAlign="Center"></ItemStyle> <ItemStyle Width="160px" HorizontalAlign="Center"></ItemStyle>
</asp:TemplateField> </asp:TemplateField>
@@ -266,9 +267,6 @@
</div> </div>
</div> </div>
<div class="modal-footer"> <div class="modal-footer">
<asp:UpdatePanel runat="server"> <asp:UpdatePanel runat="server">

74
Acumuladores/RepRecolecciones.aspx.vb
View File

@@ -1,8 +1,5 @@
Imports System.Data Imports System.Data
Imports CrystalDecisions.Shared.Json
Imports Extensiones Imports Extensiones
Imports Modelos
Partial Class Acumuladores_RepRecolecciones Partial Class Acumuladores_RepRecolecciones
Inherits ClsPaginas Inherits ClsPaginas
@@ -65,7 +62,7 @@ Partial Class Acumuladores_RepRecolecciones
CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, LblSubProyecto) CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, LblSubProyecto)
DdlAlmacenOrigen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen IN (4)") DdlAlmacenOrigen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen IN (4)")
DdlAlmacenOrigen.DataBind() DdlAlmacenOrigen.DataBind()
DdlAlmacenDestino.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen IN (21) and Almacen like '%sado%'") DdlAlmacenDestino.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen IN (22) and Almacen like '%sado%'")
DdlAlmacenDestino.DataBind() DdlAlmacenDestino.DataBind()
End Sub End Sub
@@ -73,7 +70,7 @@ Partial Class Acumuladores_RepRecolecciones
Private Sub CargaDatos() Private Sub CargaDatos()
Dim ObjGeneral As New ClsGenerales Dim ObjGeneral As New ClsGenerales
If (ObjGeneral.GetInvEntregaAlmacenRuta(-1, TxtFechaI.Text.ToDate, TxtFechaF.Text.ToDate, UsuarioActual.CveEmpresa, 2, -1)) Then If ObjGeneral.GetInvEntregaAlmacenRuta(DdlSubProyecto.SelectedValue.ToEntero, TxtFechaI.Text.ToDate, TxtFechaF.Text.ToDate, UsuarioActual.CveEmpresa, 3, DdlEstatus.SelectedValue.ToEntero) Then
GvR.DataSource = ObjGeneral.DtResultados GvR.DataSource = ObjGeneral.DtResultados
End If End If
ObjGeneral.Dispose() ObjGeneral.Dispose()
@@ -85,20 +82,20 @@ Partial Class Acumuladores_RepRecolecciones
Protected Sub gvR_RowDataBound(ByVal sender As Object, ByVal e As GridViewRowEventArgs) Protected Sub gvR_RowDataBound(ByVal sender As Object, ByVal e As GridViewRowEventArgs)
If e.Row.RowType = DataControlRowType.DataRow Then If e.Row.RowType = DataControlRowType.DataRow Then
Dim LnkEditar As LinkButton = e.Row.FCLinkButton("LnkGvDatosRecoleccionEditar")
If e.Row.DataKey("Estatus") = "0" OrElse e.Row.DataKey("Estatus") = "" Then If e.Row.DBCampo("CveMovimientoEntrada") = "" Then
e.Row.FCHyperLink("HplR").Visible = True
e.Row.FCLabel("LblRef").ToolTip = e.Row.DBCampo("CveEntregaAlmacen")
e.Row.FCHyperLink("HplR").NavigateUrl = "/Inventarios/EntradasSalidas.aspx?CveEntregaAlmacen=" & e.Row.DBCampo("CveEntregaAlmacen")
End If
If e.Row.DBCampo("CveMovimientoEntrada") <> "" AndAlso e.Row.DBCampo("CveMovimientoTraslado") = "" Then
Dim LnkEditar As LinkButton = e.Row.FCLinkButton("LnkGvDatosRecoleccionEditar")
'If e.Row.DBCampo("Estatus") = "0" OrElse e.Row.DBCampo("Estatus") = "" Then
LnkEditar.Visible = True LnkEditar.Visible = True
'End If
End If End If
' If e.Row.DataKey("Estatus") = "1" Then
e.Row.FCHyperLink("HplR").Visible = True
e.Row.FCHyperLink("HplR").NavigateUrl = "/Inventarios/EntradasSalidas.aspx?CveEntregaAlmacen=" & e.Row.DBCampo("CveEntregaAlmacen")
'End If
If e.Row.DataKey("CveTimbre") <> "" Then
e.Row.FCCheckBox("Chk").Visible = False
End If
End If End If
End Sub End Sub
@@ -106,8 +103,6 @@ Partial Class Acumuladores_RepRecolecciones
Dim LnkEliminar As LinkButton = CType(sender, LinkButton) Dim LnkEliminar As LinkButton = CType(sender, LinkButton)
Dim GvRow As GridViewRow = CType(LnkEliminar.NamingContainer, GridViewRow) Dim GvRow As GridViewRow = CType(LnkEliminar.NamingContainer, GridViewRow)
CveEntregaAlmacen = GvRow.DataKey("CveEntregaAlmacen").ToEntero() CveEntregaAlmacen = GvRow.DataKey("CveEntregaAlmacen").ToEntero()
Dim CveDireccionOrigen As Integer = GvRow.DataKey("CveDireccionOrigen").ToEntero()
CargaDatosRecoleccionDetallePS() CargaDatosRecoleccionDetallePS()
LtlModalRecoleccionTitulo.Text = "Definición de tamaños" LtlModalRecoleccionTitulo.Text = "Definición de tamaños"
@@ -120,7 +115,6 @@ Partial Class Acumuladores_RepRecolecciones
ElProductoChange() ElProductoChange()
End Sub End Sub
Private Sub ElProductoChange() Private Sub ElProductoChange()
DdlModalRecoleccionUnidad.Items.Clear() DdlModalRecoleccionUnidad.Items.Clear()
DdlModalRecoleccionUnidad.DataSource = GlobalDTProductosServiciosEquivalencias(DdlProducto2.SelectedValue.ToEntero(), -1, UsuarioActual.CveEmpresa) DdlModalRecoleccionUnidad.DataSource = GlobalDTProductosServiciosEquivalencias(DdlProducto2.SelectedValue.ToEntero(), -1, UsuarioActual.CveEmpresa)
@@ -141,7 +135,6 @@ Partial Class Acumuladores_RepRecolecciones
Next Next
LblProductosCargados.Text = Str.ToString LblProductosCargados.Text = Str.ToString
End If End If
ObjGenerales.Dispose() ObjGenerales.Dispose()
GvModalPSRecoleccion.DataSource = DTRecoleccion GvModalPSRecoleccion.DataSource = DTRecoleccion
@@ -149,8 +142,10 @@ Partial Class Acumuladores_RepRecolecciones
UpModalRecoleccion.Update() UpModalRecoleccion.Update()
End Sub End Sub
Private Function InitDTRecoleccion() As DataTable Private Function InitDTRecoleccion() As DataTable
Dim Columnaid = New DataColumn() With {.ColumnName = "CveEntregaAlmacenDetalle", .DataType = Type.GetType("System.Int32"), .AutoIncrement = True, .AutoIncrementSeed = 1, .AutoIncrementStep = 1}
Dim DT As DataTable = New DataTable() Dim DT As DataTable = New DataTable()
DT.Columns.Add("CveEntregaAlmacenDetalle", System.Type.[GetType]("System.Int32")) DT.Columns.Add(Columnaid)
DT.Columns.Add("CveEntregaAlmacen", System.Type.[GetType]("System.Int32")) DT.Columns.Add("CveEntregaAlmacen", System.Type.[GetType]("System.Int32"))
DT.Columns.Add("CvePS", System.Type.[GetType]("System.Int32")) DT.Columns.Add("CvePS", System.Type.[GetType]("System.Int32"))
DT.Columns.Add("Cantidad", System.Type.[GetType]("System.Double")) DT.Columns.Add("Cantidad", System.Type.[GetType]("System.Double"))
@@ -185,7 +180,6 @@ Partial Class Acumuladores_RepRecolecciones
Protected Sub LnkModalAgregarPS_Click(ByVal sender As Object, ByVal e As EventArgs) Protected Sub LnkModalAgregarPS_Click(ByVal sender As Object, ByVal e As EventArgs)
Dim dRow As DataRow = DTRecoleccion.NewRow() Dim dRow As DataRow = DTRecoleccion.NewRow()
dRow("CveEntregaAlmacenDetalle") = -1
dRow("CveEntregaAlmacen") = CveEntregaAlmacen dRow("CveEntregaAlmacen") = CveEntregaAlmacen
dRow("CvePS") = DdlProducto2.SelectedValue.ToEntero() dRow("CvePS") = DdlProducto2.SelectedValue.ToEntero()
dRow("Cantidad") = TxtModalRecoleccionCantidad.Text.ToEntero() dRow("Cantidad") = TxtModalRecoleccionCantidad.Text.ToEntero()
@@ -193,7 +187,7 @@ Partial Class Acumuladores_RepRecolecciones
dRow("CveUsuario") = UsuarioActual.CveUsuario dRow("CveUsuario") = UsuarioActual.CveUsuario
dRow("FechaIng") = NowADS() dRow("FechaIng") = NowADS()
dRow("CodigoPS") = DdlProducto2.SelectedItem.Text dRow("CodigoPS") = DdlProducto2.SelectedItem.Text
dRow("Abreviatura") = DdlModalRecoleccionUnidad.SelectedItem.Text dRow("Abreviatura") = If(DdlModalRecoleccionUnidad.SelectedItem IsNot Nothing, DdlModalRecoleccionUnidad.SelectedItem.Text, "")
DTRecoleccion.Rows.Add(dRow) DTRecoleccion.Rows.Add(dRow)
LimpiarControlesPS() LimpiarControlesPS()
@@ -210,7 +204,6 @@ Partial Class Acumuladores_RepRecolecciones
Private Sub BtnModalRecoleccionGuardar_Click(sender As Object, e As EventArgs) Handles BtnModalRecoleccionGuardar.Click Private Sub BtnModalRecoleccionGuardar_Click(sender As Object, e As EventArgs) Handles BtnModalRecoleccionGuardar.Click
Dim Cantidad As Decimal = HdnCantidadRecoleccion.Value.ToDecimal Dim Cantidad As Decimal = HdnCantidadRecoleccion.Value.ToDecimal
Dim CantidadDefinido As Decimal = 0 Dim CantidadDefinido As Decimal = 0
For Each gvr As GridViewRow In GvModalPSRecoleccion.Rows For Each gvr As GridViewRow In GvModalPSRecoleccion.Rows
@@ -223,12 +216,13 @@ Partial Class Acumuladores_RepRecolecciones
Dim ObjInventario As New ClsInventarios Dim ObjInventario As New ClsInventarios
Dim ObjConta As New ClsContabilidad(ObjInventario.IniciaTransacSQL) Dim ObjConta As New ClsContabilidad(ObjInventario.IniciaTransacSQL)
Dim ObjGral As New ClsGenerales(ObjInventario.IniciaTransacSQL)
Dim ErrorMovInv As Boolean = False Dim ErrorMovInv As Boolean = False
Dim Fecha As DateTime = NowADS() Dim Fecha As DateTime = NowADS()
Dim Concepto As String = "Traspaso Recolección" Dim Concepto As String = "Traspaso Recolección"
Dim CveMovimientoSalida As Integer = ObjInventario.AddMovimiento(DdlAlmacenOrigen.SelectedValue.ToEntero, 26, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1) Dim CveMovimientoSalida As Integer = ObjInventario.AddMovimiento(DdlAlmacenOrigen.SelectedValue.ToEntero, 45, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1, CveEntregaAlmacen:=CveEntregaAlmacen, Modulo:="clasifUsados")
Dim FolioSalida As Integer = ObjInventario.Folio Dim FolioSalida As Integer = ObjInventario.Folio
Dim CveMovimientoEntrada As Integer = ObjInventario.AddMovimiento(DdlAlmacenDestino.SelectedValue.ToEntero, 27, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1, CveMovimientoRelacionado:=CveMovimientoSalida) Dim CveMovimientoEntrada As Integer = ObjInventario.AddMovimiento(DdlAlmacenDestino.SelectedValue.ToEntero, 42, 1, Fecha, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1, -1, -1, CveMovimientoRelacionado:=CveMovimientoSalida, CveEntregaAlmacen:=CveEntregaAlmacen, Modulo:="clasifUsados")
Dim CveUM As Integer = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa, CvePS:=HdnPSRecoleccion.Value.ToEntero).FiltroPrimeroValor("CveUnidadMedida", "").ToEntero Dim CveUM As Integer = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa, CvePS:=HdnPSRecoleccion.Value.ToEntero).FiltroPrimeroValor("CveUnidadMedida", "").ToEntero
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoSalida, HdnCantidadRecoleccion.Value.ToDecimal, CveUM, HdnPSRecoleccion.Value.ToEntero, 0) Then If Not ObjInventario.AddMovimientoDetalle(CveMovimientoSalida, HdnCantidadRecoleccion.Value.ToDecimal, CveUM, HdnPSRecoleccion.Value.ToEntero, 0) Then
ErrorMovInv = True ErrorMovInv = True
@@ -271,22 +265,48 @@ Partial Class Acumuladores_RepRecolecciones
ErrorMovInv = True ErrorMovInv = True
End If End If
End If End If
If Not ErrorMovInv Then
ObjGral.UpdateInvEntregaAlmacenEstatus(CveEntregaAlmacen, UsuarioActual.CveEmpresa, 1)
End If
End If End If
End If End If
If Not ErrorMovInv Then If Not ErrorMovInv Then
ObjInventario.Commit() ObjInventario.Commit()
GvModalPSRecoleccion.DataBind()
DTRecoleccion.Clear()
RegistraScript("$('#DivModalRecoleccion').modal('hide');")
Dim MensajeAlert As New StringBuilder Dim MensajeAlert As New StringBuilder
MensajeAlert.Append("Se realizó con éxito el traspaso.") MensajeAlert.Append("Se realizó con éxito el traspaso.")
MensajeAlert.AppendFormat("<br/> Folio de Salida: <b><a href=""/Inventarios/EntradasSalidas.aspx?CveMovimiento={1}"" class='Texto' target=""_blank"">{0}</a></b>", FolioSalida, CveMovimientoSalida) MensajeAlert.AppendFormat("<br/> Folio de Salida: <b><a href=""/Inventarios/EntradasSalidas.aspx?CveMovimiento={1}"" class='Texto' target=""_blank"">{0}</a></b>", FolioSalida, CveMovimientoSalida)
'MensajeAlert.AppendFormat("<br/><a target='_blank' class='Texto' href='/Compras/PopUpVerFactura.aspx?P={0}'>Imprimir Reporte</a>", Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimientoSalida))) 'MensajeAlert.AppendFormat("<br/><a target='_blank' class='Texto' href='/Compras/PopUpVerFactura.aspx?P={0}'>Imprimir Reporte</a>", Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimientoSalida)))
Alert(MensajeAlert.ToString) Alert(MensajeAlert.ToString)
CargaDatos()
Else Else
ObjInventario.RollBack() ObjInventario.RollBack()
End If End If
End Sub End Sub
Protected Sub LnkModalGvModalPSRecoleccionEliminar_Click(sender As Object, e As EventArgs)
Dim LnkEliminar As LinkButton = CType(sender, LinkButton)
Dim GvRow As GridViewRow = CType(LnkEliminar.NamingContainer, GridViewRow)
Dim CveEntregaAlmacenDetalle = GvRow.DataKey("CveEntregaAlmacenDetalle").ToEntero()
Dim drss As DataRow() = DTRecoleccion.Select($"CveEntregaAlmacenDetalle = {CveEntregaAlmacenDetalle}")
If drss.Count > 0 Then
DTRecoleccion.Rows.Remove(drss(0))
End If
DTRecoleccion.AcceptChanges()
GvModalPSRecoleccion.DataSource = DTRecoleccion
GvModalPSRecoleccion.DataBind()
End Sub
Protected Sub BtnConsultar_Click(sender As Object, e As EventArgs)
CargaDatos()
End Sub
End Class End Class

176
App_Code/ClsAF.vb
View File

@@ -3151,105 +3151,105 @@ Public Class ClsAF
#End Region #End Region
#Region "ValesCombustible" #Region "ValesCombustible"
Public Function AddValesCombustible(FolioUsuario As Integer, CveCompra As Integer, CveProveedor As Integer, CveAF As Integer, CvePersonal As Integer, Fecha As Date, NombreRecibe As String, CveSubProyecto As Integer, Observaciones As String, Odometro As Integer, CveCombustible As Integer, Litros As Double, TipoVale As Integer, CveUsuario As Integer, CveEmpresa As Integer, Optional Recibo As Integer = -1, Optional Importe As Integer = -1) As Integer 'Public Function AddValesCombustible(FolioUsuario As Integer, CveCompra As Integer, CveProveedor As Integer, CveAF As Integer, CvePersonal As Integer, Fecha As Date, NombreRecibe As String, CveSubProyecto As Integer, Observaciones As String, Odometro As Integer, CveCombustible As Integer, Litros As Double, TipoVale As Integer, CveUsuario As Integer, CveEmpresa As Integer, Optional Recibo As Integer = -1, Optional Importe As Integer = -1) As Integer
Dim Retorno As Integer = -1 ' Dim Retorno As Integer = -1
DataAdapter("PA_AF_ValesCombustibleAdd") ' DataAdapter("PA_AF_ValesCombustibleAdd")
With SqlAdapter.SelectCommand.Parameters ' With SqlAdapter.SelectCommand.Parameters
.Add("@FolioUsuario", SqlDbType.Int).Value = FolioUsuario ' .Add("@FolioUsuario", SqlDbType.Int).Value = FolioUsuario
.Add("@CveCompra", SqlDbType.Int).Value = CveCompra ' .Add("@CveCompra", SqlDbType.Int).Value = CveCompra
.Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor ' .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
.Add("@CveAF", SqlDbType.Int).Value = CveAF ' .Add("@CveAF", SqlDbType.Int).Value = CveAF
.Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal ' .Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal
.Add("@NombreRecibe", SqlDbType.VarChar).Value = NombreRecibe ' .Add("@NombreRecibe", SqlDbType.VarChar).Value = NombreRecibe
.Add("@Fecha", SqlDbType.Date).Value = Fecha ' .Add("@Fecha", SqlDbType.Date).Value = Fecha
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto ' .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@Observaciones", SqlDbType.VarChar).Value = Observaciones ' .Add("@Observaciones", SqlDbType.VarChar).Value = Observaciones
.Add("@Odometro", SqlDbType.Int).Value = Odometro ' .Add("@Odometro", SqlDbType.Int).Value = Odometro
.Add("@CveCombustible", SqlDbType.Int).Value = CveCombustible ' .Add("@CveCombustible", SqlDbType.Int).Value = CveCombustible
.Add("@Litros", SqlDbType.Float).Value = Litros ' .Add("@Litros", SqlDbType.Float).Value = Litros
.Add("@Recibo", SqlDbType.Float).Value = Recibo ' .Add("@Recibo", SqlDbType.Float).Value = Recibo
.Add("@Importe", SqlDbType.Float).Value = Importe ' .Add("@Importe", SqlDbType.Float).Value = Importe
.Add("@TipoVale", SqlDbType.Int).Value = TipoVale ' .Add("@TipoVale", SqlDbType.Int).Value = TipoVale
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario ' .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa ' .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@CveVale", SqlDbType.Int).Direction = ParameterDirection.Output ' .Add("@CveVale", SqlDbType.Int).Direction = ParameterDirection.Output
.Add("@vFolio", SqlDbType.Int).Direction = ParameterDirection.Output ' .Add("@vFolio", SqlDbType.Int).Direction = ParameterDirection.Output
End With ' End With
Try ' Try
SqlAdapter.Fill(Data) ' SqlAdapter.Fill(Data)
FolioVale = SqlAdapter.SelectCommand.Parameters("@vFolio").Value.ToString.ToEntero ' FolioVale = SqlAdapter.SelectCommand.Parameters("@vFolio").Value.ToString.ToEntero
Retorno = SqlAdapter.SelectCommand.Parameters("@CveVale").Value.ToString.ToEntero ' Retorno = SqlAdapter.SelectCommand.Parameters("@CveVale").Value.ToString.ToEntero
Catch Ex1 As SqlException ' Catch Ex1 As SqlException
If Ex1.Message.Contains("Número: 2627;") Then ' If Ex1.Message.Contains("Número: 2627;") Then
Alert("Ya existe un Vale de Combustible con el mismo nombre: " & Descripcion & ".", TipoMensaje.MsgAdvertencia) ' Alert("Ya existe un Vale de Combustible con el mismo nombre: " & Descripcion & ".", TipoMensaje.MsgAdvertencia)
Else ' Else
Me.OnError("Ocurrió un error al Guardar el Vale de Combustible.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) ' Me.OnError("Ocurrió un error al Guardar el Vale de Combustible.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End If ' End If
Catch ex As Exception ' Catch ex As Exception
End Try ' End Try
Return Retorno ' Return Retorno
End Function 'End Function
Public Function GetValesCombustible(CveCompra As Integer, CveValeCombustible As Integer, Folio As Integer, CveProveedor As Integer, CveAF As Integer, CveSubProyecto As Integer, Odometro As Integer, CveCombustible As Integer, Litros As Double, CvePersonal As Integer, CveUsuario As Integer, CveEmpresa As Integer, Recibo As Integer, Importe As Integer) As Boolean 'Public Function GetValesCombustible(CveCompra As Integer, CveValeCombustible As Integer, Folio As Integer, CveProveedor As Integer, CveAF As Integer, CveSubProyecto As Integer, Odometro As Integer, CveCombustible As Integer, Litros As Double, CvePersonal As Integer, CveUsuario As Integer, CveEmpresa As Integer, Recibo As Integer, Importe As Integer) As Boolean
Dim Retorno As Boolean = False ' Dim Retorno As Boolean = False
DataAdapter("PA_AF_ValesCombustibleGet") ' DataAdapter("PA_AF_ValesCombustibleGet")
With SqlAdapter.SelectCommand.Parameters ' With SqlAdapter.SelectCommand.Parameters
.Add("@CveCompra", SqlDbType.Int).Value = CveCompra ' .Add("@CveCompra", SqlDbType.Int).Value = CveCompra
.Add("@CveValeCombustible", SqlDbType.Int).Value = CveValeCombustible ' .Add("@CveValeCombustible", SqlDbType.Int).Value = CveValeCombustible
.Add("@Folio", SqlDbType.Int).Value = Folio ' .Add("@Folio", SqlDbType.Int).Value = Folio
.Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor ' .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
.Add("@CveAF", SqlDbType.Int).Value = CveAF ' .Add("@CveAF", SqlDbType.Int).Value = CveAF
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto ' .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@Odometro", SqlDbType.Int).Value = Odometro ' .Add("@Odometro", SqlDbType.Int).Value = Odometro
.Add("@CveCombustible", SqlDbType.Int).Value = CveCombustible ' .Add("@CveCombustible", SqlDbType.Int).Value = CveCombustible
.Add("@Litros", SqlDbType.Float).Value = Litros ' .Add("@Litros", SqlDbType.Float).Value = Litros
.Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal ' .Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario ' .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa ' .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@Recibo", SqlDbType.Int).Value = Recibo ' .Add("@Recibo", SqlDbType.Int).Value = Recibo
.Add("@Importe", SqlDbType.Int).Value = Importe ' .Add("@Importe", SqlDbType.Int).Value = Importe
End With ' End With
Try ' Try
SqlAdapter.Fill(Data) ' SqlAdapter.Fill(Data)
Retorno = True ' Retorno = True
Catch ex As Exception ' Catch ex As Exception
OnError("Ocurrió un error al obtener el Catálogo de Estatus de Vales Combustible.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) ' OnError("Ocurrió un error al obtener el Catálogo de Estatus de Vales Combustible.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try ' End Try
Return Retorno ' Return Retorno
End Function 'End Function
Public Function UpdateValeCombustible(CveVale As Integer, CveCompra As Integer, CveProveedor As Integer, NombreRecibe As String, Litros As Double, Recibo As Integer, Importe As Integer, CveEmpresa As Integer) As Boolean 'Public Function UpdateValeCombustible(CveVale As Integer, CveCompra As Integer, CveProveedor As Integer, NombreRecibe As String, Litros As Double, Recibo As Integer, Importe As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False ' Dim Retorno As Boolean = False
DataAdapter("PA_AF_ValesCombustibleUpdate") ' DataAdapter("PA_AF_ValesCombustibleUpdate")
With SqlAdapter.SelectCommand.Parameters ' With SqlAdapter.SelectCommand.Parameters
.Add("@CveVale", SqlDbType.Int).Value = CveVale ' .Add("@CveVale", SqlDbType.Int).Value = CveVale
.Add("@CveCompra", SqlDbType.Int).Value = CveCompra ' .Add("@CveCompra", SqlDbType.Int).Value = CveCompra
.Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor ' .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
.Add("@NombreRecibe", SqlDbType.VarChar).Value = NombreRecibe ' .Add("@NombreRecibe", SqlDbType.VarChar).Value = NombreRecibe
.Add("@Litros", SqlDbType.Float).Value = Litros ' .Add("@Litros", SqlDbType.Float).Value = Litros
.Add("@Recibo", SqlDbType.Int).Value = Recibo ' .Add("@Recibo", SqlDbType.Int).Value = Recibo
.Add("@Importe", SqlDbType.Int).Value = Importe ' .Add("@Importe", SqlDbType.Int).Value = Importe
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa ' .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With ' End With
Try ' Try
SqlAdapter.Fill(Data) ' SqlAdapter.Fill(Data)
Retorno = True ' Retorno = True
Catch Ex1 As SqlException ' Catch Ex1 As SqlException
OnError("Ocurrió un error al actualizar la cuenta contable en el Activo Fijo", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) ' OnError("Ocurrió un error al actualizar la cuenta contable en el Activo Fijo", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
Catch ex As Exception ' Catch ex As Exception
OnError("Ocurrió un error al actualizar la cuenta contable en el Activo Fijo.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) ' OnError("Ocurrió un error al actualizar la cuenta contable en el Activo Fijo.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try ' End Try
Return Retorno ' Return Retorno
End Function 'End Function
#End Region #End Region
#Region "M E T R I C A S" #Region "M E T R I C A S"

8
App_Code/ClsContratos.vb
View File

@@ -190,7 +190,6 @@ Public Class ClsContratos
Public Property CveChofer2 As Integer Public Property CveChofer2 As Integer
Public Property CveAF As Integer Public Property CveAF As Integer
Public Property CantidadPasajeros As Integer Public Property CantidadPasajeros As Integer
Public Property CveRuta As Integer
Public Property CvePartida As Integer Public Property CvePartida As Integer
Public Property CveDestino As Integer Public Property CveDestino As Integer
Public Property CveMasivo As Integer Public Property CveMasivo As Integer
@@ -317,7 +316,6 @@ Public Class ClsContratos
Me.CveChofer2 = Data.Rows(0)("CveChofer2").ToString.ToEntero Me.CveChofer2 = Data.Rows(0)("CveChofer2").ToString.ToEntero
Me.CveAF = Data.Rows(0)("CveAF").ToString.ToEntero Me.CveAF = Data.Rows(0)("CveAF").ToString.ToEntero
Me.CantidadPasajeros = Data.Rows(0)("CantidadPasajeros").ToString.ToEntero Me.CantidadPasajeros = Data.Rows(0)("CantidadPasajeros").ToString.ToEntero
Me.CveRuta = Data.Rows(0)("CveRuta").ToString.ToEntero
Me.CvePartida = Data.Rows(0)("CvePartida").ToString.ToEntero Me.CvePartida = Data.Rows(0)("CvePartida").ToString.ToEntero
Me.CveDestino = Data.Rows(0)("CveDestino").ToString.ToEntero Me.CveDestino = Data.Rows(0)("CveDestino").ToString.ToEntero
Me.CveMasivo = Data.Rows(0)("CveMasivo").ToString.ToEntero Me.CveMasivo = Data.Rows(0)("CveMasivo").ToString.ToEntero
@@ -337,7 +335,7 @@ Public Class ClsContratos
Optional TipoGarantia As Integer = -1, Optional Folio As Integer = -1, Optional FechaVenc As Date = Nothing, Optional EstatusFianza As Integer = -1, Optional CvePeriodo As Integer = -1, Optional CveContratoPlantilla As Integer = -1, Optional CveCuentaEquipo As Integer = -1, Optional TipoGarantia As Integer = -1, Optional Folio As Integer = -1, Optional FechaVenc As Date = Nothing, Optional EstatusFianza As Integer = -1, Optional CvePeriodo As Integer = -1, Optional CveContratoPlantilla As Integer = -1, Optional CveCuentaEquipo As Integer = -1,
Optional CveVendedor As Integer = -1, Optional Observaciones As String = "", Optional CveDireccionEnvio As Integer = -1, Optional AplicaImpuestosLocales As Boolean = False, Optional CorreoNotificacionPedDev As String = "", Optional CveVendedor As Integer = -1, Optional Observaciones As String = "", Optional CveDireccionEnvio As Integer = -1, Optional AplicaImpuestosLocales As Boolean = False, Optional CorreoNotificacionPedDev As String = "",
Optional FacturacionCicilica As Boolean = False, Optional FacturacionCiclicaAutomatico As Boolean = False, Optional DiaMesFacturacion As Integer = 1, Optional ObservacionesGenerales As String = "", Optional FacturacionCicilica As Boolean = False, Optional FacturacionCiclicaAutomatico As Boolean = False, Optional DiaMesFacturacion As Integer = 1, Optional ObservacionesGenerales As String = "",
Optional CveTipoAF As Integer = Nothing, Optional CveChofer As Integer = Nothing, Optional CveChofer2 As Integer = Nothing, Optional CveAF As Integer = Nothing, Optional CantidadPasajeros As Integer = Nothing, Optional CveRuta As Integer = Nothing, Optional CvePartida As Integer = Nothing, Optional CveDestino As Integer = Nothing, Optional CveMasivo As Integer = Nothing) As Integer Optional CveTipoAF As Integer = Nothing, Optional CveChofer As Integer = Nothing, Optional CveChofer2 As Integer = Nothing, Optional CveAF As Integer = Nothing, Optional CantidadPasajeros As Integer = Nothing, Optional CvePartida As Integer = Nothing, Optional CveDestino As Integer = Nothing, Optional CveMasivo As Integer = Nothing) As Integer
Dim Retorno As Integer = -1 Dim Retorno As Integer = -1
DataAdapter("PA_Con_ContratosAdd") DataAdapter("PA_Con_ContratosAdd")
@@ -399,7 +397,6 @@ Public Class ClsContratos
.Add("@CveChofer2", SqlDbType.Int).Value = CveChofer2 .Add("@CveChofer2", SqlDbType.Int).Value = CveChofer2
.Add("@CveAF", SqlDbType.Int).Value = CveAF .Add("@CveAF", SqlDbType.Int).Value = CveAF
.Add("@CantidadPasajeros", SqlDbType.Int).Value = CantidadPasajeros .Add("@CantidadPasajeros", SqlDbType.Int).Value = CantidadPasajeros
.Add("@CveRuta", SqlDbType.Int).Value = CveRuta
.Add("@CvePartida", SqlDbType.Int).Value = CvePartida .Add("@CvePartida", SqlDbType.Int).Value = CvePartida
.Add("@CveDestino", SqlDbType.Int).Value = CveDestino .Add("@CveDestino", SqlDbType.Int).Value = CveDestino
.Add("@CveMasivo", SqlDbType.Int).Value = CveMasivo .Add("@CveMasivo", SqlDbType.Int).Value = CveMasivo
@@ -426,7 +423,7 @@ Public Class ClsContratos
Optional CveContratosEstatus As Integer = -1, Optional CveContratoTipo As Integer = -1, Optional TipoCambio As Double = 1.0, Optional CveSucursalCliente As Integer = -1, Optional CveAlmacenOrigen As Integer = -1, Optional CveAlmacenDestino As Integer = -1, Optional PorcentajeComision As Integer = -1, Optional CveContratosEstatus As Integer = -1, Optional CveContratoTipo As Integer = -1, Optional TipoCambio As Double = 1.0, Optional CveSucursalCliente As Integer = -1, Optional CveAlmacenOrigen As Integer = -1, Optional CveAlmacenDestino As Integer = -1, Optional PorcentajeComision As Integer = -1,
Optional TipoGarantia As Integer = -1, Optional Folio As Integer = -1, Optional FechaVenc As Date = Nothing, Optional EstatusFianza As Integer = -1, Optional CveContratoPlantilla As Integer = -1, Optional CveCuentaEquipo As Integer = -1, Optional TipoGarantia As Integer = -1, Optional Folio As Integer = -1, Optional FechaVenc As Date = Nothing, Optional EstatusFianza As Integer = -1, Optional CveContratoPlantilla As Integer = -1, Optional CveCuentaEquipo As Integer = -1,
Optional CveVendedor As Integer = -1, Optional Observaciones As String = "", Optional CveDireccionEnvio As Integer = -1, Optional AplicaImpuestosLocales As Boolean = False, Optional CorreoNotificacionPedDev As String = "", Optional FacturacionCicilica As Boolean = False, Optional FacturacionCiclicaAutomatico As Boolean = False, Optional CveVendedor As Integer = -1, Optional Observaciones As String = "", Optional CveDireccionEnvio As Integer = -1, Optional AplicaImpuestosLocales As Boolean = False, Optional CorreoNotificacionPedDev As String = "", Optional FacturacionCicilica As Boolean = False, Optional FacturacionCiclicaAutomatico As Boolean = False,
Optional DiaMesFacturacion As Integer = 1, Optional CvePeriodo As Integer = -1, Optional ObservacionesGenerales As String = "", Optional CveTipoAF As Integer = Nothing, Optional CveChofer As Integer = Nothing, Optional CveChofer2 As Integer = Nothing, Optional CveAF As Integer = Nothing, Optional CantidadPasajeros As Integer = Nothing, Optional CveRuta As Integer = Nothing, Optional CvePartida As Integer = Nothing, Optional CveDestino As Integer = Nothing, Optional CveMasivo As Integer = Nothing) As Boolean Optional DiaMesFacturacion As Integer = 1, Optional CvePeriodo As Integer = -1, Optional ObservacionesGenerales As String = "", Optional CveTipoAF As Integer = Nothing, Optional CveChofer As Integer = Nothing, Optional CveChofer2 As Integer = Nothing, Optional CveAF As Integer = Nothing, Optional CantidadPasajeros As Integer = Nothing, Optional CvePartida As Integer = Nothing, Optional CveDestino As Integer = Nothing, Optional CveMasivo As Integer = Nothing) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Con_ContratosUpdate") DataAdapter("PA_Con_ContratosUpdate")
@@ -487,7 +484,6 @@ Public Class ClsContratos
.Add("@CveChofer2", SqlDbType.Int).Value = CveChofer2 .Add("@CveChofer2", SqlDbType.Int).Value = CveChofer2
.Add("@CveAF", SqlDbType.Int).Value = CveAF .Add("@CveAF", SqlDbType.Int).Value = CveAF
.Add("@CantidadPasajeros", SqlDbType.Int).Value = CantidadPasajeros .Add("@CantidadPasajeros", SqlDbType.Int).Value = CantidadPasajeros
.Add("@CveRuta", SqlDbType.Int).Value = CveRuta
.Add("@CvePartida", SqlDbType.Int).Value = CvePartida .Add("@CvePartida", SqlDbType.Int).Value = CvePartida
.Add("@CveDestino", SqlDbType.Int).Value = CveDestino .Add("@CveDestino", SqlDbType.Int).Value = CveDestino
.Add("@CveMasivo", SqlDbType.Int).Value = CveMasivo .Add("@CveMasivo", SqlDbType.Int).Value = CveMasivo

24
App_Code/ClsGenerales.vb
View File

@@ -3989,6 +3989,26 @@ Public Class ClsGenerales
Return Retorno Return Retorno
End Function End Function
Public Function UpdateInvEntregaAlmacenEstatus(CveEntregaAlmacen As Integer, CveEmpresa As Integer, Estatus As Integer, Optional CveCompra As Integer = -1) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Inv_EntregaAlmacenEstatusUpdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveEntregaAlmacen", SqlDbType.Int).Value = CveEntregaAlmacen
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@Estatus", SqlDbType.Int).Value = Estatus
.Add("@CveCompra", SqlDbType.Int).Value = CveCompra
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al actualizar estatus entrega almacen", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try
Return Retorno
End Function
Public Function AsignaEntregaAlmacenRuta(CveCamion As Integer, CveChofer As Integer, FechaEntrega As Date, FechaLlegada As DateTime, CveEntregaAlmacen As Integer, CveEmpresa As Integer) As Boolean Public Function AsignaEntregaAlmacenRuta(CveCamion As Integer, CveChofer As Integer, FechaEntrega As Date, FechaLlegada As DateTime, CveEntregaAlmacen As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Inv_EntregaAlmacenRutaAsignar") DataAdapter("PA_Inv_EntregaAlmacenRutaAsignar")
@@ -4061,12 +4081,11 @@ Public Class ClsGenerales
End Function End Function
Public Function GetInvEntregaAlmacenRutaRep(CveSubProyecto As Integer, CveEmpresa As Integer, Estatus As Integer, FechaInicio As Date, FechaFin As Date, CveChofer As Integer, CveUsuario As Integer, Optional CveTimbre As Integer = -1) As Boolean Public Function GetInvEntregaAlmacenRutaRep(CveSubProyecto As Integer, CveEmpresa As Integer, Estatus As Integer, FechaInicio As Date, FechaFin As Date, CveChofer As Integer, CveUsuario As Integer, Optional CveTimbre As Integer = -1, Optional Tipo As String = "-1") As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Inv_EntregaAlmacenRutaRepGet2") DataAdapter("PA_Inv_EntregaAlmacenRutaRepGet2")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
@@ -4077,6 +4096,7 @@ Public Class ClsGenerales
.Add("@CveChofer", SqlDbType.Int).Value = CveChofer .Add("@CveChofer", SqlDbType.Int).Value = CveChofer
.Add("@CveTimbre", SqlDbType.Int).Value = CveTimbre .Add("@CveTimbre", SqlDbType.Int).Value = CveTimbre
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@Tipo", SqlDbType.VarChar).Value = Tipo
End With End With
Try Try

31
App_Code/ClsInventarios.vb
View File

@@ -989,9 +989,8 @@ Public Class ClsInventarios
CveVenta As Integer, CveSubProyecto As Integer, CveActivoFijo As Integer, Optional CveOS As Integer = -1, Optional CvePersonal As Integer = -1, Optional IDPoliza As Integer = -1, Optional CveUsuarioResponsable As Integer = -1, CveVenta As Integer, CveSubProyecto As Integer, CveActivoFijo As Integer, Optional CveOS As Integer = -1, Optional CvePersonal As Integer = -1, Optional IDPoliza As Integer = -1, Optional CveUsuarioResponsable As Integer = -1,
Optional CveConsignacion As Integer = -1, Optional Guia As String = "", Optional CveAlmacenDestino As Integer = -1, Optional Observaciones As String = "", Optional Recibio As String = "", Optional CveConsignacion As Integer = -1, Optional Guia As String = "", Optional CveAlmacenDestino As Integer = -1, Optional Observaciones As String = "", Optional Recibio As String = "",
Optional CveMovimientoRelacionado As Integer = -1, Optional TipoCambio As Decimal = -1, Optional CveVendedor As Integer = -1, Optional CveCliente As Integer = -1, Optional MovimientoFijo As Boolean = False, Optional CveContrato As Integer = -1, Optional CveMovimientoRelacionado As Integer = -1, Optional TipoCambio As Decimal = -1, Optional CveVendedor As Integer = -1, Optional CveCliente As Integer = -1, Optional MovimientoFijo As Boolean = False, Optional CveContrato As Integer = -1,
Optional CveProveedor As Integer = -1, Optional Remision As String = "", Optional CveClienteSucursal As Integer = -1, Optional DepartamentoEntrega As String = "", Optional PedidoContrato As String = "", Optional GastoIndirecto As Decimal = -1, Optional CveChofer As Integer = -1, Optional CveCamion As Integer = -1, Optional Placa As String = "", Optional CveProveedor As Integer = -1, Optional Remision As String = "", Optional CveClienteSucursal As Integer = -1, Optional DepartamentoEntrega As String = "", Optional PedidoContrato As String = "", Optional GastoIndirecto As Decimal = -1,
Optional FechaEntrega As String = "", Optional EspecifUnidad As String = "", Optional ResponsableCarga As String = "", Optional ResponsableRecibio As String = "", Optional Identificacion As String = "", Optional Domicilio As String = "", Optional ResponsableCarga As String = "", Optional ResponsableRecibio As String = "", Optional Modulo As String = "", Optional CveOP As Integer = -1, Optional CveFolioGarantia As Integer = -1, Optional CveEntregaAlmacen As Integer = -1) As Integer
Optional Telefono As String = "", Optional Ciudad As String = "", Optional Licencia As String = "", Optional Modulo As String = "", Optional CveOP As Integer = -1, Optional CveFolioGarantia As Integer = -1) As Integer
Dim Retorno As Integer = -1 Dim Retorno As Integer = -1
@@ -1037,21 +1036,21 @@ Public Class ClsInventarios
.Add("@CveClienteSucursal", SqlDbType.Int).Value = CveClienteSucursal .Add("@CveClienteSucursal", SqlDbType.Int).Value = CveClienteSucursal
.Add("@PedidoContrato", SqlDbType.VarChar).Value = PedidoContrato .Add("@PedidoContrato", SqlDbType.VarChar).Value = PedidoContrato
.Add("@GastoIndirecto", SqlDbType.Money).Value = GastoIndirecto .Add("@GastoIndirecto", SqlDbType.Money).Value = GastoIndirecto
.Add("@CveChofer", SqlDbType.Int).Value = CveChofer '.Add("@CveChofer", SqlDbType.Int).Value = CveChofer
.Add("@CveCamion", SqlDbType.Int).Value = CveCamion '.Add("@CveCamion", SqlDbType.Int).Value = CveCamion
.Add("@Placa", SqlDbType.VarChar).Value = Placa '.Add("@Placa", SqlDbType.VarChar).Value = Placa
.Add("@FechaEntrega", SqlDbType.VarChar).Value = FechaEntrega '.Add("@FechaEntrega", SqlDbType.VarChar).Value = FechaEntrega
.Add("@EspecifUnidad", SqlDbType.VarChar).Value = EspecifUnidad '.Add("@EspecifUnidad", SqlDbType.VarChar).Value = EspecifUnidad
.Add("@ResponsableCarga", SqlDbType.VarChar).Value = ResponsableCarga .Add("@ResponsableCarga", SqlDbType.VarChar).Value = ResponsableCarga
.Add("@ResponsableRecibio", SqlDbType.VarChar).Value = ResponsableRecibio .Add("@ResponsableRecibio", SqlDbType.VarChar).Value = ResponsableRecibio
.Add("@Identificacion", SqlDbType.VarChar).Value = Identificacion '.Add("@Identificacion", SqlDbType.VarChar).Value = Identificacion
.Add("@Domicilio", SqlDbType.VarChar).Value = Domicilio '.Add("@Domicilio", SqlDbType.VarChar).Value = Domicilio
.Add("@Telefono", SqlDbType.VarChar).Value = Telefono '.Add("@Telefono", SqlDbType.VarChar).Value = Telefono
.Add("@Ciudad", SqlDbType.VarChar).Value = Ciudad '.Add("@Ciudad", SqlDbType.VarChar).Value = Ciudad
.Add("@Licencia", SqlDbType.VarChar).Value = Licencia '.Add("@Licencia", SqlDbType.VarChar).Value = Licencia
.Add("@Modulo", SqlDbType.VarChar).Value = Modulo .Add("@Modulo", SqlDbType.VarChar).Value = Modulo
.Add("@CveOP", SqlDbType.Int).Value = CveOP .Add("@CveOP", SqlDbType.Int).Value = CveOP
.Add("@CveEntregaAlmacen", SqlDbType.Int).Value = CveEntregaAlmacen
.Add("@CveFolioGarantia", SqlDbType.Int).Value = CveFolioGarantia .Add("@CveFolioGarantia", SqlDbType.Int).Value = CveFolioGarantia
End With End With
@@ -2179,7 +2178,7 @@ Public Class ClsInventarios
Return Retorno Return Retorno
End Function End Function
Public Function GetExistenciasProductosLike(PS As String, CveClasificacion As Integer, CveSubProyecto As Integer, Estatus As Integer, AplicaParaVenta As Integer, CveEmpresa As Integer, Optional CveMarca As Integer = -1) As Boolean Public Function GetExistenciasProductosLike(PS As String, CveClasificacion As Integer, CveSubProyecto As Integer, Estatus As Integer, AplicaParaVenta As Integer, CveEmpresa As Integer, Optional CveMarca As Integer = -1, Optional MostrarTodosAlmacenes As Boolean = False, Optional CveAlmacen As Integer = -1) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_ProductosServiciosInventario") DataAdapter("PA_ProductosServiciosInventario")
@@ -2191,6 +2190,8 @@ Public Class ClsInventarios
.Add("@AplicaParaVenta", SqlDbType.Int).Value = AplicaParaVenta .Add("@AplicaParaVenta", SqlDbType.Int).Value = AplicaParaVenta
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@CveMarca", SqlDbType.Int).Value = CveMarca .Add("@CveMarca", SqlDbType.Int).Value = CveMarca
.Add("@MostrarTodosAlmacenes", SqlDbType.Bit).Value = MostrarTodosAlmacenes
.Add("@CveAlmacen", SqlDbType.Int).Value = CveAlmacen
End With End With
Try Try

9
App_Code/ClsOC.vb
View File

@@ -581,7 +581,7 @@ Public Class ClsOC
Return Retorno Return Retorno
End Function End Function
Public Function GetOC(CveOrdenCompra As Integer, CveEmpresa As Integer, Optional Folio As Integer = -1, Optional CveSubProyecto As Integer = -1, Optional Tipo As String = "-1", Optional CveVendedor As Integer = -1, Optional CveCliente As Integer = -1, Optional Guia As String = "-1", Optional CveUsuario As Integer = -1) As Boolean Public Function GetOC(CveOrdenCompra As Integer, CveEmpresa As Integer, Optional Folio As Integer = -1, Optional CveSubProyecto As Integer = -1, Optional Tipo As String = "-1", Optional CveVendedor As Integer = -1, Optional CveCliente As Integer = -1, Optional Guia As String = "-1", Optional CveUsuario As Integer = -1, Optional ConsultaInventarioOC As Boolean = False) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_OC_OrdenesCompraGet") DataAdapter("PA_OC_OrdenesCompraGet")
@@ -596,6 +596,7 @@ Public Class ClsOC
.Add("@Guia", SqlDbType.Int).Value = Guia .Add("@Guia", SqlDbType.Int).Value = Guia
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@ConsultaInventarioOC", SqlDbType.Bit).Value = ConsultaInventarioOC
End With End With
Try Try
@@ -707,7 +708,7 @@ Public Class ClsOC
Optional PorcentajeIVA As Decimal = 0.16D, Optional IVA As Decimal = 0, Optional RetIVA As Decimal = 0, Optional RetISR As Decimal = 0, Optional FechaExpiracion As Date = Nothing, Optional CveCotizacion As Integer = -1, Optional PorcentajeIVA As Decimal = 0.16D, Optional IVA As Decimal = 0, Optional RetIVA As Decimal = 0, Optional RetISR As Decimal = 0, Optional FechaExpiracion As Date = Nothing, Optional CveCotizacion As Integer = -1,
Optional FolioAdicional As String = "", Optional EntregaDirecta As Integer = -1, Optional CveDireccionEnvio As Integer = -1, Optional Guia As String = "-1", Optional IEPS As Decimal = -1, Optional FolioAdicional As String = "", Optional EntregaDirecta As Integer = -1, Optional CveDireccionEnvio As Integer = -1, Optional Guia As String = "-1", Optional IEPS As Decimal = -1,
Optional CveIEAnticipo As Integer = -1, Optional ImporteAnticipo As Decimal = 0, Optional UsoCFDI As Integer = -1, Optional Promocion As String = "-1", Optional CveProveedorContacto As Integer = -1, Optional NumRemision As String = "-1", Optional CveIEAnticipo As Integer = -1, Optional ImporteAnticipo As Decimal = 0, Optional UsoCFDI As Integer = -1, Optional Promocion As String = "-1", Optional CveProveedorContacto As Integer = -1, Optional NumRemision As String = "-1",
Optional CveColectiva As Integer = -1) As Boolean Optional CveColectiva As Integer = -1, Optional MetodoPago As Integer = -1) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_OC_OrdenesCompraAdd") DataAdapter("PA_OC_OrdenesCompraAdd")
@@ -752,6 +753,7 @@ Public Class ClsOC
.Add("@CveProveedorContacto", SqlDbType.Int).Value = CveProveedorContacto .Add("@CveProveedorContacto", SqlDbType.Int).Value = CveProveedorContacto
.Add("@NumRemision", SqlDbType.VarChar).Value = NumRemision .Add("@NumRemision", SqlDbType.VarChar).Value = NumRemision
.Add("@CveColectiva", SqlDbType.Int).Value = CveColectiva .Add("@CveColectiva", SqlDbType.Int).Value = CveColectiva
.Add("@MetodoPago", SqlDbType.Int).Value = MetodoPago ' 0 Contado, 1 Credito
.Add("@vCveOrdenCompra", SqlDbType.Int).Direction = ParameterDirection.Output .Add("@vCveOrdenCompra", SqlDbType.Int).Direction = ParameterDirection.Output
.Add("@vFolio", SqlDbType.Int).Direction = ParameterDirection.Output .Add("@vFolio", SqlDbType.Int).Direction = ParameterDirection.Output
@@ -915,7 +917,7 @@ Public Class ClsOC
pCveProveedor As Integer, pCveOrdenCompra As Integer, pCveUsuarioModifico As Integer, Optional CveCliente As Integer = -1, Optional CveVendedor As Integer = -1, Optional PrioridadObservacion As String = "", pCveProveedor As Integer, pCveOrdenCompra As Integer, pCveUsuarioModifico As Integer, Optional CveCliente As Integer = -1, Optional CveVendedor As Integer = -1, Optional PrioridadObservacion As String = "",
Optional IVA As Decimal = 0, Optional RetIVA As Decimal = 0, Optional RetISR As Decimal = 0, Optional IDPoliza As Integer = -1, Optional FechaExpiracion As Date = Nothing, Optional FolioAdicional As String = "", Optional IVA As Decimal = 0, Optional RetIVA As Decimal = 0, Optional RetISR As Decimal = 0, Optional IDPoliza As Integer = -1, Optional FechaExpiracion As Date = Nothing, Optional FolioAdicional As String = "",
Optional EntregaDirecta As Integer = -1, Optional CveDireccionEnvio As Integer = -1, Optional Guia As String = "-1", Optional IEPS As Decimal = -1, Optional UsoCFDI As Integer = -1, Optional Promocion As String = "-1", Optional EntregaDirecta As Integer = -1, Optional CveDireccionEnvio As Integer = -1, Optional Guia As String = "-1", Optional IEPS As Decimal = -1, Optional UsoCFDI As Integer = -1, Optional Promocion As String = "-1",
Optional pCveProveedorSucursal As Integer = -1, Optional CveProveedorContacto As Integer = -1, Optional PorcentajeIVA As Decimal = 0.16D, Optional NumRemision As String = "-1") As Boolean Optional pCveProveedorSucursal As Integer = -1, Optional CveProveedorContacto As Integer = -1, Optional PorcentajeIVA As Decimal = 0.16D, Optional NumRemision As String = "-1", Optional MetodoPago As Integer = -1) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_OC_OrdenesCompraUpdate") DataAdapter("PA_OC_OrdenesCompraUpdate")
@@ -950,6 +952,7 @@ Public Class ClsOC
.Add("@CveProveedorContacto", SqlDbType.Int).Value = CveProveedorContacto .Add("@CveProveedorContacto", SqlDbType.Int).Value = CveProveedorContacto
.Add("@PorcentajeIVA", SqlDbType.SmallMoney).Value = PorcentajeIVA .Add("@PorcentajeIVA", SqlDbType.SmallMoney).Value = PorcentajeIVA
.Add("@NumRemision", SqlDbType.VarChar).Value = NumRemision .Add("@NumRemision", SqlDbType.VarChar).Value = NumRemision
.Add("@MetodoPago", SqlDbType.Int).Value = MetodoPago ' 0 Contado, 1 Credito
End With End With
Try Try

13
App_Code/ClsOS.vb
View File

@@ -73,7 +73,7 @@ Public Class ClsOS
Public Property CveVenta As Integer = -1 Public Property CveVenta As Integer = -1
Public Property Paciente As String Public Property Paciente As String
Public Property IdentificadorCliente As String Public Property IdentificadorCliente As String
Public Property FolioAdicional As String
Private Class Especificaciones Private Class Especificaciones
Public CveValor As Integer Public CveValor As Integer
Public CvePSCaracteristica As Integer Public CvePSCaracteristica As Integer
@@ -595,6 +595,7 @@ Public Class ClsOS
Me.Paciente = Data.Rows(0)("Paciente").ToString Me.Paciente = Data.Rows(0)("Paciente").ToString
Me.IdentificadorCliente = Data.Rows(0)("IdentificadorCliente").ToString Me.IdentificadorCliente = Data.Rows(0)("IdentificadorCliente").ToString
Me.CveVenta = Data.Rows(0)("CveVenta").ToString.ToEntero Me.CveVenta = Data.Rows(0)("CveVenta").ToString.ToEntero
Me.FolioAdicional = Data.Rows(0)("FolioAdicional").ToString
End If End If
Retorno = True Retorno = True
@@ -651,7 +652,7 @@ Public Class ClsOS
CveUsuario As Integer, CveEmpresa As Integer, CveCotizacion As Integer, CveVenta As Integer, CveOSPadre As Integer, CveOSTipo As Integer, Optional CveClienteSucursal As Integer = -1, CveUsuario As Integer, CveEmpresa As Integer, CveCotizacion As Integer, CveVenta As Integer, CveOSPadre As Integer, CveOSTipo As Integer, Optional CveClienteSucursal As Integer = -1,
Optional Direccion As String = "-1", Optional Telefono As String = "", Optional CveModeloAuto As Integer = -1, Optional Año As String = "-1", Optional Correo As String = "", Optional Direccion As String = "-1", Optional Telefono As String = "", Optional CveModeloAuto As Integer = -1, Optional Año As String = "-1", Optional Correo As String = "",
Optional Condiciones As String = "", Optional CveMedico As Integer = -1, Optional CveProcedimiento As Integer = -1, Optional CveTipoVenta As Integer = -1, Optional FechaCita As DateTime = MinFecha, Optional Condiciones As String = "", Optional CveMedico As Integer = -1, Optional CveProcedimiento As Integer = -1, Optional CveTipoVenta As Integer = -1, Optional FechaCita As DateTime = MinFecha,
Optional Paciente As String = "-1", Optional IdentificadorCliente As String = "-1") As Boolean Optional Paciente As String = "-1", Optional IdentificadorCliente As String = "-1", Optional FolioAdicional As String = "-1") As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_OS_OrdenesServiciosAdd") DataAdapter("PA_OS_OrdenesServiciosAdd")
@@ -685,6 +686,8 @@ Public Class ClsOS
.Add("@Paciente", SqlDbType.VarChar).Value = Paciente .Add("@Paciente", SqlDbType.VarChar).Value = Paciente
.Add("@IdentificadorCliente", SqlDbType.VarChar).Value = IdentificadorCliente .Add("@IdentificadorCliente", SqlDbType.VarChar).Value = IdentificadorCliente
.Add("@FolioAdicional", SqlDbType.VarChar).Value = FolioAdicional
.Add("@CveOS", SqlDbType.Int).Direction = ParameterDirection.Output .Add("@CveOS", SqlDbType.Int).Direction = ParameterDirection.Output
.Add("@vFolio", SqlDbType.Int).Direction = ParameterDirection.Output .Add("@vFolio", SqlDbType.Int).Direction = ParameterDirection.Output
@@ -731,7 +734,7 @@ Public Class ClsOS
CveOSTipo As Integer, Optional CveClienteSucursal As Integer = -1, Optional Direccion As String = "-1", Optional Telefono As String = "", Optional CveModeloAuto As Integer = -1, CveOSTipo As Integer, Optional CveClienteSucursal As Integer = -1, Optional Direccion As String = "-1", Optional Telefono As String = "", Optional CveModeloAuto As Integer = -1,
Optional Año As String = "-1", Optional CveSubProyecto As Integer = -1, Optional Correo As String = "-1", Optional Condiciones As String = "", Optional Año As String = "-1", Optional CveSubProyecto As Integer = -1, Optional Correo As String = "-1", Optional Condiciones As String = "",
Optional CveMedico As Integer = -1, Optional CveProcedimiento As Integer = -1, Optional CveTipoVenta As Integer = -1, Optional FechaCita As DateTime = MinFecha, Optional CveMedico As Integer = -1, Optional CveProcedimiento As Integer = -1, Optional CveTipoVenta As Integer = -1, Optional FechaCita As DateTime = MinFecha,
Optional Paciente As String = "-1", Optional IdentificadorCliente As String = "-1") As Boolean Optional Paciente As String = "-1", Optional IdentificadorCliente As String = "-1", Optional FolioAdicional As String = "-1") As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_OS_OrdenesServiciosUpdate") DataAdapter("PA_OS_OrdenesServiciosUpdate")
@@ -760,6 +763,7 @@ Public Class ClsOS
.Add("@FechaCita", SqlDbType.DateTime).Value = FechaCita .Add("@FechaCita", SqlDbType.DateTime).Value = FechaCita
.Add("@Paciente", SqlDbType.VarChar).Value = Paciente .Add("@Paciente", SqlDbType.VarChar).Value = Paciente
.Add("@IdentificadorCliente", SqlDbType.VarChar).Value = IdentificadorCliente .Add("@IdentificadorCliente", SqlDbType.VarChar).Value = IdentificadorCliente
.Add("@FolioAdicional", SqlDbType.VarChar).Value = FolioAdicional
End With End With
@@ -1308,7 +1312,7 @@ Public Class ClsOS
Return Retorno Return Retorno
End Function End Function
Public Function UpdateVentaOS(CveVenta As Integer, CveOS As Integer, Optional Paciente As String = "-1", Optional Episodio As String = "-1") As Boolean Public Function UpdateVentaOS(CveVenta As Integer, CveOS As Integer, Optional Paciente As String = "-1", Optional Episodio As String = "-1", Optional FolioAdicional As String = "") As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_OS_UpdateVentaOS") DataAdapter("PA_OS_UpdateVentaOS")
@@ -1318,6 +1322,7 @@ Public Class ClsOS
.Add("@CveOS", SqlDbType.Int).Value = CveOS .Add("@CveOS", SqlDbType.Int).Value = CveOS
.Add("@Paciente", SqlDbType.VarChar).Value = Paciente .Add("@Paciente", SqlDbType.VarChar).Value = Paciente
.Add("@Episodio", SqlDbType.VarChar).Value = Episodio .Add("@Episodio", SqlDbType.VarChar).Value = Episodio
.Add("@FolioAdicional", SqlDbType.VarChar).Value = FolioAdicional
End With End With
Try Try

14
App_Code/ClsPaginas.vb
View File

@@ -5487,6 +5487,8 @@ Public Class ClsPaginas
Vta.Procedimiento = dtVentas(0)("Procedimiento").ToString Vta.Procedimiento = dtVentas(0)("Procedimiento").ToString
Vta.Alfa1 = dtVentas(0)("Alfa1").ToString Vta.Alfa1 = dtVentas(0)("Alfa1").ToString
Vta.FechaEjecucion = dtVentas(0)("FechaEjecucion").ToString.ToDateTime Vta.FechaEjecucion = dtVentas(0)("FechaEjecucion").ToString.ToDateTime
Vta.Paciente = dtVentas(0)("Paciente").ToString
Vta.Episodio = dtVentas(0)("Episodio").ToString
Vta.RefDocto = dtVentas(0)("Ref").ToString Vta.RefDocto = dtVentas(0)("Ref").ToString
Vta.CveVenta = dtVentas(0)("CveVenta").ToString.ToEntero Vta.CveVenta = dtVentas(0)("CveVenta").ToString.ToEntero
@@ -7016,6 +7018,10 @@ Public Class ClsPaginas
params.Add(New ReportParameter("Medico", Vta.Medico)) params.Add(New ReportParameter("Medico", Vta.Medico))
params.Add(New ReportParameter("Procedimiento", Vta.Procedimiento)) params.Add(New ReportParameter("Procedimiento", Vta.Procedimiento))
params.Add(New ReportParameter("FechaCirugia", Vta.FechaEjecucion.ToString("dd/MM/yyyy HH:mm"))) params.Add(New ReportParameter("FechaCirugia", Vta.FechaEjecucion.ToString("dd/MM/yyyy HH:mm")))
params.Add(New ReportParameter("Paciente", Vta.Paciente))
params.Add(New ReportParameter("Episodio", Vta.Episodio))
params.Add(New ReportParameter("Alfa1", Vta.Alfa1))
End If End If
'VSH 'VSH
If UsuarioActual.CveEmpresa.Contiene(4, 7, 11, 12, 122, 145) Then If UsuarioActual.CveEmpresa.Contiene(4, 7, 11, 12, 122, 145) Then
@@ -7071,6 +7077,9 @@ Public Class ClsPaginas
params.Add(New ReportParameter("Medico", Vta.Medico)) params.Add(New ReportParameter("Medico", Vta.Medico))
params.Add(New ReportParameter("Procedimiento", Vta.Procedimiento)) params.Add(New ReportParameter("Procedimiento", Vta.Procedimiento))
params.Add(New ReportParameter("FechaCirugia", Vta.FechaEjecucion.ToString("dd/MM/yyyy HH:mm"))) params.Add(New ReportParameter("FechaCirugia", Vta.FechaEjecucion.ToString("dd/MM/yyyy HH:mm")))
params.Add(New ReportParameter("Paciente", Vta.Paciente))
params.Add(New ReportParameter("Episodio", Vta.Episodio))
params.Add(New ReportParameter("Alfa1", Vta.Alfa1))
End If End If
RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo) RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo)
@@ -7179,6 +7188,8 @@ Public Class ClsPaginas
params.Add(New ReportParameter("Medico", Vta.Medico)) params.Add(New ReportParameter("Medico", Vta.Medico))
params.Add(New ReportParameter("Procedimiento", Vta.Procedimiento)) params.Add(New ReportParameter("Procedimiento", Vta.Procedimiento))
params.Add(New ReportParameter("FechaCirugia", Vta.FechaEjecucion.ToString("dd/MM/yyyy HH:mm"))) params.Add(New ReportParameter("FechaCirugia", Vta.FechaEjecucion.ToString("dd/MM/yyyy HH:mm")))
params.Add(New ReportParameter("Paciente", Vta.Paciente))
params.Add(New ReportParameter("Episodio", Vta.Episodio))
End If End If
RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo) RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo)
@@ -10832,10 +10843,11 @@ Public Class ClsPaginas
PaginaDict.Add("/Transportes/RepContratos.aspx".ToUpper(), 598) PaginaDict.Add("/Transportes/RepContratos.aspx".ToUpper(), 598)
PaginaDict.Add("/Transportes/RepContratoDetalle.aspx".ToUpper(), 598) PaginaDict.Add("/Transportes/RepContratoDetalle.aspx".ToUpper(), 598)
PaginaDict.Add("/Transportes/RepViajes.aspx".ToUpper(), 599) PaginaDict.Add("/Transportes/RepViajes.aspx".ToUpper(), 599)
PaginaDict.Add("/Transportes/Boletos.aspx".ToUpper(), 600) PaginaDict.Add("/Transportes/Boletos.aspx".ToUpper(), 599)
PaginaDict.Add("/Transportes/RepBoletos.aspx".ToUpper(), 601) PaginaDict.Add("/Transportes/RepBoletos.aspx".ToUpper(), 601)
PaginaDict.Add("/Transportes/RepContratosCalendario.aspx".ToUpper(), 603) PaginaDict.Add("/Transportes/RepContratosCalendario.aspx".ToUpper(), 603)
PaginaDict.Add("/Transportes/CatRutas.aspx".ToUpper(), 604) PaginaDict.Add("/Transportes/CatRutas.aspx".ToUpper(), 604)
PaginaDict.Add("/Transportes/RepViajesCalendario.aspx".ToUpper(), 605)
#End Region #End Region
'Antes de aquí. 'Antes de aquí.

8
App_Code/ClsProductosServicios.vb
View File

@@ -413,7 +413,8 @@ Public Class ClsProductosServicios
Optional CveMaterialPeligroso As Integer = -1, Optional CveEmbalaje As Integer = -1, Optional PesoKg As Decimal = -1, Optional Dimensiones As String = "", Optional CveObjetoImpuesto As Integer = 0, Optional CveMaterialPeligroso As Integer = -1, Optional CveEmbalaje As Integer = -1, Optional PesoKg As Decimal = -1, Optional Dimensiones As String = "", Optional CveObjetoImpuesto As Integer = 0,
Optional RegistroRSCO As String = "-1", Optional FechaVigenciaRSCO As Date = MinFecha, Optional VigenciaIndeterminadaRSCO As Boolean = False, Optional CveTipoEmpacado As Integer = -1, Optional CveTipoOrganico As Integer = -1, Optional RegistroRSCO As String = "-1", Optional FechaVigenciaRSCO As Date = MinFecha, Optional VigenciaIndeterminadaRSCO As Boolean = False, Optional CveTipoEmpacado As Integer = -1, Optional CveTipoOrganico As Integer = -1,
Optional NombreComercial As String = "", Optional NotasAdicionales As String = "", Optional EcommerceEtiquetas As String = "", Optional ActivoEcommerce As Boolean = False, Optional EcommercePrecio As Decimal = 0, Optional NombreComercial As String = "", Optional NotasAdicionales As String = "", Optional EcommerceEtiquetas As String = "", Optional ActivoEcommerce As Boolean = False, Optional EcommercePrecio As Decimal = 0,
Optional CveClasificacionEcommerce As Integer = -1, Optional EcommerceCantidad As Decimal = 0, Optional CodigoAlterno As String = "-1", Optional PSAlterno As String = "-1", Optional ProductoExhibicion As Boolean = False) As Integer Optional CveClasificacionEcommerce As Integer = -1, Optional EcommerceCantidad As Decimal = 0, Optional CodigoAlterno As String = "-1", Optional PSAlterno As String = "-1", Optional ProductoExhibicion As Boolean = False,
Optional Imagen As String = "") As Integer
Dim Retorno As Integer = -1 Dim Retorno As Integer = -1
DataAdapter("PA_ProductosServiciosAdd") DataAdapter("PA_ProductosServiciosAdd")
@@ -522,7 +523,7 @@ Public Class ClsProductosServicios
.Add("@CodigoAlterno", SqlDbType.VarChar).Value = CodigoAlterno .Add("@CodigoAlterno", SqlDbType.VarChar).Value = CodigoAlterno
.Add("@PSAlterno", SqlDbType.VarChar).Value = PSAlterno .Add("@PSAlterno", SqlDbType.VarChar).Value = PSAlterno
.Add("@ProductoExhibicion", SqlDbType.Bit).Value = ProductoExhibicion .Add("@ProductoExhibicion", SqlDbType.Bit).Value = ProductoExhibicion
.Add("@Imagen", SqlDbType.VarChar).Value = Imagen
End With End With
Try Try
@@ -658,7 +659,7 @@ Public Class ClsProductosServicios
Optional CveMaterialPeligroso As Integer = -1, Optional CveEmbalaje As Integer = -1, Optional PesoKg As Decimal = -1, Optional Dimensiones As String = "", Optional CveObjetoImpuesto As Integer = 0, Optional CveMaterialPeligroso As Integer = -1, Optional CveEmbalaje As Integer = -1, Optional PesoKg As Decimal = -1, Optional Dimensiones As String = "", Optional CveObjetoImpuesto As Integer = 0,
Optional RegistroRSCO As String = "-1", Optional FechaVigenciaRSCO As Date = MinFecha, Optional VigenciaIndeterminadaRSCO As Boolean = False, Optional CveTipoEmpacado As Integer = -1, Optional CveTipoOrganico As Integer = -1, Optional RegistroRSCO As String = "-1", Optional FechaVigenciaRSCO As Date = MinFecha, Optional VigenciaIndeterminadaRSCO As Boolean = False, Optional CveTipoEmpacado As Integer = -1, Optional CveTipoOrganico As Integer = -1,
Optional NombreComercial As String = "", Optional NotasAdicionales As String = "", Optional EcommerceEtiquetas As String = "", Optional ActivoEcommerce As Boolean = False, Optional EcommercePrecio As Decimal = 0, Optional NombreComercial As String = "", Optional NotasAdicionales As String = "", Optional EcommerceEtiquetas As String = "", Optional ActivoEcommerce As Boolean = False, Optional EcommercePrecio As Decimal = 0,
Optional CveClasificacionEcommerce As Integer = -1, Optional EcommerceCantidad As Decimal = 0, Optional CodigoAlterno As String = "-1", Optional PSAlterno As String = "-1", Optional ProductoExhibicion As Boolean = False) As Boolean Optional CveClasificacionEcommerce As Integer = -1, Optional EcommerceCantidad As Decimal = 0, Optional CodigoAlterno As String = "-1", Optional PSAlterno As String = "-1", Optional ProductoExhibicion As Boolean = False, Optional Imagen As String = "") As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
@@ -766,6 +767,7 @@ Public Class ClsProductosServicios
.Add("@CodigoAlterno", SqlDbType.VarChar).Value = CodigoAlterno .Add("@CodigoAlterno", SqlDbType.VarChar).Value = CodigoAlterno
.Add("@PSAlterno", SqlDbType.VarChar).Value = PSAlterno .Add("@PSAlterno", SqlDbType.VarChar).Value = PSAlterno
.Add("@ProductoExhibicion", SqlDbType.Bit).Value = ProductoExhibicion .Add("@ProductoExhibicion", SqlDbType.Bit).Value = ProductoExhibicion
.Add("@Imagen", SqlDbType.VarChar).Value = Imagen
End With End With
Try Try

169
App_Code/ClsTransportes.vb
View File

@@ -167,12 +167,12 @@ Public Class ClsTransportes
Return Retorno Return Retorno
End Function End Function
Public Function GetViajesPasajeros(CveViaje As Integer, Optional CveViajePasajero As Integer = -1, Optional Estatus As Integer = -1) As Boolean Public Function GetViajesPasajeros(CveContrato As Integer, Optional CveViajePasajero As Integer = -1, Optional Estatus As Integer = -1) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Trans_ViajesPasajerosGet") DataAdapter("PA_Trans_ViajesPasajerosGet")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@CveViaje", SqlDbType.Int).Value = CveViaje .Add("@CveContrato", SqlDbType.Int).Value = CveContrato
.Add("@CveViajePasajero", SqlDbType.Int).Value = CveViajePasajero .Add("@CveViajePasajero", SqlDbType.Int).Value = CveViajePasajero
.Add("@Estatus", SqlDbType.Int).Value = Estatus .Add("@Estatus", SqlDbType.Int).Value = Estatus
End With End With
@@ -186,13 +186,23 @@ Public Class ClsTransportes
Return Retorno Return Retorno
End Function End Function
Public Function UpdateViajesPasajeros(CveViajePasajero As Integer, Optional Estatus As Boolean = True, Optional Activar As Boolean = False) As Boolean Public Function UpdateViajesPasajeros(CveViajePasajero As Integer, Optional CveViaje As Integer = -1, Optional CveVendedor As Integer = -1, Optional Importe As Decimal = -1, Optional Asiento As Integer = -1, Optional Nombre As String = "", Optional Visa As String = "", Optional Celular As String = "", Optional Observacion As String = "", Optional Estatus As Boolean = True, Optional CveUsuario As Integer = -1, Optional Sexo As Boolean = True) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Trans_ViajesPasajerosUpdate") DataAdapter("PA_Trans_ViajesPasajerosUpdate")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@CveViajePasajero", SqlDbType.Int).Value = CveViajePasajero .Add("@CveViajePasajero", SqlDbType.Int).Value = CveViajePasajero
.Add("@Estatus", SqlDbType.Int).Value = Estatus .Add("@CveViaje", SqlDbType.Int).Value = CveViaje
.Add("@CveVendedor", SqlDbType.Int).Value = CveVendedor
.Add("@Importe", SqlDbType.SmallMoney).Value = Importe
.Add("@Asiento", SqlDbType.TinyInt).Value = Asiento
.Add("@Nombre", SqlDbType.VarChar).Value = Nombre
.Add("@Visa", SqlDbType.VarChar).Value = Visa
.Add("@Celular", SqlDbType.VarChar).Value = Celular
.Add("@Observacion", SqlDbType.VarChar).Value = Observacion
.Add("@Estatus", SqlDbType.Bit).Value = Estatus
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@Sexo", SqlDbType.Bit).Value = Sexo
End With End With
Try Try
@@ -205,10 +215,48 @@ Public Class ClsTransportes
Return Retorno Return Retorno
End Function End Function
Public Function CancelarViaje(CveViajePasajero As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Trans_ViajesPasajerosCancelarUpdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveViajePasajero", SqlDbType.Int).Value = CveViajePasajero
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al cancelar el boleto.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function GetRemisionBoleto(CveViajePasajero As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Trans_ViajesPasajerosVentaGet")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveViajePasajero", SqlDbType.Int).Value = CveViajePasajero
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al obtener la remisión del boleto.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
#End Region #End Region
#Region "Destinos" #Region "Destinos"
Public Function GetDestinos(Optional CveRuta As Integer = 0) As Boolean Public Function GetDestinos(Optional CveSubProyecto As Integer = 0) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Trans_DestinosGet") DataAdapter("PA_Trans_DestinosGet")
If CveRuta <> 0 Then If CveRuta <> 0 Then
@@ -234,7 +282,7 @@ Public Class ClsTransportes
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@CveDestino", SqlDbType.Int).Direction = ParameterDirection.Output .Add("@CveDestino", SqlDbType.Int).Direction = ParameterDirection.Output
.Add("@Destino", SqlDbType.VarChar).Value = Destino .Add("@Destino", SqlDbType.VarChar).Value = Destino
.Add("@EsNacional", SqlDbType.VarChar).Value = Convert.ToBoolean(EsNacional) .Add("@EsNacional", SqlDbType.Bit).Value = Convert.ToBoolean(EsNacional)
.Add("@Estatus", SqlDbType.Bit).Value = Convert.ToBoolean(Estatus) .Add("@Estatus", SqlDbType.Bit).Value = Convert.ToBoolean(Estatus)
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
@@ -270,13 +318,14 @@ Public Class ClsTransportes
Return Retorno Return Retorno
End Function End Function
Public Function RemoveDestino(CveDestino As Integer) As Boolean Public Function RemoveDestino(CveDestino As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Trans_DestinosRemove") DataAdapter("PA_Trans_DestinosRemove")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@CveDestino", SqlDbType.Int).Value = CveDestino .Add("@CveDestino", SqlDbType.Int).Value = CveDestino
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With End With
Try Try
@@ -290,93 +339,12 @@ Public Class ClsTransportes
End Function End Function
#End Region #End Region
#Region "Rutas"
Public Function GetRutas(CveRuta As Integer, CveUsuario As Integer, CveEmpresa As Integer, Ruta As String, Estatus As Boolean, FechaIng As DateTime) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Trans_RutasGet")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveRuta", SqlDbType.Int).Value = CveRuta
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@Ruta", SqlDbType.VarChar).Value = Ruta
.Add("@Estatus", SqlDbType.Bit).Value = Estatus
.Add("@FechaIng", SqlDbType.DateTime).Value = FechaIng
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al obtener las rutas.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function AddRuta(Ruta As String, Estatus As String, CveUsuario As Integer, CveEmpresa As Integer) As Integer
Dim Retorno As Integer = -1
DataAdapter("PA_Trans_RutasAdd")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveRuta", SqlDbType.Int).Direction = ParameterDirection.Output
.Add("@Ruta", SqlDbType.VarChar).Value = Ruta
.Add("@Estatus", SqlDbType.Bit).Value = Convert.ToBoolean(Estatus)
.Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = CInt(SqlAdapter.SelectCommand.Parameters("@CveRuta").Value.ToString)
Catch ex As Exception
OnError("Ocurrió un error al agregar la ruta.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function UpdateRuta(CveRuta As Integer, Ruta As String, Estatus As String, CveUsuario As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Trans_RutasUpdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveRuta", SqlDbType.Int).Value = CveRuta
.Add("@Ruta", SqlDbType.VarChar).Value = Ruta
.Add("@Estatus", SqlDbType.Bit).Value = Convert.ToBoolean(Estatus)
.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 la ruta.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function RemoveRuta(CveRuta As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Trans_RutasRemove")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveRuta", SqlDbType.Int).Value = CveRuta
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al eliminar la ruta.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
#End Region
#Region "Importes" #Region "Importes"
Public Function GetDestinosTarifas(CveDestinoOrigen As Integer, CveDestinoFinal As Integer) As Boolean Public Function GetDestinosTarifas(CveSubProyecto As Integer, CveDestinoOrigen As Integer, CveDestinoFinal As Integer) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Trans_DestinosTarifasGet") DataAdapter("PA_Trans_DestinosTarifasGet")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@CveDestinoOrigen", SqlDbType.Int).Value = CveDestinoOrigen .Add("@CveDestinoOrigen", SqlDbType.Int).Value = CveDestinoOrigen
.Add("@CveDestinoFinal", SqlDbType.Int).Value = CveDestinoFinal .Add("@CveDestinoFinal", SqlDbType.Int).Value = CveDestinoFinal
End With End With
@@ -390,16 +358,16 @@ Public Class ClsTransportes
Return Retorno Return Retorno
End Function End Function
Public Function AddDestinosTarifas(CveRuta As String, CveDestinoOrigen As String, CveDestinoFinal As String, Importe As String) As Integer Public Function AddDestinosTarifas(CveSubProyecto As Integer, CveDestinoOrigen As Integer, CveDestinoFinal As Integer, Importe As Decimal) As Integer
Dim Retorno As Integer = -1 Dim Retorno As Integer = -1
DataAdapter("PA_Trans_DestinosTarifasAdd") DataAdapter("PA_Trans_DestinosTarifasAdd")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@CveDestinoTarifa", SqlDbType.Int).Direction = ParameterDirection.Output .Add("@CveDestinoTarifa", SqlDbType.Int).Direction = ParameterDirection.Output
.Add("@CveRuta", SqlDbType.Int).Value = CveRuta.ToEntero .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@CveDestinoOrigen", SqlDbType.Int).Value = CveDestinoOrigen.ToEntero .Add("@CveDestinoOrigen", SqlDbType.Int).Value = CveDestinoOrigen
.Add("@CveDestinoFinal", SqlDbType.Int).Value = CveDestinoFinal.ToEntero .Add("@CveDestinoFinal", SqlDbType.Int).Value = CveDestinoFinal
.Add("@Importe", SqlDbType.SmallMoney).Value = Importe.ToDecimal .Add("@Importe", SqlDbType.SmallMoney).Value = Importe
End With End With
Try Try
SqlAdapter.Fill(Data) SqlAdapter.Fill(Data)
@@ -410,15 +378,15 @@ Public Class ClsTransportes
Return Retorno Return Retorno
End Function End Function
Public Function UpdateDestinosTarifas(CveDestinoTarifa As Integer, CveRuta As String, CveDestinoOrigen As String, CveDestinoFinal As String, Importe As String) As Boolean Public Function UpdateDestinosTarifas(CveDestinoTarifa As Integer, CveSubProyecto As Integer, CveDestinoOrigen As Integer, CveDestinoFinal As Integer, Importe As Decimal) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Trans_DestinosTarifasUpdate") DataAdapter("PA_Trans_DestinosTarifasUpdate")
With SqlAdapter.SelectCommand.Parameters With SqlAdapter.SelectCommand.Parameters
.Add("@CveDestinoTarifa", SqlDbType.Int).Value = CveDestinoTarifa .Add("@CveDestinoTarifa", SqlDbType.Int).Value = CveDestinoTarifa
.Add("@CveRuta", SqlDbType.Int).Value = CveRuta.ToEntero .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@CveDestinoOrigen", SqlDbType.Int).Value = CveDestinoOrigen.ToEntero .Add("@CveDestinoOrigen", SqlDbType.Int).Value = CveDestinoOrigen
.Add("@CveDestinoFinal", SqlDbType.Int).Value = CveDestinoFinal.ToEntero .Add("@CveDestinoFinal", SqlDbType.Int).Value = CveDestinoFinal
.Add("@Importe", SqlDbType.SmallMoney).Value = Importe.ToDecimal .Add("@Importe", SqlDbType.SmallMoney).Value = Importe
End With End With
Try Try
SqlAdapter.Fill(Data) SqlAdapter.Fill(Data)
@@ -447,5 +415,4 @@ Public Class ClsTransportes
Return Retorno Return Retorno
End Function End Function
#End Region #End Region
End Class End Class

22
App_Code/ClsVentas.vb
View File

@@ -880,6 +880,25 @@ Public Class ClsVentas
Return Retorno Return Retorno
End Function End Function
Public Function UpdateBoletosVenta(CveVenta As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Vta_VentasBoletosUpdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveVenta", SqlDbType.Int).Value = CveVenta
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
OnError("Ocurrió un error al cancelar los boletos de la venta.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
End Try
Return Retorno
End Function
Public Function UpdateEstatusFactura(Estatus As Integer, FolioFiscal As String, SelloSAT As String, FechaCancelacion As DateTime, CveVenta As Integer, Public Function UpdateEstatusFactura(Estatus As Integer, FolioFiscal As String, SelloSAT As String, FechaCancelacion As DateTime, CveVenta As Integer,
Optional IdPolizaCancelacion As Integer = -1, Optional CvePAC As Integer = -1, Optional CveEstatusRefacturacion As Integer = 0, Optional IdPolizaCancelacion As Integer = -1, Optional CvePAC As Integer = -1, Optional CveEstatusRefacturacion As Integer = 0,
Optional CveUsuarioCambiaEstatus As Integer = -1, Optional FechaCambioEstatus As String = "-1", Optional RFCReceptor As String = "-1", Optional CveUsuarioCambiaEstatus As Integer = -1, Optional FechaCambioEstatus As String = "-1", Optional RFCReceptor As String = "-1",
@@ -1428,7 +1447,7 @@ Public Class ClsVentas
Optional CveContratoDetalle As Integer = -1, Optional PorcentajeIVA As Decimal = 0, Optional IEPS As Decimal = -1, Optional PorcentajeIEPS As Double = 0, Optional CvePromocionDetalle As Integer = -1, Optional CveContratoDetalle As Integer = -1, Optional PorcentajeIVA As Decimal = 0, Optional IEPS As Decimal = -1, Optional PorcentajeIEPS As Double = 0, Optional CvePromocionDetalle As Integer = -1,
Optional CveMovimientoDetallePedido As Integer = -1, Optional ImporteRetIVA As Decimal = 0, Optional PorcentajeRetIVA As Double = 0, Optional CveMovimientoDetallePedido As Integer = -1, Optional ImporteRetIVA As Decimal = 0, Optional PorcentajeRetIVA As Double = 0,
Optional ImporteRetISR As Decimal = 0, Optional PorcentajeRetISR As Decimal = 0, Optional CuentaPredial As String = "", Optional CvePrecioLista As Integer = -1, Optional CveActivoFijo As Integer = -1, Optional ImporteRetISR As Decimal = 0, Optional PorcentajeRetISR As Decimal = 0, Optional CuentaPredial As String = "", Optional CvePrecioLista As Integer = -1, Optional CveActivoFijo As Integer = -1,
Optional NumTurnos As Decimal = 0D, Optional EstatusAlmacen As Integer = 0, Optional CantidadConversion As Decimal = 0) As Boolean Optional NumTurnos As Decimal = 0D, Optional EstatusAlmacen As Integer = 0, Optional CantidadConversion As Decimal = 0, Optional CveViajePasajero As Integer = -1) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_VentasDetalleAdd") DataAdapter("PA_VentasDetalleAdd")
@@ -1463,6 +1482,7 @@ Public Class ClsVentas
.Add("@NumTurnos", SqlDbType.Decimal).Value = NumTurnos .Add("@NumTurnos", SqlDbType.Decimal).Value = NumTurnos
.Add("@EstatusAlmacen", SqlDbType.Int).Value = EstatusAlmacen .Add("@EstatusAlmacen", SqlDbType.Int).Value = EstatusAlmacen
.Add("@CantidadConversion", SqlDbType.Decimal).Value = CantidadConversion .Add("@CantidadConversion", SqlDbType.Decimal).Value = CantidadConversion
.Add("@CveViajePasajero", SqlDbType.Int).Value = CveViajePasajero
End With End With
Try Try

130
App_Code/Modelos.vb
View File

@@ -1024,9 +1024,11 @@ Namespace Modelos
Dim ObjTimbrado As New Timbrado Dim ObjTimbrado As New Timbrado
'DOCUMENTO ACTUAL 'DOCUMENTO ACTUAL
If DebeTimbrar Then If DebeTimbrar Then
Dim CvePAC As Integer = -1
If Me.EmitirCartaPorte AndAlso CveTimbreCartaPorte > 0 Then If Me.EmitirCartaPorte AndAlso CveTimbreCartaPorte > 0 Then
Dim RespCartaPorte As Timbres.MMensajeCartaPorte = Timbres.PreParaCartaPorteFactura(CveTimbreCartaPorte, UsuarioActual) Dim RespCartaPorte As Timbres.MMensajeCartaPorte = Timbres.PreParaCartaPorteFactura(CveTimbreCartaPorte, UsuarioActual)
If Not RespCartaPorte.TieneError Then If Not RespCartaPorte.TieneError Then
CvePAC = 4 'código temporal. para que se timbre PAC 4
Me.Timbre.Complementos.CartaPorte = RespCartaPorte.CartaPorte Me.Timbre.Complementos.CartaPorte = RespCartaPorte.CartaPorte
Else Else
DebeTimbrar = False DebeTimbrar = False
@@ -1034,7 +1036,7 @@ Namespace Modelos
End If End If
End If End If
SeTimbro = ObjTimbrado.TimbrarFactura(UsuarioActual, Me) SeTimbro = ObjTimbrado.TimbrarFactura(UsuarioActual, Me, CvePACEspecial:=CvePAC)
'NOTA DE CREDITO - REFACTURADA - CASO ESPECIAL, TIMBRADO E IMPRESION 'NOTA DE CREDITO - REFACTURADA - CASO ESPECIAL, TIMBRADO E IMPRESION
If Not IsNothing(Obj2) AndAlso Obj2.Count > 0 Then If Not IsNothing(Obj2) AndAlso Obj2.Count > 0 Then
@@ -1274,7 +1276,7 @@ Namespace Modelos
ObjFactura.FechaEjecucion = DateTime.Today ObjFactura.FechaEjecucion = DateTime.Today
ObjFactura.UsuarioCreo = UsuarioActual.Usuario ObjFactura.UsuarioCreo = UsuarioActual.Usuario
ObjFactura.CondicionesPago = 0 ObjFactura.CondicionesPago = 0
ObjFactura.TipoDocumento = "Factura" ObjFactura.TipoDocumento = ObjFactura.TipodeComprobante
'Totales, Y se llena TmpDTImpuestos 'Totales, Y se llena TmpDTImpuestos
'CLIENTE 'CLIENTE
@@ -1445,6 +1447,9 @@ Namespace Modelos
TmpDT.Columns.Add("NumTurnos", GetType(Decimal)) TmpDT.Columns.Add("NumTurnos", GetType(Decimal))
TmpDT.Columns("NumTurnos").DefaultValue = 0 TmpDT.Columns("NumTurnos").DefaultValue = 0
TmpDT.Columns.Add("CveViajePasajero", GetType(Integer))
TmpDT.Columns("CveViajePasajero").DefaultValue = -1
Return TmpDT Return TmpDT
End Function End Function
@@ -1452,7 +1457,8 @@ Namespace Modelos
Optional CveUM As Integer = -1, Optional CveProyecto As Integer = -1, Optional Proyecto As String = "", Optional CveUM As Integer = -1, Optional CveProyecto As Integer = -1, Optional Proyecto As String = "",
Optional CveSubProyecto As Integer = -1, Optional CveSubProyecto As Integer = -1,
Optional SubProyecto As String = "", Optional PorcentajeIVA As Decimal = -1, Optional SubProyecto As String = "", Optional PorcentajeIVA As Decimal = -1,
Optional CuentaPredial As String = "", Optional CveVentaDetallePadre As Integer = -1, Optional CveVentaDetalleRemision As Integer = -1) As Boolean Optional CuentaPredial As String = "", Optional CveVentaDetallePadre As Integer = -1,
Optional CveVentaDetalleRemision As Integer = -1, Optional CveViajePasajero As Integer = -1) As Boolean
If Not CvePS > 0 Then If Not CvePS > 0 Then
Alert("Ocurrió un error al cargar la información del producto a agregar. Por favor verifique y vuelva a intentar.", TipoMensaje.MsgError) Alert("Ocurrió un error al cargar la información del producto a agregar. Por favor verifique y vuelva a intentar.", TipoMensaje.MsgError)
@@ -1649,6 +1655,7 @@ Namespace Modelos
Row("AFValorInicial") = 0 Row("AFValorInicial") = 0
Row("NumTurnos") = 0 Row("NumTurnos") = 0
Row("CveViajePasajero") = CveViajePasajero
Me.DtDetalle.Rows.Add(Row) Me.DtDetalle.Rows.Add(Row)
@@ -1661,6 +1668,7 @@ Namespace Modelos
Me.RetIVA = Me.DtDetalle.SUMD("ImporteRetIVA") Me.RetIVA = Me.DtDetalle.SUMD("ImporteRetIVA")
Me.RetISR = Me.DtDetalle.SUMD("ImporteRetISR") Me.RetISR = Me.DtDetalle.SUMD("ImporteRetISR")
Me.IEPS = Me.DtDetalle.SUMD("ImporteIEPS") Me.IEPS = Me.DtDetalle.SUMD("ImporteIEPS")
Me.Descuento = Me.DtDetalle.SUMD("Descuento")
Me.Total = Me.SubTotal + Me.IVA + Me.IEPS - (Me.RetIVA + Me.RetISR) Me.Total = Me.SubTotal + Me.IVA + Me.IEPS - (Me.RetIVA + Me.RetISR)
End Sub End Sub
@@ -2202,6 +2210,14 @@ Namespace Modelos
'Se agregan los PS 'Se agregan los PS
For Each Row As DataRow In TmpDTDetalle.Rows For Each Row As DataRow In TmpDTDetalle.Rows
Dim CveViajePasajero As Integer = -1
'VERIFICA QUE EXISTA LA COLUMNA
If TmpDTDetalle.Columns("CveViajePasajero") IsNot Nothing Then
CveViajePasajero = Row("CveViajePasajero").ToString().ToEntero()
End If
If Not ObjVentas.AddVentaDetalle(ObjVentas.CveVenta, Row("CvePS").ToString.ToEntero, Row("Cantidad").ToString.ToDecimal, Row("CveUM").ToString.ToEntero, If Not ObjVentas.AddVentaDetalle(ObjVentas.CveVenta, Row("CvePS").ToString.ToEntero, Row("Cantidad").ToString.ToDecimal, Row("CveUM").ToString.ToEntero,
Row("PU").ToString.ToDecimal(If(factura.ConvertirPesos, factura.TipoCambio, 1)), Row("ImporteIVA").ToString.ToDecimal(If(factura.ConvertirPesos, factura.TipoCambio, 1)), Math.Round((Row("Total").ToString.ToDecimal(If(factura.ConvertirPesos, factura.TipoCambio, 1)) * (1 + Row("PorcentajeIVA").ToString.ToDecimal(If(factura.ConvertirPesos, factura.TipoCambio, 1)))), 6), Row("PU").ToString.ToDecimal(If(factura.ConvertirPesos, factura.TipoCambio, 1)), Row("ImporteIVA").ToString.ToDecimal(If(factura.ConvertirPesos, factura.TipoCambio, 1)), Math.Round((Row("Total").ToString.ToDecimal(If(factura.ConvertirPesos, factura.TipoCambio, 1)) * (1 + Row("PorcentajeIVA").ToString.ToDecimal(If(factura.ConvertirPesos, factura.TipoCambio, 1)))), 6),
Row("Obs").ToString, Row("Descuento").ToString.ToDecimal(If(factura.ConvertirPesos, factura.TipoCambio, 1)), Row("TipoDescuento").ToString.ToEntero, Row("CveSubProyecto").ToString.ToEntero, Row("CvePresupuestoIngreso").ToString.ToEntero, Row("Obs").ToString, Row("Descuento").ToString.ToDecimal(If(factura.ConvertirPesos, factura.TipoCambio, 1)), Row("TipoDescuento").ToString.ToEntero, Row("CveSubProyecto").ToString.ToEntero, Row("CvePresupuestoIngreso").ToString.ToEntero,
@@ -2210,7 +2226,7 @@ Namespace Modelos
IEPS:=Row("ImporteIEPS").ToString.ToDecimal, CveMovimientoDetallePedido:=Row("CveMovimientoDetallePedido").ToString.ToEntero, IEPS:=Row("ImporteIEPS").ToString.ToDecimal, CveMovimientoDetallePedido:=Row("CveMovimientoDetallePedido").ToString.ToEntero,
ImporteRetIVA:=Row("ImporteRetIVA").ToString.ToDecimal, ImporteRetISR:=Row("ImporteRetISR").ToString.ToDecimal, ImporteRetIVA:=Row("ImporteRetIVA").ToString.ToDecimal, ImporteRetISR:=Row("ImporteRetISR").ToString.ToDecimal,
PorcentajeIEPS:=Row("PorcentajeIEPS").ToString.ToDecimal, PorcentajeRetIVA:=Row("PorcentajeRetIVA").ToString.ToDouble, PorcentajeRetISR:=Row("PorcentajeRetISR").ToString.ToDecimal, CuentaPredial:=Row("CuentaPredial").ToString, PorcentajeIEPS:=Row("PorcentajeIEPS").ToString.ToDecimal, PorcentajeRetIVA:=Row("PorcentajeRetIVA").ToString.ToDouble, PorcentajeRetISR:=Row("PorcentajeRetISR").ToString.ToDecimal, CuentaPredial:=Row("CuentaPredial").ToString,
PorcentajeIVA:=Row("PorcentajeIVA").ToString.ToDecimal) Then PorcentajeIVA:=Row("PorcentajeIVA").ToString.ToDecimal, CveViajePasajero:=CveViajePasajero) Then
ErrorList.Add("Ocurrió un error al agregar un Producto o Servicio a la factura.<br />Revise su factura y cualquier detalle comuníquese a Soporte Técnico") ErrorList.Add("Ocurrió un error al agregar un Producto o Servicio a la factura.<br />Revise su factura y cualquier detalle comuníquese a Soporte Técnico")
Exit For Exit For
Else Else
@@ -5209,6 +5225,82 @@ Namespace Modelos
End If End If
End Function End Function
Public Function CancelarBoleto(CveViajePasajero As Integer) As Boolean
Dim TieneError As Boolean = False
If Me.CveVenta > 0 Then
Dim ObjVentas As New ClsVentas()
Dim ObjTransportes As New ClsTransportes(ObjVentas.IniciaTransacSQL())
Dim ObjConta As New ClsContabilidad(ObjVentas.IniciaTransacSQL())
Dim ObjEventos As New ClsOIEventos(ObjVentas.IniciaTransacSQL())
Try
Dim Row As DataRow = Me.DtDetalle.Select($"CveViajePasajero={CveViajePasajero}").FirstOrDefault()
If Row IsNot Nothing Then
Row("Descuento") = Row("Total")
Row("Obs") = "CANCELADO"
If Not ObjVentas.UpdateVentaDetalleRemision(Row("CveVentaDetalle").ToString().ToEntero(), Row("CvePS").ToString().ToEntero(), Row("Cantidad").ToString().ToDecimal, Row("PU").ToString().ToDecimal(), Row("ImporteIEPS").ToString().ToDecimal(), Row("PorcentajeIEPS").ToString().ToDecimal(), Row("ImporteIVA").ToString().ToDecimal(), Row("PorcentajeIVA").ToString().ToDecimal(), Row("Descuento").ToString().ToDecimal(), Row("Obs").ToString(), UsuarioActual.CveUsuario) Then
TieneError = True
End If
If Not TieneError Then
If Not ObjTransportes.CancelarViaje(CveViajePasajero) Then
TieneError = True
End If
End If
Me.CalculaTotales()
If Not TieneError Then
If Not ObjVentas.UpdateVentas(Me.SubTotal, Me.Descuento, Me.IVA, Me.IEPS, Me.Total, Me.CveMoneda, Me.TipoCambio, Me.Fecha, Me.Observaciones,
UsuarioActual.CveEmpresa, Me.CveVenta, TipoDocto:=Me.TipoDocto) Then
TieneError = True
End If
End If
If Not ObjEventos.AddEventoBitacora("se canceló el boleto:" & Row("Obs").ToString(), "-1", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveVenta:=CveVenta) Then
ErrorList.Add("Ocurrió un error al agregar la bitacora de cancelación de boleto.")
TieneError = True
End If
If Not TieneError Then
TieneError = Not RegenerarPrePolizas(ObjVentas.IniciaTransacSQL())
End If
If Not TieneError Then
If ObjConta.ValidacionesPrePoliza(-1, UsuarioActual, Opcion:=2, CveVenta:=CveVenta) Then
If ObjConta.ValorPolizaDescuadre > 0 Then
If ObjConta.ValorPolizaDescuadre = 2 Then
TieneError = True
Alert(ObjConta.MensajePolizaDescuadre, TipoMensaje.MsgError)
End If
End If
End If
End If
End If
Catch ex As Exception
TieneError = True
GuardaLog(ex.ToString())
End Try
If TieneError Then
ObjVentas.RollBack()
Else
ObjVentas.Commit()
End If
ObjVentas.Dispose()
ObjTransportes.Dispose()
ObjConta.Dispose()
End If
Return Not TieneError
End Function
Private Shared Function DecodeBase64(ByVal strXMLCodificado As String) As String Private Shared Function DecodeBase64(ByVal strXMLCodificado As String) As String
Try Try
Dim decbuff As Byte() = Convert.FromBase64String(strXMLCodificado) Dim decbuff As Byte() = Convert.FromBase64String(strXMLCodificado)
@@ -5246,8 +5338,8 @@ Namespace Modelos
''' Cancela la factura para poder realizar la refacturacion ''' Cancela la factura para poder realizar la refacturacion
''' </summary> ''' </summary>
''' <returns></returns> ''' <returns></returns>
Public Function CancelarPorRefacturacion(CveMotivoCancelacion As Integer, Motivo As String, Optional FolioSustitucion As String = "", Optional ValidarSAT As Boolean = False, Optional CveEstadoCancelacion As Integer = 0, Optional CveEstatusFacturaAsignado As Integer = -1) As MCancelacionVentaMensaje Public Function CancelarPorRefacturacion(CveMotivoCancelacion As Integer, Motivo As String, Optional FolioSustitucion As String = "", Optional ValidarSAT As Boolean = False, Optional CveEstadoCancelacion As Integer = 0) As MCancelacionVentaMensaje
Return CancelarVenta(Me, Me.UsuarioActual, EsRefacturacion:=True, CveMotivoCancelacion:=CveMotivoCancelacion, MotivoCancelacion:=Motivo, FolioSustitucion:=FolioSustitucion, ValidarSAT:=ValidarSAT, CveEstadoCancelacion:=CveEstadoCancelacion, CveEstatusFacturaAsignado:=CveEstatusFacturaAsignado) Return CancelarVenta(Me, Me.UsuarioActual, EsRefacturacion:=True, CveMotivoCancelacion:=CveMotivoCancelacion, MotivoCancelacion:=Motivo, FolioSustitucion:=FolioSustitucion, ValidarSAT:=ValidarSAT, CveEstadoCancelacion:=CveEstadoCancelacion)
End Function End Function
''' <summary> ''' <summary>
''' Cancela la factura y realiza las operaciones correspondientes ''' Cancela la factura y realiza las operaciones correspondientes
@@ -5255,15 +5347,15 @@ Namespace Modelos
''' <param name="RealizarDevolucionAlmacen"></param> ''' <param name="RealizarDevolucionAlmacen"></param>
''' <param name="ListaRemisionesCancelar"></param> ''' <param name="ListaRemisionesCancelar"></param>
''' <returns></returns> ''' <returns></returns>
Public Function CancelarFactura(RealizarDevolucionAlmacen As Boolean, Optional ListaRemisionesCancelar As List(Of Integer) = Nothing, Optional CveMotivoCancelacion As Integer = -1, Optional Motivo As String = "", Optional ValidarSAT As Boolean = True, Optional CveEstadoCancelacion As Integer = 0) As MCancelacionVentaMensaje Public Function CancelarFactura(RealizarDevolucionAlmacen As Boolean, Optional ListaRemisionesCancelar As List(Of Integer) = Nothing, Optional CveMotivoCancelacion As Integer = -1, Optional Motivo As String = "", Optional ValidarSAT As Boolean = True, Optional CveEstadoCancelacion As Integer = 0, Optional CancelarBoletos As Boolean = False) As MCancelacionVentaMensaje
'Comprobante emitido con errores sin relación 'Comprobante emitido con errores sin relación
Return CancelarVenta(Me, Me.UsuarioActual, RealizarDevolucionAlmacen:=RealizarDevolucionAlmacen, ListaRemisionesCancelar:=ListaRemisionesCancelar, CveMotivoCancelacion:=CveMotivoCancelacion, MotivoCancelacion:=Motivo, CveEstadoCancelacion:=CveEstadoCancelacion) Return CancelarVenta(Me, Me.UsuarioActual, RealizarDevolucionAlmacen:=RealizarDevolucionAlmacen, ListaRemisionesCancelar:=ListaRemisionesCancelar, CveMotivoCancelacion:=CveMotivoCancelacion, MotivoCancelacion:=Motivo, CveEstadoCancelacion:=CveEstadoCancelacion, CancelarBoletos:=CancelarBoletos)
End Function End Function
Private Function CancelarVenta(ObjFactura As Modelos.Factura, UsuarioActual As Usuario, Optional EsRefacturacion As Boolean = False, Optional RealizarDevolucionAlmacen As Boolean = False, Private Function CancelarVenta(ObjFactura As Modelos.Factura, UsuarioActual As Usuario, Optional EsRefacturacion As Boolean = False, Optional RealizarDevolucionAlmacen As Boolean = False,
Optional ListaRemisionesCancelar As List(Of Integer) = Nothing, Optional CveEstatusFacturaAsignado As Integer = -1, Optional FechaCancelacion As String = "-1", Optional ListaRemisionesCancelar As List(Of Integer) = Nothing, Optional CveEstatusFacturaAsignado As Integer = -1, Optional FechaCancelacion As String = "-1",
Optional AcuseCancelacion As String = "", Optional CveMotivoCancelacion As Integer = -1, Optional MotivoCancelacion As String = "", Optional AcuseCancelacion As String = "", Optional CveMotivoCancelacion As Integer = -1, Optional MotivoCancelacion As String = "",
Optional FolioSustitucion As String = "", Optional ValidarSAT As Boolean = True, Optional CveEstadoCancelacion As Integer = 0) As MCancelacionVentaMensaje Optional FolioSustitucion As String = "", Optional ValidarSAT As Boolean = True, Optional CveEstadoCancelacion As Integer = 0, Optional CancelarBoletos As Boolean = False) As MCancelacionVentaMensaje
Dim Retorno As New MCancelacionVentaMensaje() Dim Retorno As New MCancelacionVentaMensaje()
Dim ErrorList As New List(Of String) Dim ErrorList As New List(Of String)
@@ -6184,14 +6276,17 @@ Namespace Modelos
'VERIFICA LOS MOVIMIENTOS DE DEVOLUCION YA GENERADOS QUE TENGAN EXISTENCIA EN (ENTREGA POR ADELANTADO) 'VERIFICA LOS MOVIMIENTOS DE DEVOLUCION YA GENERADOS QUE TENGAN EXISTENCIA EN (ENTREGA POR ADELANTADO)
If Not ErrorCancelar Then If Not ErrorCancelar Then
If ObjInventario.GetInv_Mov(CveVenta, UsuarioActual.CveEmpresa) Then If ObjInventario.GetInv_Mov(CveVenta, UsuarioActual.CveEmpresa) Then
DtMovRemision = ObjInventario.DtResultados.FiltraParametros("CveTipoAlmacen = 10") DtMovRemision = ObjInventario.DtResultados.FiltraParametros("CveTipoAlmacen IN (10,4)")
CveAlmacenGeneral = ObjInventario.DtResultados.FiltroPrimeroValor("CveAlmacen", "CveTipoAlmacen IN (1,4)").ToString().ToEntero() CveAlmacenGeneral = ObjInventario.DtResultados.FiltroPrimeroValor("CveAlmacen", "CveTipoAlmacen IN (1,4)").ToEntero()
'SI ES SERVICIO A DOMICILIO DEBE REGRESAR A ESTE TIPO DE ALMACEN 'SI ES SERVICIO A DOMICILIO DEBE REGRESAR A ESTE TIPO DE ALMACEN
If Me.ServicioDomicilio Then If Me.ServicioDomicilio Then
CveAlmacenGeneral = ObjInventario.DtResultados.FiltroPrimeroValor("CveAlmacen", "CveTipoAlmacen = 29").ToString().ToEntero() CveAlmacenGeneral = ObjInventario.DtResultados.FiltroPrimeroValor("CveAlmacen", "CveTipoAlmacen = 29").ToEntero()
End If End If
CveAlmacenExA = ObjInventario.DtResultados.FiltroPrimeroValor("CveAlmacen", "CveTipoAlmacen = 10").ToString().ToEntero() CveAlmacenExA = ObjInventario.DtResultados.FiltroPrimeroValor("CveAlmacen", "CveTipoAlmacen = 10").ToEntero()
If CveAlmacenExA <= 0 Then
CveAlmacenExA = ObjInventario.DtResultados.FiltroPrimeroValor("CveAlmacen", "CveTipoAlmacen = 4").ToEntero()
End If
CveMovimientoUsado = ObjInventario.DtResultados.FiltroPrimeroValor("CveMovimiento", "CvePS IS NULL AND CveConcepto = 42").ToEntero() CveMovimientoUsado = ObjInventario.DtResultados.FiltroPrimeroValor("CveMovimiento", "CvePS IS NULL AND CveConcepto = 42").ToEntero()
CveAlmacenUsado = ObjInventario.DtResultados.FiltroPrimeroValor("CveAlmacen", "CvePS IS NULL AND CveConcepto = 42").ToEntero() CveAlmacenUsado = ObjInventario.DtResultados.FiltroPrimeroValor("CveAlmacen", "CvePS IS NULL AND CveConcepto = 42").ToEntero()
@@ -6434,6 +6529,13 @@ Namespace Modelos
End If End If
End If End If
If CancelarBoletos Then
If Not ObjVentas.UpdateBoletosVenta(CveVenta, UsuarioActual.CveEmpresa) Then
ErrorCancelar = True
MensajeError = "Ocurrió un error al cancelar los boletos."
End If
End If
If CancelarRemisiones Then If CancelarRemisiones Then
If SeCancelaRemisionProceso Then If SeCancelaRemisionProceso Then
@@ -8055,7 +8157,7 @@ Namespace Modelos
Public Property Giro As String Public Property Giro As String
Public Property CvePrecioLista As Integer Public Property CvePrecioLista As Integer
Public Property EnviarFactura As String Public Property EnviarFactura As String
Public Property CveSucursal As Integer Public Property CveSubProyecto As Integer
Public Property RetIVA As Decimal Public Property RetIVA As Decimal
Public Property RetISR As Decimal Public Property RetISR As Decimal
Public Property IEPS As Decimal Public Property IEPS As Decimal

4
App_Code/Timbres.vb
View File

@@ -626,13 +626,13 @@ Public Class Timbres
Return Retorno Return Retorno
End Function End Function
Public Function Timbrar() As Boolean Public Function Timbrar(Optional CvePACEspecifico As Integer = -1) As Boolean
Dim Respuesta As Boolean = False Dim Respuesta As Boolean = False
Dim ObjTimbrado As New Timbrado Dim ObjTimbrado As New Timbrado
If ObjTimbrado.TimbrarFactura(UsuarioActual, ObjFactura) Then If ObjTimbrado.TimbrarFactura(UsuarioActual, ObjFactura, CvePACEspecial:=CvePACEspecifico) Then
Respuesta = True Respuesta = True
Else Else
Respuesta = False Respuesta = False

9
App_Code/modExtensiones.vb
View File

@@ -788,6 +788,15 @@ Namespace Extensiones
DateTime.TryParseExact(Str, format, System.Globalization.CultureInfo.InvariantCulture, System.Globalization.DateTimeStyles.None, fecha) DateTime.TryParseExact(Str, format, System.Globalization.CultureInfo.InvariantCulture, System.Globalization.DateTimeStyles.None, fecha)
Return fecha Return fecha
End Function End Function
<Runtime.CompilerServices.Extension()>
Public Function ToBool(Str As String) As Boolean
If Str <> "" Then
Str = HttpUtility.HtmlDecode(Str).Trim
Return CBool(Str)
Else
Return False
End If
End Function
<Runtime.CompilerServices.Extension()> <Runtime.CompilerServices.Extension()>
Public Function FormatoNumero(Str As String, Optional Decimales As Integer = 2) As String Public Function FormatoNumero(Str As String, Optional Decimales As Integer = 2) As String

37
Ashx/SIGWeb.ashx
View File

@@ -927,35 +927,42 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
Dim UsoClasificacion = IfNull(context.Request("usoclasificacion"), "-1").ToString.ToEntero Dim UsoClasificacion = IfNull(context.Request("usoclasificacion"), "-1").ToString.ToEntero
Dim AplicaParaVenta = IfNull(context.Request("aplicaparaventa"), "1").ToString.ToEntero Dim AplicaParaVenta = IfNull(context.Request("aplicaparaventa"), "1").ToString.ToEntero
Dim CveMarca = IfNull(context.Request("cvemarca"), "-1").ToString.ToEntero Dim CveMarca = IfNull(context.Request("cvemarca"), "-1").ToString.ToEntero
Dim CveAlmacen = IfNull(context.Request("cvealmacen"), "-1").ToString.ToEntero
Dim UsaGlobal As Boolean = True Dim UsaGlobal As Boolean = True
Dim MostrarTodosAlmacenes As Boolean = False
'verifica existencias 'verifica existencias
If Pagina.Contiene("ventas/ventas", "oc/oc", "inv/traspaso") AndAlso usuario.Empresa.Funcionalidad(141) = "1" Then If Pagina.Contiene("ventas/ventas", "oc/oc", "inv/traspaso") AndAlso usuario.Empresa.Funcionalidad(141) = "1" Then
UsaGlobal = False UsaGlobal = False
'If CveEmpresa.Contiene(140, 141) And Pagina.Contiene("ventas/ventas") Then If (usuario.Empresa.Funcionalidad(558) = "1") AndAlso Pagina.Contiene("ventas/ventas") Then
' AplicaParaVenta = 1 MostrarTodosAlmacenes = True
'End If End If
Dim objInv As New ClsInventarios Dim objInv As New ClsInventarios
If objInv.GetExistenciasProductosLike(Name, CveClasificacion, CveSubProyecto, Estatus.ToEntero, AplicaParaVenta, CveEmpresa, CveMarca) Then Try
If objInv.GetExistenciasProductosLike(Name, CveClasificacion, CveSubProyecto, Estatus.ToEntero, AplicaParaVenta, CveEmpresa, CveMarca, MostrarTodosAlmacenes:=MostrarTodosAlmacenes, CveAlmacen:=CveAlmacen) Then
' limpio los almacenes donde no tiene ningun producto existencia ' limpio los almacenes donde no tiene ningun producto existencia
Dim i As Integer = 0 Dim i As Integer = 0
While i < objInv.DtResultados.Columns.Count While i < objInv.DtResultados.Columns.Count
If Not objInv.DtResultados.Columns(i).ColumnName.Contiene("CvePS", "PSCodigo", "PSCodigoClasificacion", "CveClasificacion") AndAlso objInv.DtResultados.SUM(String.Format("[{0}]", objInv.DtResultados.Columns(i).ColumnName)) = 0 Then If Not objInv.DtResultados.Columns(i).ColumnName.Contiene("CvePS", "PSCodigo", "PSCodigoClasificacion", "CveClasificacion") AndAlso objInv.DtResultados.SUM(String.Format("[{0}]", objInv.DtResultados.Columns(i).ColumnName)) = 0 Then
objInv.DtResultados.Columns.RemoveAt(i) objInv.DtResultados.Columns.RemoveAt(i)
Else Else
i = i + 1 i = i + 1
End If End If
End While End While
DtPSRetorno = objInv.DtResultados DtPSRetorno = objInv.DtResultados
End If
Catch ex As Exception
GuardaLog(ex.ToString())
End Try
End If
objInv.Dispose() objInv.Dispose()

1
Bancos/FluctuacionCambiaria.aspx.vb
View File

@@ -50,6 +50,7 @@ Partial Class Bancos_FluctuacionCambiaria
DdlAnio.Items.Add(New ListItem(NowADS().Year.ToString(), NowADS().Year.ToString())) DdlAnio.Items.Add(New ListItem(NowADS().Year.ToString(), NowADS().Year.ToString()))
'Año Anterior 'Año Anterior
DdlAnio.Items.Add(New ListItem(NowADS().AddYears(-1).Year.ToString(), NowADS().AddYears(-1).Year.ToString())) DdlAnio.Items.Add(New ListItem(NowADS().AddYears(-1).Year.ToString(), NowADS().AddYears(-1).Year.ToString()))
DdlAnio.Items.Add(New ListItem(NowADS().AddYears(-2).Year.ToString(), NowADS().AddYears(-2).Year.ToString()))
For i As Integer = 1 To 12 For i As Integer = 1 To 12
Dim fecha As DateTime = New DateTime(DdlAnio.SelectedValue.ToEntero(), i, 1) Dim fecha As DateTime = New DateTime(DdlAnio.SelectedValue.ToEntero(), i, 1)

2
Bancos/RepCortes.aspx.vb
View File

@@ -172,7 +172,7 @@ Partial Class Bancos_RepCortes
DtCortesVentas = Vent.DtResultados DtCortesVentas = Vent.DtResultados
divDetalle.Visible = True divDetalle.Visible = True
End If End If
If DtCortesVentasResumen.Rows.Count > 0 Or DtCortesVentas.Rows.Count > 0 Then If (DtCortesVentasResumen IsNot Nothing AndAlso DtCortesVentasResumen.Rows.Count > 0) Or (DtCortesVentas IsNot Nothing AndAlso DtCortesVentas.Rows.Count > 0) Then
HplDownPDF.Visible = True HplDownPDF.Visible = True
HplDownEXCEL.Visible = True HplDownEXCEL.Visible = True
HplDownPDF.NavigateUrl = String.Format("/Compras/PopUpVerFactura.aspx?P={0}", Encripta(String.Format("OP=CORT&CVECORTE={0}&FORMATO={1}&CVESUBPROYECTO={2}", CveCorte, "PDF", DdlSubProyectos.SelectedValue.ToEntero))) HplDownPDF.NavigateUrl = String.Format("/Compras/PopUpVerFactura.aspx?P={0}", Encripta(String.Format("OP=CORT&CVECORTE={0}&FORMATO={1}&CVESUBPROYECTO={2}", CveCorte, "PDF", DdlSubProyectos.SelectedValue.ToEntero)))

BIN
Bin/ADSNetLibrary.7z
View File

Binary file not shown.

BIN
Bin/ADSNetLibrary.dll
View File

Binary file not shown.

BIN
Bin/Bin.rar
View File

Binary file not shown.

BIN
Bin/Bin_20220223.rar
View File

Binary file not shown.

BIN
Bin/de/Microsoft.ReportViewer.Common.resources.dll
View File

Binary file not shown.

BIN
Bin/de/Microsoft.ReportViewer.DataVisualization.resources.dll
View File

Binary file not shown.

BIN
Bin/de/Microsoft.ReportViewer.Design.resources.dll
View File

Binary file not shown.

BIN
Bin/de/Microsoft.ReportViewer.WebDesign.resources.dll
View File

Binary file not shown.

BIN
Bin/de/Microsoft.ReportViewer.WebForms.resources.dll
View File

Binary file not shown.

BIN
Bin/de/Microsoft.ReportViewer.WinForms.resources.dll
View File

Binary file not shown.

BIN
Bin/es/Microsoft.ReportViewer.Common.resources.dll
View File

Binary file not shown.

BIN
Bin/es/Microsoft.ReportViewer.DataVisualization.resources.dll
View File

Binary file not shown.

BIN
Bin/es/Microsoft.ReportViewer.Design.resources.dll
View File

Binary file not shown.

BIN
Bin/es/Microsoft.ReportViewer.WebDesign.resources.dll
View File

Binary file not shown.

BIN
Bin/es/Microsoft.ReportViewer.WebForms.resources.dll
View File

Binary file not shown.

BIN
Bin/es/Microsoft.ReportViewer.WinForms.resources.dll
View File

Binary file not shown.

BIN
Bin/fr/Microsoft.ReportViewer.Common.resources.dll
View File

Binary file not shown.

BIN
Bin/fr/Microsoft.ReportViewer.DataVisualization.resources.dll
View File

Binary file not shown.

BIN
Bin/fr/Microsoft.ReportViewer.Design.resources.dll
View File

Binary file not shown.

BIN
Bin/fr/Microsoft.ReportViewer.WebDesign.resources.dll
View File

Binary file not shown.

BIN
Bin/fr/Microsoft.ReportViewer.WebForms.resources.dll
View File

Binary file not shown.

BIN
Bin/fr/Microsoft.ReportViewer.WinForms.resources.dll
View File

Binary file not shown.

BIN
Bin/it/Microsoft.ReportViewer.Common.resources.dll
View File

Binary file not shown.

BIN
Bin/it/Microsoft.ReportViewer.DataVisualization.resources.dll
View File

Binary file not shown.

BIN
Bin/it/Microsoft.ReportViewer.Design.resources.dll
View File

Binary file not shown.

BIN
Bin/it/Microsoft.ReportViewer.WebDesign.resources.dll
View File

Binary file not shown.

BIN
Bin/it/Microsoft.ReportViewer.WebForms.resources.dll
View File

Binary file not shown.

BIN
Bin/it/Microsoft.ReportViewer.WinForms.resources.dll
View File

Binary file not shown.

BIN
Bin/ko/Microsoft.ReportViewer.Common.resources.dll
View File

Binary file not shown.

BIN
Bin/ko/Microsoft.ReportViewer.DataVisualization.resources.dll
View File

Binary file not shown.

BIN
Bin/ko/Microsoft.ReportViewer.Design.resources.dll
View File

Binary file not shown.

BIN
Bin/ko/Microsoft.ReportViewer.WebDesign.resources.dll
View File

Binary file not shown.

BIN
Bin/ko/Microsoft.ReportViewer.WebForms.resources.dll
View File

Binary file not shown.

BIN
Bin/ko/Microsoft.ReportViewer.WinForms.resources.dll
View File

Binary file not shown.

BIN
Bin/pt/Microsoft.ReportViewer.Common.resources.dll
View File

Binary file not shown.

BIN
Bin/pt/Microsoft.ReportViewer.DataVisualization.resources.dll
View File

Binary file not shown.

BIN
Bin/pt/Microsoft.ReportViewer.Design.resources.dll
View File

Binary file not shown.

BIN
Bin/pt/Microsoft.ReportViewer.WebDesign.resources.dll
View File

Binary file not shown.

BIN
Bin/pt/Microsoft.ReportViewer.WebForms.resources.dll
View File

Binary file not shown.

BIN
Bin/pt/Microsoft.ReportViewer.WinForms.resources.dll
View File

Binary file not shown.

BIN
Bin/ru/Microsoft.ReportViewer.Common.resources.dll
View File

Binary file not shown.

BIN
Bin/ru/Microsoft.ReportViewer.DataVisualization.resources.dll
View File

Binary file not shown.

BIN
Bin/ru/Microsoft.ReportViewer.Design.resources.dll
View File

Binary file not shown.

BIN
Bin/ru/Microsoft.ReportViewer.WebDesign.resources.dll
View File

Binary file not shown.

BIN
Bin/ru/Microsoft.ReportViewer.WebForms.resources.dll
View File

Binary file not shown.

BIN
Bin/ru/Microsoft.ReportViewer.WinForms.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHS/Microsoft.ReportViewer.Common.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHS/Microsoft.ReportViewer.DataVisualization.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHS/Microsoft.ReportViewer.Design.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHS/Microsoft.ReportViewer.WebDesign.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHS/Microsoft.ReportViewer.WebForms.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHS/Microsoft.ReportViewer.WinForms.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHT/Microsoft.ReportViewer.Common.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHT/Microsoft.ReportViewer.DataVisualization.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHT/Microsoft.ReportViewer.Design.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHT/Microsoft.ReportViewer.WebDesign.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHT/Microsoft.ReportViewer.WebForms.resources.dll
View File

Binary file not shown.

BIN
Bin/zh-CHT/Microsoft.ReportViewer.WinForms.resources.dll
View File

Binary file not shown.

2
CGame/CatHuerta.aspx
View File

@@ -163,8 +163,8 @@
<label for="<%= TxtNumeroRegistro.ClientID.ToString()%>">Número de Registro:</label> <label for="<%= TxtNumeroRegistro.ClientID.ToString()%>">Número de Registro:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<label style=" margin-bottom: 0;font-size: 13px;color: #888888; opacity: 1;">Proveedor:</label>
<ADS:Dropdownlost runat="server" ID="DdlProveedor" CssStyle="width: 100%;" CssClassDdl="select2me " DataTextField="NombreCortoProveedor" DataValueField="CveProveedor" /> <ADS:Dropdownlost runat="server" ID="DdlProveedor" CssStyle="width: 100%;" CssClassDdl="select2me " DataTextField="NombreCortoProveedor" DataValueField="CveProveedor" />
<label for="<%= DdlProveedor.ClientID.ToString()%>">Proveedor:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright ocultar"> <div class="form-group form-md-line-input input-iconright ocultar">
<asp:DropDownList ID="DdlTipoCobro" CssClass="form-control select2me" runat="server" AppendDataBoundItems="true" Style="width: 100%"> <asp:DropDownList ID="DdlTipoCobro" CssClass="form-control select2me" runat="server" AppendDataBoundItems="true" Style="width: 100%">

24
CGame/CatHuerta.aspx.cs
View File

@@ -1,4 +1,4 @@
 
using System; using System;
using System.Collections.Generic; using System.Collections.Generic;
using System.Linq; using System.Linq;
@@ -78,4 +78,26 @@
CveHuerta = gvRow.DataKey("CveHuerta").ToEntero(); CveHuerta = gvRow.DataKey("CveHuerta").ToEntero();
TxtHuerhuerta.Text = gvRow.DataKey("Huerta"); TxtHuerhuerta.Text = gvRow.DataKey("Huerta");
TxtImporte.Text = gvRow.DataKey("Importe"); TxtImporte.Text = gvRow.DataKey("Importe");
TxtCostoXTonelada.Text = gvRow.DataKey("CostoXTonelada");
TxtNombreRegistro.Text = gvRow.DataKey("NombreRegistro");
TxtNumeroRegistro.Text = gvRow.DataKey("NumeroRegistro");
//DdlProveedor.SelectedValue = objOC.CveProveedor.ToString
// if (gvRow.DataKey("CveProveedor").ToEntero() > 0)
// {
// DdlProveedor.SelectedValueExist(gvRow.DataKey("CveProveedor").ToEntero());
//}
// CveProveedorOriginal = objOC.CveProveedor
// DdlProveedores.SelectedText = GlobalDTCompProveedores(UsuarioActual.CveEmpresa).FiltraParametros($"CveProveedor = {objOC.CveProveedor}").Rows(0)("RazonSocial").ToString
//Else
// DdlProveedores.SelectedText = "-"
//End If
DdlTipoCobro.SelectedValueExist(gvRow.DataKey("TipoCobro").ToEntero());
ChkHuerestatus.Checked= Convert.ToBoolean(gvRow.DataKey("Estatus"));
RegistraScript("$('#DModalHuerta').modal();");
BtnHuerADD.Visible=false;
BtnHuerEdit.Visible=true;
DivEstatus.Visible = true;
UPModalHuer.Update();
}
protected void LnkAgregarHuer_Click(object sender, EventArgs e) protected void LnkAgregarHuer_Click(object sender, EventArgs e)

96
CRM/Acercamiento.aspx.cs
View File

@@ -828,7 +828,7 @@ public partial class CRM_Acercamiento : ClsPaginas
{ {
ClsCRM ObjCRM = new ClsCRM(); ClsCRM ObjCRM = new ClsCRM();
ICRMService cRMService = new CRMService(System.Configuration.ConfigurationManager.ConnectionStrings["Conexion"].ConnectionString); ICRMService cRMService = new CRMService(System.Configuration.ConfigurationManager.ConnectionStrings["Conexion"].ConnectionString);
AcercaminetoModel AcercaminetoModel = new AcercaminetoModel(); AcercamientoModel AcercamientoModel = new AcercamientoModel();
ClsEncuestas ObjDatosTecnicos = new ClsEncuestas(ObjCRM.IniciaTransacSQL()); ClsEncuestas ObjDatosTecnicos = new ClsEncuestas(ObjCRM.IniciaTransacSQL());
//ClsOIEventos ObjBitacora = new ClsOIEventos(ObjCRM.IniciaTransacSQL()); //ClsOIEventos ObjBitacora = new ClsOIEventos(ObjCRM.IniciaTransacSQL());
@@ -866,31 +866,31 @@ public partial class CRM_Acercamiento : ClsPaginas
{ {
CveEncuestaAplicadaProceso = GuardaDatosTecnicos(ObjDatosTecnicos, CveEncuestaAplicadaProceso); CveEncuestaAplicadaProceso = GuardaDatosTecnicos(ObjDatosTecnicos, CveEncuestaAplicadaProceso);
} }
AcercaminetoModel.CveAcercamiento = CveAcercamiento; AcercamientoModel.CveAcercamiento = CveAcercamiento;
AcercaminetoModel.CveContactoPrincipal = CveContactoPrincipal; AcercamientoModel.CveContactoPrincipal = CveContactoPrincipal;
AcercaminetoModel.CveTipoProceso = CveTipoProceso; AcercamientoModel.CveTipoProceso = CveTipoProceso;
AcercaminetoModel.CveEtapaProcesoActual = CveEtapaProcesoActualActualizar; AcercamientoModel.CveEtapaProcesoActual = CveEtapaProcesoActualActualizar;
AcercaminetoModel.CveVendedor = CveVendedor; AcercamientoModel.CveVendedor = CveVendedor;
AcercaminetoModel.CveMedioCaptacion = CveMedioCaptacion; AcercamientoModel.CveMedioCaptacion = CveMedioCaptacion;
AcercaminetoModel.CveProbabilidadAcercamiento = CveProbabilidadAcercamiento; AcercamientoModel.CveProbabilidadAcercamiento = CveProbabilidadAcercamiento;
AcercaminetoModel.NombreAcercamiento = NombreAcercamiento; AcercamientoModel.NombreAcercamiento = NombreAcercamiento;
AcercaminetoModel.Descripcion = Descripcion; AcercamientoModel.Descripcion = Descripcion;
AcercaminetoModel.Importe = Importe; AcercamientoModel.Importe = Importe;
AcercaminetoModel.Comision = Comision; AcercamientoModel.Comision = Comision;
AcercaminetoModel.Prioridad = Prioridad; AcercamientoModel.Prioridad = Prioridad;
AcercaminetoModel.CveUsuarioIng = UsuarioActual.CveUsuario; AcercamientoModel.CveUsuarioIng = UsuarioActual.CveUsuario;
AcercaminetoModel.CveEncuestaAplicadaProceso = CveEncuestaAplicadaProceso; AcercamientoModel.CveEncuestaAplicadaProceso = CveEncuestaAplicadaProceso;
AcercaminetoModel.FechaApertura = FechaApertura; AcercamientoModel.FechaApertura = FechaApertura;
AcercaminetoModel.FechaCierre = FechaCierre != null ? (DateTime)FechaCierre : ModExtensiones.MinFecha; AcercamientoModel.FechaCierre = FechaCierre != null ? (DateTime)FechaCierre : ModExtensiones.MinFecha;
AcercaminetoModel.CvePS = DdlPS.SelectedValue.ToEntero(); AcercamientoModel.CvePS = DdlPS.SelectedValue.ToEntero();
AcercaminetoModel.CveRechazoMotivo = CveRechazoMotivo; AcercamientoModel.CveRechazoMotivo = CveRechazoMotivo;
AcercaminetoModel.EnPausa = ChkePausa.Checked; AcercamientoModel.EnPausa = ChkePausa.Checked;
AcercaminetoModel.CveMedico = DdlMedico.SelectedValue.ToEntero(); AcercamientoModel.CveMedico = DdlMedico.SelectedValue.ToEntero();
AcercaminetoModel.CveProcedimiento = DdlProcedimiento.SelectedValue.ToEntero(); AcercamientoModel.CveProcedimiento = DdlProcedimiento.SelectedValue.ToEntero();
AcercaminetoModel.CveTipoVenta = DdlTipoVenta.SelectedValue.ToEntero(); AcercamientoModel.CveTipoVenta = DdlTipoVenta.SelectedValue.ToEntero();
if (cRMService.AcercamientoUpdate(AcercaminetoModel)) if (cRMService.AcercamientoUpdate(AcercamientoModel))
{ {
//String MensajeBitacora = (CveEtapaProcesoActualActualizar != CveEtapaActual) ? String.Format("Se actualizó la etapa del acercamiento a {0}.", DTEtapasProceso.FiltroPrimeroValor("EtapaProceso", "CveEtapaProceso = " + CveEtapaProcesoActualActualizar)) : String.Format("Se actualizó el Acercamiento {0} con Vendedor {2} y Contacto Principal {3}.", NombreAcercamiento, DdlTipoProceso.SelectedItem, DdlVendedor.SelectedItem, DdlContactoPrincipal.SelectedValue == "-1" ? "aun no asignado" : DdlContactoPrincipal.SelectedItem.Text); //String MensajeBitacora = (CveEtapaProcesoActualActualizar != CveEtapaActual) ? String.Format("Se actualizó la etapa del acercamiento a {0}.", DTEtapasProceso.FiltroPrimeroValor("EtapaProceso", "CveEtapaProceso = " + CveEtapaProcesoActualActualizar)) : String.Format("Se actualizó el Acercamiento {0} con Vendedor {2} y Contacto Principal {3}.", NombreAcercamiento, DdlTipoProceso.SelectedItem, DdlVendedor.SelectedItem, DdlContactoPrincipal.SelectedValue == "-1" ? "aun no asignado" : DdlContactoPrincipal.SelectedItem.Text);
@@ -926,7 +926,7 @@ public partial class CRM_Acercamiento : ClsPaginas
protected void GuardarCambioEtapa() protected void GuardarCambioEtapa()
{ {
ICRMService cRMService = new CRMService(System.Configuration.ConfigurationManager.ConnectionStrings["Conexion"].ConnectionString); ICRMService cRMService = new CRMService(System.Configuration.ConfigurationManager.ConnectionStrings["Conexion"].ConnectionString);
AcercaminetoModel AcercaminetoModel = new AcercaminetoModel(); AcercamientoModel AcercamientoModel = new AcercamientoModel();
String NombreAcercamiento = TxtNombreAcercamiento.Text; String NombreAcercamiento = TxtNombreAcercamiento.Text;
String Descripcion = TxtDescripcion.Text == "" ? "-1" : TxtDescripcion.Text; String Descripcion = TxtDescripcion.Text == "" ? "-1" : TxtDescripcion.Text;
@@ -953,30 +953,30 @@ public partial class CRM_Acercamiento : ClsPaginas
int CveUsuarioIng = UsuarioActual.CveUsuario; int CveUsuarioIng = UsuarioActual.CveUsuario;
AcercaminetoModel.CveAcercamiento = CveAcercamiento; AcercamientoModel.CveAcercamiento = CveAcercamiento;
AcercaminetoModel.CveContactoPrincipal = CveContactoPrincipal; AcercamientoModel.CveContactoPrincipal = CveContactoPrincipal;
AcercaminetoModel.CveTipoProceso = CveTipoProceso; AcercamientoModel.CveTipoProceso = CveTipoProceso;
AcercaminetoModel.CveEtapaProcesoActual = CveEtapaProcesoActualActualizar; AcercamientoModel.CveEtapaProcesoActual = CveEtapaProcesoActualActualizar;
AcercaminetoModel.CveVendedor = CveVendedor; AcercamientoModel.CveVendedor = CveVendedor;
AcercaminetoModel.CveMedioCaptacion = CveMedioCaptacion; AcercamientoModel.CveMedioCaptacion = CveMedioCaptacion;
AcercaminetoModel.CveProbabilidadAcercamiento = CveProbabilidadAcercamiento; AcercamientoModel.CveProbabilidadAcercamiento = CveProbabilidadAcercamiento;
AcercaminetoModel.NombreAcercamiento = NombreAcercamiento; AcercamientoModel.NombreAcercamiento = NombreAcercamiento;
AcercaminetoModel.Descripcion = Descripcion; AcercamientoModel.Descripcion = Descripcion;
AcercaminetoModel.Importe = Importe; AcercamientoModel.Importe = Importe;
AcercaminetoModel.Comision = Comision; AcercamientoModel.Comision = Comision;
AcercaminetoModel.Prioridad = Prioridad; AcercamientoModel.Prioridad = Prioridad;
AcercaminetoModel.CveUsuarioIng = UsuarioActual.CveUsuario; AcercamientoModel.CveUsuarioIng = UsuarioActual.CveUsuario;
AcercaminetoModel.CveEncuestaAplicadaProceso = CveEncuestaAplicadaProceso; AcercamientoModel.CveEncuestaAplicadaProceso = CveEncuestaAplicadaProceso;
AcercaminetoModel.FechaApertura = FechaApertura; AcercamientoModel.FechaApertura = FechaApertura;
AcercaminetoModel.FechaCierre = FechaCierre != null ? (DateTime)FechaCierre : ModExtensiones.MinFecha; AcercamientoModel.FechaCierre = FechaCierre != null ? (DateTime)FechaCierre : ModExtensiones.MinFecha;
AcercaminetoModel.CvePS = DdlPS.SelectedValue.ToEntero(); AcercamientoModel.CvePS = DdlPS.SelectedValue.ToEntero();
AcercaminetoModel.CveRechazoMotivo = CveRechazoMotivo; AcercamientoModel.CveRechazoMotivo = CveRechazoMotivo;
AcercaminetoModel.CveMedico = DdlMedico.SelectedValue.ToEntero(); AcercamientoModel.CveMedico = DdlMedico.SelectedValue.ToEntero();
AcercaminetoModel.CveProcedimiento = DdlProcedimiento.SelectedValue.ToEntero(); AcercamientoModel.CveProcedimiento = DdlProcedimiento.SelectedValue.ToEntero();
AcercaminetoModel.CveTipoVenta = DdlTipoVenta.SelectedValue.ToEntero(); AcercamientoModel.CveTipoVenta = DdlTipoVenta.SelectedValue.ToEntero();
if (cRMService.AcercamientoUpdate(AcercaminetoModel)) if (cRMService.AcercamientoUpdate(AcercamientoModel))
{ {
CveEtapaActual = CveEtapaProcesoActualActualizar; CveEtapaActual = CveEtapaProcesoActualActualizar;
HdfEtapaSeleccionada.Value = CveEtapaProcesoActualActualizar.ToString(); HdfEtapaSeleccionada.Value = CveEtapaProcesoActualActualizar.ToString();
@@ -1114,7 +1114,7 @@ public partial class CRM_Acercamiento : ClsPaginas
String TituloCierre = DTEtapasProceso.FiltroPrimeroValor("EtapaProceso", "CveTipoEtapa = 4"); String TituloCierre = DTEtapasProceso.FiltroPrimeroValor("EtapaProceso", "CveTipoEtapa = 4");
AcercaminetoModel acercamiento = new AcercaminetoModel(); AcercamientoModel acercamiento = new AcercamientoModel();
acercamiento.CveAcercamiento = CveAcercamiento; acercamiento.CveAcercamiento = CveAcercamiento;
acercamiento.CveEtapaProcesoActual = CveEtapaCierre; acercamiento.CveEtapaProcesoActual = CveEtapaCierre;
acercamiento.CveRechazoMotivo = CveRechazoMotivo; acercamiento.CveRechazoMotivo = CveRechazoMotivo;

2
CRM/EmpresaCRM.aspx.cs
View File

@@ -1821,7 +1821,7 @@ public partial class CRM_EmpresaCRM : ClsPaginas
if (tempDT.Rows.Count > 0) if (tempDT.Rows.Count > 0)
{ {
var AcercamientoModel = new AcercaminetoModel() var AcercamientoModel = new AcercamientoModel()
{ {
CveEmpresaCRM = CveEmpresaCRM, CveEmpresaCRM = CveEmpresaCRM,
CveContactoPrincipal = CveContactoPrincipal, CveContactoPrincipal = CveContactoPrincipal,

90
Compras/Compras.aspx
View File

@@ -1,6 +1,5 @@
<%@ Page Title="Compras - Registro de Facturas" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" ValidateRequest="false" CodeFile="Compras.aspx.vb" Inherits="Compras_Compras" EnableEventValidation="false" %> <%@ Page Title="Compras - Registro de Facturas" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" ValidateRequest="false" CodeFile="Compras.aspx.vb" Inherits="Compras_Compras" EnableEventValidation="false" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" runat="Server"> <asp:Content ID="Content1" ContentPlaceHolderID="H" runat="Server">
<asp:UpdatePanel ID="UppAddAcciones" runat="server"> <asp:UpdatePanel ID="UppAddAcciones" runat="server">
<ContentTemplate> <ContentTemplate>
@@ -204,14 +203,14 @@
<div class="portlet-body form-horizontal form-row-sepe formnombottom"> <div class="portlet-body form-horizontal form-row-sepe formnombottom">
<div class="row"> <div class="row">
<div class="form-group "> <div class="form-group ">
<%-- <asp:DropDownList ID="ddlCargoPrePoliza" CssClass="form-control input-sm whitoutcol linewhitsize comprasdfleft" runat="server" Width="70px" Visible="false"> <%-- <asp:DropDownList ID="ddlCargoPrePoliza" CssClass="form-control input-sm whitoutcol comprasdfleft" runat="server" Width="70px" Visible="false">
<asp:ListItem Text="Proveedor" Value="1" Selected="True"></asp:ListItem> <asp:ListItem Text="Proveedor" Value="1" Selected="True"></asp:ListItem>
<asp:ListItem Text="Deudor" Value="2"></asp:ListItem> <asp:ListItem Text="Deudor" Value="2"></asp:ListItem>
<asp:ListItem Text="Acreedor" Value="3"></asp:ListItem> <asp:ListItem Text="Acreedor" Value="3"></asp:ListItem>
</asp:DropDownList>--%> </asp:DropDownList>--%>
<asp:LinkButton ID="LblProveedor" runat="server" Visible="true" class="whitoutcol linewhitsize comprasdfleft" Style="text-decoration: none">Proveedor:</asp:LinkButton> <asp:LinkButton ID="LblProveedor" runat="server" Visible="true" class="whitoutcol comprasdfleft" Style="text-decoration: none">Proveedor:</asp:LinkButton>
<%--<asp:Label ID="LblProveedor" runat="server" Visible="true" class="whitoutcol linewhitsize comprasdfleft">Proveedor:</asp:Label>--%> <%--<asp:Label ID="LblProveedor" runat="server" Visible="true" class="whitoutcol comprasdfleft">Proveedor:</asp:Label>--%>
<%-- <asp:Label ID="lblProveedor" runat="server" Visible="true" class="whitoutcol linewhitsize comprasdfleft">Proveedor:</asp:Label>--%> <%-- <asp:Label ID="lblProveedor" runat="server" Visible="true" class="whitoutcol comprasdfleft">Proveedor:</asp:Label>--%>
<div class="whitoutcol whitoutcol "> <div class="whitoutcol whitoutcol ">
<asp:HyperLink ID="HplProveedor" CssClass="Texto" runat="server" Visible="false"></asp:HyperLink> <asp:HyperLink ID="HplProveedor" CssClass="Texto" runat="server" Visible="false"></asp:HyperLink>
<asp:DropDownList ID="DdlProveedor" CssClass="form-control input-sm" onclick="CargaProveedores();" runat="server" CausesValidation="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="280px"></asp:DropDownList> <asp:DropDownList ID="DdlProveedor" CssClass="form-control input-sm" onclick="CargaProveedores();" runat="server" CausesValidation="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="280px"></asp:DropDownList>
@@ -223,7 +222,7 @@
</div> </div>
</div> </div>
<div class="form-group whitoutcol" style="width: 280px;"> <div class="form-group whitoutcol" style="width: 280px;">
<span class="whitoutcol linewhitsize comprasdfleft">Tipo:</span> <span class="whitoutcol comprasdfleft">Tipo:</span>
<div class="whitoutcol whitoutcol comprasdfleftvar"> <div class="whitoutcol whitoutcol comprasdfleftvar">
<asp:DropDownList ID="DdlTipoComprobante" runat="server" AutoPostBack="true" CssClass="form-control input-sm input-small" OnSelectedIndexChanged="DdlTipoComprobante_SelectedIndexChanged"> <asp:DropDownList ID="DdlTipoComprobante" runat="server" AutoPostBack="true" CssClass="form-control input-sm input-small" OnSelectedIndexChanged="DdlTipoComprobante_SelectedIndexChanged">
<asp:ListItem Selected="True" Text="Factura" Value="Fac"></asp:ListItem> <asp:ListItem Selected="True" Text="Factura" Value="Fac"></asp:ListItem>
@@ -318,7 +317,7 @@
</table> </table>
<div class="form-group whitoutcol" style="width: 280px;"> <div class="form-group whitoutcol" style="width: 280px;">
<span class="whitoutcol linewhitsize comprasdfleft">Descripción: </span> <span class="whitoutcol comprasdfleft">Descripción: </span>
<div class="whitoutcol whitoutcol comprasdfleftvar"> <div class="whitoutcol whitoutcol comprasdfleftvar">
<asp:TextBox ID="TxtDescripcion" runat="server" CausesValidation="true" MaxLength="200" TextMode="MultiLine" ValidationGroup="GrpGuardar" Width="280px"></asp:TextBox> <asp:TextBox ID="TxtDescripcion" runat="server" CausesValidation="true" MaxLength="200" TextMode="MultiLine" ValidationGroup="GrpGuardar" Width="280px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVDescripcion" runat="server" ControlToValidate="TxtDescripcion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RFVDescripcion" runat="server" ControlToValidate="TxtDescripcion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Descripción''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
@@ -326,14 +325,14 @@
</div> </div>
</div> </div>
<div class="form-group whitoutcol" style="width: 280px;" id="TrFacturaRefacturar" visible="false" runat="server"> <div class="form-group whitoutcol" style="width: 280px;" id="TrFacturaRefacturar" visible="false" runat="server">
<span class="whitoutcol linewhitsize comprasdfleft">Refacturación: </span> <span class="whitoutcol comprasdfleft">Refacturación: </span>
<div class="whitoutcol whitoutcol comprasdfleftvar"> <div class="whitoutcol whitoutcol comprasdfleftvar">
<asp:Literal Text="" ID="LtFacturaRefacturar" runat="server" /> <asp:Literal Text="" ID="LtFacturaRefacturar" runat="server" />
<asp:HiddenField ID="HdnRefacturacionCveCompra" runat="server" /> <asp:HiddenField ID="HdnRefacturacionCveCompra" runat="server" />
</div> </div>
</div> </div>
<div class="form-group whitoutcol" style="width: 400px;" id="DivEsNoDeducible" visible="false" runat="server"> <div class="form-group whitoutcol" style="width: 400px;" id="DivEsNoDeducible" visible="false" runat="server">
<span class="whitoutcol linewhitsize comprasdfleft" style="width: 120px;">¿Es No Deducible?</span> <span class="whitoutcol comprasdfleft" style="width: 120px;">¿Es No Deducible?</span>
<div class="whitoutcol whitoutcol comprasdfleftvar"> <div class="whitoutcol whitoutcol comprasdfleftvar">
<asp:CheckBox ID="ChkEsNoDeducible" runat="server" OnCheckedChanged="ChkEsNoDeducible_CheckedChanged1" AutoPostBack="true" /> <asp:CheckBox ID="ChkEsNoDeducible" runat="server" OnCheckedChanged="ChkEsNoDeducible_CheckedChanged1" AutoPostBack="true" />
</div> </div>
@@ -364,26 +363,26 @@
</div> </div>
<div class="portlet-body"> <div class="portlet-body">
<div class="form-group proveedoreespes"> <div class="form-group proveedoreespes">
<span class="whitoutcol linewhitsize proveedoreespes">RFC:</span> <span class="whitoutcol proveedoreespes">RFC:</span>
<div class="whitoutcol whitoutcol "> <div class="whitoutcol whitoutcol ">
<asp:Label ID="LblRFC" runat="server" Text="RFC"></asp:Label> <asp:Label ID="LblRFC" runat="server" Text="RFC"></asp:Label>
<asp:HiddenField ID="HdnProveedorIVA" ClientIDMode="Static" Value="0" runat="server" /> <asp:HiddenField ID="HdnProveedorIVA" ClientIDMode="Static" Value="0" runat="server" />
</div> </div>
</div> </div>
<div class="form-group proveedoreespes"> <div class="form-group proveedoreespes">
<span class="whitoutcol linewhitsize proveedoreespes">Días de Crédito:</span> <span class="whitoutcol proveedoreespes">Días de Crédito:</span>
<div class="whitoutcol whitoutcol "> <div class="whitoutcol whitoutcol ">
<asp:Label ID="LblDiasCredito" runat="server" Text="0" ClientIDMode="Static"></asp:Label> <asp:Label ID="LblDiasCredito" runat="server" Text="0" ClientIDMode="Static"></asp:Label>
</div> </div>
</div> </div>
<div class="form-group proveedoreespes"> <div class="form-group proveedoreespes">
<span class="whitoutcol linewhitsize proveedoreespes">Límite de Crédito:</span> <span class="whitoutcol proveedoreespes">Límite de Crédito:</span>
<div class="whitoutcol whitoutcol "> <div class="whitoutcol whitoutcol ">
<asp:Label ID="LblLimiteCredito" runat="server" Text="0"></asp:Label> <asp:Label ID="LblLimiteCredito" runat="server" Text="0"></asp:Label>
</div> </div>
</div> </div>
<div class="form-group proveedoreespes"> <div class="form-group proveedoreespes">
<span class="whitoutcol linewhitsize proveedoreespes">Crédito Disponible:</span> <span class="whitoutcol proveedoreespes">Crédito Disponible:</span>
<div class="whitoutcol whitoutcol "> <div class="whitoutcol whitoutcol ">
<asp:Label ID="LblCreditoDisponible" runat="server" Text="0"></asp:Label> <asp:Label ID="LblCreditoDisponible" runat="server" Text="0"></asp:Label>
</div> </div>
@@ -413,7 +412,7 @@
<div class="portlet-body"> <div class="portlet-body">
<div runat="server" id="RowProveedorSucursal" visible="false"> <div runat="server" id="RowProveedorSucursal" visible="false">
<div class="form-group proveedoreespes"> <div class="form-group proveedoreespes">
<span class="whitoutcol linewhitsize proveedoreespes">Sucursal: </span> <span class="whitoutcol proveedoreespes">Sucursal: </span>
<div class="whitoutcol whitoutcol"> <div class="whitoutcol whitoutcol">
<asp:DropDownList ID="DdlProveedorSucursal" CssClass=" select2me" AppendDataBoundItems="true" DataValueField="CveProveedorSucursal" DataTextField="ProveedorSucursal" runat="server" Width="185px"> <asp:DropDownList ID="DdlProveedorSucursal" CssClass=" select2me" AppendDataBoundItems="true" DataValueField="CveProveedorSucursal" DataTextField="ProveedorSucursal" runat="server" Width="185px">
</asp:DropDownList> </asp:DropDownList>
@@ -422,7 +421,7 @@
</div> </div>
<div class="form-group proveedoreespes"> <div class="form-group proveedoreespes">
<span class="whitoutcol linewhitsize proveedoreespes" style="height: 100%; vertical-align: middle;">Estatus:</span> <span class="whitoutcol proveedoreespes" style="height: 100%; vertical-align: middle;">Estatus:</span>
<div class="whitoutcol whitoutcol" style="width: 180px;"> <div class="whitoutcol whitoutcol" style="width: 180px;">
<asp:Label ID="LblCompraEstatus" runat="server" Text="Recibida"></asp:Label><br /> <asp:Label ID="LblCompraEstatus" runat="server" Text="Recibida"></asp:Label><br />
<asp:CheckBox CssClass="md-checksd" ID="ChkProgramarPago" runat="server" Text="Autorizada" Visible="False" /> <asp:CheckBox CssClass="md-checksd" ID="ChkProgramarPago" runat="server" Text="Autorizada" Visible="False" />
@@ -433,25 +432,21 @@
</div> </div>
</div> </div>
<div class="form-group proveedoreespes" id="trImporte" runat="server" visible="False"> <div class="form-group proveedoreespes" id="trImporte" runat="server" visible="False">
<span class="whitoutcol linewhitsize proveedoreespes">Importe: </span> <span class="whitoutcol proveedoreespes">Importe: </span>
<div class="whitoutcol whitoutcol"> <div class="whitoutcol whitoutcol">
<asp:HyperLink ID="HplImporte" CssClass="Texto thickbox" runat="server"></asp:HyperLink></td> <asp:HyperLink ID="HplImporte" CssClass="Texto thickbox" runat="server"></asp:HyperLink>
</div> </div>
</div> </div>
<div class="form-group proveedoreespes" id="trSaldo" runat="server" visible="False"> <div class="form-group proveedoreespes" id="trSaldo" runat="server" visible="False">
<span class="whitoutcol linewhitsize proveedoreespes">Saldo: </span> <span class="whitoutcol proveedoreespes">Saldo: </span>
<div class="whitoutcol whitoutcol"> <div class="whitoutcol whitoutcol">
<asp:HyperLink ID="HplSaldoAuxiliar" CssClass="Texto thickbox" runat="server"></asp:HyperLink></td> <asp:HyperLink ID="HplSaldoAuxiliar" CssClass="Texto thickbox" runat="server"></asp:HyperLink>
</div> </div>
</div> </div>
<div class="form-group proveedoreespes" id="trContabilizada" runat="server" visible="true"> <div class="form-group proveedoreespes" id="trContabilizada" runat="server" visible="true">
<span class="whitoutcol linewhitsize proveedoreespes">Contabilizada: </span> <span class="whitoutcol proveedoreespes">Contabilizada: </span>
<div class="whitoutcol whitoutcol"> <div class="whitoutcol whitoutcol">
<asp:HyperLink ID="HplCompraContabilizada" runat="server" Text="No"></asp:HyperLink> <asp:HyperLink ID="HplCompraContabilizada" runat="server" Text="No"></asp:HyperLink>
<%--<asp:HyperLink ID="HplPolizaCancelación" runat="server" Visible="false" Text="Cancelación"></asp:HyperLink>--%> <%--<asp:HyperLink ID="HplPolizaCancelación" runat="server" Visible="false" Text="Cancelación"></asp:HyperLink>--%>
@@ -460,13 +455,13 @@
</div> </div>
</div> </div>
<div class="form-group proveedoreespes" runat="server" id="divTipoFactura" visible="false"> <div class="form-group proveedoreespes" runat="server" id="divTipoFactura" visible="false">
<span class="whitoutcol linewhitsize proveedoreespes">Tipo Factura: </span> <span class="whitoutcol proveedoreespes">Tipo Factura: </span>
<div class="whitoutcol whitoutcol"> <div class="whitoutcol whitoutcol">
<asp:Label ID="LblTipoFact" runat="server" Text="CBB"></asp:Label> <asp:Label ID="LblTipoFact" runat="server" Text="CBB"></asp:Label>
</div> </div>
</div> </div>
<div class="form-group proveedoreespes"> <div class="form-group proveedoreespes">
<span class="whitoutcol linewhitsize proveedoreespes">Validada SAT: </span> <span class="whitoutcol proveedoreespes">Validada SAT: </span>
<div class="whitoutcol whitoutcol"> <div class="whitoutcol whitoutcol">
<asp:DropDownList ID="DdlValidadaSAT" CssClass="form-control input-sm" runat="server" Enabled="false" Width="78px"> <asp:DropDownList ID="DdlValidadaSAT" CssClass="form-control input-sm" runat="server" Enabled="false" Width="78px">
<asp:ListItem>No</asp:ListItem> <asp:ListItem>No</asp:ListItem>
@@ -475,19 +470,19 @@
</div> </div>
</div> </div>
<div class="form-group proveedoreespes"> <div class="form-group proveedoreespes">
<span class="whitoutcol linewhitsize proveedoreespes">Capturó: </span> <span class="whitoutcol proveedoreespes">Capturó: </span>
<div class="whitoutcol whitoutcol"> <div class="whitoutcol whitoutcol">
<asp:Label ID="LblUsuarioCaptura" runat="server"></asp:Label> <asp:Label ID="LblUsuarioCaptura" runat="server"></asp:Label>
</div> </div>
</div> </div>
<div class="form-group proveedoreespes"> <div class="form-group proveedoreespes">
<span class="whitoutcol linewhitsize proveedoreespes">F. Captura </span> <span class="whitoutcol proveedoreespes">F. Captura </span>
<div class="whitoutcol whitoutcol"> <div class="whitoutcol whitoutcol">
<asp:Label ID="LitFechCaptura" runat="server"></asp:Label> <asp:Label ID="LitFechCaptura" runat="server"></asp:Label>
</div> </div>
</div> </div>
<div class="form-group proveedoreespes"> <div class="form-group proveedoreespes">
<span class="whitoutcol linewhitsize proveedoreespes">Tipo Compra:</span> <span class="whitoutcol proveedoreespes">Tipo Compra:</span>
<div class="whitoutcol whitoutcol "> <div class="whitoutcol whitoutcol ">
<asp:DropDownList ID="DdlTipoCompra" runat="server" AutoPostBack="true" OnSelectedIndexChanged="DdlTipoCompra_SelectedIndexChanged" CssClass="form-control input-sm input-small"> <asp:DropDownList ID="DdlTipoCompra" runat="server" AutoPostBack="true" OnSelectedIndexChanged="DdlTipoCompra_SelectedIndexChanged" CssClass="form-control input-sm input-small">
@@ -509,20 +504,20 @@
</div> </div>
</div> </div>
<div class="form-group proveedoreespes" runat="server" id="divImportacion" visible="false"> <div class="form-group proveedoreespes" runat="server" id="divImportacion" visible="false">
<span class="whitoutcol linewhitsize proveedoreespes">Importación </span> <span class="whitoutcol proveedoreespes">Importación </span>
<div class="whitoutcol"> <div class="whitoutcol">
<asp:CheckBox runat="server" ID="chkImportacion"> </asp:CheckBox> <asp:CheckBox runat="server" ID="chkImportacion"> </asp:CheckBox>
</div> </div>
</div> </div>
<div class="form-group proveedoreespes" runat="server" id="divCompraImportacion" visible="false"> <div class="form-group proveedoreespes" runat="server" id="divCompraImportacion" visible="false">
<span class="whitoutcol linewhitsize proveedoreespes"> <span class="whitoutcol proveedoreespes">
<asp:Literal ID="LtlImportacionTexto" runat="server">Importación</asp:Literal>:</span> <asp:Literal ID="LtlImportacionTexto" runat="server">Importación</asp:Literal>:</span>
<div class="whitoutcol"> <div class="whitoutcol">
<asp:HyperLink runat="server" ID="HplCompraImportacion" CssClass="Texto"> </asp:HyperLink> <asp:HyperLink runat="server" ID="HplCompraImportacion" CssClass="Texto"> </asp:HyperLink>
</div> </div>
</div> </div>
<div class="form-group proveedoreespes" runat="server" id="divFolioGarantia" visible="false"> <div class="form-group proveedoreespes" runat="server" id="divFolioGarantia" visible="false">
<span class="whitoutcol linewhitsize proveedoreespes">Folio Garantía </span> <span class="whitoutcol proveedoreespes">Folio Garantía </span>
<div class="whitoutcol whitoutcol"> <div class="whitoutcol whitoutcol">
<asp:DropDownList ID="DdlFolioGarantia" runat="server" AutoPostBack="true" AppendDataBoundItems="true" DataTextField="FolioGarantia" DataValueField="CveFolioGarantia" OnSelectedIndexChanged="DdlFolioGarantia_SelectedIndexChanged" CssClass="form-control input-sm input-small select2me"> <asp:DropDownList ID="DdlFolioGarantia" runat="server" AutoPostBack="true" AppendDataBoundItems="true" DataTextField="FolioGarantia" DataValueField="CveFolioGarantia" OnSelectedIndexChanged="DdlFolioGarantia_SelectedIndexChanged" CssClass="form-control input-sm input-small select2me">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
@@ -530,6 +525,15 @@
<asp:Button ID="BtnFolioGarantiaRestantes" runat="server" Text="Resta" CssClass="default" OnClick="BtnFolioGarantiaRestantes_Click" /> <asp:Button ID="BtnFolioGarantiaRestantes" runat="server" Text="Resta" CssClass="default" OnClick="BtnFolioGarantiaRestantes_Click" />
</div> </div>
</div> </div>
<div class="form-group proveedoreespes" runat="server" id="divRecoleccion" visible="false">
<span class="whitoutcol proveedoreespes">Recolección</span>
<div class="whitoutcol whitoutcol">
<asp:DropDownList ID="DdlRecoleccion" runat="server" AutoPostBack="true" DataTextField="Referencia" DataValueField="CveEntregaAlmacen" OnSelectedIndexChanged="DdlFolioGarantia_SelectedIndexChanged" CssClass="form-control input-sm input-small select2me">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<asp:Button ID="BtnRecolecciónAplicar" runat="server" Text="Aplicar" CssClass="default" />
</div>
</div>
</div> </div>
</div> </div>
</ContentTemplate> </ContentTemplate>
@@ -918,13 +922,12 @@
<asp:Button runat="server" ID="btnProrateo2" Visible="false" Text="Prorratear Nomina" CommandArgument="Nomina" CssClass="btn btn-success" /> <asp:Button runat="server" ID="btnProrateo2" Visible="false" Text="Prorratear Nomina" CommandArgument="Nomina" CssClass="btn btn-success" />
<asp:Button runat="server" ID="BtnProrateoDeducible" Visible="false" Text="Prorratear 8.5%" CommandArgument="Prorratear Deducible" CssClass="btn btn-success" /> <asp:Button runat="server" ID="BtnProrateoDeducible" Visible="false" Text="Prorratear 8.5%" CommandArgument="Prorratear Deducible" CssClass="btn btn-success" />
</div> </div>
</div> </div>
<div class="col-md-6 "> <div class="col-md-6 ">
<div id="dvTotales" runat="server" class="well" style="width: 100%; max-width: 400px; float: right;"> <div id="dvTotales" runat="server" class="well" style="width: 100%; max-width: 400px; margin-top:0px; padding:0px; float: right;">
<table border="0" rules="none" class="TextTab" width="100%"> <table border="0" rules="none" class="TextTab" width="100%">
<tr> <tr id="trTotalOriginal" runat="server" visible="false">
<td></td> <td></td>
<td></td> <td></td>
<td id="tdT0" runat="server" visible="false"><strong>Original</strong></td> <td id="tdT0" runat="server" visible="false"><strong>Original</strong></td>
@@ -954,7 +957,7 @@
<td width="82px"> <td width="82px">
<asp:TextBox ID="TxtSubTotal" runat="server" BorderStyle="None" Style="text-align: right;" Text="0.00" Width="98px"></asp:TextBox> <asp:TextBox ID="TxtSubTotal" runat="server" BorderStyle="None" Style="text-align: right;" Text="0.00" Width="98px"></asp:TextBox>
</td> </td>
<td width="82px" runat="server" id="tdT1" visible="false"> <td width="22px" runat="server" id="tdT1" visible="false">
<asp:Label Text="" ID="LbSubTotalOriginal" runat="server" /> <asp:Label Text="" ID="LbSubTotalOriginal" runat="server" />
</td> </td>
<td>&nbsp;</td> <td>&nbsp;</td>
@@ -975,12 +978,9 @@
<td runat="server" id="tdT3" visible="false"> <td runat="server" id="tdT3" visible="false">
<asp:Label Text="" ID="LbAmortizacionOriginal" runat="server" /> <asp:Label Text="" ID="LbAmortizacionOriginal" runat="server" />
</td> </td>
<td align="right">&nbsp <td align="left">&nbsp
&nbsp; <i class="fa fa-money font-green" title="Aplicar Amortización" data-toggle="tooltip" data-placement="top" runat="server" id="ImgAnticiposPendientes" visible="False" style="cursor: pointer;"></i> &nbsp; <i class="fa fa-money font-green" title="Aplicar Amortización" data-toggle="tooltip" data-placement="top" runat="server" id="ImgAnticiposPendientes" visible="False" style="cursor: pointer;"></i>
</td>
<td align="right">&nbsp
&nbsp; &nbsp;
<asp:HyperLink ID="HLAplicaNCFact" NavigateUrl="#" Visible="false" data-toggle="modal" data-target="#FacturaNC" runat="server"><i title="Aplicar Notas de Credito" data-toggle="tooltip" class='fa fa-money font-green'></i></asp:HyperLink> <asp:HyperLink ID="HLAplicaNCFact" NavigateUrl="#" Visible="false" data-toggle="modal" data-target="#FacturaNC" runat="server"><i title="Aplicar Notas de Credito" data-toggle="tooltip" class='fa fa-money font-green'></i></asp:HyperLink>
</td> </td>
</tr> </tr>
@@ -1184,9 +1184,9 @@
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<asp:UpdatePanel ID="UpINV" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpInv" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<asp:GridView ID="GvInv" runat="server" DataKeyNames="Total,PU,Cantidad,CvePS" AutoGenerateColumns="false" GridLines="None" EmptyDataText="Aun no hay registros." ShowHeaderWhenEmpty="True" CssClass="table table-striped table-hover Widthall" Visible="false"> <asp:GridView ID="GvInv" runat="server" DataKeyNames="Total,PU,Cantidad,CvePS" AutoGenerateColumns="false" GridLines="None" EmptyDataText="Aun no hay registros." ShowHeaderWhenEmpty="True" CssClass="table table-striped table-hover Widthall mysmallbtn" Visible="false">
<Columns> <Columns>
<asp:TemplateField ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Center"> <asp:TemplateField ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Center">
<HeaderTemplate> <HeaderTemplate>
@@ -1205,7 +1205,7 @@
<asp:TextBox ID="TxtDividir" Visible="false" runat="server" Width="30px"></asp:TextBox> <asp:TextBox ID="TxtDividir" Visible="false" runat="server" Width="30px"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="SoloNumeros2" runat="server" TargetControlID="TxtDividir" FilterType="Custom, Numbers" ValidChars="." /> <ajax:FilteredTextBoxExtender ID="SoloNumeros2" runat="server" TargetControlID="TxtDividir" FilterType="Custom, Numbers" ValidChars="." />
<asp:Button Text="D" ID="BtnDividirCompra" runat="server" OnClick="BtnDividirCompra_Click" Style="display: none;" /> <asp:Button Text="D" ID="BtnDividirCompra" runat="server" OnClick="BtnDividirCompra_Click" Style="display: none;" />
<asp:Button Text="SerieLote" ID="BtnSerieLote" OnClick="BtnSerieLote_Click" CssClass="btn btn-primary" runat="server" /> <asp:Button Text="Serie" ID="BtnSerieLote" OnClick="BtnSerieLote_Click" CssClass="btn btn-primary mysmallbtn" runat="server" />
</ItemTemplate> </ItemTemplate>
<HeaderStyle CssClass="Titulos" /> <HeaderStyle CssClass="Titulos" />
</asp:TemplateField> </asp:TemplateField>
@@ -3295,11 +3295,11 @@
</asp:GridView> </asp:GridView>
</td> </td>
</tr> </tr>
<tr> <%-- <tr>
<td colspan="2" align="center"> <td colspan="2" align="center">
<asp:Button Text="Aplicar Vinculacion" CssClass="btn btn-primary" ID="BtnValesVincular" OnClick="BtnValesVincular_Click" runat="server" /> <asp:Button Text="Aplicar Vinculacion" CssClass="btn btn-primary" ID="BtnValesVincular" OnClick="BtnValesVincular_Click" runat="server" />
</td> </td>
</tr> </tr>--%>
<tr> <tr>
<td> <td>
<br /> <br />

336
Compras/Compras.aspx.vb
View File

@@ -10,6 +10,7 @@ Imports System.Threading.Tasks
Imports Newtonsoft.Json Imports Newtonsoft.Json
Imports Extensiones Imports Extensiones
Imports MoreLinq Imports MoreLinq
Imports ClbNegBICFDv3_3
Partial Class Compras_Compras Partial Class Compras_Compras
Inherits ClsPaginas Inherits ClsPaginas
@@ -1341,7 +1342,7 @@ Partial Class Compras_Compras
CambiaEjercicioAC() CambiaEjercicioAC()
End If End If
UpConsignaciones.Update() UpConsignaciones.Update()
UpINV.Update() UpInv.Update()
'DdlIVA.Visible = True ' cuando es compra manual 'DdlIVA.Visible = True ' cuando es compra manual
'If UsuarioActual.CveEmpresa = 126 Then 'If UsuarioActual.CveEmpresa = 126 Then
' CargaOrdenCorte() ' CargaOrdenCorte()
@@ -1735,6 +1736,50 @@ Partial Class Compras_Compras
End If End If
End If End If
Dim SbValRet As New StringBuilder
For Each concepto As XmlNode In nodeconceptos
' Obtener la descripción del concepto
Dim descripcion As String = ValorXML(concepto, "Descripcion")
Dim importeValue As Decimal = Decimal.Parse(ValorXML(concepto, "Importe"))
' Seleccionar el nodo de Impuestos dentro de Concepto, si existe
Dim impuestosNode As XmlNode = concepto.SelectSingleNode("cfdi:Impuestos", namespaces)
If Not impuestosNode Is Nothing Then
' Seleccionar los nodos de Retencion dentro de Impuestos
Dim retenciones As XmlNodeList = impuestosNode.SelectNodes("cfdi:Retenciones/cfdi:Retencion", namespaces)
For Each retencion As XmlNode In retenciones
' Obtener los valores de los atributos Base e Importe
Dim baseValue As Decimal = Decimal.Parse(ValorXML(retencion, "Base"))
Dim impuesto As String = ValorXML(retencion, "Impuesto")
If impuesto = "001" Then
impuesto = "Retención ISR"
ElseIf impuesto = "002" Then
impuesto = "Retención IVA"
ElseIf impuesto = "003" Then
impuesto = "IEPS"
End If
' Validar si Base coincide con Importe
If baseValue <> importeValue Then
'SbValRet.Append($"La base e importe de la retención del impuesto {impuesto} no coinciden para {descripcion}. Base: {baseValue.ToString()}, Importe: {importeValue.ToString()} <br>")
SbValRet.Append($"Producto: {descripcion} La base e importe del impuesto {impuesto} no coincide Base: {baseValue.ToString()}, Importe Producto: {importeValue.ToString()} <br>")
End If
Next
End If
Next
If SbValRet.ToString.Trim.Length > 0 Then
Alert(SbValRet.ToString, TipoMensaje.MsgAdvertencia)
End If
Else Else
CargaConceptosXML(XMLDoc) CargaConceptosXML(XMLDoc)
End If End If
@@ -1748,6 +1793,7 @@ Partial Class Compras_Compras
DdlTipoComprobante.Items.Remove(DdlTipoComprobante.Items.FindByValue("DEV")) DdlTipoComprobante.Items.Remove(DdlTipoComprobante.Items.FindByValue("DEV"))
DdlTipoCompra.Items.Remove(DdlTipoCompra.Items.FindByValue("6")) DdlTipoCompra.Items.Remove(DdlTipoCompra.Items.FindByValue("6"))
DdlTipoCompra.Items.Remove(DdlTipoCompra.Items.FindByValue("11")) DdlTipoCompra.Items.Remove(DdlTipoCompra.Items.FindByValue("11"))
If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then DdlTipoCompra.Items.Add(New ListItem("Recolección", "14"))
Case "E" Case "E"
DdlTipoComprobante.SelectedValue = "NC" DdlTipoComprobante.SelectedValue = "NC"
DdlTipoComprobante.Items.Remove(DdlTipoComprobante.Items.FindByValue("Fac")) DdlTipoComprobante.Items.Remove(DdlTipoComprobante.Items.FindByValue("Fac"))
@@ -3291,7 +3337,7 @@ Partial Class Compras_Compras
If RetIVAOriginal > 0 Then If RetIVAOriginal > 0 Then
Dim CalRetIVAPor As Decimal = (RetIVAOriginal * 1 / SubTotal2Original).RoundAD(6).ToDecimal Dim CalRetIVAPor As Decimal = (RetIVAOriginal * 1 / SubTotal2Original).RoundAD(6).ToDecimal
If (CalRetIVAPor).RoundSQL(6) = 0.106667 OrElse (CalRetIVAPor).RoundSQL(6) = 0.053333 Then If (CalRetIVAPor).RoundSQL(5) = 0.10666 OrElse (CalRetIVAPor).RoundSQL(5) = 0.05333 Then
DdlRetIVAConcepto.SelectedValueExist("1") '10.66 servicios profesionales DdlRetIVAConcepto.SelectedValueExist("1") '10.66 servicios profesionales
End If End If
If RetIVAFlete Then '4 Fletes If RetIVAFlete Then '4 Fletes
@@ -3312,6 +3358,7 @@ Partial Class Compras_Compras
'permitido en un margen de 1% a 2% 'permitido en un margen de 1% a 2%
If RetISRResico OrElse (CalRetISRPor >= 0.01 AndAlso CalRetISRPor <= 0.02) Then '1.25 Recico regimen simplificado confianza If RetISRResico OrElse (CalRetISRPor >= 0.01 AndAlso CalRetISRPor <= 0.02) Then '1.25 Recico regimen simplificado confianza
DdlRetISRConcepto.SelectedValueExist("3") DdlRetISRConcepto.SelectedValueExist("3")
RetISRResico = True
End If End If
End If End If
End If End If
@@ -3398,7 +3445,7 @@ Partial Class Compras_Compras
End Sub End Sub
Private Sub CargaTiposAF() Private Sub CargaTiposAF()
ViewState("TmpDTTiposAF") = GlobalDTTipoActivoFijo(UsuarioActual.CveEmpresa) ViewState("TmpDTTiposAF") = GlobalDTTipoActivoFijo(UsuarioActual.CveEmpresa).Copy()
Dim Row As DataRow = DirectCast(ViewState("TmpDTTiposAF"), DataTable).NewRow() Dim Row As DataRow = DirectCast(ViewState("TmpDTTiposAF"), DataTable).NewRow()
Row("CveTipoActivoFijo") = -1 : Row("TipoActivoFijo") = "Seleccione" Row("CveTipoActivoFijo") = -1 : Row("TipoActivoFijo") = "Seleccione"
DirectCast(ViewState("TmpDTTiposAF"), DataTable).Rows.InsertAt(Row, 0) DirectCast(ViewState("TmpDTTiposAF"), DataTable).Rows.InsertAt(Row, 0)
@@ -4038,7 +4085,6 @@ Partial Class Compras_Compras
End If End If
End If End If
If CierrePeriodo Then If CierrePeriodo Then
Alert("El periodo de la compra actual ya se encuentra cerrado. No podra registrar la compra.", TipoMensaje.MsgAdvertencia) Alert("El periodo de la compra actual ya se encuentra cerrado. No podra registrar la compra.", TipoMensaje.MsgAdvertencia)
Exit Sub Exit Sub
@@ -4136,7 +4182,7 @@ Partial Class Compras_Compras
End If End If
End If End If
If UsuarioActual.Empresa.Funcionalidad(538).ToEntero = 1 Then If UsuarioActual.Empresa.Funcionalidad(538) = "1" Then
If TmpDT.MIN("CvePS").ToEntero <= 0 Then If TmpDT.MIN("CvePS").ToEntero <= 0 Then
Alert("Todos los Productos/Servicios deben estar registrados o aliados a un productos ya registrado.", TipoMensaje.MsgAdvertencia) Alert("Todos los Productos/Servicios deben estar registrados o aliados a un productos ya registrado.", TipoMensaje.MsgAdvertencia)
Exit Sub Exit Sub
@@ -4187,7 +4233,7 @@ Partial Class Compras_Compras
If GvInv.HeaderRow.FCCheckBox("cbAll").Checked = True Then If GvInv.HeaderRow.FCCheckBox("cbAll").Checked = True Then
For Each Dr As DataRow In DtInv.Rows For Each Dr As DataRow In DtInv.Rows
If Dr("CveMetodoInventario").ToString.ToEntero = 5 Then If Dr("CveMetodoInventario").ToString = "5" Then
Cantidad = DtDatosDetalle.FiltraParametros(String.Format("CvePS = {0}", Dr("CvePS").ToString)).Rows.Count Cantidad = DtDatosDetalle.FiltraParametros(String.Format("CvePS = {0}", Dr("CvePS").ToString)).Rows.Count
If Cantidad < Dr("Cantidad").ToString.ToEntero Then If Cantidad < Dr("Cantidad").ToString.ToEntero Then
Alert("No hay productos a los que no se le ha asociado Serie", TipoMensaje.MsgError) Alert("No hay productos a los que no se le ha asociado Serie", TipoMensaje.MsgError)
@@ -4344,7 +4390,7 @@ Partial Class Compras_Compras
UM.Dispose() UM.Dispose()
PSS.Dispose() PSS.Dispose()
If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso DdlTipoCompra.SelectedValue = "12" Then 'cuando es garantía, debe de especificar la salida de almacen If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso DdlTipoCompra.SelectedValue.Contiene("12") Then 'cuando es garantía, debe de especificar la salida de almacen
If Not GvInv.HeaderRow.FCCheckBox("cbAll").Checked OrElse GvInv.HeaderRow.FCDropDownList("ddlAlmacen").SelectedValue.ToEntero <= 0 Then If Not GvInv.HeaderRow.FCCheckBox("cbAll").Checked OrElse GvInv.HeaderRow.FCDropDownList("ddlAlmacen").SelectedValue.ToEntero <= 0 Then
Alert("No ha especificado la salida de almacen en la garantía.", TipoMensaje.MsgAdvertencia) Alert("No ha especificado la salida de almacen en la garantía.", TipoMensaje.MsgAdvertencia)
Exit Sub Exit Sub
@@ -4379,28 +4425,25 @@ Partial Class Compras_Compras
Dim EntradaComoGastoConAlmacen As Boolean = False Dim EntradaComoGastoConAlmacen As Boolean = False
If GvInv.Rows.Count > 0 AndAlso GvInv.HeaderRow.FCCheckBox("cbAll").Checked Then If GvInv.Rows.Count > 0 AndAlso GvInv.HeaderRow.FCCheckBox("cbAll").Checked Then
Dim CvealamcenSeleccionado As Integer = -1 Dim CvealmacenSeleccionado As Integer = -1
For Each GvRow As GridViewRow In GvInv.Rows For Each GvRow As GridViewRow In GvInv.Rows
If GvRow.RowType = DataControlRowType.DataRow Then If GvRow.RowType = DataControlRowType.DataRow Then
CvealamcenSeleccionado = GvRow.FCDropDownList("ddlEAlmacen").SelectedValue.ToEntero CvealmacenSeleccionado = GvRow.FCDropDownList("ddlEAlmacen").SelectedValue.ToEntero
If CvealamcenSeleccionado > 0 Then If CvealmacenSeleccionado > 0 Then
Exit For Exit For
End If End If
End If End If
Next Next
If CvealamcenSeleccionado > 0 Then If CvealmacenSeleccionado > 0 Then
Dim ModalidadAlmacen As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=CvealamcenSeleccionado).FiltroPrimeroValor("CveModalidad").ToEntero Dim ModalidadAlmacen As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=CvealmacenSeleccionado).FiltroPrimeroValor("CveModalidad").ToEntero
If ModalidadAlmacen = 0 Then If ModalidadAlmacen = 0 Then
EntradaComoGastoConAlmacen = True EntradaComoGastoConAlmacen = True
End If End If
End If End If
End If End If
'si hay necesidad de actualizar el globaldtps 'si hay necesidad de actualizar el globaldtps
If RegeneraPS Then If RegeneraPS Then
'Dim Hilo As New System.Threading.Thread(AddressOf GeneraGlobalDT) 'Dim Hilo As New System.Threading.Thread(AddressOf GeneraGlobalDT)
@@ -4452,7 +4495,7 @@ Partial Class Compras_Compras
Dim ObjAcar As New ClsAcarreos(ObjCompras.IniciaTransacSQL()) Dim ObjAcar As New ClsAcarreos(ObjCompras.IniciaTransacSQL())
Dim ObjCGame As New ClsCGame(ObjCompras.IniciaTransacSQL()) Dim ObjCGame As New ClsCGame(ObjCompras.IniciaTransacSQL())
Dim ObjProductosServicios As New ClsProductosServicios(ObjCompras.IniciaTransacSQL()) Dim ObjProductosServicios As New ClsProductosServicios(ObjCompras.IniciaTransacSQL())
Dim ObjGrales As New ClsGenerales(ObjCompras.IniciaTransacSQL())
Dim ObjContaAC As ClsContPAQi = Nothing Dim ObjContaAC As ClsContPAQi = Nothing
@@ -5100,14 +5143,16 @@ Partial Class Compras_Compras
End If End If
'Vincula Vales 'Vincula Vales
If IdVale.Count > 0 Then 'If IdVale.Count > 0 Then
For Each cve As Integer In IdVale ' For Each cve As Integer In IdVale
If Not ObjAF.UpdateValeCombustible(cve, CveCompra, -1, "", -1, -1, -1, UsuarioActual.CveEmpresa) Then ' If Not ObjAF.UpdateValeCombustible(cve, CveCompra, -1, "", -1, -1, -1, UsuarioActual.CveEmpresa) Then
ErrorAF = True ' ErrorAF = True
Exit For ' Exit For
End If ' End If
Next ' Next
End If 'End If
'AGREGA AF COMPRA - Cuando es Compra se guarda CveCompraDetalle en AF 'AGREGA AF COMPRA - Cuando es Compra se guarda CveCompraDetalle en AF
If Row("TipoAF").ToString.ToEntero = 2 Then If Row("TipoAF").ToString.ToEntero = 2 Then
@@ -5132,6 +5177,12 @@ Partial Class Compras_Compras
Next Next
''TERMINA: INSERTA DETALLES DE LA COMPRA ''TERMINA: INSERTA DETALLES DE LA COMPRA
If DdlTipoCompra.SelectedValue = "14" Then 'recolección
If Not ObjGrales.UpdateInvEntregaAlmacenEstatus(DdlRecoleccion.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, 2, CveCompra) Then
ErrorDetalles = True
End If
End If
'QUEMA SALDOS DE INV-COMPRA | MERCANCIA RECIBIDA POR ADELANTADO (OC) | PP 176 'QUEMA SALDOS DE INV-COMPRA | MERCANCIA RECIBIDA POR ADELANTADO (OC) | PP 176
If OCVinculada And Not DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV", "Ant") Then If OCVinculada And Not DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV", "Ant") Then
For Each Row As DataRow In TmpDT.FiltraParametros("CveTipoPS = 2").Rows For Each Row As DataRow In TmpDT.FiltraParametros("CveTipoPS = 2").Rows
@@ -5279,12 +5330,21 @@ Partial Class Compras_Compras
Dim indice As Integer = 0 Dim indice As Integer = 0
Dim ImporteConcepto As Decimal = 0 Dim ImporteConcepto As Decimal = 0
Dim tCveFolioGarantia As Integer = -1 Dim tCveFolioGarantia As Integer = -1
Dim tCveEntregaAlmacen As Integer = -1
Dim CveConceptoMovimiento As Integer = 2 Dim CveConceptoMovimiento As Integer = 2
'apoyo logistico/garantia If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") Then 'cuando es empresa acumuladora
If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") AndAlso DdlTipoCompra.SelectedValue = "12" Then 'garantía 'apoyo logistico/garantia
CveConceptoMovimiento = 13 If DdlTipoCompra.SelectedValue = "12" Then 'garantía
tCveFolioGarantia = DdlFolioGarantia.SelectedValue.ToEntero CveConceptoMovimiento = 13
tCveFolioGarantia = DdlFolioGarantia.SelectedValue.ToEntero
End If
''recolección
'If DdlTipoCompra.SelectedValue = "14" Then 'recolección
' CveConceptoMovimiento = 42
' tCveEntregaAlmacen = DdlRecoleccion.SelectedValue.ToEntero
'End If
End If End If
If (DdlTipoComprobante.SelectedValue = "Fac" AndAlso CveCompraRefacturacion <= 0) OrElse CveConceptoMovimiento = 13 Then If (DdlTipoComprobante.SelectedValue = "Fac" AndAlso CveCompraRefacturacion <= 0) OrElse CveConceptoMovimiento = 13 Then
For Each tCveAlmacen As Integer In ListAlmacenes For Each tCveAlmacen As Integer In ListAlmacenes
@@ -5296,7 +5356,7 @@ Partial Class Compras_Compras
Dim fecha As Date = TxtFecha.Text.ToDate Dim fecha As Date = TxtFecha.Text.ToDate
If Not UsuarioActual.Empresa.UsaAC Then fecha = NowADS() If Not UsuarioActual.Empresa.UsaAC Then fecha = NowADS()
CveMovimientoInventario = ObjInventario.AddMovimiento(tCveAlmacen, CveConceptoMovimiento, 1, fecha, 0, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompra, -1, -1, -1, TipoCambio:=If(DdlMoneda.SelectedValue.ToEntero = 1, -1, TipoCambioGuardar), CveFolioGarantia:=tCveFolioGarantia, Modulo:="Comp/G2") CveMovimientoInventario = ObjInventario.AddMovimiento(tCveAlmacen, CveConceptoMovimiento, 1, fecha, 0, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompra, -1, -1, -1, TipoCambio:=If(DdlMoneda.SelectedValue.ToEntero = 1, -1, TipoCambioGuardar), CveFolioGarantia:=tCveFolioGarantia, Modulo:="Comp/G2", CveEntregaAlmacen:=tCveEntregaAlmacen)
If CveMovimientoInventario <= 0 Then If CveMovimientoInventario <= 0 Then
ErrorMovInv = True ErrorMovInv = True
@@ -6332,7 +6392,7 @@ Partial Class Compras_Compras
CveMovimientoDevolucion = Devolucion.CveMovimiento CveMovimientoDevolucion = Devolucion.CveMovimiento
End If End If
'cuando es garantía. 'cuando es garantía.
If DdlTipoCompra.SelectedValue = "12" Then If DdlTipoCompra.SelectedValue.Contiene("12", "14") Then
ConceptoContabilizacionNC = 259 ConceptoContabilizacionNC = 259
End If End If
@@ -10410,14 +10470,60 @@ Partial Class Compras_Compras
DdlTipoTransaccionCaja.Items.Insert(0, New ListItem("Seleccione Tipo Movimiento", "-1")) DdlTipoTransaccionCaja.Items.Insert(0, New ListItem("Seleccione Tipo Movimiento", "-1"))
End Sub End Sub
Private Sub DdlTipoTransaccion_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlTipoTransaccion.SelectedIndexChanged
CargaCuentas()
UpContado.Update()
End Sub
Private Sub DdlTipoTransaccionCaja_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlTipoTransaccionCaja.SelectedIndexChanged
CargaCuentas()
UpContado.Update()
End Sub
Private Sub CargaCuentas() Private Sub CargaCuentas()
Dim dt As DataTable = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa)
'cuando es layout
If DdlTipoTransaccion.SelectedValue.ToEntero = 9 Then
dt = dt.FiltraParametros("UsaLayout = 1")
End If
If DdlTipoTransaccion.SelectedValue.ToEntero = 17 Then
dt = dt.FiltraParametros("UsaLayoutGrupos = 1")
End If
DdlCuenta.SelectedValue = Nothing
DdlCuenta.Items.Clear() DdlCuenta.Items.Clear()
DdlCuenta.DataSource = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros(String.Format("CveTipoCuenta <> 1")) DdlCuenta.ClearSelection()
DdlCuenta.DataSource = dt.FiltraParametros(String.Format("CveTipoCuenta <> 1"))
DdlCuenta.DataBind() DdlCuenta.DataBind()
DdlCuenta.Items.Insert(0, New ListItem("Seleccione", "-1")) DdlCuenta.Items.Insert(0, New ListItem("Seleccione", "-1"))
Dim dtCaja As DataTable = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa)
If DdlTipoTransaccionCaja.SelectedValue.ToEntero = 9 Then
dtCaja = dtCaja.FiltraParametros("UsaLayout = 1")
End If
If DdlTipoTransaccionCaja.SelectedValue.ToEntero = 17 Then
dtCaja = dtCaja.FiltraParametros("UsaLayoutGrupos = 1")
End If
DdlCuentaCaja.SelectedValue = Nothing
DdlCuentaCaja.Items.Clear() DdlCuentaCaja.Items.Clear()
DdlCuentaCaja.DataSource = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros(String.Format("CveTipoCuenta = 1")) DdlCuentaCaja.ClearSelection()
DdlCuentaCaja.Items.Clear()
DdlCuentaCaja.DataSource = dtCaja.FiltraParametros(String.Format("CveTipoCuenta = 1"))
DdlCuentaCaja.DataBind() DdlCuentaCaja.DataBind()
DdlCuentaCaja.Items.Insert(0, New ListItem("Seleccione", "-1")) DdlCuentaCaja.Items.Insert(0, New ListItem("Seleccione", "-1"))
End Sub End Sub
@@ -13495,44 +13601,23 @@ Partial Class Compras_Compras
Private Sub BtnValesCombustibleVer_Click(sender As Object, e As EventArgs) Handles BtnValesCombustibleVer.Click 'Private Sub BtnValesCombustibleVer_Click(sender As Object, e As EventArgs) Handles BtnValesCombustibleVer.Click
Dim AF As New ClsAF ' Dim AF As New ClsAF
If AF.GetValesCombustible(-1, -1, -1, CveProveedor, -1, -1, -1, -1, -1, -1, -1, UsuarioActual.CveEmpresa, -1, -1) Then ' If AF.GetValesCombustible(-1, -1, -1, CveProveedor, -1, -1, -1, -1, -1, -1, -1, UsuarioActual.CveEmpresa, -1, -1) Then
GvVales.DataSource = AF.DtResultados ' GvVales.DataSource = AF.DtResultados
End If ' End If
AF.Dispose() ' AF.Dispose()
GvVales.DataBind() ' GvVales.DataBind()
DivValesCombustible.Visible = True ' DivValesCombustible.Visible = True
RegistraScript(String.Format("$('#{0}').modal('show')", DivValesCombustible.ClientID)) ' RegistraScript(String.Format("$('#{0}').modal('show')", DivValesCombustible.ClientID))
UPPValesCombustible.Update() ' UPPValesCombustible.Update()
End Sub 'End Sub
#End Region #End Region
#Region " VALES COMBUSTIBLES "
Protected Sub BtnValesVincular_Click(sender As Object, e As EventArgs)
IdVale = New List(Of Integer)
For Each row As GridViewRow In GvVales.Rows
If row.FCCheckBox("ChkVale").Checked Then
IdVale.Add(row.DataKey("CveVale").ToEntero)
End If
Next
If IdVale.Count <= 0 Then
Alert("Debe elegir por lo menos un vale de combustible. Por favor rectifique y vuelva a intentar.", TipoMensaje.MsgAdvertencia)
Else
Alert("Los vales selecciondos están listos para vincular")
RegistraScript(String.Format("$('#{0}').modal('hide')", DivValesCombustible.ClientID))
'For Each cve In IdVale
' Alert(cve.ToString)
'Next
End If
End Sub
#End Region
#Region " VINCULAR OC " #Region " VINCULAR OC "
Private Sub InicializaOC() Private Sub InicializaOC()
@@ -15778,6 +15863,7 @@ Partial Class Compras_Compras
End Sub End Sub
Private Sub OriginalesVisible(Accion As Boolean) Private Sub OriginalesVisible(Accion As Boolean)
tdT0.Visible = Accion tdT0.Visible = Accion
trTotalOriginal.Visible = Accion
tdT1.Visible = Accion tdT1.Visible = Accion
tdT2.Visible = Accion tdT2.Visible = Accion
tdT3.Visible = Accion tdT3.Visible = Accion
@@ -15796,7 +15882,7 @@ Partial Class Compras_Compras
'VALIDA IMPORTES 'VALIDA IMPORTES
'VALIDA TOTAL CON LOS IMPORTES TOTALES 'VALIDA TOTAL CON LOS IMPORTES TOTALES
Dim TempSubTotal, TempDescuentos, TempIVA, TempSubTotal2, TempRetIVA, TempRetISR, TempTotal, DifTotales, TempIEPS As Double Dim TempSubTotal, TempDescuentos, TempIVA, TempSubTotal2, TempRetIVA, TempRetISR, TempTotal, DifTotales, TempIEPS As Decimal
Dim Amortizacion As Decimal = 0 Dim Amortizacion As Decimal = 0
Dim TieneAmortizacion As Boolean = False Dim TieneAmortizacion As Boolean = False
@@ -15813,26 +15899,25 @@ Partial Class Compras_Compras
TxtSubTotal.Text = (TxtSubTotal.Text.ToDouble + Amortizacion).ToString TxtSubTotal.Text = (TxtSubTotal.Text.ToDouble + Amortizacion).ToString
End If End If
TempSubTotal = TxtSubTotal.Text.ToDecimal
TempSubTotal = TxtSubTotal.Text.ToDouble
SubTotalOriginal = TxtSubTotal.Text.ToDecimal SubTotalOriginal = TxtSubTotal.Text.ToDecimal
SubTotal2Original = TxtSubTotal2.Text.ToDecimal SubTotal2Original = TxtSubTotal2.Text.ToDecimal
TempDescuentos = TxtDescuento.Text.Trim.ToDouble + Amortizacion TempDescuentos = TxtDescuento.Text.Trim.ToDecimal + Amortizacion
TempSubTotal2 = TempSubTotal - TempDescuentos TempSubTotal2 = TempSubTotal - TempDescuentos
TempIVA = TxtIVA.Text.ToDouble TempIVA = TxtIVA.Text.ToDecimal
TempIEPS = TxtIEPS.Text.ToDouble TempIEPS = TxtIEPS.Text.ToDecimal
TempRetIVA = TxtRetIVA.Text.ToDouble TempRetIVA = TxtRetIVA.Text.ToDecimal
TempRetISR = TxtRetISR.Text.ToDouble TempRetISR = TxtRetISR.Text.ToDecimal
TempTotal = Math.Round(TempSubTotal2 + TempIVA + TempIEPS - TempRetIVA - TempRetISR + TxtOtrosImpuestos.Text.ToDouble - Amortizacion, 2) TempTotal = Math.Round(TempSubTotal2 + TempIVA + TempIEPS - TempRetIVA - TempRetISR + TxtOtrosImpuestos.Text.ToDecimal - Amortizacion, 2)
DifTotales = TxtTotal.Text.ToDouble - TempTotal DifTotales = TxtTotal.Text.ToDecimal - TempTotal
Dim DiferenciaPermitida As Decimal = 0.6D Dim DiferenciaPermitida As Decimal = 0.6D
If Math.Abs(DifTotales) > DiferenciaPermitida Then If Math.Abs(DifTotales) > DiferenciaPermitida Then
Alert(String.Format("Los importes de los conceptos (Productos/Servicios) no cuadran con el total. Por favor verifique y vuelva a intentar.[{0}]", Math.Abs(DifTotales) - DiferenciaPermitida), TipoMensaje.MsgAdvertencia) Alert(String.Format("Los importes de los conceptos (Productos/Servicios) no cuadran con el total. Por favor verifique y vuelva a intentar.[{0}]", Math.Abs(DifTotales) - DiferenciaPermitida), TipoMensaje.MsgAdvertencia)
EsValido = False EsValido = False
ElseIf DifTotales <> 0 Then ElseIf DifTotales <> 0 Then
TxtSubTotal2.Text = (TxtSubTotal2.Text.ToDouble + DifTotales).ToString TxtSubTotal2.Text = (TxtSubTotal2.Text.ToDecimal + DifTotales).ToString
TxtSubTotal.Text = (TxtSubTotal.Text.ToDouble + DifTotales).ToString TxtSubTotal.Text = (TxtSubTotal.Text.ToDecimal + DifTotales).ToString
SubTotalOriginal = TxtSubTotal.Text.ToDecimal SubTotalOriginal = TxtSubTotal.Text.ToDecimal
SubTotal2Original = TxtSubTotal2.Text.ToDecimal SubTotal2Original = TxtSubTotal2.Text.ToDecimal
End If End If
@@ -16691,7 +16776,7 @@ Partial Class Compras_Compras
If DrPS IsNot Nothing Then If DrPS IsNot Nothing Then
Row("PSCodigo") = If(PSCodigo = "", DrPS("PSCodigo").ToString, PSCodigo) Row("PSCodigo") = If(PSCodigo = "", DrPS("PSCodigo").ToString, PSCodigo)
Row("CveMetodoInventario") = DrPS("Inv_CveMetodoInventario").ToString.ToEntero Row("CveMetodoInventario") = DrPS("Inv_CveMetodoInventario").ToString.ToEntero
If DdlTipoCompra.SelectedValue = "12" AndAlso DrPS("AplicaSerie").ToString = "True" Then If Not DdlTipoCompra.SelectedValue.Contiene("12") AndAlso DrPS("AplicaSerie").ToString = "True" Then
Row("CveMetodoInventario") = "1" Row("CveMetodoInventario") = "1"
End If End If
Else Else
@@ -18792,11 +18877,11 @@ Partial Class Compras_Compras
If CvePrePoliza > 0 Then If CvePrePoliza > 0 Then
If CveMoneda = 2 Then If CveMoneda = 2 Then
ImporteME = (DiferenciaInvOC / TCInvOC).RoundAD() ImporteME = (DiferenciaInvOC / TCInvOC).RoundAD()
ImporteMEComp = ((ImporteME * TCInvOC) - ImporteME).RoundAD() ImporteMEComp = ((ImporteME * TCInvOC) - ImporteME).RoundAD()
Dim DifImporte As Decimal = DiferenciaInvOC - (ImporteME + ImporteMEComp) Dim DifImporte As Decimal = DiferenciaInvOC - (ImporteME + ImporteMEComp)
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoCosto, DiferenciaInvOCCosto, DiferenciaInvOCCosto, 177, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, CveOCDetalle:=CveOCDetalle, CveSubProyecto:=CveSubProyecto) Then If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoCosto, DiferenciaInvOCCosto, DiferenciaInvOCCosto, 177, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, CveOCDetalle:=CveOCDetalle, CveSubProyecto:=CveSubProyecto) Then
Retorno = False Retorno = False
@@ -18804,12 +18889,8 @@ Partial Class Compras_Compras
End If End If
If ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteME, ImporteME, 228, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, ImporteME:=ImporteME, TipoCambio:=TCInvOC, CveOCDetalle:=CveOCDetalle) Then If ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteME, ImporteME, 228, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, ImporteME:=ImporteME, TipoCambio:=TCInvOC, CveOCDetalle:=CveOCDetalle) Then
If ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteMEComp, ImporteMEComp, 229, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, ImporteME:=ImporteME, TipoCambio:=TCInvOC, CveOCDetalle:=CveOCDetalle) Then If ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteMEComp, ImporteMEComp, 229, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, ImporteME:=ImporteME, TipoCambio:=TCInvOC, CveOCDetalle:=CveOCDetalle) Then
If DifImporte <> 0 AndAlso Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoCosto, DifImporte, DifImporte, 69, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, ImporteME:=DifImporte, TipoCambio:=TCInvOC, CveOCDetalle:=CveOCDetalle, CveClasificacion:=CveClasificacionCostoOC, CveSubProyecto:=CveSubProyecto) Then If DifImporte <> 0 AndAlso Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoCosto, DifImporte, DifImporte, 69, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, ImporteME:=DifImporte, TipoCambio:=TCInvOC, CveOCDetalle:=CveOCDetalle, CveClasificacion:=CveClasificacionCostoOC, CveSubProyecto:=CveSubProyecto) Then
Retorno = False
Exit For
End If
Else
Retorno = False Retorno = False
Exit For Exit For
End If End If
@@ -18818,6 +18899,10 @@ Partial Class Compras_Compras
Exit For Exit For
End If End If
Else Else
Retorno = False
Exit For
End If
Else
'2018.11.24 se cambia concepto 177, de cargo a abono negativo., petición MALL '2018.11.24 se cambia concepto 177, de cargo a abono negativo., petición MALL
If ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoCosto, DiferenciaInvOCCosto, DiferenciaInvOCCosto, 177, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, CveOCDetalle:=CveOCDetalle, CveSubProyecto:=CveSubProyecto, CveClasificacion:=CveClasificacionCostoOC) Then If ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoCosto, DiferenciaInvOCCosto, DiferenciaInvOCCosto, 177, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, CveOCDetalle:=CveOCDetalle, CveSubProyecto:=CveSubProyecto, CveClasificacion:=CveClasificacionCostoOC) Then
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, DiferenciaInvOC, DiferenciaInvOC, 176, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, CveOCDetalle:=CveOCDetalle, CveColectiva:=CveColectiva) Then If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, DiferenciaInvOC, DiferenciaInvOC, 176, SerieFolio, ConceptoPartida, CveProveedor:=CveProveedor, CveMovimientoAlmacen:=CveMovimientoAlmacen, CveOC:=CveOrdenCompra, CveOCDetalle:=CveOCDetalle, CveColectiva:=CveColectiva) Then
@@ -18825,22 +18910,22 @@ Partial Class Compras_Compras
Exit For Exit For
End If End If
Else Else
Retorno = False
Exit For
End If
End If
If Not OC.UpdateOrdenCompraDetalleAjuste(CveOrdenCompra, CveOCDetalle, PUCompra, UsuarioActual.CveUsuario) Then
Retorno = False Retorno = False
Exit For Exit For
End If End If
End If
If Not OC.UpdateOrdenCompraDetalleAjuste(CveOrdenCompra, CveOCDetalle, PUCompra, UsuarioActual.CveUsuario) Then
Retorno = False
Exit For
End If
If Retorno Then If Retorno Then
If Not OCBitacora.AddEventoBitacora(String.Format("Se registró una póliza de ajuste por cambio de precio en producto: {0}", PS), "-1", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveOC:=CveOrdenCompra) Then If Not OCBitacora.AddEventoBitacora(String.Format("Se registró una póliza de ajuste por cambio de precio en producto: {0}", PS), "-1", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveOC:=CveOrdenCompra) Then
Retorno = False Retorno = False
End If
End If End If
End If End If
End If End If
End If
Next Next
If Retorno AndAlso Not ObjConta.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual) Then If Retorno AndAlso Not ObjConta.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual) Then
Alert("No se procesaron las diferencias en precio.", TipoMensaje.MsgAdvertencia) Alert("No se procesaron las diferencias en precio.", TipoMensaje.MsgAdvertencia)
@@ -18911,25 +18996,40 @@ Partial Class Compras_Compras
Protected Sub DdlTipoCompra_SelectedIndexChanged(sender As Object, e As EventArgs) Protected Sub DdlTipoCompra_SelectedIndexChanged(sender As Object, e As EventArgs)
If DdlTipoCompra.SelectedValue.ToEntero.Contiene(9, 10, 12) Then 'Al seleccionar apoyo logístico se cargan los amancenes de devoculcion proveedor para dar entrada If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then 'cuando es emp acumuladora
If DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") Then
If DdlTipoCompra.SelectedValue.Contiene("9", "10", "12") Then 'Al seleccionar apoyo logístico se cargan los amancenes de devoculcion proveedor para dar entrada
If DdlTipoCompra.SelectedValue = "12" AndAlso UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso DdlTipoComprobante.SelectedValue.Contiene("NC", "DEV") Then 'cuando es emp acumuladora If DdlTipoCompra.SelectedValue = "12" Then
divFolioGarantia.Visible = True divFolioGarantia.Visible = True
Using objAcum As New ClsAcumuladores Using objAcum As New ClsAcumuladores
If objAcum.FoliosGarantiaGet(-1, UsuarioActual.Empresa.CveEmpresa, Estatus:=2, TipoFolio:="-1", Area:=-1, CveSubProyecto:=-1) Then If objAcum.FoliosGarantiaGet(-1, UsuarioActual.Empresa.CveEmpresa, Estatus:=2, TipoFolio:="-1", Area:=-1, CveSubProyecto:=-1) Then
DdlFolioGarantia.DataSource = objAcum.DtResultados.FiltraParametros("", "FechaIng DESC") DdlFolioGarantia.DataSource = objAcum.DtResultados.FiltraParametros("", "FechaIng DESC")
DdlFolioGarantia.DataBind() DdlFolioGarantia.DataBind()
End If
End Using
End If End If
End Using 'cambia si hay ps con uso de serie
For Each dr As DataRow In TmpDT.Rows
dr("CveMetodoInventario") = 1
Next
CargaGvInv()
End If
ElseIf DdlTipoComprobante.SelectedValue.Contiene("Fac") Then
If DdlTipoCompra.SelectedValue.Contiene("14") Then 'Recolección
divRecoleccion.Visible = True
Using objAcum As New ClsGenerales
If objAcum.GetInvEntregaAlmacenRuta(-1, MinFecha, MaxFecha, UsuarioActual.Empresa.CveEmpresa, 3, Estatus:=1) Then
DdlRecoleccion.DataSource = objAcum.DtResultados.FiltraParametros("", "Referencia DESC")
End If
End Using
DdlRecoleccion.DataBind()
CargaGvInv()
End If
End If End If
'cambia si hay ps con uso de serie
For Each dr As DataRow In TmpDT.Rows
dr("CveMetodoInventario") = 1
Next
CargaGvInv()
End If End If
End Sub End Sub
#End Region #End Region
@@ -19524,11 +19624,7 @@ Partial Class Compras_Compras
Dim ProcesoError As Boolean = True Dim ProcesoError As Boolean = True
If FechaCompraOriginal <> TxtFecha.Text.ToDate Then If FechaCompraOriginal <> TxtFecha.Text.ToDate Then
Dim ObjCompra As New ClsCompras Dim ObjCompra As New ClsCompras
ObjCompra.IniciaTransacSQL()
Dim ObjEventos As New ClsOIEventos(ObjCompra.IniciaTransacSQL()) Dim ObjEventos As New ClsOIEventos(ObjCompra.IniciaTransacSQL())
If ObjEventos.AddEventoBitacora($"Cambio de Fecha de compra de { FechaCompraOriginal.ToString("dd/MM/yyyy")} a {TxtFecha.Text}", "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompra:=CveCompra) Then If ObjEventos.AddEventoBitacora($"Cambio de Fecha de compra de { FechaCompraOriginal.ToString("dd/MM/yyyy")} a {TxtFecha.Text}", "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveCompra:=CveCompra) Then
@@ -19543,7 +19639,6 @@ Partial Class Compras_Compras
ProcesoError = True ProcesoError = True
End If End If
If Not ProcesoError Then If Not ProcesoError Then
ObjCompra.Commit() ObjCompra.Commit()
FechaCompraOriginal = TxtFecha.Text.ToDate FechaCompraOriginal = TxtFecha.Text.ToDate
@@ -19558,11 +19653,8 @@ Partial Class Compras_Compras
CargaEventoBitacora() CargaEventoBitacora()
UPEventoBitacora.Update() UPEventoBitacora.Update()
End If End If
End If End If
End Sub End Sub
@@ -19697,6 +19789,10 @@ Partial Class Compras_Compras
Dim cantidad As Decimal = dr("CantidadDisponible").ToString.ToDecimal Dim cantidad As Decimal = dr("CantidadDisponible").ToString.ToDecimal
AddPS(cantidad, dr("CveUM").ToString.ToEntero, "", dr("CveClasificacion").ToString.ToEntero, "", dr("CvePS").ToString.ToEntero, dr("PS").ToString, 2, tCveSub.ToString, "SE", "SE", "", "", pu, Total, Porcentaje, 0, 0, 0, 0, 0, PorcentajeIVA:=Porcentaje, TCalculaTotales:=True, CveTipoGasto:=tCveTipoGasto) AddPS(cantidad, dr("CveUM").ToString.ToEntero, "", dr("CveClasificacion").ToString.ToEntero, "", dr("CvePS").ToString.ToEntero, dr("PS").ToString, 2, tCveSub.ToString, "SE", "SE", "", "", pu, Total, Porcentaje, 0, 0, 0, 0, 0, PorcentajeIVA:=Porcentaje, TCalculaTotales:=True, CveTipoGasto:=tCveTipoGasto)
Next Next
'cambia si hay ps con uso de serie
For Each dr As DataRow In TmpDT.Rows
dr("CveMetodoInventario") = 1
Next
AddPS2() AddPS2()
End If End If
@@ -20040,6 +20136,10 @@ Partial Class Compras_Compras
DdlRefacturacionFacturas.Items.Insert(0, New ListItem("Seleccione", "-1")) DdlRefacturacionFacturas.Items.Insert(0, New ListItem("Seleccione", "-1"))
End Sub End Sub
Protected Sub BtnRecolecciónAplicar_Click(sender As Object, e As EventArgs)
End Sub
End Class End Class

61
Compras/PopUpVerFactura.aspx.vb
View File

@@ -3390,14 +3390,12 @@ Partial Class PopUpVerFactura
If CveCliente = 819998 Then If CveCliente = 819998 Then
RutaFormato = "{0}Formatos\TrasladoAngeles.rdlc" RutaFormato = "{0}Formatos\TrasladoAngeles.rdlc"
If Consola <> "-1" And Consola.Trim.Length > 0 Then
RutaFormato = "{0}Formatos\Consola.rdlc"
params.Add(New ReportParameter("Consola", Consola))
End If
End If End If
If Consola <> "-1" And Consola.Trim.Length > 0 Then
RutaFormato = "{0}Formatos\Consola.rdlc"
params.Add(New ReportParameter("Consola", Consola))
End If
@@ -3426,6 +3424,8 @@ Partial Class PopUpVerFactura
End If End If
ObjVentas.Dispose() ObjVentas.Dispose()
@@ -4575,32 +4575,32 @@ Partial Class PopUpVerFactura
#Region "OP = 'VAL' - IMPRIME PDF VAL" #Region "OP = 'VAL' - IMPRIME PDF VAL"
Private Sub GenerarPDFVale(CveVale As Integer) Private Sub GenerarPDFVale(CveVale As Integer)
Dim ObjAF As New ClsAF 'Dim ObjAF As New ClsAF
If ObjAF.GetValesCombustible(-1, CveVale, -1, -1, -1, -1, -1, -1, -1, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1) Then 'If ObjAF.GetValesCombustible(-1, CveVale, -1, -1, -1, -1, -1, -1, -1, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, -1) Then
Dim dtVC As DataTable = ObjAF.DtResultados ' Dim dtVC As DataTable = ObjAF.DtResultados
Dim dr As DataRow = dtVC.Rows(0) ' Dim dr As DataRow = dtVC.Rows(0)
Dim params As New List(Of ReportParameter) ' Dim params As New List(Of ReportParameter)
params.Add(New ReportParameter("Folio", dr("Folio").ToString)) ' params.Add(New ReportParameter("Folio", dr("Folio").ToString))
params.Add(New ReportParameter("Proveedor", dr("RazonSocial").ToString)) ' params.Add(New ReportParameter("Proveedor", dr("RazonSocial").ToString))
params.Add(New ReportParameter("Obra", dr("SubProyecto").ToString)) ' params.Add(New ReportParameter("Obra", dr("SubProyecto").ToString))
params.Add(New ReportParameter("NoEconomico", dr("Codigo").ToString)) ' params.Add(New ReportParameter("NoEconomico", dr("Codigo").ToString))
params.Add(New ReportParameter("Fecha", dr("Fecha").ToString)) ' params.Add(New ReportParameter("Fecha", dr("Fecha").ToString))
params.Add(New ReportParameter("Operador", dr("NombreCompleto").ToString)) ' params.Add(New ReportParameter("Operador", dr("NombreCompleto").ToString))
params.Add(New ReportParameter("Combustible", dr("Combustible").ToString)) ' params.Add(New ReportParameter("Combustible", dr("Combustible").ToString))
params.Add(New ReportParameter("LitrosCombustible", dr("Litros").ToString)) ' params.Add(New ReportParameter("LitrosCombustible", dr("Litros").ToString))
ImprimirPDF(String.Format(UsuarioActual.Empresa.Ruta & "/Formatos/ValesCombustible.rdlc", UsuarioActual.Empresa.Ruta), dtVC, params) ' ImprimirPDF(String.Format(UsuarioActual.Empresa.Ruta & "/Formatos/ValesCombustible.rdlc", UsuarioActual.Empresa.Ruta), dtVC, params)
'ImprimirPDFview(String.Format(UsuarioActual.Empresa.Ruta & "/Formatos/ValesCombustible.rdlc", UsuarioActual.Empresa.Ruta), lrds, params, "formato", "pdf", ReportViewer1) ' 'ImprimirPDFview(String.Format(UsuarioActual.Empresa.Ruta & "/Formatos/ValesCombustible.rdlc", UsuarioActual.Empresa.Ruta), lrds, params, "formato", "pdf", ReportViewer1)
'Dim Archivo As New System.IO.FileInfo(String.Format("Empresas\1\Formatos\ValesCombustible.rdlc", UsuarioActual.Empresa.Rulrdsta)) ' 'Dim Archivo As New System.IO.FileInfo(String.Format("Empresas\1\Formatos\ValesCombustible.rdlc", UsuarioActual.Empresa.Rulrdsta))
'If Archivo.Exists Then ' 'If Archivo.Exists Then
'Else ' 'Else
' 'params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa)) ' ' 'params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa))
' ImprimirPDF("/Empresas/1/Formatos/ValesCombustible.rdlc", dtVC, params, "ValeCombustible") ' ' ImprimirPDF("/Empresas/1/Formatos/ValesCombustible.rdlc", dtVC, params, "ValeCombustible")
'End If ' 'End If
End If 'End If
ObjAF.Dispose() 'ObjAF.Dispose()
End Sub End Sub
#End Region #End Region
@@ -6040,6 +6040,9 @@ Partial Class PopUpVerFactura
If DtPrecios IsNot Nothing Then If DtPrecios IsNot Nothing Then
Dim DirectorioArchivo As String = "Empresas/Grales/Formatos/Etiqueta.mrt" Dim DirectorioArchivo As String = "Empresas/Grales/Formatos/Etiqueta.mrt"
If System.IO.File.Exists(UsuarioActual.Empresa.Ruta + "Formatos/Etiqueta.mrt") Then
DirectorioArchivo = UsuarioActual.Empresa.Ruta + "Formatos/Etiqueta.mrt"
End If
Dim params As New List(Of ReportParameter) Dim params As New List(Of ReportParameter)
ImprimirPDFStimul(DirectorioArchivo, DtPrecios, params, "Precios") ImprimirPDFStimul(DirectorioArchivo, DtPrecios, params, "Precios")

1
Contabilidad2/CatCuentas.aspx.vb
View File

@@ -497,6 +497,7 @@ Partial Class Contabilidad2_CatCuentas
Exit Sub Exit Sub
End If End If
Else Else
Alert("El traspaso de movimientos en la cuenta tuvo un error.", TipoMensaje.MsgError)
TieneError = True TieneError = True
ObjConta.RollBack() ObjConta.RollBack()
ObjConta.Dispose() ObjConta.Dispose()

124
Contratos/RepContratosAvances.aspx Normal file
View File

@@ -0,0 +1,124 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepContratosAvances.aspx.vb" Inherits="RepContratosAvances" %>
<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
Reporte de Contratos
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UpFiltros" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:Panel ID="PnlFiltros" runat="server" DefaultButton="CmdConsultar">
<div class="portlet solid grey-cascade portlet-filter" style="">
<div class="portlet-title portlet-filterT" style="">
<div class="titlefiltros caption ">
<ul class="list-inline" id="TrProgramar" runat="server">
<li>Cliente:
<asp:DropDownList ID="DdlCliente" runat="server" AutoPostBack="true" DataTextField="NombreComercial" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 250px !important;"></asp:DropDownList>
</li>
<li>Contratos:
<asp:DropDownList ID="DdlContrato" runat="server" AutoPostBack="true" DataTextField="NumeroContrato" DataValueField="CveContrato" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;"></asp:DropDownList>
</li>
<li style="display: none;">Sección:
<asp:DropDownList ID="DdlSeccion" runat="server" AutoPostBack="false" DataTextField="Seccion" DataValueField="CveSeccion" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;"></asp:DropDownList>
</li>
<li>Partida:
<asp:DropDownList ID="DdlClasificacion" runat="server" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 90px !important;"></asp:DropDownList>
</li>
<li>Productos y Servicios:
<asp:DropDownList ID="DdlPS" runat="server" AutoPostBack="true" DataTextField="PS" DataValueField="CvePS" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 150px !important;"></asp:DropDownList>
</li>
</ul>
</div>
<div class="tools">
<asp:Button ID="CmdConsultar" runat="server" Text="Consultar" class="btn btn-primary" CausesValidation="true" ValidationGroup="GrConsulta" />
</div>
</div>
</div>
</asp:Panel>
</ContentTemplate>
</asp:UpdatePanel>
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<table class="table table-striped table-advance table-hover">
<thead>
<tr class="Titulos">
<th width="60px">#</th>
<th width="300px">
<asp:LinkButton ID="LbSubSeccion" runat="server" CausesValidation="false" Text="Cliente/ Contrato / Partida" /></th>
<th width="120px">
<asp:LinkButton ID="LinkButton1" runat="server" CausesValidation="false" Text="Contratado" /></th>
<th width="120px">
<asp:LinkButton ID="LinkButton4" runat="server" CausesValidation="false" Text="Actual" /></th>
<th width="120px">
<asp:LinkButton ID="LinkButton5" runat="server" CausesValidation="false" Text="Por Estimar" /></th>
<th width="120px">
<asp:LinkButton ID="LinkButton2" runat="server" CausesValidation="false" Text="Ejecutado" /></th>
<th width="120px">
<asp:LinkButton ID="LinkButton3" runat="server" CausesValidation="false" Text="Obra Faltante" /></th>
</tr>
</thead>
</table>
<asp:GridView ID="GV" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron Estimaciones con los Filtros seleccionados" DataKeyNames="CveContrato" ShowHeader="false" SelectedRowStyle-BackColor="#CCFF66" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;" GridLines="None">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<asp:Literal ID="LitEst" runat="server" Text='<%# Eval("CveContrato")%>' />
</ItemTemplate>
<ItemStyle HorizontalAlign="Center"></ItemStyle>
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HplAgrupador" CssClass="Texto" runat="server" Text='<%# Eval("Agrupador") %>' NavigateUrl='<%# Eval("CveContrato", "ContratosDetalle.aspx?CveContrato={0}&Op=2")%>'></asp:HyperLink>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HplContratado" CssClass="Texto" runat="server" Text='<%# Eval("Contratado", "{0:N2}")%>'></asp:HyperLink>
</ItemTemplate>
<ItemStyle HorizontalAlign="Right"></ItemStyle>
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HplActual" CssClass="Texto" runat="server" Text='<%# Eval("LoQueEstoyHaciendo", "{0:N2}")%>'></asp:HyperLink>
</ItemTemplate>
<ItemStyle HorizontalAlign="Right"></ItemStyle>
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HPlPorEstimar" CssClass="Texto" runat="server" Text='<%# Eval("PorEstimar", "{0:N2}")%>'></asp:HyperLink>
</ItemTemplate>
<ItemStyle HorizontalAlign="Right"></ItemStyle>
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HplEjecutado" CssClass="Texto" runat="server" Text='<%# Eval("Ejecutado", "{0:N2}")%>'></asp:HyperLink>
</ItemTemplate>
<ItemStyle HorizontalAlign="Right"></ItemStyle>
</asp:TemplateField>
<asp:TemplateField>
<ItemTemplate>
<asp:HyperLink ID="HplOFA" CssClass="Texto" runat="server" Text='<%# Eval("OFA", "{0:N2}")%>'></asp:HyperLink>
</ItemTemplate>
<ItemStyle HorizontalAlign="Right"></ItemStyle>
</asp:TemplateField>
</Columns>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
<br />
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
</asp:Content>

129
Empresas/186/Formatos/Factura.mrt
View File

@@ -85,7 +85,7 @@
<Relations isList="true" count="0" /> <Relations isList="true" count="0" />
<Report isRef="0" /> <Report isRef="0" />
<Resources isList="true" count="0" /> <Resources isList="true" count="0" />
<Variables isList="true" count="91"> <Variables isList="true" count="94">
<value>ReportParameters,ClienteCodigo,ClienteCodigo,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0035_4a879e0a10d464ba2f01e0372efb9ca</value> <value>ReportParameters,ClienteCodigo,ClienteCodigo,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0035_4a879e0a10d464ba2f01e0372efb9ca</value>
<value>ReportParameters,ClienteTelefono,ClienteTelefono,ReportParameter1,System.String,,False,False,True,False,,_x0036_22a3a61b2f247a6ab5d7dc6c66568db</value> <value>ReportParameters,ClienteTelefono,ClienteTelefono,ReportParameter1,System.String,,False,False,True,False,,_x0036_22a3a61b2f247a6ab5d7dc6c66568db</value>
<value>ReportParameters,ClienteContacto,ClienteContacto,ReportParameter1,System.String,,False,False,True,False,,_x0035_c52eccfce4d4681a1c62017e690c7c1</value> <value>ReportParameters,ClienteContacto,ClienteContacto,ReportParameter1,System.String,,False,False,True,False,,_x0035_c52eccfce4d4681a1c62017e690c7c1</value>
@@ -161,8 +161,8 @@
<value>ReportParameters,TipoRelacionTexto,TipoRelacionTexto,ReportParameter1,System.String,,False,False,True,False,,_x0034_17b8382f8e448a5b21018e50590835b</value> <value>ReportParameters,TipoRelacionTexto,TipoRelacionTexto,ReportParameter1,System.String,,False,False,True,False,,_x0034_17b8382f8e448a5b21018e50590835b</value>
<value>ReportParameters,FolioFiscalRelacionado,FolioFiscalRelacionado,ReportParameter1,System.String,,False,False,True,False,,_x0037_0c2d36e39d1464d821ac353ccaa2dcd</value> <value>ReportParameters,FolioFiscalRelacionado,FolioFiscalRelacionado,ReportParameter1,System.String,,False,False,True,False,,_x0037_0c2d36e39d1464d821ac353ccaa2dcd</value>
<value>ReportParameters,ClienteDireccion,ClienteDireccion,ReportParameter1,System.String,,False,False,True,False,,f18e5fd820754666994a9d3f995d50a7</value> <value>ReportParameters,ClienteDireccion,ClienteDireccion,ReportParameter1,System.String,,False,False,True,False,,f18e5fd820754666994a9d3f995d50a7</value>
<value>ReportParameters,ClienteRegimenFiscal,ClienteRegimenFiscal,,System.String,,False,False,False,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0039_1ba9c0c606c4c9c91b0a3c474923a17</value> <value>ReportParameters,ClienteRegimenFiscal,ClienteRegimenFiscal,,System.String,,False,False,False,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_,_x0039_1ba9c0c606c4c9c91b0a3c474923a17</value>
<value>ReportParameters,RegimenFiscalEmpresa,RegimenFiscalEmpresa,,System.String,,False,False,False,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0031_83669d21a064447aec68b70e6e9f841</value> <value>ReportParameters,RegimenFiscalEmpresa,RegimenFiscalEmpresa,,System.String,,False,False,False,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_,_x0031_83669d21a064447aec68b70e6e9f841</value>
<value>ReportParameters,CETipoOperacion,CETipoOperacion,,System.String,,False,False,False,False,,_x0031_5eed660ac744a4ea8ff2def382d4e8f</value> <value>ReportParameters,CETipoOperacion,CETipoOperacion,,System.String,,False,False,False,False,,_x0031_5eed660ac744a4ea8ff2def382d4e8f</value>
<value>ReportParameters,CEClavePedimento,CEClavePedimento,,System.String,,False,False,False,False,,_x0033_74ae691709a46e99b587fd5194810b6</value> <value>ReportParameters,CEClavePedimento,CEClavePedimento,,System.String,,False,False,False,False,,_x0033_74ae691709a46e99b587fd5194810b6</value>
<value>ReportParameters,CEId,CEId,,System.String,,False,False,False,False,,_x0034_9895fd395f04bf5b132398e38d61ec4</value> <value>ReportParameters,CEId,CEId,,System.String,,False,False,False,False,,_x0034_9895fd395f04bf5b132398e38d61ec4</value>
@@ -171,12 +171,15 @@
<value>ReportParameters,CETipoCambio,CETipoCambio,,System.Decimal,,False,False,False,False,,eb01224dc6154496ae383a9d1d5eeefb</value> <value>ReportParameters,CETipoCambio,CETipoCambio,,System.Decimal,,False,False,False,False,,eb01224dc6154496ae383a9d1d5eeefb</value>
<value>ReportParameters</value> <value>ReportParameters</value>
<value>ReportParameters,TieneDocumentosRelacionados,TieneDocumentosRelacionados,,System.String,,False,False,False,False,,b459ea8cfee54f1086e6dcf35b40c796</value> <value>ReportParameters,TieneDocumentosRelacionados,TieneDocumentosRelacionados,,System.String,,False,False,False,False,,b459ea8cfee54f1086e6dcf35b40c796</value>
<value>ReportParameters,ClienteSucursal,ClienteSucursal,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,b352e6ce96df41019eb768e9fb17225d</value> <value>ReportParameters,ClienteSucursal,ClienteSucursal,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_,b352e6ce96df41019eb768e9fb17225d</value>
<value>ReportParameters,UsaProductoAlterno,UsaProductoAlterno,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,f550a471365c4133bed822c3c4aa6e17</value> <value>ReportParameters,UsaProductoAlterno,UsaProductoAlterno,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,f550a471365c4133bed822c3c4aa6e17</value>
<value>ReportParameters,Medico,Medico,,System.String,,False,False,False,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0038_4917cceaa5a42a7882c182510f8d56f</value> <value>ReportParameters,Medico,Medico,,System.String,,False,False,False,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_,_x0038_4917cceaa5a42a7882c182510f8d56f</value>
<value>ReportParameters,Procedimiento,Procedimiento,,System.String,,False,False,False,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0033_83e3da2e960473d89a38fac783c32ff</value> <value>ReportParameters,Procedimiento,Procedimiento,,System.String,,False,False,False,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_,_x0033_83e3da2e960473d89a38fac783c32ff</value>
<value>ReportParameters,Documentacion,Documentacion,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0033_12f72ea65ee44119514073452da3478</value> <value>ReportParameters,Documentacion,Documentacion,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0033_12f72ea65ee44119514073452da3478</value>
<value>ReportParameters,FechaCirugia,FechaCirugia,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0039_11bc963c59b4b6cb4b0ce36a86c40e1</value> <value>ReportParameters,FechaCirugia,FechaCirugia,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C__x002F_StiSerializer_x003E_,_x0039_11bc963c59b4b6cb4b0ce36a86c40e1</value>
<value>ReportParameters,Paciente,Paciente,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
<value>ReportParameters,Episodio,Episodio,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
<value>ReportParameters,Alfa1,Alfa1,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
</Variables> </Variables>
</Dictionary> </Dictionary>
<EngineVersion>EngineV2</EngineVersion> <EngineVersion>EngineV2</EngineVersion>
@@ -394,7 +397,7 @@ Tipo de Cambio: {TipoCambio}</Text>
<Textbox32 Ref="13" type="Text" isKey="true"> <Textbox32 Ref="13" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>4.8,0,8.88,1.55</ClientRectangle> <ClientRectangle>4.8,0,8.88,2.35</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Myriad Pro,8,Regular,Point,False,0</Font> <Font>Myriad Pro,8,Regular,Point,False,0</Font>
@@ -405,9 +408,9 @@ Tipo de Cambio: {TipoCambio}</Text>
<Text>SMS SMART MEDICAL SOLUTIONS <Text>SMS SMART MEDICAL SOLUTIONS
SSM1908213A0 SSM1908213A0
NEBRASKA 157, Col. NAPOLES NEBRASKA 157, Col. NAPOLES
BENITO JUAREZ BENITO JUAREZ, C.P. 03810
C.P. 03810 CIUDAD DE MEXICO
CIUDAD DE MEXICO</Text> Teléfono: +52 551 563 3271 Correo:support@smsmedicalsolutions.com</Text>
<TextBrush>[0:0:0]</TextBrush> <TextBrush>[0:0:0]</TextBrush>
<TextOptions>,,,,WordWrap=True,A=0</TextOptions> <TextOptions>,,,,WordWrap=True,A=0</TextOptions>
<Type>Expression</Type> <Type>Expression</Type>
@@ -429,14 +432,9 @@ CIUDAD DE MEXICO</Text>
Cliente: {ClienteCodigo} - {ClienteNombre}.&lt;br&gt; Cliente: {ClienteCodigo} - {ClienteNombre}.&lt;br&gt;
Sucursal: {ClienteSucursal}. &amp;nbsp; RFC: {ClienteRFC}.&lt;br&gt; Sucursal: {ClienteSucursal}. &amp;nbsp; RFC: {ClienteRFC}.&lt;br&gt;
Calle:{ClienteCalle} {ClienteNoExt}. Colonia: {ClienteColonia}.&amp;nbsp; Ciudad: {ClienteCiudad}.&lt;br&gt; Calle:{ClienteCalle} {ClienteNoExt}. Colonia: {ClienteColonia}.&amp;nbsp; Ciudad: {ClienteCiudad}.&lt;br&gt;
Estado: {ClienteEstado}.&lt;br&gt; Municipio y/o Delegación: {ClienteMunicipio}.&amp;nbsp; CP: {ClienteCP}.&lt;br&gt; Estado: {ClienteEstado}.&lt;br&gt; Municipio y/o Delegación: {ClienteMunicipio}.&amp;nbsp; CP: {ClienteCP}.&lt;br&gt;Regimen Fiscal Receptor: {ClienteRegimenFiscal}.&lt;br&gt;
Regimen Fiscal Receptor: {ClienteRegimenFiscal}.&lt;br&gt; {IIF(Documentacion != "", "Proveedor:" + Documentacion + ".", "")}&lt;br&gt;
&lt;b&gt; {IIF(Medico != "", "Médico:" + Medico + "." , "")}&lt;br&gt;{IIF(Medico != "", "Procedimiento:" + Procedimiento + ".", "")}</Text>
{IIF(Medico != "", "Médico:" + Medico + ".&lt;br&gt;" , "")}
{IIF(Medico != "", "Procedimiento:" + Procedimiento + ".&lt;br&gt;", "")}
{IIF(Medico != "", "Fecha Cirugia:" + FechaCirugia + ".&lt;br&gt;", "")}
{IIF(Documentacion != "", "Proveedor:" + Documentacion + ".", "")}
&lt;b/&gt;</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<TextOptions>,,,,WordWrap=True,A=0</TextOptions> <TextOptions>,,,,WordWrap=True,A=0</TextOptions>
<TextQuality>Wysiwyg</TextQuality> <TextQuality>Wysiwyg</TextQuality>
@@ -452,7 +450,7 @@ Regimen Fiscal Receptor: {ClienteRegimenFiscal}.&lt;br&gt;
<PageFooterBand1 Ref="15" type="PageFooterBand" isKey="true"> <PageFooterBand1 Ref="15" type="PageFooterBand" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanShrink>True</CanShrink> <CanShrink>True</CanShrink>
<ClientRectangle>0,20.88,21.1,12</ClientRectangle> <ClientRectangle>0,26.36,21.1,12</ClientRectangle>
<Components isList="true" count="5"> <Components isList="true" count="5">
<Panel5 Ref="16" type="Panel" isKey="true"> <Panel5 Ref="16" type="Panel" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
@@ -1108,8 +1106,8 @@ Sello digital del SAT:
</DataBand3> </DataBand3>
<FooterBand1 Ref="62" type="FooterBand" isKey="true"> <FooterBand1 Ref="62" type="FooterBand" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>0,9.12,21.1,5.8</ClientRectangle> <ClientRectangle>0,9.12,21.1,7</ClientRectangle>
<Components isList="true" count="8"> <Components isList="true" count="9">
<Panel3 Ref="63" type="Panel" isKey="true"> <Panel3 Ref="63" type="Panel" isKey="true">
<Border>Bottom;Transparent;5;Solid;False;4;Black;True</Border> <Border>Bottom;Transparent;5;Solid;False;4;Black;True</Border>
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
@@ -1365,30 +1363,12 @@ Sello digital del SAT:
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>Expression</Type> <Type>Expression</Type>
</Text4> </Text4>
<Textbox26 Ref="81" type="Text" isKey="true"> <Panel7 Ref="81" type="Panel" isKey="true">
<Brush>Transparent</Brush>
<CanGrow>True</CanGrow>
<ClientRectangle>0,2.28,21.05,0.88</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Myriad Pro,6.5,Bold,Point,False,0</Font>
<HorAlignment>Center</HorAlignment>
<Margins>2,2,2,2</Margins>
<Name>Textbox26</Name>
<Page isRef="7" />
<Parent isRef="62" />
<PrintOn>OnlyLastPage</PrintOn>
<Text>"REVISAR SU FACTURA Y SUS PRODUCTOS AL MOMENTO DE RECIBIRLAS,YA QUE NO SE REALIZARAN CAMBIOS EN FACTURA NI SE ACEPTARAN DEVOLUCIONES DE MERCANCIA
DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
<TextBrush>Black</TextBrush>
<Type>Expression</Type>
</Textbox26>
<Panel7 Ref="82" type="Panel" isKey="true">
<Border>Top, Bottom;[156:195:229];5;Solid;False;4;[227:108:9]</Border> <Border>Top, Bottom;[156:195:229];5;Solid;False;4;[227:108:9]</Border>
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>0.2,3.48,20.6,2.2</ClientRectangle> <ClientRectangle>0.2,4.68,20.6,2.2</ClientRectangle>
<Components isList="true" count="6"> <Components isList="true" count="6">
<Text11 Ref="83" type="Text" isKey="true"> <Text11 Ref="82" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>0.2,0.8,7,0.4</ClientRectangle> <ClientRectangle>0.2,0.8,7,0.4</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
@@ -1397,12 +1377,12 @@ DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text11</Name> <Name>Text11</Name>
<Page isRef="7" /> <Page isRef="7" />
<Parent isRef="82" /> <Parent isRef="81" />
<Text>Tipo Operacion:{CETipoOperacion}</Text> <Text>Tipo Operacion:{CETipoOperacion}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>Expression</Type> <Type>Expression</Type>
</Text11> </Text11>
<Text12 Ref="84" type="Text" isKey="true"> <Text12 Ref="83" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>0.2,1.2,7,0.4</ClientRectangle> <ClientRectangle>0.2,1.2,7,0.4</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
@@ -1411,12 +1391,12 @@ DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text12</Name> <Name>Text12</Name>
<Page isRef="7" /> <Page isRef="7" />
<Parent isRef="82" /> <Parent isRef="81" />
<Text>Incoterm:{CEIncoterm}</Text> <Text>Incoterm:{CEIncoterm}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>Expression</Type> <Type>Expression</Type>
</Text12> </Text12>
<Text14 Ref="85" type="Text" isKey="true"> <Text14 Ref="84" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>7.2,0.8,6.6,0.4</ClientRectangle> <ClientRectangle>7.2,0.8,6.6,0.4</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
@@ -1425,12 +1405,12 @@ DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text14</Name> <Name>Text14</Name>
<Page isRef="7" /> <Page isRef="7" />
<Parent isRef="82" /> <Parent isRef="81" />
<Text>Clave Pedimento:{CEClavePedimento}</Text> <Text>Clave Pedimento:{CEClavePedimento}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>Expression</Type> <Type>Expression</Type>
</Text14> </Text14>
<Text15 Ref="86" type="Text" isKey="true"> <Text15 Ref="85" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>7.2,1.2,6.6,0.4</ClientRectangle> <ClientRectangle>7.2,1.2,6.6,0.4</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
@@ -1439,12 +1419,12 @@ DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text15</Name> <Name>Text15</Name>
<Page isRef="7" /> <Page isRef="7" />
<Parent isRef="82" /> <Parent isRef="81" />
<Text>Num Reg IdTrib:{CEId}</Text> <Text>Num Reg IdTrib:{CEId}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>Expression</Type> <Type>Expression</Type>
</Text15> </Text15>
<Text16 Ref="87" type="Text" isKey="true"> <Text16 Ref="86" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>5.2,0.2,10,0.4</ClientRectangle> <ClientRectangle>5.2,0.2,10,0.4</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
@@ -1454,12 +1434,12 @@ DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text16</Name> <Name>Text16</Name>
<Page isRef="7" /> <Page isRef="7" />
<Parent isRef="82" /> <Parent isRef="81" />
<Text>COMERCIO EXTERIOR</Text> <Text>COMERCIO EXTERIOR</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>Expression</Type> <Type>Expression</Type>
</Text16> </Text16>
<Text17 Ref="88" type="Text" isKey="true"> <Text17 Ref="87" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>13.8,0.8,6.6,0.4</ClientRectangle> <ClientRectangle>13.8,0.8,6.6,0.4</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
@@ -1468,7 +1448,7 @@ DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text17</Name> <Name>Text17</Name>
<Page isRef="7" /> <Page isRef="7" />
<Parent isRef="82" /> <Parent isRef="81" />
<Text>Tipo Cambio:{Format("${0:N4} MXN", CETipoCambio)}</Text> <Text>Tipo Cambio:{Format("${0:N4} MXN", CETipoCambio)}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>Expression</Type> <Type>Expression</Type>
@@ -1483,7 +1463,7 @@ DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
<Page isRef="7" /> <Page isRef="7" />
<Parent isRef="62" /> <Parent isRef="62" />
</Panel7> </Panel7>
<Text7 Ref="89" type="Text" isKey="true"> <Text7 Ref="88" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>15.8,1.28,5.29,0.14</ClientRectangle> <ClientRectangle>15.8,1.28,5.29,0.14</ClientRectangle>
@@ -1497,6 +1477,41 @@ DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
<PrintOn>OnlyLastPage</PrintOn> <PrintOn>OnlyLastPage</PrintOn>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
</Text7> </Text7>
<Text9 Ref="89" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0,2.68,14.6,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Myriad Pro,6.5,Regular,Point,False,0</Font>
<Guid>179a957f89d04921b856805a4c2e9d49</Guid>
<Margins>0,0,0,0</Margins>
<Name>Text9</Name>
<Page isRef="7" />
<Parent isRef="62" />
<Text>Paciente: {Paciente}
Episodio: {Episodio}
Folio Remisión: {Alfa1}</Text>
<TextBrush>Black</TextBrush>
<Type>Expression</Type>
</Text9>
<Textbox26 Ref="90" type="Text" isKey="true">
<Brush>Transparent</Brush>
<CanGrow>True</CanGrow>
<ClientRectangle>0,3.68,20.85,0.88</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Myriad Pro,6.5,Bold,Point,False,0</Font>
<HorAlignment>Center</HorAlignment>
<Margins>2,2,2,2</Margins>
<Name>Textbox26</Name>
<Page isRef="7" />
<Parent isRef="62" />
<PrintOn>OnlyLastPage</PrintOn>
<Text>"REVISAR SU FACTURA Y SUS PRODUCTOS AL MOMENTO DE RECIBIRLAS,YA QUE NO SE REALIZARAN CAMBIOS EN FACTURA NI SE ACEPTARAN DEVOLUCIONES DE MERCANCIA
DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
<TextBrush>Black</TextBrush>
<Type>Expression</Type>
</Textbox26>
</Components> </Components>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
@@ -1529,8 +1544,8 @@ DESPUES DE 72 HORAS POSTERIORES A LA FECHA DE ELABORACIÓN"</Text>
<ReportAlias>Factura</ReportAlias> <ReportAlias>Factura</ReportAlias>
<ReportChanged>1/18/2024 9:39:09 AM</ReportChanged> <ReportChanged>1/18/2024 9:39:09 AM</ReportChanged>
<ReportCreated>7/11/2022 2:49:19 PM</ReportCreated> <ReportCreated>7/11/2022 2:49:19 PM</ReportCreated>
<ReportFile>C:\inetpub\wwwSIGGIT\Empresas\186\Formatos\Factura.mrt</ReportFile> <ReportFile>C:\inetpub\WWWSigGit\Empresas\186\Formatos\Factura.mrt</ReportFile>
<ReportGuid>728378886519409195a7506a0b6d6331</ReportGuid> <ReportGuid>4a902ea660c34d0baeae36e92ea35edd</ReportGuid>
<ReportName>Factura</ReportName> <ReportName>Factura</ReportName>
<ReportUnit>Centimeters</ReportUnit> <ReportUnit>Centimeters</ReportUnit>
<ReportVersion>2022.4.5.0</ReportVersion> <ReportVersion>2022.4.5.0</ReportVersion>

194
Empresas/186/Formatos/Pedido.mrt
View File

@@ -54,7 +54,7 @@
<Relations isList="true" count="0" /> <Relations isList="true" count="0" />
<Report isRef="0" /> <Report isRef="0" />
<Resources isList="true" count="0" /> <Resources isList="true" count="0" />
<Variables isList="true" count="82"> <Variables isList="true" count="84">
<value>ReportParameters,ClienteCodigo,ClienteCodigo,ReportParameter1,System.String,_x0030_2,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0035_4a879e0a10d464ba2f01e0372efb9ca</value> <value>ReportParameters,ClienteCodigo,ClienteCodigo,ReportParameter1,System.String,_x0030_2,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0035_4a879e0a10d464ba2f01e0372efb9ca</value>
<value>ReportParameters,ClienteTelefono,ClienteTelefono,ReportParameter1,System.String,,False,False,True,False,,_x0036_22a3a61b2f247a6ab5d7dc6c66568db</value> <value>ReportParameters,ClienteTelefono,ClienteTelefono,ReportParameter1,System.String,,False,False,True,False,,_x0036_22a3a61b2f247a6ab5d7dc6c66568db</value>
<value>ReportParameters,ClienteContacto,ClienteContacto,ReportParameter1,System.String,,False,False,True,False,,_x0035_c52eccfce4d4681a1c62017e690c7c1</value> <value>ReportParameters,ClienteContacto,ClienteContacto,ReportParameter1,System.String,,False,False,True,False,,_x0035_c52eccfce4d4681a1c62017e690c7c1</value>
@@ -137,6 +137,8 @@
<value>ReportParameters,Medico,Medico,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value> <value>ReportParameters,Medico,Medico,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
<value>ReportParameters,Procedimiento,Procedimiento,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value> <value>ReportParameters,Procedimiento,Procedimiento,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
<value>ReportParameters,FechaCirugia,FechaCirugia,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value> <value>ReportParameters,FechaCirugia,FechaCirugia,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
<value>ReportParameters,Paciente,Paciente,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
<value>ReportParameters,Episodio,Episodio,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
</Variables> </Variables>
</Dictionary> </Dictionary>
<EngineVersion>EngineV2</EngineVersion> <EngineVersion>EngineV2</EngineVersion>
@@ -392,7 +394,7 @@ Vendedor: {VendedorNombre}</Text>
<Name>Text8</Name> <Name>Text8</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="7" /> <Parent isRef="7" />
<Text>PEDIDO</Text> <Text>PRE-REMISION</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>Expression</Type> <Type>Expression</Type>
</Text8> </Text8>
@@ -518,7 +520,7 @@ Fecha Cirugia: {FechaCirugia}</Text>
<HeaderBand1 Ref="21" type="HeaderBand" isKey="true"> <HeaderBand1 Ref="21" type="HeaderBand" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>0,0.4,21,0.5</ClientRectangle> <ClientRectangle>0,0.4,21,0.5</ClientRectangle>
<Components isList="true" count="8"> <Components isList="true" count="7">
<Textbox23 Ref="22" type="Text" isKey="true"> <Textbox23 Ref="22" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
@@ -549,25 +551,10 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Text>UNIDAD</Text> <Text>UNIDAD</Text>
<TextBrush>[255:255:255]</TextBrush> <TextBrush>[255:255:255]</TextBrush>
</Textbox17> </Textbox17>
<Textbox29 Ref="24" type="Text" isKey="true"> <Textbox18 Ref="24" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>3.09,0.03,1.97,0.5</ClientRectangle> <ClientRectangle>3.06,0.03,11.08,0.5</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Microsoft Sans Serif,9,Bold,Point,False,0</Font>
<HorAlignment>Center</HorAlignment>
<Margins>2,2,2,2</Margins>
<Name>Textbox29</Name>
<Page isRef="5" />
<Parent isRef="21" />
<Text>CLAVE SAT</Text>
<TextBrush>[255:255:255]</TextBrush>
</Textbox29>
<Textbox18 Ref="25" type="Text" isKey="true">
<Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow>
<ClientRectangle>5.06,0.03,9.08,0.5</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Microsoft Sans Serif,9.5,Bold,Point,False,0</Font> <Font>Microsoft Sans Serif,9.5,Bold,Point,False,0</Font>
@@ -579,7 +566,7 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Text>DESCRIPCIÓN </Text> <Text>DESCRIPCIÓN </Text>
<TextBrush>[255:255:255]</TextBrush> <TextBrush>[255:255:255]</TextBrush>
</Textbox18> </Textbox18>
<Textbox8 Ref="26" type="Text" isKey="true"> <Textbox8 Ref="25" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>15.6,0.03,1.5,0.5</ClientRectangle> <ClientRectangle>15.6,0.03,1.5,0.5</ClientRectangle>
@@ -594,7 +581,7 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Text>DESC.</Text> <Text>DESC.</Text>
<TextBrush>[255:255:255]</TextBrush> <TextBrush>[255:255:255]</TextBrush>
</Textbox8> </Textbox8>
<Textbox2 Ref="27" type="Text" isKey="true"> <Textbox2 Ref="26" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>17.1,0.03,1.57,0.5</ClientRectangle> <ClientRectangle>17.1,0.03,1.57,0.5</ClientRectangle>
@@ -609,7 +596,7 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Text> IVA</Text> <Text> IVA</Text>
<TextBrush>[255:255:255]</TextBrush> <TextBrush>[255:255:255]</TextBrush>
</Textbox2> </Textbox2>
<Textbox6 Ref="28" type="Text" isKey="true"> <Textbox6 Ref="27" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>18.62,0.03,2.51,0.5</ClientRectangle> <ClientRectangle>18.62,0.03,2.51,0.5</ClientRectangle>
@@ -624,7 +611,7 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Text>TOTAL</Text> <Text>TOTAL</Text>
<TextBrush>[255:255:255]</TextBrush> <TextBrush>[255:255:255]</TextBrush>
</Textbox6> </Textbox6>
<Text1 Ref="29" type="Text" isKey="true"> <Text1 Ref="28" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>14,0.03,1.7,0.5</ClientRectangle> <ClientRectangle>14,0.03,1.7,0.5</ClientRectangle>
@@ -647,13 +634,13 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="20" /> <Parent isRef="20" />
</HeaderBand1> </HeaderBand1>
<DataBand3 Ref="30" type="DataBand" isKey="true"> <DataBand3 Ref="29" type="DataBand" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<BusinessObjectGuid isNull="true" /> <BusinessObjectGuid isNull="true" />
<CanShrink>True</CanShrink> <CanShrink>True</CanShrink>
<ClientRectangle>0,1.7,21,0.42</ClientRectangle> <ClientRectangle>0,1.7,21,0.42</ClientRectangle>
<Components isList="true" count="8"> <Components isList="true" count="7">
<Cantidad1 Ref="31" type="Text" isKey="true"> <Cantidad1 Ref="30" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>0,0,1.4,0.37</ClientRectangle> <ClientRectangle>0,0,1.4,0.37</ClientRectangle>
@@ -665,14 +652,14 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Cantidad1</Name> <Name>Cantidad1</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="30" /> <Parent isRef="29" />
<Text>{DtDetalle.Cantidad}</Text> <Text>{DtDetalle.Cantidad}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<TextFormat Ref="32" type="CustomFormat" isKey="true"> <TextFormat Ref="31" type="CustomFormat" isKey="true">
<StringFormat>n2</StringFormat> <StringFormat>n2</StringFormat>
</TextFormat> </TextFormat>
</Cantidad1> </Cantidad1>
<UM Ref="33" type="Text" isKey="true"> <UM Ref="32" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>1.4,0,1.69,0.37</ClientRectangle> <ClientRectangle>1.4,0,1.69,0.37</ClientRectangle>
@@ -683,30 +670,15 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>UM</Name> <Name>UM</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="30" /> <Parent isRef="29" />
<Text>{DtDetalle.UMCalculada}</Text> <Text>{DtDetalle.UM}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>DataColumn</Type> <Type>DataColumn</Type>
</UM> </UM>
<SATClaveProdServ Ref="34" type="Text" isKey="true"> <PS Ref="33" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>3.09,0,1.97,0.37</ClientRectangle> <ClientRectangle>3.06,0,10.88,0.37</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Myriad Pro,7.5,Regular,Point,False,0</Font>
<Linked>True</Linked>
<Margins>2,2,2,2</Margins>
<Name>SATClaveProdServ</Name>
<Page isRef="5" />
<Parent isRef="30" />
<Text>{DtDetalle.SATClaveProdServ}</Text>
<TextBrush>Black</TextBrush>
</SATClaveProdServ>
<PS Ref="35" type="Text" isKey="true">
<Brush>Transparent</Brush>
<CanGrow>True</CanGrow>
<ClientRectangle>5.06,0,8.88,0.37</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Myriad Pro,7.5,Regular,Point,False,0</Font> <Font>Myriad Pro,7.5,Regular,Point,False,0</Font>
@@ -714,12 +686,12 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>PS</Name> <Name>PS</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="30" /> <Parent isRef="29" />
<Text>{DtDetalle.PSCalculado}</Text> <Text>{DtDetalle.PSCalculado}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>DataColumn</Type> <Type>DataColumn</Type>
</PS> </PS>
<PU Ref="36" type="Text" isKey="true"> <PU Ref="34" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>13.94,0,1.86,0.37</ClientRectangle> <ClientRectangle>13.94,0,1.86,0.37</ClientRectangle>
@@ -731,14 +703,14 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>PU</Name> <Name>PU</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="30" /> <Parent isRef="29" />
<Text>{DtDetalle.PU}</Text> <Text>{DtDetalle.PU}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<TextFormat Ref="37" type="CustomFormat" isKey="true"> <TextFormat Ref="35" type="CustomFormat" isKey="true">
<StringFormat>#,0.00;-#,0.00;'-'</StringFormat> <StringFormat>#,0.00;-#,0.00;'-'</StringFormat>
</TextFormat> </TextFormat>
</PU> </PU>
<Descuento2 Ref="38" type="Text" isKey="true"> <Descuento2 Ref="36" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>15.8,0,1.3,0.37</ClientRectangle> <ClientRectangle>15.8,0,1.3,0.37</ClientRectangle>
@@ -750,14 +722,14 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Descuento2</Name> <Name>Descuento2</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="30" /> <Parent isRef="29" />
<Text>{DtDetalle.Descuento}</Text> <Text>{DtDetalle.Descuento}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<TextFormat Ref="39" type="CustomFormat" isKey="true"> <TextFormat Ref="37" type="CustomFormat" isKey="true">
<StringFormat>#,0.00;-#,0.00;'-'</StringFormat> <StringFormat>#,0.00;-#,0.00;'-'</StringFormat>
</TextFormat> </TextFormat>
</Descuento2> </Descuento2>
<ImporteIVA Ref="40" type="Text" isKey="true"> <ImporteIVA Ref="38" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>17.1,0,1.57,0.37</ClientRectangle> <ClientRectangle>17.1,0,1.57,0.37</ClientRectangle>
@@ -769,14 +741,14 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>ImporteIVA</Name> <Name>ImporteIVA</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="30" /> <Parent isRef="29" />
<Text>{DtDetalle.ImporteIVA}</Text> <Text>{DtDetalle.ImporteIVA}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<TextFormat Ref="41" type="CustomFormat" isKey="true"> <TextFormat Ref="39" type="CustomFormat" isKey="true">
<StringFormat>#,0.00;-#,0.00;'-'</StringFormat> <StringFormat>#,0.00;-#,0.00;'-'</StringFormat>
</TextFormat> </TextFormat>
</ImporteIVA> </ImporteIVA>
<TiempoEntrega Ref="42" type="Text" isKey="true"> <TiempoEntrega Ref="40" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>18.87,0,2.22,0.42</ClientRectangle> <ClientRectangle>18.87,0,2.22,0.42</ClientRectangle>
@@ -788,10 +760,10 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>TiempoEntrega</Name> <Name>TiempoEntrega</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="30" /> <Parent isRef="29" />
<Text>{DtDetalle.Total}</Text> <Text>{DtDetalle.Total}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<TextFormat Ref="43" type="CustomFormat" isKey="true"> <TextFormat Ref="41" type="CustomFormat" isKey="true">
<StringFormat>#,0.00</StringFormat> <StringFormat>#,0.00</StringFormat>
</TextFormat> </TextFormat>
<Type>DataColumn</Type> <Type>DataColumn</Type>
@@ -806,24 +778,24 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Parent isRef="20" /> <Parent isRef="20" />
<Sort isList="true" count="0" /> <Sort isList="true" count="0" />
</DataBand3> </DataBand3>
<FooterBand1 Ref="44" type="FooterBand" isKey="true"> <FooterBand1 Ref="42" type="FooterBand" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>0,2.92,21,2.2</ClientRectangle> <ClientRectangle>0,2.92,21,3.4</ClientRectangle>
<Components isList="true" count="5"> <Components isList="true" count="6">
<Panel3 Ref="45" type="Panel" isKey="true"> <Panel3 Ref="43" type="Panel" isKey="true">
<Border>Bottom;Transparent;5;Solid;False;4;Black;True</Border> <Border>Bottom;Transparent;5;Solid;False;4;Black;True</Border>
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<CanShrink>True</CanShrink> <CanShrink>True</CanShrink>
<ClientRectangle>15.8,0.38,5.2,0.65</ClientRectangle> <ClientRectangle>15.8,0.38,5.2,0.65</ClientRectangle>
<Components isList="true" count="1"> <Components isList="true" count="1">
<DataBand1 Ref="46" type="DataBand" isKey="true"> <DataBand1 Ref="44" type="DataBand" isKey="true">
<Border>None;[247:150:70];1;Solid;False;8;[247:150:70]</Border> <Border>None;[247:150:70];1;Solid;False;8;[247:150:70]</Border>
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<BusinessObjectGuid isNull="true" /> <BusinessObjectGuid isNull="true" />
<ClientRectangle>0,0.4,5.2,0.4</ClientRectangle> <ClientRectangle>0,0.4,5.2,0.4</ClientRectangle>
<Components isList="true" count="3"> <Components isList="true" count="3">
<Text2 Ref="47" type="Text" isKey="true"> <Text2 Ref="45" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>0,0,1.48,0.37</ClientRectangle> <ClientRectangle>0,0,1.48,0.37</ClientRectangle>
@@ -834,13 +806,13 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Text2</Name> <Name>Text2</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="46" /> <Parent isRef="44" />
<Text>{DtTotales.ImpuestoLocal}</Text> <Text>{DtTotales.ImpuestoLocal}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>DataColumn</Type> <Type>DataColumn</Type>
<VertAlignment>Bottom</VertAlignment> <VertAlignment>Bottom</VertAlignment>
</Text2> </Text2>
<Text22 Ref="48" type="Text" isKey="true"> <Text22 Ref="46" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>1.4,0,3.88,0.37</ClientRectangle> <ClientRectangle>1.4,0,3.88,0.37</ClientRectangle>
@@ -851,10 +823,10 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Text22</Name> <Name>Text22</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="46" /> <Parent isRef="44" />
<Text>{DtTotales.Importe}</Text> <Text>{DtTotales.Importe}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<TextFormat Ref="49" type="NumberFormat" isKey="true"> <TextFormat Ref="47" type="NumberFormat" isKey="true">
<DecimalDigits>2</DecimalDigits> <DecimalDigits>2</DecimalDigits>
<GroupSeparator>,</GroupSeparator> <GroupSeparator>,</GroupSeparator>
<NegativePattern>1</NegativePattern> <NegativePattern>1</NegativePattern>
@@ -863,7 +835,7 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Type>DataColumn</Type> <Type>DataColumn</Type>
<VertAlignment>Bottom</VertAlignment> <VertAlignment>Bottom</VertAlignment>
</Text22> </Text22>
<Text3 Ref="50" type="Text" isKey="true"> <Text3 Ref="48" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>0.2,0.3,5.09,0.14</ClientRectangle> <ClientRectangle>0.2,0.3,5.09,0.14</ClientRectangle>
@@ -873,7 +845,7 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Text3</Name> <Name>Text3</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="46" /> <Parent isRef="44" />
<PrintOn>OnlyLastPage</PrintOn> <PrintOn>OnlyLastPage</PrintOn>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
</Text3> </Text3>
@@ -885,7 +857,7 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Filters isList="true" count="0" /> <Filters isList="true" count="0" />
<Name>DataBand1</Name> <Name>DataBand1</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="45" /> <Parent isRef="43" />
<Sort isList="true" count="0" /> <Sort isList="true" count="0" />
</DataBand1> </DataBand1>
</Components> </Components>
@@ -894,9 +866,9 @@ Fecha Cirugia: {FechaCirugia}</Text>
<GrowToHeight>True</GrowToHeight> <GrowToHeight>True</GrowToHeight>
<Name>Panel3</Name> <Name>Panel3</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="44" /> <Parent isRef="42" />
</Panel3> </Panel3>
<Text21 Ref="51" type="Text" isKey="true"> <Text21 Ref="49" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>0,0.08,21.09,0.14</ClientRectangle> <ClientRectangle>0,0.08,21.09,0.14</ClientRectangle>
@@ -906,11 +878,11 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Text21</Name> <Name>Text21</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="44" /> <Parent isRef="42" />
<PrintOn>OnlyLastPage</PrintOn> <PrintOn>OnlyLastPage</PrintOn>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
</Text21> </Text21>
<Text6 Ref="52" type="Text" isKey="true"> <Text6 Ref="50" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanBreak>True</CanBreak> <CanBreak>True</CanBreak>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
@@ -923,22 +895,22 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Text6</Name> <Name>Text6</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="44" /> <Parent isRef="42" />
<PrintOn>OnlyLastPage</PrintOn> <PrintOn>OnlyLastPage</PrintOn>
<Text>{ImporteLetra}</Text> <Text>{ImporteLetra}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>Expression</Type> <Type>Expression</Type>
</Text6> </Text6>
<Panel2 Ref="53" type="Panel" isKey="true"> <Panel2 Ref="51" type="Panel" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>0,0.28,5.2,1</ClientRectangle> <ClientRectangle>0,0.28,5.2,1</ClientRectangle>
<Components isList="true" count="2"> <Components isList="true" count="2">
<HeaderBand2 Ref="54" type="HeaderBand" isKey="true"> <HeaderBand2 Ref="52" type="HeaderBand" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>0,0.4,5.2,0.6</ClientRectangle> <ClientRectangle>0,0.4,5.2,0.6</ClientRectangle>
<Components isList="true" count="3"> <Components isList="true" count="3">
<Textbox25 Ref="55" type="Text" isKey="true"> <Textbox25 Ref="53" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>0,0,2,0.5</ClientRectangle> <ClientRectangle>0,0,2,0.5</ClientRectangle>
@@ -949,11 +921,11 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Textbox25</Name> <Name>Textbox25</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="54" /> <Parent isRef="52" />
<Text>IMPUESTO</Text> <Text>IMPUESTO</Text>
<TextBrush>[255:255:255]</TextBrush> <TextBrush>[255:255:255]</TextBrush>
</Textbox25> </Textbox25>
<Textbox19 Ref="56" type="Text" isKey="true"> <Textbox19 Ref="54" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>2,0,1.47,0.5</ClientRectangle> <ClientRectangle>2,0,1.47,0.5</ClientRectangle>
@@ -964,11 +936,11 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Textbox19</Name> <Name>Textbox19</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="54" /> <Parent isRef="52" />
<Text>TASA</Text> <Text>TASA</Text>
<TextBrush>[255:255:255]</TextBrush> <TextBrush>[255:255:255]</TextBrush>
</Textbox19> </Textbox19>
<Textbox33 Ref="57" type="Text" isKey="true"> <Textbox33 Ref="55" type="Text" isKey="true">
<Brush>[156:195:229]</Brush> <Brush>[156:195:229]</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>3.47,0,1.63,0.5</ClientRectangle> <ClientRectangle>3.47,0,1.63,0.5</ClientRectangle>
@@ -979,7 +951,7 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Textbox33</Name> <Name>Textbox33</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="54" /> <Parent isRef="52" />
<Text>IMPORTE</Text> <Text>IMPORTE</Text>
<TextBrush>[255:255:255]</TextBrush> <TextBrush>[255:255:255]</TextBrush>
</Textbox33> </Textbox33>
@@ -988,14 +960,14 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Name>HeaderBand2</Name> <Name>HeaderBand2</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="53" /> <Parent isRef="51" />
</HeaderBand2> </HeaderBand2>
<DataBand8 Ref="58" type="DataBand" isKey="true"> <DataBand8 Ref="56" type="DataBand" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<BusinessObjectGuid isNull="true" /> <BusinessObjectGuid isNull="true" />
<ClientRectangle>0,1.8,5.2,0</ClientRectangle> <ClientRectangle>0,1.8,5.2,0</ClientRectangle>
<Components isList="true" count="3"> <Components isList="true" count="3">
<Cantidad2 Ref="59" type="Text" isKey="true"> <Cantidad2 Ref="57" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>0,0,2,0.37</ClientRectangle> <ClientRectangle>0,0,2,0.37</ClientRectangle>
@@ -1007,11 +979,11 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Cantidad2</Name> <Name>Cantidad2</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="58" /> <Parent isRef="56" />
<Text>{DtImpuestos.Impuesto}</Text> <Text>{DtImpuestos.Impuesto}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
</Cantidad2> </Cantidad2>
<UM2 Ref="60" type="Text" isKey="true"> <UM2 Ref="58" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>2,0,1.48,0.37</ClientRectangle> <ClientRectangle>2,0,1.48,0.37</ClientRectangle>
@@ -1023,11 +995,11 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>UM2</Name> <Name>UM2</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="58" /> <Parent isRef="56" />
<Text>{DtImpuestos.tasa}</Text> <Text>{DtImpuestos.tasa}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
</UM2> </UM2>
<Codigo2 Ref="61" type="Text" isKey="true"> <Codigo2 Ref="59" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<CanGrow>True</CanGrow> <CanGrow>True</CanGrow>
<ClientRectangle>3.48,0,1.62,0.37</ClientRectangle> <ClientRectangle>3.48,0,1.62,0.37</ClientRectangle>
@@ -1039,10 +1011,10 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>2,2,2,2</Margins> <Margins>2,2,2,2</Margins>
<Name>Codigo2</Name> <Name>Codigo2</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="58" /> <Parent isRef="56" />
<Text>{DtImpuestos.Importe}</Text> <Text>{DtImpuestos.Importe}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<TextFormat Ref="62" type="CustomFormat" isKey="true"> <TextFormat Ref="60" type="CustomFormat" isKey="true">
<StringFormat>#,0.00</StringFormat> <StringFormat>#,0.00</StringFormat>
</TextFormat> </TextFormat>
</Codigo2> </Codigo2>
@@ -1053,7 +1025,7 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Filters isList="true" count="0" /> <Filters isList="true" count="0" />
<Name>DataBand8</Name> <Name>DataBand8</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="53" /> <Parent isRef="51" />
<PrintOn>OnlyLastPage</PrintOn> <PrintOn>OnlyLastPage</PrintOn>
<Sort isList="true" count="0" /> <Sort isList="true" count="0" />
</DataBand8> </DataBand8>
@@ -1062,10 +1034,10 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Name>Panel2</Name> <Name>Panel2</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="44" /> <Parent isRef="42" />
<PrintOn>OnlyLastPage</PrintOn> <PrintOn>OnlyLastPage</PrintOn>
</Panel2> </Panel2>
<Text4 Ref="63" type="Text" isKey="true"> <Text4 Ref="61" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>5.2,0.28,10.6,1</ClientRectangle> <ClientRectangle>5.2,0.28,10.6,1</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
@@ -1074,11 +1046,27 @@ Fecha Cirugia: {FechaCirugia}</Text>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text4</Name> <Name>Text4</Name>
<Page isRef="5" /> <Page isRef="5" />
<Parent isRef="44" /> <Parent isRef="42" />
<Text>{Observaciones}</Text> <Text>{Observaciones}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>Expression</Type> <Type>Expression</Type>
</Text4> </Text4>
<Text13 Ref="62" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0,2.48,13.2,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Myriad Pro,6.5,Regular,Point,False,0</Font>
<Guid>1891a87e013d48868bd75b5710529e30</Guid>
<Margins>0,0,0,0</Margins>
<Name>Text13</Name>
<Page isRef="5" />
<Parent isRef="42" />
<Text>Paciente: {Paciente}
Episodio: {Episodio}</Text>
<TextBrush>Black</TextBrush>
<Type>Expression</Type>
</Text13>
</Components> </Components>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
@@ -1126,8 +1114,8 @@ Fecha Cirugia: {FechaCirugia}</Text>
<ReportAlias>Report</ReportAlias> <ReportAlias>Report</ReportAlias>
<ReportChanged>10/11/2022 8:18:55 PM</ReportChanged> <ReportChanged>10/11/2022 8:18:55 PM</ReportChanged>
<ReportCreated>7/11/2022 2:49:19 PM</ReportCreated> <ReportCreated>7/11/2022 2:49:19 PM</ReportCreated>
<ReportFile>Pedido.mrt</ReportFile> <ReportFile>C:\inetpub\WWWSigGit\Empresas\186\Formatos\Pedido.mrt</ReportFile>
<ReportGuid>cb0c4a26c29e4eaea6e5fdce45abd03e</ReportGuid> <ReportGuid>0cc1edf03db74e0d9e9a189fff847c85</ReportGuid>
<ReportName>Report</ReportName> <ReportName>Report</ReportName>
<ReportUnit>Centimeters</ReportUnit> <ReportUnit>Centimeters</ReportUnit>
<ReportVersion>2022.4.5.0</ReportVersion> <ReportVersion>2022.4.5.0</ReportVersion>

30
Empresas/186/Formatos/Remision.mrt
View File

@@ -54,7 +54,7 @@
<Relations isList="true" count="0" /> <Relations isList="true" count="0" />
<Report isRef="0" /> <Report isRef="0" />
<Resources isList="true" count="0" /> <Resources isList="true" count="0" />
<Variables isList="true" count="79"> <Variables isList="true" count="82">
<value>ReportParameters,ClienteCodigo,ClienteCodigo,ReportParameter1,System.String,_x0030_2,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0035_4a879e0a10d464ba2f01e0372efb9ca</value> <value>ReportParameters,ClienteCodigo,ClienteCodigo,ReportParameter1,System.String,_x0030_2,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0035_4a879e0a10d464ba2f01e0372efb9ca</value>
<value>ReportParameters,ClienteTelefono,ClienteTelefono,ReportParameter1,System.String,,False,False,True,False,,_x0036_22a3a61b2f247a6ab5d7dc6c66568db</value> <value>ReportParameters,ClienteTelefono,ClienteTelefono,ReportParameter1,System.String,,False,False,True,False,,_x0036_22a3a61b2f247a6ab5d7dc6c66568db</value>
<value>ReportParameters,ClienteContacto,ClienteContacto,ReportParameter1,System.String,,False,False,True,False,,_x0035_c52eccfce4d4681a1c62017e690c7c1</value> <value>ReportParameters,ClienteContacto,ClienteContacto,ReportParameter1,System.String,,False,False,True,False,,_x0035_c52eccfce4d4681a1c62017e690c7c1</value>
@@ -133,7 +133,10 @@
<value>ReportParameters,TipoRelacionTexto,TipoRelacionTexto,ReportParameter1,System.String,,False,False,True,False,,_x0034_17b8382f8e448a5b21018e50590835b</value> <value>ReportParameters,TipoRelacionTexto,TipoRelacionTexto,ReportParameter1,System.String,,False,False,True,False,,_x0034_17b8382f8e448a5b21018e50590835b</value>
<value>ReportParameters,FolioFiscalRelacionado,FolioFiscalRelacionado,ReportParameter1,System.String,,False,False,True,False,,_x0037_0c2d36e39d1464d821ac353ccaa2dcd</value> <value>ReportParameters,FolioFiscalRelacionado,FolioFiscalRelacionado,ReportParameter1,System.String,,False,False,True,False,,_x0037_0c2d36e39d1464d821ac353ccaa2dcd</value>
<value>ReportParameters,ClienteDireccion,ClienteDireccion,ReportParameter1,System.String,,False,False,True,False,,f18e5fd820754666994a9d3f995d50a7</value> <value>ReportParameters,ClienteDireccion,ClienteDireccion,ReportParameter1,System.String,,False,False,True,False,,f18e5fd820754666994a9d3f995d50a7</value>
<value>ReportParameters,Documentacion,Documentacion,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_</value> <value>ReportParameters,Documentacion,Documentacion,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C__x002F_StiSerializer_x003E_</value>
<value>ReportParameters,Paciente,Paciente,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
<value>ReportParameters,Episodio,Episodio,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
<value>ReportParameters,Alfa1,Alfa1,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_DateTimeType_x003E_DateAndTime_x003C__x002F_DateTimeType_x003E__x003C_CheckedColumn_x003E_null_x003B__x003C__x002F_CheckedColumn_x003E__x003C__x002F_StiSerializer_x003E_</value>
</Variables> </Variables>
</Dictionary> </Dictionary>
<EngineVersion>EngineV2</EngineVersion> <EngineVersion>EngineV2</EngineVersion>
@@ -802,8 +805,8 @@ Vendedor: {VendedorNombre}</Text>
</DataBand3> </DataBand3>
<FooterBand1 Ref="44" type="FooterBand" isKey="true"> <FooterBand1 Ref="44" type="FooterBand" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>0,2.92,21,2.2</ClientRectangle> <ClientRectangle>0,2.92,21,4.6</ClientRectangle>
<Components isList="true" count="5"> <Components isList="true" count="6">
<Panel3 Ref="45" type="Panel" isKey="true"> <Panel3 Ref="45" type="Panel" isKey="true">
<Border>Bottom;Transparent;5;Solid;False;4;Black;True</Border> <Border>Bottom;Transparent;5;Solid;False;4;Black;True</Border>
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
@@ -1073,6 +1076,23 @@ Vendedor: {VendedorNombre}</Text>
<TextBrush>Black</TextBrush> <TextBrush>Black</TextBrush>
<Type>Expression</Type> <Type>Expression</Type>
</Text4> </Text4>
<Text13 Ref="64" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0,2.48,10.6,1</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Myriad Pro,6.7,Regular,Point,False,0</Font>
<Guid>fca703f575e74a9f8bc6628424c9a960</Guid>
<Margins>0,0,0,0</Margins>
<Name>Text13</Name>
<Page isRef="5" />
<Parent isRef="44" />
<Text>Paciente: {Paciente}
Episodio: {Episodio}
Folio Remisión: {Alfa1}</Text>
<TextBrush>Black</TextBrush>
<Type>Expression</Type>
</Text13>
</Components> </Components>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
@@ -1121,7 +1141,7 @@ Vendedor: {VendedorNombre}</Text>
<ReportChanged>10/11/2022 8:18:55 PM</ReportChanged> <ReportChanged>10/11/2022 8:18:55 PM</ReportChanged>
<ReportCreated>7/11/2022 2:49:19 PM</ReportCreated> <ReportCreated>7/11/2022 2:49:19 PM</ReportCreated>
<ReportFile>C:\inetpub\WWWSigGit\Empresas\186\Formatos\Remision.mrt</ReportFile> <ReportFile>C:\inetpub\WWWSigGit\Empresas\186\Formatos\Remision.mrt</ReportFile>
<ReportGuid>a4badd41106c4719ac060f1e52338936</ReportGuid> <ReportGuid>49b2dec77fe542ea952b501bf54fafb1</ReportGuid>
<ReportName>Report</ReportName> <ReportName>Report</ReportName>
<ReportUnit>Centimeters</ReportUnit> <ReportUnit>Centimeters</ReportUnit>
<ReportVersion>2022.4.5.0</ReportVersion> <ReportVersion>2022.4.5.0</ReportVersion>

794
Empresas/188/Formatos/Boleto.mrt
View File

@@ -1,6 +1,5 @@
<?xml version="1.0" encoding="utf-8" standalone="yes"?> <?xml version="1.0" encoding="utf-8" standalone="yes"?>
<StiSerializer version="1.02" type="Net" application="StiReport"> <StiSerializer version="1.02" type="Net" application="StiReport">
<CalculationMode>Interpretation</CalculationMode>
<Dictionary Ref="1" type="Dictionary" isKey="true"> <Dictionary Ref="1" type="Dictionary" isKey="true">
<BusinessObjects isList="true" count="0" /> <BusinessObjects isList="true" count="0" />
<Databases isList="true" count="0" /> <Databases isList="true" count="0" />
@@ -10,24 +9,24 @@
<Resources isList="true" count="0" /> <Resources isList="true" count="0" />
<Variables isList="true" count="14"> <Variables isList="true" count="14">
<value>ReportParameters</value> <value>ReportParameters</value>
<value>ReportParameters,Ruta,Ruta,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0037_f0f80c11ace4980af534dea0e66ae04</value> <value>ReportParameters,Ruta,Ruta,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,e3ad7f90080f41f8a2c073fd14df0463</value>
<value>ReportParameters,Origen,Origen,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0039_e9facc30b104f86b1e310401529dae5</value> <value>ReportParameters,Origen,Origen,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0030_9648a002402486dbe61fe25e563c8ba</value>
<value>ReportParameters,Destino,Destino,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,c10a083d19ff438aaf2166b8875ae769</value> <value>ReportParameters,Destino,Destino,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,dd4a9d7c23ba478ea75fd9fabef3608c</value>
<value>ReportParameters,FechaSalida,FechaSalida,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0033_a01d4856a0f4f379f5dceff384f582e</value> <value>ReportParameters,FechaSalida,FechaSalida,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0036_2a907a96a20433382c8c396c3622af0</value>
<value>ReportParameters,HoraSalida,HoraSalida,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0038_dc813ab476543688554b291a9de132d</value> <value>ReportParameters,HoraSalida,HoraSalida,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0035_0ca3ec706064509b2e3654759256f7d</value>
<value>ReportParameters,Asiento,Asiento,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,b3bc9f2902964064bbe83f38e0ca7de2</value> <value>ReportParameters,Asiento,Asiento,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0036_2e2bab5ae234ba2a5ea86ab909cbdde</value>
<value>ReportParameters,Nombre,Nombre,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0038_f7d3778d21040f5904a142bc66e56c1</value> <value>ReportParameters,Nombre,Nombre,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,f28ce5db5d71413dbb5fec2c9dfb4731</value>
<value>ReportParameters,Visa,Visa,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,b491315f90ef44f8895d4e835adf914a</value> <value>ReportParameters,Visa,Visa,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,a978633ea289450996a27415dcd796a9</value>
<value>ReportParameters,Agencia,Agencia,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0039_ede7a959adc4e459aa7ac9f86523dd2</value> <value>ReportParameters,Agencia,Agencia,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0038_61ffb7923b84ab2aa4a3ab8eeb13fd2</value>
<value>ReportParameters,TelefonoAgencia,TelefonoAgencia,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,be0d0073323c434c982871e06e55a31d</value> <value>ReportParameters,TelefonoAgencia,TelefonoAgencia,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,a6a53af4654d453fb684117b6e9dc56e</value>
<value>ReportParameters,Celular,Celular,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0034_ed4e36d5bab4f9e8e2929348b73f345</value> <value>ReportParameters,Celular,Celular,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0032_bf77bebb0464d29b65adac7733f0a34</value>
<value>ReportParameters,Importe,Importe,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,c473eff1d3a641e98082465b9abf47aa</value> <value>ReportParameters,Importe,Importe,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0036_a9d4b8f5dba4fa698ca433c967057f1</value>
<value>ReportParameters,TipoBoleto,TipoBoleto,ReportParameter1,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C_Keys_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_Values_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C_CheckedStates_x0020_isList_x003D__x0022_true_x0022__x0020_count_x003D__x0022_0_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_,_x0036_950e3622f0241bebf1ac2ca57d34b01</value> <value>ReportParameters,TipoBoleto,TipoBoleto,,System.String,,False,False,True,False,_x003C__x003F_xml_x0020_version_x003D__x0022_1.0_x0022__x0020_encoding_x003D__x0022_utf-16_x0022__x0020_standalone_x003D__x0022_yes_x0022__x003F__x003E__x003C_StiSerializer_x0020_version_x003D__x0022_1.02_x0022__x0020_type_x003D__x0022_Net_x0022__x0020_application_x003D__x0022_State_x0022__x003E__x003C_SortDirection_x003E_None_x003C__x002F_SortDirection_x003E__x003C_BindingVariable_x0020_isNull_x003D__x0022_true_x0022__x0020__x002F__x003E__x003C__x002F_StiSerializer_x003E_</value>
</Variables> </Variables>
</Dictionary> </Dictionary>
<EngineVersion>EngineV2</EngineVersion> <EngineVersion>EngineV2</EngineVersion>
<GlobalizationStrings isList="true" count="0" /> <GlobalizationStrings isList="true" count="0" />
<Key>6a55c916841c4d578ddd9762afe67ae2</Key> <Key>062f82eb7083486eae8b503bab679c50</Key>
<MetaTags isList="true" count="0" /> <MetaTags isList="true" count="0" />
<Pages isList="true" count="1"> <Pages isList="true" count="1">
<Page1 Ref="2" type="Page" isKey="true"> <Page1 Ref="2" type="Page" isKey="true">
@@ -36,7 +35,7 @@
<Components isList="true" count="33"> <Components isList="true" count="33">
<Image1 Ref="3" type="Image" isKey="true"> <Image1 Ref="3" type="Image" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>0.4,2,5.4,2.6</ClientRectangle> <ClientRectangle>0.01,1.81,5.38,2.59</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<HorAlignment>Right</HorAlignment> <HorAlignment>Right</HorAlignment>
@@ -575,7 +574,7 @@ MdwarMEnCGsMtwZr8IkB8P8Dxed6+p2t88EAAAAASUVORK5CYII=</ImageBytes>
</Text2> </Text2>
<Text3 Ref="5" type="Text" isKey="true"> <Text3 Ref="5" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>6,2,1.2,0.8</ClientRectangle> <ClientRectangle>5.8,2.2,1.2,0.6</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,7,Bold</Font>
@@ -591,7 +590,7 @@ MdwarMEnCGsMtwZr8IkB8P8Dxed6+p2t88EAAAAASUVORK5CYII=</ImageBytes>
</Text3> </Text3>
<Text1 Ref="6" type="Text" isKey="true"> <Text1 Ref="6" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>6,3.8,1.2,0.8</ClientRectangle> <ClientRectangle>5.8,3.8,1.2,0.6</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,7,Bold</Font>
@@ -607,7 +606,7 @@ MdwarMEnCGsMtwZr8IkB8P8Dxed6+p2t88EAAAAASUVORK5CYII=</ImageBytes>
</Text1> </Text1>
<Text4 Ref="7" type="Text" isKey="true"> <Text4 Ref="7" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>6,3,1.2,0.8</ClientRectangle> <ClientRectangle>5.8,3,1.2,0.6</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,7,Bold</Font>
@@ -623,7 +622,7 @@ MdwarMEnCGsMtwZr8IkB8P8Dxed6+p2t88EAAAAASUVORK5CYII=</ImageBytes>
</Text4> </Text4>
<Text5 Ref="8" type="Text" isKey="true"> <Text5 Ref="8" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>11,2,1.8,0.8</ClientRectangle> <ClientRectangle>10.8,2,1.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,7,Bold</Font>
@@ -639,7 +638,7 @@ MdwarMEnCGsMtwZr8IkB8P8Dxed6+p2t88EAAAAASUVORK5CYII=</ImageBytes>
</Text5> </Text5>
<Text6 Ref="9" type="Text" isKey="true"> <Text6 Ref="9" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>11,3,1.8,0.8</ClientRectangle> <ClientRectangle>10.8,3,1.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,7,Bold</Font>
@@ -653,180 +652,104 @@ MdwarMEnCGsMtwZr8IkB8P8Dxed6+p2t88EAAAAASUVORK5CYII=</ImageBytes>
<Type>Expression</Type> <Type>Expression</Type>
<VertAlignment>Center</VertAlignment> <VertAlignment>Center</VertAlignment>
</Text6> </Text6>
<Text7 Ref="10" type="Text" isKey="true"> <Shape2 Ref="10" type="Shape" isKey="true">
<Brush>Transparent</Brush> <BackgroundColor>216, 216, 216</BackgroundColor>
<ClientRectangle>1.4,4.8,2.4,0.8</ClientRectangle> <BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>7,3,3.6,0.6</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,6</Font>
<HorAlignment>Right</HorAlignment> <ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text7</Name> <Name>Shape2</Name>
<Page isRef="2" /> <Page isRef="2" />
<Parent isRef="2" /> <Parent isRef="2" />
<Text>Nombre:</Text> <ShapeType Ref="11" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<TextBrush>[63:63:63]</TextBrush> <Round>0.2</Round>
<Type>Expression</Type> </ShapeType>
<VertAlignment>Center</VertAlignment> <Text>{Origen}</Text>
</Text7> </Shape2>
<Text8 Ref="11" type="Text" isKey="true"> <Shape3 Ref="12" type="Shape" isKey="true">
<Brush>Transparent</Brush> <BackgroundColor>216, 216, 216</BackgroundColor>
<ClientRectangle>1.4,6.8,2.4,0.8</ClientRectangle> <BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>7,3.8,3.6,0.6</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,6</Font>
<HorAlignment>Right</HorAlignment> <ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text8</Name> <Name>Shape3</Name>
<Page isRef="2" /> <Page isRef="2" />
<Parent isRef="2" /> <Parent isRef="2" />
<Text>Agencia:</Text> <ShapeType Ref="13" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<TextBrush>[63:63:63]</TextBrush> <Round>0.2</Round>
<Type>Expression</Type> </ShapeType>
<VertAlignment>Center</VertAlignment> <Text>{Destino}</Text>
</Text8> </Shape3>
<Text9 Ref="12" type="Text" isKey="true"> <Shape4 Ref="14" type="Shape" isKey="true">
<Brush>Transparent</Brush> <BackgroundColor>216, 216, 216</BackgroundColor>
<ClientRectangle>1.4,5.8,2.4,0.8</ClientRectangle> <BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>12.6,2,2.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,6</Font>
<HorAlignment>Right</HorAlignment> <ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text9</Name> <Name>Shape4</Name>
<Page isRef="2" /> <Page isRef="2" />
<Parent isRef="2" /> <Parent isRef="2" />
<Text>Visa:</Text> <ShapeType Ref="15" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<TextBrush>[63:63:63]</TextBrush> <Round>0.2</Round>
<Type>Expression</Type> </ShapeType>
<VertAlignment>Center</VertAlignment> <Text>{FechaSalida}</Text>
</Text9> </Shape4>
<Text10 Ref="13" type="Text" isKey="true"> <Shape5 Ref="16" type="Shape" isKey="true">
<Brush>Transparent</Brush> <BackgroundColor>216, 216, 216</BackgroundColor>
<ClientRectangle>11,5.8,1.8,0.8</ClientRectangle> <BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>12.6,3,2.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,6</Font>
<HorAlignment>Right</HorAlignment> <ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text10</Name> <Name>Shape5</Name>
<Page isRef="2" /> <Page isRef="2" />
<Parent isRef="2" /> <Parent isRef="2" />
<Text>Teléfono:</Text> <ShapeType Ref="17" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<TextBrush>[63:63:63]</TextBrush> <Round>0.2</Round>
<Type>Expression</Type> </ShapeType>
<VertAlignment>Center</VertAlignment> <Text>{HoraSalida}</Text>
</Text10> </Shape5>
<Text11 Ref="14" type="Text" isKey="true"> <Shape1 Ref="18" type="Shape" isKey="true">
<Brush>Transparent</Brush> <BackgroundColor>216, 216, 216</BackgroundColor>
<ClientRectangle>1.4,7.8,2.4,0.8</ClientRectangle> <BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>7,2.2,3.6,0.6</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,6</Font>
<HorAlignment>Right</HorAlignment> <ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text11</Name> <Name>Shape1</Name>
<Page isRef="2" /> <Page isRef="2" />
<Parent isRef="2" /> <Parent isRef="2" />
<Text>Teléfono Agencia:</Text> <ShapeType Ref="19" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<TextBrush>[63:63:63]</TextBrush> <Round>0.2</Round>
<Type>Expression</Type> </ShapeType>
<VertAlignment>Center</VertAlignment> <Text>{Ruta}</Text>
</Text11> </Shape1>
<Text12 Ref="15" type="Text" isKey="true"> <Text18 Ref="20" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>11,6.8,1.8,0.8</ClientRectangle> <ClientRectangle>16.8,2,2.8,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font>
<HorAlignment>Right</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Text12</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>Tipo Boleto:</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text12>
<Text13 Ref="16" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0.4,9,2.8,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,8,Bold</Font>
<Margins>0,0,0,0</Margins>
<Name>Text13</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>Condiciones:</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text13>
<Text14 Ref="17" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0.4,9.6,9.2,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7</Font>
<Margins>0,0,0,0</Margins>
<Name>Text14</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>- 100 libras por persona.</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text14>
<Text15 Ref="18" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0.4,10,9.2,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7</Font>
<Margins>0,0,0,0</Margins>
<Name>Text15</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>- Exceso de equipaje genera costo extra.</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text15>
<Text16 Ref="19" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0.4,10.4,9.2,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7</Font>
<Margins>0,0,0,0</Margins>
<Name>Text16</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>- No cajas / No mascotas / No cubetas con cualquier tipo de líquido.</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text16>
<Text17 Ref="20" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0.4,10.8,2.8,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7</Font>
<Margins>0,0,0,0</Margins>
<Name>Text17</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>- No armas.</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text17>
<Text18 Ref="21" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>15.8,2,2.8,0.8</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,7,Bold</Font>
@@ -840,9 +763,9 @@ MdwarMEnCGsMtwZr8IkB8P8Dxed6+p2t88EAAAAASUVORK5CYII=</ImageBytes>
<Type>Expression</Type> <Type>Expression</Type>
<VertAlignment>Center</VertAlignment> <VertAlignment>Center</VertAlignment>
</Text18> </Text18>
<Text19 Ref="22" type="Text" isKey="true"> <Text19 Ref="21" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>15.8,4.8,2.8,0.8</ClientRectangle> <ClientRectangle>16.8,4.8,2.8,0.8</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font> <Font>Arial,7,Bold</Font>
@@ -856,104 +779,9 @@ MdwarMEnCGsMtwZr8IkB8P8Dxed6+p2t88EAAAAASUVORK5CYII=</ImageBytes>
<Type>Expression</Type> <Type>Expression</Type>
<VertAlignment>Center</VertAlignment> <VertAlignment>Center</VertAlignment>
</Text19> </Text19>
<Shape1 Ref="23" type="Shape" isKey="true"> <Text20 Ref="22" type="Text" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>7.2,2,3.6,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape1</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="24" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text>{Ruta}</Text>
</Shape1>
<Shape2 Ref="25" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>7.2,3,3.6,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape2</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="26" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {Origen}</Text>
</Shape2>
<Shape3 Ref="27" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>7.2,3.8,3.6,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape3</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="28" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {Destino}</Text>
</Shape3>
<Shape4 Ref="29" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>12.8,2,2.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape4</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="30" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {FechaSalida}</Text>
</Shape4>
<Shape5 Ref="31" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>12.8,3,2.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape5</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="32" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {HoraSalida}</Text>
</Shape5>
<Text20 Ref="33" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>15.8,2.6,2.8,2.4</ClientRectangle> <ClientRectangle>16.8,2.6,2.8,2.4</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,26,Bold</Font> <Font>Arial,26,Bold</Font>
@@ -967,127 +795,13 @@ MdwarMEnCGsMtwZr8IkB8P8Dxed6+p2t88EAAAAASUVORK5CYII=</ImageBytes>
<Type>Expression</Type> <Type>Expression</Type>
<VertAlignment>Center</VertAlignment> <VertAlignment>Center</VertAlignment>
</Text20> </Text20>
<Shape6 Ref="34" type="Shape" isKey="true"> <Text21 Ref="23" type="Text" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>3.8,4.8,11.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape6</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="35" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text>{Nombre}</Text>
</Shape6>
<Shape7 Ref="36" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>3.8,5.8,7,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape7</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="37" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {Visa}</Text>
</Shape7>
<Shape8 Ref="38" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>3.8,6.8,7,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape8</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="39" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {Agencia}</Text>
</Shape8>
<Shape9 Ref="40" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>3.8,7.8,7,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape9</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="41" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {TelefonoAgencia}</Text>
</Shape9>
<Shape10 Ref="42" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>12.8,5.8,2.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape10</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="43" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {Celular}</Text>
</Shape10>
<Shape11 Ref="44" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>12.8,6.8,2.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape11</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="45" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {TipoBoleto}</Text>
</Shape11>
<Text21 Ref="46" type="Text" isKey="true">
<Brush>Transparent</Brush> <Brush>Transparent</Brush>
<ClientRectangle>15.8,5.4,2.8,2.4</ClientRectangle> <ClientRectangle>15.4,5.4,4.2,2.4</ClientRectangle>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Font>Arial,26,Bold</Font> <Font>Arial,26,Bold</Font>
<HorAlignment>Center</HorAlignment> <HorAlignment>Right</HorAlignment>
<Margins>0,0,0,0</Margins> <Margins>0,0,0,0</Margins>
<Name>Text21</Name> <Name>Text21</Name>
<Page isRef="2" /> <Page isRef="2" />
@@ -1097,14 +811,299 @@ MdwarMEnCGsMtwZr8IkB8P8Dxed6+p2t88EAAAAASUVORK5CYII=</ImageBytes>
<Type>Expression</Type> <Type>Expression</Type>
<VertAlignment>Center</VertAlignment> <VertAlignment>Center</VertAlignment>
</Text21> </Text21>
<Text7 Ref="24" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>1,5.4,2.4,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font>
<HorAlignment>Right</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Text7</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>Nombre:</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text7>
<Text8 Ref="25" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>1,7.4,2.4,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font>
<HorAlignment>Right</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Text8</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>Agencia:</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text8>
<Text9 Ref="26" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>1,6.4,2.4,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font>
<HorAlignment>Right</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Text9</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>Visa:</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text9>
<Text10 Ref="27" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>10.6,6.4,1.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font>
<HorAlignment>Right</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Text10</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>Teléfono:</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text10>
<Text11 Ref="28" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>1,8.4,2.4,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font>
<HorAlignment>Right</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Text11</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>Teléfono Agencia:</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text11>
<Text12 Ref="29" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>10.6,7.4,1.8,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7,Bold</Font>
<HorAlignment>Right</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Text12</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>Tipo Boleto:</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text12>
<Text13 Ref="30" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0,9.6,2.8,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,8,Bold</Font>
<Margins>0,0,0,0</Margins>
<Name>Text13</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>Condiciones:</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text13>
<Text14 Ref="31" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0,10.2,9.2,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7</Font>
<Margins>0,0,0,0</Margins>
<Name>Text14</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>- 100 libras por persona.</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text14>
<Text15 Ref="32" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0,10.6,9.2,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7</Font>
<Margins>0,0,0,0</Margins>
<Name>Text15</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>- Exceso de equipaje genera costo extra.</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text15>
<Text16 Ref="33" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0,11,9.2,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7</Font>
<Margins>0,0,0,0</Margins>
<Name>Text16</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>- No cajas / No mascotas / No cubetas con cualquier tipo de líquido.</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text16>
<Text17 Ref="34" type="Text" isKey="true">
<Brush>Transparent</Brush>
<ClientRectangle>0,11.4,2.8,0.8</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,7</Font>
<Margins>0,0,0,0</Margins>
<Name>Text17</Name>
<Page isRef="2" />
<Parent isRef="2" />
<Text>- No armas.</Text>
<TextBrush>[63:63:63]</TextBrush>
<Type>Expression</Type>
<VertAlignment>Center</VertAlignment>
</Text17>
<Shape6 Ref="35" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>3.4,5.4,11.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape6</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="36" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text>{Nombre}</Text>
</Shape6>
<Shape7 Ref="37" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>3.4,6.4,7,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape7</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="38" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {Visa}</Text>
</Shape7>
<Shape8 Ref="39" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>3.4,7.4,7,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape8</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="40" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {Agencia}</Text>
</Shape8>
<Shape9 Ref="41" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>3.4,8.4,7,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape9</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="42" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {TelefonoAgencia}</Text>
</Shape9>
<Shape10 Ref="43" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>12.4,6.4,2.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape10</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="44" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {Celular}</Text>
</Shape10>
<Shape11 Ref="45" type="Shape" isKey="true">
<BackgroundColor>216, 216, 216</BackgroundColor>
<BorderColor>191, 191, 191</BorderColor>
<Brush>[216:216:216]</Brush>
<ClientRectangle>12.4,7.4,2.8,0.6</ClientRectangle>
<Conditions isList="true" count="0" />
<Expressions isList="true" count="0" />
<Font>Arial,6</Font>
<ForeColor>63, 63, 63</ForeColor>
<HorAlignment>Left</HorAlignment>
<Margins>0,0,0,0</Margins>
<Name>Shape11</Name>
<Page isRef="2" />
<Parent isRef="2" />
<ShapeType Ref="46" type="Stimulsoft.Report.Components.ShapeTypes.StiRoundedRectangleShapeType" isKey="true">
<Round>0.2</Round>
</ShapeType>
<Text> {TipoBoleto}</Text>
</Shape11>
</Components> </Components>
<Conditions isList="true" count="0" /> <Conditions isList="true" count="0" />
<Expressions isList="true" count="0" /> <Expressions isList="true" count="0" />
<Guid>50b6bbee170e454fbbd54dc519e40c28</Guid> <Guid>93415a53340a433888d33a0062c55285</Guid>
<Margins>1,1,1,1</Margins> <Margins>1,1,1,1</Margins>
<Name>Page1</Name> <Name>Page1</Name>
<PageHeight>29.7</PageHeight> <PageHeight>27.94</PageHeight>
<PageWidth>21</PageWidth> <PageWidth>21.59</PageWidth>
<Report isRef="0" /> <Report isRef="0" />
</Page1> </Page1>
</Pages> </Pages>
@@ -1118,15 +1117,14 @@ MdwarMEnCGsMtwZr8IkB8P8Dxed6+p2t88EAAAAASUVORK5CYII=</ImageBytes>
<value>Stimulsoft.Base.Dll</value> <value>Stimulsoft.Base.Dll</value>
<value>Stimulsoft.Report.Dll</value> <value>Stimulsoft.Report.Dll</value>
</ReferencedAssemblies> </ReferencedAssemblies>
<ReportAlias>Report</ReportAlias> <ReportAlias>Acuse</ReportAlias>
<ReportAuthor>jesus moreno quintana</ReportAuthor> <ReportChanged>2/24/2024 11:52:49 AM</ReportChanged>
<ReportChanged>1/10/2024 4:23:24 PM</ReportChanged> <ReportCreated>4/17/2023 10:42:46 PM</ReportCreated>
<ReportCreated>1/8/2024 11:08:51 AM</ReportCreated> <ReportFile>C:\inetpub\wwwSIGGIT\Empresas\188\Formatos\Boleto2.mrt</ReportFile>
<ReportFile>C:\inetpub\WWWSIGIT\Empresas\188\Formatos\Boleto.mrt</ReportFile> <ReportGuid>3b1b67f4cc294f4aa946424755834435</ReportGuid>
<ReportGuid>12003dc43203426781fb798356b41920</ReportGuid> <ReportName>Acuse</ReportName>
<ReportName>Report</ReportName>
<ReportUnit>Centimeters</ReportUnit> <ReportUnit>Centimeters</ReportUnit>
<ReportVersion>2023.3.2.0</ReportVersion> <ReportVersion>2022.4.5.0</ReportVersion>
<Script>using System; <Script>using System;
using System.Drawing; using System.Drawing;
using System.Windows.Forms; using System.Windows.Forms;
@@ -1139,9 +1137,9 @@ using Stimulsoft.Report.Components;
namespace Reports namespace Reports
{ {
public class Report : Stimulsoft.Report.StiReport public class Acuse : Stimulsoft.Report.StiReport
{ {
public Report() { public Acuse() {
this.InitializeComponent(); this.InitializeComponent();
} }

4
General/SaldosIniciales.aspx
View File

@@ -39,9 +39,13 @@
<asp:RadioButtonList runat="server" ID="RblFormato"> <asp:RadioButtonList runat="server" ID="RblFormato">
<asp:ListItem Value="1" Text="Proveedores" Selected="True"></asp:ListItem> <asp:ListItem Value="1" Text="Proveedores" Selected="True"></asp:ListItem>
<asp:ListItem Value="3" Text="Factura - Proveedor"></asp:ListItem> <asp:ListItem Value="3" Text="Factura - Proveedor"></asp:ListItem>
<asp:ListItem Value="18" Text="Factura - Proveedor Detalle"></asp:ListItem>
<asp:ListItem Value="13" Text="Anticipo Proveedores"></asp:ListItem> <asp:ListItem Value="13" Text="Anticipo Proveedores"></asp:ListItem>
<asp:ListItem Value="2" Text="Clientes"></asp:ListItem> <asp:ListItem Value="2" Text="Clientes"></asp:ListItem>
<asp:ListItem Value="4" Text="Factura - Cliente"></asp:ListItem> <asp:ListItem Value="4" Text="Factura - Cliente"></asp:ListItem>
<asp:ListItem Value="17" Text="Factura - Cliente Detalle"></asp:ListItem>
<asp:ListItem Value="14" Text="Anticipo Clientes"></asp:ListItem> <asp:ListItem Value="14" Text="Anticipo Clientes"></asp:ListItem>
<asp:ListItem Value="5" Text="Productos y Sevicios" ></asp:ListItem> <asp:ListItem Value="5" Text="Productos y Sevicios" ></asp:ListItem>
<asp:ListItem Value="16" Text="Clasificaciones" Enabled="True"></asp:ListItem> <asp:ListItem Value="16" Text="Clasificaciones" Enabled="True"></asp:ListItem>

Some files were not shown because too many files have changed in this diff Show More