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

nominas en reporte de presupuestos, correciones de reporte af,correciones en traspasos y ventas

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2023-04-20 11:02:24 -07:00
parent 2c3bc02ab6
commit 7d1885fd20
12 changed files with 875 additions and 804 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
App_Code/ClsContratos.vb
View File

@@ -2985,7 +2985,7 @@ Public Class ClsContratos
End Function
Public Function AddPresupuestosDetalle(CvePresupuesto As Integer, CveClasificacion As Integer, CveTipoGasto As Integer, Importe As Decimal, Observacion As String) As Boolean
Public Function AddPresupuestosDetalle(CvePresupuesto As Integer, CveClasificacion As Integer, CveTipoGasto As Integer, Importe As Decimal, Observacion As String, Optional CveConceptoContableNom As Integer = -1) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Con_PresupuestosDetalleAdd")
@@ -2996,6 +2996,7 @@ Public Class ClsContratos
.Add("@Importe", SqlDbType.Money).Value = Importe
.Add("@Observacion", SqlDbType.VarChar).Value = Observacion
.Add("@CveTipoGasto", SqlDbType.Int).Value = CveTipoGasto
.Add("@CveConceptoContableNom", SqlDbType.Int).Value = CveConceptoContableNom
End With
Try
@@ -3029,7 +3030,7 @@ Public Class ClsContratos
Return Retorno
End Function
Public Function UpdatePresupuestosDetalle(CvePresupuestoDetalle As Integer, CveClasificacion As Integer, ImporteVigente As Decimal, Observacion As String) As Boolean
Public Function UpdatePresupuestosDetalle(CvePresupuestoDetalle As Integer, CveClasificacion As Integer, ImporteVigente As Decimal, Observacion As String, Optional CveConceptoContableNom As Integer = -1) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Con_PresupuestosDetalleUpdate")
@@ -3039,6 +3040,7 @@ Public Class ClsContratos
.Add("@CveClasificacion", SqlDbType.Int).Value = CveClasificacion
.Add("@ImporteVigente", SqlDbType.Money).Value = ImporteVigente
.Add("@Observacion", SqlDbType.VarChar).Value = Observacion
.Add("@CveConceptoContableNom", SqlDbType.Int).Value = CveConceptoContableNom
End With
Try
@@ -3068,7 +3070,7 @@ Public Class ClsContratos
End Try
Return Retorno
End Function
Public Function GetPresupuestosRep(CvePresupuesto As Integer, CveTipoGasto As Integer, Agrupador As Integer, FechaI As Date, FechaF As Date, CveEmpresa As Integer, CveProyecto As Integer, CveSubProyecto As Integer, CveUsuarioConsulta As Integer, CveClasificacion As Integer) As Boolean
Public Function GetPresupuestosRep(CvePresupuesto As Integer, CveTipoGasto As Integer, Agrupador As Integer, FechaI As Date, FechaF As Date, CveEmpresa As Integer, CveProyecto As Integer, CveSubProyecto As Integer, CveUsuarioConsulta As Integer, CveAgrupador As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Con_PresupuestosRep")
@@ -3082,7 +3084,7 @@ Public Class ClsContratos
.Add("@CveProyecto", SqlDbType.Int).Value = CveProyecto
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@CveUsuarioConsulta", SqlDbType.Int).Value = CveUsuarioConsulta
.Add("@CveClasificacion", SqlDbType.Int).Value = CveClasificacion
.Add("@CveAgrupador", SqlDbType.Int).Value = CveAgrupador
End With
Try
@@ -3121,7 +3123,7 @@ Public Class ClsContratos
Return Retorno
End Function
Public Function GetPresupuestosRepDetalle(CveProyecto As Integer, CveSubProyecto As Integer, CveClasificacion As Integer, CveTipoGasto As Integer, Agrupador As Integer, Gpo As Integer, FechaI As Date, FechaF As Date, CveEmpresa As Integer, CveUsuario As Integer) As Boolean
Public Function GetPresupuestosRepDetalle(CveProyecto As Integer, CveSubProyecto As Integer, CveClasificacion As Integer, CveTipoGasto As Integer, Agrupador As Integer, Gpo As Integer, FechaI As Date, FechaF As Date, CveEmpresa As Integer, CveUsuario As Integer, Optional CveConceptoContableNom As Integer = -1) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Con_PresupuestosRepDetalle")
@@ -3129,6 +3131,7 @@ Public Class ClsContratos
.Add("@CveProyecto", SqlDbType.Int).Value = CveProyecto
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
.Add("@CveClasificacion", SqlDbType.Int).Value = CveClasificacion
.Add("@CveConceptoContableNom", SqlDbType.Int).Value = CveConceptoContableNom
.Add("@CveTipoGasto", SqlDbType.Int).Value = CveTipoGasto
.Add("@Agrupador", SqlDbType.Int).Value = Agrupador
.Add("@Gpo", SqlDbType.Int).Value = Gpo

30
Compras/RepComprasAF.aspx
View File

@@ -102,33 +102,29 @@
<div class="row">
<div class="col-md-1">Tipo Activo Fijo: </div>
<div class="col-md-2">
<asp:DropDownList ID="DdlTipoActivoFijo" runat="server" CssClass="form-control input-sm select2me input-small" AppendDataBoundItems="True" AutoPostBack="True" DataTextField="TipoActivoFijo" DataValueField="CveTipoActivoFijo" Width="95%">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
<asp:DropDownList ID="DdlTipoActivoFijo" runat="server" CssClass="form-control input-sm select2me input-small" AutoPostBack="True" DataTextField="TipoActivoFijo" DataValueField="CveTipoActivoFijo" Width="95%">
</asp:DropDownList>
</div>
<div class="col-md-1">SubTipo Fijo:</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlSubTipoActivoFijo" CssClass="form-control input-sm select2me input-small" runat="server" AppendDataBoundItems="True" AutoPostBack="True" DataTextField="SubTipoActivoFijo" DataValueField="CveSubTipoActivoFijo" Width="95%">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
<asp:DropDownList ID="DdlSubTipoActivoFijo" CssClass="form-control input-sm select2me input-small" runat="server" AutoPostBack="True" DataTextField="SubTipoActivoFijo" DataValueField="CveSubTipoActivoFijo" Width="95%">
</asp:DropDownList>
</div>
<div class="col-md-1">Activo Fijo:</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlActivoFijo" runat="server" CssClass=" form-control input-sm select2me" AppendDataBoundItems="true" DataTextField="Descripcion" DataValueField="CveActivoFijo" Width="95%">
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
<asp:DropDownList ID="DdlActivoFijo" runat="server" CssClass=" form-control input-sm select2me" DataTextField="Descripcion" DataValueField="CveActivoFijo" Width="95%">
</asp:DropDownList>
</div>
<div class="col-md-1">Moneda:</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlMonedas" runat="server" AppendDataBoundItems="true" DataTextField="Moneda" CssClass="form-control input-sm select2me" DataValueField="CveMoneda" Width="95%">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
<asp:DropDownList ID="DdlMonedas" runat="server" DataTextField="Moneda" CssClass="form-control input-sm select2me" DataValueField="CveMoneda" Width="95%">
</asp:DropDownList>
</div>
</div>
<div class="row ">
<asp:Label ID="LblProyecto" runat="server" class="col-md-1 truncate">Proyecto:</asp:Label>
<div runat="server" id="DivProyecto" class="col-md-2">
<asp:DropDownList ID="DdlProyecto" CssClass=" form-control input-sm select2me" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" Width="95%">
<asp:DropDownList ID="DdlProyecto" CssClass=" form-control input-sm select2me" runat="server" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" Width="95%">
</asp:DropDownList>
</div>
<asp:Label runat="server" ID="LblSubProyecto" CssClass="col-md-1 truncate">SubProyecto:</asp:Label>
@@ -138,8 +134,7 @@
</div>
<div class="col-md-1 ">Proveedor:</div>
<div class="col-md-2 ">
<asp:DropDownList CssClass=" select2me" ID="DdlProveedores" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="95%">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
<asp:DropDownList CssClass=" select2me" ID="DdlProveedores" runat="server" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="95%">
</asp:DropDownList>
</div>
<div class="col-md-1">Tipo de Compra:</div>
@@ -156,16 +151,14 @@
<div class="col-md-1">Clasificación:</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlClasificacion" runat="server" CssClass=" form-control input-sm select2me" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="95%">
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
<asp:DropDownList ID="DdlClasificacion" runat="server" CssClass=" form-control input-sm select2me" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="95%">
</asp:DropDownList>
</div>
<div class="col-md-1">Clasificación 2:</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlClasificacion2" runat="server" CssClass=" form-control input-sm select2me" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="95%">
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
<asp:DropDownList ID="DdlClasificacion2" runat="server" CssClass=" form-control input-sm select2me" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="95%">
</asp:DropDownList>
</div>
@@ -179,11 +172,12 @@
</ContentTemplate>
</asp:UpdatePanel>
<br />
<div class="row">
<div class="col-md-8">
<asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:GridView ID="GvDatos" runat="server" data-sort="true" DataKeyNames="GPO,Cantidad,Total,Moneda" AutoGenerateColumns="False" EmptyDataText="No se encontraron registros con los filtros especificados"
ToolTip="Listado de Ventas" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" GridLines="None">
<asp:GridView ID="GvDatos" runat="server" data-sort="true" DataKeyNames="GPO,Cantidad,Total,Moneda" AutoGenerateColumns="False" EmptyDataText="No se encontraron registros con los filtros especificados" CssClass="table table-advance table-hover Widthall ScrollAD"
ToolTip="Listado de Ventas" GridLines="None">
<Columns>
<asp:TemplateField HeaderText="Grupo">
<ItemTemplate>
@@ -205,6 +199,7 @@
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
<asp:UpdatePanel runat="server" ID="UpTipoCambio" UpdateMode="Conditional">
<ContentTemplate>
<div id="DivTipoCambio" class="modal fade" role="dialog">
@@ -225,6 +220,7 @@
</asp:RadioButtonList>
<div class="row" style="margin-left: 10px;" runat="server" id="LiEspecifico" visible="false">
Especifico:
<asp:TextBox ID="TxtEspecifico" runat="server" Width="55px" />
</div>
</ContentTemplate>

6
Compras/RepComprasAF.aspx.vb
View File

@@ -60,15 +60,19 @@ Partial Class Compras_RepComprasAF
DdlProveedores.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
DdlProveedores.DataBind()
DdlProveedores.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlMonedas.DataSource = GlobalDTMonedas()
DdlMonedas.DataBind()
DdlMonedas.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlTipoActivoFijo.DataSource = GlobalDTTipoActivoFijo(UsuarioActual.CveEmpresa).FiltraParametros("", "TipoActivoFijo")
DdlTipoActivoFijo.DataBind()
DdlTipoActivoFijo.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlClasificacion.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltraParametros(" Codigo = '' OR Codigo IS NULL ", Orderby:="Clasificacion")
DdlClasificacion.DataBind()
DdlClasificacion.Items.Insert(0, New ListItem("Seleccione", "-1"))
Dim ObjClasificacion As New ClsClasificaciones
@@ -81,9 +85,11 @@ Partial Class Compras_RepComprasAF
ObjClasificacion.Dispose()
DdlClasificacion2.DataBind()
DdlClasificacion2.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlActivoFijo.DataSource = GlobalDTActivoFijos(UsuarioActual.CveEmpresa)
DdlActivoFijo.DataBind()
DdlActivoFijo.Items.Insert(0, New ListItem("Seleccione", "-1"))
CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyecto, divProyecto:=DivProyecto)

34
Contratos/Presupuestos.aspx
View File

@@ -33,11 +33,12 @@
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
<div class="row">
<div class="col-md-6">
<div class="col-md-4">
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption">
<i class="fa fa-info-circle"></i>Datos Generales
</div>
<div class="tools">
<a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
@@ -64,6 +65,28 @@
<ajax:ValidatorCalloutExtender ID="VCEObs" runat="server" HighlightCssClass="vco" TargetControlID="RFVObservacion"></ajax:ValidatorCalloutExtender>
</div>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
</div>
<div class="col-md-4">
<div class="portlet light smmallpadding bordered">
<div class="portlet-title">
<div class="caption">
<i class="fa fa-info-circle"></i>Configuración
</div>
<div class="tools">
<a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
</div>
</div>
<div class="portlet-body">
<asp:UpdatePanel ID="UpDatosG2" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="rowpadding">
<div class="row">
<label class="col-md-2 truncate">Proyecto:</label>
<div class="col-md-10">
@@ -130,7 +153,7 @@
</div>
</div>
</div>
<div class="col-md-6" runat="server" id="DivIndicadores" visible="false">
<div class="col-md-4" runat="server" id="DivIndicadores" visible="false">
<asp:UpdatePanel UpdateMode="Conditional" ID="UpIndicadores" runat="server">
<ContentTemplate>
<div class="row">
@@ -233,6 +256,7 @@
<div class="portlet-title">
<div class="caption" style="align-items: center">
<i class="fa fa-info-circle"></i>Presupuestos
</div>
<div class="tools">
<a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
@@ -244,13 +268,13 @@
<asp:UpdatePanel ID="UpGvClasificaciones" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:GridView ID="GvPresupuestos" runat="server" GridLines="None" EmptyDataText="No se encontraron presupuestos" CssClass="table table-hover table-striped Widthall ScrollAD" ShowFooter="true" data-footer="1" AutoGenerateColumns="False" data-heighterror="600"
DataKeyNames="CvePresupuestoDetalle,CveClasificacion,CveTipoGasto">
DataKeyNames="CvePresupuestoDetalle,CveAgrupador,CveTipoGasto,Tipo">
<Columns>
<asp:BoundField HeaderText="Clasificación" DataField="Clasificacion" />
<asp:BoundField HeaderText="Clasificación" DataField="Agrupador" />
<asp:TemplateField HeaderText="Importe" HeaderStyle-HorizontalAlign="Left" FooterStyle-HorizontalAlign="Right">
<ItemTemplate>
<asp:Label ID="LblImporteClasiTotal" runat="server" Visible="false"></asp:Label>
<asp:TextBox ID="TxtImporteClasi" runat="server" Text='<%#Eval("Importe") %>'></asp:TextBox>
<asp:TextBox ID="TxtImporteClasi" runat="server" Text='<%#Eval("Importe") %>' CssClass="form-control input-sm"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="SoloNumerosCantidad" runat="server" TargetControlID="TxtImporteClasi" FilterType="Custom, Numbers" ValidChars=".," />
</ItemTemplate>
<FooterTemplate>

51
Contratos/Presupuestos.aspx.vb
View File

@@ -125,7 +125,7 @@ Partial Class Contratos_Presupuestos
End Select
End If
If e.Row.RowType = DataControlRowType.Footer Then
Dim Importe = DtClasificaciones.SUM("Importe", "CveClasificacion IS NOT NULL")
Dim Importe = DtClasificaciones.SUM("Importe", "CveAgrupador IS NOT NULL")
e.Row.FCLabel("LblTotal").Text = String.Format("{0:C}", Importe)
End If
End Sub
@@ -327,23 +327,39 @@ Partial Class Contratos_Presupuestos
For Each GvRow As GridViewRow In GvPresupuestos.Rows
If GvRow.RowType = DataControlRowType.DataRow Then
Dim CveClasificacion = GvRow.DataKey("CveClasificacion").ToEntero
Dim CveTipoGasto = GvRow.DataKey("CveTipoGasto").ToEntero
Dim CveAgrupador = GvRow.DataKey("CveAgrupador").ToEntero
Dim Tipo As Integer = GvRow.DataKey("Tipo").ToEntero
Dim CveTipoGasto = -1
Dim CveClasificacion As Integer = -1
Dim CveConceptoContableNom As Integer = -1
If Tipo = 1 Then
CveClasificacion = CveAgrupador
CveTipoGasto = GvRow.DataKey("CveTipoGasto").ToEntero
End If
If Tipo = 2 Then
CveConceptoContableNom = CveAgrupador
End If
Dim CvePresupuestoDetalle = GvRow.DataKey("CvePresupuestoDetalle").ToEntero
Dim Importe = GvRow.FCTextBox("TxtImporteClasi").Text.ToDecimal
Dim Obs = GvRow.FCTextBox("TxtObservacion").Text.Trim
'ACTUALIZA EL REGISTRO EXISTENTE
If CvePresupuestoDetalle > 0 Then
TieneError = Not ObjCont.UpdatePresupuestosDetalle(CvePresupuestoDetalle, CveClasificacion, Importe, Obs)
TieneError = Not ObjCont.UpdatePresupuestosDetalle(CvePresupuestoDetalle, CveClasificacion, Importe, Obs, CveConceptoContableNom:=CveConceptoContableNom)
If TieneError Then
Exit For
End If
'AGREGA LA CLASIFICACION SI NO EXISTE EN EN EL DT DETALLE
Else
If Importe > 0 And CveClasificacion > 0 Then
TieneError = Not ObjCont.AddPresupuestosDetalle(CvePresupuesto, CveClasificacion, CveTipoGasto, Importe, Obs)
If Importe > 0 And CveAgrupador > 0 Then
TieneError = Not ObjCont.AddPresupuestosDetalle(CvePresupuesto, CveClasificacion, CveTipoGasto, Importe, Obs, CveConceptoContableNom:=CveConceptoContableNom)
If TieneError Then
Exit For
End If
@@ -385,18 +401,33 @@ Partial Class Contratos_Presupuestos
If CvePresupuestoNuevo > 0 Then
Dim ImporteClasi = 0.0D
Dim CveClasificacion = -1
Dim ObsDetalle = ""
For Each GvRow As GridViewRow In GvPresupuestos.Rows
If GvRow.RowType = DataControlRowType.DataRow Then
ImporteClasi = GvRow.FCTextBox("TxtImporteClasi").Text.ToDecimal
CveClasificacion = GvRow.DataKey("CveClasificacion").ToEntero
Dim CveTipoGasto = GvRow.DataKey("CveTipoGasto").ToEntero
ObsDetalle = GvRow.FCTextBox("TxtObservacion").Text.Trim
Dim CveAgrupador = GvRow.DataKey("CveAgrupador").ToEntero
Dim Tipo As Integer = GvRow.DataKey("Tipo").ToEntero
Dim CveClasificacion As Integer = -1
Dim CveConceptoContableNom As Integer = -1
Dim CveTipoGasto As Integer = -1
If Tipo = 1 Then
CveClasificacion = CveAgrupador
CveTipoGasto = GvRow.DataKey("CveTipoGasto").ToEntero
End If
If Tipo = 2 Then
CveConceptoContableNom = CveAgrupador
End If
If CveClasificacion > 0 Then
If ImporteClasi > 0 Then
TieneError = Not ObjCont.AddPresupuestosDetalle(CvePresupuestoNuevo, CveClasificacion, CveTipoGasto, ImporteClasi, ObsDetalle)
TieneError = Not ObjCont.AddPresupuestosDetalle(CvePresupuestoNuevo, CveClasificacion, CveTipoGasto, ImporteClasi, ObsDetalle, CveConceptoContableNom:=CveConceptoContableNom)
If TieneError Then
Exit For
End If

2
Contratos/RepPresupuestos.aspx
View File

@@ -233,7 +233,7 @@
</div>
<div class="col-md-1" style="max-width: 120px">Clasificacion:</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlClasificacion" DataTextField="Clasificacion" AppendDataBoundItems="true" DataValueField="CveClasificacion" Width="200px" runat="server" CssClass="form-control input-sm select2me">
<asp:DropDownList ID="DdlClasificacion" DataTextField="Agrupador" DataValueField="CveAgrupador" Width="200px" runat="server" CssClass="form-control input-sm select2me">
</asp:DropDownList>
</div>
<div class="col-md-1" style="max-width: 120px">Tipo Gasto:</div>

15
Contratos/RepPresupuestos.aspx.vb
View File

@@ -36,9 +36,14 @@ Partial Class Contratos_RepPresupuestos
DdlTipoGasto.DataSource = GlobalDTTiposGastos(UsuarioActual.CveEmpresa)
DdlTipoGasto.DataBind()
DdlClasificacion.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa)
DdlClasificacion.Items.Insert(0, New ListItem("Todos", "-1"))
Dim dtAgrupador = (From dr In GlobalDTClasificaciones(UsuarioActual.CveEmpresa)
Select New With {.CveAgrupador = dr("CveClasificacion").ToString().ToEntero(), .Agrupador = dr("Clasificacion").ToString()}
).Union(From dr In GlobalDTContaConceptosContables(-1)
Select New With {.CveAgrupador = dr("CveConceptoContable").ToString().ToEntero(), .Agrupador = dr("ConceptoContable").ToString()}).QueryToDataTable(True)
DdlClasificacion.DataSource = dtAgrupador
DdlClasificacion.DataBind()
DdlClasificacion.Items.Insert(0, New ListItem("Todos", "-1"))
DdlProyecto.DataSource = If(UsuarioActual.Empresa.Funcionalidad(102) = "1" AndAlso Not UsuarioActual.TienePermisoProceso(110), GlobalDTProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1).FiltraParametros("", "", {"CveProyecto", "Proyecto"}), GlobalDTProyectos(UsuarioActual.CveEmpresa, -1).FiltraParametros("", "", {"CveProyecto", "Proyecto"}))
DdlProyecto.Items.Insert(0, New ListItem("Todos", "-1"))
@@ -362,7 +367,7 @@ Partial Class Contratos_RepPresupuestos
EsProyecto = True
End If
Dim Css = "Texto"
Dim Liga = $"/Contratos/RepPresupuestosDetalle.aspx?&CveAgrupador={CveAgrupador}&CveClasificacion={e.Row.DBCampo("CveClasificacionFiltro")}&CveProyecto={e.Row.DBCampo("CveProyectoFiltro")}&CveSubProyecto={e.Row.DBCampo("CveSubProyectoFiltro")}&CveTipoGasto={e.Row.DBCampo("CveTipoGastoFiltro")}&Agrupador={e.Row.DBCampo("AgrupadorFiltro")}&Mensual={False}&EsProyecto={EsProyecto}&FechaFin={FechaFin}&FechaInicio={FechaInicio}"
Dim Liga = $"/Contratos/RepPresupuestosDetalle.aspx?&CveAgrupador={CveAgrupador}&CveClasificacion={e.Row.DBCampo("CveClasificacionFiltro")}&CveConceptoContableNom={e.Row.DBCampo("CveConceptoContableNomFiltro")}&CveProyecto={e.Row.DBCampo("CveProyectoFiltro")}&CveSubProyecto={e.Row.DBCampo("CveSubProyectoFiltro")}&CveTipoGasto={e.Row.DBCampo("CveTipoGastoFiltro")}&Agrupador={e.Row.DBCampo("AgrupadorFiltro")}&Mensual={False}&EsProyecto={EsProyecto}&FechaFin={FechaFin}&FechaInicio={FechaInicio}"
e.Row.Cells(0).Text = "<a class=" + "" + Css + "" + " href=" + "" + Liga + "" + ">" + e.Row.Cells(0).Text + "</a>"
End If
End If
@@ -492,7 +497,7 @@ Partial Class Contratos_RepPresupuestos
Dim FechaFin = e.Row.DBCampo("FechaFFiltro").ToDate.ToShortDateString
Dim FechaInicio = e.Row.DBCampo("FechaIFiltro").ToDate.ToShortDateString
Dim Css = "Texto"
Dim Liga = $"/Contratos/RepPresupuestosDetalle.aspx?&CveAgrupador={CveAgrupador}&CveClasificacion={e.Row.DBCampo("CveClasificacionFiltro")}&CveProyecto={e.Row.DBCampo("CveProyectoFiltro")}&CveSubProyecto={e.Row.DBCampo("CveSubProyectoFiltro")}&CveTipoGasto={e.Row.DBCampo("CveTipoGastoFiltro")}&Agrupador={e.Row.DBCampo("AgrupadorFiltro")}&Mensual={True}&EsProyecto={EsProyecto}&FechaFin={FechaFin}&FechaInicio={FechaInicio}"
Dim Liga = $"/Contratos/RepPresupuestosDetalle.aspx?&CveAgrupador={CveAgrupador}&CveClasificacion={e.Row.DBCampo("CveClasificacionFiltro")}&CveConceptoContableNom={e.Row.DBCampo("CveConceptoContableNomFiltro")}&CveProyecto={e.Row.DBCampo("CveProyectoFiltro")}&CveSubProyecto={e.Row.DBCampo("CveSubProyectoFiltro")}&CveTipoGasto={e.Row.DBCampo("CveTipoGastoFiltro")}&Agrupador={e.Row.DBCampo("AgrupadorFiltro")}&Mensual={True}&EsProyecto={EsProyecto}&FechaFin={FechaFin}&FechaInicio={FechaInicio}"
e.Row.Cells(0).Text = "<a class=" + "" + Css + "" + " href=" + "" + Liga + "" + ">" + e.Row.Cells(0).Text + "</a>"
End If
Else
@@ -506,7 +511,7 @@ Partial Class Contratos_RepPresupuestos
Dim FechaFin = e.Row.DBCampo("FechaFFiltro").ToDate.ToShortDateString
Dim FechaInicio = e.Row.DBCampo("FechaIFiltro").ToDate.ToShortDateString
Dim Css = "Texto"
Dim Liga = $"/Contratos/RepPresupuestosDetalle.aspx?&CveAgrupador={CveAgrupador}&CveClasificacion={e.Row.DBCampo("CveClasificacionFiltro")}&CveProyecto={e.Row.DBCampo("CveProyectoFiltro")}&CveSubProyecto={e.Row.DBCampo("CveSubProyectoFiltro")}&CveTipoGasto={e.Row.DBCampo("CveTipoGastoFiltro")}&Agrupador={e.Row.DBCampo("AgrupadorFiltro")}&Mensual={True}&EsProyecto={EsProyecto}&FechaFin={FechaFin}&FechaInicio={FechaInicio}"
Dim Liga = $"/Contratos/RepPresupuestosDetalle.aspx?&CveAgrupador={CveAgrupador}&CveClasificacion={e.Row.DBCampo("CveClasificacionFiltro")}&CveConceptoContableNom={e.Row.DBCampo("CveConceptoContableNomFiltro")}&CveProyecto={e.Row.DBCampo("CveProyectoFiltro")}&CveSubProyecto={e.Row.DBCampo("CveSubProyectoFiltro")}&CveTipoGasto={e.Row.DBCampo("CveTipoGastoFiltro")}&Agrupador={e.Row.DBCampo("AgrupadorFiltro")}&Mensual={True}&EsProyecto={EsProyecto}&FechaFin={FechaFin}&FechaInicio={FechaInicio}"
e.Row.Cells(0).Text = "<a class=" + "" + Css + "" + " href=" + "" + Liga + "" + ">" + e.Row.Cells(0).Text + "</a>"
End If
End If

2
Contratos/RepPresupuestosDetalle.aspx
View File

@@ -226,7 +226,7 @@
</div>
<div class="col-md-1" style="max-width: 120px">Clasificacion:</div>
<div class="col-md-2">
<asp:DropDownList ID="DdlClasificacion" DataTextField="Clasificacion" AppendDataBoundItems="true" DataValueField="CveClasificacion" Width="200px" runat="server" CssClass="form-control input-sm select2me">
<asp:DropDownList ID="DdlClasificacion" DataTextField="Agrupador" DataValueField="CveAgrupador" Width="200px" runat="server" CssClass="form-control input-sm select2me">
</asp:DropDownList>
</div>
<div class="col-md-1" style="max-width: 120px">Tipo Gasto:</div>

13
Contratos/RepPresupuestosDetalle.aspx.vb
View File

@@ -45,9 +45,14 @@ Partial Class Contratos_RepPresupuestosDetalle
TxtFiltrosFechaInicio.Text = $"01/09/{Now.Year - 1}"
TxtFiltrosFechaFin.Text = $"31/08/{Now.Year}"
DdlClasificacion.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa)
DdlClasificacion.Items.Insert(0, New ListItem("Todas", "-1"))
Dim dtAgrupador = (From dr In GlobalDTClasificaciones(UsuarioActual.CveEmpresa)
Select New With {.CveAgrupador = dr("CveClasificacion").ToString().ToEntero(), .Agrupador = dr("Clasificacion").ToString()}
).Union(From dr In GlobalDTContaConceptosContables(-1)
Select New With {.CveAgrupador = dr("CveConceptoContable").ToString().ToEntero(), .Agrupador = dr("ConceptoContable").ToString()}).QueryToDataTable(True)
DdlClasificacion.DataSource = dtAgrupador
DdlClasificacion.DataBind()
DdlClasificacion.Items.Insert(0, New ListItem("Todas", "-1"))
DdlTipoGasto.DataSource = GlobalDTTiposGastos(UsuarioActual.CveEmpresa)
DdlTipoGasto.DataBind()
@@ -181,7 +186,7 @@ Partial Class Contratos_RepPresupuestosDetalle
EsProyecto = True
End If
Dim Css = "Texto"
Dim Liga = $"/Contratos/RepPresupuestosDetalleCompras.aspx?&CveAgrupador={CveAgrupador}&CveClasificacion={e.Row.DBCampo("CveClasificacionFiltro")}&CveProyecto={e.Row.DBCampo("CveProyectoFiltro")}&CveSubProyecto={e.Row.DBCampo("CveSubProyectoFiltro")}&CveTipoGasto={e.Row.DBCampo("CveTipoGastoFiltro")}&Agrupador={e.Row.DBCampo("AgrupadorFiltro")}&Mensual={False}&EsProyecto={EsProyecto}&FechaFin={FechaFin}&FechaInicio={FechaInicio}"
Dim Liga = $"/Contratos/RepPresupuestosDetalleCompras.aspx?&CveAgrupador={CveAgrupador}&CveClasificacion={e.Row.DBCampo("CveClasificacionFiltro")}&CveConceptoContableNom={e.Row.DBCampo("CveConceptoContableNomFiltro")}&CveProyecto={e.Row.DBCampo("CveProyectoFiltro")}&CveSubProyecto={e.Row.DBCampo("CveSubProyectoFiltro")}&CveTipoGasto={e.Row.DBCampo("CveTipoGastoFiltro")}&Agrupador={e.Row.DBCampo("AgrupadorFiltro")}&Mensual={False}&EsProyecto={EsProyecto}&FechaFin={FechaFin}&FechaInicio={FechaInicio}"
e.Row.Cells(0).Text = "<a class=" + "" + Css + "" + " href=" + "" + Liga + "" + ">" + e.Row.Cells(0).Text + "</a>"
End If
End If
@@ -302,7 +307,7 @@ Partial Class Contratos_RepPresupuestosDetalle
EsProyecto = True
End If
Dim Css = "Texto"
Dim Liga = $"/Contratos/RepPresupuestosDetalleCompras.aspx?&CveAgrupador={CveAgrupador}&CveClasificacion={e.Row.DBCampo("CveClasificacionFiltro")}&CveProyecto={e.Row.DBCampo("CveProyectoFiltro")}&CveSubProyecto={e.Row.DBCampo("CveSubProyectoFiltro")}&CveTipoGasto={e.Row.DBCampo("CveTipoGastoFiltro")}&Agrupador={e.Row.DBCampo("AgrupadorFiltro")}&Mensual={False}&EsProyecto={EsProyecto}&FechaFin={FechaFin}&FechaInicio={FechaInicio}"
Dim Liga = $"/Contratos/RepPresupuestosDetalleCompras.aspx?&CveAgrupador={CveAgrupador}&CveClasificacion={e.Row.DBCampo("CveClasificacionFiltro")}&CveConceptoContableNom={e.Row.DBCampo("CveConceptoContableNomFiltro")}&CveProyecto={e.Row.DBCampo("CveProyectoFiltro")}&CveSubProyecto={e.Row.DBCampo("CveSubProyectoFiltro")}&CveTipoGasto={e.Row.DBCampo("CveTipoGastoFiltro")}&Agrupador={e.Row.DBCampo("AgrupadorFiltro")}&Mensual={False}&EsProyecto={EsProyecto}&FechaFin={FechaFin}&FechaInicio={FechaInicio}"
e.Row.Cells(0).Text = "<a class=" + "" + Css + "" + " href=" + "" + Liga + "" + ">" + e.Row.Cells(0).Text + "</a>"
End If
End If

163
Empresas/141/Formatos/Factura.rdlc
View File

@@ -346,8 +346,9 @@
<Value>=Parameters!QR.Value</Value>
<Sizing>FitProportional</Sizing>
<Top>0.04167in</Top>
<Left>0.04352in</Left>
<Height>1.37377in</Height>
<Width>1.7524in</Width>
<Width>1.73969in</Width>
<Style>
<Border>
<Style>None</Style>
@@ -489,7 +490,7 @@
</Paragraphs>
<rd:DefaultName>Textbox88</rd:DefaultName>
<Top>0.07057cm</Top>
<Left>4.6275cm</Left>
<Left>4.54701cm</Left>
<Height>2.25463cm</Height>
<Width>16.27211cm</Width>
<ZIndex>1</ZIndex>
@@ -506,9 +507,9 @@
</ReportItems>
<KeepTogether>true</KeepTogether>
<Top>6.61175in</Top>
<Left>0.06752in</Left>
<Left>0.09419in</Left>
<Height>1.42169in</Height>
<Width>8.23953in</Width>
<Width>8.20784in</Width>
<Style>
<Border>
<Style>None</Style>
@@ -519,34 +520,34 @@
<TablixBody>
<TablixColumns>
<TablixColumn>
<Width>0.54014in</Width>
<Width>0.5387in</Width>
</TablixColumn>
<TablixColumn>
<Width>0.59111in</Width>
<Width>0.58967in</Width>
</TablixColumn>
<TablixColumn>
<Width>0.80359in</Width>
<Width>0.80215in</Width>
</TablixColumn>
<TablixColumn>
<Width>0.66404in</Width>
<Width>0.64011in</Width>
</TablixColumn>
<TablixColumn>
<Width>2.11562in</Width>
<Width>2.06124in</Width>
</TablixColumn>
<TablixColumn>
<Width>0.6863in</Width>
<Width>0.68486in</Width>
</TablixColumn>
<TablixColumn>
<Width>0.69852in</Width>
<Width>0.69708in</Width>
</TablixColumn>
<TablixColumn>
<Width>0.6403in</Width>
<Width>0.63886in</Width>
</TablixColumn>
<TablixColumn>
<Width>0.67895in</Width>
<Width>0.67751in</Width>
</TablixColumn>
<TablixColumn>
<Width>0.80447in</Width>
<Width>0.80303in</Width>
</TablixColumn>
</TablixColumns>
<TablixRows>
@@ -1384,9 +1385,9 @@
</TablixRowHierarchy>
<DataSetName>DsOC</DataSetName>
<Top>1.75278in</Top>
<Left>0.09836in</Left>
<Left>0.13771in</Left>
<Height>0.36206in</Height>
<Width>8.22304in</Width>
<Width>8.13325in</Width>
<ZIndex>1</ZIndex>
<Style>
<Border>
@@ -1410,9 +1411,9 @@
</Paragraphs>
<rd:DefaultName>Textbox5</rd:DefaultName>
<Top>9.07761cm</Top>
<Left>0.28014cm</Left>
<Left>0.34979cm</Left>
<Height>0.05496cm</Height>
<Width>20.88652cm</Width>
<Width>20.64332cm</Width>
<ZIndex>2</ZIndex>
<Style>
<Border>
@@ -1472,7 +1473,7 @@
</Paragraphs>
<rd:DefaultName>Textbox1</rd:DefaultName>
<Top>9.21872cm</Top>
<Left>1.10521cm</Left>
<Left>1.04171cm</Left>
<Height>0.47226cm</Height>
<Width>12.31061cm</Width>
<ZIndex>3</ZIndex>
@@ -1491,7 +1492,7 @@
<Value>ID2</Value>
<Sizing>FitProportional</Sizing>
<Top>0.15875cm</Top>
<Left>1.15361cm</Left>
<Left>1.09011cm</Left>
<Height>2.2881cm</Height>
<Width>2.75323cm</Width>
<ZIndex>4</ZIndex>
@@ -1571,7 +1572,7 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox4</rd:DefaultName>
<Left>4.32565cm</Left>
<Left>4.26215cm</Left>
<Height>1.93cm</Height>
<Width>7.93893cm</Width>
<ZIndex>5</ZIndex>
@@ -1651,7 +1652,7 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox4</rd:DefaultName>
<Left>12.68838cm</Left>
<Left>12.62488cm</Left>
<Height>2.55125cm</Height>
<Width>5.11312cm</Width>
<ZIndex>6</ZIndex>
@@ -1685,7 +1686,7 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox8</rd:DefaultName>
<Left>18.23008cm</Left>
<Left>18.13483cm</Left>
<Height>0.96018cm</Height>
<Width>2.79101cm</Width>
<ZIndex>7</ZIndex>
@@ -1721,7 +1722,7 @@
</Paragraphs>
<rd:DefaultName>Textbox8</rd:DefaultName>
<Top>0.97782cm</Top>
<Left>18.23008cm</Left>
<Left>18.13483cm</Left>
<Height>0.6cm</Height>
<Width>2.79101cm</Width>
<ZIndex>8</ZIndex>
@@ -1772,7 +1773,7 @@
</Paragraphs>
<rd:DefaultName>Textbox8</rd:DefaultName>
<Top>1.57782cm</Top>
<Left>18.23008cm</Left>
<Left>18.13483cm</Left>
<Height>0.86903cm</Height>
<Width>2.79101cm</Width>
<ZIndex>9</ZIndex>
@@ -1862,10 +1863,10 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox4</rd:DefaultName>
<Top>2.47332cm</Top>
<Left>0.28014cm</Left>
<Top>2.4839cm</Top>
<Left>0.34979cm</Left>
<Height>1.09007cm</Height>
<Width>9.71199cm</Width>
<Width>9.64071cm</Width>
<ZIndex>10</ZIndex>
<Style>
<Border>
@@ -1940,9 +1941,9 @@
</Paragraphs>
<rd:DefaultName>Textbox4</rd:DefaultName>
<Top>2.45319cm</Top>
<Left>10.09281cm</Left>
<Left>10.06106cm</Left>
<Height>1.12078cm</Height>
<Width>10.9783cm</Width>
<Width>10.82019cm</Width>
<ZIndex>11</ZIndex>
<Style>
<Border>
@@ -2140,9 +2141,9 @@
</Paragraphs>
<rd:DefaultName>Textbox4</rd:DefaultName>
<Top>3.56339cm</Top>
<Left>0.25136cm</Left>
<Left>0.34979cm</Left>
<Height>0.74611cm</Height>
<Width>13.82025cm</Width>
<Width>13.69007cm</Width>
<ZIndex>12</ZIndex>
<Style>
<Border>
@@ -2173,7 +2174,7 @@
</Paragraphs>
<rd:DefaultName>Textbox32</rd:DefaultName>
<Top>3.64071cm</Top>
<Left>14.07729cm</Left>
<Left>14.04554cm</Left>
<Height>0.57354cm</Height>
<Width>2.90753cm</Width>
<ZIndex>13</ZIndex>
@@ -2211,7 +2212,7 @@
</Paragraphs>
<rd:DefaultName>Textbox4</rd:DefaultName>
<Top>5.4306cm</Top>
<Left>1.74571cm</Left>
<Left>1.68221cm</Left>
<Height>1.05328cm</Height>
<Width>17.71415cm</Width>
<ZIndex>14</ZIndex>
@@ -2244,7 +2245,7 @@
</Paragraphs>
<rd:DefaultName>Textbox5</rd:DefaultName>
<Top>14.04286cm</Top>
<Left>0.30274cm</Left>
<Left>0.23924cm</Left>
<Height>0.05496cm</Height>
<Width>20.88652cm</Width>
<ZIndex>15</ZIndex>
@@ -2298,9 +2299,9 @@
</Paragraphs>
<rd:DefaultName>Textbox32</rd:DefaultName>
<Top>3.57397cm</Top>
<Left>17.11694cm</Left>
<Left>17.05344cm</Left>
<Height>0.64028cm</Height>
<Width>3.90165cm</Width>
<Width>3.82781cm</Width>
<ZIndex>16</ZIndex>
<Style>
<Border>
@@ -2465,9 +2466,9 @@
</Paragraphs>
<rd:DefaultName>Textbox4</rd:DefaultName>
<Top>14.20365cm</Top>
<Left>0.21674cm</Left>
<Left>0.23068cm</Left>
<Height>2.44366cm</Height>
<Width>15.51057cm</Width>
<Width>15.43864cm</Width>
<ZIndex>17</ZIndex>
<Style>
<Border>
@@ -2500,7 +2501,7 @@
</Paragraphs>
<rd:DefaultName>Textbox19</rd:DefaultName>
<Top>5.5781in</Top>
<Left>6.237in</Left>
<Left>6.212in</Left>
<Height>0.17608in</Height>
<Width>0.94607in</Width>
<ZIndex>18</ZIndex>
@@ -2535,7 +2536,7 @@
</Paragraphs>
<rd:DefaultName>Textbox19</rd:DefaultName>
<Top>5.73307in</Top>
<Left>6.23699in</Left>
<Left>6.21199in</Left>
<Height>0.17608in</Height>
<Width>0.94607in</Width>
<ZIndex>19</ZIndex>
@@ -2570,7 +2571,7 @@
</Paragraphs>
<rd:DefaultName>Textbox19</rd:DefaultName>
<Top>5.89456in</Top>
<Left>6.23699in</Left>
<Left>6.21199in</Left>
<Height>0.17608in</Height>
<Width>0.94607in</Width>
<ZIndex>20</ZIndex>
@@ -2605,7 +2606,7 @@
</Paragraphs>
<rd:DefaultName>Textbox19</rd:DefaultName>
<Top>6.06331in</Top>
<Left>6.24741in</Left>
<Left>6.22241in</Left>
<Height>0.17608in</Height>
<Width>0.94607in</Width>
<ZIndex>21</ZIndex>
@@ -2641,7 +2642,7 @@
</Paragraphs>
<rd:DefaultName>Textbox19</rd:DefaultName>
<Top>6.22894in</Top>
<Left>6.25783in</Left>
<Left>6.23283in</Left>
<Height>0.19596in</Height>
<Width>0.94607in</Width>
<ZIndex>22</ZIndex>
@@ -2677,7 +2678,7 @@
</Paragraphs>
<rd:DefaultName>Textbox42</rd:DefaultName>
<Top>5.5781in</Top>
<Left>7.18307in</Left>
<Left>7.15807in</Left>
<Height>0.17608in</Height>
<Width>0.98426in</Width>
<ZIndex>23</ZIndex>
@@ -2712,7 +2713,7 @@
</Paragraphs>
<rd:DefaultName>Textbox42</rd:DefaultName>
<Top>5.73307in</Top>
<Left>7.18307in</Left>
<Left>7.15807in</Left>
<Height>0.17608in</Height>
<Width>0.98425in</Width>
<ZIndex>24</ZIndex>
@@ -2747,7 +2748,7 @@
</Paragraphs>
<rd:DefaultName>Textbox42</rd:DefaultName>
<Top>5.89456in</Top>
<Left>7.19349in</Left>
<Left>7.16849in</Left>
<Height>0.17608in</Height>
<Width>0.98425in</Width>
<ZIndex>25</ZIndex>
@@ -2783,7 +2784,7 @@
</Paragraphs>
<rd:DefaultName>Textbox42</rd:DefaultName>
<Top>6.06331in</Top>
<Left>7.19349in</Left>
<Left>7.16849in</Left>
<Height>0.17608in</Height>
<Width>0.98425in</Width>
<ZIndex>26</ZIndex>
@@ -2819,7 +2820,7 @@
</Paragraphs>
<rd:DefaultName>Textbox42</rd:DefaultName>
<Top>6.22894in</Top>
<Left>7.20391in</Left>
<Left>7.17891in</Left>
<Height>0.19596in</Height>
<Width>0.98425in</Width>
<ZIndex>27</ZIndex>
@@ -2854,7 +2855,7 @@
</Paragraphs>
<rd:DefaultName>Textbox90</rd:DefaultName>
<Top>1.77125cm</Top>
<Left>7.90108cm</Left>
<Left>7.83758cm</Left>
<Height>0.78cm</Height>
<Width>4.3635cm</Width>
<ZIndex>28</ZIndex>
@@ -2884,9 +2885,9 @@
</Paragraphs>
<rd:DefaultName>Textbox5</rd:DefaultName>
<Top>16.71787cm</Top>
<Left>0.1587cm</Left>
<Left>0.23924cm</Left>
<Height>0.05496cm</Height>
<Width>20.88652cm</Width>
<Width>20.75387cm</Width>
<ZIndex>29</ZIndex>
<Style>
<Border>
@@ -2931,7 +2932,7 @@
</Paragraphs>
<rd:DefaultName>Textbox3</rd:DefaultName>
<Top>6.48388cm</Top>
<Left>1.15361cm</Left>
<Left>1.05836cm</Left>
<Height>1.32415cm</Height>
<Width>19.15078cm</Width>
<ZIndex>30</ZIndex>
@@ -2964,9 +2965,9 @@
</Paragraphs>
<rd:DefaultName>Textbox5</rd:DefaultName>
<Top>20.40466cm</Top>
<Left>0.15401cm</Left>
<Left>0.25268cm</Left>
<Height>0.05496cm</Height>
<Width>20.88652cm</Width>
<Width>20.6857cm</Width>
<ZIndex>31</ZIndex>
<Style>
<Border>
@@ -3004,7 +3005,7 @@
</Paragraphs>
<rd:DefaultName>Textbox15</rd:DefaultName>
<Top>7.98442cm</Top>
<Left>1.15361cm</Left>
<Left>1.04171cm</Left>
<Height>1.05791cm</Height>
<Width>19.15078cm</Width>
<ZIndex>32</ZIndex>
@@ -3504,9 +3505,9 @@
</ReportItems>
<KeepTogether>true</KeepTogether>
<Top>20.4949cm</Top>
<Left>0.16383cm</Left>
<Left>0.15875cm</Left>
<Height>2.26835cm</Height>
<Width>20.89818cm</Width>
<Width>20.98078cm</Width>
<ZIndex>33</ZIndex>
<Visibility>
<Hidden>=Microsoft.VisualBasic.Interaction.IIF(First(Fields!SerieFolio.Value, "DataSet4") &lt;&gt; "", False, True)</Hidden>
@@ -3556,7 +3557,7 @@
</Paragraphs>
<rd:DefaultName>Textbox1</rd:DefaultName>
<Top>9.14816cm</Top>
<Left>13.59221cm</Left>
<Left>13.52871cm</Left>
<Height>0.54281cm</Height>
<Width>7.38429cm</Width>
<ZIndex>34</ZIndex>
@@ -3578,9 +3579,9 @@
<Value>logoLlantas21</Value>
<Sizing>FitProportional</Sizing>
<Top>13.24423cm</Top>
<Left>0.25908cm</Left>
<Left>0.34979cm</Left>
<Height>0.85359cm</Height>
<Width>20.86494cm</Width>
<Width>20.65846cm</Width>
<ZIndex>35</ZIndex>
<Style>
<Border>
@@ -3613,9 +3614,9 @@
</Paragraphs>
<rd:DefaultName>Textbox4</rd:DefaultName>
<Top>9.73684cm</Top>
<Left>0.20617cm</Left>
<Left>0.23924cm</Left>
<Height>0.44183cm</Height>
<Width>20.83436cm</Width>
<Width>20.69914cm</Width>
<ZIndex>36</ZIndex>
<Style>
<Border>
@@ -3651,7 +3652,7 @@
</Paragraphs>
<rd:DefaultName>Textbox60</rd:DefaultName>
<Top>0cm</Top>
<Left>0.01593cm</Left>
<Left>0cm</Left>
<Height>0.58237cm</Height>
<Width>20.96485cm</Width>
<Style>
@@ -3707,7 +3708,7 @@
</Paragraphs>
<rd:DefaultName>Textbox60</rd:DefaultName>
<Top>0cm</Top>
<Left>0.0506cm</Left>
<Left>0.16167cm</Left>
<Height>1.49135cm</Height>
<Width>5.37042cm</Width>
<ZIndex>1</ZIndex>
@@ -3800,7 +3801,7 @@
</Paragraphs>
<rd:DefaultName>Textbox60</rd:DefaultName>
<Top>0.6882cm</Top>
<Left>7.25125cm</Left>
<Left>7.23532cm</Left>
<Height>1.98084cm</Height>
<Width>6.56105cm</Width>
<ZIndex>2</ZIndex>
@@ -3839,7 +3840,7 @@
</Paragraphs>
<rd:DefaultName>Textbox60</rd:DefaultName>
<Top>0cm</Top>
<Left>14.64769cm</Left>
<Left>14.50476cm</Left>
<Height>1.46939cm</Height>
<Width>6.32076cm</Width>
<ZIndex>3</ZIndex>
@@ -3859,7 +3860,7 @@
<MIMEType>image/png</MIMEType>
<Sizing>FitProportional</Sizing>
<Top>0.43341in</Top>
<Left>6.67293in</Left>
<Left>6.61666in</Left>
<Height>0.6035in</Height>
<Width>0.78275in</Width>
<ZIndex>4</ZIndex>
@@ -3874,7 +3875,7 @@
<Value>ID3</Value>
<Sizing>FitProportional</Sizing>
<Top>1.7033cm</Top>
<Left>0.09579cm</Left>
<Left>0.17511cm</Left>
<Height>0.93046cm</Height>
<Width>5.37042cm</Width>
<ZIndex>5</ZIndex>
@@ -3887,9 +3888,9 @@
</ReportItems>
<KeepTogether>true</KeepTogether>
<Top>10.24923cm</Top>
<Left>0.15557cm</Left>
<Left>0.17468cm</Left>
<Height>2.92445cm</Height>
<Width>20.98078cm</Width>
<Width>20.96485cm</Width>
<ZIndex>37</ZIndex>
<Style>
<Border>
@@ -3898,10 +3899,10 @@
</Style>
</Rectangle>
</ReportItems>
<Height>22.76324cm</Height>
<Height>22.76325cm</Height>
<Style />
</Body>
<Width>21.18926cm</Width>
<Width>21.13953cm</Width>
<Page>
<PageFooter>
<Height>0.52387cm</Height>
@@ -3939,8 +3940,8 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox8</rd:DefaultName>
<Top>0.00882cm</Top>
<Left>0.12568cm</Left>
<Top>0.00881cm</Top>
<Left>0.25268cm</Left>
<Height>0.46771cm</Height>
<Width>6.86562cm</Width>
<Style>
@@ -3984,8 +3985,8 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox8</rd:DefaultName>
<Top>0.01927cm</Top>
<Left>9.07541cm</Left>
<Top>0.01926cm</Top>
<Left>9.20241cm</Left>
<Height>0.46771cm</Height>
<Width>6.86562cm</Width>
<ZIndex>1</ZIndex>
@@ -4020,8 +4021,8 @@
</Paragraph>
</Paragraphs>
<rd:DefaultName>Textbox35</rd:DefaultName>
<Top>0.00882cm</Top>
<Left>18.54098cm</Left>
<Top>0.00881cm</Top>
<Left>18.57273cm</Left>
<Height>0.50624cm</Height>
<Width>2.5cm</Width>
<ZIndex>2</ZIndex>
@@ -4044,8 +4045,8 @@
</PageFooter>
<PageHeight>27.94cm</PageHeight>
<PageWidth>21.59cm</PageWidth>
<LeftMargin>0cm</LeftMargin>
<RightMargin>0cm</RightMargin>
<LeftMargin>0.2cm</LeftMargin>
<RightMargin>0.24cm</RightMargin>
<TopMargin>0.5cm</TopMargin>
<BottomMargin>0.5cm</BottomMargin>
<ColumnSpacing>1.27cm</ColumnSpacing>

2
Inventarios/TraspasoAlmacen.aspx
View File

@@ -466,7 +466,7 @@
<asp:TemplateField ItemStyle-Width="93px" ItemStyle-HorizontalAlign ="Right">
<ItemTemplate>
<asp:Literal runat="server" Text='<%# Eval("Cantidad") %>' ID="ltlCantidad"></asp:Literal>
<asp:TextBox runat="server" ID="TxtCantidad2" Text='<%# Eval("Cantidad", "{0:###,###,###,##0.##}") %>' Width="50px" Visible="false"></asp:TextBox>
<asp:TextBox runat="server" ID="TxtCantidad2" Text='<%# Eval("Cantidad", "{0:###,###,###,##0.######}") %>' Width="50px" Visible="false"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="SoloNumerosCantidadF" runat="server" TargetControlID="TxtCantidad2" FilterType="Numbers,custom" ValidChars="." />
</ItemTemplate>
</asp:TemplateField>

2
Inventarios/TraspasoAlmacen.aspx.vb
View File

@@ -972,7 +972,7 @@ Partial Class Inventarios_TraspasoAlmacen
If Existencia < 0 Then
ErrorExistencia = True
TextoExistencia.AppendFormat(" {1},", gvr.DataKey("No"), gvr.DataKey("CvePS"), If(gvr.DataKey("Serie").ToString().Trim().Length > 0, $" &nbsp; Serie: <b>{gvr.DataKey("Serie")}</b>", ""), (Existencia + gvr.FCTextBox("TxtCantidad2").Text.ToEntero), MsgAdicional)
TextoExistencia.AppendFormat("-<b>#{0}</b> {1} {2} &nbsp; Existencia: <b>{3}</b>{4}<br/>", gvr.DataKey("No"), gvr.DataKey("PS"), If(gvr.DataKey("Serie").ToString().Trim().Length > 0, $" &nbsp; Serie: <b>{gvr.DataKey("Serie")}</b>", ""), (Existencia + gvr.FCTextBox("TxtCantidad2").Text.ToDecimal()), MsgAdicional)
End If
Next